home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Transactor
/
Transactor_25_1988_Transactor_Publishing.d64
/
quickblock
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
256b
|
9 lines
0 rem transactor vol. 9, iss. 2 pg. 8
10 fori=828to844:readd:pokei,d:nexti
20 data 162,2,32,198,255,162,0,32,207
30 data 255,157,0,4,232,208,247,96
40 input"[147]track, sector";t,s
50 open 15,8,15:open2,8,2,"#"
60 print#15,"u1 2 0"str$(t)str$(s)
70 sys828:poke 780,2: sys 65475: sys 65511