home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128BBS / AABBS68.ARC / _D / LDIRCREATE (.txt)
Encoding:
Commodore BASIC  |  2019-04-13  |  321 b   |  8 lines
  1. 5 PRINT"[147][215]HICH DRIVE WOULD YOU LIKE THIS
  2. 7 [133]"DIRECTORY PLACED ON  8CMDCMDCMD";DV
  3. 10 [153]"LOADRIGHT$NSERT DISK & HIT ANY KEY TO BEGIN
  4. 20 GETA$:ON-(A$="")GOTO20:OPEN1,DV,15,"I0":PRINT#1,"S0:_DIRECTORY
  5. 30 [153]"LOADL(null)"[199](34)"$0"[199](34)","DV"
  6. 40 PRINT"O[208]2,"DV",2,"CHR$(34)"0:_DIRECTORY,S,W"CHR$(34)"
  7. 50 [153]"C(null)2:LRIGHT$":[153]"P(null)2:CL(null)2":[129]X[178]631[164]635:[151]X,13:[130]:[151]198,4
  8.