home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 92xx / 9203a.d64 / mtool (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  2KB  |  21 lines

  1. 0 PRINT"[147] )[146]FEL [146]A [187]([146] [166][165] [146]@1[146][186][208][146]D [146]F[208][176][146] [210][191]-[146]@D[201][146][190][208][146]CX[169]$[146][206][194]DP[146]BI@";
  2. 1 PRINT"M[146]@[192][174][146],D[208][146]C[174][146]-D[198]L[146]P[203][174][146]%D[208][194][146][204]@[192][146].[175][210]T[167][201]'>[201][167]!=([205][183][183][171]FS[177]\8\[206][211][208]T[165][213][198][199][213][183]";
  3. 2 PRINT"[172][175][175].5[214][162][179][180][188][189]/[223][179][212][174][168][181][173]-[183][191]59[199]&??G9.4[[221][173][255]3;;[[162][169][168]%7[183]*>[209]]-[163]./[219][199][190][183].[@[220][186][195]>[190]+[216][215]9[215]";
  4. 3 PRINT"[178]!U[164]U[196][213]JTU[170][184][174][160]69E)[193]6:#)4;5-W=!U[211][221][206][209]>[183][174]#[163]I[208]+[215][218][202][169][167]:>[210].[190][174]*9+U6[213]*[213][215][206];?[@@@@@@
  5. 4 [158]1025" @TANCOS(null))@]SINSTR$MID$PSQR)ASCMHC)3M@C)(null)M2C)TOMJC)TANMACMIC)+ STR$ ^+ STR$& PEEKLPBL3CLKC)TMOB(null)KTAB(COS
  6. 5 "@ [179]@ @DB=F[192][176]&[200])[191][209][186][176]B[166]B[200][168][168]P[173][168][168]%B[208][163]=D[192]M[184][192]=E[192]M[185][192] [187]( [191][191] [185]@[204][167]' [211][164][204]X[165][196][199][197][206][171][192][203][197][217][193][192][211][212][193][212]
  7. 6 "(null)(null)(null)ATNSTR$RIGHT$(null)(null)(null)ATN(null)RIGHT$(null)(null)@TAN(null)VAL(null)YATN(null)(null)STR$STEPLEN(null)VAL(null)CHR$VAL?PEEK(null)VAL(null)SINLENSTR$RIGHT$(null)YPEEK@ ^7CLOSE@OR(null)CLOSEI0LEFT$)ABSXSTEPKMID$(null)SQREB (null)NEWRIGHT$K07&B]SINSTR$F
  8. 7 "5[190][197]F6[204]L6 [198][193]D[186]E[187] [195][193]D[188]E[189] [189]. [171]7[160]@[176]Q[160]R0MF[184] [212][162][201]@[176]D[201]HPC[204][200]2)[193]MCC)MMBC @1;Y@B[200][196]7[208][182]DB%[184]
  9. 8 "EUSR%RNDVALEXPPT(null)F%LOGVALSQR0L)CMBC)$MCC(null)0 @DNEW1SQRETAB(COSP8 RIGHT$< (null)=&B @LEFT$NOT9SIN@]SINA(null)ABS),]SINAFBSPC(SQR(null)BSPC(RNDASCUSR(null)6%FRE
  10. 9 "[197][183][176]S)@][191]AE[186][204]_$[166]T[208]P[166]U[204]![193][204]F[163] [215][162] [195][193]D[193]E[194] [195][193]D.E/ [182][193][190]7 [185]@[176]C [177]7FA [173][181][190]7FA[204][162][161] [189]. J-[204][183]7
  11. 10 " (null)NEW ABSATN)ANDE9 (null)<(null)(null)SIN ABSATN%: 4SIN)AND VSIN %SIN (null)SINRIGHT$M(null)ABS(null)+SIN.XPEEK)@EP POS@ORC @NEWF: ASCABSFPPF GUSR(null)POSCLOSENXPEEKCLOSEH
  12. 11 "[190]A [168]J =[191] [182][193])@E9$.D[160]&-F[223] [213][191]0[220]%-$. 7%[204][195]& [212][161]%-8[169]B*%.[169]@()@[204][181][161] @1;[201][192][208],[200]1;[201]:[208]%H)[211]Q
  13. 12 "; (null)ATN%;XSTEPBPBSPC(<E;ASC7ASC7COSJ=IPEEK (null)SINMID$PUSR ATNINT(null)/INT CHR$(null)RIGHT$LEFT$LEN(null)ATN(null)LEN(null)%]ORU)@ C>CLOSEPEEKTOVALORMXSTEPVHP<LEFT$LSINSTR$(null)LEFT$-,SIN
  14. 13 "[196][208][184].NB[160]A[208]CX[169]K*=@[197][176][164]EB=A[197]Y[183]B[200][168][196]BP[180][201] [208]E)MY[182]BD[198][208][201]CFED[190]@FMF[162]F[163] [179]@0C[204]O.[201]$[208]1 C [179]@PK
  15. 14 " S1P[RIGHT$CHR$0WSTEPGSTEP/COSCFTAB(&NEWMID$PPOSETAB(ETAB(HP(null) <@TANCORTANCOSP8(null)RIGHT$<RIGHT$1ORERIGHT$3(null)UNOTJLEFT$ <@ >. [<NOT*4TO)@(null)Q3RIGHT$%(null)\ P
  16. 15 " [179]@[201]0X[176]D[201]1[208]G&[163]&[162]HP[173][192]P[208][192][204]H/[204]R.)A(Q+ 3%XJ[169]BE-%# [213]&[204]F[163] [171]7 N& B1[186][176].[200]1[186]ER[200]1[186][208]B)[191]ES
  17. 16 "9Q@QSQRH(null)FREDS%TXFNFNPBSPC(UET E RND( ;)(null)ELEN N& B1SQROR, D RND( <@ @1SQROR*RIGHT$IORPRIGHT$MORLRIGHT$JORHRIGHT$[ORDRIGHT$'(null)TAB( <
  18. 17 "@[201],[176][185] [185]@0[218]%[186][200]%[187][200] [185]@ [171]) N& B1[186][176]1[201][191][208]B)@[197]U[208]GH1[186][197]T[176]K E [187]( ;)[204][191][195]HD[211] [172][165] C1[186]*[200]1[186] [205]=D
  19. 18 "POS @NOTERNDNOTESQRTANBOR$%U&T (null)=DUSR%POS8FNUSRORRIGHT$EFREH%SQRE(null)&RNDFCLOSE8FNFREPANOTETFU%-E(null)&.F(null)XFNFREPANOTE-E(null)F.F(null)NOT(0WASC
  20. 19 ".[198][217] @1TQ[223][200][208][185][166]U[166][160][164][160][208][177][176]C ?# @1[209]Q[186][200][196][185][208][183]H [187]([204][164][195]E[205][212][207][207][204] : ([215]) 1991 [194][217] [205].[208][207][208][207][214]QQ@
  21.