home *** CD-ROM | disk | FTP | other *** search
AmigaBASIC Source Code | 1994-05-10 | 1.4 KB | 155 lines |
- IMP\<0x0e,0x90754a0>]]9]9]99<0x0e,0x00> >
- label2bf8COMMON<0xf5,0x00><0x90766da>@dd@c@c2MODIMP*
- <0x90766e7>IMPCOMMONCOMMONELSEdCOMMON<0xf5,0x00><0x90766f0>@dd@c@d:@@dMOD\
- <0xf5,0x00><0x9076701>UCOMMONCOMMONELSEeCOMMONj<0x7c>d<0x907670b>@dd@c:d@@d@:d2OR
- <0x907671c>OBJECT.CLIPCOSELSEeCOMMON<0x7c>d
- @<0x7e>d&H4063:d@9d?@c@d9EQV
- <0x9076739>CLOSE<0x5d>COMMONELSECOMMONCOMMON<0x7e>d
- COMMON<0x7d>d64cd:d@?d@:c:@?d@<0xf5,0x00><0x7e>
- <0x907675b><0xf5,0x00>COMMONELSECOSCOMMONdCOMMONjCOMMON<0x7c>d<0x9076768>c@@d?@d@9d@@?:@d?<0xf5,0x00><0x907677c>V<0x5e>ELSECOSCOMMONCOMMONjCOSdCOMMON<0xf5,0x00>0@dd?d^@?d@9@^?@9d9<0xf5,0x00><0x907679e>ASCRNDCOSPUTELSECOSELSECOMMONdELSE<0xf5,0x00>
- c<0x7d>d<0x90767af>:@c:@9@?<0x7e>@@d+<0xf5,0x00><0x90767c1>PRINT<0x5e>RNDCOMMON COSELSEdCOMMON<0x8c,0x00>0@d:c@d@d@?^@9d?:?d<0x7c>
- <0x907680d>CLOSERSET<0x7d>COSELSECOMMONCOMMONCOSELSEdCOMMONedCOMMON<0x8c,0x00>0@d@d@c:c:@?d@:@d@]<0x7d>
- <0x9076833><0x7c>RSETCOMMONRNDCOSELSECOSELSECOMMONCOMMONeCOMMON<0x8c,0x00><0x9076842>@dcd@]<0x7e>@99@^@?@c:@9U
-
- <0x8c,0x00>RND<0x907685c>RSETCOSRNDCOSELSECOMMONdCOSELSEdCOMMONddCOMMON<0x7e>d%cd@d]d916484?@@: @<0x3d,0x00>
- <0x3d,0x00>RSETPRINTELSECOSPRINTCOMMONCOSELSECOMMONdCOMMONddELSE<0x3d,0x00>!:d@d9?^@@]@d?d@^9
-
- <0x7d><0x5f><0x7d><0x5d>PUTRNDEOFCOMMONELSECOSELSECOMMONddELSE<0x3d,0x00>5 @d@@c:@@?^@@?]
-
- <0x5f><0x7e><0x5d><0x7d>COSCOMMON<0x5d><0x7e>COMMON<0x907693d>eELSECOMMONeCOMMON\d!c@dd:d?d:@d?d9
-
- <0x60><0x7d>PUTRNDCOS<0x5d><0x7d>COMMONEOF COMMONCOMMONddCOMMONCOMMON<0x7d>d"cd@@dd:?d@d@dc@d@]
- <0x86,0x00>RSETRNDPUTRND<0x7d>COMMONEOFCOMMONCOMMONELSECOSdCOMMONELSE<0x7e>d
- COMMON<0x86,0x00>29dd@c@d?@^@d9
- \<0x7f>RSET<0x7e><0x5e>PUT56712<0x7d>ELSECOSCOMMONCOMMON<0x5c>dCOMMONCOSCOMMONdj<0x86,0x00>
- ?<0x7d>d979657566d@dd]
- <0x7f><0x5f><0x7e><0x5e><0x7d>ELSEPUTPRINT<0x5d>COMMONCOSELSECOMMONELSECOMMONCOMMONeELSEddCOMMON<0x86,0x00>!@cd@d @c:
- <0x60><0x7e>RNDPUTRSET<0x7e><0x5e>ELSE<0x7d>EOFRNDCOMMONCOSCOMMONeCOMMONELSEdCOMMONddCOMMON\d
- @<0x7e>d&H4063ddc
- <0x7d><0x5f>PUT<0x60><0x7d><0x5e>PRINT<0x9076a70><0x5e>COMMONCOMMONCOSELSECOMMONEOFCOMMONELSECOMMONCOMMONd<0x5c>COMMONddCOMMON<0x62,0x00>$@dd^@cdd@]
- \<0x60><0x7e>RND<0x5f>RNDRSET<0x7d><0x5d><0x5e>RNDCOSELSECOMMONELSECOSCOMMONeELSE COMMONddCOMMON<0x86,0x00>
- ^<0x86,0x00>8
-
- <0x60><0x5f><0x5f>RSETPUTRNDPUTELSEPRINTCOSRNDCOSCOMMONCOSELSECOMMONELSEeCOMMONdELSEddELSE\d
- c<0x7d>d<0x9076afd>]
-
- <0x60>RNDPUT<0x7d><0x5f>RSETRNDCOSELSEPUTPRINTCOMMON<0x5c><0x7e>COMMON<0x9076b14>ELSEeCOMMONELSEeddCOMMONEQVdlabel0000<0x7d><0x7e><0x5f>7<0x7d>RSETPUTRNDPUT<0x5d>COMMONRSETCOMMONELSECOSCOMMONCOMMONELSECOSdCOMMONCOMMONeCOMMONdCOMMONdjCOMMONMODd<0x7e>
- 0<0x5f><0x7e>RSET<0x7e><0x7d>RSETRSETRNDRND<0x5e>PRINT<0x5d><0x5d>COMMONELSECOSCOSELSE<0x7e> dCOMMONdELSEddCOMMON <0x7c>dvarffff885d<0x7e>
- <0x9076bc9><0x60>RSET<0x7d>RSET<0x7e>RNDPUT1.84579e-314ELSECOMMONCOMMON<0x5c>COMMON<0x5c>dCOMMONdELSEdCOMMONddCOMMONddCOMMONdCOMMONdELSEd<0x62,0x00>
- %ASC<0x7e>RSET<0x7e>RSET<0x7e>RSET<0x7d>RNDCOSRNDPUTELSEPUTELSEPUTCOSELSECOMMONCOSCOMMONCOMMONCOSELSECOSCOMMONdCOSCOMMONdELSEddELSEdELSECOMMONCOMMON<0x7d>
- %STICK<0x7e>RSET<0x7d> <0x5e><0x7d><0x5e>RNDPUTELSEPUTELSECOMMONCOSELSECOMMONELSECOSELSEdCOMMONdEOFCOMMONd<0x5c>dCOMMONdCOMMONeCOMMONd]<0x7c>
- <0x9076c72>PRINTRSET<0x7e><0x5f><0x7d><0x5f>RSET65203<0x7d>COSPUTELSEPUTCOMMON<0x5e>ELSEPUTELSECOSELSECOMMONCOMMONELSECOMMONCOMMONdCOMMONdCOMMONCOSCOSdELSECOMMON<0x5d><0xfb,0x00>"˜fl≥˝flfl˝≥˛fi˝≤≠éfi˝âéâ≤àâéâàéâéâàjàéàè˘
- !<0xfb,0x00><0x5f>RND<0x7e>RSETRSETRNDPUT<0x5f>PUT<0x5d>RSET<0x7d>ELSE<0x7d>COSRNDCOSELSECOMMONCOSCOMMONEOFCOMMONCOMMONCOSELSECOMMONCOMMONELSECOSCOMMONCOMMON<0xfb,0x00><0x9076ce5>RND<0x5f><0x5f>RSET<0x7d><0x7e>8RSET<0x7e>RSETRNDRSET<0x7d>ELSEPUT<0x5d>RNDCOMMONELSEPUTELSE<0x7d><0x5c>COMMONCOMMONEOFCOMMONCOMMON<0x5c>COMMONCOSELSE<0x5e>MOD
- 2997747379RSET<0x7d>RSET<0x7d><0x5f><0x7d><0x5e>PUT<0x5e><0x7d>COSRNDPUTELSEPUTELSECOMMONRNDCOSELSE<0x5d>COMMONCOMMON<0x5d>ELSEPUTASCIMP
- 44255<0x7e>RSET<0x7e>RSET<0x7e>RSET<0x7e>PUTRNDPUTRNDRSETPUTELSEPUTELSEPUTRNDCOSRNDCOSPRINT<0x5d>RNDCOSRSET\XOR
- label0000 RSET5<0x7d>RSET><0x5e>RND<0x5f><0x60>RSET<0x7d>ELSEPUTRNDPUTELSE<0x5d><0x7d>COSRND<0x5d><0x7d><0x5d>PRINTU^
- 6RSET<0x60>RSET<0x7d>RSET<0x7d><0x5f><0x7e>RSET<0x7d>RSETPUTRNDRSET<0x5e>PUTRNDCOSRND<0x5e>PUT<0x5e>V1-
- 2<0x7d><0x60><0x7d><0x5f><0x7e><0x5e><0x7e>RSET<0x7e>RSETRSET<0x7d>RSET<0x7d><0x5f><0x7e>RSET<0x7e>CLOSE<0xdd,0x00>
- 0CLOSE<0x7d><0x60><0x5f><0x7e>RSET<0x7e>RSET<0x7d><0x7e><0x5f><0x7e><0x5f><0x60><0x7e>PRINTV<0xdd,0x00>
- <0x9076de4>VASCPOKEWOBJECT.PRIORITY=<0x60><0x7e><0xdd,0x00>
- var06f7-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-