Pecus/Young-lumberjack
1
0
Fork 0
mirror of https://github.com/Pecusx/Young-lumberjack.git synced 2026-05-21 06:39:43 +02:00
Code Issues 2 Packages Projects Releases 3 Wiki Activity

New clouds

Browse Source
This commit is contained in:
Pecusx
2025-03-20 21:04:15 +01:00
parent 10711880e6
commit b355edc8a6
4 changed files with 122 additions and 41 deletions
Download Patch File Download Diff File Expand all files Collapse all files
art/anim_exported.asm
+3 -3
View File
@@ -17,19 +17,19 @@ branch0
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$B4,$9F,$A0,$A1,$A2,$A3,$A4,$B4,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
branch1
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$B4,$C3,$C4,$C5,$C6,$C7,$C8,$C9,$CA,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$B5,$CB,$CC,$CD,$CE,$CF,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$B4,$9F,$A0,$A1,$A2,$A3,$A4,$B4,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
branch2
dta $A8,$8D,$01,$B6,$B7,$B8,$B9,$BA,$BB,$BC,$BD,$AB,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$BE,$BF,$C0,$C1,$C2,$AA,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$A5,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$25,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$9E,$9F,$A0,$A1,$A2,$A3,$A4,$25,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$1E,$9F,$A0,$A1,$A2,$A3,$A4,$25,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
dta $A8,$8D,$01,$01,$01,$01,$8E,$86,$01,$01,$01,$1D,$B4,$9F,$A0,$A1,$A2,$A3,$A4,$B4,$26,$01,$01,$84,$8D,$01,$01,$01,$01,$01,$01,$85
last_line_r
phase1rp1c0 = $CE
art/sky.atrview
+1 -1
View File
File diff suppressed because one or more lines are too long
lumber.asm
+118 -37
View File
@@ -106,11 +106,10 @@ dl_level
.by $04
.by $44
.wo gamescreen_middle ; branches
:2 .by $04
.by $84 ; DLI1 - color change (power bar - letters) and second clouds
:5 .by $04
:3 .by $04
.by $84 ; DLI2 - last clouds
:7 .by $04
:11 .by $04
.by $84 ; DLI3
.by $44
animation_addr
@@ -986,9 +985,9 @@ datalines_bird=8
.proc PrepareCloudsPM
;--------------------------------------------------
; 3 clouds
; 1 - vertical offset in PM from 5 (first byte) to 28 (last byte)
; 2 - vertical offset in PM from 29 (first byte) to 52 (last byte)
; 3 - vertical offset in PM from 53 (first byte) to 84 (last byte)
; 1 - vertical offset in PM from 5 (first byte) to 20 (last byte)
; 2 - vertical offset in PM from 21 (first byte) to 36 (last byte)
; 3 - vertical offset in PM from 37 (first byte) to 84 (last byte)
; cloud
jsr make_cloud1
jsr make_cloud2
@@ -1015,47 +1014,47 @@ datalines_bird=8
rts
make_cloud1
; clear cloud 1 PMG memory
ldx #(28-5)
ldx #(20-5)
lda #0
@ sta PMmemory+$300+5,x
sta PMmemory+$380+5,x
sta PMmemory+$180+5,x
dex
bpl @-
randomize 0 (28-5-datalines_clouds)
randomize 0 (20-5-datalines_clouds)
adc #(datalines_clouds-1+5)
tay
bne fill_cloud
make_cloud2
; clear cloud 2 PMG memory
ldx #(52-29)
ldx #(36-21)
lda #0
@ sta PMmemory+$300+29,x
sta PMmemory+$380+29,x
sta PMmemory+$180+29,x
@ sta PMmemory+$300+21,x
sta PMmemory+$380+21,x
sta PMmemory+$180+21,x
dex
bpl @-
randomize 0 (52-29-datalines_clouds)
adc #(datalines_clouds-1+29)
randomize 0 (36-21-datalines_clouds)
adc #(datalines_clouds-1+21)
tay
bne fill_cloud
make_cloud3
; clear cloud 3 PMG memory
ldx #(84-53)
ldx #(84-37)
lda #0
@ sta PMmemory+$300+53,x
sta PMmemory+$380+53,x
sta PMmemory+$180+53,x
@ sta PMmemory+$300+37,x
sta PMmemory+$380+37,x
sta PMmemory+$180+37,x
dex
bpl @-
randomize 0 (70-53-datalines_clouds)
adc #(datalines_clouds-1+53)
randomize 0 (51-37-datalines_clouds)
adc #(datalines_clouds-1+37)
tay
; fill cloud PMG memory
fill_cloud
ldx #datalines_clouds-1
lda RANDOM
and #%00000011
and #%00000111
bne not_shape_1
; shape1
@ lda cloud1_P2,x
@@ -1097,6 +1096,8 @@ not_shape_2
bpl @-
rts
not_shape_3
cmp #3
bne not_shape_4
; shape 4
@ lda cloud4_P2,x
sta PMmemory+$300,y
@@ -1108,35 +1109,115 @@ not_shape_3
dex
bpl @-
rts
not_shape_4
cmp #4
bne not_shape_5
; shape 5
@ lda cloud5_P2,x
sta PMmemory+$300,y
lda cloud5_P3,x
sta PMmemory+$380,y
lda cloud5_M,x
sta PMmemory+$180,y
dey
dex
bpl @-
rts
not_shape_5
cmp #5
bne not_shape_6
; shape 6
@ lda cloud6_P2,x
sta PMmemory+$300,y
lda cloud6_P3,x
sta PMmemory+$380,y
lda cloud6_M,x
sta PMmemory+$180,y
dey
dex
bpl @-
rts
not_shape_6
cmp #6
bne not_shape_7
; shape 7
@ lda cloud7_P2,x
sta PMmemory+$300,y
lda cloud7_P3,x
sta PMmemory+$380,y
lda cloud7_M,x
sta PMmemory+$180,y
dey
dex
bpl @-
rts
not_shape_7
; shape 8
@ lda cloud8_P2,x
sta PMmemory+$300,y
lda cloud8_P3,x
sta PMmemory+$380,y
lda cloud8_M,x
sta PMmemory+$180,y
dey
dex
bpl @-
rts
; clouds data
; shape 1
; shapes 1 to 8 for clouds
; player 2
cloud1_P2
.by $00,$00,$00,$00,$00,$00,$00,$00,$08,$1D,$3F,$3F
cloud1_P3
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$80,$E0,$F8
cloud1_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
; shape2
cloud2_P2
.by $00,$00,$00,$00,$00,$00,$00,$00,$07,$1F,$3F,$FF
cloud2_P3
.by $00,$00,$00,$00,$00,$00,$00,$00,$80,$DC,$FE,$FF
cloud2_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
; shape 3
cloud3_P2
.by $00,$00,$00,$00,$00,$00,$00,$38,$7D,$FF,$FF,$FF
cloud3_P3
.by $00,$00,$00,$00,$00,$00,$00,$C0,$F0,$FC,$FE,$FF
cloud3_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$10,$30
; shape 4
cloud4_P2
.by $00,$00,$00,$00,$00,$00,$0E,$1F,$1F,$7F,$FF,$FF
cloud5_P2
.by $00,$00,$00,$00,$00,$00,$01,$73,$FF,$FF,$FF,$FF
cloud6_P2
.by $00,$00,$00,$00,$00,$3E,$FF,$FF,$FF,$FF,$FF,$7C
cloud7_P2
.by $00,$00,$01,$03,$77,$FF,$FF,$FF,$FF,$FF,$07,$01
cloud8_P2
.by $00,$0F,$1F,$BF,$FF,$FF,$FF,$FF,$FF,$FF,$1F,$07
; player 3
cloud1_P3
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$80,$E0,$F8
cloud2_P3
.by $00,$00,$00,$00,$00,$00,$00,$00,$80,$DC,$FE,$FF
cloud3_P3
.by $00,$00,$00,$00,$00,$00,$00,$C0,$F0,$FC,$FE,$FF
cloud4_P3
.by $00,$00,$00,$00,$00,$00,$30,$78,$78,$FB,$FF,$FF
cloud5_P3
.by $00,$00,$00,$00,$00,$00,$C0,$F6,$FF,$FF,$FF,$FF
cloud6_P3
.by $00,$00,$00,$00,$00,$00,$7C,$FF,$FF,$FF,$FF,$FF
cloud7_P3
.by $00,$00,$F0,$FB,$FF,$FF,$FF,$FF,$FF,$FF,$FC,$F8
cloud8_P3
.by $0F,$1F,$BF,$FF,$FF,$FF,$FF,$FF,$FF,$FC,$C0,$80
; missiles
cloud1_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
cloud2_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00
cloud3_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$10,$30
cloud4_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$90
cloud5_M
.by $00,$00,$00,$00,$00,$00,$00,$00,$00,$10,$B0,$F0
cloud6_M
.by $00,$00,$00,$00,$00,$00,$10,$30,$B0,$B0,$90,$00
cloud7_M
.by $00,$00,$00,$80,$C0,$C0,$D0,$F0,$F0,$80,$00,$00
cloud8_M
.by $00,$80,$80,$D0,$F0,$F0,$F0,$F0,$B0,$10,$00,$00
datalines_clouds=12
.endp
;--------------------------------------------------
lumber.xex
BIN
View File
Binary file not shown.