home *** CD-ROM | disk | FTP | other *** search
/ Spaceship Warlock / WARLOCK.bin / DATA / POGO / TAXI2BAR.PORT / TAXI2BAR.PORT.rsrc / BITD_1041 (.txt) < prev    next >
AmigaBASIC Source Code  |  1991-04-14  |  2KB  |  74 lines

  1.                                                                                                                                    
  2.                                                                                                                                    <0x7e>Y
  3. /READ
  4. <0x18b76d8><0x60>PUTCALLPUTCALLYYS<0x7e>/EQV
  5. WHILE&Hffff<0x60><0x60>PUTCALLCALL}YY/./<0x52>
  6. <0x62>
  7. <0x7c><0x7f><0x18b76fb><0x60><0x60>PUTCALLCALL<0x7c>YSGN
  8.  
  9. <0x7f><0x7e><0x60><0x60>PUTPUTCALLCALL}<0x7c>Y
  10. SSTRING$
  11. <0x7e><0x60><0x18b771b>PUTPUT<0x7f><0x7f><0x60>PUTPUT<0x7c>CALL<0x57,0x00>
  12. <0x4d>
  13. <0x7c>PUT<0x18b7756>IMP<0x60><0x7f><0x7f><0x60>PUTPUT<0x7c>CALL<0xee,0x00>var532f<0x50>
  14. ^
  15. varffffad83<0x7e>PUT<0x18b776e>IMPIMP<0x60><0x7f><0x7f>PUTPUTPEEKW<0xee,0x00>label532f/CVL
  16.  
  17. CALL<0x7d>PUT<0x7e>IMP<0x7e><0x7f>
  18. PUT<0xee,0x00>varffff837d<0xee,0x00>label532f/AREA
  19.  
  20. CALL<0x7d>PUT
  21. <0x60><0x7e>IMP<0x7f><0x7f>PUT<0xee,0x00>var7d7d<0xee,0x00>
  22. S<0x7e>/*
  23. <0x5a>
  24.  
  25. CALL<0x7c>PUTIMPIMP<0x60><0x7e><0x7f>
  26. PUT<0xee,0x00>
  27. }\Y
  28. S<0x7d>/<0x4d>
  29. <0x7d>
  30.  
  31. CALL<0xee,0x00><0x7e><0x60><0x7f>PUTPUTPEEKW
  32. }<0xee,0x00><0xee,0x01>varfffffcfc<0xee,0x00>
  33. varffffd200
  34. CALL<0xee,0x00><0x18b77ee><0x60>IMP<0x7f><0x60>PUT<0xee,0x00>
  35. }<0xee,0x01>labelfffffdfe<0x7d><0x7e><0x7d><0x7d>PRINT<0xee,0x00>varfffffb2e<0x51>
  36.  
  37. CALL<0x7c>PUT<0x18b780d>IMPIMP<0x7f><0x60>PUTCLS
  38. }<0x7d>Yvarffffffff<0x7d><0x7e><0x7e><0x7d><0x7e>PRINT<0x7c><0x7c><0x18b7824><0x7f><0xee,0x00><0xee,0x01>^
  39. USING
  40. <0x7c>PUT<0x18b7830>IMPIMP<0x7f>PUTPUTPEEKW<0x7e>}<0x7e>Y<0x7c><0x7f>¡ⁿ√
  41. ⁿⁿ ■■²ⁿ¡¡Yⁿ⌠¡■âYY²²°■                                                                                                                                                                                                                                                              <0x7d><0x7c>PRINT<0x7e><0x7c>varffffff2f<0x7d><0xfc,0x00>ASC<0x53>
  42. <0x7e>PUT
  43. IMPlabelfffff5adPUT<0xfc,0x00>var7d7d<0xfc,0x00>PTAB<0x7d><0x7d><0x7c>PRINT<0x7e><0x7c>/<0xfc,0x00><0x7c><0xfc,0x00>ASC<0x53>
  44. labelffffffffPUT<0x7c>CALL
  45. }\Y<0x7c><0x7f><0x7c><0x7d><0x7c>PRINTvarfffffcfc<0x18b78b5>PUT<0x60>CALLCALLYYS<0x7d><0xfc,0x00>ASC<0x55>
  46. labelffffffadPUT<0x7d>CALL
  47. }MODY<0x7d><0x7f><0xfc,0x00><0xfc,0x01><0x18b78d3><0x7c><0x7f>PUT<0x60><0x60>PUTCALLYY/<0x7d><0xfc,0x00>CALLCALLvarffffee00-
  48. label01ffPUT<0x7d>CALLvar7d7dMODY<0x7d><0x7f>
  49. <0x7e><0x7c><0x7d><0xfc,0x00>
  50. <0x7f><0x7e>PUT<0x18b78ff>IMPPUT<0x60>PUTCALLYY/PTABCALLY.PRINT<0x5b>
  51. varfffff5ad<0x7e>CALLvar7d7d<0xfc,0x00><0xfc,0x01><0x7e><0x7f>
  52. <0x7e><0x7d><0x7d><0xfc,0x00><0x18b7924>PUTPUTIMPIMPGIMPGIMP<0x60>PUTCALLY<0x7e>/<0x18b7933>CALL.<0xfc,0xfffffffb><0x7d><0x5e>
  53. varfffff5ad<0x7d>CALLORY<0x7e><0x7f><0x7e><0x7e><0x7e><0x7d><0xfc,0x00>labelffffffadPUT<0x7d>IMPvar4747<0x7e>IMPlabelffffad7dvar0601CALLY<0x7d>IMP<0x7d>PRINT<0x5f>
  54.  
  55. IMP<0x7e>CALL
  56. }ANDYlabelffffff00                                                                                                                                                                                                                                                             <0x7e><0x7e><0x7d><0x7c>PRINT<0x18b79a7><0x7f>Y<0x7c><0x7c>PUTCALL<0x7e>IMP&H4747IMP<0x5a>IMPCALL/}/PRINTV<0x7e><0x7d>NOT
  57. <0x7f>Y<0x7e>Y<0x7e>CALL
  58. }-Y<0x7e><0x7f><0x7d><0x7e><0x7d><0x7d><0x7d>PRINTvarffffff59<0x7d><0x7c><0x18b79d7>PUTCALLCALLIMPG<0x7e>IMP<0x18b79df>PUTPUTCALL/ASC+<0x7e>PRINT\<0x7d><
  59. <0x7c>CALLlabel7d59CALL+Y<0x7c><0x7f><0x7d><0x7e>
  60. <0x7d><0x7e><0x7d><0x7d>PRINTvarffffff59<0xfd,0x00><0x18b7a03>PUTCALLCALLIMPGIMPIMPPUTYSASCPRINT<0x7e>ASC<0xfd,0x00><0xfd,0x01>
  61. <0x7d>PUT<0x7e>CALLvarffffadad<0x7e>CALL^YPTAB<0x7c><0x7e><0x7c><0x7d><0x18b7a28>PRINT<0x7f>YPRINTPRINTBASE<0x18b7a30>PUTCALLY<0x60>PUTYPRINT<0xfd,0x00><0x7e>ASC\<0x7d>PRINTPRINT<0x7c>
  62. AND
  63. <0x7e><0x7f><0x18b7a46><0x60>PUTPUTCALLCALL<0x7e>Y
  64. PUT<0x7d>CALL
  65. }IMPY<0xfd,0x00><0x7e><0x7e><0xfd,0x00>varffffff59<0x7d>PRINTBASE<0x7e>PUT&H59fdYPRINT<0x7e><0xfd,0x00><0x7d><0x7c><0xfd,0x00>//XOR
  66. <0x7c><0x7f>varffffadad<0x7e>CALL
  67. }<0x7c>PUT<0x7d>CALL
  68. CALL<0xfd,0x00>MOD<0x7f>varfffffefe<0x7c><0x7d>varffffff7d<0xfd,0x00><0xfd,0x01>0<0x7f>PUTCALLYPRINTMOD<0x7d>PRINT<0xfd,0x00>                                                                                                                                                                                                                                                            <0xc00,0x00><0x7c><0x7c>//IMP
  69. <0x7f><0x60><0x60><0xfb,0x00>Y<0x60><0x60><0xfb,0x00><0x7d>CALL
  70. }<0xfb,0x00>MOD<0x7f><0x7e><0x7e><0x7e><0x7d>varffffff83<0x7c>PRINT<0x7d>PRINT<0x7e><0x7c>1<0x7f>PUTCALLY<0x7c>+<0x7e><0x7d>IMP<0x7d><0x7d><0x7c><0x7c>PRINTASC<0x7c>//.\
  71. varffffffe0MODPUT<0x18b7b18>YYPUTPUT<0x60><0x60><0xfb,0x00><0x7e>CALL<0x7d>Y<0xfb,0x00>PTAB<0x7d><0x7e>labelffffff83<0x7d>MODPRINT0<0x7c><0x7f>CALLCALLY<0x7c><0x7e><0x7e>PRINTIMP<0x7d>PRINT<0x7c>PRINTPRINTIMP<0x7c>ASC<0x7d>.<0xfb,0x00>var00e0<0x7e>PUTvarfffffdfb<0x7e><0x7c>varfffffdfd<0x7e>PUTvarffff8359<0x7d>PUTvarffffe0e0<0x7d>PUT<0x7d>CALL<0x7e>Y<0xfb,0x00><0x7d><0x7f><0x18b7b69><0x7e><0x7e><0x7f>CALL<0x7d><0x7d>\PRINT5<0x7f>PUTCALLY<0x7d><0x7c><0x7e><0x7e><0x7c>IMP<0x7d><0x7d>IMPPRINTPRINT<0x2b,0x00>PRINT<0xfb,0x01>-'-<0xfb,0x01><0x18b7b8c>PUTPUT<0x7d><0xfb,0x00><0x7c><0x7c><0x18b7b94><0x7f><0x7d>PRINTPUTPUTCALLY<0xfb,0x00>
  72. <0x60><0x7e>PUT<0x7e>CALLvar7d59var59fdAPPEND<0x7e><0x7f>labelfffffeff<0x7e><0x7c><0x7d><0xfb,0x00>6<0x7f>PUTCALLYPRINT<0x7c><0x7f><0x7d><0x7c>+<0x7e>PRINTIMPPRINTPRINT<0x7c>PRINTPRINTIMP-¡ⁿ√
  73. ⁿⁿ ■■²ⁿ¡¡Yⁿ⌠¡■âYY²²°■                                             
  74.