Oki MICROLINE 380 Handbuch Seite 145

180 NEXT I
190 PRINT #1, CHR$(13); CHR$(10); CHR$(10); :
REM Nächste Grafikdichte
200 NEXT MODE
210 DATA 0, 0, 1, 0, 0, 3, 0, 0, 7, 0, 0, 15
220 DATA 0, 0, 31, 0, 0, 63, 0, 0, 127, 0, 0,
255
230 DATA 0, 1, 255, 0, 3, 255, 0, 7, 255, 0, 15,
255
240 DATA 0, 31, 255, 0, 63, 255, 0, 127, 255, 0,
255, 255
250 DATA 1, 255, 255, 3, 255, 255, 7, 255, 255,
15, 255, 255
260 DATA 31, 255, 255, 63, 255, 255, 127, 255,
255, 255, 255, 255
270 DATA 255, 255, 255, 127, 255, 255, 63, 255,
255, 31, 255, 255
280 DATA 15, 255, 255, 7, 255, 255, 3, 255, 255,
1, 255, 255
290 DATA 0, 255, 255, 0, 127, 255, 0, 63, 255,
0, 31, 255
300 DATA 0, 15, 255, 0, 7, 255, 0, 3, 255, 0, 1,
255
310 DATA 0, 0, 255, 0, 0, 127, 0, 0, 63, 0, 0,
31
320 DATA 0, 0, 15, 0, 0, 7, 0, 0, 3, 0, 0, 1
320 END
Das Programme gibt fünf Zeilen von jeweils sechs Dreiecken in den
verschiedenen Grafikdichten an den Drucker aus.
Kapitel 12: EPSON-Emulation - Grafiken und ladbare Zeichen
12-7