home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 68 / Tiger_Disk_068_19xx_Tiger-Crew-Disk_de_Side_D.d64 / fatty.src < prev    next >
Text File  |  2023-02-26  |  2KB  |  89 lines
  1. ;
  2.  
  3. ; fatty COMMANDER FOR elite 128
  4.  
  5. ;
  6.  
  7.  
  8.  
  9. .ORG$0000; dOES NOT MATTER
  10.  
  11. .LOCALCHAR'@'
  12.  
  13. .CASE+
  14.  
  15. .LISTMACRO+
  16.  
  17. .LFCOND+
  18.  
  19. .P02; aSSEMBLE FOR 6502 cpu
  20.  
  21.  
  22.  
  23. .INCLUDE COMMANDR.INC
  24.  
  25. .INCLUDE SYSTEMS.INC
  26.  
  27.  
  28.  
  29.  
  30.  
  31. .WORD$0000; lOAD ADDRESS (IGNORED)
  32.  
  33.  
  34.  
  35. dATAsTART:
  36.  
  37. .BYTE$00; mISSIONS (BITMAPPED FLAGS)
  38.  
  39. .WORDlave; pLANET CODE (lave)
  40.  
  41. .BYTE$4a,$5a,$48,$02,$53,$b7 ; gALAXY DATA
  42.  
  43. .DBYT0, 10000; mONEY
  44.  
  45. .BYTE70; fUEL
  46.  
  47. .BYTE$00; uNUSED
  48.  
  49. .BYTE$00; nUMBER OF CURRENT GALAXY
  50.  
  51. .BYTEl_pULSE; fRONT LASER TYPE
  52.  
  53. .BYTEl_nONE; rEAR LASER TYPE
  54.  
  55. .BYTEl_nONE; lEFT LASER TYPE
  56.  
  57. .BYTEl_nONE; rIGHT LASER TYPE
  58.  
  59. .WORD$0000; aDDITIONAL MISSION DATA
  60.  
  61. .BYTE$00; fOOD
  62.  
  63. .BYTE$00; tEXTILIA
  64.  
  65. .BYTE$00; rADIOACTIVE MATERIALS
  66.  
  67. .BYTE$00; sLAVES
  68.  
  69. .BYTE$00; lIQUOR
  70.  
  71. .BYTE$00; lUXURY GOODS
  72.  
  73. .BYTE$00; nARCOTICA
  74.  
  75. .BYTE$00; cOMPUTER
  76.  
  77. .BYTE$00; mACHINES
  78.  
  79. .BYTE$00; aLLOY
  80.  
  81. .BYTE$00; fIREARMS
  82.  
  83. .BYTE$00; fURS
  84.  
  85. .BYTE$00; mINERALS
  86.  
  87. .BYTE$00; gOLD
  88.  
  89. .BYTE$00; pLATINUM
  90.  
  91. .BYTE$00; gEMS
  92.  
  93. .BYTE$00; aLIEN GOODS
  94.  
  95. .BYTE$00; ecm
  96.  
  97. .BYTE$00; iff
  98.  
  99. .BYTE$00; fUEL SCOOPS
  100.  
  101. .BYTE$00; hYPERSPACE UNIT
  102.  
  103. .BYTE$00; eNERGY UNIT (= PRODUCTION VALUE -1)
  104.  
  105. .BYTE$80; dOCKING COMPUTER
  106.  
  107. .BYTE$00; gALACTIC HYPERDRIVE
  108.  
  109. .BYTE$00; eSCAPE CAPSULE
  110.  
  111. .BYTE$00; eXTRA CARGO BAY
  112.  
  113. .WORD0; cOUNT OF TRUMBELS
  114.  
  115. .BYTE$00; rATING FRACTION
  116.  
  117. .BYTE$03; mISSILE COUNT
  118.  
  119. .BYTE$00; lEGAL STATUS
  120.  
  121. .BYTE$10; fOOD AVAILABLE
  122.  
  123. .BYTE$0f; tEXTILIA AVAILABLE
  124.  
  125. .BYTE$11; rADIOACTIVE MATERIALS AVAILABLE
  126.  
  127. .BYTE$00; sLAVES AVAILABLE
  128.  
  129. .BYTE$03; lIQUOR AVAILABLE
  130.  
  131. .BYTE$1c; lUXURY GOODS AVAILABLE
  132.  
  133. .BYTE$0e; nARCOTICA AVAILABLE
  134.  
  135. .BYTE$00; cOMPUTER AVAILABLE
  136.  
  137. .BYTE$00; mACHINES AVAILABLE
  138.  
  139. .BYTE$0a; aLLOY AVAILABLE
  140.  
  141. .BYTE$00; fIREARMS AVAILABLE
  142.  
  143. .BYTE$11; fURS AVAILABLE
  144.  
  145. .BYTE$3a; mINERALS AVAILABLE
  146.  
  147. .BYTE$07; gOLD AVAILABLE
  148.  
  149. .BYTE$09; pLATINUM AVAILABLE
  150.  
  151. .BYTE$08; gEMS AVAILABLE
  152.  
  153. .BYTE$00; aLIEN GOODS AVAILABLE
  154.  
  155. .BYTE$00; pRICE FACTOR
  156.  
  157. .WORD0; rATING/KILLS
  158.  
  159. .WORD0; sPECIAL CARGO TARGET
  160.  
  161. .WORD0; tIME LEFT FOR SPECIAL CARGO DELIVERY
  162.  
  163. .BYTE0; pAYMENT FOR SPECIAL CARGO
  164.  
  165. .BYTE0; tYPE/ILLEGALITY OF SPECIAL CARGO
  166.  
  167.  
  168.  
  169. .IF(* - dATAsTART) <> (c_sIZE - c_dATA)
  170.  
  171. .OUT sTRUCTURE SIZE MISMATCH
  172.  
  173. .ENDIF
  174.  
  175.  
  176.  
  177.