mirror of
https://github.com/Pecusx/Young-lumberjack.git
synced 2026-05-20 22:33:54 +02:00
Compare commits
11 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
| d14627fcbd | |||
| eef5b53030 | |||
| 066efdcd20 | |||
| 026cb48377 | |||
| f82645ba91 | |||
| 0a3db56251 | |||
| fd7e206007 | |||
| aee59f5257 | |||
| e119f7a098 | |||
| dfd9110639 | |||
| 5f7f57f4f4 |
+30
-13
@@ -12,7 +12,7 @@
|
|||||||
|
|
||||||
;---------------------------------------------------
|
;---------------------------------------------------
|
||||||
.macro build
|
.macro build
|
||||||
dta d"1.02" ; 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
|
||||||
@@ -195,7 +196,7 @@ timber_foot_addr
|
|||||||
.wo foot_0
|
.wo foot_0
|
||||||
.by $44+$80 ; DLI_L2 - fonts
|
.by $44+$80 ; DLI_L2 - fonts
|
||||||
.wo title_timber+(32*7) ; rest of shadow
|
.wo title_timber+(32*7) ; rest of shadow
|
||||||
.by $45
|
.by $45
|
||||||
difficulty_text_addr
|
difficulty_text_addr
|
||||||
.wo difficulty_normal_text
|
.wo difficulty_normal_text
|
||||||
.by $45+$80
|
.by $45+$80
|
||||||
@@ -203,6 +204,8 @@ difficulty_text_addr
|
|||||||
.by $45+$80
|
.by $45+$80
|
||||||
.wo credits_lines
|
.wo credits_lines
|
||||||
.by $85
|
.by $85
|
||||||
|
.by $44 ; anty ANTIC 40/32 switch glitch :)
|
||||||
|
.wo empty_line
|
||||||
.by $41
|
.by $41
|
||||||
.wo dl_title
|
.wo dl_title
|
||||||
;---------------------------------------------------
|
;---------------------------------------------------
|
||||||
@@ -1804,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
|
||||||
@@ -3466,7 +3471,7 @@ draw_branch3
|
|||||||
bne not_phase4
|
bne not_phase4
|
||||||
ldx #(4*32) ; how many lines draw
|
ldx #(4*32) ; how many lines draw
|
||||||
not_phase4
|
not_phase4
|
||||||
stx tempbyte
|
stx tempbyte2
|
||||||
; now calculate start screen address
|
; now calculate start screen address
|
||||||
:5 asl ; phase*32
|
:5 asl ; phase*32
|
||||||
;clc
|
;clc
|
||||||
@@ -3484,7 +3489,7 @@ not_phase4
|
|||||||
@ lda (temp2),y
|
@ lda (temp2),y
|
||||||
sta (temp),y
|
sta (temp),y
|
||||||
iny
|
iny
|
||||||
cpy tempbyte ;? lines
|
cpy tempbyte2 ;? lines
|
||||||
bne @-
|
bne @-
|
||||||
draw_branch4
|
draw_branch4
|
||||||
lda branches_anim_phase
|
lda branches_anim_phase
|
||||||
@@ -3500,7 +3505,7 @@ not_phase1
|
|||||||
bne not_phase2
|
bne not_phase2
|
||||||
ldx #(1*32) ; how many lines draw
|
ldx #(1*32) ; how many lines draw
|
||||||
not_phase2
|
not_phase2
|
||||||
stx tempbyte
|
stx tempbyte2
|
||||||
; now calculate start screen address
|
; now calculate start screen address
|
||||||
:5 asl ; phase*32
|
:5 asl ; phase*32
|
||||||
;clc
|
;clc
|
||||||
@@ -3518,7 +3523,7 @@ not_phase2
|
|||||||
@ lda (temp2),y
|
@ lda (temp2),y
|
||||||
sta (temp),y
|
sta (temp),y
|
||||||
iny
|
iny
|
||||||
cpy tempbyte ;? lines
|
cpy tempbyte2 ;? lines
|
||||||
bne @-
|
bne @-
|
||||||
all_drawed
|
all_drawed
|
||||||
rts
|
rts
|
||||||
@@ -3610,10 +3615,11 @@ 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
|
||||||
bne checkSelectKey
|
|
||||||
checkSelectKey
|
checkSelectKey
|
||||||
lda CONSOL
|
lda CONSOL
|
||||||
and #%00000010 ; Select
|
and #%00000010 ; Select
|
||||||
@@ -3625,6 +3631,8 @@ checkSelectKey
|
|||||||
and #%00000001 ; Start
|
and #%00000001 ; Start
|
||||||
beq StartPressed
|
beq StartPressed
|
||||||
.ENDIF
|
.ENDIF
|
||||||
|
lda STRIG1
|
||||||
|
beq SecondButton
|
||||||
lda #@kbcode._none
|
lda #@kbcode._none
|
||||||
bne getkeyend
|
bne getkeyend
|
||||||
OptionPressed
|
OptionPressed
|
||||||
@@ -3649,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
|
||||||
@@ -3675,6 +3690,8 @@ StillWait
|
|||||||
bne StillWait
|
bne StillWait
|
||||||
lda STRIG0
|
lda STRIG0
|
||||||
beq StillWait
|
beq StillWait
|
||||||
|
lda STRIG1
|
||||||
|
beq StillWait
|
||||||
.IF TARGET = 800
|
.IF TARGET = 800
|
||||||
lda SKSTAT
|
lda SKSTAT
|
||||||
and #%00000100 ; any key
|
and #%00000100 ; any key
|
||||||
|
|||||||
Binary file not shown.
@@ -10,7 +10,7 @@
|
|||||||
fcnt .ds 2
|
fcnt .ds 2
|
||||||
fadr .ds 2
|
fadr .ds 2
|
||||||
fhlp .ds 2
|
fhlp .ds 2
|
||||||
cloc .ds 1
|
cloc .ds 2
|
||||||
regA .ds 1
|
regA .ds 1
|
||||||
regX .ds 1
|
regX .ds 1
|
||||||
regY .ds 1
|
regY .ds 1
|
||||||
@@ -78,8 +78,7 @@ _lp lda trig0 ; FIRE #0
|
|||||||
and #1
|
and #1
|
||||||
beq stop
|
beq stop
|
||||||
|
|
||||||
lda cloc
|
cpw cloc #500 ; timer 10s
|
||||||
cmp #200 ; timer - 4s.
|
|
||||||
bcs stop
|
bcs stop
|
||||||
|
|
||||||
lda skctl
|
lda skctl
|
||||||
@@ -194,7 +193,7 @@ VBL
|
|||||||
|
|
||||||
mva #@dmactl(standard|dma|lineX1|players|missiles) dmactl ;set new screen width
|
mva #@dmactl(standard|dma|lineX1|players|missiles) dmactl ;set new screen width
|
||||||
|
|
||||||
inc cloc ;little timer
|
inw cloc ;little timer
|
||||||
|
|
||||||
; Initial values
|
; Initial values
|
||||||
|
|
||||||
|
|||||||
Binary file not shown.
|
Before Width: | Height: | Size: 11 KiB After Width: | Height: | Size: 4.5 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 5.0 KiB |
Reference in New Issue
Block a user