Added checkkeys() for input processing #52

picosonic · Apr 7, 2023 · d9ef088 · d9ef088
1 parent 674f739
commit d9ef088
Show file tree

Hide file tree

Showing 3 changed files with 61 additions and 0 deletions.
diff --git a/beeb/dizzy3.asm b/beeb/dizzy3.asm
@@ -206,6 +206,61 @@ INCLUDE "gfx.asm"
   JMP titlescreen
 }
 
+; Set input key states
+.checkkeys
+{
+  ; Set defaults to "nothing" pressed
+  LDA #&00
+
+  STA left
+  STA right
+  STA jump
+  STA fire
+
+  ; Do nothing if killed
+  LDA killed:BNE done
+
+  ; Cache the current input state
+  LDX keys
+
+  ; Prevent fire (pickup/inventory) being pressed when not "looking forward idle"
+  LDA sequence:BNE firenotpressed
+
+  ; Prevent fire (pickup/inventory) being pressed when already picking up
+  LDA usepickup:BNE firenotpressed
+
+  ; Check for FIRE button
+  TXA:AND #PAD_FIRE:BEQ firenotpressed
+
+.firepressed
+  INC fire
+  RTS
+
+  ; Check for LEFT button
+.firenotpressed
+  TXA:AND #PAD_LEFT:BEQ leftnotpressed
+
+.leftpressed
+  INC left
+
+  ; Check for RIGHT button
+.leftnotpressed
+  TXA:AND #PAD_RIGHT:BEQ rightnotpressed
+
+.rightpressed
+  INC right
+
+  ; Check for JUMP button
+.rightnotpressed
+  TXA:AND #PAD_JUMP:BEQ done
+
+.jumppressed
+  INC jump
+
+.done
+  RTS
+}
+
 .updatedizzy
 {
   ; Should be called from vsync, so wait for one

diff --git a/beeb/progress.odt b/beeb/progress.odt
diff --git a/beeb/vars.asm b/beeb/vars.asm
@@ -232,6 +232,12 @@ GUARD ENVELOPE_DEFS
 .startroom EQUB 0 ; Starting room id
 .objcollide EQUB 0 ; Allow proximity collision detection to work
 
+; Bit flags for Dizzy movement
+.fire EQUB 0
+.left EQUB 0
+.right EQUB 0
+.jump EQUB 0
+
 ; Collision box
 .cx EQUB 0
 .cy EQUB 0