home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Transactor
/
Transactor_21_1988_Transactor_Publishing.d64
/
placeholder.plot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
315b
|
15 lines
100 rem: plot routine in basic
110 rem: paul blair 5/85
120 :
130 printchr$(147);:sy=65520
140 a=781:b=782:c=783
150 print"hello there ";
160 pokec,peek(c)or1:syssy:rem set carry flag
170 x=peek(a):y=peek(b)
180 pokec,peek(c)and254:rem clear carry flag
190 pokea,24:pokeb,14:syssy
200 print"press a key";
210 gety$:ify$=""then210
220 pokea,x:pokeb,y:syssy
230 print"from transactor"