home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / s / suite / !Suite / Libraries / BasicEd < prev    next >
Encoding:
Text File  |  1995-02-07  |  445 b   |  14 lines
  1.  
  2. Ýòla(d$):ç¤q:á
  3.     çcb%…
  4. DG%=0:o$=d$:È”§o$,".")<>0:G%+=1:o$=Âd$,©d$-G%):Î:A$=Àd$,G%-1):ï21
  5. "È−5,"Dir "+A$
  6. ,Ì:o$=d$:ï21
  7. 6Í
  8. @FòG("*BASIC -load """+o$+""""+½13+"EDIT"+½13+½0):È−262366,"BASIC":á
  9. J¡Ý¤q:È−5,"Set BasicEd$Present Yes":È−5,"RMEnsure ARMBasicEditor 1.00 Set BasicEd$Present No":B$=¤h("BasicEd$Present"):È−5,"UnSet BasicEd$Present":çB$="Yes"…=£
  10. T=¹
  11. ^Ýòqa:ç¤q:á
  12. hï21
  13. r5òG("*BASIC"+½13+"EDIT"+½13+½0):È−262366,"BASIC":á
  14. ÿ