mirror of
https://codeberg.org/cryu/micro-sci-a2-controller
synced 2024-11-24 14:31:34 +00:00
Use screen code macro for readability.
This commit is contained in:
parent
8143c80334
commit
49fa0c2180
@ -5,6 +5,7 @@ PRBL2 := $F94A
|
||||
HOME := $FC58
|
||||
COUT := $FDED
|
||||
|
||||
.MACPACK apple2
|
||||
.org $c600
|
||||
|
||||
ldx #$20 ; controller signature
|
||||
@ -29,8 +30,7 @@ loop1: iny
|
||||
bne LC617
|
||||
LC627: beq LC627
|
||||
|
||||
info: .byte $8d, $bc, $ad, $ad, $cb, $c5, $d9, $c2
|
||||
.byte $cf, $c1, $d2, $c4
|
||||
info: scrcode $0d, "<--KEYBOARD"
|
||||
|
||||
.ifdef MICROSCI
|
||||
; ROM checksum 5ddcbbf1
|
||||
@ -47,11 +47,12 @@ info: .byte $8d, $bc, $ad, $ad, $cb, $c5, $d9, $c2
|
||||
; XXXXXXX XXXXXXX XXXXXXX
|
||||
; 3.2 INFO 3.3&PASCAL
|
||||
|
||||
.byte $08, $d5, $ad, $d3
|
||||
.byte $c3, $c9, $08, $d2, $c5, $c1, $d2, $ad
|
||||
.byte $ad, $be, $8d, $8d, $08, $ad, $ad, $ad
|
||||
.byte $ad, $ad, $ad, $ad, $ad, $ad, $ca, $d5
|
||||
.byte $cd, $d0, $c5, $d2, $ad, $ad
|
||||
.byte $08
|
||||
scrcode "U-SCI"
|
||||
.byte $08
|
||||
scrcode "REAR-->", $0d, $0d
|
||||
.byte $08
|
||||
scrcode "---------JUMPER--------"
|
||||
.else
|
||||
; ROM checksum 5dfc32ca
|
||||
; <--KEYBOARD ACE 1000 REAR-->
|
||||
@ -67,31 +68,66 @@ info: .byte $8d, $bc, $ad, $ad, $cb, $c5, $d9, $c2
|
||||
; XXXXXXX XXXXXXX XXXXXXX
|
||||
; 3.2 INFO 3.3&PASCAL
|
||||
|
||||
.byte $06, $c1, $c3, $c5
|
||||
.byte $a0, $b1, $b0, $b0, $b0, $06, $d2, $c5
|
||||
.byte $c1, $d2, $ad, $ad, $be, $8d, $8d, $07
|
||||
.byte $a0, $02, $ad, $ad, $ad, $ad, $ad, $ad
|
||||
.byte $ca, $d5, $cd, $d0, $c5, $d2
|
||||
.byte $06
|
||||
scrcode "ACE 1000"
|
||||
.byte $06
|
||||
scrcode "REAR-->", $0d, $0d
|
||||
.byte $07
|
||||
scrcode " "
|
||||
.byte $02
|
||||
scrcode "------JUMPER------"
|
||||
.endif
|
||||
.byte $ad, $ad
|
||||
.byte $ad, $ad, $ad, $ad, $8d, $07, $a1, $0b
|
||||
.byte $a1, $0b, $a1, $8d, $07, $d6, $0b, $d6
|
||||
.byte $0b, $d6, $8d, $8d, $06, $a3, $a3, $a3
|
||||
.byte $a0, $a1, $a0, $a1, $03, $a1, $a0, $a3
|
||||
.byte $a3, $a3, $a0, $a1, $03, $a1, $a0, $a1
|
||||
.byte $a0, $a3, $a3, $a3, $8d, $06, $a3, $a3
|
||||
.byte $a3, $a0, $a1, $a0, $a1, $03, $a1, $a0
|
||||
.byte $a3, $a3, $a3, $a0, $a1, $03, $a1, $a0
|
||||
.byte $a1, $a0, $a3, $a3, $a3, $8d, $06, $a3
|
||||
.byte $a3, $a3, $a0, $a1, $a0, $a1, $03, $a1
|
||||
.byte $a0, $a3, $a3, $a3, $a0, $a1, $03, $a1
|
||||
.byte $a0, $a1, $a0, $a3, $a3, $a3, $8d, $06
|
||||
.byte $a3, $a3, $a3, $a0, $a1, $a0, $a1, $03
|
||||
.byte $a1, $a0, $a3, $a3, $a3, $a0, $a1, $03
|
||||
.byte $a1, $a0, $a1, $a0, $a3, $a3, $a3, $8d
|
||||
.byte $06, $d8, $d8, $d8, $d8, $d8, $d8, $d8
|
||||
.byte $03, $d8, $d8, $d8, $d8, $d8, $d8, $d8
|
||||
.byte $03, $d8, $d8, $d8, $d8, $d8, $d8, $d8
|
||||
.byte $8d, $08, $b3, $ae, $b2, $06, $c9, $ce
|
||||
.byte $c6, $cf, $04, $b3, $ae, $b3, $a6, $d0
|
||||
.byte $c1, $d3, $c3, $c1, $cc, $8d, $8d
|
||||
scrcode $0d
|
||||
.byte $07
|
||||
scrcode "!"
|
||||
.byte $0b
|
||||
scrcode "!"
|
||||
.byte $0b
|
||||
scrcode "!"
|
||||
scrcode $0d
|
||||
.byte $07
|
||||
scrcode "V"
|
||||
.byte $0b
|
||||
scrcode "V"
|
||||
.byte $0b
|
||||
scrcode "V", $0d, $0d
|
||||
.byte $06
|
||||
scrcode "### ! !"
|
||||
.byte $03
|
||||
scrcode "! ### !"
|
||||
.byte $03
|
||||
scrcode "! ! ###", $0d
|
||||
|
||||
.byte $06
|
||||
scrcode "### ! !"
|
||||
.byte $03
|
||||
scrcode "! ### !"
|
||||
.byte $03
|
||||
scrcode "! ! ###", $0d
|
||||
|
||||
.byte $06
|
||||
scrcode "### ! !"
|
||||
.byte $03
|
||||
scrcode "! ### !"
|
||||
.byte $03
|
||||
scrcode "! ! ###", $0d
|
||||
|
||||
.byte $06
|
||||
scrcode "### ! !"
|
||||
.byte $03
|
||||
scrcode "! ### !"
|
||||
.byte $03
|
||||
scrcode "! ! ###", $0d
|
||||
|
||||
.byte $06
|
||||
scrcode "XXXXXXX"
|
||||
.byte $03
|
||||
scrcode "XXXXXXX"
|
||||
.byte $03
|
||||
scrcode "XXXXXXX", $0d
|
||||
.byte $08
|
||||
scrcode "3.2"
|
||||
.byte $06
|
||||
scrcode "INFO"
|
||||
.byte $04
|
||||
scrcode "3.3&PASCAL", $0d, $0d
|
||||
|
Loading…
Reference in New Issue
Block a user