mirror of
https://github.com/Pecusx/Young-lumberjack.git
synced 2026-05-21 06:39:43 +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
|
||||
dta d"1.02" ; number of this build (4 bytes)
|
||||
dta d"1.07" ; number of this build (4 bytes)
|
||||
.endm
|
||||
|
||||
.macro RMTSong
|
||||
@@ -57,7 +57,8 @@
|
||||
.zpvar SpeedTableAdr .word
|
||||
.zpvar Difficulty .byte ; 0 - normal, 1 - easy
|
||||
.zpvar LumberjackDir .byte ; 2 - on left , 1 - on right
|
||||
.zpvar PaddleState .byte
|
||||
.zpvar Paddle1State .byte
|
||||
.zpvar Paddle2State .byte
|
||||
.zpvar LowCharsetBase .byte
|
||||
.zpvar displayposition .word
|
||||
.zpvar LastKey .byte ; $ff if no key pressed or last key released
|
||||
@@ -195,7 +196,7 @@ timber_foot_addr
|
||||
.wo foot_0
|
||||
.by $44+$80 ; DLI_L2 - fonts
|
||||
.wo title_timber+(32*7) ; rest of shadow
|
||||
.by $45
|
||||
.by $45
|
||||
difficulty_text_addr
|
||||
.wo difficulty_normal_text
|
||||
.by $45+$80
|
||||
@@ -203,6 +204,8 @@ difficulty_text_addr
|
||||
.by $45+$80
|
||||
.wo credits_lines
|
||||
.by $85
|
||||
.by $44 ; anty ANTIC 40/32 switch glitch :)
|
||||
.wo empty_line
|
||||
.by $41
|
||||
.wo dl_title
|
||||
;---------------------------------------------------
|
||||
@@ -1804,8 +1807,10 @@ RIPLoop
|
||||
jsr GetKeyFast
|
||||
cmp #@kbcode._space ; space, Start
|
||||
beq restart
|
||||
cmp #@kbcode._tab ; TAB, 1st joy button
|
||||
lda STRIG0
|
||||
beq restart
|
||||
; cmp #@kbcode._tab ; TAB, 1st joy button
|
||||
; beq restart
|
||||
lda RTCLOK+1
|
||||
cmp #2
|
||||
bne RIPLoop
|
||||
@@ -3466,7 +3471,7 @@ draw_branch3
|
||||
bne not_phase4
|
||||
ldx #(4*32) ; how many lines draw
|
||||
not_phase4
|
||||
stx tempbyte
|
||||
stx tempbyte2
|
||||
; now calculate start screen address
|
||||
:5 asl ; phase*32
|
||||
;clc
|
||||
@@ -3484,7 +3489,7 @@ not_phase4
|
||||
@ lda (temp2),y
|
||||
sta (temp),y
|
||||
iny
|
||||
cpy tempbyte ;? lines
|
||||
cpy tempbyte2 ;? lines
|
||||
bne @-
|
||||
draw_branch4
|
||||
lda branches_anim_phase
|
||||
@@ -3500,7 +3505,7 @@ not_phase1
|
||||
bne not_phase2
|
||||
ldx #(1*32) ; how many lines draw
|
||||
not_phase2
|
||||
stx tempbyte
|
||||
stx tempbyte2
|
||||
; now calculate start screen address
|
||||
:5 asl ; phase*32
|
||||
;clc
|
||||
@@ -3518,7 +3523,7 @@ not_phase2
|
||||
@ lda (temp2),y
|
||||
sta (temp),y
|
||||
iny
|
||||
cpy tempbyte ;? lines
|
||||
cpy tempbyte2 ;? lines
|
||||
bne @-
|
||||
all_drawed
|
||||
rts
|
||||
@@ -3610,10 +3615,11 @@ notpressedJoyGetKey
|
||||
;fire
|
||||
lda STRIG0
|
||||
beq JoyButton
|
||||
.IF TARGET = 800 ; Second joy button , Select and Option key only on A800
|
||||
jsr Check2button
|
||||
.IF TARGET = 800 ; More joy buttons , Select and Option key only on A800
|
||||
jsr Check3button ; Third joy button
|
||||
bcc JoyButton ; like First button
|
||||
jsr Check2button ; Second joy button
|
||||
bcc SecondButton
|
||||
bne checkSelectKey
|
||||
checkSelectKey
|
||||
lda CONSOL
|
||||
and #%00000010 ; Select
|
||||
@@ -3625,6 +3631,8 @@ checkSelectKey
|
||||
and #%00000001 ; Start
|
||||
beq StartPressed
|
||||
.ENDIF
|
||||
lda STRIG1
|
||||
beq SecondButton
|
||||
lda #@kbcode._none
|
||||
bne getkeyend
|
||||
OptionPressed
|
||||
@@ -3649,8 +3657,15 @@ Check2button
|
||||
lda PADDL0
|
||||
and #$c0
|
||||
eor #$C0
|
||||
cmp PaddleState
|
||||
sta PaddleState
|
||||
cmp Paddle1State
|
||||
sta Paddle1State
|
||||
rts
|
||||
Check3button
|
||||
lda PADDL1
|
||||
and #$c0
|
||||
eor #$C0
|
||||
cmp Paddle2State
|
||||
sta Paddle2State
|
||||
rts
|
||||
.ENDIF
|
||||
.endp
|
||||
@@ -3675,6 +3690,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
|
||||
|
||||
|
||||
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