git.ucc.asn.au
/
uccvend-snackrom.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
daf56fb
)
*** empty log message ***
author
Mark Tearle
<
[email protected]
>
Fri, 28 Sep 2001 09:05:37 +0000
(09:05 +0000)
committer
Mark Tearle
<
[email protected]
>
Fri, 28 Sep 2001 09:05:37 +0000
(09:05 +0000)
ROM/vend.asm
patch
|
blob
|
history
diff --git
a/ROM/vend.asm
b/ROM/vend.asm
index
a07eac6
..
8be094b
100644
(file)
--- 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?
; 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
8000 43 C coma
8001 20 50 P bra 50
8003 4F O clra
@@
-7772,9
+7783,10
@@
BE61 E7 00 .. stb 00,x
BE63 7C 00 1C |.. inc 001c
BE66 20 E6 . bra e6
BE68 39 9 rts
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
+
+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
BE70 E5 96 .. bitb 96,x
BE72 CE 10 00 ... ldx #1000
BE75 1C 00 .. bset add,x 00,x
@@
-7798,6
+7810,7
@@
BE97 CE 10 28 ..( ldx #1028
BE9A 1D 00 .. bclr add,x 00,x
BE9C 40 @ nega
BE9D 39 9 rts
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
BE9E 37 7 pshb
BE9F 36 6 psha
BEA0 8D A9 .. bsr dest a9
@@
-8029,6
+8042,7
@@
C028 40 @ nega
C029 BD BE 10 ... jsr be10
C02C 38 8 pulx
C02D 39 9 rts
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
C02E 37 7 pshb
C02F 36 6 psha
C030 3C < pshx
@@
-8130,6
+8144,7
@@
C0DA BD C0 2E ... jsr c02e
C0DD 38 8 pulx
C0DE 38 8 pulx
C0DF 39 9 rts
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
C0E0 F6 00 15 ... ldab 0015
C0E3 2C 02 ,. bge 02
C0E5 20 F9 . bra f9
@@
-8145,6
+8160,7
@@
C0F8 1D 00 .. bclr add,x 00,x
C0FA 20 5F _ bra 5f
C0FC 4F O clra
C0FD 39 9 rts
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
C0FE CE 00 14 ... ldx #0014
C101 1C 00 .. bset add,x 00,x
C103 01 . nop
@@
-8167,6
+8183,7
@@
C12B 1D 00 .. bclr add,x 00,x
C12D 20 5F _ bra 5f
C12F 4F O clra
C130 39 9 rts
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
C131 20 E6 . bra e6
C133 FC 00 3E ..> ldd 003e
C136 F3 00 40 ..@ addd 0040
@@
-8430,6
+8447,7
@@
C320 20 CC . bra cc
C322 00 . test
C323 01 . nop
C324 39 9 rts
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
C325 F6 10 00 ... ldab 1000
C328 C4 01 .. andb #01
C32A 26 13 &. bne 13
@@
-8542,6
+8560,7
@@
C426 FD 00 3E ..> stad 003e
C429 7F 00 7D ..} clr 007d
C42C 7F 00 7E ..~ clr 007e
C42F 39 9 rts
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
C430 F6 00 01 ... ldab 0001
C433 53 S comb
C434 F4 00 1A ... andb 001a
@@
-8556,6
+8575,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
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
C456 FC 00 40 ..@ ldd 0040
C459 26 03 &. bne 03
C45B 7E C5 C6 ~.. jmp c5c6
@@
-8780,6
+8800,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
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
C67D F6 00 30 ..0 ldab 0030
C680 26 55 &U bne 55
C682 F6 0B C0 ... ldab 0bc0
@@
-8955,10
+8976,12
@@
C7DB F6 10 2C .., ldab 102c
C7DE 2D 04 -. blt 04
C7E0 CC 00 01 ... ldd #0001
C7E3 39 9 rts
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
C7E4 5F _ clrb
C7E5 4F O clra
C7E6 39 9 rts
+
;this might send a byte to the serial port
C7E7 37 7 pshb
;this might send a byte to the serial port
C7E7 37 7 pshb
@@
-8990,6
+9013,7
@@
C817 F7 10 2F ../ stb 102f ;sci data
C81A 38 8 pulx
C81B 39 9 rts
C81A 38 8 pulx
C81B 39 9 rts
+
C81C 34 4 des
C81D F6 0B C0 ... ldab 0bc0
C820 C4 01 .. andb #01
C81C 34 4 des
C81D F6 0B C0 ... ldab 0bc0
C820 C4 01 .. andb #01
@@
-9993,6
+10017,7
@@
D08A FC 0B E1 ... ldd 0be1
D08D BD FB BA ... jsr fbba
D090 FD 0B E1 ... stad 0be1
D093 39 9 rts
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
D094 34 4 des
D095 30 0 tsx
D096 6F 00 o. clr 00,x
@@
-10047,6
+10072,7
@@
D0FE C6 08 .. ldab #08
D100 F7 0B DC ... stb 0bdc
D103 31 1 ins
D104 39 9 rts
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
D105 34 4 des
D106 CE 00 1A ... ldx #001a
D109 1C 00 .. bset add,x 00,x
@@
-10078,6
+10104,7
@@
D135 F6 00 14 ... ldab 0014
D138 F7 38 00 .8. stb 3800
D13B 31 1 ins
D13C 39 9 rts
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
D13D F6 00 06 ... ldab 0006
D140 4F O clra
D141 CE 00 0A ... ldx #000a
@@
-10172,6
+10199,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
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
D1FD CC 40 00 .@. ldd #4000
D200 37 7 pshb
D201 36 6 psha
@@
-10185,6
+10213,7
@@
D20C AA 00 .. ora 00,x
D20E EA 01 .. orb 01,x
D210 ED 00 .. stad 00,x
D212 39 9 rts
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
D213 F6 00 1F ... ldab 001f
D216 C4 04 .. andb #04
D218 26 12 &. bne 12
@@
-10208,6
+10237,7
@@
D241 BD D6 3C ..< jsr d63c
D244 5F _ clrb
D245 4F O clra
D246 39 9 rts
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
D247 BD D1 3D ..= jsr d13d
D24A C6 3C .< ldab #3c
D24C F7 00 2E ... stb 002e
@@
-10235,6
+10265,7
@@
D27D BD D6 3C ..< jsr d63c
D280 5F _ clrb
D281 4F O clra
D282 39 9 rts
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
D283 F6 00 2E ... ldab 002e
D286 C1 36 .6 cmpb #36
D288 24 56 $V bcc 56
@@
-10257,6
+10288,7
@@
D2B1 BD D6 3C ..< jsr d63c
D2B4 5F _ clrb
D2B5 4F O clra
D2B6 39 9 rts
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
D2B7 F6 00 06 ... ldab 0006
D2BA 4F O clra
D2BB C3 0E 06 ... addd #0e06
@@
-10279,6
+10311,7
@@
D2D9 33 3 pulb
D2DA E7 00 .. stb 00,x
D2DC CC 00 01 ... ldd #0001
D2DF 39 9 rts
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
D2E0 F6 00 2E ... ldab 002e
D2E3 26 14 &. bne 14
D2E5 BD D5 F7 ... jsr d5f7
@@
-10290,6
+10323,7
@@
D2F3 BD D6 26 ..& jsr d626
D2F6 5F _ clrb
D2F7 4F O clra
D2F8 39 9 rts
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
D2F9 F6 00 2E ... ldab 002e
D2FC 26 0C &. bne 0c
D2FE BD D1 05 ... jsr d105
@@
-10298,9
+10332,11
@@
D304 BD D6 3C ..< jsr d63c
D307 5F _ clrb
D308 4F O clra
D309 39 9 rts
D307 5F _ clrb
D308 4F O clra
D309 39 9 rts
+
D30A 7E D2 5A ~.Z jmp d25a
D30D BD E6 1B ... jsr e61b
D310 39 9 rts
D30A 7E D2 5A ~.Z jmp d25a
D30D BD E6 1B ... jsr e61b
D310 39 9 rts
+
D311 BD D1 3D ..= jsr d13d
D314 7F 00 1C ... clr 001c
D317 7F 00 18 ... clr 0018
D311 BD D1 3D ..= jsr d13d
D314 7F 00 1C ... clr 001c
D317 7F 00 18 ... clr 0018
@@
-10314,6
+10350,7
@@
D329 26 07 &. bne 07
D32B BD D1 05 ... jsr d105
D32E CC 00 01 ... ldd #0001
D331 39 9 rts
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
D332 20 10 . bra 10
D334 7C 00 18 |.. inc 0018
D337 F6 00 18 ... ldab 0018
@@
-10323,6
+10360,7
@@
D33E BD D1 05 ... jsr d105
D341 5F _ clrb
D342 4F O clra
D343 39 9 rts
D341 5F _ clrb
D342 4F O clra
D343 39 9 rts
+
D344 20 D4 . bra d4
D346 3C < pshx
D347 3C < pshx
D344 20 D4 . bra d4
D346 3C < pshx
D347 3C < pshx
@@
-10470,6
+10508,7
@@
D464 38 8 pulx
D465 38 8 pulx
D466 31 1 ins
D467 39 9 rts
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
D468 37 7 pshb
D469 30 0 tsx
D46A E6 00 .. ldab 00,x
@@
-10482,6
+10521,7
@@
D474 5F _ clrb
D475 84 80 .. anda #80
D477 31 1 ins
D478 39 9 rts
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
D479 7F 00 1C ... clr 001c
D47C F6 00 1C ... ldab 001c
D47F C1 64 .d cmpb #64
@@
-10596,6
+10636,7
@@
D558 ED 00 .. stad 00,x
D55A 7C 00 05 |.. inc 0005
D55D 7E D4 A0 ~.. jmp d4a0
D560 39 9 rts
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
D561 F6 00 06 ... ldab 0006
D564 4F O clra
D565 05 . asld
@@
-10637,6
+10678,7
@@
D5A3 C1 05 .. cmpb #05
D5A5 26 04 &. bne d5ab
D5A7 CC 00 01 ... ldd #0001
D5AA 39 9 rts
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
D5AB 20 E8 . bra loop ;d595
D5AD 5F _ clrb
D5AE 4F O clra
@@
-10677,6
+10719,7
@@
D5EA C1 05 .. cmpb #05
D5EC 26 04 &. bne d5f2
D5EE CC 00 01 ... ldd #0001
D5F1 39 9 rts
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
D5F2 20 E1 . bra loop ;d5d5
D5F4 5F _ clrb
D5F5 4F O clra
@@
-10700,6
+10743,7
@@
D61B 26 03 &. bne 03
D61D 5F _ clrb
D61E 4F O clra
D61F 39 9 rts
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
D620 20 DD . bra dd
D622 CC 00 01 ... ldd #0001
D625 39 9 rts
@@
-10716,6
+10760,7
@@
D635 AA 00 .. ora 00,x
D637 EA 01 .. orb 01,x
D639 ED 00 .. stad 00,x
D63B 39 9 rts
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
D63C CC 04 00 ... ldd #0400
D63F 37 7 pshb
D640 36 6 psha
@@
-10729,6
+10774,7
@@
D64B AA 00 .. ora 00,x
D64D EA 01 .. orb 01,x
D64F ED 00 .. stad 00,x
D651 39 9 rts
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
D652 CE 00 1A ... ldx #001a
D655 1C 00 .. bset add,x 00,x
D657 01 . nop
@@
-10740,6
+10786,7
@@
D663 01 . nop
D664 F6 00 14 ... ldab 0014
D667 F7 38 00 .8. stb 3800
D66A 39 9 rts
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
D66B F6 0B C0 ... ldab 0bc0
D66E C4 08 .. andb #08
D670 27 07 '. beq 07
@@
-10798,6
+10845,7
@@
D6EE C4 01 .. andb #01
D6F0 27 03 '. beq 03
D6F2 BD C0 E0 ... jsr c0e0
D6F5 39 9 rts
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
D6F6 F6 0C DB ... ldab 0cdb
D6F9 4F O clra
D6FA 37 7 pshb
@@
-10824,6
+10872,7
@@
D726 F3 0C ED ... addd 0ced
D729 F3 0C EF ... addd 0cef
D72C FD 0B EF ... stad 0bef
D72F 39 9 rts
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
D730 F6 00 15 ... ldab 0015
D733 C4 1F .. andb #1f
D735 27 49 'I beq 49
@@
-10840,6
+10889,7
@@
D751 CC 01 F4 ... ldd #01f4
D754 BD E5 71 ..q jsr e571
D757 CC 00 01 ... ldd #0001
D75A 39 9 rts
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
D75B F6 00 15 ... ldab 0015
D75E C4 04 .. andb #04
D760 27 1E '. beq 1e
@@
-10854,9
+10904,11
@@
D776 CC 01 F4 ... ldd #01f4
D779 BD E5 71 ..q jsr e571
D77C CC 00 01 ... ldd #0001
D77F 39 9 rts
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
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
D783 F6 00 06 ... ldab 0006
D786 4F O clra
D787 CE 00 0A ... ldx #000a
@@
-10869,11
+10921,14
@@
D794 27 03 '. beq 03
D796 5F _ clrb
D797 4F O clra
D798 39 9 rts
D796 5F _ clrb
D797 4F O clra
D798 39 9 rts
+
D799 CC 00 01 ... ldd #0001
D79C 39 9 rts
D799 CC 00 01 ... ldd #0001
D79C 39 9 rts
+
D79D 5F _ clrb
D79E 4F O clra
D79F 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
D7A0 37 7 pshb
D7A1 30 0 tsx
D7A2 E6 00 .. ldab 00,x
@@
-10925,6
+10980,7
@@
D7FB 5F _ clrb
D7FC 4F O clra
D7FD 31 1 ins
D7FE 39 9 rts
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
D7FF 7F 00 1C ... clr 001c
D802 F6 00 1C ... ldab 001c
D805 4F O clra
@@
-10960,6
+11016,7
@@
D839 6C 01 l. inc 01,x
D83B 26 02 &. bne 02
D83D 6C 00 l. inc 00,x
D83F 39 9 rts
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
D840 FC 00 44 ..D ldd 0044
D843 26 03 &. bne 03
D845 7E D8 D2 ~.. jmp d8d2
@@
-11046,6
+11103,7
@@
D8CD BD FB DF ... jsr fbdf
D8D0 31 1 ins
D8D1 31 1 ins
D8D2 39 9 rts
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
D8D3 7F 00 18 ... clr 0018
D8D6 F6 00 18 ... ldab 0018
D8D9 C1 10 .. cmpb #10
@@
-11055,6
+11113,7
@@
D8E0 BD E5 71 ..q jsr e571
D8E3 7C 00 18 |.. inc 0018
D8E6 20 EE . bra ee
D8E8 39 9 rts
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
D8E9 F6 00 2B ..+ ldab 002b
D8EC C1 00 .. cmpb #00
D8EE 26 18 &. bne 18
@@
-11099,6
+11158,7
@@
D950 CC AD 37 ..7 ldd #ad37
D953 BD C0 BA ... jsr c0ba
D956 BD D8 D3 ... jsr d8d3
D959 39 9 rts
D953 BD C0 BA ... jsr c0ba
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
D95A F6 00 06 ... ldab 0006
D95D F1 0B AF ... cmpb 0baf
D960 26 0D &. bne 0d
@@
-11139,6
+11199,7
@@
D9B9 F6 0B B0 ... ldab 0bb0
D9BC F7 00 06 ... stb 0006
D9BF 8D 01 .. bsr dest 01
D9C1 39 9 rts
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
D9C2 CC 03 E8 ... ldd #03e8
D9C5 BD E5 71 ..q jsr e571
D9C8 BD D7 83 ... jsr d783
@@
-11224,6
+11285,7
@@
DA5E BD FB DF ... jsr fbdf
DA61 31 1 ins
DA62 31 1 ins
DA63 39 9 rts
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
DA64 FE 0B B9 ... ldx 0bb9
DA67 08 . inx
DA68 FF 0B B9 ... stx 0bb9
@@
-11344,6
+11406,7
@@
DB3D CE 00 11 ... ldx #0011
DB40 1C 00 .. bset add,x 00,x
DB42 10 . sba
DB43 39 9 rts
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
DB44 F6 00 2B ..+ ldab 002b
DB47 C1 00 .. cmpb #00
DB49 26 08 &. bne 08
@@
-11398,6
+11461,7
@@
DBC1 CC AC F5 ... ldd #acf5
DBC4 BD C0 BA ... jsr c0ba
DBC7 BD D8 D3 ... jsr d8d3
DBCA 39 9 rts
DBC4 BD C0 BA ... jsr c0ba
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
DBCB F6 00 1B ... ldab 001b
DBCE C4 01 .. andb #01
DBD0 26 03 &. bne 03
@@
-11502,6
+11566,7
@@
DC9B C4 08 .. andb #08
DC9D 26 03 &. bne 03
DC9F BD D9 5A ..Z jsr d95a
DCA2 39 9 rts
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
DCA3 CE 0B BC ... ldx #0bbc
DCA6 1D 00 .. bclr add,x 00,x
DCA8 1C F6 .. bset add,x f6,x
@@
-11643,6
+11708,7
@@
DDCC 7C 0C DC |.. inc 0cdc
DDCF C6 04 .. ldab #04
DDD1 F7 00 48 ..H stb 0048
DDD4 39 9 rts
DDCF C6 04 .. ldab #04
DDD1 F7 00 48 ..H stb 0048
DDD4 39 9 rts
+
DDD5 BD BE 69 ..i jsr be69
DDD8 C6 03 .. ldab #03
DDDA F7 00 1C ... stb 001c
DDD5 BD BE 69 ..i jsr be69
DDD8 C6 03 .. ldab #03
DDDA F7 00 1C ... stb 001c
@@
-11667,11
+11733,13
@@
DE00 BD BE 10 ... jsr be10
DE03 C6 14 .. ldab #14
DE05 F7 00 2C .., stb 002c
DE08 39 9 rts
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
DE0F C6 14 .. ldab #14
DE11 F7 00 2C .., stb 002c
DE14 39 9 rts
DE09 CC 0B 9A ... ldd #0b9a
DE0C BD C0 BA ... jsr c0ba
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
DE15 F6 00 1B ... ldab 001b
DE18 C4 01 .. andb #01
DE1A 26 03 &. bne 03
@@
-11734,6
+11802,7
@@
DE9E 1D 00 .. bclr add,x 00,x
DEA0 01 . nop
DEA1 7F 00 4F ..O clr 004f
DEA4 39 9 rts
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
DEA5 F6 00 2B ..+ ldab 002b
DEA8 C1 00 .. cmpb #00
DEAA 26 0D &. bne 0d
@@
-11765,6
+11834,7
@@
DEDF CC AE 44 ..D ldd #ae44
DEE2 BD C0 2E ... jsr c02e
DEE5 38 8 pulx
DEE6 39 9 rts
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
DEE7 F6 0B C0 ... ldab 0bc0
DEEA C4 01 .. andb #01
DEEC 26 07 &. bne 07
@@
-11801,6
+11871,7
@@
DF34 27 07 '. beq 07
DF36 BD D6 52 ..R jsr d652
DF39 BD DE A5 ... jsr dea5
DF3C 39 9 rts
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
DF3D F6 00 4F ..O ldab 004f
DF40 26 06 &. bne 06
DF42 CE 00 1B ... ldx #001b
@@
-12083,6
+12154,7
@@
E1D2 BD C0 E0 ... jsr c0e0
E1D5 83 00 00 ... subd #0000
E1D8 26 01 &. bne 01
E1DA 39 9 rts
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
E1DB 20 03 . bra 03
E1DD BD C5 D3 ... jsr c5d3
E1E0 BD D6 52 ..R jsr d652
@@
-12576,6
+12648,7
@@
E5C8 FD 00 3B ..; stad 003b
E5CB C6 02 .. ldab #02
E5CD F7 00 33 ..3 stb 0033
E5D0 39 9 rts
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
E5D1 C6 0B .. ldab #0b
E5D3 F7 00 32 ..2 stb 0032
E5D6 39 9 rts
@@
-12837,6
+12910,7
@@
E78E CB 30 .0 addb #30
E790 F7 00 5F .._ stb 005f
E793 38 8 pulx
E794 39 9 rts
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
E795 37 7 pshb
E796 36 6 psha
E797 30 0 tsx
@@
-12867,6
+12941,7
@@
E7C0 CB 30 .0 addb #30
E7C2 F7 00 5F .._ stb 005f
E7C5 38 8 pulx
E7C6 39 9 rts
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
E7C7 F6 00 06 ... ldab 0006
E7CA 4F O clra
E7CB CE 00 05 ... ldx #0005
@@
-12977,6
+13052,7
@@
E893 AA 00 .. ora 00,x
E895 EA 01 .. orb 01,x
E897 ED 00 .. stad 00,x
E899 39 9 rts
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
E89A 5F _ clrb
E89B 4F O clra
E89C FD 00 0F ... stad 000f
@@
-13037,6
+13113,7
@@
E923 05 . asld
E924 B3 0B B7 ... subd 0bb7
E927 FD 00 0F ... stad 000f
E92A 39 9 rts
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
E92B 34 4 des
E92C 30 0 tsx
E92D 6F 00 o. clr 00,x
@@
-13144,6
+13221,7
@@
E9E2 FD 0D 1D ... stad 0d1d
E9E5 FD 0D 1B ... stad 0d1b
E9E8 31 1 ins
E9E9 39 9 rts
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
E9EA 7F 00 06 ... clr 0006
E9ED F6 00 06 ... ldab 0006
E9F0 C1 64 .d cmpb #64
@@
-13205,6
+13283,7
@@
EA51 ED 00 .. stad 00,x
EA53 7C 00 06 |.. inc 0006
EA56 20 95 . bra 95
EA58 39 9 rts
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
EA59 34 4 des
EA5A CE 00 04 ... ldx #0004
EA5D 3C < pshx
@@
-13649,6
+13728,7
@@
EDFB F6 00 14 ... ldab 0014
EDFE F7 38 00 .8. stb 3800
EE01 31 1 ins
EE02 39 9 rts
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
EE03 37 7 pshb
EE04 36 6 psha
EE05 30 0 tsx
@@
-13661,6
+13741,7
@@
EE13 DC BD E5 ... ldd bd
EE16 71 q illegal
EE17 38 8 pulx
EE18 39 9 rts
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
EE19 BD E5 D1 ... jsr e5d1
EE1C CE 10 16 ... ldx #1016
EE1F 1D 01 .. bclr add,x 01,x
@@
-14733,25
+14814,26
@@
F7D5 3B ; rti
main:
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
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
F7E9 F7 10 3C ..< stb 103c
-F7EC C6 81 .. ldab #81
+F7EC C6 81 .. ldab #81
;81 -> B
F7EE F7 10 26 ..& stb 1026
F7EE F7 10 26 ..& stb 1026
-F7F1 5F _ clrb
+F7F1 5F _ clrb
;0 -> B
F7F2 F7 10 30 ..0 stb 1030
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
F7F7 F7 10 00 ... stb 1000
-F7FA C6 3E .> ldab #3e
+F7FA C6 3E .> ldab #3e
;3e -> B
F7FC F7 10 09 ... stb 1009
F7FC F7 10 09 ... stb 1009
-F7FF C6 12 .. ldab #12
+F7FF C6 12 .. ldab #12
;12 -> B
F801 F7 10 28 ..( stb 1028
F801 F7 10 28 ..( stb 1028
+
F804 BD BE 69 ..i jsr be69
F807 BD EA 59 ..Y jsr ea59
F80A CC 00 64 ..d ldd #0064
F804 BD BE 69 ..i jsr be69
F807 BD EA 59 ..Y jsr ea59
F80A CC 00 64 ..d ldd #0064
@@
-15545,10
+15627,10
@@
FE47 6E 00 n. jmp 00,x
reset:
reset:
-FE49 86 40 .@ ldaa #40
-FE4B B7 10 24 ..$ sta 1024 ;
40
-> 1024
-FE4E 86 A0 .. ldaa #a0
-FE50 B7 10 39 ..9 sta 1039 ;
a0
-> 1024
+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 ;wipe 0000-007f X=0000
FE59 8C 00 80 ... cpx #0080 ;loop: if X = 0080
FE53 8E 00 EF ... lds #00ef
FE56 CE 00 00 ... ldx #0000 ;wipe 0000-007f X=0000
FE59 8C 00 80 ... cpx #0080 ;loop: if X = 0080
UCC
git Repository :: git.ucc.asn.au