Prev: 25026 Up: Map Next: 25086
25056: Input: Accelerate
Used by the routine at 27922.
Check if this should be read from the Kempston joystick instead?
ReadInputAccelerate 25056 LD A,(24126) If GameOptions indicates the control method is via the Kempston joystick then jump to ReadKempstonJoystick.
25059 BIT 1,A
25061 JR NZ,ReadKempstonJoystick
Check for "Accelerator" button input.
25063 LD B,2 B=2 (counter for checking two ports).
25065 LD A,251 Read from the keyboard;
Port Number Bit
0 1 2 3 4
$FB Q W E R T
$DF P O I U Y
ReadInputAccelerate_Loop 25067 OUT (253),A
25069 IN A,(254)
25071 AND %00011111 Keep only bits 0-4.
25073 CP 31 If any buttons were pressed jump to Input_Accelerate.
25075 JR NZ,Input_Accelerate
25077 LD A,223 A=switch to port 223.
25079 DJNZ ReadInputAccelerate_Loop Decrease counter by one and loop back to ReadInputAccelerate_Loop until counter is zero.
25081 JR Input_None Jump to Input_None.
Return "Accelerator" button pressed.
Input_Accelerate 25083 LD A,247 A=11110111.
25085 RET Return.
View the equivalent code in;
Prev: 25026 Up: Map Next: 25086