X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=ROM%2Fvend.asm;h=d385637434a5fd3c95255339a7f6a7b61c918a00;hb=d7a4043794f1a35d929bcce22c226cbfbe57ac01;hp=7753b9a5fe8f62ab616e196dd4fc82ce2f821ebf;hpb=90dea7415353bf8eaa111a1ec38faa04d7dbc295;p=uccvend-snackrom.git diff --git a/ROM/vend.asm b/ROM/vend.asm index 7753b9a..d385637 100644 --- a/ROM/vend.asm +++ b/ROM/vend.asm @@ -36,6 +36,17 @@ ; 0 motor driver row output enable ;PA5 selects between RS232 and current loop serial interface? + + +; 0014 - ???? +; 001a - ???? +; 1000 +; 1009 +; 1026 +; 1028 +; 1030 +; 103c + 8000 43 C coma 8001 20 50 P bra 50 8003 4F O clra @@ -258,7 +269,7 @@ 814E 7F 00 19 ... clr 0019 8151 7F 00 60 ..` clr 0060 8154 7F 00 42 ..B clr 0042 -8157 BD E6 1B ... jsr e61b +8157 BD E6 1B ... jsr e61b ;jump4 815A F6 0B A8 ... ldab 0ba8 815D 26 03 &. bne 03 815F 7E 81 EF ~.. jmp 81ef @@ -315,10 +326,10 @@ 81D4 20 17 . bra 17 81D6 7F 00 42 ..B clr 0042 81D9 7F 00 60 ..` clr 0060 -81DC BD BE 69 ..i jsr be69 -81DF BD BE 4B ..K jsr be4b +81DC BD BE 69 ..i jsr be69 ;jump3 +81DF BD BE 4B ..K jsr be4b ;jump1 81E2 CC B0 81 ... ldd #b081 ;"NO ACCESS" -81E5 BD C0 BA ... jsr c0ba +81E5 BD C0 BA ... jsr c0ba ;display: 81E8 C6 0A .. ldab #0a 81EA F7 00 38 ..8 stb 0038 81ED 20 03 . bra 03 @@ -326,13 +337,13 @@ 81F2 F6 00 38 ..8 ldab 0038 81F5 27 03 '. beq 03 81F7 7E 84 9F ~.. jmp 849f -81FA BD BE 4B ..K jsr be4b +81FA BD BE 4B ..K jsr be4b ;jump1 81FD F6 00 48 ..H ldab 0048 8200 26 03 &. bne 03 8202 BD AB A2 ... jsr aba2 8205 F6 00 48 ..H ldab 0048 8208 4F O clra -8209 BD FE 16 ... jsr fe16 +8209 BD FE 16 ... jsr fe16 ;jump2 820C 00 . test 820D 00 . test 820E 00 . test @@ -355,7 +366,7 @@ 8231 C4 01 .. andb #01 8233 27 13 '. beq 13 8235 CC AF F2 ... ldd #aff2 ;"OVER CRNT=" -8238 BD C0 BA ... jsr c0ba +8238 BD C0 BA ... jsr c0ba ;display: 823B C6 0A .. ldab #0a 823D F7 00 38 ..8 stb 0038 8240 7F 00 54 ..T clr 0054 @@ -417,7 +428,7 @@ 82BA C4 02 .. andb #02 82BC 27 13 '. beq 13 82BE CC AF FD ... ldd #affd "HOME FAIL=" -82C1 BD C0 BA ... jsr c0ba +82C1 BD C0 BA ... jsr c0ba ;display: 82C4 C6 0A .. ldab #0a 82C6 F7 00 38 ..8 stb 0038 82C9 7F 00 54 ..T clr 0054 @@ -479,7 +490,7 @@ 8343 C4 04 .. andb #04 8345 27 13 '. beq 13 8347 CC B0 08 ... ldd #b008 -834A BD C0 BA ... jsr c0ba +834A BD C0 BA ... jsr c0ba ;display: 834D C6 0A .. ldab #0a 834F F7 00 38 ..8 stb 0038 8352 7F 00 54 ..T clr 0054 @@ -521,7 +532,7 @@ 83A8 C4 01 .. andb #01 83AA 27 10 '. beq 10 83AC CC B0 34 ..4 ldd #b034 "CHGR PWRUP" -83AF BD C0 BA ... jsr c0ba +83AF BD C0 BA ... jsr c0ba ;display: 83B2 7C 00 48 |.H inc 0048 83B5 C6 0A .. ldab #0a 83B7 F7 00 38 ..8 stb 0038 @@ -532,7 +543,7 @@ 83C5 C4 02 .. andb #02 83C7 27 10 '. beq 10 83C9 CC B0 4A ..J ldd #b04a "CARD PWRUP" -83CC BD C0 BA ... jsr c0ba +83CC BD C0 BA ... jsr c0ba ;display: 83CF 7C 00 48 |.H inc 0048 83D2 C6 0A .. ldab #0a 83D4 F7 00 38 ..8 stb 0038 @@ -543,7 +554,7 @@ 83E2 C4 04 .. andb #04 83E4 27 10 '. beq 10 83E6 CC B0 3F ..? ldd #b03f "LINK PWRUP" -83E9 BD C0 BA ... jsr c0ba +83E9 BD C0 BA ... jsr c0ba ;display: 83EC 7C 00 48 |.H inc 0048 83EF C6 0A .. ldab #0a 83F1 F7 00 38 ..8 stb 0038 @@ -554,7 +565,7 @@ 83FF C4 10 .. andb #10 8401 27 10 '. beq 10 8403 CC B0 1E ... ldd #b01e "COIN JAM" -8406 BD C0 BA ... jsr c0ba +8406 BD C0 BA ... jsr c0ba ;display: 8409 7C 00 48 |.H inc 0048 840C C6 0A .. ldab #0a 840E F7 00 38 ..8 stb 0038 @@ -565,7 +576,7 @@ 841C C4 20 . andb #20 841E 27 10 '. beq 10 8420 CC B0 29 ..) ldd #b029 "BAD SENSOR" -8423 BD C0 BA ... jsr c0ba +8423 BD C0 BA ... jsr c0ba ;display: 8426 7C 00 48 |.H inc 0048 8429 C6 0A .. ldab #0a 842B F7 00 38 ..8 stb 0038 @@ -576,7 +587,7 @@ 8438 C4 08 .. andb #08 843A 27 10 '. beq 10 843C CC B0 55 ..U ldd #b055 "BILL ERROR" -843F BD C0 BA ... jsr c0ba +843F BD C0 BA ... jsr c0ba ;display: 8442 7C 00 48 |.H inc 0048 8445 C6 0A .. ldab #0a 8447 F7 00 38 ..8 stb 0038 @@ -587,14 +598,14 @@ 8454 C4 40 .@ andb #40 8456 27 10 '. beq 10 8458 CC B0 60 ..` ldd #b060 "TUBE ERROR" -845B BD C0 BA ... jsr c0ba +845B BD C0 BA ... jsr c0ba ;display: 845E 7F 00 48 ..H clr 0048 8461 C6 0A .. ldab #0a 8463 F7 00 38 ..8 stb 0038 8466 20 0E . bra 0e 8468 7F 00 48 ..H clr 0048 -846B CC B0 13 ... ldd #b013 -846E BD C0 BA ... jsr c0ba "HIT RESET " +846B CC B0 13 ... ldd #b013 "HIT RESET " +846E BD C0 BA ... jsr c0ba ;display: 8471 C6 0A .. ldab #0a 8473 F7 00 38 ..8 stb 0038 8476 20 27 ' bra 27 @@ -615,6 +626,7 @@ 8499 F7 00 38 ..8 stb 0038 849C 7F 00 48 ..H clr 0048 849F 39 9 rts + 84A0 FC 00 3B ..; ldd 003b 84A3 26 03 &. bne 03 84A5 7E 85 96 ~.. jmp 8596 @@ -660,16 +672,16 @@ 84FB 8F . xgdx 84FC E6 00 .. ldab 00,x 84FE 27 14 '. beq 14 -8500 BD BE 4B ..K jsr be4b +8500 BD BE 4B ..K jsr be4b ;jump1 8503 CC B0 81 ... ldd #b081 ;"NO ACCESS" -8506 BD C0 BA ... jsr c0ba +8506 BD C0 BA ... jsr c0ba ;display: 8509 CC 02 58 ..X ldd #0258 850C BD E5 71 ..q jsr e571 850F BD 85 AF ... jsr 85af 8512 20 6C l bra 6c 8514 F6 00 42 ..B ldab 0042 8517 4F O clra -8518 BD FE 16 ... jsr fe16 +8518 BD FE 16 ... jsr fe16 ;jump2 851B 00 . test 851C 00 . test 851D 00 . test @@ -688,7 +700,7 @@ 8535 85 77 .w bita #77 8537 85 7C .| bita #7c 8539 CC AE 92 ... ldd #ae92 "- " -853C BD C0 BA ... jsr c0ba +853C BD C0 BA ... jsr c0ba ;display: 853F 7F 00 42 ..B clr 0042 8542 CE 00 1F ... ldx #001f 8545 1C 00 .. bset add,x 00,x @@ -735,16 +747,18 @@ 85A4 1D 1C .. bclr add,x 1c,x 85A6 00 . test 85A7 10 . sba -85A8 BD BE 69 ..i jsr be69 +85A8 BD BE 69 ..i jsr be69 ;jump3 85AB BD E5 AA ... jsr e5aa 85AE 39 9 rts + 85AF 7F 00 42 ..B clr 0042 85B2 7F 00 06 ... clr 0006 85B5 CE 00 1F ... ldx #001f 85B8 1C 00 .. bset add,x 00,x 85BA 02 . idiv -85BB BD BE 69 ..i jsr be69 +85BB BD BE 69 ..i jsr be69 ;jump3 85BE 39 9 rts + 85BF F6 00 12 ... ldab 0012 85C2 C4 1E .. andb #1e 85C4 4F O clra @@ -824,6 +838,7 @@ 867D CC 02 33 ..3 ldd #0233 8680 FD 00 3B ..; stad 003b 8683 39 9 rts + 8684 F6 00 1F ... ldab 001f 8687 C4 02 .. andb #02 8689 27 2B '+ beq 2b @@ -853,6 +868,7 @@ 86C0 00 . test 86C1 87 . illegal 86C2 39 9 rts + 86C3 00 . test 86C4 01 . nop 86C5 87 . illegal @@ -916,7 +932,7 @@ 873C 26 2F &/ bne 2f 873E F6 00 48 ..H ldab 0048 8741 4F O clra -8742 BD FE 16 ... jsr fe16 +8742 BD FE 16 ... jsr fe16 ;jump2 8745 00 . test 8746 01 . nop 8747 00 . test @@ -949,7 +965,7 @@ 8778 26 43 &C bne 43 877A F6 00 48 ..H ldab 0048 877D 4F O clra -877E BD FE 16 ... jsr fe16 +877E BD FE 16 ... jsr fe16 ;jump2 8781 00 . test 8782 01 . nop 8783 00 . test @@ -997,6 +1013,7 @@ 87E2 F7 30 00 .0. stb 3000 ;snack motor drivers serial data is bit 7 87E5 BD 85 AF ... jsr 85af 87E8 39 9 rts + 87E9 7F 00 05 ... clr 0005 87EC 7F 00 54 ..T clr 0054 87EF F6 00 54 ..T ldab 0054 @@ -1024,6 +1041,7 @@ 8827 CC 07 D0 ... ldd #07d0 882A BD E5 71 ..q jsr e571 882D 39 9 rts + 882E F6 00 1F ... ldab 001f 8831 C4 02 .. andb #02 8833 27 12 '. beq 12 @@ -1087,6 +1105,7 @@ 88B2 20 03 . bra 03 88B4 BD 85 AF ... jsr 85af 88B7 39 9 rts + 88B8 F6 00 1F ... ldab 001f 88BB C4 02 .. andb #02 88BD 26 0A &. bne 0a @@ -1096,7 +1115,7 @@ 88C7 2D 23 -# blt 23 88C9 7F 00 2C .., clr 002c 88CC CC AE 9D ... ldd #ae9d "SET PRICE?" -88CF BD C0 BA ... jsr c0ba +88CF BD C0 BA ... jsr c0ba ;display: 88D2 CE 00 1F ... ldx #001f 88D5 1D 00 .. bclr add,x 00,x 88D7 02 . idiv @@ -1123,7 +1142,7 @@ 8906 7E 89 DE ~.. jmp 89de 8909 F6 00 54 ..T ldab 0054 890C 26 26 && bne 26 -890E BD BE 4B ..K jsr be4b +890E BD BE 4B ..K jsr be4b ;jump1 8911 F6 00 09 ... ldab 0009 8914 C1 0A .. cmpb #0a 8916 26 03 &. bne 03 @@ -1222,7 +1241,7 @@ 89E6 7E 8C 72 ~.r jmp 8c72 89E9 F6 00 09 ... ldab 0009 89EC 4F O clra -89ED BD FE 16 ... jsr fe16 +89ED BD FE 16 ... jsr fe16 ;jump2 89F0 00 . test 89F1 00 . test 89F2 00 . test @@ -1500,6 +1519,7 @@ 8C6D 20 03 . bra 03 8C6F BD 85 AF ... jsr 85af 8C72 39 9 rts + 8C73 F6 00 06 ... ldab 0006 8C76 4F O clra 8C77 05 . asld @@ -1534,6 +1554,7 @@ 8CB0 1D 00 .. bclr add,x 00,x 8CB2 10 . sba 8CB3 39 9 rts + 8CB4 F6 00 1F ... ldab 001f 8CB7 C4 02 .. andb #02 8CB9 27 12 '. beq 12 @@ -1702,6 +1723,7 @@ 8E2F 20 03 . bra 03 8E31 BD 85 AF ... jsr 85af 8E34 39 9 rts + 8E35 F6 00 1F ... ldab 001f 8E38 C4 02 .. andb #02 8E3A 27 1E '. beq 1e @@ -1795,6 +1817,7 @@ 8F07 20 03 . bra 03 8F09 BD 85 AF ... jsr 85af 8F0C 39 9 rts + 8F0D F6 00 1F ... ldab 001f 8F10 C4 02 .. andb #02 8F12 27 1D '. beq 1d @@ -1811,7 +1834,7 @@ 8F2E 7E 90 D0 ~.. jmp 90d0 8F31 F6 00 09 ... ldab 0009 8F34 4F O clra -8F35 BD FE 16 ... jsr fe16 +8F35 BD FE 16 ... jsr fe16 ;jump2 8F38 00 . test 8F39 00 . test 8F3A 00 . test @@ -1981,6 +2004,7 @@ 90CB 20 03 . bra 03 90CD BD 85 AF ... jsr 85af 90D0 39 9 rts + 90D1 F6 00 1F ... ldab 001f 90D4 C4 02 .. andb #02 90D6 27 14 '. beq 14 @@ -2010,7 +2034,7 @@ 9107 91 26 FF .&. cmpa 26 910A F5 00 00 ... bitb 0000 910D CC B0 AD ... ldd #b0ad -9110 BD C0 BA ... jsr c0ba +9110 BD C0 BA ... jsr c0ba ;display: 9113 20 17 . bra 17 9115 8D 16 .. bsr dest 16 9117 20 13 . bra 13 @@ -2022,6 +2046,7 @@ 9126 7F 00 09 ... clr 0009 9129 7F 00 0A ... clr 000a 912C 39 9 rts + 912D F6 00 19 ... ldab 0019 9130 2C 28 ,( bge 28 9132 BD A9 CF ... jsr a9cf @@ -2043,7 +2068,7 @@ 9158 20 6B k bra 6b 915A F6 00 0A ... ldab 000a 915D 4F O clra -915E BD FE 16 ... jsr fe16 +915E BD FE 16 ... jsr fe16 ;jump2 9161 00 . test 9162 00 . test 9163 00 . test @@ -2087,6 +2112,7 @@ 91C0 20 03 . bra 03 91C2 BD 85 AF ... jsr 85af 91C5 39 9 rts + 91C6 F6 00 19 ... ldab 0019 91C9 2C 28 ,( bge 28 91CB BD AA 0A ... jsr aa0a @@ -2108,7 +2134,7 @@ 91F1 20 66 f bra 66 91F3 F6 00 0A ... ldab 000a 91F6 4F O clra -91F7 BD FE 16 ... jsr fe16 +91F7 BD FE 16 ... jsr fe16 ;jump2 91FA 00 . test 91FB 00 . test 91FC 00 . test @@ -2153,6 +2179,8 @@ 9254 20 03 . bra 03 9256 BD 85 AF ... jsr 85af 9259 39 9 rts + + 925A F6 00 19 ... ldab 0019 925D 2C 28 ,( bge 28 925F BD AA 3F ..? jsr aa3f @@ -2174,7 +2202,7 @@ 9285 20 66 f bra 66 9287 F6 00 0A ... ldab 000a 928A 4F O clra -928B BD FE 16 ... jsr fe16 +928B BD FE 16 ... jsr fe16 ;jump2 928E 00 . test 928F 00 . test 9290 00 . test @@ -2217,6 +2245,7 @@ 92E8 20 03 . bra 03 92EA BD 85 AF ... jsr 85af 92ED 39 9 rts + 92EE F6 0C DC ... ldab 0cdc 92F1 4F O clra 92F2 37 7 pshb @@ -2300,6 +2329,7 @@ 939F 20 03 . bra 03 93A1 BD 98 FF ... jsr 98ff 93A4 39 9 rts + 93A5 F6 00 1F ... ldab 001f 93A8 C4 02 .. andb #02 93AA 26 0A &. bne 0a @@ -2308,7 +2338,7 @@ 93B1 F6 00 1D ... ldab 001d 93B4 2D 26 -& blt 26 93B6 CC AF BB ... ldd #afbb -93B9 BD C0 BA ... jsr c0ba +93B9 BD C0 BA ... jsr c0ba ;display: 93BC CE 00 1F ... ldx #001f 93BF 1D 00 .. bclr add,x 00,x 93C1 02 . idiv @@ -2346,7 +2376,7 @@ 9410 8F . xgdx 9411 33 3 pulb 9412 E7 00 .. stb 00,x -9414 BD BE 4B ..K jsr be4b +9414 BD BE 4B ..K jsr be4b ;jump1 9417 F6 00 54 ..T ldab 0054 941A 26 06 &. bne 06 941C F6 00 62 ..b ldab 0062 @@ -2426,6 +2456,7 @@ 94D7 20 03 . bra 03 94D9 BD 85 AF ... jsr 85af 94DC 39 9 rts + 94DD F6 00 1F ... ldab 001f 94E0 C4 02 .. andb #02 94E2 27 14 '. beq 14 @@ -2455,7 +2486,7 @@ 9513 95 38 FF .8. bita 38 9516 F5 00 00 ... bitb 0000 9519 CC B0 A2 ... ldd #b0a2 -951C BD C0 BA ... jsr c0ba +951C BD C0 BA ... jsr c0ba ;display: 951F 20 1D . bra 1d 9521 BD 87 E9 ... jsr 87e9 9524 CE 00 1F ... ldx #001f @@ -2470,6 +2501,7 @@ 9538 7F 00 09 ... clr 0009 953B 7F 00 0A ... clr 000a 953E 39 9 rts + 953F F6 00 19 ... ldab 0019 9542 2D 0A -. blt 0a 9544 F6 00 3A ..: ldab 003a @@ -2478,7 +2510,7 @@ 954C 2D 1D -. blt 1d 954E 7F 00 2C .., clr 002c 9551 CC B0 B8 ... ldd #b0b8 -9554 BD C0 BA ... jsr c0ba +9554 BD C0 BA ... jsr c0ba ;display: 9557 CE 00 19 ... ldx #0019 955A 1D 00 .. bclr add,x 00,x 955C 80 CE .. suba #ce @@ -2505,7 +2537,7 @@ 9588 7E 96 5A ~.Z jmp 965a 958B F6 00 54 ..T ldab 0054 958E 26 26 && bne 26 -9590 BD BE 4B ..K jsr be4b +9590 BD BE 4B ..K jsr be4b ;jump1 9593 F6 00 0A ... ldab 000a 9596 C1 0A .. cmpb #0a 9598 26 03 &. bne 03 @@ -2618,6 +2650,7 @@ 9682 00 . test 9683 1F 1C 00 02 .... brclr 1c,x 00 02 9687 39 9 rts + 9688 34 4 des 9689 F6 00 19 ... ldab 0019 968C 2C 19 ,. bge 19 @@ -2717,6 +2750,7 @@ 976A FD 00 40 ..@ stad 0040 976D 31 1 ins 976E 39 9 rts + 976F F6 0E 6D ..m ldab 0e6d 9772 C1 01 .. cmpb #01 9774 26 41 &A bne 41 @@ -2770,15 +2804,17 @@ 97E3 C6 01 .. ldab #01 97E5 F7 00 06 ... stb 0006 97E8 39 9 rts -97E9 BD BE 4B ..K jsr be4b + +97E9 BD BE 4B ..K jsr be4b ;jump1 97EC CC AF E7 ... ldd #afe7 -97EF BD C0 BA ... jsr c0ba +97EF BD C0 BA ... jsr c0ba ;display: 97F2 BD F4 15 ... jsr f415 97F5 39 9 rts -97F6 BD BE 4B ..K jsr be4b + +97F6 BD BE 4B ..K jsr be4b ;jump1 97F9 F6 00 48 ..H ldab 0048 97FC 4F O clra -97FD BD FE 16 ... jsr fe16 +97FD BD FE 16 ... jsr fe16 ;jump2 9800 00 . test 9801 01 . nop 9802 00 . test @@ -2849,7 +2885,8 @@ 989E F7 0B 90 ... stb 0b90 98A1 BD BE 01 ... jsr be01 98A4 39 9 rts -98A5 BD BE 4B ..K jsr be4b + +98A5 BD BE 4B ..K jsr be4b ;jump1 98A8 F6 00 54 ..T ldab 0054 98AB 4F O clra 98AC BD E7 95 ... jsr e795 @@ -2859,6 +2896,7 @@ 98B8 F7 0B 94 ... stb 0b94 98BB BD BE 01 ... jsr be01 98BE 39 9 rts + 98BF F6 00 09 ... ldab 0009 98C2 C1 00 .. cmpb #00 98C4 26 05 &. bne 05 @@ -2888,6 +2926,7 @@ 98F8 BD E9 2B ..+ jsr e92b 98FB BD 85 AF ... jsr 85af 98FE 39 9 rts + 98FF F6 00 1F ... ldab 001f 9902 C4 02 .. andb #02 9904 27 13 '. beq 13 @@ -2946,7 +2985,8 @@ 997A BD E9 2B ..+ jsr e92b 997D BD 85 AF ... jsr 85af 9980 39 9 rts -9981 BD BE 4B ..K jsr be4b + +9981 BD BE 4B ..K jsr be4b ;jump1 9984 F6 00 05 ... ldab 0005 9987 4F O clra 9988 BD E7 95 ... jsr e795 @@ -2972,7 +3012,8 @@ 99BC F7 0B 90 ... stb 0b90 99BF BD BE 01 ... jsr be01 99C2 39 9 rts -99C3 BD BE 4B ..K jsr be4b + +99C3 BD BE 4B ..K jsr be4b ;jump1 99C6 F6 00 05 ... ldab 0005 99C9 4F O clra 99CA BD E7 95 ... jsr e795 @@ -2998,7 +3039,8 @@ 99FE F7 0B 90 ... stb 0b90 9A01 BD BE 01 ... jsr be01 9A04 39 9 rts -9A05 BD BE 4B ..K jsr be4b + +9A05 BD BE 4B ..K jsr be4b ;jump1 9A08 FC 00 52 ..R ldd 0052 9A0B BD E7 45 ..E jsr e745 9A0E C6 4F .O ldab #4f @@ -3023,7 +3065,8 @@ 9A40 F7 0B 90 ... stb 0b90 9A43 BD BE 01 ... jsr be01 9A46 39 9 rts -9A47 BD BE 4B ..K jsr be4b + +9A47 BD BE 4B ..K jsr be4b ;jump1 9A4A F6 00 06 ... ldab 0006 9A4D 4F O clra 9A4E BD E7 95 ... jsr e795 @@ -3107,7 +3150,7 @@ 9B1C F7 0B 96 ... stb 0b96 9B1F F6 00 2C .., ldab 002c 9B22 26 3E &> bne 3e -9B24 BD BE 69 ..i jsr be69 +9B24 BD BE 69 ..i jsr be69 ;jump3 9B27 F6 00 13 ... ldab 0013 9B2A C1 01 .. cmpb #01 9B2C 23 2C #, bls 2c @@ -3136,7 +3179,8 @@ 9B5D C6 03 .. ldab #03 9B5F F7 00 2C .., stb 002c 9B62 39 9 rts -9B63 BD BE 4B ..K jsr be4b + +9B63 BD BE 4B ..K jsr be4b ;jump1 9B66 FC 00 0D ... ldd 000d 9B69 BD E7 45 ..E jsr e745 9B6C C6 44 .D ldab #44 @@ -3188,7 +3232,7 @@ 9BE3 20 00 . bra 00 9BE5 F6 00 2C .., ldab 002c 9BE8 26 2A &* bne 2a -9BEA BD BE 69 ..i jsr be69 +9BEA BD BE 69 ..i jsr be69 ;jump3 9BED F6 00 13 ... ldab 0013 9BF0 C1 01 .. cmpb #01 9BF2 23 18 #. bls 18 @@ -3208,10 +3252,11 @@ 9C0F C6 03 .. ldab #03 9C11 F7 00 2C .., stb 002c 9C14 39 9 rts -9C15 BD BE 4B ..K jsr be4b + +9C15 BD BE 4B ..K jsr be4b ;jump1 9C18 F6 00 48 ..H ldab 0048 9C1B 4F O clra -9C1C BD FE 16 ... jsr fe16 +9C1C BD FE 16 ... jsr fe16 ;jump2 9C1F 00 . test 9C20 00 . test 9C21 00 . test @@ -3231,95 +3276,96 @@ 9C3F 02 . idiv 9C40 27 08 '. beq 08 9C42 CC AF 00 ... ldd #af00 -9C45 BD C0 BA ... jsr c0ba +9C45 BD C0 BA ... jsr c0ba ;display: 9C48 20 06 . bra 06 9C4A CC AF 0B ... ldd #af0b -9C4D BD C0 BA ... jsr c0ba +9C4D BD C0 BA ... jsr c0ba ;display: 9C50 7E 9D 29 ~.) jmp 9d29 9C53 F6 00 67 ..g ldab 0067 9C56 C4 10 .. andb #10 9C58 27 08 '. beq 08 9C5A CC AF 42 ..B ldd #af42 -9C5D BD C0 BA ... jsr c0ba +9C5D BD C0 BA ... jsr c0ba ;display: 9C60 20 06 . bra 06 9C62 CC AF 4D ..M ldd #af4d -9C65 BD C0 BA ... jsr c0ba +9C65 BD C0 BA ... jsr c0ba ;display: 9C68 7E 9D 29 ~.) jmp 9d29 9C6B F6 00 67 ..g ldab 0067 9C6E C4 20 . andb #20 9C70 27 08 '. beq 08 9C72 CC AF 58 ..X ldd #af58 -9C75 BD C0 BA ... jsr c0ba +9C75 BD C0 BA ... jsr c0ba ;display: 9C78 20 06 . bra 06 9C7A CC AF 63 ..c ldd #af63 -9C7D BD C0 BA ... jsr c0ba +9C7D BD C0 BA ... jsr c0ba ;display: 9C80 7E 9D 29 ~.) jmp 9d29 9C83 F6 00 67 ..g ldab 0067 9C86 C4 01 .. andb #01 9C88 27 08 '. beq 08 9C8A CC AE EA ... ldd #aeea -9C8D BD C0 BA ... jsr c0ba +9C8D BD C0 BA ... jsr c0ba ;display: 9C90 20 06 . bra 06 9C92 CC AE F5 ... ldd #aef5 -9C95 BD C0 BA ... jsr c0ba +9C95 BD C0 BA ... jsr c0ba ;display: 9C98 7E 9D 29 ~.) jmp 9d29 9C9B F6 00 67 ..g ldab 0067 9C9E C4 04 .. andb #04 9CA0 27 08 '. beq 08 9CA2 CC AF 16 ... ldd #af16 -9CA5 BD C0 BA ... jsr c0ba +9CA5 BD C0 BA ... jsr c0ba ;display: 9CA8 20 06 . bra 06 9CAA CC AF 21 ..! ldd #af21 -9CAD BD C0 BA ... jsr c0ba +9CAD BD C0 BA ... jsr c0ba ;display: 9CB0 20 77 w bra 77 9CB2 F6 00 67 ..g ldab 0067 9CB5 C4 08 .. andb #08 9CB7 27 08 '. beq 08 9CB9 CC AF 2C .., ldd #af2c -9CBC BD C0 BA ... jsr c0ba +9CBC BD C0 BA ... jsr c0ba ;display: 9CBF 20 06 . bra 06 9CC1 CC AF 37 ..7 ldd #af37 -9CC4 BD C0 BA ... jsr c0ba +9CC4 BD C0 BA ... jsr c0ba ;display: 9CC7 20 60 ` bra 60 9CC9 F6 00 67 ..g ldab 0067 9CCC C4 40 .@ andb #40 9CCE 27 08 '. beq 08 9CD0 CC AF 84 ... ldd #af84 -9CD3 BD C0 BA ... jsr c0ba +9CD3 BD C0 BA ... jsr c0ba ;display: 9CD6 20 06 . bra 06 9CD8 CC AF 8F ... ldd #af8f -9CDB BD C0 BA ... jsr c0ba +9CDB BD C0 BA ... jsr c0ba ;display: 9CDE 20 49 I bra 49 9CE0 F6 0E 70 ..p ldab 0e70 9CE3 C1 01 .. cmpb #01 9CE5 26 08 &. bne 08 9CE7 CC AE BE ... ldd #aebe -9CEA BD C0 BA ... jsr c0ba +9CEA BD C0 BA ... jsr c0ba ;display: 9CED 20 06 . bra 06 9CEF CC AE C9 ... ldd #aec9 -9CF2 BD C0 BA ... jsr c0ba +9CF2 BD C0 BA ... jsr c0ba ;display: 9CF5 20 32 2 bra 32 9CF7 F6 0E 6F ..o ldab 0e6f 9CFA C1 01 .. cmpb #01 9CFC 26 08 &. bne 08 9CFE CC AE D4 ... ldd #aed4 -9D01 BD C0 BA ... jsr c0ba +9D01 BD C0 BA ... jsr c0ba ;display: 9D04 20 06 . bra 06 9D06 CC AE DF ... ldd #aedf -9D09 BD C0 BA ... jsr c0ba +9D09 BD C0 BA ... jsr c0ba ;display: 9D0C 20 1B . bra 1b 9D0E F6 00 67 ..g ldab 0067 9D11 2C 08 ,. bge 08 9D13 CC AF 6E ..n ldd #af6e -9D16 BD C0 BA ... jsr c0ba +9D16 BD C0 BA ... jsr c0ba ;display: 9D19 20 06 . bra 06 9D1B CC AF 79 ..y ldd #af79 -9D1E BD C0 BA ... jsr c0ba +9D1E BD C0 BA ... jsr c0ba ;display: 9D21 20 06 . bra 06 9D23 CC AF B0 ... ldd #afb0 -9D26 BD C0 BA ... jsr c0ba +9D26 BD C0 BA ... jsr c0ba ;display: 9D29 39 9 rts -9D2A BD BE 4B ..K jsr be4b + +9D2A BD BE 4B ..K jsr be4b ;jump1 9D2D F6 00 22 .." ldab 0022 9D30 4F O clra 9D31 BD E7 95 ... jsr e795 @@ -3351,7 +3397,8 @@ 9D77 F7 0B 90 ... stb 0b90 9D7A BD BE 01 ... jsr be01 9D7D 39 9 rts -9D7E BD BE 4B ..K jsr be4b + +9D7E BD BE 4B ..K jsr be4b ;jump1 9D81 F6 00 60 ..` ldab 0060 9D84 4F O clra 9D85 C3 0A 90 ... addd #0a90 @@ -3416,16 +3463,17 @@ 9E09 C6 05 .. ldab #05 9E0B F7 00 38 ..8 stb 0038 9E0E 39 9 rts -9E0F BD BE 4B ..K jsr be4b + +9E0F BD BE 4B ..K jsr be4b ;jump1 9E12 F6 00 48 ..H ldab 0048 9E15 26 15 &. bne 15 9E17 F6 00 66 ..f ldab 0066 9E1A 27 08 '. beq 08 9E1C CC AF C6 ... ldd #afc6 -9E1F BD C0 BA ... jsr c0ba +9E1F BD C0 BA ... jsr c0ba ;display: 9E22 20 06 . bra 06 9E24 CC AF D1 ... ldd #afd1 -9E27 BD C0 BA ... jsr c0ba +9E27 BD C0 BA ... jsr c0ba ;display: 9E2A 20 5C \ bra 5c 9E2C C6 4D .M ldab #4d 9E2E F7 0B 99 ... stb 0b99 @@ -3466,10 +3514,11 @@ 9E82 F7 0B 90 ... stb 0b90 9E85 BD BE 01 ... jsr be01 9E88 39 9 rts -9E89 BD BE 4B ..K jsr be4b + +9E89 BD BE 4B ..K jsr be4b ;jump1 9E8C F6 00 48 ..H ldab 0048 9E8F 4F O clra -9E90 BD FE 16 ... jsr fe16 +9E90 BD FE 16 ... jsr fe16 ;jump2 9E93 00 . test 9E94 01 . nop 9E95 00 . test @@ -3519,16 +3568,16 @@ 9EF1 A1 B1 .. cmpa b1,x 9EF3 A1 BE .. cmpa be,x 9EF5 CC B2 90 ... ldd #b290 -9EF8 BD C0 BA ... jsr c0ba +9EF8 BD C0 BA ... jsr c0ba ;display: 9EFB 7E A1 C4 ~.. jmp a1c4 9EFE CC 0C BC ... ldd #0cbc -9F01 BD C0 BA ... jsr c0ba +9F01 BD C0 BA ... jsr c0ba ;display: 9F04 7E A1 C4 ~.. jmp a1c4 9F07 CC B2 A2 ... ldd #b2a2 -9F0A BD C0 BA ... jsr c0ba +9F0A BD C0 BA ... jsr c0ba ;display: 9F0D 7E A1 C4 ~.. jmp a1c4 9F10 CC 0C CC ... ldd #0ccc -9F13 BD C0 BA ... jsr c0ba +9F13 BD C0 BA ... jsr c0ba ;display: 9F16 7E A1 C4 ~.. jmp a1c4 9F19 C6 41 .A ldab #41 9F1B F7 0B 99 ... stb 0b99 @@ -3545,7 +3594,7 @@ 9F37 38 8 pulx 9F38 7E A1 C4 ~.. jmp a1c4 9F3B CC B2 C6 ... ldd #b2c6 -9F3E BD C0 BA ... jsr c0ba +9F3E BD C0 BA ... jsr c0ba ;display: 9F41 7E A1 C4 ~.. jmp a1c4 9F44 FE 0D E9 ... ldx 0de9 9F47 3C < pshx @@ -3554,7 +3603,7 @@ 9F4E 38 8 pulx 9F4F 7E A1 C4 ~.. jmp a1c4 9F52 CC B2 D8 ... ldd #b2d8 -9F55 BD C0 BA ... jsr c0ba +9F55 BD C0 BA ... jsr c0ba ;display: 9F58 7E A1 C4 ~.. jmp a1c4 9F5B FE 0D ED ... ldx 0ded 9F5E 3C < pshx @@ -3563,7 +3612,7 @@ 9F65 38 8 pulx 9F66 7E A1 C4 ~.. jmp a1c4 9F69 CC B2 EA ... ldd #b2ea -9F6C BD C0 BA ... jsr c0ba +9F6C BD C0 BA ... jsr c0ba ;display: 9F6F 7E A1 C4 ~.. jmp a1c4 9F72 FE 0D F1 ... ldx 0df1 9F75 3C < pshx @@ -3572,7 +3621,7 @@ 9F7C 38 8 pulx 9F7D 7E A1 C4 ~.. jmp a1c4 9F80 CC B2 FC ... ldd #b2fc -9F83 BD C0 BA ... jsr c0ba +9F83 BD C0 BA ... jsr c0ba ;display: 9F86 7E A1 C4 ~.. jmp a1c4 9F89 FE 0D F9 ... ldx 0df9 9F8C 3C < pshx @@ -3581,7 +3630,7 @@ 9F93 38 8 pulx 9F94 7E A1 C4 ~.. jmp a1c4 9F97 CC B3 0E ... ldd #b30e -9F9A BD C0 BA ... jsr c0ba +9F9A BD C0 BA ... jsr c0ba ;display: 9F9D 7E A1 C4 ~.. jmp a1c4 9FA0 FE 0D FD ... ldx 0dfd 9FA3 3C < pshx @@ -3590,7 +3639,7 @@ 9FAA 38 8 pulx 9FAB 7E A1 C4 ~.. jmp a1c4 9FAE CC B3 35 ..5 ldd #b335 -9FB1 BD C0 BA ... jsr c0ba +9FB1 BD C0 BA ... jsr c0ba ;display: 9FB4 7E A1 C4 ~.. jmp a1c4 9FB7 FE 0D F5 ... ldx 0df5 9FBA 3C < pshx @@ -3683,7 +3732,7 @@ A086 BD A3 41 ..A jsr a341 A089 38 8 pulx A08A 7E A1 C4 ~.. jmp a1c4 A08D CC B3 B7 ... ldd #b3b7 -A090 BD C0 BA ... jsr c0ba +A090 BD C0 BA ... jsr c0ba ;display: A093 7E A1 C4 ~.. jmp a1c4 A096 CE 00 01 ... ldx #0001 A099 3C < pshx @@ -3692,7 +3741,7 @@ A09D BD A2 D4 ... jsr a2d4 A0A0 38 8 pulx A0A1 7E A1 C4 ~.. jmp a1c4 A0A4 CC B3 CE ... ldd #b3ce -A0A7 BD C0 BA ... jsr c0ba +A0A7 BD C0 BA ... jsr c0ba ;display: A0AA 7E A1 C4 ~.. jmp a1c4 A0AD FE 0C E9 ... ldx 0ce9 A0B0 3C < pshx @@ -3702,7 +3751,7 @@ A0B5 BD A3 1A ... jsr a31a A0B8 38 8 pulx A0B9 7E A1 C4 ~.. jmp a1c4 A0BC CC B3 E0 ... ldd #b3e0 -A0BF BD C0 BA ... jsr c0ba +A0BF BD C0 BA ... jsr c0ba ;display: A0C2 7E A1 C4 ~.. jmp a1c4 A0C5 FE 0C EB ... ldx 0ceb A0C8 3C < pshx @@ -3712,7 +3761,7 @@ A0CD BD A3 1A ... jsr a31a A0D0 38 8 pulx A0D1 7E A1 C4 ~.. jmp a1c4 A0D4 CC B3 F2 ... ldd #b3f2 -A0D7 BD C0 BA ... jsr c0ba +A0D7 BD C0 BA ... jsr c0ba ;display: A0DA 7E A1 C4 ~.. jmp a1c4 A0DD FE 0C ED ... ldx 0ced A0E0 3C < pshx @@ -3722,7 +3771,7 @@ A0E5 BD A3 1A ... jsr a31a A0E8 38 8 pulx A0E9 7E A1 C4 ~.. jmp a1c4 A0EC CC B4 04 ... ldd #b404 -A0EF BD C0 BA ... jsr c0ba +A0EF BD C0 BA ... jsr c0ba ;display: A0F2 7E A1 C4 ~.. jmp a1c4 A0F5 FE 0C EF ... ldx 0cef A0F8 3C < pshx @@ -3812,7 +3861,7 @@ A1B8 BD A3 41 ..A jsr a341 A1BB 38 8 pulx A1BC 20 06 . bra 06 A1BE CC B4 84 ... ldd #b484 -A1C1 BD C0 BA ... jsr c0ba +A1C1 BD C0 BA ... jsr c0ba ;display: A1C4 F6 00 48 ..H ldab 0048 A1C7 C1 2E .. cmpb #2e A1C9 23 74 #t bls 74 @@ -3872,16 +3921,16 @@ A246 F6 00 1F ... ldab 001f A249 C4 10 .. andb #10 A24B 27 08 '. beq 08 A24D CC AF 9A ... ldd #af9a -A250 BD C0 BA ... jsr c0ba +A250 BD C0 BA ... jsr c0ba ;display: A253 20 06 . bra 06 A255 CC AF A5 ... ldd #afa5 -A258 BD C0 BA ... jsr c0ba +A258 BD C0 BA ... jsr c0ba ;display: A25B 39 9 rts A25C 37 7 pshb A25D 36 6 psha A25E F6 00 2C .., ldab 002c A261 26 6F &o bne 6f -A263 BD BE 69 ..i jsr be69 +A263 BD BE 69 ..i jsr be69 ;jump3 A266 30 0 tsx A267 E6 01 .. ldab 01,x A269 27 5F '_ beq 5f @@ -4005,9 +4054,9 @@ A367 38 8 pulx A368 31 1 ins A369 31 1 ins A36A 6E 00 n. jmp 00,x -A36C BD BE 4B ..K jsr be4b +A36C BD BE 4B ..K jsr be4b ;jump1 A36F CC AF DC ... ldd #afdc -A372 BD C0 BA ... jsr c0ba +A372 BD C0 BA ... jsr c0ba ;display: A375 CC 01 F4 ... ldd #01f4 A378 BD E5 71 ..q jsr e571 A37B 39 9 rts @@ -4225,7 +4274,7 @@ A51C 38 8 pulx A51D 39 9 rts A51E F6 00 22 .." ldab 0022 A521 4F O clra -A522 BD FE 16 ... jsr fe16 +A522 BD FE 16 ... jsr fe16 ;jump2 A525 00 . test A526 01 . nop A527 00 . test @@ -4376,7 +4425,7 @@ A665 25 03 %. bcs 03 A667 7E A7 1E ~.. jmp a71e A66A F6 00 54 ..T ldab 0054 A66D 4F O clra -A66E BD FE 16 ... jsr fe16 +A66E BD FE 16 ... jsr fe16 ;jump2 A671 00 . test A672 01 . nop A673 00 . test @@ -4501,7 +4550,7 @@ A75C E7 00 .. stb 00,x A75E 39 9 rts A75F F6 00 48 ..H ldab 0048 A762 4F O clra -A763 BD FE 16 ... jsr fe16 +A763 BD FE 16 ... jsr fe16 ;jump2 A766 00 . test A767 00 . test A768 00 . test @@ -4577,6 +4626,7 @@ A807 53 S comb A808 F4 00 67 ..g andb 0067 A80B F7 00 67 ..g stb 0067 A80E 39 9 rts + A80F 7F 00 54 ..T clr 0054 A812 F6 00 54 ..T ldab 0054 A815 C1 04 .. cmpb #04 @@ -4591,7 +4641,7 @@ A82B F6 0B 95 ... ldab 0b95 A82E F7 00 5D ..] stb 005d A831 F6 0B 96 ... ldab 0b96 A834 F7 00 5A ..Z stb 005a -A837 BD BE 4B ..K jsr be4b +A837 BD BE 4B ..K jsr be4b ;jump1 A83A BD BE 01 ... jsr be01 A83D CC 01 F4 ... ldd #01f4 A840 BD E5 71 ..q jsr e571 @@ -4607,6 +4657,7 @@ A85B BD BE 01 ... jsr be01 A85E 7C 00 54 |.T inc 0054 A861 20 AF . bra af A863 39 9 rts + A864 F6 00 09 ... ldab 0009 A867 C1 01 .. cmpb #01 A869 26 20 & bne 20 @@ -4632,6 +4683,7 @@ A88E C1 09 .. cmpb #09 A890 24 03 $. bcc 03 A892 7C 00 60 |.` inc 0060 A895 39 9 rts + A896 F6 00 36 ..6 ldab 0036 A899 26 39 &9 bne 39 A89B F6 00 54 ..T ldab 0054 @@ -4659,6 +4711,7 @@ A8CC F7 0B 90 ... stb 0b90 A8CF C6 02 .. ldab #02 A8D1 F7 00 36 ..6 stb 0036 A8D4 39 9 rts + A8D5 F6 00 60 ..` ldab 0060 A8D8 C1 00 .. cmpb #00 A8DA 23 05 #. bls 05 @@ -4666,6 +4719,7 @@ A8DC 7A 00 60 z.` dec 0060 A8DF 20 03 . bra 03 A8E1 7F 00 60 ..` clr 0060 A8E4 39 9 rts + A8E5 F6 00 36 ..6 ldab 0036 A8E8 26 36 &6 bne 36 A8EA F6 00 54 ..T ldab 0054 @@ -4692,6 +4746,7 @@ A918 F7 0B 90 ... stb 0b90 A91B C6 02 .. ldab #02 A91D F7 00 36 ..6 stb 0036 A920 39 9 rts + A921 F6 0B 90 ... ldab 0b90 A924 F7 0B 96 ... stb 0b96 A927 F6 0B 96 ... ldab 0b96 @@ -4734,6 +4789,7 @@ A972 C1 09 .. cmpb #09 A974 24 03 $. bcc 03 A976 7C 00 60 |.` inc 0060 A979 39 9 rts + A97A F6 00 60 ..` ldab 0060 A97D 26 24 &$ bne 24 A97F F6 00 60 ..` ldab 0060 @@ -4773,6 +4829,7 @@ A9C5 F6 00 60 ..` ldab 0060 A9C8 F7 00 61 ..a stb 0061 A9CB 7F 00 54 ..T clr 0054 A9CE 39 9 rts + A9CF C6 50 .P ldab #50 A9D1 F7 09 90 ... stb 0990 A9D4 C6 29 .) ldab #29 @@ -4800,6 +4857,7 @@ AA01 20 DE . bra de AA03 F6 0B BF ... ldab 0bbf AA06 F7 00 61 ..a stb 0061 AA09 39 9 rts + AA0A C6 53 .S ldab #53 AA0C F7 0C B9 ... stb 0cb9 AA0F C6 29 .) ldab #29 @@ -4825,6 +4883,7 @@ AA37 E7 00 .. stb 00,x AA39 7C 00 54 |.T inc 0054 AA3C 20 DE . bra de AA3E 39 9 rts + AA3F C6 49 .I ldab #49 AA41 F7 0C C9 ... stb 0cc9 AA44 C6 29 .) ldab #29 @@ -4850,6 +4909,7 @@ AA6C E7 00 .. stb 00,x AA6E 7C 00 54 |.T inc 0054 AA71 20 DE . bra de AA73 39 9 rts + AA74 7F 00 54 ..T clr 0054 AA77 F6 00 54 ..T ldab 0054 AA7A C1 0B .. cmpb #0b @@ -4869,6 +4929,7 @@ AA92 E7 00 .. stb 00,x AA94 7C 00 54 |.T inc 0054 AA97 20 DE . bra de AA99 39 9 rts + AA9A F6 00 22 .." ldab 0022 AA9D C1 06 .. cmpb #06 AA9F 24 0F $. bcc 0f @@ -4880,7 +4941,7 @@ AAAB C6 01 .. ldab #01 AAAD F7 00 22 .." stb 0022 AAB0 F6 00 22 .." ldab 0022 AAB3 4F O clra -AAB4 BD FE 16 ... jsr fe16 +AAB4 BD FE 16 ... jsr fe16 ;jump2 AAB7 00 . test AAB8 01 . nop AAB9 00 . test @@ -4916,6 +4977,7 @@ AB02 F7 00 24 ..$ stb 0024 AB05 F6 0B B0 ... ldab 0bb0 AB08 F7 00 2A ..* stb 002a AB0B 39 9 rts + AB0C C6 03 .. ldab #03 AB0E F7 00 18 ... stb 0018 AB11 7F 00 1C ... clr 001c @@ -4978,8 +5040,9 @@ AB80 7A 00 18 z.. dec 0018 AB83 7C 00 1C |.. inc 001c AB86 20 8C . bra 8c AB88 39 9 rts + AB89 CC B0 8C ... ldd #b08c -AB8C BD C0 BA ... jsr c0ba +AB8C BD C0 BA ... jsr c0ba ;display: AB8F CC 01 F4 ... ldd #01f4 AB92 BD E5 71 ..q jsr e571 AB95 BD D4 79 ..y jsr d479 @@ -4987,6 +5050,7 @@ AB98 BD E8 9A ... jsr e89a AB9B BD E9 EA ... jsr e9ea AB9E 7F 0B C1 ... clr 0bc1 ABA1 39 9 rts + ABA2 7F 00 05 ... clr 0005 ABA5 F6 00 05 ... ldab 0005 ABA8 C1 64 .d cmpb #64 @@ -5111,6 +5175,7 @@ AC95 26 05 &. bne 05 AC97 C6 0D .. ldab #0d AC99 F7 00 48 ..H stb 0048 AC9C 39 9 rts + AC9D 08 . inx AC9E 07 . tpa AC9F 06 . tap @@ -6019,6 +6084,7 @@ B0D4 0C . clc B0D5 17 . tba B0D6 22 2E ". bhi 2e B0D8 39 9 rts + B0D9 44 D lsra B0DA 4F O clra B0DB 0B . sev @@ -6090,7 +6156,7 @@ B128 10 20 40 80 B12C 00 B12D 00 . test -B12E 2A 2A ** bpl 2a +B12E 2A 2A ** bpl 2a ;"**ERROR***" B130 45 E illegal B131 52 R illegal B132 52 R illegal @@ -6098,6 +6164,7 @@ B133 4F O clra B134 52 R illegal B135 2A 2A ** bpl 2a B137 2A 00 *. bpl 00 + B139 2A 2A ** bpl 2a B13B 2A 2A ** bpl 2a B13D 2A 2A ** bpl 2a @@ -6155,6 +6222,7 @@ B17B 50 P negb B17C 32 2 pula B17D 2D 50 -P blt 50 B17F 39 9 rts + B180 20 46 F bra 46 B182 41 A illegal B183 49 I rola @@ -7121,7 +7189,7 @@ B888 F6 0E 05 ... ldab 0e05 B88B BD D7 A0 ... jsr d7a0 B88E 83 00 00 ... subd #0000 B891 26 77 &w bne 77 -B893 BD BE 4B ..K jsr be4b +B893 BD BE 4B ..K jsr be4b ;jump1 B896 C6 20 . ldab #20 B898 F7 0B 9A ... stb 0b9a B89B C6 20 . ldab #20 @@ -7175,7 +7243,7 @@ B900 BD BE 01 ... jsr be01 B903 C6 0A .. ldab #0a B905 F7 00 2C .., stb 002c B908 20 1D . bra 1d -B90A BD BE 4B ..K jsr be4b +B90A BD BE 4B ..K jsr be4b ;jump1 B90D C6 57 .W ldab #57 B90F F7 0B 96 ... stb 0b96 B912 C6 42 .B ldab #42 @@ -7602,7 +7670,7 @@ BCEE F6 00 29 ..) ldab 0029 BCF1 F7 00 1E ... stb 001e BCF4 C6 32 .2 ldab #32 BCF6 F7 00 3A ..: stb 003a -BCF9 BD BE 4B ..K jsr be4b +BCF9 BD BE 4B ..K jsr be4b ;jump1 BCFC F6 00 1E ... ldab 001e BCFF CB 30 .0 addb #30 BD01 F7 0B 95 ... stb 0b95 @@ -7757,6 +7825,8 @@ BE44 CE 10 28 ..( ldx #1028 BE47 1D 00 .. bclr add,x 00,x BE49 40 @ nega BE4A 39 9 rts + +jump1: BE4B 7F 00 1C ... clr 001c BE4E F6 00 1C ... ldab 001c BE51 C1 0A .. cmpb #0a @@ -7772,9 +7842,11 @@ BE61 E7 00 .. stb 00,x BE63 7C 00 1C |.. inc 001c BE66 20 E6 . bra e6 BE68 39 9 rts -BE69 CE 10 00 ... ldx #1000 -BE6C 1D 00 .. bclr add,x 00,x -BE6E 80 BD .. suba #bd + +jump3: +BE69 CE 10 00 ... ldx #1000 ; +BE6C 1D 00 .. bclr add,x 00,x ; +BE6E 80 BD .. suba #bd ; BE70 E5 96 .. bitb 96,x BE72 CE 10 00 ... ldx #1000 BE75 1C 00 .. bset add,x 00,x @@ -7798,6 +7870,7 @@ BE97 CE 10 28 ..( ldx #1028 BE9A 1D 00 .. bclr add,x 00,x BE9C 40 @ nega BE9D 39 9 rts + BE9E 37 7 pshb BE9F 36 6 psha BEA0 8D A9 .. bsr dest a9 @@ -8011,7 +8084,7 @@ C001 C3 0B 96 ... addd #0b96 C004 8F . xgdx C005 33 3 pulb C006 E7 00 .. stb 00,x -C008 BD BE 69 ..i jsr be69 +C008 BD BE 69 ..i jsr be69 ;jump3 C00B F6 00 13 ... ldab 0013 C00E C1 01 .. cmpb #01 C010 23 17 #. bls 17 @@ -8029,6 +8102,7 @@ C028 40 @ nega C029 BD BE 10 ... jsr be10 C02C 38 8 pulx C02D 39 9 rts + C02E 37 7 pshb C02F 36 6 psha C030 3C < pshx @@ -8130,6 +8204,7 @@ C0DA BD C0 2E ... jsr c02e C0DD 38 8 pulx C0DE 38 8 pulx C0DF 39 9 rts + C0E0 F6 00 15 ... ldab 0015 C0E3 2C 02 ,. bge 02 C0E5 20 F9 . bra f9 @@ -8145,6 +8220,7 @@ C0F8 1D 00 .. bclr add,x 00,x C0FA 20 5F _ bra 5f C0FC 4F O clra C0FD 39 9 rts + C0FE CE 00 14 ... ldx #0014 C101 1C 00 .. bset add,x 00,x C103 01 . nop @@ -8167,6 +8243,7 @@ C12B 1D 00 .. bclr add,x 00,x C12D 20 5F _ bra 5f C12F 4F O clra C130 39 9 rts + C131 20 E6 . bra e6 C133 FC 00 3E ..> ldd 003e C136 F3 00 40 ..@ addd 0040 @@ -8430,6 +8507,7 @@ C320 20 CC . bra cc C322 00 . test C323 01 . nop C324 39 9 rts + C325 F6 10 00 ... ldab 1000 C328 C4 01 .. andb #01 C32A 26 13 &. bne 13 @@ -8542,6 +8620,7 @@ C426 FD 00 3E ..> stad 003e C429 7F 00 7D ..} clr 007d C42C 7F 00 7E ..~ clr 007e C42F 39 9 rts + C430 F6 00 01 ... ldab 0001 C433 53 S comb C434 F4 00 1A ... andb 001a @@ -8556,6 +8635,7 @@ C44C F7 00 1A ... stb 001a C44F F6 00 1A ... ldab 001a C452 F7 30 00 .0. stb 3000 ;snack motor drivers serial data is bit 7 C455 39 9 rts + C456 FC 00 40 ..@ ldd 0040 C459 26 03 &. bne 03 C45B 7E C5 C6 ~.. jmp c5c6 @@ -8780,6 +8860,7 @@ C673 F7 38 00 .8. stb 3800 C676 CC 00 19 ... ldd #0019 C679 BD E5 71 ..q jsr e571 C67C 39 9 rts + C67D F6 00 30 ..0 ldab 0030 C680 26 55 &U bne 55 C682 F6 0B C0 ... ldab 0bc0 @@ -8955,10 +9036,12 @@ C7DB F6 10 2C .., ldab 102c C7DE 2D 04 -. blt 04 C7E0 CC 00 01 ... ldd #0001 C7E3 39 9 rts + C7E4 5F _ clrb C7E5 4F O clra C7E6 39 9 rts + ;this might send a byte to the serial port C7E7 37 7 pshb @@ -8990,6 +9073,7 @@ C817 F7 10 2F ../ stb 102f ;sci data C81A 38 8 pulx C81B 39 9 rts + C81C 34 4 des C81D F6 0B C0 ... ldab 0bc0 C820 C4 01 .. andb #01 @@ -9127,7 +9211,7 @@ C951 7F 00 2C .., clr 002c C954 7E CA 5C ~.\ jmp ca5c C957 F6 00 08 ... ldab 0008 C95A 4F O clra -C95B BD FE 16 ... jsr fe16 +C95B BD FE 16 ... jsr fe16 ;jump2 C95E 00 . test C95F 01 . nop C960 00 . test @@ -9489,7 +9573,7 @@ CC68 30 0 tsx CC69 E7 00 .. stb 00,x CC6B F6 00 08 ... ldab 0008 CC6E 4F O clra -CC6F BD FE 16 ... jsr fe16 +CC6F BD FE 16 ... jsr fe16 ;jump2 CC72 00 . test CC73 01 . nop CC74 00 . test @@ -9993,6 +10077,7 @@ D08A FC 0B E1 ... ldd 0be1 D08D BD FB BA ... jsr fbba D090 FD 0B E1 ... stad 0be1 D093 39 9 rts + D094 34 4 des D095 30 0 tsx D096 6F 00 o. clr 00,x @@ -10047,6 +10132,7 @@ D0FE C6 08 .. ldab #08 D100 F7 0B DC ... stb 0bdc D103 31 1 ins D104 39 9 rts + D105 34 4 des D106 CE 00 1A ... ldx #001a D109 1C 00 .. bset add,x 00,x @@ -10078,6 +10164,7 @@ D135 F6 00 14 ... ldab 0014 D138 F7 38 00 .8. stb 3800 D13B 31 1 ins D13C 39 9 rts + D13D F6 00 06 ... ldab 0006 D140 4F O clra D141 CE 00 0A ... ldx #000a @@ -10172,6 +10259,7 @@ D1F7 00 . test D1F8 1A . illegal D1F9 F7 30 00 .0. stb 3000 ;snack motor drivers serial data is bit 7 D1FC 39 9 rts + D1FD CC 40 00 .@. ldd #4000 D200 37 7 pshb D201 36 6 psha @@ -10185,6 +10273,7 @@ D20C AA 00 .. ora 00,x D20E EA 01 .. orb 01,x D210 ED 00 .. stad 00,x D212 39 9 rts + D213 F6 00 1F ... ldab 001f D216 C4 04 .. andb #04 D218 26 12 &. bne 12 @@ -10208,6 +10297,7 @@ D241 BD D6 3C ..< jsr d63c D244 5F _ clrb D245 4F O clra D246 39 9 rts + D247 BD D1 3D ..= jsr d13d D24A C6 3C .< ldab #3c D24C F7 00 2E ... stb 002e @@ -10235,6 +10325,7 @@ D27D BD D6 3C ..< jsr d63c D280 5F _ clrb D281 4F O clra D282 39 9 rts + D283 F6 00 2E ... ldab 002e D286 C1 36 .6 cmpb #36 D288 24 56 $V bcc 56 @@ -10257,6 +10348,7 @@ D2B1 BD D6 3C ..< jsr d63c D2B4 5F _ clrb D2B5 4F O clra D2B6 39 9 rts + D2B7 F6 00 06 ... ldab 0006 D2BA 4F O clra D2BB C3 0E 06 ... addd #0e06 @@ -10279,6 +10371,7 @@ D2D9 33 3 pulb D2DA E7 00 .. stb 00,x D2DC CC 00 01 ... ldd #0001 D2DF 39 9 rts + D2E0 F6 00 2E ... ldab 002e D2E3 26 14 &. bne 14 D2E5 BD D5 F7 ... jsr d5f7 @@ -10290,6 +10383,7 @@ D2F3 BD D6 26 ..& jsr d626 D2F6 5F _ clrb D2F7 4F O clra D2F8 39 9 rts + D2F9 F6 00 2E ... ldab 002e D2FC 26 0C &. bne 0c D2FE BD D1 05 ... jsr d105 @@ -10298,9 +10392,11 @@ D304 BD D6 3C ..< jsr d63c D307 5F _ clrb D308 4F O clra D309 39 9 rts + D30A 7E D2 5A ~.Z jmp d25a -D30D BD E6 1B ... jsr e61b +D30D BD E6 1B ... jsr e61b ;jump4 D310 39 9 rts + D311 BD D1 3D ..= jsr d13d D314 7F 00 1C ... clr 001c D317 7F 00 18 ... clr 0018 @@ -10314,6 +10410,7 @@ D329 26 07 &. bne 07 D32B BD D1 05 ... jsr d105 D32E CC 00 01 ... ldd #0001 D331 39 9 rts + D332 20 10 . bra 10 D334 7C 00 18 |.. inc 0018 D337 F6 00 18 ... ldab 0018 @@ -10323,6 +10420,7 @@ D33E BD D1 05 ... jsr d105 D341 5F _ clrb D342 4F O clra D343 39 9 rts + D344 20 D4 . bra d4 D346 3C < pshx D347 3C < pshx @@ -10470,6 +10568,7 @@ D464 38 8 pulx D465 38 8 pulx D466 31 1 ins D467 39 9 rts + D468 37 7 pshb D469 30 0 tsx D46A E6 00 .. ldab 00,x @@ -10482,6 +10581,7 @@ D474 5F _ clrb D475 84 80 .. anda #80 D477 31 1 ins D478 39 9 rts + D479 7F 00 1C ... clr 001c D47C F6 00 1C ... ldab 001c D47F C1 64 .d cmpb #64 @@ -10596,6 +10696,7 @@ D558 ED 00 .. stad 00,x D55A 7C 00 05 |.. inc 0005 D55D 7E D4 A0 ~.. jmp d4a0 D560 39 9 rts + D561 F6 00 06 ... ldab 0006 D564 4F O clra D565 05 . asld @@ -10637,6 +10738,7 @@ D5A3 C1 05 .. cmpb #05 D5A5 26 04 &. bne d5ab D5A7 CC 00 01 ... ldd #0001 D5AA 39 9 rts + D5AB 20 E8 . bra loop ;d595 D5AD 5F _ clrb D5AE 4F O clra @@ -10677,6 +10779,7 @@ D5EA C1 05 .. cmpb #05 D5EC 26 04 &. bne d5f2 D5EE CC 00 01 ... ldd #0001 D5F1 39 9 rts + D5F2 20 E1 . bra loop ;d5d5 D5F4 5F _ clrb D5F5 4F O clra @@ -10700,6 +10803,7 @@ D61B 26 03 &. bne 03 D61D 5F _ clrb D61E 4F O clra D61F 39 9 rts + D620 20 DD . bra dd D622 CC 00 01 ... ldd #0001 D625 39 9 rts @@ -10716,6 +10820,7 @@ D635 AA 00 .. ora 00,x D637 EA 01 .. orb 01,x D639 ED 00 .. stad 00,x D63B 39 9 rts + D63C CC 04 00 ... ldd #0400 D63F 37 7 pshb D640 36 6 psha @@ -10729,6 +10834,7 @@ D64B AA 00 .. ora 00,x D64D EA 01 .. orb 01,x D64F ED 00 .. stad 00,x D651 39 9 rts + D652 CE 00 1A ... ldx #001a D655 1C 00 .. bset add,x 00,x D657 01 . nop @@ -10740,6 +10846,7 @@ D663 01 . nop D664 F6 00 14 ... ldab 0014 D667 F7 38 00 .8. stb 3800 D66A 39 9 rts + D66B F6 0B C0 ... ldab 0bc0 D66E C4 08 .. andb #08 D670 27 07 '. beq 07 @@ -10798,6 +10905,7 @@ D6EE C4 01 .. andb #01 D6F0 27 03 '. beq 03 D6F2 BD C0 E0 ... jsr c0e0 D6F5 39 9 rts + D6F6 F6 0C DB ... ldab 0cdb D6F9 4F O clra D6FA 37 7 pshb @@ -10824,6 +10932,7 @@ D726 F3 0C ED ... addd 0ced D729 F3 0C EF ... addd 0cef D72C FD 0B EF ... stad 0bef D72F 39 9 rts + D730 F6 00 15 ... ldab 0015 D733 C4 1F .. andb #1f D735 27 49 'I beq 49 @@ -10832,7 +10941,7 @@ D73A F3 00 3E ..> addd 003e D73D B3 0B EF ... subd 0bef D740 23 19 #. bls 19 D742 CC B0 6B ..k ldd #b06b -D745 BD C0 BA ... jsr c0ba +D745 BD C0 BA ... jsr c0ba ;display: D748 CC 01 F4 ... ldd #01f4 D74B BD E5 71 ..q jsr e571 D74E BD C5 D3 ... jsr c5d3 @@ -10840,13 +10949,14 @@ D751 CC 01 F4 ... ldd #01f4 D754 BD E5 71 ..q jsr e571 D757 CC 00 01 ... ldd #0001 D75A 39 9 rts + D75B F6 00 15 ... ldab 0015 D75E C4 04 .. andb #04 D760 27 1E '. beq 1e D762 F6 0E 6E ..n ldab 0e6e D765 26 19 &. bne 19 D767 CC B0 76 ..v ldd #b076 -D76A BD C0 BA ... jsr c0ba +D76A BD C0 BA ... jsr c0ba ;display: D76D CC 01 F4 ... ldd #01f4 D770 BD E5 71 ..q jsr e571 D773 BD C5 D3 ... jsr c5d3 @@ -10854,9 +10964,11 @@ D776 CC 01 F4 ... ldd #01f4 D779 BD E5 71 ..q jsr e571 D77C CC 00 01 ... ldd #0001 D77F 39 9 rts + D780 5F _ clrb D781 4F O clra D782 39 9 rts + D783 F6 00 06 ... ldab 0006 D786 4F O clra D787 CE 00 0A ... ldx #000a @@ -10869,11 +10981,14 @@ D794 27 03 '. beq 03 D796 5F _ clrb D797 4F O clra D798 39 9 rts + D799 CC 00 01 ... ldd #0001 D79C 39 9 rts + D79D 5F _ clrb D79E 4F O clra D79F 39 9 rts + D7A0 37 7 pshb D7A1 30 0 tsx D7A2 E6 00 .. ldab 00,x @@ -10925,6 +11040,7 @@ D7FB 5F _ clrb D7FC 4F O clra D7FD 31 1 ins D7FE 39 9 rts + D7FF 7F 00 1C ... clr 001c D802 F6 00 1C ... ldab 001c D805 4F O clra @@ -10960,6 +11076,7 @@ D839 6C 01 l. inc 01,x D83B 26 02 &. bne 02 D83D 6C 00 l. inc 00,x D83F 39 9 rts + D840 FC 00 44 ..D ldd 0044 D843 26 03 &. bne 03 D845 7E D8 D2 ~.. jmp d8d2 @@ -11046,6 +11163,7 @@ D8CD BD FB DF ... jsr fbdf D8D0 31 1 ins D8D1 31 1 ins D8D2 39 9 rts + D8D3 7F 00 18 ... clr 0018 D8D6 F6 00 18 ... ldab 0018 D8D9 C1 10 .. cmpb #10 @@ -11055,50 +11173,52 @@ D8E0 BD E5 71 ..q jsr e571 D8E3 7C 00 18 |.. inc 0018 D8E6 20 EE . bra ee D8E8 39 9 rts + D8E9 F6 00 2B ..+ ldab 002b D8EC C1 00 .. cmpb #00 D8EE 26 18 &. bne 18 D8F0 CC AD 84 ... ldd #ad84 -D8F3 BD C0 BA ... jsr c0ba +D8F3 BD C0 BA ... jsr c0ba ;display: D8F6 8D DB .. bsr dest db D8F8 CC AD 8F ... ldd #ad8f -D8FB BD C0 BA ... jsr c0ba +D8FB BD C0 BA ... jsr c0ba ;display: D8FE 8D D3 .. bsr dest d3 D900 CC AD 9A ... ldd #ad9a -D903 BD C0 BA ... jsr c0ba +D903 BD C0 BA ... jsr c0ba ;display: D906 20 4E N bra 4e D908 C1 01 .. cmpb #01 D90A 26 18 &. bne 18 D90C CC AD 63 ..c ldd #ad63 -D90F BD C0 BA ... jsr c0ba +D90F BD C0 BA ... jsr c0ba ;display: D912 8D BF .. bsr dest bf D914 CC AD 6E ..n ldd #ad6e -D917 BD C0 BA ... jsr c0ba +D917 BD C0 BA ... jsr c0ba ;display: D91A 8D B7 .. bsr dest b7 D91C CC AD 79 ..y ldd #ad79 -D91F BD C0 BA ... jsr c0ba +D91F BD C0 BA ... jsr c0ba ;display: D922 20 32 2 bra 32 D924 C1 02 .. cmpb #02 D926 26 18 &. bne 18 D928 CC AD 42 ..B ldd #ad42 -D92B BD C0 BA ... jsr c0ba +D92B BD C0 BA ... jsr c0ba ;display: D92E 8D A3 .. bsr dest a3 D930 CC AD 4D ..M ldd #ad4d -D933 BD C0 BA ... jsr c0ba +D933 BD C0 BA ... jsr c0ba ;display: D936 8D 9B .. bsr dest 9b D938 CC AD 58 ..X ldd #ad58 -D93B BD C0 BA ... jsr c0ba +D93B BD C0 BA ... jsr c0ba ;display: D93E 20 16 . bra 16 D940 CC AD 21 ..! ldd #ad21 -D943 BD C0 BA ... jsr c0ba +D943 BD C0 BA ... jsr c0ba ;display: D946 8D 8B .. bsr dest 8b D948 CC AD 2C .., ldd #ad2c -D94B BD C0 BA ... jsr c0ba +D94B BD C0 BA ... jsr c0ba ;display: D94E 8D 83 .. bsr dest 83 D950 CC AD 37 ..7 ldd #ad37 -D953 BD C0 BA ... jsr c0ba +D953 BD C0 BA ... jsr c0ba ;display: D956 BD D8 D3 ... jsr d8d3 D959 39 9 rts + D95A F6 00 06 ... ldab 0006 D95D F1 0B AF ... cmpb 0baf D960 26 0D &. bne 0d @@ -11139,6 +11259,7 @@ D9B9 F6 0B B0 ... ldab 0bb0 D9BC F7 00 06 ... stb 0006 D9BF 8D 01 .. bsr dest 01 D9C1 39 9 rts + D9C2 CC 03 E8 ... ldd #03e8 D9C5 BD E5 71 ..q jsr e571 D9C8 BD D7 83 ... jsr d783 @@ -11224,6 +11345,7 @@ DA5E BD FB DF ... jsr fbdf DA61 31 1 ins DA62 31 1 ins DA63 39 9 rts + DA64 FE 0B B9 ... ldx 0bb9 DA67 08 . inx DA68 FF 0B B9 ... stx 0bb9 @@ -11344,24 +11466,25 @@ DB3D CE 00 11 ... ldx #0011 DB40 1C 00 .. bset add,x 00,x DB42 10 . sba DB43 39 9 rts + DB44 F6 00 2B ..+ ldab 002b DB47 C1 00 .. cmpb #00 DB49 26 08 &. bne 08 DB4B CC AC DF ... ldd #acdf -DB4E BD C0 BA ... jsr c0ba +DB4E BD C0 BA ... jsr c0ba ;display: DB51 20 1E . bra 1e DB53 C1 01 .. cmpb #01 DB55 26 08 &. bne 08 DB57 CC AC D4 ... ldd #acd4 -DB5A BD C0 BA ... jsr c0ba +DB5A BD C0 BA ... jsr c0ba ;display: DB5D 20 12 . bra 12 DB5F C1 02 .. cmpb #02 DB61 26 08 &. bne 08 DB63 CC AC EA ... ldd #acea -DB66 BD C0 BA ... jsr c0ba +DB66 BD C0 BA ... jsr c0ba ;display: DB69 20 06 . bra 06 DB6B CC AC D4 ... ldd #acd4 -DB6E BD C0 BA ... jsr c0ba +DB6E BD C0 BA ... jsr c0ba ;display: DB71 BD D8 D3 ... jsr d8d3 DB74 CE 00 01 ... ldx #0001 DB77 3C < pshx @@ -11382,22 +11505,23 @@ DB9A F6 00 2B ..+ ldab 002b DB9D C1 00 .. cmpb #00 DB9F 26 08 &. bne 08 DBA1 CC AD 16 ... ldd #ad16 -DBA4 BD C0 BA ... jsr c0ba +DBA4 BD C0 BA ... jsr c0ba ;display: DBA7 20 1E . bra 1e DBA9 C1 01 .. cmpb #01 DBAB 26 08 &. bne 08 DBAD CC AD 0B ... ldd #ad0b -DBB0 BD C0 BA ... jsr c0ba +DBB0 BD C0 BA ... jsr c0ba ;display: DBB3 20 12 . bra 12 DBB5 C1 02 .. cmpb #02 DBB7 26 08 &. bne 08 DBB9 CC AD 00 ... ldd #ad00 -DBBC BD C0 BA ... jsr c0ba +DBBC BD C0 BA ... jsr c0ba ;display: DBBF 20 06 . bra 06 DBC1 CC AC F5 ... ldd #acf5 -DBC4 BD C0 BA ... jsr c0ba +DBC4 BD C0 BA ... jsr c0ba ;display: DBC7 BD D8 D3 ... jsr d8d3 DBCA 39 9 rts + DBCB F6 00 1B ... ldab 001b DBCE C4 01 .. andb #01 DBD0 26 03 &. bne 03 @@ -11502,6 +11626,7 @@ DC9B C4 08 .. andb #08 DC9D 26 03 &. bne 03 DC9F BD D9 5A ..Z jsr d95a DCA2 39 9 rts + DCA3 CE 0B BC ... ldx #0bbc DCA6 1D 00 .. bclr add,x 00,x DCA8 1C F6 .. bset add,x f6,x @@ -11643,7 +11768,8 @@ DDCC 7C 0C DC |.. inc 0cdc DDCF C6 04 .. ldab #04 DDD1 F7 00 48 ..H stb 0048 DDD4 39 9 rts -DDD5 BD BE 69 ..i jsr be69 + +DDD5 BD BE 69 ..i jsr be69 ;jump3 DDD8 C6 03 .. ldab #03 DDDA F7 00 1C ... stb 001c DDDD F6 00 1C ... ldab 001c @@ -11667,11 +11793,13 @@ DE00 BD BE 10 ... jsr be10 DE03 C6 14 .. ldab #14 DE05 F7 00 2C .., stb 002c DE08 39 9 rts + DE09 CC 0B 9A ... ldd #0b9a -DE0C BD C0 BA ... jsr c0ba +DE0C BD C0 BA ... jsr c0ba ;display: DE0F C6 14 .. ldab #14 DE11 F7 00 2C .., stb 002c DE14 39 9 rts + DE15 F6 00 1B ... ldab 001b DE18 C4 01 .. andb #01 DE1A 26 03 &. bne 03 @@ -11734,6 +11862,7 @@ DE9E 1D 00 .. bclr add,x 00,x DEA0 01 . nop DEA1 7F 00 4F ..O clr 004f DEA4 39 9 rts + DEA5 F6 00 2B ..+ ldab 002b DEA8 C1 00 .. cmpb #00 DEAA 26 0D &. bne 0d @@ -11765,6 +11894,7 @@ DEDF CC AE 44 ..D ldd #ae44 DEE2 BD C0 2E ... jsr c02e DEE5 38 8 pulx DEE6 39 9 rts + DEE7 F6 0B C0 ... ldab 0bc0 DEEA C4 01 .. andb #01 DEEC 26 07 &. bne 07 @@ -11801,6 +11931,7 @@ DF34 27 07 '. beq 07 DF36 BD D6 52 ..R jsr d652 DF39 BD DE A5 ... jsr dea5 DF3C 39 9 rts + DF3D F6 00 4F ..O ldab 004f DF40 26 06 &. bne 06 DF42 CE 00 1B ... ldx #001b @@ -11826,7 +11957,7 @@ DF70 27 03 '. beq 03 DF72 7E E0 66 ~.f jmp e066 DF75 F6 00 34 ..4 ldab 0034 DF78 26 0B &. bne 0b -DF7A BD BE 69 ..i jsr be69 +DF7A BD BE 69 ..i jsr be69 ;jump3 DF7D C6 32 .2 ldab #32 DF7F F7 00 34 ..4 stb 0034 DF82 7E E0 63 ~.c jmp e063 @@ -12010,20 +12141,20 @@ E11A F6 00 2B ..+ ldab 002b E11D C1 00 .. cmpb #00 E11F 26 08 &. bne 08 E121 CC AC C9 ... ldd #acc9 -E124 BD C0 BA ... jsr c0ba +E124 BD C0 BA ... jsr c0ba ;display: E127 20 1E . bra 1e E129 C1 01 .. cmpb #01 E12B 26 08 &. bne 08 E12D CC AC BE ... ldd #acbe -E130 BD C0 BA ... jsr c0ba +E130 BD C0 BA ... jsr c0ba ;display: E133 20 12 . bra 12 E135 C1 02 .. cmpb #02 E137 26 08 &. bne 08 E139 CC AC B3 ... ldd #acb3 -E13C BD C0 BA ... jsr c0ba +E13C BD C0 BA ... jsr c0ba ;display: E13F 20 06 . bra 06 E141 CC AC A8 ... ldd #aca8 -E144 BD C0 BA ... jsr c0ba +E144 BD C0 BA ... jsr c0ba ;display: E147 BD D8 D3 ... jsr d8d3 E14A CE 00 00 ... ldx #0000 E14D 3C < pshx @@ -12083,6 +12214,7 @@ E1D2 BD C0 E0 ... jsr c0e0 E1D5 83 00 00 ... subd #0000 E1D8 26 01 &. bne 01 E1DA 39 9 rts + E1DB 20 03 . bra 03 E1DD BD C5 D3 ... jsr c5d3 E1E0 BD D6 52 ..R jsr d652 @@ -12297,20 +12429,20 @@ E38A F6 00 2B ..+ ldab 002b E38D C1 00 .. cmpb #00 E38F 26 08 &. bne 08 E391 CC AC C9 ... ldd #acc9 -E394 BD C0 BA ... jsr c0ba +E394 BD C0 BA ... jsr c0ba ;display: E397 20 1E . bra 1e E399 C1 01 .. cmpb #01 E39B 26 08 &. bne 08 E39D CC AC BE ... ldd #acbe -E3A0 BD C0 BA ... jsr c0ba +E3A0 BD C0 BA ... jsr c0ba ;display: E3A3 20 12 . bra 12 E3A5 C1 02 .. cmpb #02 E3A7 26 08 &. bne 08 E3A9 CC AC B3 ... ldd #acb3 -E3AC BD C0 BA ... jsr c0ba +E3AC BD C0 BA ... jsr c0ba ;display: E3AF 20 06 . bra 06 E3B1 CC AC A8 ... ldd #aca8 -E3B4 BD C0 BA ... jsr c0ba +E3B4 BD C0 BA ... jsr c0ba ;display: E3B7 BD D8 D3 ... jsr d8d3 E3BA CE 00 17 ... ldx #0017 E3BD 1C 00 .. bset add,x 00,x @@ -12411,20 +12543,20 @@ E491 F6 00 2B ..+ ldab 002b E494 C1 00 .. cmpb #00 E496 26 08 &. bne 08 E498 CC AD 16 ... ldd #ad16 -E49B BD C0 BA ... jsr c0ba +E49B BD C0 BA ... jsr c0ba ;display: E49E 20 1E . bra 1e E4A0 C1 01 .. cmpb #01 E4A2 26 08 &. bne 08 E4A4 CC AD 0B ... ldd #ad0b -E4A7 BD C0 BA ... jsr c0ba +E4A7 BD C0 BA ... jsr c0ba ;display: E4AA 20 12 . bra 12 E4AC C1 02 .. cmpb #02 E4AE 26 08 &. bne 08 E4B0 CC AD 00 ... ldd #ad00 -E4B3 BD C0 BA ... jsr c0ba +E4B3 BD C0 BA ... jsr c0ba ;display: E4B6 20 06 . bra 06 E4B8 CC AC F5 ... ldd #acf5 -E4BB BD C0 BA ... jsr c0ba +E4BB BD C0 BA ... jsr c0ba ;display: E4BE BD D8 D3 ... jsr d8d3 E4C1 CE 00 01 ... ldx #0001 E4C4 3C < pshx @@ -12539,7 +12671,7 @@ E586 6A 00 j. dec 00,x E588 C1 00 .. cmpb #00 E58A 23 02 #. bls 02 E58C 20 F5 . bra f5 -E58E BD E6 1B ... jsr e61b +E58E BD E6 1B ... jsr e61b ;jump4 E591 20 E1 . bra e1 E593 38 8 pulx ;this must just be a standard 'pull 3 E594 31 1 ins ;bytes and I don't care where they go' @@ -12576,6 +12708,7 @@ E5C8 FD 00 3B ..; stad 003b E5CB C6 02 .. ldab #02 E5CD F7 00 33 ..3 stb 0033 E5D0 39 9 rts + E5D1 C6 0B .. ldab #0b E5D3 F7 00 32 ..2 stb 0032 E5D6 39 9 rts @@ -12624,6 +12757,7 @@ E618 38 8 pulx E619 38 8 pulx E61A 39 9 rts +jump4: E61B C6 0A .. ldab #0a E61D F7 00 31 ..1 stb 0031 E620 39 9 rts @@ -12632,7 +12766,7 @@ E621 38 8 pulx E622 37 7 pshb E623 36 6 psha E624 3C < pshx -E625 BD BE 4B ..K jsr be4b +E625 BD BE 4B ..K jsr be4b ;jump1 E628 30 0 tsx E629 EC 04 .. ldd 04,x E62B 37 7 pshb @@ -12837,6 +12971,7 @@ E78E CB 30 .0 addb #30 E790 F7 00 5F .._ stb 005f E793 38 8 pulx E794 39 9 rts + E795 37 7 pshb E796 36 6 psha E797 30 0 tsx @@ -12867,6 +13002,7 @@ E7C0 CB 30 .0 addb #30 E7C2 F7 00 5F .._ stb 005f E7C5 38 8 pulx E7C6 39 9 rts + E7C7 F6 00 06 ... ldab 0006 E7CA 4F O clra E7CB CE 00 05 ... ldx #0005 @@ -12977,6 +13113,7 @@ E893 AA 00 .. ora 00,x E895 EA 01 .. orb 01,x E897 ED 00 .. stad 00,x E899 39 9 rts + E89A 5F _ clrb E89B 4F O clra E89C FD 00 0F ... stad 000f @@ -13037,6 +13174,7 @@ E923 05 . asld E924 B3 0B B7 ... subd 0bb7 E927 FD 00 0F ... stad 000f E92A 39 9 rts + E92B 34 4 des E92C 30 0 tsx E92D 6F 00 o. clr 00,x @@ -13144,6 +13282,7 @@ E9E2 FD 0D 1D ... stad 0d1d E9E5 FD 0D 1B ... stad 0d1b E9E8 31 1 ins E9E9 39 9 rts + E9EA 7F 00 06 ... clr 0006 E9ED F6 00 06 ... ldab 0006 E9F0 C1 64 .d cmpb #64 @@ -13205,6 +13344,7 @@ EA51 ED 00 .. stad 00,x EA53 7C 00 06 |.. inc 0006 EA56 20 95 . bra 95 EA58 39 9 rts + EA59 34 4 des EA5A CE 00 04 ... ldx #0004 EA5D 3C < pshx @@ -13226,18 +13366,18 @@ EA80 7F 0B A8 ... clr 0ba8 EA83 F6 18 00 ... ldab 1800 EA86 C4 01 .. andb #01 EA88 26 1C &. bne 1c -EA8A BD BE 4B ..K jsr be4b +EA8A BD BE 4B ..K jsr be4b ;jump1 EA8D 0F . sei EA8E BD BE 01 ... jsr be01 EA91 0E . cli EA92 CC 01 F4 ... ldd #01f4 EA95 BD E5 71 ..q jsr e571 EA98 CC AF D1 ... ldd #afd1 -EA9B BD C0 BA ... jsr c0ba +EA9B BD C0 BA ... jsr c0ba ;display: EA9E CC 01 F4 ... ldd #01f4 EAA1 BD E5 71 ..q jsr e571 EAA4 20 DD . bra dd -EAA6 BD BE 69 ..i jsr be69 +EAA6 BD BE 69 ..i jsr be69 ;jump3 EAA9 C6 01 .. ldab #01 EAAB F7 00 14 ... stb 0014 EAAE F6 00 14 ... ldab 0014 @@ -13283,11 +13423,11 @@ EB0E 7E ED F8 ~.. jmp edf8 EB11 CC 5A 5A .ZZ ldd #5a5a EB14 FD 10 16 ... stad 1016 EB17 CC B1 39 ..9 ldd #b139 -EB1A BD C0 BA ... jsr c0ba +EB1A BD C0 BA ... jsr c0ba ;display: EB1D CC 07 D0 ... ldd #07d0 EB20 BD E5 71 ..q jsr e571 EB23 CC B1 44 ..D ldd #b144 -EB26 BD C0 BA ... jsr c0ba +EB26 BD C0 BA ... jsr c0ba ;display: EB29 CC 07 D0 ... ldd #07d0 EB2C BD E5 71 ..q jsr e571 EB2F CC 00 14 ... ldd #0014 @@ -13300,7 +13440,7 @@ EB3D 30 0 tsx EB3E E6 00 .. ldab 00,x EB40 C1 0A .. cmpb #0a EB42 24 3B $; bcc 3b -EB44 BD BE 4B ..K jsr be4b +EB44 BD BE 4B ..K jsr be4b ;jump1 EB47 C6 2E .. ldab #2e EB49 37 7 pshb EB4A 30 0 tsx @@ -13311,7 +13451,7 @@ EB51 8F . xgdx EB52 33 3 pulb EB53 E7 00 .. stb 00,x EB55 0F . sei -EB56 BD BE 69 ..i jsr be69 +EB56 BD BE 69 ..i jsr be69 ;jump3 EB59 CE 10 28 ..( ldx #1028 EB5C 1C 00 .. bset add,x 00,x EB5E 40 @ nega @@ -13331,7 +13471,7 @@ EB7A 30 0 tsx EB7B 6C 00 l. inc 00,x EB7D 20 BE . bra be EB7F 20 B4 . bra b4 -EB81 BD BE 69 ..i jsr be69 +EB81 BD BE 69 ..i jsr be69 ;jump3 EB84 CC 08 00 ... ldd #0800 EB87 FD 00 73 ..s stad 0073 EB8A FC 00 73 ..s ldd 0073 @@ -13649,11 +13789,12 @@ EDFB F6 00 14 ... ldab 0014 EDFE F7 38 00 .8. stb 3800 EE01 31 1 ins EE02 39 9 rts + EE03 37 7 pshb EE04 36 6 psha EE05 30 0 tsx EE06 EC 00 .. ldd 00,x -EE08 BD C0 BA ... jsr c0ba +EE08 BD C0 BA ... jsr c0ba ;display: EE0B CE 10 16 ... ldx #1016 EE0E 1D 01 .. bclr add,x 01,x EE10 FF CC 05 ... stx cc05 @@ -13661,6 +13802,7 @@ EE13 DC BD E5 ... ldd bd EE16 71 q illegal EE17 38 8 pulx EE18 39 9 rts + EE19 BD E5 D1 ... jsr e5d1 EE1C CE 10 16 ... ldx #1016 EE1F 1D 01 .. bclr add,x 01,x @@ -13671,7 +13813,7 @@ EE27 5A Z decb EE28 F6 10 16 ... ldab 1016 EE2B 26 0C &. bne 0c EE2D CC B1 4F ..O ldd #b14f -EE30 BD C0 BA ... jsr c0ba +EE30 BD C0 BA ... jsr c0ba ;display: EE33 CC 05 DC ... ldd #05dc EE36 BD E5 71 ..q jsr e571 EE39 C6 04 .. ldab #04 @@ -13989,7 +14131,7 @@ F144 FC 10 16 ... ldd 1016 F147 83 5A 5A .ZZ subd #5a5a F14A 26 0C &. bne 0c F14C CC B1 BD ... ldd #b1bd -F14F BD C0 BA ... jsr c0ba +F14F BD C0 BA ... jsr c0ba ;display: F152 CC 05 DC ... ldd #05dc F155 BD E5 71 ..q jsr e571 F158 7E EE 1C ~.. jmp ee1c @@ -14011,7 +14153,7 @@ F171 C4 40 .@ andb #40 F173 27 0A '. beq 0a F175 F6 00 39 ..9 ldab 0039 F178 27 05 '. beq 05 -F17A BD E6 1B ... jsr e61b +F17A BD E6 1B ... jsr e61b ;jump4 F17D 20 EA . bra ea F17F F6 00 39 ..9 ldab 0039 F182 26 08 &. bne 08 @@ -14722,10 +14864,10 @@ F7BA 27 03 '. beq 03 F7BC 7A 00 25 z.% dec 0025 F7BF F6 00 31 ..1 ldab 0031 F7C2 26 03 &. bne 03 -F7C4 BD FE 69 ..i jsr fe69 +F7C4 BD FE 69 ..i jsr fe69 ;inhibit interrupts F7C7 F6 00 7F ... ldab 007f F7CA 27 03 '. beq 03 -F7CC BD FE 69 ..i jsr fe69 +F7CC BD FE 69 ..i jsr fe69 ;inhibit interrupts F7CF C6 40 .@ ldab #40 F7D1 F7 10 25 ..% stb 1025 F7D4 38 8 pulx @@ -14733,43 +14875,44 @@ F7D5 3B ; rti main: -F7D6 7F 00 14 ... clr 0014 -F7D9 5F _ clrb -F7DA F7 38 00 .8. stb 3800 -F7DD C6 7F .. ldab #7f -F7DF F7 00 1A ... stb 001a -F7E2 C6 7F .. ldab #7f +F7D6 7F 00 14 ... clr 0014 ;0 -> 0014 +F7D9 5F _ clrb ;0 -> B +F7DA F7 38 00 .8. stb 3800 ;B -> 3800 +F7DD C6 7F .. ldab #7f ;7F -> B +F7DF F7 00 1A ... stb 001a ;B -> 001a +F7E2 C6 7F .. ldab #7f ;7F -> B F7E4 F7 30 00 .0. stb 3000 ;snack motor drivers serial data is bit 7 -F7E7 C6 07 .. ldab #07 +F7E7 C6 07 .. ldab #07 ;7 -> B F7E9 F7 10 3C ..< stb 103c -F7EC C6 81 .. ldab #81 +F7EC C6 81 .. ldab #81 ;81 -> B F7EE F7 10 26 ..& stb 1026 -F7F1 5F _ clrb +F7F1 5F _ clrb ;0 -> B F7F2 F7 10 30 ..0 stb 1030 -F7F5 C6 C8 .. ldab #c8 +F7F5 C6 C8 .. ldab #c8 ;c8 -> B F7F7 F7 10 00 ... stb 1000 -F7FA C6 3E .> ldab #3e +F7FA C6 3E .> ldab #3e ;3e -> B F7FC F7 10 09 ... stb 1009 -F7FF C6 12 .. ldab #12 +F7FF C6 12 .. ldab #12 ;12 -> B F801 F7 10 28 ..( stb 1028 -F804 BD BE 69 ..i jsr be69 + +F804 BD BE 69 ..i jsr be69 ;jump3 F807 BD EA 59 ..Y jsr ea59 F80A CC 00 64 ..d ldd #0064 F80D BD E5 71 ..q jsr e571 F810 CC B1 EF ... ldd #b1ef " ROWE INT " -F813 BD C0 BA ... jsr c0ba +F813 BD C0 BA ... jsr c0ba ;display: F816 CC 01 F4 ... ldd #01f4 F819 BD E5 71 ..q jsr e571 F81C CC B1 FA ... ldd #b1fa "COPYRIGHT " -F81F BD C0 BA ... jsr c0ba +F81F BD C0 BA ... jsr c0ba ;display: F822 CC 01 F4 ... ldd #01f4 F825 BD E5 71 ..q jsr e571 F828 CC B2 05 ... ldd #b205 " 1993 " -F82B BD C0 BA ... jsr c0ba +F82B BD C0 BA ... jsr c0ba ;display: F82E CC 01 F4 ... ldd #01f4 F831 BD E5 71 ..q jsr e571 F834 CC B2 10 ... ldd #b210 "5900 VER 5" -F837 BD C0 BA ... jsr c0ba +F837 BD C0 BA ... jsr c0ba ;display: F83A CC 00 0A ... ldd #000a F83D BD E5 71 ..q jsr e571 F840 7F 00 7F ... clr 007f @@ -14852,7 +14995,7 @@ F8F6 BD E5 71 ..q jsr e571 F8F9 C6 1E .. ldab #1e F8FB F7 00 35 ..5 stb 0035 F8FE 0E . cli -F8FF BD E6 1B ... jsr e61b +F8FF BD E6 1B ... jsr e61b ;jump4 F902 BD D1 05 ... jsr d105 F905 F6 10 0A ... ldab 100a F908 C4 08 .. andb #08 @@ -14865,7 +15008,7 @@ F916 1C 00 .. bset add,x 00,x F918 04 . lsrd F919 F6 00 1A ... ldab 001a F91C F7 30 00 .0. stb 3000 ;snack motor drivers serial data is bit 7 -F91F BD E6 1B ... jsr e61b +F91F BD E6 1B ... jsr e61b ;jump4 F922 20 E8 . bra e8 F924 BD D0 94 ... jsr d094 F927 F6 0B C0 ... ldab 0bc0 @@ -15006,7 +15149,7 @@ FA55 F6 00 1A ... ldab 001a FA58 F7 30 00 .0. stb 3000 ;snack motor drivers serial data is bit 7 FA5B BD D4 79 ..y jsr d479 FA5E BD E8 9A ... jsr e89a -FA61 BD BE 69 ..i jsr be69 +FA61 BD BE 69 ..i jsr be69 ;jump3 FA64 7F 00 06 ... clr 0006 FA67 CE 00 1F ... ldx #001f FA6A 1D 00 .. bclr add,x 00,x @@ -15063,89 +15206,89 @@ FAD7 BD 81 00 ... jsr 8100 FADA 20 03 . bra 03 FADC BD 84 A0 ... jsr 84a0 FADF 7E F8 FF ~.. jmp f8ff -FAE2 CC B1 2E ... ldd #b12e -FAE5 BD C0 BA ... jsr c0ba +FAE2 CC B1 2E ... ldd #b12e ;"**ERROR***" +FAE5 BD C0 BA ... jsr c0ba ;display: FAE8 CC 07 D0 ... ldd #07d0 FAEB BD E5 71 ..q jsr e571 FAEE 3B ; rti -FAEF CC B1 2E ... ldd #b12e -FAF2 BD C0 BA ... jsr c0ba +FAEF CC B1 2E ... ldd #b12e ;"**ERROR***" +FAF2 BD C0 BA ... jsr c0ba ;display: FAF5 CC 07 D0 ... ldd #07d0 FAF8 BD E5 71 ..q jsr e571 FAFB 3B ; rti -FAFC CC B1 2E ... ldd #b12e -FAFF BD C0 BA ... jsr c0ba +FAFC CC B1 2E ... ldd #b12e ;"**ERROR***" +FAFF BD C0 BA ... jsr c0ba ;display: FB02 CC 07 D0 ... ldd #07d0 FB05 BD E5 71 ..q jsr e571 FB08 3B ; rti -FB09 CC B1 2E ... ldd #b12e -FB0C BD C0 BA ... jsr c0ba +FB09 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB0C BD C0 BA ... jsr c0ba ;display: FB0F CC 07 D0 ... ldd #07d0 FB12 BD E5 71 ..q jsr e571 FB15 3B ; rti -FB16 CC B1 2E ... ldd #b12e -FB19 BD C0 BA ... jsr c0ba +FB16 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB19 BD C0 BA ... jsr c0ba ;display: FB1C CC 07 D0 ... ldd #07d0 FB1F BD E5 71 ..q jsr e571 FB22 3B ; rti -FB23 CC B1 2E ... ldd #b12e -FB26 BD C0 BA ... jsr c0ba +FB23 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB26 BD C0 BA ... jsr c0ba ;display: FB29 CC 07 D0 ... ldd #07d0 FB2C BD E5 71 ..q jsr e571 FB2F 3B ; rti -FB30 CC B1 2E ... ldd #b12e -FB33 BD C0 BA ... jsr c0ba +FB30 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB33 BD C0 BA ... jsr c0ba ;display: FB36 CC 07 D0 ... ldd #07d0 FB39 BD E5 71 ..q jsr e571 FB3C 3B ; rti -FB3D CC B1 2E ... ldd #b12e -FB40 BD C0 BA ... jsr c0ba +FB3D CC B1 2E ... ldd #b12e ;"**ERROR***" +FB40 BD C0 BA ... jsr c0ba ;display: FB43 CC 07 D0 ... ldd #07d0 FB46 BD E5 71 ..q jsr e571 FB49 3B ; rti -FB4A CC B1 2E ... ldd #b12e -FB4D BD C0 BA ... jsr c0ba +FB4A CC B1 2E ... ldd #b12e ;"**ERROR***" +FB4D BD C0 BA ... jsr c0ba ;display: FB50 CC 07 D0 ... ldd #07d0 FB53 BD E5 71 ..q jsr e571 FB56 3B ; rti -FB57 CC B1 2E ... ldd #b12e -FB5A BD C0 BA ... jsr c0ba +FB57 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB5A BD C0 BA ... jsr c0ba ;display: FB5D CC 07 D0 ... ldd #07d0 FB60 BD E5 71 ..q jsr e571 FB63 3B ; rti -FB64 CC B1 2E ... ldd #b12e -FB67 BD C0 BA ... jsr c0ba +FB64 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB67 BD C0 BA ... jsr c0ba ;display: FB6A CC 07 D0 ... ldd #07d0 FB6D BD E5 71 ..q jsr e571 FB70 3B ; rti -FB71 CC B1 2E ... ldd #b12e -FB74 BD C0 BA ... jsr c0ba +FB71 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB74 BD C0 BA ... jsr c0ba ;display: FB77 CC 07 D0 ... ldd #07d0 FB7A BD E5 71 ..q jsr e571 FB7D 3B ; rti -FB7E CC B1 2E ... ldd #b12e -FB81 BD C0 BA ... jsr c0ba +FB7E CC B1 2E ... ldd #b12e ;"**ERROR***" +FB81 BD C0 BA ... jsr c0ba ;display: FB84 CC 07 D0 ... ldd #07d0 FB87 BD E5 71 ..q jsr e571 FB8A 3B ; rti -FB8B CC B1 2E ... ldd #b12e -FB8E BD C0 BA ... jsr c0ba +FB8B CC B1 2E ... ldd #b12e ;"**ERROR***" +FB8E BD C0 BA ... jsr c0ba ;display: FB91 CC 07 D0 ... ldd #07d0 FB94 BD E5 71 ..q jsr e571 FB97 3B ; rti -FB98 CC B1 2E ... ldd #b12e -FB9B BD C0 BA ... jsr c0ba +FB98 CC B1 2E ... ldd #b12e ;"**ERROR***" +FB9B BD C0 BA ... jsr c0ba ;display: FB9E CC 07 D0 ... ldd #07d0 FBA1 BD E5 71 ..q jsr e571 FBA4 3B ; rti -FBA5 CC B1 2E ... ldd #b12e -FBA8 BD C0 BA ... jsr c0ba +FBA5 CC B1 2E ... ldd #b12e ;"**ERROR***" +FBA8 BD C0 BA ... jsr c0ba ;display: FBAB CC 07 D0 ... ldd #07d0 FBAE BD E5 71 ..q jsr e571 FBB1 3B ; rti -FBB2 BD FE 69 ..i jsr fe69 +FBB2 BD FE 69 ..i jsr fe69 ;inhibit interrupts FBB5 3B ; rti -FBB6 BD FE 69 ..i jsr fe69 +FBB6 BD FE 69 ..i jsr fe69 ;inhibit interrupts FBB9 3B ; rti FBBA 3C < pshx FBBB 37 7 pshb @@ -15512,6 +15655,8 @@ FE12 31 1 ins FE13 31 1 ins FE14 31 1 ins FE15 39 9 rts + +jump2: FE16 38 8 pulx FE17 A3 00 .. subd 00,x FE19 2D 05 -. blt 05 @@ -15528,6 +15673,7 @@ FE2C EC 00 .. ldd 00,x FE2E 30 0 tsx FE2F ED 00 .. stad 00,x FE31 39 9 rts + FE32 38 8 pulx FE33 6D 04 m. tst 04,x FE35 26 04 &. bne 04 @@ -15545,24 +15691,25 @@ FE47 6E 00 n. jmp 00,x reset: -FE49 86 40 .@ ldaa #40 -FE4B B7 10 24 ..$ sta 1024 -FE4E 86 A0 .. ldaa #a0 -FE50 B7 10 39 ..9 sta 1039 +FE49 86 40 .@ ldaa #40 ;40 -> A +FE4B B7 10 24 ..$ sta 1024 ;A -> 1024 +FE4E 86 A0 .. ldaa #a0 ;a0 -> A +FE50 B7 10 39 ..9 sta 1039 ;A -> 1024 FE53 8E 00 EF ... lds #00ef -FE56 CE 00 00 ... ldx #0000 -FE59 8C 00 80 ... cpx #0080 ;wipe 0000-007f -FE5C 24 05 $. bcc fe63 -FE5E 6F 00 o. clr 00,x -FE60 08 . inx -FE61 20 F6 . bra fe59 -FE63 BD F7 D6 ... jsr f7d6 -FE66 7E FE 6D ~.m jmp fe6d - -FE69 0F . sei -FE6A 7E FE 49 ~.I jmp fe49 +FE56 CE 00 00 ... ldx #0000 ;wipe 0000-007f X=0000 +FE59 8C 00 80 ... cpx #0080 ;loop: if X = 0080 +FE5C 24 05 $. bcc fe63 ; finished +FE5E 6F 00 o. clr 00,x ; else: load addr X with 0 +FE60 08 . inx ; increment X +FE61 20 F6 . bra fe59 ;repeat +FE63 BD F7 D6 ... jsr f7d6 ;goto main: +FE66 7E FE 6D ~.m jmp fe6d ; + +FE69 0F . sei ;inhibit interrupts +FE6A 7E FE 49 ~.I jmp fe49 ;goto reset: FE6D 20 FE . bra fe6d ;loop forever + ;[SAF] - wait for interrupts? FE6F FF FF FF ... stx ffff FE72 FF FF FF ... stx ffff @@ -15707,4 +15854,4 @@ FFD6 ;vectors .word fbb2 .word fbb6 .word fe49 - \ No newline at end of file +