home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Geos / GEOS128 / GeosD81 / CS101.D81 / dir.2 < prev    next >
Encoding:
File List  |  2019-04-13  |  2.2 KB  |  2 lines
  1. )
  2. τ4,3:τ0,4:åPR$(6,150):X▓1:Y▓1:ë5000JüA▓1ñ2:┌1,40960,9:┌1,0,2:é:ÄsdÖ"É":ì20:à"  INPUT PAGE NUMBER ";PG$ÄnÖ:Ö"  PAGE NUMBER "PG$▒xÖ:Ö"    OKAY?    Y OR N ??  "┐éì6000:ì20╚îí∙V$╪ûïV$▓"N"º100ΘáïV$│▒"Y"º130·¬Ö"ò":Ö" "L1$)┤Ö" ▌ INSERT A DISK IN DRIVE 8.          ▌"Z╛Ö" ▌ THEN PRESS RETURNÆ.                 ▌"ï├Ö" ▌ PRESS F1Æ IF LISTING IS COMPLETE.   ▌"ù╚Ö" "L2$Ñ╥ì6000:ì20«▄í∙V$┴µïV$▓╟(133)º800╘≡ïV$│▒╟(13)º210∞·■:ƒ15,8,15,"I0":■Ö"":Ö"    "DS$"  "ïDS▓0º285BÖ"É":Ö"  DISK DRIVE ERROR DETECTED!":ë170sÖ:Ö"₧  PLEASE WAIT!  READING THE DIRECTORY."Æ"NX▓2¬Y:Ö"É":ì6050:ïX▓7º900«,■:ƒ2,8,0,"$":í#2,A$,A$╗6ïX▓7º900╒@ïY▓150ºì800:ïCL▓1º170σEïY▓NXºì6090⌠JïY▓1ºì6070TC▓0:í#2,A$,A$,A$,B$:ïA$│▒""ºC▓╞(A$)6^ïB$│▒""ºC▓C¬╞(B$)¼256VhTE$▓"▌"¬╔("ááá"¬─(C)¬" ",4)brïSTº490é|B$▓"":í#2,A$:ïA$│▒╟(34)º370£åí#2,B$:ïB$▓""ºB$▓╟(0)¿ÉB▓╞(B$)╖ÜïB▒160º440╠ñïB│32░B▒127ºB▓63┌«ïB▓34º450≡╕TE$▓TE$¬╟(B):ë390
  3.  ┬C$▓"":í#2,A$:ïA$▓" "º450- ╠C$▓C$¬A$:í#2,A$:ïA$│▒""º460T ╓PR$(X,Y)▓╚(TE$¬BM$,22)¬╚(C$,3)¬"▌"c αì6100:ë310ä ΩPR$(X,Y)▓"▌"¬╔("   "¬─(C),6)╝ ⌠PR$(X,Y)▓╚(PR$(X,Y)¬"BLOCKS FREE"¬BM$,25)¬"▌":ì6100╙ ■PR$(X,Y)▓L4$:ì6100⌡ PR$(X,Y)▓L6$:ì6100:ïY▒145º520■ ë170.! CL▓0:Ö:Ö"  DELETE LAST LISTING?  Y OR N ??"8!*ì6000@!4ì20I!>í∙V$_!HïV$▓"N"ºÖ:ì6060:Äp!RïV$│▒"Y"º820á!\CL▓1:PR$(X,Y)▓L6$:Y▓Y½1:ïPR$(X,Y)│▒L6$º860:░!fY▓150:ì6020╜!pïX▓7º900├!zÄ╔!╨É╧!çÉ■!êBL$▓"":üA▓1ñ40:BL$▓BL$¬"á":é:BM$▓╚(BL$,26)-"ÆLN$▓"":üA▓1ñ36:LN$▓LN$¬"└":é:LO$▓╚(LN$,24)ë"£L1$▓"░"¬LN$¬"«":L2$▓"¡"¬LN$¬"╜":L3$▓"░"¬LO$¬"«":L4$▓"¡"¬LO$¬"╜":L5$▓"½"¬LO$¬"│":L6$▓BM$«"íL7$▓"▌ LISTING CONTINUED..... ▌"Γ"ªÖ"ô  SIX COLUMN DIRECTORY PRINTOUT  (900)  ";#░Ö" BY JIM COOPER - QS! ALLIANCE LIBRARIAN ""#║Ö:Ö" "L1$S#─Ö" ▌ PRESS F1Æ TO CREATE A NEW PAGE.     ▌"î#╬Ö" ▌ PRESS F3Æ TO RECALL A SAVED PAGE.   ▌":Ö" "L2$╕#╪J▓132:üA▓1ñ2:üK▓Añ8⌐2:J▓J¬1:∙K,╟(J):é:é╞#Γì6000:ì20╧#∞í∙V$Γ#÷ïV$▓╟(133)º100≈#ïV$│▒╟(134)º5090²#oÉ$píV$:ïV$│▒""º6000$zÄ"$äY▓Y¬17$ÄïY▒150ºY▓1:X▓X¬1=$ÿÄT$óPR$(X,Y)▓L3$:ë6100k$¼PR$(X,Y)▓L4$:ë6100é$╢PR$(X,Y)▓L3$:ì6100Ö$└PR$(X,Y)▓L7$:ì6100¬$╩PR$(X,Y)▓L5$┴$╘Öª2)PR$(X,Y)"  "X;╤$▐ïY│10ºÖ" ";Γ$ΦïY│100ºÖ" ";∞$≥Ö" "Y°$ⁿì6020:Ä