mirror of
https://github.com/rigreco/UniDisk.git
synced 2024-05-28 20:41:39 +00:00
7 lines
155 B
QBasic
7 lines
155 B
QBasic
2 PRINT CHR$ (4);"BLOAD UNIDRIVE4P"
|
|
5 PRINT CHR$ (4);"BLOAD CONV3P"
|
|
15 INPUT "N1 ? ";X
|
|
20 CALL 768,X
|
|
27 CALL 24576
|
|
30 CALL 831,Y
|
|
40 PRINT Y |