( cow-glider.s):00001 ( cow-glider.s):00002 ;;; gcc for m6809 : Mar 27 2025 02:43:37 ( cow-glider.s):00003 ;;; 4.6.4 (gcc6809lw pl9) ( cow-glider.s):00004 ;;; ABI version 1 ( cow-glider.s):00005 ;;; -mint16 ( cow-glider.s):00006 .module cow_glider.c ( cow-glider.s):00007 ( cow-glider.s):00008 .area .text 0000 ( cow-glider.s):00009 _PMode1DrawSpot: 0000 3440 ( cow-glider.s):00010 pshs u 0002 327A ( cow-glider.s):00011 leas -6,s 0004 E762 ( cow-glider.s):00012 stb 2,s 0006 102B0048 ( cow-glider.s):00013 lbmi L1 000A E66A ( cow-glider.s):00014 ldb 10,s 000C C15F ( cow-glider.s):00015 cmpb #95 ;cmpqi: 000E 10220040 ( cow-glider.s):00016 lbhi L1 0012 E662 ( cow-glider.s):00017 ldb 2,s 0014 54 ( cow-glider.s):00018 lsrb 0015 54 ( cow-glider.s):00019 lsrb 0016 4F ( cow-glider.s):00020 clra ;zero_extendqihi: R:b -> R:d 0017 ED64 ( cow-glider.s):00021 std 4,s 0019 308B ( cow-glider.s):00022 leax d,x 001B E66A ( cow-glider.s):00023 ldb 10,s 001D 4F ( cow-glider.s):00024 clra ;zero_extendqihi: R:b -> R:d 001E EDE4 ( cow-glider.s):00025 std ,s 0020 58 ( cow-glider.s):00026 aslb 0021 49 ( cow-glider.s):00027 rola 0022 58 ( cow-glider.s):00028 aslb 0023 49 ( cow-glider.s):00029 rola 0024 58 ( cow-glider.s):00030 aslb 0025 49 ( cow-glider.s):00031 rola 0026 58 ( cow-glider.s):00032 aslb 0027 49 ( cow-glider.s):00033 rola 0028 58 ( cow-glider.s):00034 aslb 0029 49 ( cow-glider.s):00035 rola 002A 338B ( cow-glider.s):00036 leau d,x 002C E6C4 ( cow-glider.s):00037 ldb ,u 002E E7E4 ( cow-glider.s):00038 stb ,s 0030 E662 ( cow-glider.s):00039 ldb 2,s 0032 53 ( cow-glider.s):00040 comb 0033 C403 ( cow-glider.s):00041 andb #3 0035 58 ( cow-glider.s):00042 aslb 0036 4F ( cow-glider.s):00043 clra ;zero_extendqihi: R:b -> R:d 0037 ED62 ( cow-glider.s):00044 std 2,s 0039 CC0003 ( cow-glider.s):00045 ldd #3 003C AE62 ( cow-glider.s):00046 ldx 2,s 003E BD0000 ( cow-glider.s):00047 jsr _ashlhi3 0041 53 ( cow-glider.s):00048 comb 0042 E4E4 ( cow-glider.s):00049 andb ,s 0044 E7E4 ( cow-glider.s):00050 stb ,s 0046 E66B ( cow-glider.s):00051 ldb 11,s 0048 4F ( cow-glider.s):00052 clra ;zero_extendqihi: R:b -> R:d 0049 ED64 ( cow-glider.s):00053 std 4,s 004B BD0000 ( cow-glider.s):00054 jsr _ashlhi3 ( cow-glider.s):00055 ;movlsbqihi: D->B 004E EAE4 ( cow-glider.s):00056 orb ,s 0050 E7C4 ( cow-glider.s):00057 stb ,u 0052 ( cow-glider.s):00058 L1: 0052 3266 ( cow-glider.s):00059 leas 6,s 0054 35C0 ( cow-glider.s):00060 puls u,pc 0056 ( cow-glider.s):00061 _PMode1DrawSpotXor.constprop.3: 0056 3460 ( cow-glider.s):00062 pshs y,u 0058 327A ( cow-glider.s):00063 leas -6,s 005A E764 ( cow-glider.s):00064 stb 4,s 005C 54 ( cow-glider.s):00065 lsrb 005D 54 ( cow-glider.s):00066 lsrb 005E 4F ( cow-glider.s):00067 clra ;zero_extendqihi: R:b -> R:d 005F 1F01 ( cow-glider.s):00068 tfr d,x 0061 33893400 ( cow-glider.s):00069 leau 13312,x 0065 E66C ( cow-glider.s):00070 ldb 12,s 0067 4F ( cow-glider.s):00071 clra ;zero_extendqihi: R:b -> R:d 0068 58 ( cow-glider.s):00072 aslb 0069 49 ( cow-glider.s):00073 rola 006A 58 ( cow-glider.s):00074 aslb 006B 49 ( cow-glider.s):00075 rola 006C 58 ( cow-glider.s):00076 aslb 006D 49 ( cow-glider.s):00077 rola 006E 58 ( cow-glider.s):00078 aslb 006F 49 ( cow-glider.s):00079 rola 0070 58 ( cow-glider.s):00080 aslb 0071 49 ( cow-glider.s):00081 rola 0072 EDE4 ( cow-glider.s):00082 std ,s 0074 33CB ( cow-glider.s):00083 leau d,u 0076 E6C4 ( cow-glider.s):00084 ldb ,u 0078 E765 ( cow-glider.s):00085 stb 5,s 007A E66D ( cow-glider.s):00086 ldb 13,s 007C 4F ( cow-glider.s):00087 clra ;zero_extendqihi: R:b -> R:d 007D ED62 ( cow-glider.s):00088 std 2,s 007F E664 ( cow-glider.s):00089 ldb 4,s 0081 C403 ( cow-glider.s):00090 andb #3 0083 E7E4 ( cow-glider.s):00091 stb ,s 0085 4F ( cow-glider.s):00092 clra ;zero_extendqihi: R:b -> R:d 0086 1F01 ( cow-glider.s):00093 tfr d,x 0088 108E0003 ( cow-glider.s):00094 ldy #3 008C 1F20 ( cow-glider.s):00095 tfr y,d 008E 3410 ( cow-glider.s):00096 pshs x ;subhi: R:d -= R:x 0090 A3E1 ( cow-glider.s):00097 subd ,s++ 0092 58 ( cow-glider.s):00098 aslb 0093 49 ( cow-glider.s):00099 rola 0094 1F01 ( cow-glider.s):00100 tfr d,x 0096 EC62 ( cow-glider.s):00101 ldd 2,s 0098 BD0000 ( cow-glider.s):00102 jsr _ashlhi3 009B E763 ( cow-glider.s):00103 stb 3,s 009D E665 ( cow-glider.s):00104 ldb 5,s 009F E863 ( cow-glider.s):00105 eorb 3,s 00A1 E7C4 ( cow-glider.s):00106 stb ,u 00A3 3266 ( cow-glider.s):00107 leas 6,s 00A5 35E0 ( cow-glider.s):00108 puls y,u,pc 00A7 ( cow-glider.s):00109 _drawMod96Xor: 00A7 327D ( cow-glider.s):00110 leas -3,s 00A9 E7E4 ( cow-glider.s):00111 stb ,s 00AB E665 ( cow-glider.s):00112 ldb 5,s 00AD E761 ( cow-glider.s):00113 stb 1,s 00AF E666 ( cow-glider.s):00114 ldb 6,s 00B1 E762 ( cow-glider.s):00115 stb 2,s 00B3 E6E4 ( cow-glider.s):00116 ldb ,s 00B5 2A04 ( cow-glider.s):00117 bpl L5 00B7 CB60 ( cow-glider.s):00118 addb #96 00B9 E7E4 ( cow-glider.s):00119 stb ,s 00BB ( cow-glider.s):00120 L5: 00BB E661 ( cow-glider.s):00121 ldb 1,s 00BD 2A06 ( cow-glider.s):00122 bpl L6 00BF E6E4 ( cow-glider.s):00123 ldb ,s 00C1 CB60 ( cow-glider.s):00124 addb #96 00C3 E7E4 ( cow-glider.s):00125 stb ,s 00C5 ( cow-glider.s):00126 L6: 00C5 E6E4 ( cow-glider.s):00127 ldb ,s 00C7 C15F ( cow-glider.s):00128 cmpb #95 ;cmpqi: 00C9 2F04 ( cow-glider.s):00129 ble L7 00CB CBA0 ( cow-glider.s):00130 addb #-96 00CD E7E4 ( cow-glider.s):00131 stb ,s 00CF ( cow-glider.s):00132 L7: 00CF E661 ( cow-glider.s):00133 ldb 1,s 00D1 C15F ( cow-glider.s):00134 cmpb #95 ;cmpqi: 00D3 2F06 ( cow-glider.s):00135 ble L8 00D5 E6E4 ( cow-glider.s):00136 ldb ,s 00D7 CBA0 ( cow-glider.s):00137 addb #-96 00D9 E7E4 ( cow-glider.s):00138 stb ,s 00DB ( cow-glider.s):00139 L8: 00DB E662 ( cow-glider.s):00140 ldb 2,s 00DD E766 ( cow-glider.s):00141 stb 6,s 00DF E661 ( cow-glider.s):00142 ldb 1,s 00E1 E765 ( cow-glider.s):00143 stb 5,s 00E3 E6E4 ( cow-glider.s):00144 ldb ,s 00E5 3263 ( cow-glider.s):00145 leas 3,s 00E7 7E0000 ( cow-glider.s):00146 jmp _PMode1DrawSpotXor.constprop.3 00EA ( cow-glider.s):00147 _XorOldShips: 00EA 3440 ( cow-glider.s):00148 pshs u 00EC 3279 ( cow-glider.s):00149 leas -7,s 00EE 6F63 ( cow-glider.s):00150 clr 3,s 00F0 7E0000 ( cow-glider.s):00151 jmp L10 00F3 ( cow-glider.s):00152 L12: 00F3 E663 ( cow-glider.s):00153 ldb 3,s 00F5 4F ( cow-glider.s):00154 clra ;zero_extendqihi: R:b -> R:d 00F6 EDE4 ( cow-glider.s):00155 std ,s 00F8 58 ( cow-glider.s):00156 aslb 00F9 49 ( cow-glider.s):00157 rola 00FA 58 ( cow-glider.s):00158 aslb 00FB 49 ( cow-glider.s):00159 rola 00FC 58 ( cow-glider.s):00160 aslb 00FD 49 ( cow-glider.s):00161 rola 00FE CE0000 ( cow-glider.s):00162 ldu #_OldShipState 0101 30CB ( cow-glider.s):00163 leax d,u 0103 E684 ( cow-glider.s):00164 ldb ,x 0105 E764 ( cow-glider.s):00165 stb 4,s 0107 E602 ( cow-glider.s):00166 ldb 2,x 0109 E765 ( cow-glider.s):00167 stb 5,s 010B C603 ( cow-glider.s):00168 ldb #3 010D E762 ( cow-glider.s):00169 stb 2,s 010F E663 ( cow-glider.s):00170 ldb 3,s 0111 F1060C ( cow-glider.s):00171 cmpb _gScore+1 ;cmpqi: 0114 2604 ( cow-glider.s):00172 bne L11 0116 C602 ( cow-glider.s):00173 ldb #2 0118 E762 ( cow-glider.s):00174 stb 2,s 011A ( cow-glider.s):00175 L11: 011A E662 ( cow-glider.s):00176 ldb 2,s 011C 3404 ( cow-glider.s):00177 pshs b 011E E666 ( cow-glider.s):00178 ldb 6,s 0120 3404 ( cow-glider.s):00179 pshs b 0122 E666 ( cow-glider.s):00180 ldb 6,s 0124 BD0000 ( cow-glider.s):00181 jsr _drawMod96Xor 0127 E666 ( cow-glider.s):00182 ldb 6,s 0129 5A ( cow-glider.s):00183 decb 012A E768 ( cow-glider.s):00184 stb 8,s 012C E664 ( cow-glider.s):00185 ldb 4,s 012E 3404 ( cow-glider.s):00186 pshs b 0130 E668 ( cow-glider.s):00187 ldb 8,s 0132 3404 ( cow-glider.s):00188 pshs b 0134 E66A ( cow-glider.s):00189 ldb 10,s 0136 BD0000 ( cow-glider.s):00190 jsr _drawMod96Xor 0139 E668 ( cow-glider.s):00191 ldb 8,s 013B 5C ( cow-glider.s):00192 incb 013C E76A ( cow-glider.s):00193 stb 10,s 013E E666 ( cow-glider.s):00194 ldb 6,s 0140 3404 ( cow-glider.s):00195 pshs b 0142 E66A ( cow-glider.s):00196 ldb 10,s 0144 3404 ( cow-glider.s):00197 pshs b 0146 E66C ( cow-glider.s):00198 ldb 12,s 0148 BD0000 ( cow-glider.s):00199 jsr _drawMod96Xor 014B E668 ( cow-glider.s):00200 ldb 8,s 014D 3404 ( cow-glider.s):00201 pshs b 014F E66C ( cow-glider.s):00202 ldb 12,s 0151 5A ( cow-glider.s):00203 decb 0152 3404 ( cow-glider.s):00204 pshs b 0154 E66C ( cow-glider.s):00205 ldb 12,s 0156 BD0000 ( cow-glider.s):00206 jsr _drawMod96Xor 0159 3268 ( cow-glider.s):00207 leas 8,s 015B E662 ( cow-glider.s):00208 ldb 2,s 015D 3404 ( cow-glider.s):00209 pshs b 015F E666 ( cow-glider.s):00210 ldb 6,s 0161 5C ( cow-glider.s):00211 incb 0162 3404 ( cow-glider.s):00212 pshs b 0164 E666 ( cow-glider.s):00213 ldb 6,s 0166 BD0000 ( cow-glider.s):00214 jsr _drawMod96Xor 0169 6C65 ( cow-glider.s):00215 inc 5,s 016B 3262 ( cow-glider.s):00216 leas 2,s 016D ( cow-glider.s):00217 L10: 016D E663 ( cow-glider.s):00218 ldb 3,s 016F F1060B ( cow-glider.s):00219 cmpb _gScore ;cmpqi: 0172 1025FF7D ( cow-glider.s):00220 lblo L12 0176 3267 ( cow-glider.s):00221 leas 7,s 0178 35C0 ( cow-glider.s):00222 puls u,pc 017A ( cow-glider.s):00223 _RandomUpTo.constprop.4: 017A 3460 ( cow-glider.s):00224 pshs y,u 017C 3277 ( cow-glider.s):00225 leas -9,s 017E C606 ( cow-glider.s):00226 ldb #6 0180 E762 ( cow-glider.s):00227 stb 2,s 0182 C6FF ( cow-glider.s):00228 ldb #-1 0184 2002 ( cow-glider.s):00229 bra L21 0186 ( cow-glider.s):00230 L19: 0186 E668 ( cow-glider.s):00231 ldb 8,s 0188 ( cow-glider.s):00232 L21: 0188 E764 ( cow-glider.s):00233 stb 4,s 018A 54 ( cow-glider.s):00234 lsrb 018B E768 ( cow-glider.s):00235 stb 8,s 018D C458 ( cow-glider.s):00236 andb #88 018F E766 ( cow-glider.s):00237 stb 6,s 0191 C158 ( cow-glider.s):00238 cmpb #88 ;cmpqi: 0193 2608 ( cow-glider.s):00239 bne L18 0195 6A62 ( cow-glider.s):00240 dec 2,s 0197 E662 ( cow-glider.s):00241 ldb 2,s 0199 26EB ( cow-glider.s):00242 bne L19 019B 2004 ( cow-glider.s):00243 bra L15 019D ( cow-glider.s):00244 L18: 019D E664 ( cow-glider.s):00245 ldb 4,s 019F E768 ( cow-glider.s):00246 stb 8,s 01A1 ( cow-glider.s):00247 L15: 01A1 FC0000 ( cow-glider.s):00248 ldd _random_context 01A4 ED62 ( cow-glider.s):00249 std 2,s 01A6 FC0000 ( cow-glider.s):00250 ldd _random_context+2 01A9 ED64 ( cow-glider.s):00251 std 4,s 01AB ( cow-glider.s):00252 L17: 01AB EC62 ( cow-glider.s):00253 ldd 2,s 01AD C30001 ( cow-glider.s):00254 addd #1 01B0 8400 ( cow-glider.s):00255 anda #0 01B2 C4FF ( cow-glider.s):00256 andb #255 01B4 ED62 ( cow-glider.s):00257 std 2,s 01B6 1F02 ( cow-glider.s):00258 tfr d,y 01B8 30A90000 ( cow-glider.s):00259 leax _random_context+4,y 01BC E684 ( cow-glider.s):00260 ldb ,x 01BE 4F ( cow-glider.s):00261 clra ;zero_extendqihi: R:b -> R:d 01BF ED66 ( cow-glider.s):00262 std 6,s 01C1 E364 ( cow-glider.s):00263 addd 4,s 01C3 8400 ( cow-glider.s):00264 anda #0 01C5 C4FF ( cow-glider.s):00265 andb #255 01C7 ED64 ( cow-glider.s):00266 std 4,s 01C9 1F03 ( cow-glider.s):00267 tfr d,u 01CB 31C90000 ( cow-glider.s):00268 leay _random_context+4,u 01CF E6A4 ( cow-glider.s):00269 ldb ,y 01D1 4F ( cow-glider.s):00270 clra ;zero_extendqihi: R:b -> R:d 01D2 EDE4 ( cow-glider.s):00271 std ,s 01D4 E684 ( cow-glider.s):00272 ldb ,x 01D6 E7A4 ( cow-glider.s):00273 stb ,y 01D8 ECE4 ( cow-glider.s):00274 ldd ,s 01DA E784 ( cow-glider.s):00275 stb ,x ;movlsbqihi: R:d -> ,x 01DC 1F01 ( cow-glider.s):00276 tfr d,x 01DE EC66 ( cow-glider.s):00277 ldd 6,s 01E0 308B ( cow-glider.s):00278 leax d,x 01E2 1F10 ( cow-glider.s):00279 tfr x,d 01E4 8400 ( cow-glider.s):00280 anda #0 01E6 C4FF ( cow-glider.s):00281 andb #255 01E8 1F01 ( cow-glider.s):00282 tfr d,x 01EA E668 ( cow-glider.s):00283 ldb 8,s 01EC E4890000 ( cow-glider.s):00284 andb _random_context+4,x 01F0 E766 ( cow-glider.s):00285 stb 6,s 01F2 C157 ( cow-glider.s):00286 cmpb #87 ;cmpqi: 01F4 22B5 ( cow-glider.s):00287 bhi L17 01F6 EC62 ( cow-glider.s):00288 ldd 2,s 01F8 FD0000 ( cow-glider.s):00289 std _random_context 01FB FF0000 ( cow-glider.s):00290 stu _random_context+2 01FE E666 ( cow-glider.s):00291 ldb 6,s 0200 3269 ( cow-glider.s):00292 leas 9,s 0202 35E0 ( cow-glider.s):00293 puls y,u,pc 0204 ( cow-glider.s):00294 _PMode1DrawDigit3x5.constprop.6: 0204 3460 ( cow-glider.s):00295 pshs y,u 0206 3279 ( cow-glider.s):00296 leas -7,s 0208 E765 ( cow-glider.s):00297 stb 5,s 020A E66F ( cow-glider.s):00298 ldb 15,s 020C 4F ( cow-glider.s):00299 clra ;zero_extendqihi: R:b -> R:d 020D 1F01 ( cow-glider.s):00300 tfr d,x 020F E6890000 ( cow-glider.s):00301 ldb _DigitTimes15,x 0213 4F ( cow-glider.s):00302 clra ;zero_extendqihi: R:b -> R:d 0214 C30000 ( cow-glider.s):00303 addd #_Digit3x5CharGen 0217 ED62 ( cow-glider.s):00304 std 2,s 0219 8E0000 ( cow-glider.s):00305 ldx #0 021C AFE4 ( cow-glider.s):00306 stx ,s 021E 2044 ( cow-glider.s):00307 bra L23 0220 ( cow-glider.s):00308 L25: 0220 E6A0 ( cow-glider.s):00309 ldb ,y+ 0222 C120 ( cow-glider.s):00310 cmpb #32 ;cmpqi: 0224 2722 ( cow-glider.s):00311 beq L24 0226 1F30 ( cow-glider.s):00312 tfr u,d ;movlsbqihi: R:u -> R:b 0228 E764 ( cow-glider.s):00313 stb 4,s 022A E665 ( cow-glider.s):00314 ldb 5,s 022C EB64 ( cow-glider.s):00315 addb 4,s 022E E764 ( cow-glider.s):00316 stb 4,s 0230 E66E ( cow-glider.s):00317 ldb 14,s 0232 3404 ( cow-glider.s):00318 pshs b 0234 EC61 ( cow-glider.s):00319 ldd 1,s 0236 E767 ( cow-glider.s):00320 stb 7,s ;movlsbqihi: R:d -> 7,s 0238 E66E ( cow-glider.s):00321 ldb 14,s 023A EB67 ( cow-glider.s):00322 addb 7,s 023C 3404 ( cow-glider.s):00323 pshs b 023E E666 ( cow-glider.s):00324 ldb 6,s 0240 8E3400 ( cow-glider.s):00325 ldx #13312 0243 BD0000 ( cow-glider.s):00326 jsr _PMode1DrawSpot 0246 3262 ( cow-glider.s):00327 leas 2,s 0248 ( cow-glider.s):00328 L24: 0248 3341 ( cow-glider.s):00329 leau 1,u 024A 11830003 ( cow-glider.s):00330 cmpu #3 ;cmphi: 024E 26D0 ( cow-glider.s):00331 bne L25 0250 EC62 ( cow-glider.s):00332 ldd 2,s 0252 C30003 ( cow-glider.s):00333 addd #3 0255 ED62 ( cow-glider.s):00334 std 2,s 0257 ECE4 ( cow-glider.s):00335 ldd ,s 0259 C30001 ( cow-glider.s):00336 addd #1 025C EDE4 ( cow-glider.s):00337 std ,s 025E 10830005 ( cow-glider.s):00338 cmpd #5 ;cmphi: 0262 2708 ( cow-glider.s):00339 beq L22 0264 ( cow-glider.s):00340 L23: 0264 10AE62 ( cow-glider.s):00341 ldy 2,s 0267 CE0000 ( cow-glider.s):00342 ldu #0 026A 20B4 ( cow-glider.s):00343 bra L25 026C ( cow-glider.s):00344 L22: 026C 3267 ( cow-glider.s):00345 leas 7,s 026E 35E0 ( cow-glider.s):00346 puls y,u,pc 0270 ( cow-glider.s):00347 _PMode1DrawDecimal3x5Unsigned.constprop.7: 0270 3440 ( cow-glider.s):00348 pshs u 0272 3278 ( cow-glider.s):00349 leas -8,s 0274 E764 ( cow-glider.s):00350 stb 4,s 0276 AF61 ( cow-glider.s):00351 stx 1,s 0278 6FE4 ( cow-glider.s):00352 clr ,s 027A 1F10 ( cow-glider.s):00353 tfr x,d 027C 2005 ( cow-glider.s):00354 bra L29 027E ( cow-glider.s):00355 L30: 027E 6CE4 ( cow-glider.s):00356 inc ,s 0280 C3D8F0 ( cow-glider.s):00357 addd #-10000 0283 ( cow-glider.s):00358 L29: 0283 1083270F ( cow-glider.s):00359 cmpd #9999 ;cmphi: 0287 22F5 ( cow-glider.s):00360 bhi L30 0289 ED61 ( cow-glider.s):00361 std 1,s 028B 6F65 ( cow-glider.s):00362 clr 5,s 028D EC61 ( cow-glider.s):00363 ldd 1,s 028F 2005 ( cow-glider.s):00364 bra L31 0291 ( cow-glider.s):00365 L32: 0291 6C65 ( cow-glider.s):00366 inc 5,s 0293 C3FC18 ( cow-glider.s):00367 addd #-1000 0296 ( cow-glider.s):00368 L31: 0296 108303E7 ( cow-glider.s):00369 cmpd #999 ;cmphi: 029A 22F5 ( cow-glider.s):00370 bhi L32 029C ED61 ( cow-glider.s):00371 std 1,s 029E 6F66 ( cow-glider.s):00372 clr 6,s 02A0 EC61 ( cow-glider.s):00373 ldd 1,s 02A2 2005 ( cow-glider.s):00374 bra L33 02A4 ( cow-glider.s):00375 L34: 02A4 6C66 ( cow-glider.s):00376 inc 6,s 02A6 C3FF9C ( cow-glider.s):00377 addd #-100 02A9 ( cow-glider.s):00378 L33: 02A9 10830063 ( cow-glider.s):00379 cmpd #99 ;cmphi: 02AD 22F5 ( cow-glider.s):00380 bhi L34 02AF ED61 ( cow-glider.s):00381 std 1,s 02B1 6F67 ( cow-glider.s):00382 clr 7,s 02B3 EC61 ( cow-glider.s):00383 ldd 1,s 02B5 2005 ( cow-glider.s):00384 bra L35 02B7 ( cow-glider.s):00385 L36: 02B7 6C67 ( cow-glider.s):00386 inc 7,s 02B9 C3FFF6 ( cow-glider.s):00387 addd #-10 02BC ( cow-glider.s):00388 L35: 02BC 10830009 ( cow-glider.s):00389 cmpd #9 ;cmphi: 02C0 22F5 ( cow-glider.s):00390 bhi L36 02C2 ED61 ( cow-glider.s):00391 std 1,s 02C4 E6E4 ( cow-glider.s):00392 ldb ,s 02C6 2719 ( cow-glider.s):00393 beq L48 02C8 3404 ( cow-glider.s):00394 pshs b 02CA E66D ( cow-glider.s):00395 ldb 13,s 02CC 3404 ( cow-glider.s):00396 pshs b 02CE E666 ( cow-glider.s):00397 ldb 6,s 02D0 3404 ( cow-glider.s):00398 pshs b 02D2 C668 ( cow-glider.s):00399 ldb #104 02D4 BD0000 ( cow-glider.s):00400 jsr _PMode1DrawDigit3x5.constprop.6 02D7 3263 ( cow-glider.s):00401 leas 3,s 02D9 C601 ( cow-glider.s):00402 ldb #1 02DB E763 ( cow-glider.s):00403 stb 3,s 02DD C668 ( cow-glider.s):00404 ldb #104 02DF 2004 ( cow-glider.s):00405 bra L49 02E1 ( cow-glider.s):00406 L48: 02E1 6F63 ( cow-glider.s):00407 clr 3,s 02E3 C6FF ( cow-glider.s):00408 ldb #-1 02E5 ( cow-glider.s):00409 L49: 02E5 E7E4 ( cow-glider.s):00410 stb ,s 02E7 E665 ( cow-glider.s):00411 ldb 5,s 02E9 2604 ( cow-glider.s):00412 bne L38 02EB E663 ( cow-glider.s):00413 ldb 3,s 02ED 2729 ( cow-glider.s):00414 beq L39 02EF ( cow-glider.s):00415 L38: 02EF E665 ( cow-glider.s):00416 ldb 5,s 02F1 3404 ( cow-glider.s):00417 pshs b 02F3 E66D ( cow-glider.s):00418 ldb 13,s 02F5 3404 ( cow-glider.s):00419 pshs b 02F7 E666 ( cow-glider.s):00420 ldb 6,s 02F9 3404 ( cow-glider.s):00421 pshs b 02FB C66C ( cow-glider.s):00422 ldb #108 02FD BD0000 ( cow-glider.s):00423 jsr _PMode1DrawDigit3x5.constprop.6 0300 E663 ( cow-glider.s):00424 ldb 3,s 0302 4F ( cow-glider.s):00425 clra ;zero_extendqihi: R:b -> R:d 0303 1F03 ( cow-glider.s):00426 tfr d,u 0305 3263 ( cow-glider.s):00427 leas 3,s 0307 1083006C ( cow-glider.s):00428 cmpd #108 ;cmphi: 030B 2F03 ( cow-glider.s):00429 ble L40 030D CE006C ( cow-glider.s):00430 ldu #108 0310 ( cow-glider.s):00431 L40: 0310 1F30 ( cow-glider.s):00432 tfr u,d ;movlsbqihi: R:u -> R:b 0312 E7E4 ( cow-glider.s):00433 stb ,s 0314 C601 ( cow-glider.s):00434 ldb #1 0316 E763 ( cow-glider.s):00435 stb 3,s 0318 ( cow-glider.s):00436 L39: 0318 E666 ( cow-glider.s):00437 ldb 6,s 031A 2604 ( cow-glider.s):00438 bne L41 031C E663 ( cow-glider.s):00439 ldb 3,s 031E 2729 ( cow-glider.s):00440 beq L42 0320 ( cow-glider.s):00441 L41: 0320 E666 ( cow-glider.s):00442 ldb 6,s 0322 3404 ( cow-glider.s):00443 pshs b 0324 E66D ( cow-glider.s):00444 ldb 13,s 0326 3404 ( cow-glider.s):00445 pshs b 0328 E666 ( cow-glider.s):00446 ldb 6,s 032A 3404 ( cow-glider.s):00447 pshs b 032C C670 ( cow-glider.s):00448 ldb #112 032E BD0000 ( cow-glider.s):00449 jsr _PMode1DrawDigit3x5.constprop.6 0331 E663 ( cow-glider.s):00450 ldb 3,s 0333 4F ( cow-glider.s):00451 clra ;zero_extendqihi: R:b -> R:d 0334 1F03 ( cow-glider.s):00452 tfr d,u 0336 3263 ( cow-glider.s):00453 leas 3,s 0338 10830070 ( cow-glider.s):00454 cmpd #112 ;cmphi: 033C 2F03 ( cow-glider.s):00455 ble L43 033E CE0070 ( cow-glider.s):00456 ldu #112 0341 ( cow-glider.s):00457 L43: 0341 1F30 ( cow-glider.s):00458 tfr u,d ;movlsbqihi: R:u -> R:b 0343 E7E4 ( cow-glider.s):00459 stb ,s 0345 C601 ( cow-glider.s):00460 ldb #1 0347 E763 ( cow-glider.s):00461 stb 3,s 0349 ( cow-glider.s):00462 L42: 0349 E667 ( cow-glider.s):00463 ldb 7,s 034B 2604 ( cow-glider.s):00464 bne L44 034D E663 ( cow-glider.s):00465 ldb 3,s 034F 2725 ( cow-glider.s):00466 beq L45 0351 ( cow-glider.s):00467 L44: 0351 E667 ( cow-glider.s):00468 ldb 7,s 0353 3404 ( cow-glider.s):00469 pshs b 0355 E66D ( cow-glider.s):00470 ldb 13,s 0357 3404 ( cow-glider.s):00471 pshs b 0359 E666 ( cow-glider.s):00472 ldb 6,s 035B 3404 ( cow-glider.s):00473 pshs b 035D C674 ( cow-glider.s):00474 ldb #116 035F BD0000 ( cow-glider.s):00475 jsr _PMode1DrawDigit3x5.constprop.6 0362 E663 ( cow-glider.s):00476 ldb 3,s 0364 4F ( cow-glider.s):00477 clra ;zero_extendqihi: R:b -> R:d 0365 1F03 ( cow-glider.s):00478 tfr d,u 0367 3263 ( cow-glider.s):00479 leas 3,s 0369 10830074 ( cow-glider.s):00480 cmpd #116 ;cmphi: 036D 2F03 ( cow-glider.s):00481 ble L46 036F CE0074 ( cow-glider.s):00482 ldu #116 0372 ( cow-glider.s):00483 L46: 0372 1F30 ( cow-glider.s):00484 tfr u,d ;movlsbqihi: R:u -> R:b 0374 E7E4 ( cow-glider.s):00485 stb ,s 0376 ( cow-glider.s):00486 L45: 0376 E662 ( cow-glider.s):00487 ldb 2,s ;movlsbqihi: msb:1,s -> R:b 0378 3404 ( cow-glider.s):00488 pshs b 037A E66D ( cow-glider.s):00489 ldb 13,s 037C 3404 ( cow-glider.s):00490 pshs b 037E E666 ( cow-glider.s):00491 ldb 6,s 0380 3404 ( cow-glider.s):00492 pshs b 0382 C678 ( cow-glider.s):00493 ldb #120 0384 BD0000 ( cow-glider.s):00494 jsr _PMode1DrawDigit3x5.constprop.6 0387 E663 ( cow-glider.s):00495 ldb 3,s 0389 4F ( cow-glider.s):00496 clra ;zero_extendqihi: R:b -> R:d 038A 1F01 ( cow-glider.s):00497 tfr d,x 038C 3263 ( cow-glider.s):00498 leas 3,s 038E 10830078 ( cow-glider.s):00499 cmpd #120 ;cmphi: 0392 2F03 ( cow-glider.s):00500 ble L47 0394 8E0078 ( cow-glider.s):00501 ldx #120 0397 ( cow-glider.s):00502 L47: 0397 1F10 ( cow-glider.s):00503 tfr x,d ;movlsbqihi: R:x -> R:b 0399 3268 ( cow-glider.s):00504 leas 8,s 039B 35C0 ( cow-glider.s):00505 puls u,pc 039D ( cow-glider.s):00506 _PMode1DrawDecimal3x5.constprop.5: 039D 327C ( cow-glider.s):00507 leas -4,s 039F E7E4 ( cow-glider.s):00508 stb ,s 03A1 E666 ( cow-glider.s):00509 ldb 6,s 03A3 E761 ( cow-glider.s):00510 stb 1,s 03A5 8C0000 ( cow-glider.s):00511 cmpx #0 ;cmphi: 03A8 102C0058 ( cow-glider.s):00512 lbge L51 03AC 1E01 ( cow-glider.s):00513 exg d,x 03AE 40 ( cow-glider.s):00514 nega 03AF 50 ( cow-glider.s):00515 negb 03B0 8200 ( cow-glider.s):00516 sbca #0 03B2 1E01 ( cow-glider.s):00517 exg d,x 03B4 3404 ( cow-glider.s):00518 pshs b 03B6 E661 ( cow-glider.s):00519 ldb 1,s 03B8 BD0000 ( cow-glider.s):00520 jsr _PMode1DrawDecimal3x5Unsigned.constprop.7 03BB E763 ( cow-glider.s):00521 stb 3,s 03BD 6C61 ( cow-glider.s):00522 inc 1,s 03BF E663 ( cow-glider.s):00523 ldb 3,s 03C1 CBFE ( cow-glider.s):00524 addb #-2 03C3 E764 ( cow-glider.s):00525 stb 4,s 03C5 E662 ( cow-glider.s):00526 ldb 2,s 03C7 3404 ( cow-glider.s):00527 pshs b 03C9 E662 ( cow-glider.s):00528 ldb 2,s 03CB 3404 ( cow-glider.s):00529 pshs b 03CD E666 ( cow-glider.s):00530 ldb 6,s 03CF 8E3400 ( cow-glider.s):00531 ldx #13312 03D2 BD0000 ( cow-glider.s):00532 jsr _PMode1DrawSpot 03D5 E665 ( cow-glider.s):00533 ldb 5,s 03D7 CBFD ( cow-glider.s):00534 addb #-3 03D9 E766 ( cow-glider.s):00535 stb 6,s 03DB E664 ( cow-glider.s):00536 ldb 4,s 03DD 3404 ( cow-glider.s):00537 pshs b 03DF E664 ( cow-glider.s):00538 ldb 4,s 03E1 3404 ( cow-glider.s):00539 pshs b 03E3 E668 ( cow-glider.s):00540 ldb 8,s 03E5 8E3400 ( cow-glider.s):00541 ldx #13312 03E8 BD0000 ( cow-glider.s):00542 jsr _PMode1DrawSpot 03EB E667 ( cow-glider.s):00543 ldb 7,s 03ED CBFC ( cow-glider.s):00544 addb #-4 03EF E767 ( cow-glider.s):00545 stb 7,s 03F1 E666 ( cow-glider.s):00546 ldb 6,s 03F3 3404 ( cow-glider.s):00547 pshs b 03F5 E666 ( cow-glider.s):00548 ldb 6,s 03F7 3404 ( cow-glider.s):00549 pshs b 03F9 E669 ( cow-glider.s):00550 ldb 9,s 03FB 8E3400 ( cow-glider.s):00551 ldx #13312 03FE BD0000 ( cow-glider.s):00552 jsr _PMode1DrawSpot 0401 326B ( cow-glider.s):00553 leas 11,s 0403 39 ( cow-glider.s):00554 rts 0404 ( cow-glider.s):00555 L51: 0404 E661 ( cow-glider.s):00556 ldb 1,s 0406 E766 ( cow-glider.s):00557 stb 6,s 0408 E6E4 ( cow-glider.s):00558 ldb ,s 040A 3264 ( cow-glider.s):00559 leas 4,s 040C 7E0000 ( cow-glider.s):00560 jmp _PMode1DrawDecimal3x5Unsigned.constprop.7 040F ( cow-glider.s):00561 _DrawScores: 040F 3440 ( cow-glider.s):00562 pshs u 0411 327B ( cow-glider.s):00563 leas -5,s 0413 C602 ( cow-glider.s):00564 ldb #2 0415 E764 ( cow-glider.s):00565 stb 4,s 0417 6F63 ( cow-glider.s):00566 clr 3,s 0419 7E0000 ( cow-glider.s):00567 jmp L54 041C ( cow-glider.s):00568 L59: 041C CE0000 ( cow-glider.s):00569 ldu #0 041F ( cow-glider.s):00570 L56: 041F 1F30 ( cow-glider.s):00571 tfr u,d ;movlsbqihi: R:u -> R:b 0421 E762 ( cow-glider.s):00572 stb 2,s 0423 E664 ( cow-glider.s):00573 ldb 4,s 0425 EB62 ( cow-glider.s):00574 addb 2,s 0427 E762 ( cow-glider.s):00575 stb 2,s 0429 C664 ( cow-glider.s):00576 ldb #100 042B E7E4 ( cow-glider.s):00577 stb ,s 042D ( cow-glider.s):00578 L55: 042D 6FE2 ( cow-glider.s):00579 clr ,-s 042F E663 ( cow-glider.s):00580 ldb 3,s 0431 3404 ( cow-glider.s):00581 pshs b 0433 E662 ( cow-glider.s):00582 ldb 2,s 0435 8E3400 ( cow-glider.s):00583 ldx #13312 0438 BD0000 ( cow-glider.s):00584 jsr _PMode1DrawSpot 043B 6C62 ( cow-glider.s):00585 inc 2,s 043D 3262 ( cow-glider.s):00586 leas 2,s 043F E6E4 ( cow-glider.s):00587 ldb ,s 0441 C17C ( cow-glider.s):00588 cmpb #124 ;cmpqi: 0443 26E8 ( cow-glider.s):00589 bne L55 0445 3341 ( cow-glider.s):00590 leau 1,u 0447 11830005 ( cow-glider.s):00591 cmpu #5 ;cmphi: 044B 26D2 ( cow-glider.s):00592 bne L56 044D C603 ( cow-glider.s):00593 ldb #3 044F E762 ( cow-glider.s):00594 stb 2,s 0451 E663 ( cow-glider.s):00595 ldb 3,s 0453 F1060C ( cow-glider.s):00596 cmpb _gScore+1 ;cmpqi: 0456 2604 ( cow-glider.s):00597 bne L57 0458 C602 ( cow-glider.s):00598 ldb #2 045A E762 ( cow-glider.s):00599 stb 2,s 045C ( cow-glider.s):00600 L57: 045C E663 ( cow-glider.s):00601 ldb 3,s 045E 4F ( cow-glider.s):00602 clra ;zero_extendqihi: R:b -> R:d 045F EDE4 ( cow-glider.s):00603 std ,s 0461 58 ( cow-glider.s):00604 aslb 0462 49 ( cow-glider.s):00605 rola 0463 1F03 ( cow-glider.s):00606 tfr d,u 0465 30C9061F ( cow-glider.s):00607 leax _gScore+20,u 0469 AE84 ( cow-glider.s):00608 ldx ,x 046B E662 ( cow-glider.s):00609 ldb 2,s 046D 3404 ( cow-glider.s):00610 pshs b 046F E665 ( cow-glider.s):00611 ldb 5,s 0471 BD0000 ( cow-glider.s):00612 jsr _PMode1DrawDecimal3x5.constprop.5 0474 6C64 ( cow-glider.s):00613 inc 4,s 0476 E665 ( cow-glider.s):00614 ldb 5,s 0478 CB07 ( cow-glider.s):00615 addb #7 047A E765 ( cow-glider.s):00616 stb 5,s 047C 3261 ( cow-glider.s):00617 leas 1,s 047E ( cow-glider.s):00618 L54: 047E E663 ( cow-glider.s):00619 ldb 3,s 0480 F1060B ( cow-glider.s):00620 cmpb _gScore ;cmpqi: 0483 1025FF95 ( cow-glider.s):00621 lblo L59 0487 3265 ( cow-glider.s):00622 leas 5,s 0489 35C0 ( cow-glider.s):00623 puls u,pc 048B ( cow-glider.s):00624 _loop: 048B 3460 ( cow-glider.s):00625 pshs y,u 048D 3278 ( cow-glider.s):00626 leas -8,s 048F BD0757 ( cow-glider.s):00627 jsr _gReceiveCast64 0492 3384 ( cow-glider.s):00628 leau ,x 0494 8C0000 ( cow-glider.s):00629 cmpx #0 ;cmphi: 0497 2742 ( cow-glider.s):00630 beq L63 0499 E602 ( cow-glider.s):00631 ldb 2,x 049B C101 ( cow-glider.s):00632 cmpb #1 ;cmpqi: 049D 2706 ( cow-glider.s):00633 beq L65 049F C102 ( cow-glider.s):00634 cmpb #2 ;cmpqi: 04A1 2633 ( cow-glider.s):00635 bne L64 04A3 2024 ( cow-glider.s):00636 bra L105 04A5 ( cow-glider.s):00637 L65: 04A5 E684 ( cow-glider.s):00638 ldb ,x 04A7 F1060C ( cow-glider.s):00639 cmpb _gScore+1 ;cmpqi: 04AA 272A ( cow-glider.s):00640 beq L64 04AC 4F ( cow-glider.s):00641 clra ;zero_extendqihi: R:b -> R:d 04AD 58 ( cow-glider.s):00642 aslb 04AE 49 ( cow-glider.s):00643 rola 04AF 58 ( cow-glider.s):00644 aslb 04B0 49 ( cow-glider.s):00645 rola 04B1 58 ( cow-glider.s):00646 aslb 04B2 49 ( cow-glider.s):00647 rola 04B3 108E0000 ( cow-glider.s):00648 ldy #_ShipState 04B7 30AB ( cow-glider.s):00649 leax d,y 04B9 CC0008 ( cow-glider.s):00650 ldd #8 04BC EDE3 ( cow-glider.s):00651 std ,--s 04BE 3143 ( cow-glider.s):00652 leay 3,u 04C0 3420 ( cow-glider.s):00653 pshs y 04C2 BD08D0 ( cow-glider.s):00654 jsr _memcpy 04C5 3264 ( cow-glider.s):00655 leas 4,s 04C7 200D ( cow-glider.s):00656 bra L64 04C9 ( cow-glider.s):00657 L105: 04C9 E603 ( cow-glider.s):00658 ldb 3,x 04CB 4F ( cow-glider.s):00659 clra ;zero_extendqihi: R:b -> R:d 04CC ED63 ( cow-glider.s):00660 std 3,s 04CE 58 ( cow-glider.s):00661 aslb 04CF 49 ( cow-glider.s):00662 rola 04D0 1F01 ( cow-glider.s):00663 tfr d,x 04D2 6F890000 ( cow-glider.s):00664 clr _Cows,x 04D6 ( cow-glider.s):00665 L64: 04D6 30C4 ( cow-glider.s):00666 leax ,u 04D8 BD06EA ( cow-glider.s):00667 jsr _gFree64 04DB ( cow-glider.s):00668 L63: 04DB F60021 ( cow-glider.s):00669 ldb _gMono+1 04DE F10000 ( cow-glider.s):00670 cmpb _decis ;cmpqi: 04E1 10270268 ( cow-glider.s):00671 lbeq L62 04E5 F60021 ( cow-glider.s):00672 ldb _gMono+1 04E8 F70000 ( cow-glider.s):00673 stb _decis 04EB 10260074 ( cow-glider.s):00674 lbne L68 04EF 7F0000 ( cow-glider.s):00675 clr _Packet+1 04F2 C601 ( cow-glider.s):00676 ldb #1 04F4 F70000 ( cow-glider.s):00677 stb _Packet+2 04F7 CC0008 ( cow-glider.s):00678 ldd #8 04FA EDE3 ( cow-glider.s):00679 std ,--s 04FC BE0000 ( cow-glider.s):00680 ldx _my 04FF AFE3 ( cow-glider.s):00681 stx ,--s 0501 8E0000 ( cow-glider.s):00682 ldx #_Packet+3 0504 BD08D0 ( cow-glider.s):00683 jsr _memcpy 0507 C609 ( cow-glider.s):00684 ldb #9 0509 8E0000 ( cow-glider.s):00685 ldx #_Packet 050C BD0CD5 ( cow-glider.s):00686 jsr _gSendCast 050F FC0000 ( cow-glider.s):00687 ldd _start_seconds 0512 C300C8 ( cow-glider.s):00688 addd #200 0515 B30022 ( cow-glider.s):00689 subd _gMono+2 ;subhi: R:d -= _gMono+2 0518 1F03 ( cow-glider.s):00690 tfr d,u 051A 3264 ( cow-glider.s):00691 leas 4,s 051C C658 ( cow-glider.s):00692 ldb #88 051E E762 ( cow-glider.s):00693 stb 2,s 0520 1183FDE8 ( cow-glider.s):00694 cmpu #-536 ;cmphi: 0524 2309 ( cow-glider.s):00695 bls L94 0526 ( cow-glider.s):00696 L95: 0526 F60657 ( cow-glider.s):00697 ldb _gKern+7 0529 26FB ( cow-glider.s):00698 bne L95 052B C658 ( cow-glider.s):00699 ldb #88 052D E762 ( cow-glider.s):00700 stb 2,s 052F ( cow-glider.s):00701 L94: 052F C664 ( cow-glider.s):00702 ldb #100 0531 E763 ( cow-glider.s):00703 stb 3,s 0533 ( cow-glider.s):00704 L71: 0533 6FE2 ( cow-glider.s):00705 clr ,-s 0535 E663 ( cow-glider.s):00706 ldb 3,s 0537 3404 ( cow-glider.s):00707 pshs b 0539 E665 ( cow-glider.s):00708 ldb 5,s 053B 8E3400 ( cow-glider.s):00709 ldx #13312 053E BD0000 ( cow-glider.s):00710 jsr _PMode1DrawSpot 0541 6C65 ( cow-glider.s):00711 inc 5,s 0543 3262 ( cow-glider.s):00712 leas 2,s 0545 E663 ( cow-glider.s):00713 ldb 3,s 0547 C17C ( cow-glider.s):00714 cmpb #124 ;cmpqi: 0549 26E8 ( cow-glider.s):00715 bne L71 054B 6C62 ( cow-glider.s):00716 inc 2,s 054D E662 ( cow-glider.s):00717 ldb 2,s 054F C15D ( cow-glider.s):00718 cmpb #93 ;cmpqi: 0551 26DC ( cow-glider.s):00719 bne L94 0553 C601 ( cow-glider.s):00720 ldb #1 0555 E7E2 ( cow-glider.s):00721 stb ,-s 0557 30C4 ( cow-glider.s):00722 leax ,u 0559 C658 ( cow-glider.s):00723 ldb #88 055B BD0000 ( cow-glider.s):00724 jsr _PMode1DrawDecimal3x5.constprop.5 055E 3261 ( cow-glider.s):00725 leas 1,s 0560 7E0000 ( cow-glider.s):00726 jmp L72 0563 ( cow-glider.s):00727 L68: 0563 CE0000 ( cow-glider.s):00728 ldu #0 0566 F60656 ( cow-glider.s):00729 ldb _gKern+6 0569 102700CC ( cow-glider.s):00730 lbeq L72 056D 8E0008 ( cow-glider.s):00731 ldx #8 0570 AF63 ( cow-glider.s):00732 stx 3,s 0572 C601 ( cow-glider.s):00733 ldb #1 0574 E762 ( cow-glider.s):00734 stb 2,s 0576 ( cow-glider.s):00735 L75: ( cow-glider.s):00736 ;----- asm ----- ( cow-glider.s):00737 ; 67 "../../nekotos/lib/keyscan_arrows_0to7.h" 1 0576 1A10 ( cow-glider.s):00738 orcc #$10 ( cow-glider.s):00739 ;--- end asm --- 0578 E662 ( cow-glider.s):00740 ldb 2,s 057A 53 ( cow-glider.s):00741 comb 057B F7FF02 ( cow-glider.s):00742 stb -254 057E F6FF00 ( cow-glider.s):00743 ldb -256 ( cow-glider.s):00744 ;----- asm ----- ( cow-glider.s):00745 ; 70 "../../nekotos/lib/keyscan_arrows_0to7.h" 1 0581 1CEF ( cow-glider.s):00746 andcc #^$10 ( cow-glider.s):00747 ;--- end asm --- 0583 4F ( cow-glider.s):00748 clra ;zero_extendqihi: R:b -> R:d 0584 1F01 ( cow-glider.s):00749 tfr d,x 0586 8400 ( cow-glider.s):00750 anda #0 0588 C408 ( cow-glider.s):00751 andb #8 058A 1F02 ( cow-glider.s):00752 tfr d,y 058C 108C0000 ( cow-glider.s):00753 cmpy #0 ;cmphi: 0590 261A ( cow-glider.s):00754 bne L73 0592 1F30 ( cow-glider.s):00755 tfr u,d 0594 1F89 ( cow-glider.s):00756 tfr a,b 0596 4F ( cow-glider.s):00757 clra ;zero_extendqihi: R:b -> R:d 0597 EA62 ( cow-glider.s):00758 orb 2,s 0599 1F98 ( cow-glider.s):00759 tfr b,a 059B 5F ( cow-glider.s):00760 clrb 059C 1F02 ( cow-glider.s):00761 tfr d,y 059E 1F30 ( cow-glider.s):00762 tfr u,d 05A0 8400 ( cow-glider.s):00763 anda #0 05A2 C4FF ( cow-glider.s):00764 andb #255 05A4 3420 ( cow-glider.s):00765 pshs y 05A6 AAE0 ( cow-glider.s):00766 ora ,s+ 05A8 EAE0 ( cow-glider.s):00767 orb ,s+ 05AA 1F03 ( cow-glider.s):00768 tfr d,u 05AC ( cow-glider.s):00769 L73: 05AC 1F10 ( cow-glider.s):00770 tfr x,d 05AE 8400 ( cow-glider.s):00771 anda #0 05B0 C410 ( cow-glider.s):00772 andb #16 05B2 1F01 ( cow-glider.s):00773 tfr d,x 05B4 8C0000 ( cow-glider.s):00774 cmpx #0 ;cmphi: 05B7 2615 ( cow-glider.s):00775 bne L74 05B9 1F30 ( cow-glider.s):00776 tfr u,d ;movlsbqihi: R:u -> R:b 05BB EA62 ( cow-glider.s):00777 orb 2,s 05BD 4F ( cow-glider.s):00778 clra ;zero_extendqihi: R:b -> R:d 05BE 1F01 ( cow-glider.s):00779 tfr d,x 05C0 1F30 ( cow-glider.s):00780 tfr u,d 05C2 84FF ( cow-glider.s):00781 anda #255 05C4 C400 ( cow-glider.s):00782 andb #0 05C6 3410 ( cow-glider.s):00783 pshs x 05C8 AAE0 ( cow-glider.s):00784 ora ,s+ 05CA EAE0 ( cow-glider.s):00785 orb ,s+ 05CC 1F03 ( cow-glider.s):00786 tfr d,u 05CE ( cow-glider.s):00787 L74: 05CE 6862 ( cow-glider.s):00788 asl 2,s 05D0 EC63 ( cow-glider.s):00789 ldd 3,s 05D2 C3FFFF ( cow-glider.s):00790 addd #-1 05D5 ED63 ( cow-glider.s):00791 std 3,s 05D7 269D ( cow-glider.s):00792 bne L75 05D9 11830000 ( cow-glider.s):00793 cmpu #0 ;cmphi: 05DD 275A ( cow-glider.s):00794 beq L72 05DF 1F30 ( cow-glider.s):00795 tfr u,d 05E1 8420 ( cow-glider.s):00796 anda #32 05E3 C400 ( cow-glider.s):00797 andb #0 05E5 10830000 ( cow-glider.s):00798 cmpd #0 ;cmphi: 05E9 270A ( cow-glider.s):00799 beq L76 05EB BE0000 ( cow-glider.s):00800 ldx _my 05EE EC04 ( cow-glider.s):00801 ldd 4,x 05F0 C3FFF0 ( cow-glider.s):00802 addd #-16 05F3 ED04 ( cow-glider.s):00803 std 4,x 05F5 ( cow-glider.s):00804 L76: 05F5 1F30 ( cow-glider.s):00805 tfr u,d 05F7 8440 ( cow-glider.s):00806 anda #64 05F9 C400 ( cow-glider.s):00807 andb #0 05FB 10830000 ( cow-glider.s):00808 cmpd #0 ;cmphi: 05FF 270A ( cow-glider.s):00809 beq L77 0601 BE0000 ( cow-glider.s):00810 ldx _my 0604 EC04 ( cow-glider.s):00811 ldd 4,x 0606 C30010 ( cow-glider.s):00812 addd #16 0609 ED04 ( cow-glider.s):00813 std 4,x 060B ( cow-glider.s):00814 L77: 060B 1F30 ( cow-glider.s):00815 tfr u,d 060D 8408 ( cow-glider.s):00816 anda #8 060F C400 ( cow-glider.s):00817 andb #0 0611 10830000 ( cow-glider.s):00818 cmpd #0 ;cmphi: 0615 270A ( cow-glider.s):00819 beq L78 0617 BE0000 ( cow-glider.s):00820 ldx _my 061A EC06 ( cow-glider.s):00821 ldd 6,x 061C C3FFF0 ( cow-glider.s):00822 addd #-16 061F ED06 ( cow-glider.s):00823 std 6,x 0621 ( cow-glider.s):00824 L78: 0621 1F30 ( cow-glider.s):00825 tfr u,d 0623 8410 ( cow-glider.s):00826 anda #16 0625 C400 ( cow-glider.s):00827 andb #0 0627 1F03 ( cow-glider.s):00828 tfr d,u 0629 11830000 ( cow-glider.s):00829 cmpu #0 ;cmphi: 062D 270A ( cow-glider.s):00830 beq L72 062F BE0000 ( cow-glider.s):00831 ldx _my 0632 EC06 ( cow-glider.s):00832 ldd 6,x 0634 C30010 ( cow-glider.s):00833 addd #16 0637 ED06 ( cow-glider.s):00834 std 6,x 0639 ( cow-glider.s):00835 L72: 0639 F6060B ( cow-glider.s):00836 ldb _gScore 063C E762 ( cow-glider.s):00837 stb 2,s 063E 108E0000 ( cow-glider.s):00838 ldy #0 0642 2054 ( cow-glider.s):00839 bra L79 0644 ( cow-glider.s):00840 L88: 0644 1F20 ( cow-glider.s):00841 tfr y,d 0646 58 ( cow-glider.s):00842 aslb 0647 49 ( cow-glider.s):00843 rola 0648 58 ( cow-glider.s):00844 aslb 0649 49 ( cow-glider.s):00845 rola 064A 58 ( cow-glider.s):00846 aslb 064B 49 ( cow-glider.s):00847 rola 064C 1F03 ( cow-glider.s):00848 tfr d,u 064E 30C90000 ( cow-glider.s):00849 leax _ShipState,u 0652 EC84 ( cow-glider.s):00850 ldd ,x 0654 E304 ( cow-glider.s):00851 addd 4,x 0656 ED84 ( cow-glider.s):00852 std ,x 0658 EC02 ( cow-glider.s):00853 ldd 2,x 065A E306 ( cow-glider.s):00854 addd 6,x 065C ED02 ( cow-glider.s):00855 std 2,x 065E 2006 ( cow-glider.s):00856 bra L80 0660 ( cow-glider.s):00857 L81: 0660 33C96000 ( cow-glider.s):00858 leau 24576,u 0664 EF84 ( cow-glider.s):00859 stu ,x 0666 ( cow-glider.s):00860 L80: 0666 EE84 ( cow-glider.s):00861 ldu ,x 0668 2BF6 ( cow-glider.s):00862 bmi L81 066A 2006 ( cow-glider.s):00863 bra L101 066C ( cow-glider.s):00864 L83: 066C 33C96000 ( cow-glider.s):00865 leau 24576,u 0670 EF02 ( cow-glider.s):00866 stu 2,x 0672 ( cow-glider.s):00867 L101: 0672 EE02 ( cow-glider.s):00868 ldu 2,x 0674 2BF6 ( cow-glider.s):00869 bmi L83 0676 2006 ( cow-glider.s):00870 bra L102 0678 ( cow-glider.s):00871 L85: 0678 33C9A000 ( cow-glider.s):00872 leau -24576,u 067C EF84 ( cow-glider.s):00873 stu ,x 067E ( cow-glider.s):00874 L102: 067E EE84 ( cow-glider.s):00875 ldu ,x 0680 11835FFF ( cow-glider.s):00876 cmpu #24575 ;cmphi: 0684 2EF2 ( cow-glider.s):00877 bgt L85 0686 2006 ( cow-glider.s):00878 bra L103 0688 ( cow-glider.s):00879 L87: 0688 33C9A000 ( cow-glider.s):00880 leau -24576,u 068C EF02 ( cow-glider.s):00881 stu 2,x 068E ( cow-glider.s):00882 L103: 068E EE02 ( cow-glider.s):00883 ldu 2,x 0690 11835FFF ( cow-glider.s):00884 cmpu #24575 ;cmphi: 0694 2EF2 ( cow-glider.s):00885 bgt L87 0696 3121 ( cow-glider.s):00886 leay 1,y 0698 ( cow-glider.s):00887 L79: 0698 1F20 ( cow-glider.s):00888 tfr y,d ;movlsbqihi: R:y -> R:b 069A E763 ( cow-glider.s):00889 stb 3,s 069C E662 ( cow-glider.s):00890 ldb 2,s 069E E163 ( cow-glider.s):00891 cmpb 3,s ;cmpqi: 06A0 1022FFA0 ( cow-glider.s):00892 lbhi L88 06A4 BD0000 ( cow-glider.s):00893 jsr _XorOldShips 06A7 CC0040 ( cow-glider.s):00894 ldd #64 06AA EDE3 ( cow-glider.s):00895 std ,--s 06AC 8E0000 ( cow-glider.s):00896 ldx #_ShipState 06AF AFE3 ( cow-glider.s):00897 stx ,--s 06B1 8E0000 ( cow-glider.s):00898 ldx #_OldShipState 06B4 BD08D0 ( cow-glider.s):00899 jsr _memcpy 06B7 BD0000 ( cow-glider.s):00900 jsr _XorOldShips 06BA BE0000 ( cow-glider.s):00901 ldx _my 06BD E602 ( cow-glider.s):00902 ldb 2,x 06BF E76A ( cow-glider.s):00903 stb 10,s 06C1 E684 ( cow-glider.s):00904 ldb ,x 06C3 E76B ( cow-glider.s):00905 stb 11,s 06C5 CE0000 ( cow-glider.s):00906 ldu #_Cows 06C8 3264 ( cow-glider.s):00907 leas 4,s 06CA 6F65 ( cow-glider.s):00908 clr 5,s 06CC ( cow-glider.s):00909 L92: 06CC E6C4 ( cow-glider.s):00910 ldb ,u 06CE 10270064 ( cow-glider.s):00911 lbeq L89 06D2 E067 ( cow-glider.s):00912 subb 7,s 06D4 E763 ( cow-glider.s):00913 stb 3,s 06D6 2A02 ( cow-glider.s):00914 bpl L90 06D8 6063 ( cow-glider.s):00915 neg 3,s 06DA ( cow-glider.s):00916 L90: 06DA E641 ( cow-glider.s):00917 ldb 1,u 06DC E066 ( cow-glider.s):00918 subb 6,s 06DE E762 ( cow-glider.s):00919 stb 2,s 06E0 2A02 ( cow-glider.s):00920 bpl L91 06E2 6062 ( cow-glider.s):00921 neg 2,s 06E4 ( cow-glider.s):00922 L91: 06E4 E663 ( cow-glider.s):00923 ldb 3,s 06E6 1D ( cow-glider.s):00924 sex ;extendqihi2: R:b -> R:d 06E7 1F02 ( cow-glider.s):00925 tfr d,y 06E9 E662 ( cow-glider.s):00926 ldb 2,s 06EB 1D ( cow-glider.s):00927 sex ;extendqihi2: R:b -> R:d 06EC 1F01 ( cow-glider.s):00928 tfr d,x 06EE 1E02 ( cow-glider.s):00929 exg d,y 06F0 308B ( cow-glider.s):00930 leax d,x 06F2 1E02 ( cow-glider.s):00931 exg d,y 06F4 8C0001 ( cow-glider.s):00932 cmpx #1 ;cmphi: 06F7 2E3D ( cow-glider.s):00933 bgt L89 06F9 7F0000 ( cow-glider.s):00934 clr _Packet+1 06FC C602 ( cow-glider.s):00935 ldb #2 06FE F70000 ( cow-glider.s):00936 stb _Packet+2 0701 E665 ( cow-glider.s):00937 ldb 5,s 0703 F70000 ( cow-glider.s):00938 stb _Packet+3 0706 C602 ( cow-glider.s):00939 ldb #2 0708 8E0000 ( cow-glider.s):00940 ldx #_Packet 070B BD0CD5 ( cow-glider.s):00941 jsr _gSendCast 070E F6060C ( cow-glider.s):00942 ldb _gScore+1 0711 4F ( cow-glider.s):00943 clra ;zero_extendqihi: R:b -> R:d 0712 ED63 ( cow-glider.s):00944 std 3,s 0714 58 ( cow-glider.s):00945 aslb 0715 49 ( cow-glider.s):00946 rola 0716 108E060E ( cow-glider.s):00947 ldy #_gScore+3 071A 30AB ( cow-glider.s):00948 leax d,y 071C 10AE84 ( cow-glider.s):00949 ldy ,x 071F 3121 ( cow-glider.s):00950 leay 1,y 0721 10AF84 ( cow-glider.s):00951 sty ,x 0724 C601 ( cow-glider.s):00952 ldb #1 0726 F7060D ( cow-glider.s):00953 stb _gScore+2 0729 E7E2 ( cow-glider.s):00954 stb ,-s 072B E641 ( cow-glider.s):00955 ldb 1,u 072D E7E2 ( cow-glider.s):00956 stb ,-s 072F E6C4 ( cow-glider.s):00957 ldb ,u 0731 BD0000 ( cow-glider.s):00958 jsr _PMode1DrawSpotXor.constprop.3 0734 3262 ( cow-glider.s):00959 leas 2,s 0736 ( cow-glider.s):00960 L89: 0736 6C65 ( cow-glider.s):00961 inc 5,s 0738 3342 ( cow-glider.s):00962 leau 2,u 073A E665 ( cow-glider.s):00963 ldb 5,s 073C C120 ( cow-glider.s):00964 cmpb #32 ;cmpqi: 073E 1026FF8A ( cow-glider.s):00965 lbne L92 0742 F6061E ( cow-glider.s):00966 ldb _gScore+19 0745 2706 ( cow-glider.s):00967 beq L62 0747 7F061E ( cow-glider.s):00968 clr _gScore+19 074A BD0000 ( cow-glider.s):00969 jsr _DrawScores 074D ( cow-glider.s):00970 L62: 074D 3268 ( cow-glider.s):00971 leas 8,s 074F 35E0 ( cow-glider.s):00972 puls y,u,pc 0751 ( cow-glider.s):00973 LC0: 0751 544F444F20666978 ( cow-glider.s):00974 .ascii "TODO fix me later\0" 206D65206C617465 7200 ( cow-glider.s):00975 ( cow-glider.s):00976 .area .text.startup ( cow-glider.s):00977 ( cow-glider.s):00978 .globl _main 0000 ( cow-glider.s):00979 _main: 0000 3460 ( cow-glider.s):00980 pshs y,u 0002 327A ( cow-glider.s):00981 leas -6,s ( cow-glider.s):00982 ;----- asm ----- ( cow-glider.s):00983 ; 5 "../kernel/game_postlude.h" 1 ( cow-glider.s):00984 .globl __n1pre_entry ( cow-glider.s):00985 ;--- end asm --- 0004 8E0000 ( cow-glider.s):00986 ldx #__n1pre_entry 0007 BF0000 ( cow-glider.s):00987 stx 0 ( cow-glider.s):00988 ;----- asm ----- ( cow-glider.s):00989 ; 8 "../kernel/game_postlude.h" 1 ( cow-glider.s):00990 .globl __n1pre_final ( cow-glider.s):00991 ;--- end asm --- 000A 108E0000 ( cow-glider.s):00992 ldy #__n1pre_final 000E 10BF0000 ( cow-glider.s):00993 sty 0 ( cow-glider.s):00994 ;----- asm ----- ( cow-glider.s):00995 ; 11 "../kernel/game_postlude.h" 1 ( cow-glider.s):00996 .globl __n1pre_final_startup ( cow-glider.s):00997 ;--- end asm --- 0012 CE0000 ( cow-glider.s):00998 ldu #__n1pre_final_startup 0015 FF0000 ( cow-glider.s):00999 stu 0 0018 F6060C ( cow-glider.s):01000 ldb _gScore+1 001B 4F ( cow-glider.s):01001 clra ;zero_extendqihi: R:b -> R:d 001C ED62 ( cow-glider.s):01002 std 2,s 001E 58 ( cow-glider.s):01003 aslb 001F 49 ( cow-glider.s):01004 rola 0020 58 ( cow-glider.s):01005 aslb 0021 49 ( cow-glider.s):01006 rola 0022 58 ( cow-glider.s):01007 aslb 0023 49 ( cow-glider.s):01008 rola 0024 C30000 ( cow-glider.s):01009 addd #_ShipState 0027 FD0000 ( cow-glider.s):01010 std _my 002A 8E3400 ( cow-glider.s):01011 ldx #13312 002D ( cow-glider.s):01012 L107: 002D CC0000 ( cow-glider.s):01013 ldd #0 0030 ED81 ( cow-glider.s):01014 std ,x++ 0032 8C4000 ( cow-glider.s):01015 cmpx #16384 ;cmphi: 0035 26F6 ( cow-glider.s):01016 bne L107 0037 8E3400 ( cow-glider.s):01017 ldx #13312 003A BD09E3 ( cow-glider.s):01018 jsr _gPMode1Screen 003D 6F62 ( cow-glider.s):01019 clr 2,s 003F ( cow-glider.s):01020 L108: 003F C601 ( cow-glider.s):01021 ldb #1 0041 E7E2 ( cow-glider.s):01022 stb ,-s 0043 6FE2 ( cow-glider.s):01023 clr ,-s 0045 E664 ( cow-glider.s):01024 ldb 4,s 0047 8E3400 ( cow-glider.s):01025 ldx #13312 004A BD0000 ( cow-glider.s):01026 jsr _PMode1DrawSpot 004D 6C64 ( cow-glider.s):01027 inc 4,s 004F 3262 ( cow-glider.s):01028 leas 2,s 0051 E662 ( cow-glider.s):01029 ldb 2,s 0053 C160 ( cow-glider.s):01030 cmpb #96 ;cmpqi: 0055 26E8 ( cow-glider.s):01031 bne L108 0057 6F62 ( cow-glider.s):01032 clr 2,s 0059 ( cow-glider.s):01033 L109: 0059 C601 ( cow-glider.s):01034 ldb #1 005B E7E2 ( cow-glider.s):01035 stb ,-s 005D E7E2 ( cow-glider.s):01036 stb ,-s 005F E664 ( cow-glider.s):01037 ldb 4,s 0061 8E3400 ( cow-glider.s):01038 ldx #13312 0064 BD0000 ( cow-glider.s):01039 jsr _PMode1DrawSpot 0067 6C64 ( cow-glider.s):01040 inc 4,s 0069 3262 ( cow-glider.s):01041 leas 2,s 006B E662 ( cow-glider.s):01042 ldb 2,s 006D C160 ( cow-glider.s):01043 cmpb #96 ;cmpqi: 006F 26E8 ( cow-glider.s):01044 bne L109 0071 6F62 ( cow-glider.s):01045 clr 2,s 0073 ( cow-glider.s):01046 L110: 0073 C601 ( cow-glider.s):01047 ldb #1 0075 E7E2 ( cow-glider.s):01048 stb ,-s 0077 C65E ( cow-glider.s):01049 ldb #94 0079 E7E2 ( cow-glider.s):01050 stb ,-s 007B E664 ( cow-glider.s):01051 ldb 4,s 007D 8E3400 ( cow-glider.s):01052 ldx #13312 0080 BD0000 ( cow-glider.s):01053 jsr _PMode1DrawSpot 0083 6C64 ( cow-glider.s):01054 inc 4,s 0085 3262 ( cow-glider.s):01055 leas 2,s 0087 E662 ( cow-glider.s):01056 ldb 2,s 0089 C160 ( cow-glider.s):01057 cmpb #96 ;cmpqi: 008B 26E6 ( cow-glider.s):01058 bne L110 008D 6F62 ( cow-glider.s):01059 clr 2,s 008F ( cow-glider.s):01060 L111: 008F C601 ( cow-glider.s):01061 ldb #1 0091 E7E2 ( cow-glider.s):01062 stb ,-s 0093 C65F ( cow-glider.s):01063 ldb #95 0095 E7E2 ( cow-glider.s):01064 stb ,-s 0097 E664 ( cow-glider.s):01065 ldb 4,s 0099 8E3400 ( cow-glider.s):01066 ldx #13312 009C BD0000 ( cow-glider.s):01067 jsr _PMode1DrawSpot 009F 6C64 ( cow-glider.s):01068 inc 4,s 00A1 3262 ( cow-glider.s):01069 leas 2,s 00A3 E662 ( cow-glider.s):01070 ldb 2,s 00A5 C160 ( cow-glider.s):01071 cmpb #96 ;cmpqi: 00A7 26E6 ( cow-glider.s):01072 bne L111 00A9 6F62 ( cow-glider.s):01073 clr 2,s 00AB ( cow-glider.s):01074 L112: 00AB C601 ( cow-glider.s):01075 ldb #1 00AD E7E2 ( cow-glider.s):01076 stb ,-s 00AF E663 ( cow-glider.s):01077 ldb 3,s 00B1 3404 ( cow-glider.s):01078 pshs b 00B3 5F ( cow-glider.s):01079 clrb 00B4 8E3400 ( cow-glider.s):01080 ldx #13312 00B7 BD0000 ( cow-glider.s):01081 jsr _PMode1DrawSpot 00BA 6C64 ( cow-glider.s):01082 inc 4,s 00BC 3262 ( cow-glider.s):01083 leas 2,s 00BE E662 ( cow-glider.s):01084 ldb 2,s 00C0 C160 ( cow-glider.s):01085 cmpb #96 ;cmpqi: 00C2 26E7 ( cow-glider.s):01086 bne L112 00C4 6F62 ( cow-glider.s):01087 clr 2,s 00C6 ( cow-glider.s):01088 L113: 00C6 C601 ( cow-glider.s):01089 ldb #1 00C8 E7E2 ( cow-glider.s):01090 stb ,-s 00CA E663 ( cow-glider.s):01091 ldb 3,s 00CC 3404 ( cow-glider.s):01092 pshs b 00CE C601 ( cow-glider.s):01093 ldb #1 00D0 8E3400 ( cow-glider.s):01094 ldx #13312 00D3 BD0000 ( cow-glider.s):01095 jsr _PMode1DrawSpot 00D6 6C64 ( cow-glider.s):01096 inc 4,s 00D8 3262 ( cow-glider.s):01097 leas 2,s 00DA E662 ( cow-glider.s):01098 ldb 2,s 00DC C160 ( cow-glider.s):01099 cmpb #96 ;cmpqi: 00DE 26E6 ( cow-glider.s):01100 bne L113 00E0 6F62 ( cow-glider.s):01101 clr 2,s 00E2 ( cow-glider.s):01102 L114: 00E2 C601 ( cow-glider.s):01103 ldb #1 00E4 E7E2 ( cow-glider.s):01104 stb ,-s 00E6 E663 ( cow-glider.s):01105 ldb 3,s 00E8 3404 ( cow-glider.s):01106 pshs b 00EA C65E ( cow-glider.s):01107 ldb #94 00EC 8E3400 ( cow-glider.s):01108 ldx #13312 00EF BD0000 ( cow-glider.s):01109 jsr _PMode1DrawSpot 00F2 6C64 ( cow-glider.s):01110 inc 4,s 00F4 3262 ( cow-glider.s):01111 leas 2,s 00F6 E662 ( cow-glider.s):01112 ldb 2,s 00F8 C160 ( cow-glider.s):01113 cmpb #96 ;cmpqi: 00FA 26E6 ( cow-glider.s):01114 bne L114 00FC 6F62 ( cow-glider.s):01115 clr 2,s 00FE ( cow-glider.s):01116 L115: 00FE C601 ( cow-glider.s):01117 ldb #1 0100 E7E2 ( cow-glider.s):01118 stb ,-s 0102 E663 ( cow-glider.s):01119 ldb 3,s 0104 3404 ( cow-glider.s):01120 pshs b 0106 C65F ( cow-glider.s):01121 ldb #95 0108 8E3400 ( cow-glider.s):01122 ldx #13312 010B BD0000 ( cow-glider.s):01123 jsr _PMode1DrawSpot 010E 6C64 ( cow-glider.s):01124 inc 4,s 0110 3262 ( cow-glider.s):01125 leas 2,s 0112 E662 ( cow-glider.s):01126 ldb 2,s 0114 C160 ( cow-glider.s):01127 cmpb #96 ;cmpqi: 0116 26E6 ( cow-glider.s):01128 bne L115 0118 CC0000 ( cow-glider.s):01129 ldd #0 011B FD0000 ( cow-glider.s):01130 std _random_context 011E FD0000 ( cow-glider.s):01131 std _random_context+2 0121 8E0000 ( cow-glider.s):01132 ldx #0 0124 ( cow-glider.s):01133 L116: 0124 1F10 ( cow-glider.s):01134 tfr x,d 0126 E7890000 ( cow-glider.s):01135 stb _random_context+4,x ;movlsbqihi: R:d -> _random_context+4,x 012A 3001 ( cow-glider.s):01136 leax 1,x 012C 8C0100 ( cow-glider.s):01137 cmpx #256 ;cmphi: 012F 26F3 ( cow-glider.s):01138 bne L116 0131 CC0000 ( cow-glider.s):01139 ldd #0 0134 ED62 ( cow-glider.s):01140 std 2,s 0136 108E0000 ( cow-glider.s):01141 ldy #0 013A CE0000 ( cow-glider.s):01142 ldu #0 013D ( cow-glider.s):01143 L118: 013D E6C90000 ( cow-glider.s):01144 ldb _random_context+4,u 0141 4F ( cow-glider.s):01145 clra ;zero_extendqihi: R:b -> R:d 0142 1F01 ( cow-glider.s):01146 tfr d,x 0144 EC62 ( cow-glider.s):01147 ldd 2,s 0146 308B ( cow-glider.s):01148 leax d,x 0148 AF62 ( cow-glider.s):01149 stx 2,s 014A E6A90000 ( cow-glider.s):01150 ldb LC0,y 014E 4F ( cow-glider.s):01151 clra ;zero_extendqihi: R:b -> R:d 014F E362 ( cow-glider.s):01152 addd 2,s 0151 8400 ( cow-glider.s):01153 anda #0 0153 C4FF ( cow-glider.s):01154 andb #255 0155 ED62 ( cow-glider.s):01155 std 2,s 0157 1F01 ( cow-glider.s):01156 tfr d,x 0159 30890000 ( cow-glider.s):01157 leax _random_context+4,x 015D AFE4 ( cow-glider.s):01158 stx ,s 015F E684 ( cow-glider.s):01159 ldb ,x 0161 E764 ( cow-glider.s):01160 stb 4,s 0163 E6C90000 ( cow-glider.s):01161 ldb _random_context+4,u 0167 E784 ( cow-glider.s):01162 stb ,x 0169 E664 ( cow-glider.s):01163 ldb 4,s 016B E7C90000 ( cow-glider.s):01164 stb _random_context+4,u 016F 3121 ( cow-glider.s):01165 leay 1,y 0171 108C0010 ( cow-glider.s):01166 cmpy #16 ;cmphi: 0175 2304 ( cow-glider.s):01167 bls L117 0177 108E0000 ( cow-glider.s):01168 ldy #0 017B ( cow-glider.s):01169 L117: 017B 3341 ( cow-glider.s):01170 leau 1,u 017D 11830100 ( cow-glider.s):01171 cmpu #256 ;cmphi: 0181 26BA ( cow-glider.s):01172 bne L118 0183 CE0000 ( cow-glider.s):01173 ldu #_Cows 0186 ( cow-glider.s):01174 L119: 0186 BD0000 ( cow-glider.s):01175 jsr _RandomUpTo.constprop.4 0189 CB04 ( cow-glider.s):01176 addb #4 018B E7C4 ( cow-glider.s):01177 stb ,u 018D BD0000 ( cow-glider.s):01178 jsr _RandomUpTo.constprop.4 0190 CB04 ( cow-glider.s):01179 addb #4 0192 E762 ( cow-glider.s):01180 stb 2,s 0194 E741 ( cow-glider.s):01181 stb 1,u 0196 C601 ( cow-glider.s):01182 ldb #1 0198 E7E2 ( cow-glider.s):01183 stb ,-s 019A E663 ( cow-glider.s):01184 ldb 3,s 019C 3404 ( cow-glider.s):01185 pshs b 019E E6C4 ( cow-glider.s):01186 ldb ,u 01A0 BD0000 ( cow-glider.s):01187 jsr _PMode1DrawSpotXor.constprop.3 01A3 3342 ( cow-glider.s):01188 leau 2,u 01A5 3262 ( cow-glider.s):01189 leas 2,s 01A7 11830000 ( cow-glider.s):01190 cmpu #_Cows+64 ;cmphi: 01AB 26D9 ( cow-glider.s):01191 bne L119 01AD F6060B ( cow-glider.s):01192 ldb _gScore 01B0 E762 ( cow-glider.s):01193 stb 2,s 01B2 8E0005 ( cow-glider.s):01194 ldx #5 01B5 CC0000 ( cow-glider.s):01195 ldd #0 01B8 EDE4 ( cow-glider.s):01196 std ,s 01BA 2025 ( cow-glider.s):01197 bra L120 01BC ( cow-glider.s):01198 L121: 01BC ECE4 ( cow-glider.s):01199 ldd ,s 01BE 58 ( cow-glider.s):01200 aslb 01BF 49 ( cow-glider.s):01201 rola 01C0 58 ( cow-glider.s):01202 aslb 01C1 49 ( cow-glider.s):01203 rola 01C2 58 ( cow-glider.s):01204 aslb 01C3 49 ( cow-glider.s):01205 rola 01C4 1F02 ( cow-glider.s):01206 tfr d,y 01C6 33A90000 ( cow-glider.s):01207 leau _ShipState,y 01CA 108E1400 ( cow-glider.s):01208 ldy #5120 01CE 10AFC4 ( cow-glider.s):01209 sty ,u 01D1 1F10 ( cow-glider.s):01210 tfr x,d 01D3 1F98 ( cow-glider.s):01211 tfr b,a 01D5 5F ( cow-glider.s):01212 clrb 01D6 ED42 ( cow-glider.s):01213 std 2,u 01D8 ECE4 ( cow-glider.s):01214 ldd ,s 01DA C30001 ( cow-glider.s):01215 addd #1 01DD EDE4 ( cow-glider.s):01216 std ,s 01DF 300A ( cow-glider.s):01217 leax 10,x 01E1 ( cow-glider.s):01218 L120: 01E1 ECE4 ( cow-glider.s):01219 ldd ,s 01E3 E764 ( cow-glider.s):01220 stb 4,s ;movlsbqihi: R:d -> 4,s 01E5 E662 ( cow-glider.s):01221 ldb 2,s 01E7 E164 ( cow-glider.s):01222 cmpb 4,s ;cmpqi: 01E9 22D1 ( cow-glider.s):01223 bhi L121 01EB CC0040 ( cow-glider.s):01224 ldd #64 01EE EDE3 ( cow-glider.s):01225 std ,--s 01F0 8E0000 ( cow-glider.s):01226 ldx #_ShipState 01F3 AFE3 ( cow-glider.s):01227 stx ,--s 01F5 8E0000 ( cow-glider.s):01228 ldx #_OldShipState 01F8 BD08D0 ( cow-glider.s):01229 jsr _memcpy 01FB BD0000 ( cow-glider.s):01230 jsr _XorOldShips 01FE BD0000 ( cow-glider.s):01231 jsr _DrawScores 0201 10BE0022 ( cow-glider.s):01232 ldy _gMono+2 0205 10BF0000 ( cow-glider.s):01233 sty _start_seconds 0209 CE0000 ( cow-glider.s):01234 ldu #__n1pre_final_startup 020C EFE3 ( cow-glider.s):01235 stu ,--s 020E 8E0000 ( cow-glider.s):01236 ldx #__n1pre_final 0211 AFE3 ( cow-glider.s):01237 stx ,--s 0213 8E0000 ( cow-glider.s):01238 ldx #_loop 0216 BD070A ( cow-glider.s):01239 jsr _xAfterSetup 0219 8E0000 ( cow-glider.s):01240 ldx #0 021C 326E ( cow-glider.s):01241 leas 14,s 021E 35E0 ( cow-glider.s):01242 puls y,u,pc ( cow-glider.s):01243 ( cow-glider.s):01244 .area .text.entry 0000 ( cow-glider.s):01245 __n1pre_entry: 0000 7E ( cow-glider.s):01246 .byte 126 0001 0000 ( cow-glider.s):01247 .word _main ( cow-glider.s):01248 ( cow-glider.s):01249 .area .final 0000 ( cow-glider.s):01250 __n1pre_final: 0000 AEEE ( cow-glider.s):01251 .word -20754 ( cow-glider.s):01252 ( cow-glider.s):01253 .area .final.setup 0000 ( cow-glider.s):01254 __n1pre_final_startup: 0000 AEEF ( cow-glider.s):01255 .word -20753 ( cow-glider.s):01256 ( cow-glider.s):01257 .area .data.more 0000 ( cow-glider.s):01258 _ShipState: 0000 0000000000000000 ( cow-glider.s):01259 zmb 64 ;skip space 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 ( cow-glider.s):01260 ( cow-glider.s):01261 .area .bss 0000 ( cow-glider.s):01262 _Cows: .blkb 64 0040 ( cow-glider.s):01263 _decis: .blkb 1 0041 ( cow-glider.s):01264 _Packet: .blkb 64 0081 ( cow-glider.s):01265 _my: .blkb 2 0083 ( cow-glider.s):01266 _start_seconds: .blkb 2 ( cow-glider.s):01267 ( cow-glider.s):01268 .area .data.more 0040 ( cow-glider.s):01269 _OldShipState: 0040 0000000000000000 ( cow-glider.s):01270 zmb 64 ;skip space 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 ( cow-glider.s):01271 ( cow-glider.s):01272 .area .text 0763 ( cow-glider.s):01273 _DigitTimes15: 0763 00 ( cow-glider.s):01274 .byte 0 0764 0F ( cow-glider.s):01275 .byte 15 0765 1E ( cow-glider.s):01276 .byte 30 0766 2D ( cow-glider.s):01277 .byte 45 0767 3C ( cow-glider.s):01278 .byte 60 0768 4B ( cow-glider.s):01279 .byte 75 0769 5A ( cow-glider.s):01280 .byte 90 076A 69 ( cow-glider.s):01281 .byte 105 076B 78 ( cow-glider.s):01282 .byte 120 076C 87 ( cow-glider.s):01283 .byte -121 ( cow-glider.s):01284 ( cow-glider.s):01285 .area .data 0000 ( cow-glider.s):01286 _Digit3x5CharGen: 0000 2030203020303020 ( cow-glider.s):01287 .ascii " 0 0 00 00 0 0 1 1 1 1 1 22 2 2 2 22233 " 3030203020302020 3120203120203120 2031202031203232 2020203220322032 2020323232333320 0030 2020333333202020 ( cow-glider.s):01288 .ascii " 333 333 4 44 4444 4 45555 55 555 666 " 3333332034203434 2034343434202034 2020343535353520 2035352020203535 3520203636362020 0060 3636363620363636 ( cow-glider.s):01289 .ascii "6666 6666777 7 7 7 78888 88888 88889999 9999" 3637373720203720 2037202037202037 3838383820383838 3838203838383839 3939392039393939 0090 20203920203900 ( cow-glider.s):01290 .ascii " 9 9\0" ( cow-glider.s):01291 ( cow-glider.s):01292 .area .data.more 0080 ( cow-glider.s):01293 _random_context: 0080 0000000000000000 ( cow-glider.s):01294 zmb 260 ;skip space 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 0000000000000000 00000000 ( cow-glider.s):01295 .area .absolute ( cow-glider.s):01296 .globl _gAlloc64 0D9D ( cow-glider.s):01297 _gAlloc64 EQU $0D9D ( cow-glider.s):01298 .globl _gBonoboStartRepeatingNMI 0B1B ( cow-glider.s):01299 _gBonoboStartRepeatingNMI EQU $0B1B ( cow-glider.s):01300 .globl _gConfig 0607 ( cow-glider.s):01301 _gConfig EQU $0607 ( cow-glider.s):01302 .globl _gFatal 0A47 ( cow-glider.s):01303 _gFatal EQU $0A47 ( cow-glider.s):01304 .globl _gFatalFIRQ 0A98 ( cow-glider.s):01305 _gFatalFIRQ EQU $0A98 ( cow-glider.s):01306 .globl _gFatalSWI1 0ADC ( cow-glider.s):01307 _gFatalSWI1 EQU $0ADC ( cow-glider.s):01308 .globl _gFatalSWI2 0AC6 ( cow-glider.s):01309 _gFatalSWI2 EQU $0AC6 ( cow-glider.s):01310 .globl _gFatalSWI3 0AAF ( cow-glider.s):01311 _gFatalSWI3 EQU $0AAF ( cow-glider.s):01312 .globl _gFree64 06EA ( cow-glider.s):01313 _gFree64 EQU $06EA ( cow-glider.s):01314 .globl _gIrqRestore 06DF ( cow-glider.s):01315 _gIrqRestore EQU $06DF ( cow-glider.s):01316 .globl _gIrqSaveAndDisable 06D2 ( cow-glider.s):01317 _gIrqSaveAndDisable EQU $06D2 ( cow-glider.s):01318 .globl _gKern 0650 ( cow-glider.s):01319 _gKern EQU $0650 ( cow-glider.s):01320 .globl _gModeScreen 0A10 ( cow-glider.s):01321 _gModeScreen EQU $0A10 ( cow-glider.s):01322 .globl _gMono 0020 ( cow-glider.s):01323 _gMono EQU $0020 ( cow-glider.s):01324 .globl _gNetworkLog 0C9F ( cow-glider.s):01325 _gNetworkLog EQU $0C9F ( cow-glider.s):01326 .globl _gPMode1Screen 09E3 ( cow-glider.s):01327 _gPMode1Screen EQU $09E3 ( cow-glider.s):01328 .globl _gReceiveCast64 0757 ( cow-glider.s):01329 _gReceiveCast64 EQU $0757 ( cow-glider.s):01330 .globl _gScore 060B ( cow-glider.s):01331 _gScore EQU $060B ( cow-glider.s):01332 .globl _gSendCast 0CD5 ( cow-glider.s):01333 _gSendCast EQU $0CD5 ( cow-glider.s):01334 .globl _gTextScreen 09C9 ( cow-glider.s):01335 _gTextScreen EQU $09C9 ( cow-glider.s):01336 .globl _gWall 0637 ( cow-glider.s):01337 _gWall EQU $0637 ( cow-glider.s):01338 .globl _memcpy 08D0 ( cow-glider.s):01339 _memcpy EQU $08D0 ( cow-glider.s):01340 .globl _memcpy_words 0774 ( cow-glider.s):01341 _memcpy_words EQU $0774 ( cow-glider.s):01342 .globl _memset 08AA ( cow-glider.s):01343 _memset EQU $08AA ( cow-glider.s):01344 .globl _memset_words 0862 ( cow-glider.s):01345 _memset_words EQU $0862 ( cow-glider.s):01346 .globl _strlen 08F2 ( cow-glider.s):01347 _strlen EQU $08F2 ( cow-glider.s):01348 .globl _xAfterSetup 070A ( cow-glider.s):01349 _xAfterSetup EQU $070A ( cow-glider.s):01350 .globl _xSendControlPacket 0CB8 ( cow-glider.s):01351 _xSendControlPacket EQU $0CB8