mirror of
https://codeberg.org/cryu/micro-sci-a2-controller
synced 2024-11-27 19:50:25 +00:00
Use our macro to keep this readable.
This commit is contained in:
parent
4f204c718f
commit
def53563b0
@ -5,7 +5,7 @@ PRBL2 := $F94A
|
|||||||
HOME := $FC58
|
HOME := $FC58
|
||||||
COUT := $FDED
|
COUT := $FDED
|
||||||
|
|
||||||
.MACPACK apple2
|
.include "screencode.h"
|
||||||
.org $c600
|
.org $c600
|
||||||
|
|
||||||
ldx #$20 ; controller signature
|
ldx #$20 ; controller signature
|
||||||
@ -30,10 +30,8 @@ loop1: iny
|
|||||||
bne LC617
|
bne LC617
|
||||||
LC627: beq LC627
|
LC627: beq LC627
|
||||||
|
|
||||||
info: scrcode $0d, "<--KEYBOARD"
|
; Splash screen
|
||||||
|
;
|
||||||
.ifdef MICROSCI
|
|
||||||
; ROM checksum 5ddcbbf1
|
|
||||||
; <--KEYBOARD U-SCI REAR-->
|
; <--KEYBOARD U-SCI REAR-->
|
||||||
;
|
;
|
||||||
; ---------JUMPER--------
|
; ---------JUMPER--------
|
||||||
@ -46,88 +44,27 @@ info: scrcode $0d, "<--KEYBOARD"
|
|||||||
; ### ! ! ! ### ! ! ! ###
|
; ### ! ! ! ### ! ! ! ###
|
||||||
; XXXXXXX XXXXXXX XXXXXXX
|
; XXXXXXX XXXXXXX XXXXXXX
|
||||||
; 3.2 INFO 3.3&PASCAL
|
; 3.2 INFO 3.3&PASCAL
|
||||||
|
;
|
||||||
.byte $08
|
; Franklin differs on the first three lines:
|
||||||
scrcode "U-SCI"
|
|
||||||
.byte $08
|
|
||||||
scrcode "REAR-->", $0d, $0d
|
|
||||||
.byte $08
|
|
||||||
scrcode "---------JUMPER--------"
|
|
||||||
.else
|
|
||||||
; ROM checksum 5dfc32ca
|
|
||||||
; <--KEYBOARD ACE 1000 REAR-->
|
; <--KEYBOARD ACE 1000 REAR-->
|
||||||
;
|
;
|
||||||
; ------JUMPER------
|
; ------JUMPER------
|
||||||
; ! ! !
|
|
||||||
; V V V
|
|
||||||
;
|
|
||||||
; ### ! ! ! ### ! ! ! ###
|
|
||||||
; ### ! ! ! ### ! ! ! ###
|
|
||||||
; ### ! ! ! ### ! ! ! ###
|
|
||||||
; ### ! ! ! ### ! ! ! ###
|
|
||||||
; XXXXXXX XXXXXXX XXXXXXX
|
|
||||||
; 3.2 INFO 3.3&PASCAL
|
|
||||||
|
|
||||||
.byte $06
|
info: screencode $0d, "<--KEYBOARD"
|
||||||
scrcode "ACE 1000"
|
.ifdef MICROSCI
|
||||||
.byte $06
|
screencode $08, "U-SCI", $08, "REAR-->", $0d, $0d
|
||||||
scrcode "REAR-->", $0d, $0d
|
screencode $08, "---------JUMPER--------", $0d
|
||||||
.byte $07
|
.else
|
||||||
scrcode " "
|
|
||||||
.byte $02
|
screencode $06, "ACE 1000", $06, "REAR-->", $0d, $0d
|
||||||
scrcode "------JUMPER------"
|
screencode $07, " ", $02, "------JUMPER------", $0d
|
||||||
.endif
|
.endif
|
||||||
scrcode $0d
|
screencode $07, "!", $0b, "!", $0b, "!", $0d
|
||||||
.byte $07
|
screencode $07, "V", $0b, "V", $0b, "V", $0d, $0d
|
||||||
scrcode "!"
|
screencode $06, "### ! !", $03, "! ### !", $03, "! ! ###", $0d
|
||||||
.byte $0b
|
screencode $06, "### ! !", $03, "! ### !", $03, "! ! ###", $0d
|
||||||
scrcode "!"
|
screencode $06, "### ! !", $03, "! ### !", $03, "! ! ###", $0d
|
||||||
.byte $0b
|
screencode $06, "### ! !", $03, "! ### !", $03, "! ! ###", $0d
|
||||||
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
|
screencode $06, "XXXXXXX", $03, "XXXXXXX", $03, "XXXXXXX", $0d
|
||||||
scrcode "### ! !"
|
screencode $08, "3.2", $06, "INFO", $04, "3.3&PASCAL", $0d, $0d
|
||||||
.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