1 7 0 0 ' ----------- K e y e x p l a n a t i o n s
1 7 1 0 LOCATE 1 0 , 4 0
1 7 2 0 LOCATE 1 1 , 4 0
1 7 3 0 LOCATE 1 2 , 4 0
1 7 4 0 LOCATE 1 3 , 4 0
1 7 5 0 LOCATE 1 4 , 4 0
1 7 6 0 LOCATE 1 5 , 4 0
1 7 7 0 LOCATE 1 6 , 4 0
C l e a r d o t "
P a s s o v e r "
S e t d o t "
C l e a r a l 1 d o t s "
S k i p c h a r a c t e r "
E n d "
i I
<1
: P R IN T " F I :
.•P R IN T " F 2 :
: P R IN T " F 3 :
: P R IN T " F 4 :
: P R IN T " F 5 .-
.•P R IN T " F 6 :
: P R IN T "R E T
R e c o r d c h a r a c t e r "
1 7 8 0 ' ---------- G e t c h a r a c t e r --------------------------------------------------------------------------------------
1 7 9 0 I F A ( C C ) < 0 THEN GOSUB 3 2 2 0 :GOTO 1 9 5 0
1 8 0 0
I F NLQ THEN 1 8 7 0
1 8 1 0
' --------- D r a f t c h a r a c t e r
1 8 2 0 FOR Y - l TO
11 :W T = 1 2 8 :FOR X - l TO
8
1 8 3 0 I F ( P ( C C . Y )
AND W T )= 0 THEN 1 8 5 0
1 8 4 0 D T ( X , Y ) - 1 : D T ( X , Y + l ) = 2 : B X -X : B Y -Y : C S $ = " # # # " :GOSUB 3 7 0 0
1 8 5 0 W T - .5 * W T .-NEXT X , Y
: GOTO 1 9 4 0
I 8 6 0
' ---------NLQ c h a r a c t e r
1 8 7 0 FOR Y - l TO
2 3 : W T -1 2 8 : FOR X - l TO
15 STEP 2
1 8 8 0 I F ( P ( C C .Y )
AND W T ) - 0 THEN GOTO 1 9 0 0
1 8 9 0 D T ( X , Y ) - 1 ; D T ( X , Y + l ) - 2 :B X - X : B Y -Y : C S $ = " # # " :GOSUB 3 7 3 0
1 9 0 0 I F ( Q ( C C .Y ) AND W T ) - 0 THEN GOTO 1 9 2 0
: D T ( X + l , Y + l ) - 2 :B X -X + 1 : B Y -Y
: C S $ - " # # " :GOSUB 3 7 3 0
1 9 2 0 W T - . 5 *W T iN E X T X .Y
1 9 3 0
'
M o d i f y & p l o t
c h a r a c t e r
1 9 4 0 X - l i Y - l
1 9 5 0 FOR Z - 1 0 TO 12 iLO C ATE
Z . 3 8 : P R IN T " " :N E X T Z
1 9 6 0 S T - 2 iLOC A’I’l-: 1 1 , IH r P R IN T ........ : I F NLQ THEN 2 1 8 0
1 9 7 0 ' ---------- D r a f t c h a r a c t a r
1 9 8 0 I F D T ( X . Y ) - 2 TIIK N C M I - C H R I ( 2 ) + " " iOOTO 2 0 5 0
1 9 9 0 I F I) 1 ( X . Y ) - ( ) I III M
2 0 0 0 I F S T -1 THEN f ) T ( X . Y ) - l )
l ) T ( X , Y U ) - 0 i C 9 I- S T R IN G S ( 3 , 1 ) + " " .GOTO 2 0 5 0
2 0 1 0 C S S - S T R IN G I ( 3 . 2 ) ♦ " " iOOTO 2 0 9 0
2 0 2 0 I F ST< 3 THEN C fll-M T H I N(J I (
/
I )
« lo |0
.'()^()
2 0 3 0 I F D T (X , Y« 1 ) - l
2 0 4 0 D T ( X , Y ) - 1 : D T ( X . Y * 1 ) « |
2 0 6 0 S S -S T : B X -X : B Y -Y .UO flUh
H I D
I T flfl-H I
I1IKN -'141)
2 0 7 0 I F S T >3 THEN 2 1 0 0
2 0 8 0 FOR Z - 1 0 TO 12 i LOCATE Z Ml
2 0 9 0 LOCATE 9 + S T . 3 8 : P R IN I ........ iOOTO IWHO
2 1 0 0 I F S T - 4 THEN GOSUB 3 2 2 0
2 1 1 0 I F S T - 5 THEN GOSUB 3 2 2 0
2 1 2 0 I F S T - 6 THEN 2 4 1 0
2 1 3 0 I F S T - 7 THEN 3 2 6 0
2 1 4 0 I F D T (B X , B Y ) - 2 THEN C S $ - " #
2 1 5 0 I F D T ( B X , B Y ) - 1 THEN C S $ - " # # # " iOOTO
2 1 6 0 I F D T ( B X , B Y ) - 0 AND D T (B X , B Y ♦ 1 ) - 0 THEN C B * - "
2 1 7 0 GOSUB 3 7 0 0 :GOTO 1 9 8 0
2 1 8 0 ' -----------NLQ c h a r a c t e r
2 1 9 0 I F D T ( X , Y ) - 2 THEN C S $ - C H R $ ( 2 )
2 2 0 0 I F D T ( X , Y ) - 0 THEN 2 2 3 0
2 2 1 0 I F S T -1 THEN D T ( X , Y ) - 0
: D T ( X , Y + l ) - 0 iC S f - M T H I N O I
( J
I I
m i.ill JJftO
2 2 2 0 C S $ - S T R IN G $ ( 2 , 2 )
2 2 3 0 I F S T < 3 THEN C S $ -C H R $ ( 1 )
:GOTO 2 2 6 0
2 2 4 0 I F D T ( X , Y + 1 ) - 1 THEN C S $ - C H R $ ( 1 )
:GOTO 2 2 6 0
2 2 5 0 D T ( X , Y ) - 1 : D T ( X , Y + l ) - 2 : C S $ - S T R IN G $ ( 2 , 2 )
2 2 6 0 GOSUB 3 7 2 0
2 2 7 0 S S -S T : B X -X : B Y -Y .-GOSUB 3 1 1 0 : I F S S -S T THEN
2
»r.I)
2 2 8 0 1
2 2 9 0 I F S T >3 THEN 2 3 2 0
2 3 0 0 FOR Z - 1 0 TO 1 2 : LOCATE
Z , 3 8 : P R IN T " " : NEXT Z
2 3 1 0 LOCATE 9 + S T , 3 8 .-P R IN T " " .-GOTO 2 1 8 0
2 3 2 0 I F S T - 4 THEN GOSUB 3 2 2 0 :GOTO 1 9 5 0
2 3 3 0 I F S T - 5 THEN GOSUB 3 2 2 0 .-GOTO 1 5 2 0
2 3 4 0 I F S T - 6 THEN 2 4 1 0
2 3 5 0 I F S T - 7 THEN 3 2 6 0
2 3 6 0 '
2 3 7 0 I F D T (B X ,B Y ) - 2 THEN C S $ - " # " .-GOTO 2 4 0 0
2 3 8 0 I F D T (B X , B Y ) - 1 THEN C S $ - " # # " :GOTO 2 4 0 0
2 3 9 0 I F D T (B X ,B Y + 1 ) - 0 THEN C S $ - "
" ELSE C S $ - " "
96
'
= ! «
=
4
=
9
=
•!
9
Ti»
mi
f r i
1
r
J
Summary of Contents for NX-1000
Page 1: ...USERS MANUAL I i MULTI FONT PRINTER...
Page 2: ...NOTICE THIS PRODUCT IS DESIGNED TO OPERATE AT 120V ANY OTHER VOLTAGE MAY CAUSE DAMAGE...
Page 3: ...NX 10OP MULTI FONT PRINTER USERS MANUAL NOT INTENDED FOR SALE PN 80820302...
Page 28: ......
Page 40: ......
Page 46: ...I...
Page 56: ...II...
Page 62: ...MEMO...
Page 68: ...MEMO...
Page 100: ...MEMO...
Page 113: ...r s I 0 0 HO 103...
Page 120: ......
