home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Carousel Volume 2 #1
/
carousel.iso
/
comdore
/
64utils
/
sdl
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1989-06-06
|
7KB
|
62 lines
1 POKE53280,5:POKE53281,5:PRINT"[147][142]";:PRINT"[144]PARALLELHEADERFILESTRUCTURE":PRINT"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]":PRINT"[144][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]":PRINT"[165][153][165][144][165][153][165]":PRINT"[144][165]NEWSDLHEADER[153][165][144][165]OLDLYNXHEADER[153][165]
2 [153]"STOPFNPRINTFNSTOPFNPRINTFN":[153]"TAB(TAB(TAB(TAB(TAB(TAB(TAB(bPRINTTAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(bPRINTTAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(":[153]"bb":[153]"bSTOPTOTOTOTOTOTOTOTOTOb":[153]"bSTOPFNPRINTFNb":[153]"/cc>STOPFNFILE#1PRINTFN<ccEXP
3 PRINT"[144][165][153][165]":PRINT"[163][163][163][163][144]b[153][163][163][163][163]":PRINT"[144]b":PRINT"[164][164][164][164]b[164][164][164][164]":PRINT"[165][153][165]":PRINT"[144][165]FILE#2[153][165]":PRINT"[144][165][153][165]":PRINT"[163][163][163][163][144]b[153][163][163][163][163]":PRINT"[144]b
4 [153]"LISTSDLAND.LNXSTOPTOTOTOTObTOTOTOTOLISTREMEMBERTO":[153]"FILESOCCUPYSTOPFNPRINTFNLISTVALIDATEAFTER":[153]"THESAMESTOPFNFILE#NPRINTFNLISTSCRATCHINGANY":[153]"DISKSPACESTOPFNPRINTFNLISTSDLOR.LNX":[153]"PRINTTAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(LISTFILES";:[134]T$(144),PN$(144),BL(144),LN(144)
5 [129]X[178]1[164]3:[129]Y[178]1[164]255:[135]A:HD$(X)[178]HD$(X)[170][199](A):[130]:[130]:[129]X[178]1[164]113:[135]A:HD$(4)[178]HD$(4)[170][199](A):[130]:K$[178][199](0):[151]53280,11:[151]53281,12
6 [151]53265,[194](53265)[175]239:[153]"LOAD";[163]10)"POKE(null)ELF STR$ISSOLVING (null)YNX":[153][163]10)"STOPTAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(":[153][163]10)"POKE(LEN) 1988 (null)ILL LENORLEY "[199](148):[151]53265,[194](53265)[176]16:[133]"WAIT(null)(null)(null)(null)ED ((null)(null))ASCILE (null)O LENONVERT";LX$:[133]"ASCINAL ASCILENAME";PF$
7 [139][201](LX$,1)[178]"*"[167]LX$[178]LX$[170]"KNUCKLE HEAD !!!
8 IFRIGHT$(LX$,4)<>".LNX"THENLX$=LX$+".LNX
9 [139][195](LX$)[177]16[167]EM$[178]"ASCILE (null)AME VALRROR!":[137]29
10 [139][195](PF$)[177]14[167]EM$[178]"ASCILE (null)AME VALRROR!":[137]29
11 PF$[178]"["[170]PF$[170]"]":F$[178]"0:"[170]PF$[170]",P,W":[160]15:[159]15,8,15,"I0":[141]43:[160]2:[159]2,8,2,"0:"[170]LX$[170]",P,R":[132]15,E,EM$:[139]E[179]20[167][153]"(null)EADING LEFT$EADER":[137]14
12 [160]2:[139]E[178]64[167]EM$[178]"(null)RONG ASCILE (null)YPE!":
13 [137]29
14 [161]#2,A$,B$:[139][198](A$[170]K$)[178]1[175][198](B$[170]K$)[178]8[167]16
15 EM$[178]"(null)RONG (null)ERSION!":[137]29
16 [161]#2,A$:[139]A$[179][177][199](13)[167]16
17 A$[178]"":[129]X[178]1[164]28:[161]#2,B$:A$[178]A$[170]B$:[130]:[161]#2,B$:HD[178][197](A$):B$[178]"*LYNX XV":[129]X[178]1[164]20:[139][202](A$,X,[195](B$))[179][177]B$[167][130]:EM$[178]"(null)OT A (null)(null)(null)(null)ED ASCILE":[137]29
18 [132]2,N:N[178]N[170]1:[129]X[178]2[164]N:PN$(X)[178]"":Y[178]1
19 [161]#2,D$:[139][198](D$)[178]13[167]21
20 PN$(X)[178]PN$(X)[170]D$:Y[178]Y[170]1:[139]Y[179]18[167]19
21 [132]2,BL(X):[139]BL(X)[178]0[167]EM$[178]"(null)O (null)(null)(null) (null)PACERS!":[137]29
22 [132]2,T$(X):[139]T$(X)[178]"R"[167]EM$[178]"(null)O (null)EL ASCILES!":[137]29
23 [132]2,LN(X):[130]:[160]2:[160]15:SA[178]878[170]1:BT[178]0:[129]X[178]2[164]N:BT[178]BT[170]BL(X):Y[178]1
24 [139][202](PN$(X),Y,1)[178][199](160)[167]26
25 Y[178]Y[170]1:[139]Y[179][195](PN$(X))[170]1[167]24
26 PN$(X)[178][200](PN$(X),Y[171]1):PN$(X)[178]PN$(X)[170]","[170]T$(X)[170]",W":SA[178]SA[170][195](PN$(X))[170]4:[130]:SA[178][171][181]([171]SA[173]254):BT[178]BT[170]SA:[139]BT[177]199[167]EM$[178]"ASCILE (null)OO (null)ONG":[137]29
27 SA[178]SA[172]254[171]2[170]2049:[159]15,8,15,"I0":[141]43:[153]"(null)RITING (null)EW (null)STR$(null) LEFT$EADER":[159]2,8,2,F$:[141]43:[129]X[178]1[164]4:[152]2,HD$(X);:[130]:[152]2,[199](N[171]1);:[129]X[178]2[164]N:[152]2,[199]([195](PN$(X)));:[152]2,PN$(X);:H[178][181](SA[173]256):L[178]SA[171]H[172]256:[152]2,[199](H);[199](L);:BY[178]LN(X)[171]1[170]((BL(X)[171]1)[172]254)[171]1:FI[178]SA[170]BY[170]1:H[178][181](FI[173]256):L[178]FI[171]H[172]256
28 [152]2,[199](H);[199](L);:SA[178]SA[170]BL(X)[172]254:[130]:[153]"LEFT$EADER LENOMPLETE":[160]2:[137]30
29 [160]2:[160]15:[153]EM$:[151]198,0:[146]198,1:[151] 198,0:[137]6
30 [160]15:[159]15,8,15,"I0":[141]43:[153]"(null)INKING (null)STR$(null) LEFT$EADER":[159]2,8,2,"#":T[178]18:S[178]1:FF[178]0
31 [141]42:X[178]0
32 [152]15,"B-P";2;X[172]32[170]2:[161]#2,A$:C[178][198](A$[170]K$):[139]C[179][177]130[167]37
33 [161]#2,A$:DT[178][198](A$[170]K$):[161]#2,A$:DS[178][198](A$[170]K$):[141]45:[139]F$[178]LX$[167]T2[178]DT:S2[178]DS:[137]36
34 [139]F$[179][177]PF$[167]37
35 T3[178]DT:S3[178]DS:[152]15,"B-P";2;X[172]32[170]30:H[178][181](BT[173]256):L[178]BT[171]H[172]256:[152]2,[199](L);[199](H);:[152]15,"U2";2;0;T1;S1:[141]43
36 FF[178]FF[170]1:[139]FF[178]2[167]39
37 X[178]X[170]1:[139]X[179]8[167]32
38 [139]T[179][177]0[167]31
39 T[178]T2:S[178]S2:[129]X[178]1[164]HD:[141]42:[130]:T2[178]T:S2[178]S:T[178]T3:S[178]S3
40 [141]42:[139]T[179][177]0[167]40
41 [152]15,"B-P";2;0:[152]2,[199](T2);[199](S2);:[152]15,"U2";2;0;T1;S1:[141]43:[160]2:[160]15:[153]"(null)K!":[151]198,0:[146]198,1:[137]6
42 [152]15,"U1";2;0;T;S:[141]43:[152]15,"B-P";2;0:T1[178]T:[161]#2,A$:T[178][198](A$[170]K$):S1[178]S:[161]#2,A$:S[178][198](A$[170]K$):[142]
43 [132]15,E,EM$,ET,ES:[139]E[179]20[167][142]
44 [160]2:[160]15:[153]"STR$ISK VALRROR":[153]E;EM$;ET;ES:[151]198,0:[146]198,1:[137]6
45 F$[178]"":[129]Y[178]0[164]15:[161]#2,A$:[139][198](A$[170]K$)[178]160[167]47
46 F$[178]F$[170]A$
47 [130]:[142]:[131]1,8,227,8,1,0,151,53,51,50,56,48,44,53,58,151,53,51,50,56,49,44,53,58,153,34,147,14,144,164,164,164,164,164,164,32,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,32,164
48 [131]164,164,164,164,164,34,58,153,34,165,164,164,164,164,32,153,165,144,165,34,166,50,51,41,34,153,165,144,165,164,164,164,164,32,153,165,34,58,153,34,144,165,165,164,164,32,153,165,165,144,165,32,144,211,69,76,70,32,196,73
49 [131]83,83,79,76,86,73,78,71,32,204,89,78,88,32,32,153,165,144,165,165,164,164,32,153,165,165,34,58,153,34,144,165,165,165,32,153,165,165,165,144,165,34,166,50,51,41,34,153,165,144,165,165,165,32,153,165,165,165,34,58
50 [131]153,34,144,165,165,165,32,153,165,165,165,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,32,144,165,165,165,32,153,165,165,165,0,181,9,2,0,153,34,144,165,165,165,32,153,165,165
51 [131]165,144,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,32,165,165,165,32,153,165,165,165,34,58,153,34,144,165,165,165,32,153,165,165,165,144,165,34,166,50,51,41,34,153,165,144,165
52 [131]165,165,32,153,165,165,165,34,58,153,34,144,165,165,165,32,153,165,165,165,144,165,32,40,195,41,32,49,57,56,56,32,215,73,76,76,32,195,79,82,76,69,89,32,32,153,165,144,165,165,165,32,153,165,165,165,34,58,153,34
53 [131]144,165,165,165,32,153,165,165,165,144,165,34,166,50,51,41,34,153,165,144,165,165,165,32,153,165,165,165,34,58,153,34,144,165,165,165,32,153,165,165,165,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163,163
54 [131]163,163,163,163,163,32,144,165,165,165,32,153,165,165,165,0,162,10,3,0,153,34,144,165,165,165,32,153,165,165,165,144,164,164,164,164,164,164,164,164,164,32,164,164,164,32,164,164,164,164,164,164,164,164,164,164,32,165,165,165
55 [131]32,153,165,165,165,34,58,153,34,144,165,165,165,32,153,165,165,165,144,165,34,166,56,41,34,153,165,144,165,164,32,153,165,144,165,34,166,57,41,34,153,165,144,165,165,165,32,153,165,165,165,34,58,153,34,144,165,165,153,163
56 [131]163,32,165,165,144,165,32,208,82,69,83,83,32,32,153,165,144,165,165,153,165,165,144,165,32,210,69,84,85,82,78,32,32,153,165,144,165,165,153,163,163,32,165,165,34,58,153,34,144,165,153,163,163,163,163,32,165,144,165,34
57 [131]166,56,41,34,153,165,144,165,153,163,32,165,144,165,34,166,57,41,34,153,165,144,165,153,163,163,163,163,32,165,34,58,153,34,163,163,163,163,163,163,32,163,163,163,163,163,163,163,163,163,32,163,163,163,32,163,163,163,163,163
58 [131]163,163,163,163,163,32,163,163,163,163,163,163,0,186,10,4,0,151,49,57,56,44,48,58,146,49,57,56,44,49,58,158,50,55,52,56,0,0,0,169,109,133,251,169,11,133,252,165,1,41,254,133,1,169,2,162,107,160,11,32,189,255,169,15,162,8,168,32,186,255
59 [131]32,192,255,160,0,177,251,133,255,32,100,11,160,0,177,251,72,32,100,11,164,252,166,251,24,101,251,144,2,230,252,133,251,104,32,189,255,169,2,168,162,8,32,186,255,32,192,255,162,2,32,201,255,160,0,177,251,133,248,32
60 [131]100,11,177,251,133,247,32,100,11,177,251,133,250,32,100,11,177,251,133,249,32,100,11,177,247,32,210,255,230,247,208,2,230,248,165,248,197,250,208,239,165,247,197,249,208,233,169,2,32,195,255,198,255,208,153,169,15,32,195,255
61 [131]32,231,255,32,204,255,169,0,133,144,165,1,9,1,133,1,96,230,251,208,2,230,252,96,73,48