Advertisement
•
I
• •
• •
II
I
• •
I
• •
•
I.
il
I
•
I
• •
• •
Commodore VIC-20 & C-64
630 OS="'
b40
RETURN
650 STS=CHPS!271+5S(O)+CHRS(VALISS(1)))
bOO RETURN
700 RE!' I
710 ASIX, Y)=BS:
720 POKE
Z+Xt40+Y.ASC('
OJ
730
X=X+l:Y=O
740 POKE Z+X*40+Y,ASCIC$)
750 RETURN
BOO FOR l=F TO F-l+LEHIKS)
810 J=HF-ll
920
M=ASC
(MIOS
(M, J,
1))
830 IF ">64
THEN
~=M-64
340
POKE
1,1' 1
850
NEXT I
B60 RETURN
900 PEl!
910 FOR 1=0 TO X:FOR
J:O TO 39
915 IF
ASII,J)="UTHEN 950
920
A=ASC(AS(I,J))
925 IF A=13 THEN W=W+40:60TO 950
930 IF A}b4
THEN
A=A-b4
93S W=Z+ U40+J
940
POKE II,A
950 NEXT
J
960 NEXT I
97Q
RETURN
I
Figure C-2 is the word processing program (refer to Figure 5-4) amended
for the Commodore computer. NOTE: The only way to move the cursor
around on the Commodore computer is to use the screen memory map.
We can specify the location on the screen and then "POKE" the
character into memory. Because of this limitation, we had to use
"POKE" instead of "PRINT" statement for the Commodore computer.
However, when we "POKE" characters into screen memory, the color will
be light so you must make sure that the background color on your
screen is dark.
183
Advertisement
