mirror of
https://github.com/Pecusx/Young-lumberjack.git
synced 2026-05-20 22:33:54 +02:00
Merge pull request #6 from Pecusx/develop
Second joystick button added to controls.
This commit is contained in:
+5
-2
@@ -12,7 +12,7 @@
|
||||
|
||||
;---------------------------------------------------
|
||||
.macro build
|
||||
dta d"1.04" ; number of this build (4 bytes)
|
||||
dta d"1.05" ; number of this build (4 bytes)
|
||||
.endm
|
||||
|
||||
.macro RMTSong
|
||||
@@ -3615,7 +3615,6 @@ notpressedJoyGetKey
|
||||
.IF TARGET = 800 ; Second joy button , Select and Option key only on A800
|
||||
jsr Check2button
|
||||
bcc SecondButton
|
||||
bne checkSelectKey
|
||||
checkSelectKey
|
||||
lda CONSOL
|
||||
and #%00000010 ; Select
|
||||
@@ -3627,6 +3626,8 @@ checkSelectKey
|
||||
and #%00000001 ; Start
|
||||
beq StartPressed
|
||||
.ENDIF
|
||||
lda STRIG1
|
||||
beq SecondButton
|
||||
lda #@kbcode._none
|
||||
bne getkeyend
|
||||
OptionPressed
|
||||
@@ -3677,6 +3678,8 @@ StillWait
|
||||
bne StillWait
|
||||
lda STRIG0
|
||||
beq StillWait
|
||||
lda STRIG1
|
||||
beq StillWait
|
||||
.IF TARGET = 800
|
||||
lda SKSTAT
|
||||
and #%00000100 ; any key
|
||||
|
||||
Binary file not shown.
@@ -10,7 +10,7 @@
|
||||
fcnt .ds 2
|
||||
fadr .ds 2
|
||||
fhlp .ds 2
|
||||
cloc .ds 1
|
||||
cloc .ds 2
|
||||
regA .ds 1
|
||||
regX .ds 1
|
||||
regY .ds 1
|
||||
@@ -78,8 +78,7 @@ _lp lda trig0 ; FIRE #0
|
||||
and #1
|
||||
beq stop
|
||||
|
||||
lda cloc
|
||||
cmp #200 ; timer - 4s.
|
||||
cpw cloc #500 ; timer 10s
|
||||
bcs stop
|
||||
|
||||
lda skctl
|
||||
@@ -194,7 +193,7 @@ VBL
|
||||
|
||||
mva #@dmactl(standard|dma|lineX1|players|missiles) dmactl ;set new screen width
|
||||
|
||||
inc cloc ;little timer
|
||||
inw cloc ;little timer
|
||||
|
||||
; Initial values
|
||||
|
||||
|
||||
Reference in New Issue
Block a user