Inhaltsverzeichnis
Werbung
23
100 REN CHRS OE O ... BIT
IMAGE GRAF IC PR INT ING
110 ÜPEN4..4
-REN P R I N T
IN GRAF IC MÜDE
12G B S i - C H R i S > = D E $ = C H R $ < 15>
130
140 A$=""
150 FÜR
1=1 TG 16
160 R EAD A : A T = A T + C H R i * : : A >
170 NE NT
I
130
190 FÜR J=1 TO 5
200 PR I N T # 4 , B S T A T D E *
210 NE XT J
220
230 FÜR K= 1 TÜ 3 = P R I N T # 4 N-IENT K
240 C L O S E 4
250 END
260
270 DA TA 152.. 152.-254.. 254.146.. 146.. 255.. 255
Dieser K o n t r o l l c o d e def i n i e r t den
230 DA TA 146.. 146.. 254,254.. 152, 152, 123.. 123
Z e i l e n a b s t a n d mit 1/6 Zoll
(separat
g e d r u c k t e Zeile)
READV.
N a c h d e m Sie RUN e i n g e g e b e n haben,
erh a l t e n Sie das
f o lgende Ergebnis:
■ Ft*
■Ff*
■Fl*
■ F t *
•Fl*
Das
fo lg ende P r o g r a m m v e r d e u t l i c h t den B i t - M u s t e r - D r u c k .
B E I S P I E L 2:
100 REM CHRi*:: 3
BIT
IMAGE GRAF IC P R I N T I N G
110 O P E N 4,4
:REM P R I N T
IN GRA FIC MODE
120 BS4.' =C H R i 3 > = B E T = C H E T
15 >
130
140 A T = M "
150 FOR
1=0 TO 127
160 AT=AT+CHRT-:: 1 + 127>
170 NEXT
I
130 B T = " "
190 FOR J = 1 2 7 TO 0 STEP-1
200 BT=BT-
h
::HRTi J + 127 >
210 NEXT J
220
230 FOR K=1 TO 3
240 PRINT#4,BST; AT.:DET.; "
ALL BIT P A T T E R N
1 "
250 NEXT K
260 PRIN T # 4
270 FOR K = 1 TO 3
230 PRIHT#4, BST.: B T . : DET.: "
ALL BIT P A T T E R N 2 "
290 NEXT K
300
310 FOR M = 1 TO 3 :P R I N T # 4 :NEXT M
320 C L O S E 4
READ V
Werbung
Inhaltsverzeichnis
