mirror of
https://github.com/Pecusx/dino-game.git
synced 2026-05-20 22:33:23 +02:00
153 lines
3.6 KiB
NASM
153 lines
3.6 KiB
NASM
; @com.wudsn.ide.asm.mainsourcefile=dino.asm
|
|
|
|
.IF *>0 ;this is a trick that prevents compiling this file alone
|
|
|
|
; dno run
|
|
dino_run_0 ; anly '0' jumps
|
|
.by $20, $24, $28, $2c, $ff ; ' ## .'
|
|
.by $21, $25, $29, $ff, $ff ; '## ..'
|
|
.by $22, $26, $2a, $ff, $ff ; '## ..'
|
|
dino_run_1
|
|
.by $20, $24, $28, $2c, $ff ; ' ## .'
|
|
.by $21, $25, $29, $ff, $ff ; '## ..'
|
|
.by $2d, $2e, $2f, $ff, $ff ; '## ..'
|
|
dino_run_2
|
|
.by $20, $24, $28, $2c, $ff ; ' ## .'
|
|
.by $21, $25, $29, $ff, $ff ; '## ..'
|
|
.by $30, $31, $32, $ff, $ff ; '## ..'
|
|
dino_crouch_1
|
|
.by $ff, $ff, $ff, $ff, $ff ; '.....'
|
|
.by $33, $34, $35, $36, $37 ; '#### '
|
|
.by $38, $39, $3a, $3b, $3c ; '#### '
|
|
dino_crouch_2
|
|
.by $ff, $ff, $ff, $ff, $ff ; '.....'
|
|
.by $33, $34, $35, $36, $37 ; '#### '
|
|
.by $3d, $3e, $3f, $3b, $3c ; '#### '
|
|
DinoShapesTableL
|
|
.by <dino_run_1
|
|
.by <dino_run_2
|
|
.by <dino_crouch_1
|
|
.by <dino_crouch_2
|
|
.by <dino_run_0 ; jump
|
|
.by <dino_run_0 ; jump
|
|
DinoShapesTableH
|
|
.by >dino_run_1
|
|
.by >dino_run_2
|
|
.by >dino_crouch_1
|
|
.by >dino_crouch_2
|
|
.by >dino_run_0 ; jump
|
|
.by >dino_run_0 ; jump
|
|
; other objects
|
|
ground_0
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $52, $52 ; '##'
|
|
bird_0
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $40, $41 ; '##'
|
|
.by $52, $52 ; '##'
|
|
bird_1
|
|
.by $ff, $ff ; '..'
|
|
.by $40, $41 ; '##'
|
|
.by $ff, $ff ; '..'
|
|
.by $52, $52 ; '##'
|
|
bird_2
|
|
.by $40, $41 ; '##'
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; ''.'
|
|
.by $52, $52 ; '##'
|
|
bird_0a
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $42, $43 ; '##'
|
|
.by $52, $52 ; '##'
|
|
bird_1a
|
|
.by $ff, $ff ; '..'
|
|
.by $42, $43 ; '##'
|
|
.by $ff, $ff ; '..'
|
|
.by $52, $52 ; '##'
|
|
bird_2a
|
|
.by $42, $43 ; '##'
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; ''.'
|
|
.by $52, $52 ; '##'
|
|
cactus_0
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $46, $47 ; '##'
|
|
.by $44, $45 ; '##'
|
|
cactus_1
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $4a, $4b ; '##'
|
|
.by $48, $49 ; '##'
|
|
cactus_2
|
|
.by $ff, $ff ; '..'
|
|
.by $50, $51 ; '##'
|
|
.by $4e, $4f ; '##'
|
|
.by $4c, $4d ; '##'
|
|
cactus_3
|
|
.by $ff, $ff ; '..'
|
|
.by $57, $ff ; '#.'
|
|
.by $56, $ff ; '#.'
|
|
.by $55, $52 ; '##'
|
|
cactus_4
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $59, $ff ; '#.'
|
|
.by $58, $52 ; '##'
|
|
ground_1
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $53, $54 ; '##'
|
|
ground_2
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $ff, $ff ; '..'
|
|
.by $5a, $52 ; '##'
|
|
|
|
ShapesTableL
|
|
.by <ground_0
|
|
.by <ground_0
|
|
.by <bird_0
|
|
.by <bird_0a
|
|
.by <bird_1
|
|
.by <bird_1a
|
|
.by <bird_2
|
|
.by <bird_2a
|
|
.by <cactus_2
|
|
.by <cactus_3
|
|
.by <cactus_0
|
|
.by <cactus_1
|
|
.by <cactus_4
|
|
.by <ground_1
|
|
.by <ground_2
|
|
ShapesTableH
|
|
.by >ground_0
|
|
.by >ground_0
|
|
.by >bird_0
|
|
.by >bird_0a
|
|
.by >bird_1
|
|
.by >bird_1a
|
|
.by >bird_2
|
|
.by >bird_2a
|
|
.by >cactus_2
|
|
.by >cactus_3
|
|
.by >cactus_0
|
|
.by >cactus_1
|
|
.by >cactus_4
|
|
.by >ground_1
|
|
.by >ground_2
|
|
diff_object_gap ; min distance between obstacles by difficulty level
|
|
.by 24,22,20,18,16,14,12,11,10,9,8,8,8,8,8,8,8,8,8,8,8,8,8
|
|
;.by 8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8
|
|
;----------vars----------
|
|
CloudHpos .by 0,0,0,0
|
|
diff_level .ds 1
|
|
DinoJumpTr .by 1,2,3,4,4,4,3,2,1
|
|
JumpLen = 8
|
|
.endif ; .IF *>0
|