(controller.tal) Made buttons visible in monochromatic

This commit is contained in:
neauoire 2022-09-30 10:10:33 -07:00
parent cbc61578b7
commit 5496712ae1
1 changed files with 13 additions and 13 deletions

View File

@ -15,9 +15,9 @@
|0100 ( -> ) |0100 ( -> )
( theme ) ( theme )
#0ff7 .System/r DEO2 #0fff .System/r DEO2
#0f07 .System/g DEO2 #0f0f .System/g DEO2
#0f07 .System/b DEO2 #0f0f .System/b DEO2
( find center ) ( find center )
.Screen/width DEI2 #01 SFT2 .center/x STZ2 .Screen/width DEI2 #01 SFT2 .center/x STZ2
.Screen/height DEI2 #01 SFT2 .center/y STZ2 .Screen/height DEI2 #01 SFT2 .center/y STZ2
@ -44,7 +44,7 @@ BRK
,draw-controller JSR ,draw-controller JSR
( print stack on start button ) ( print stack on start button )
.Controller/button DEI #08 EQU JMP BRK #010e DEO .Controller/button DEI #08 EQU [ JMP BRK ] #010e DEO
BRK BRK
@ -56,17 +56,17 @@ BRK
.frame/x0 LDZ2 #0010 ADD2 .Screen/x DEO2 .frame/x0 LDZ2 #0010 ADD2 .Screen/x DEO2
.frame/y0 LDZ2 #0010 ADD2 .Screen/y DEO2 .frame/y0 LDZ2 #0010 ADD2 .Screen/y DEO2
;controller-icn/dpad-up .Screen/addr DEO2 ;controller-icn/dpad-up .Screen/addr DEO2
#03 STHkr #04 SFT #01 AND DUP ADD SUB .Screen/sprite DEO #03 STHkr #04 SFT #01 AND SUB .Screen/sprite DEO
.Screen/y DEI2 #0010 ADD2 .Screen/y DEO2 .Screen/y DEI2 #0010 ADD2 .Screen/y DEO2
;controller-icn/dpad-down .Screen/addr DEO2 ;controller-icn/dpad-down .Screen/addr DEO2
#03 STHkr #05 SFT #01 AND DUP ADD SUB .Screen/sprite DEO #03 STHkr #05 SFT #01 AND SUB .Screen/sprite DEO
.Screen/y DEI2 #0008 SUB2 .Screen/y DEO2 .Screen/y DEI2 #0008 SUB2 .Screen/y DEO2
.Screen/x DEI2 #0008 SUB2 .Screen/x DEO2 .Screen/x DEI2 #0008 SUB2 .Screen/x DEO2
;controller-icn/dpad-left .Screen/addr DEO2 ;controller-icn/dpad-left .Screen/addr DEO2
#03 STHkr #06 SFT #01 AND DUP ADD SUB .Screen/sprite DEO #03 STHkr #06 SFT #01 AND SUB .Screen/sprite DEO
.Screen/x DEI2 #0010 ADD2 .Screen/x DEO2 .Screen/x DEI2 #0010 ADD2 .Screen/x DEO2
;controller-icn/dpad-right .Screen/addr DEO2 ;controller-icn/dpad-right .Screen/addr DEO2
#03 STHkr #07 SFT #01 AND DUP ADD SUB .Screen/sprite DEO #03 STHkr #07 SFT #01 AND SUB .Screen/sprite DEO
.Screen/x DEI2 #0008 SUB2 .Screen/x DEO2 .Screen/x DEI2 #0008 SUB2 .Screen/x DEO2
;controller-icn/dpad .Screen/addr DEO2 ;controller-icn/dpad .Screen/addr DEO2
#03 .Screen/sprite DEO #03 .Screen/sprite DEO
@ -75,10 +75,10 @@ BRK
.center/y LDZ2 #0009 ADD2 .Screen/y DEO2 .center/y LDZ2 #0009 ADD2 .Screen/y DEO2
.center/x LDZ2 #0009 SUB2 .Screen/x DEO2 .center/x LDZ2 #0009 SUB2 .Screen/x DEO2
;controller-icn/option .Screen/addr DEO2 ;controller-icn/option .Screen/addr DEO2
#03 STHkr #02 SFT #01 AND DUP ADD SUB .Screen/sprite DEO #03 STHkr #03 SFT #01 AND SUB .Screen/sprite DEO
.center/x LDZ2 #0004 ADD2 .Screen/x DEO2 .center/x LDZ2 #0004 ADD2 .Screen/x DEO2
;controller-icn/option .Screen/addr DEO2 ;controller-icn/option .Screen/addr DEO2
#03 STHkr #03 SFT #01 AND DUP ADD SUB .Screen/sprite DEO #03 STHkr #02 SFT #01 AND SUB .Screen/sprite DEO
( buttons ) ( buttons )
.center/y LDZ2 .Screen/y DEO2 .center/y LDZ2 .Screen/y DEO2
@ -86,7 +86,7 @@ BRK
;controller-icn/button .Screen/addr DEO2 ;controller-icn/button .Screen/addr DEO2
#03 STHkr #01 SFT #01 AND SUB .Screen/sprite DEO #03 STHkr #01 SFT #01 AND SUB .Screen/sprite DEO
.Screen/y DEI2 #000a ADD2 .Screen/y DEO2 .Screen/y DEI2 #000a ADD2 .Screen/y DEO2
;font-hex #0058 ADD2 .Screen/addr DEO2 ;font-hex/b .Screen/addr DEO2
#03 .Screen/sprite DEO #03 .Screen/sprite DEO
.center/y LDZ2 .Screen/y DEO2 .center/y LDZ2 .Screen/y DEO2
@ -94,7 +94,7 @@ BRK
;controller-icn/button .Screen/addr DEO2 ;controller-icn/button .Screen/addr DEO2
#03 STHr #01 AND SUB .Screen/sprite DEO #03 STHr #01 AND SUB .Screen/sprite DEO
.Screen/y DEI2 #000a ADD2 .Screen/y DEO2 .Screen/y DEI2 #000a ADD2 .Screen/y DEO2
;font-hex #0050 ADD2 .Screen/addr DEO2 ;font-hex/a .Screen/addr DEO2
#03 .Screen/sprite DEO #03 .Screen/sprite DEO
.center/x LDZ2 #0010 SUB2 .Screen/x DEO2 .center/x LDZ2 #0010 SUB2 .Screen/x DEO2
@ -164,6 +164,6 @@ JMP2r
000c 1424 4484 fe04 00fe 8080 7c02 827c 000c 1424 4484 fe04 00fe 8080 7c02 827c
007c 8280 fc82 827c 00fe 0202 0408 1010 007c 8280 fc82 827c 00fe 0202 0408 1010
007c 8282 7c82 827c 007c 8282 7e02 827c 007c 8282 7c82 827c 007c 8282 7e02 827c
007c 8202 7e82 827e 00fc 8282 fc82 82fc &a 007c 8202 7e82 827e &b 00fc 8282 fc82 82fc
007c 8280 8080 827c 00fc 8282 8282 82fc 007c 8280 8080 827c 00fc 8282 8282 82fc
00fe 8080 fe80 80fe 00fe 8080 f080 8080 00fe 8080 fe80 80fe 00fe 8080 f080 8080