home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Toolkit / MENUPRINT (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  640b  |  23 lines
  1. 0 REM"MENU PRINT FOR GEMINI 10X
  2. 100 [143] ***PRINTS SMALL DIRECTORY***
  3. 110 [143]  DIRECTORY PEEPER
  4. 120 [159]1,8,0,"$"
  5. 130 [161]#1,B$:[139]ST[179][177]0[167][160]1
  6. 140 P$[178]""
  7. 150 [129]N[178]1[164]31:[161]#1,B$:P$[178]P$[170]B$:[130]:[160]1
  8. 160 HE$[178][202](P$,5,24)
  9. 170 [153]"LOAD";
  10. 180 [148]"@0:MENUPRINT",8
  11. 190 [153]"LOADCHR$(36),8"
  12. 200 [153]"";
  13. 210 [153]"0 ";HE$
  14. 220 [143]PRINT"";
  15. 230 [153]"OPEN4,4,4:PRINT#4,CLEFT$(27)CLEFT$(65)CLEFT$(6)CLEFT$(27)CLEFT$(83)CLEFT$(0)CLEFT$(15):CMD4:LIST"
  16. 240 [153]"PRINT#4,CHR$(27)CHR$(64):CLOSE4"
  17. 250 [153]"";
  18. 260 [153]"LOAD";[199](34);"MENUPRINT";[199](34);",8";
  19. 270 [153]""
  20. 280 [153]"RUN"
  21. 290 [153]""
  22. 300 [129]N[178]0[164]4:[151]631[170]N,13:[130]:[151]198,N
  23.