mirror of
https://github.com/Pecusx/Young-lumberjack.git
synced 2026-05-21 14:49:43 +02:00
Compare commits
4 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
| d14627fcbd | |||
| eef5b53030 | |||
| 066efdcd20 | |||
| 026cb48377 |
+19
-7
@@ -12,7 +12,7 @@
|
|||||||
|
|
||||||
;---------------------------------------------------
|
;---------------------------------------------------
|
||||||
.macro build
|
.macro build
|
||||||
dta d"1.05" ; number of this build (4 bytes)
|
dta d"1.07" ; number of this build (4 bytes)
|
||||||
.endm
|
.endm
|
||||||
|
|
||||||
.macro RMTSong
|
.macro RMTSong
|
||||||
@@ -57,7 +57,8 @@
|
|||||||
.zpvar SpeedTableAdr .word
|
.zpvar SpeedTableAdr .word
|
||||||
.zpvar Difficulty .byte ; 0 - normal, 1 - easy
|
.zpvar Difficulty .byte ; 0 - normal, 1 - easy
|
||||||
.zpvar LumberjackDir .byte ; 2 - on left , 1 - on right
|
.zpvar LumberjackDir .byte ; 2 - on left , 1 - on right
|
||||||
.zpvar PaddleState .byte
|
.zpvar Paddle1State .byte
|
||||||
|
.zpvar Paddle2State .byte
|
||||||
.zpvar LowCharsetBase .byte
|
.zpvar LowCharsetBase .byte
|
||||||
.zpvar displayposition .word
|
.zpvar displayposition .word
|
||||||
.zpvar LastKey .byte ; $ff if no key pressed or last key released
|
.zpvar LastKey .byte ; $ff if no key pressed or last key released
|
||||||
@@ -1806,8 +1807,10 @@ RIPLoop
|
|||||||
jsr GetKeyFast
|
jsr GetKeyFast
|
||||||
cmp #@kbcode._space ; space, Start
|
cmp #@kbcode._space ; space, Start
|
||||||
beq restart
|
beq restart
|
||||||
cmp #@kbcode._tab ; TAB, 1st joy button
|
lda STRIG0
|
||||||
beq restart
|
beq restart
|
||||||
|
; cmp #@kbcode._tab ; TAB, 1st joy button
|
||||||
|
; beq restart
|
||||||
lda RTCLOK+1
|
lda RTCLOK+1
|
||||||
cmp #2
|
cmp #2
|
||||||
bne RIPLoop
|
bne RIPLoop
|
||||||
@@ -3612,8 +3615,10 @@ notpressedJoyGetKey
|
|||||||
;fire
|
;fire
|
||||||
lda STRIG0
|
lda STRIG0
|
||||||
beq JoyButton
|
beq JoyButton
|
||||||
.IF TARGET = 800 ; Second joy button , Select and Option key only on A800
|
.IF TARGET = 800 ; More joy buttons , Select and Option key only on A800
|
||||||
jsr Check2button
|
jsr Check3button ; Third joy button
|
||||||
|
bcc JoyButton ; like First button
|
||||||
|
jsr Check2button ; Second joy button
|
||||||
bcc SecondButton
|
bcc SecondButton
|
||||||
checkSelectKey
|
checkSelectKey
|
||||||
lda CONSOL
|
lda CONSOL
|
||||||
@@ -3652,8 +3657,15 @@ Check2button
|
|||||||
lda PADDL0
|
lda PADDL0
|
||||||
and #$c0
|
and #$c0
|
||||||
eor #$C0
|
eor #$C0
|
||||||
cmp PaddleState
|
cmp Paddle1State
|
||||||
sta PaddleState
|
sta Paddle1State
|
||||||
|
rts
|
||||||
|
Check3button
|
||||||
|
lda PADDL1
|
||||||
|
and #$c0
|
||||||
|
eor #$C0
|
||||||
|
cmp Paddle2State
|
||||||
|
sta Paddle2State
|
||||||
rts
|
rts
|
||||||
.ENDIF
|
.ENDIF
|
||||||
.endp
|
.endp
|
||||||
|
|||||||
Binary file not shown.
Reference in New Issue
Block a user