home *** CD-ROM | disk | FTP | other *** search
/ FreeWare Collection 2 / FreeSoftwareCollection2pd199x-jp.img / fbasic / uranai / uranai.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1990-06-14  |  21.4 KB  |  22 lines
  1. 31487  U
  2. 0  
  3. 10  <UNK! {0001}>ENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONT
  4. 20  <UNK! {0001}>ENDCONTEND@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@ENDCONT
  5. 30  <UNK! {0001}>ENDCONT   ENDuSTOPDEFDBLFORKEYRUN<FORTRONFORXORENDv---==< Super Star-system Version 2.00 >==--- END@ENDCONT
  6. 40  <UNK! {0001}>ENDCONTEND@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@ENDCONT
  7. 50  <UNK! {0001}>ENDCONT END@RUN+GOTO>ENDESTOPERRORGOSUB/ENDFONUSRRETURNREND@STOPTPRINTSAVEPOKEY END@END@END@ END@ENDiGOSUBFORRETURNuGOSUBFORGOSUBZLET-NEWNENDjEND@END@END@END@END@ ENDCONT
  8. 60  <UNK! {0001}>ENDCONT END@END@END@END@END@END@END@WAIT/RUNOCLEARWENDGOSUBOPTIONONNEWEND@END@END@END@END@END@ENDiGOSUBFORRETURNuGOSUBFORGOSUBZENDjEND@END@END@END@END@END@END@ ENDCONT
  9. 70  <UNK! {0001}>ENDCONTEND@  STOPERRORGOSUB/IFEDITDEFTHEN ENDFFOR'FORMOTORFORWHILEFOREQVENDCONTIF<0xE4!>RUNyONNEWENDMFORWFORXENDiON<0x9F!>PRINT<0xE5!>ONtPRINTDEFSNGCLEARDIMFORbFORfNEXTNNEXTGOTONEXTuOBENDj ENDCONT
  10. 80  <UNK! {0001}>ENDCONTEND@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@END@ENDCONT
  11. 90  <UNK! {0001}>ENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONTENDCONT
  12. 100  <UNK! {0001}>
  13. 110  <UNK! {0001}>______Initialize.
  14. 30720  
  15. 8256  32<UNK! {0004}> CSRLIN 2P,28 <UNK! {0004}> <0x9F!> 2<UNK! {000D}>,2<UNK! {000A}>,32<UNK! {0004}> <0x9B!> 2<UNK! {0007}>,442<UNK! {0007}>,32<UNK! {0004}> <0x9A!>
  16. 130  <UNK! {FFD2}> (4441END(3<UNK! {FF03}>,3<UNK! {FF01}>)0,41END(3<UNK! {FF03}>,3<UNK! {FF01}>)2049.88
  17. 1311  <UNK! {0004}> TROFF <UNK! {0009}><UNK! {0002}>A
  18. 23042  
  19. 8196  <0xCB!> <UNK! {FFCC}>
  20. 150  <UNK! {0001}>
  21. 160  WHILE<0xE3!> 0
  22.