mirror of
https://github.com/rigreco/UniDisk.git
synced 2024-05-28 20:41:39 +00:00
10 lines
220 B
QBasic
10 lines
220 B
QBasic
2 PRINT CHR$ (4);"BLOAD FPMain"
|
|
5 PRINT CHR$ (4);"BLOAD FPConv"
|
|
27 CALL 24576
|
|
50 PRINT CHR$ (4);"BLOAD FPData"
|
|
55 INPUT "N1 ? ";X
|
|
60 CALL 32768,X
|
|
65 CALL 24576
|
|
70 CALL 32831,Y
|
|
80 PRINT Y
|
|
90 GOTO 55 |