mirror of
https://github.com/rigreco/UniDisk.git
synced 2024-05-28 20:41:39 +00:00
9 lines
216 B
Plaintext
9 lines
216 B
Plaintext
|
10 HOME
|
||
|
15 PRINT "1 BYTE ADC OPERATIONS - exec TESTBAS.TXT then save it"
|
||
|
20 PRINT CHR$ (4);"BLOAD TESTBIN"
|
||
|
25 INPUT "N1,N2? ";N1,N2
|
||
|
30 POKE 10,N1
|
||
|
35 POKE 11,N2
|
||
|
40 CALL 32768
|
||
|
50 PRINT : PRINT "RESULT IS "; PEEK (12)
|