home *** CD-ROM | disk | FTP | other *** search
GW-BASIC | 1990-06-14 | 414 b | 22 lines |
- 37631 <UNK! {0001}>
- 0
- 10 <UNK! {0001}>::: NEXTtNEXT@NEXTCNEXTIFNEXTTNEXTCNEXTYFORXORDEF^FOREDITFOR+NEXTTNEXTuNEXTIFEND[NEXT`NEXTLIST :::
- 20 <UNK! {0001}> Programed by S.Katayama(MHF00460)
- 30 <UNK! {0001}>END@END@END@LIST<UNK! {00FC}>DEFTHEN F_F$:CLEARWENDFORUSINGFOR+NEXTtNEXT@NEXTCNEXTIFWAITLOAD
- 10240
- 33088 @END@REMoDEFTHEN F_SI:NEXTtNEXT@NEXTCNEXTIFFORTONEXTTNEXTCNEXTY(NEXToNEXTCNEXTgCLEARPLETLOCATE)
- 12800
- 18758 LESIZE
- 15360
- 17923 _1 RETURNSTICK (17923_F,7<UNK! {0001}>:)
- 61 17923_DRETURN<UNK! {FFAD}> (17923_F,<UNK! {0009}><UNK! {0003}>F_1)
- 62 17923_FRETURN<UNK! {FFC0}>(17923_F,<UNK! {FFAE}>(17923_F)END<UNK! {FFAE}>(17923_D))
- 17920
- 6176 <UNK! {0001}>R,#2<UNK! {0003}>,17923_DREAD7<UNK! {0003}>(1)READ17923_F
- 20480
- 17924 _SIRETURN<UNK! {FFB0}>(2<UNK! {0003}>)
- 23040
- 8992 2<UNK! {0003}>
- 25600
- 0
-