The Big List of TRS-80 Software

Willus.com

Home | Archive | About

SPCCAST6.CMD (9372 bytes)

EMULATE AS: DEFAULT TYPE (CMD) | BASIC program | Program on Disk | 2-Disk Debug | Disk Download

SHOW BELOW AS:

BASIC program
(download)

Text File
(download)

Z-80 Program
(download)

EDTASM File
(download)

Graphic
(download)

Hex File
(download)

SCRIPSIT File
(download)

Return to TRS-80 software list.

50032 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
1 [FE]p
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
256 
0 
0 
0 
0 
0 
0 
0 
22577 }>ORMKI$INP
20798 LPRINTOREXPORATN2
15360 2?Q+O!7R>+Q>OR[FF]>ORMKI$+RESTOREE!dA>	)
8677 
15841 ERL;D!LISTf/=ABS[J!STR$XNOT#
10699 ~0NEXT#n&))	CLOSECVI?ABSTHENOPEND6
9023 >USRRESETNEXTw#MID$NEXTDLPRINTERRINPUTD>[FF]w#6
8983 >CVISETNEXTw#MID$ERRORDLPRINTERROUTD>[FF]w#ERLRDERLPD_
20802 >`iP
2304 MKD$D
 MKD$MOR[FF]SQR5
7492 ERLCLOADD,%ERLAUTOD>
60627 LPRINTOR[FF]+O>8MKS$G[FD]!LISTfAND+RESTOREE[FD]n
64769 ^[FD]V|AUTOMID$mE[FD]u
60673 WCVIERLEbk)NOT,NOT[FD]u[FD]t[FD]n[FD]f[FD]^[FD]V|[FE]0ANDmE[FD]u[FD]tMKS$WCVIERLMEbk)NOT,NOT[FD]u[FD]tABS[FD]N[FD]^!STR$XNOT#
10699 ~0NEXT#n&))	DELETEwABS
30987 DEFERLFIXDINSTR!
15360 
49584 MKS$W=MKS$GERLCVDDERR8NABS!
16385 [FF]6ENDMKS$DEFABSINKEY$:YQ!MKI$U_
22578 Q!
20816 "RQ!DATAeINPUTe+6MKS$DEF:IQ[FE]FNERL*E+Q!DELETEUAUTOU6
256 
45293 LPRINT2ZQ>2GQ+O!fQ
>+Q!PQ>>0~+LENN#RIGHT$!XQ1>~+LENN~AUTOTHEN/N!sRDATA?+Q!INSTRQ=+Q:YQPOINT0![FF]LPRINT+:@8[FE]ERL?F+OERRLEFT$HCVIERLKF|LLISTERL0FSIN:>QAUTO INP
8263 :@8CVIERLgF:8CVI(:DQ+EXPN*LQ"LQ*NQ		"NQ*LQT]))))AUTOMKS$RNOT,NOTNOT,NOTNOT,NOTNOT,NOTNOT|THENRESUMEF#"LQMKS$[HQNOTTAB("HQ*NQT]))))AUTOMKS$RNOT,NOTNOT,NOTNOT,NOTNOT,NOTNOT|THEN-F#"NQMKS$[JQ|[FE]
55856 CVDFAUTOMID$PEEKF</ERRCVSFPOINT/g"JQ:@8CVIEND!dQFwTHEN'FCLEAR :>QAUTO Q#INP
10359 INOTg CVI[FE] ?!DELETEU	
9930 GLEFT$ERRIFH6MKS$[HQ#s#r:DQ+EXPNLOF)))LOF#s#rMKS$[JQ#s#rPYLOF)))LOF#s#r:ZQo[FE]THENERRG+IO[FE]0FREgGLPRINT2ZQ:CQONEXTFORCMDNEXT!RANDOMc_
22051 !DATAe~AUTOERLTAB(G:ZQ<[FE]2ZQERLABSGLOF)LINEV~2\Q#~2^Q>	2cQ:CQ+EXPNLOF))))"_Q`i))))"aQERRABSGLPRINT2ZQERRABSG*[QMKS$[_Q"[Q*]QMKS$[aQ
23842 Q:>QAUTO INP
8287 :@8CVI@THEN'G:DQ<[FE]ERLLEFT$GLPRINT2DQ:>QAUTO INP
8279 :@8CVI THENH:DQ=FIXH>2DQ:IQ[FE]@FRE3HO:KQ[FE]ANDNH+0OERReHMKS$DPOINTO:KQ[FE]AND\H+0OAUTOTHENeHO>GOSUBERReHMKS$DPOINT/+0OO>GOSUBERReHMKS$DPOINT/+0OPOINTSQRTRONTHENIFHANDpHPOINT[FE]FRERESETHSQR5FIXIFHSQR6ERRIFHSQR~<[FE]ERLLETHLPRINTSQRw[FD]!DATAe!INPUTeDATAec
768 [FD]~
30717 cd
8971 SQR5
9800 
4353 TY)))))LINE=ABS:ZQ[FE]ERLTANH
>
56334 MKD$OR[FF]
ERLFREHSTR$ERRMKI$H!
46460 ERLCVIHABS+O:@8[FE]ERL[FE]H+QERR/N>
8677 8
15841 ERL
20809 [FE]FNTHEN[FD]IT\SQRn&
10537 )/~[FE]	THENFORISQRRANDOMCVIW#:KQRANDOMCLOADFREGIAUTOMID$FIGOSUBERRGIFOR_#[FE]
FRE|I[FE]#AND|IABSNEXTo&
6486 ~=ABSCSAVEAND|IABS#~ABSCSAVEFRE|IABS!
20812 "NQ:CQ2DQABS+gOMERGE:ZQ[FE]ERL[FD]I:\Q[FE]ENDANDDEFINTI:^Q[FE]/FREOUTILPRINT2ZQERR[FD]I:cQ[FE]ANDNAMEI<2cQGCVITHENCLEARI!VERRNEWI!>V:\QRANDOM[FE]ENDANDRIGHT$IW#:^QRANDOM[FE]0ANDMID$I_+VARPTR
51792 VALISQRVSQR^	+RNDPLPRINT2ZQ!XQ~='w>FN2IQ2KQERR[FD]I+gO+##FN!LINEVCONTf
AUTOMID$JTHENJ~#~+jO+##ERRJ:IQ[FE]FNTHENpKSQRPEEKSQR![U!STR$U:YQ_
26333 
32001 LISTTHENIFJ=THENOPENJV#^#+IOAUTOMID$AJSQRrSQRs,XAUTOSQRt
60673 RFRESETJPOINT
55890 pJ!,XERRAJ+IOCVI?ERLSETJSQRw
257 SQR6}SQRVSQR^+OERReK+IOCVI?ERLeKSQR6
310 LINEERReKSQR~=THENTROFFJSQRwSQRVSQR^{[FE]FREVALJ[FE]#ANDVALJz[FE]&FREVALJ[FE]YANDVALJ<MID$ATNJNOT/NEW
58586 J>vRETURNNOT/NEWFREEXPJERR+KERR+K>vRETURNNOT/NEWFRECDBLJERR+KERR+KABS:YQ_
6485 ~ABSG+IOCLEARAND8K:IQCSAVETHENKFREK+IOAUTOMID$+K:KQNEWTHEN+KFRE*K+IOAUTOMID$PRINTJSQRrSQRs=+O[:IQCSAVEERLeK:KQNEWERLeK+RNDPSQR6
310 LINE!XQ~='w>FN2IQ2KQ
49677 2JSQRCOSSQR6
46625 U[FD]~
19923 [FD]5
18413 [FD]n[FD]f[FD]^[FD]VNOTTAB([FD]u[FD]tT[FD]n[FD]f[FD]N[FD]F	|[FE]0FRECSAVEKAUTOMID$CLEARK</ERRCSAVEKPOINT/[FD]u[FD]w_+VARPTRPERL[FF]K+VARPTRPERL[FF]K
52509 VARPTRPERL[FF]K+VARPTRPERL[FF]K+VARPTRPERL[FF]K+VARPTRPERL[FF]K+VARPTRPERL[FF]K+VARPTRPERL[FF]K+VARPTRPTHENERLM:IQRETURNPOINT[FE]ANDL:KQREMPOINT[FE]FREERLM!ORU~RETURN<[FE]ANDEL#~REM<[FE]+ANDEL+~+DELETE[FE]ANDOL6V#6LINE+RNDP>+ZOERR*L>CMDoANDML$NOT!LENXX{MKS$CLOADSIN<L}CVI[FE]
32332 CSAVEERLULLOF>OR[FF]!RESTOREMKS$BANDyL=ERRSETL!MEM
55874 SETL<+ZO!LINEVMKS$RNOT,NOTCONTf6
357 d
65491 MKS$POKETHEN*L+IOAUTOMID$AUTOL:YQ[FE]THENAUTOL<2YQ!MKI$eDATAeMEM
20513 fQfc
59904 zMKS$DEFLPRINT[FD]w
15949 HRETURN[FE]ANDERLM>REM[FE]ANDERLM>P+ZO!XQ~<'w:YQ[FE]THEN[FE]L<2YQ!LISTfd6
9024 +IOw#:LOFUCVI<w#6
8984 +IOw#:LOFUCVI<w#<!
46460 ERL2M+O[FD]!LISTfd[FD]n
64769 ^[FD]V[FD]u
31745 AUTOMID$wM[FD]n[FD]f[FD]^[FD]V[FD]u[FD]tW|[FE]0ANDwM_+gO
49936 
ERL/MJ+PRINTMz[FE]sFRECMDMTRON+PRINTMz[FE]	ERLGOSUBM[FF]+PRINTM+PRINTM+PRINTM+PRINTMERLEDITMERRAUTOE+IOCSAVEANDUSINGMyMKD$OR[FF]OCDBLINKEY$MKS$W=MKS$GERLRANDOMK
22269 [FD]^+gO	
13789 
8523 GQ~[FE]THENN<woNEXTSGNW+PRINTM&
10589 )))AUTOMKS$Rt`MKS$[EQ>

8677 6
15841 ERL	N:IQ[FE]FNERLKF:GQ[FE]ERLIFH+QERR*E!INPUTQSGN>+Q!LINEQGOTO?+Q!+R=+Q!ORQOR?+QWQ!SQFN+FREjNERLvNSTR$ERRvN*PQ"TQ*RQ"VQ!TQ(=>0~+LENN#RIGHT$!MKD$QB<+Q: 8CVIENDERLDELETEN:8AUTOTHENRETURNN
20143 NOT!ERRPUTNx2YQERROUTE+O!PUTR
52496 QPEEK!@
31974 LOF{CVIVARPTR_COS#CINT:@8CVITHENANDN+OERR8NPEEKNEXTNEXTo&
6499 ^#V#N#FCOSINKEY$OCVIPOINT0yCVIPOINT0INKEY$ABS!
15361 6END[FF]MKS$DEFABSINKEY$PEEK[FD]!V[FD]n
6401 LOF+gO[FD]#[FD]#CINTCOSINKEY$o&
21597 )T_~CLOAD#FREEO~INKEY$#ERR=OABS*LOCU\MKS$_W))"LOCU}ABSINKEY$!PQRANDOM'w/#>ERR]Oz{ABSNEXTNEXT&Po^,V,nNOT/AND}ONOT%SET_LLISTABSINKEY$
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
32228 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
15360 
4 
16384 <
4 @<
1 END<
16 VARPTR<
4 VARPTR<
1 
0 =
1 @=
16 END=
4 END=
1 VARPTR=
16 
0 >
16 @>
4 @>
1 END>
16 VARPTR>
4 VARPTR>
1 
0 ?
1 @?
16 END?
4 END?
1 VARPTR?
16 z{ABS
34695 &Po^,V,nNOT/AND<PNOT%SET_PUTCVI?ABSINKEY$PEEK=>[FF]2GQz
52056 #nb))NOT/CMDo[FC];"EQ[COSINKEY$>2DQ!
20812 "NQ>s2IQ+IOCVIPOINT2KQINKEY$~[FE]
MEM[FE]aFRE8Q[FE]{AND8QO:?QAUTOyTHEN8QCVI_#ERRQ
255 
29440 
0 
0 
0 
0 
0 
25427 ore:                 Ships Left:
G A M E    O V E R
To start game, select skill level (0-7
45097 
Skill Level: 
For instructions press <?>
Space Castle (C) 1982 Cornsoft Group, Written by Charles Guy
High Score:
T h e   C o r n s o f t   G r o u p   p r e s e n t s . . .
To exit game, press <CLEAR> and <BREAK> together.
                     Rules 
28518 r Space Castle

OBJECT: To survive by replenishment of your ship supply. To
   obtain ships you must destroy the Space Castle. To get to
   the Space Castle you must blow through 3 spinning armor
   shields. You will also have to protect yourself again
29811 
   intelligent mines that come out of the Castle and chase you.
   Finally, you must beware of the Space Castle's ability to
   fire deadly energy balls at you if a clear path forms
   between it and you.
KEYS: (<-) and (->) rotate ship counter clockw
29545 e and clockwise
   (@) or ([) gives ship thrust, (space) fires projectile.
SCORING: Outer, middle and inner wall "bricks"- 10,20 & 30 pts.
   intelligent mines- 50 pts. and Space Castle- 500 pts.

Press <ENTER> to return to Score page.
256 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
1543 TRONDEFDBLPUTLISTMEMPOSCSNG[FF]
65535 
0 
511 [FF]
65535 [FF][FE]
65282 [FE][FD]
65283 [FE][FC]
516 [FD]'
65021 
511 [FF]
65535 [FF]
65534 
65022 
514 [FE][FD][FE][FC]
768 [FD][FC][FE]
18486 4L1N/P.R-S+T*T*U*U*U*U*U*U+U+T,R-Q/P1N3K7IMMMLKKJJIHHGGF
7749 EDDCBBAA@??>>=<<;;:9988766554332222222344556778899:;;<<=>>??@AABBCDDEEFGGHHIJJKKLMMMMQQQPPONMLKKJIHGGFEDCCBA@??>=<;;:987765433
4402 10//......./00123445678 8 9 : ; < < = > ? @ @ A B C C D E F G G H IJKKLMNOOPQQQQUUUTSRQPON M L K!J!I"H"G"F"E"D"C"B"A"@"?">"="<";":"9"8"7"6!5!4!3!2 1 0/.-,++*******+,-./0123456
7
8
9
3386 ;
<
=
>
?
@
A
B
C
D
E
F
G
H
IJKLMNOPQRSTTUUUU
16    000@@@PPP```pppENDENDENDRESTORERESTORERESTOREOUTOUTOUTDEFDEFDEFVARPTRVARPTRVARPTR///EXPEXPEXPCSNGCSNGCSNGENDENDENDENDENDENDENDENDENDENDENDDEFSTREDITRESTOREENDENDENDMERGEDEFSNGENDELSEDIMCLEARENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDOUTLETLSETGETENDENDENDDIMRANDOMOUTCMDKILLDEFSTRENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDOUTDEFSTRRSETTAB(ENDENDENDGOTOFORDEFSTRFORDEFSNGENDENDENDENDENDENDRESETSET
32896 ENDENDENDENDENDENDENDENDENDRESTOREOUTDEFSTRLETTAB(LINEENDENDSETONLETFIELDDEFSTRFORENDENDENDENDENDREADCLSENDENDENDENDENDENDENDENDENDENDENDCLEARDEFLETFIELDNEWTAB(CLSENDENDLETRANDOMPOKELETRANDOMENDENDENDENDRESETSETENDENDENDENDENDENDENDENDENDENDENDENDREADGOTOLETFIELDCLOADLISTRESTOREENDRESETFIELDCONTPOKELETSETENDENDENDSETFORENDENDENDENDENDENDENDENDENDENDENDENDENDSETGOTOLETLETDEFENDENDENDSETCONTCONTCONTIFSETENDENDSETFORENDENDENDENDENDENDENDDEFRESTOREENDENDENDENDENDOUTPRINTCONTREMLETDEFENDENDCLEARLINELETPRINTDEFDBLNEXTFORENDENDENDENDENDENDENDENDENDENDENDOUTDEFENDENDENDENDENDLETGETREMLETGETENDENDREADSETLETPRINTNEWIFCLSENDENDENDENDENDENDENDENDENDENDENDENDOUTRESTOREENDENDENDENDDATADEFREADGETENDENDENDNEXTINPUTGETCONTTAB(LLISTENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDDEFENDGETRESETLOADENDENDENDFORINPUTGETCLOADFNENDENDENDENDENDEND
32896 ENDENDENDENDENDENDENDENDENDENDENDOUTRESTOREDATARESTOREMERGEGETENDENDRESETDIMDEFNAMEDEFSNGENDENDENDENDENDENDSETENDENDENDENDENDENDENDENDENDENDENDENDMERGEGETENDSTOPOUTRSETENDENDENDRESETGETLLISTRANDOMENDENDENDENDENDENDFORENDENDENDENDENDENDENDENDENDENDENDENDOUTRSETENDDEFSTRENDDEFENDENDENDDIMCLEARONDEFSNGRESETENDENDENDENDRESETFORENDENDENDENDENDENDENDENDENDENDENDENDENDOPENNEXTOUTCLSOUTRESTOREENDENDKILLTAB(POKELETFORFORENDENDENDENDENDENDENDENDENDENDENDDEFENDENDENDENDENDENDOUTRUNONDEFSTRENDENDENDOUTTODELETEPOKELETSETCMDENDENDENDENDENDENDENDENDENDENDENDOUTDEFENDENDENDENDOUTLETRANDOMPOKELETCLSENDENDRUNLPRINTCONTDEFSTRRANDOMREADFORENDENDENDENDENDENDENDENDENDENDENDENDENDDEFRESTOREENDENDOUTDEFSTRRANDOMCONTCONTDEFENDENDSETIFCONTDEFSTRLETTAB(RESTOREENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDDEFLETLETRUNSETENDENDSETIFCONTCONTCONTSETENDENDEND
32896 ENDRESETSETENDENDENDENDENDENDENDENDENDENDDEFTAB(CONTINPUTLETIFFORENDRESETINPUTGETCONTCONTSETENDENDENDENDENDENDSETFORENDENDENDENDENDENDENDENDENDENDRSETFNCONTINPUTGETCLEARRESTOREENDRESETLETGETREMLETCLSENDENDENDENDSETFORENDENDENDENDENDENDENDENDENDENDENDENDDATATAB(LINELETDEFENDRESTOREENDENDINPUTPRINTINPUTGETSETFORENDENDDATARUNFORENDENDENDENDENDENDENDENDENDENDENDENDENDMERGETAB(LETDEFENDENDENDENDDIMRESTOREINPUTRESTOREINPUTCMDENDENDRESETSETENDENDENDENDENDENDENDENDENDENDENDENDENDENDOUTSYSTEMINPUTGETENDENDENDDATACSAVEENDPUTRESETRUNENDENDENDENDENDENDENDENDEND[FC][FD][FE]
255 
254 [FF]
257 
258 		[FC][FD][FE]
511 
256 [FD][FE]
514 						[FC]
254 [FF]
0 [FF]
65026 
64771 						[FD][FF][FE][FF][FF][FF][FF]
256 
513 [FF][FF][FE][FE]				[FE][FE][FE]
255 
0 
511 
65282 [FF][FF][FE][FE][FE][FE][FE]
255 [FF]
0 
2 
65285 [FF][FF][FE][FE][FE]
65535 [FF]
65280 
257 
3 
6 
766 [FF][FE][FF]
65280 
257 [FF]
3 [FE]
255 [FF]
255 
65281 
258 [FC][FD][FE][FF][FE][FF]
65024 
256 [FF]				[FC]
254 [FF][FF][FF]
65281 
65026 [FF]
514 						[FC][FF][FD][FF][FE]
255 
257 [FF]
769 [FE][FE]						[FC][FF][FD][FF][FE][FF][FE]
65280 
1 
512 [FF]
65284 		[FD][FE][FE][FE][FF][FF][FF]
1023 
257 [FF]
65283 [FF]						[FD][FE][FE][FE][FF][FE][FF][FF][FF]
0 [FF]
3 
2313 		[FC][FD][FE][FF][FF][FF]
255 
257 [FF]				MID$'[FC][FD][FE][FF][FF][FF]
65024 
0 
2 RIGHT$MID$'[FC][FD]
65535 [FF]
0 
510 
2 RIGHT$
251 [FC]
254 [FF]
0 
50688 LET[FF]
65026 
65529 MID$[FF]'[FF][FC][FF][FD]
255 [FF]
0 [FF]
65026 
65275 [FC][FF][FD][FF][FE][FF][FF][FF][FF]
65280 
1 [FF]
2 [FC][FE][FD][FE][FE][FF][FF][FF][FF]
1 [FF]
258 [FF][FF]				[FD][FD][FE][FE][FE][FE][FF][FF][FF]
0 
2 
2313 				[FD][FE][FF][FD][FF][FE][FF]
65280 
256 
260 						F
612 ~
21248 c{
20992 ay
20736 `v
20480 ^t
20224 ]q
19968 [n
0 D
602 l
19712 Xi
19456 Wg
19200 Ud
18944 Sa~C
594 _yB
592 \uZp
0 
1131 
0 
1126 
0 
1407 
0 
1116 
0 
1112 
0 
1404 
0 
1389 
0 
1374 
0 
1663 
0 
0 ENDENDENDENDDEFENDENDENDENDENDENDENDENDENDSETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDOUTDEFENDENDENDENDENDENDENDENDDIMIFFORENDEND
32896 ENDENDENDENDENDENDENDENDENDENDENDENDENDRSETCLEARRESTOREENDENDENDENDENDENDENDREADRUNRUNENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDDATAGETCLEARRESTOREENDENDENDENDENDENDRESETPOKEDELETEDATACMDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDLETGETDATACLSENDENDENDENDENDENDFIELDCLEARPRINTDATARANDOMENDENDENDENDENDENDENDENDENDENDENDENDENDENDRESETSETGETDIMDATAENDENDENDENDENDRESETRESETOUTRESETENDDEFFORENDENDENDENDRESETFORSETENDENDENDENDENDENDSETINPUTOUTDIMDATAENDENDENDENDENDFORFOROUTRESETENDRESTORERETURNENDENDENDENDSETFORSETENDENDENDENDENDENDSETINPUTOUTRESETCLSCLSENDENDENDENDCMDFORENDENDFORENDENDCMDENDENDENDLETRANDOMCLSCLSRESETRESETENDENDENDENDFORCLSENDFORFORENDENDENDDIMRESETENDENDENDFORENDENDCMDENDENDDATALETINPUTENDCLSRESETRESETENDENDENDENDFORCLSENDFORFORENDENDENDCMDFORENDENDENDFORENDENDDIMENDENDRESTOREDEFONENDRESTOREENDFORFORENDENDRESET
33920 ENDFORRESETENDENDENDENDFORENDENDENDFORENDENDENDCMDENDDEFRESTOREGETENDRESTOREENDCLSDATAENDENDRESETENDCLSENDFORRESETENDENDENDRESETENDENDENDENDFORENDENDENDDIMENDENDENDCLSENDENDENDDATAENDCLSENDENDDATAENDENDENDENDENDENDENDFORENDENDENDENDFORENDENDENDENDENDENDDATAENDENDENDENDDATAENDCLSENDENDDATAENDENDENDENDENDENDENDFORENDENDENDENDFORENDENDENDENDENDENDOUTENDENDENDENDENDRESTOREOUTENDENDDATAENDENDENDENDENDENDENDENDENDENDENDENDFORENDENDENDENDENDENDOUTENDENDENDENDENDRESTOREENDENDENDDATAENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDFORENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDFORENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDFORENDENDENDENDENDENDENDENDENDENDENDENDRESET
32896 ENDENDENDENDENDENDENDENDENDENDENDENDENDENDFORENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDRESETENDENDENDENDENDENDENDENDENDENDENDENDENDEND
4351 
31 ATN[FF]-
55 CINT[FF]=
64 
2048 
15 -
32 
30 
61184 [FF]
27 AND[FF]
16 ERL[FF]
0 ERL[FF]CHR$[FF]MEM[FF]CSNG[FF]AND[FF]EOF[FF]LOG[FF]ATN[FF]CINT[FF]COS[FF]K
274 P
279 U
284 [
289 
94 i
97 f
0 TIMES
2 STRING$
4 USR
7 FN
11 CSAVE
18 LIST
23 LPRINT
29 MERGE
35 FIELD
41 ERROR
44 DEFSTR
46 TRON
48 RETURN
51 IF
54 LET
57 DATA
61 RESET
68 }
32896 ENDENDENDDEFTAB(TAB(TAB(TAB(TAB(TAB(TAB(ENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDFNTROFFENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDENDRESETIFTAB(TAB(TAB(TAB(TAB(DEFENDENDUSINGTOERRORIFTAB(RESTOREENDOUTTAB(IFSAVEFNUSINGENDOUTTAB(IFIFSAVELISTENDOUTTAB(IFIFTAB(RESTOREENDENDENDENDENDENDENDENDENDENDEND
48555 ENDUSINGAUTOENDENDKILLUSINGENDUSINGELSEENDENDNEWUSINGENDUSINGELSEENDENDENDENDENDUSINGEDITLETLETRUNIFENDENDOUTDEFTAB(TAB(TAB(TAB(TAB(TAB(TAB(IFFORENDUSINGRESUMESAVETAB(IFFORENDRESETIFTAB(ERRORLPRINTUSINGENDRESETIFTAB(TAB(ERRORNEXTENDRESETIFTAB(TAB(ERRORNEXTENDFNRESUMESETFORENDENDENDENDENDENDENDENDENDUSINGELSEENDENDDEFDEFDEFDEFDEFDEFDEFCSAVEUSINGDEFDEFDEFDEFRESTOREKILLUSINGENDENDENDENDENDENDENDKILLUSINGFORENDENDENDENDENDENDENDCLEARERRORIFTAB(USINGELSEMERGEUSINGSETSETSETSETSETSETSETLSETUSINGSETSETSETSETFORKILLUSINGENDOUTTAB(IFIFTAB(RESTORERESETUSINGLLISTENDENDENDENDENDENDKILLUSINGENDENDOPENUSINGELSEENDSETIFIFIFTAB(RESTOREENDENDKILLUSINGENDENDENDENDENDKILLUSINGENDUSINGEDITLETLETRUNIFENDRESETREADIFTOTAB(TAB(TAB(STOPENDREADSAVETAB(IFUSINGELSEMERGETAB(TAB(TAB(TAB(IFFORENDENDKILLUSINGENDENDENDENDENDKILLUSINGENDRESETIFTAB(TAB(ERRORNEXT[FF]
0 
0 
0 
19969 CLEARREM
0 
0 
0 
0 
0 
0 
0 
0 
0 
17032 !AND
54 MKS$DEF!
16866 CLOSE#MKS$DEFERR
514 CVIREM

This page generated by trs80cat v2.22, last compiled Sep 15 2024.