Variable I-Frames

2024-11-24 22:08:05 -06:00
parent 00487370b3
commit a949230f34
10 changed files with 67 additions and 12 deletions
--- a/iframes.asm
+++ b/iframes.asm
@@ -0,0 +1,45 @@
+pushpc
+
+org $8780B9
+JSL CalcIFrames
+NOP
+
+pullpc
+
+CalcIFrames:
+	LDA.l IFrames
+	STA.w $031F
+	RTL
+
+DrawIFrames:
+	LDA.l IFrames
+	AND.w #$00FF
+	JSL HexToDec
+
+	LDY.w #$16EE
+	LDA.w #$253B
+	STA.w $0000, Y
+	LDA.w #$253C
+	STA.w $0002, Y
+
+	LDA.l HexToDecDigit3
+	AND.w #$00FF
+	BEQ +
+	CLC : ADC.w #$2416
+	STA.w $003E, Y
+
+	LDA.l HexToDecDigit4
+	AND.w #$00FF
+	BNE +
+	LDA.w #$0011
+	CLC : ADC.w #$2416
+	STA.w $0040, Y
+
+	LDA.l HexToDecDigit5
+	AND.w #$00FF
+	BNE +
+	LDA.w #$0011
+	CLC : ADC.w #$2416
+	STA.w $0042, Y
+
+	RTL