Let's animate!

This commit is contained in:
Pecusx
2024-08-11 13:03:53 +02:00
parent b1e99ddfcb
commit f9ba64c21d
11 changed files with 766 additions and 547 deletions
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
+32 -9
View File
@@ -29,38 +29,53 @@ dino_crouch_2
.by $33, $34, $35, $36, $37 ; '#### '
.by $3d, $3e, $3f, $3b, $3c ; '#### '
DinoShapesTableL
.by <dino_run_0
.by <dino_run_1
.by <dino_run_2
.by <dino_crouch_1
.by <dino_crouch_2
.by <dino_run_0 ; jump
DinoShapesTableH
.by >dino_run_0
.by >dino_run_1
.by >dino_run_2
.by >dino_crouch_1
.by >dino_crouch_2
.by >dino_run_0 ; jump
; other objects
ground_0
.by $ff, $ff ; '..'
.by $ff, $ff ; '..'
.by $ff, $ff ; '..'
.by $52, $ff ; '#.'
.by $52, $52 ; '##'
bird_0
.by $ff, $ff ; '..'
.by $ff, $ff ; '..'
.by $48, $ff ; '#.'
.by $52, $ff ; '#.'
.by $40, $41 ; '##'
.by $52, $52 ; '##'
bird_1
.by $ff, $ff ; '..'
.by $48, $ff ; '#.'
.by $40, $41 ; '##'
.by $ff, $ff ; '..'
.by $52, $ff ; '#.'
.by $52, $52 ; '##'
bird_2
.by $48, $ff ; '#.'
.by $40, $41 ; '##'
.by $ff, $ff ; '..'
.by $ff, $ff ; ''.'
.by $52, $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 $54, $54 ; '##'
@@ -68,16 +83,24 @@ cactus_0
.by $52, $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_0
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_0
diff_object_gap ; min distance between obstacles by difficulty level
:DIFF_LEVELS .by 20-#
+2
View File
@@ -0,0 +1,2 @@
mads 2.1.7 build 3 (13 Sep 23)
Label table:
+111
View File
@@ -0,0 +1,111 @@
mads 2.1.7 build 3 (13 Sep 23)
Source: shapes.asm
1 ; @com.wudsn.ide.asm.mainsourcefile=dino.asm
2
3 .IF *>0 ;this is a trick that prevents compiling this file alone
4
5 ; dno run
6 dino_run_0 ; anly '0' jumps
7 .by $ff, $23, $27, $2b, $ff ; '. .'
8 .by $20, $24, $28, $2c, $ff ; ' ## .'
9 .by $21, $25, $29, $ff, $ff ; '## ..'
10 .by $22, $26, $2a, $ff, $ff ; '## ..'
11 dino_run_1
12 .by $ff, $23, $27, $2b, $ff ; '. .'
13 .by $20, $24, $28, $2c, $ff ; ' ## .'
14 .by $21, $25, $29, $ff, $ff ; '## ..'
15 .by $2d, $2e, $2f, $ff, $ff ; '## ..'
16 dino_run_2
17 .by $ff, $23, $27, $2b, $ff ; '. .'
18 .by $20, $24, $28, $2c, $ff ; ' ## .'
19 .by $21, $25, $29, $ff, $ff ; '## ..'
20 .by $30, $31, $32, $ff, $ff ; '## ..'
21 dino_crouch_1
22 .by $ff, $ff, $ff, $ff, $ff ; '.....'
23 .by $ff, $ff, $ff, $ff, $ff ; '.....'
24 .by $33, $34, $35, $36, $37 ; '#### '
25 .by $38, $39, $3a, $3b, $3c ; '#### '
26 dino_crouch_2
27 .by $ff, $ff, $ff, $ff, $ff ; '.....'
28 .by $ff, $ff, $ff, $ff, $ff ; '.....'
29 .by $33, $34, $35, $36, $37 ; '#### '
30 .by $3d, $3e, $3f, $3b, $3c ; '#### '
31 DinoShapesTableL
32 .by <dino_run_0
33 .by <dino_run_1
34 .by <dino_run_2
35 .by <dino_crouch_1
36 .by <dino_crouch_2
37 DinoShapesTableH
38 .by >dino_run_0
39 .by >dino_run_1
40 .by >dino_run_2
41 .by >dino_crouch_1
42 .by >dino_crouch_2
43 ; other objects
44 ground_0
45 .by $ff, $ff ; '..'
46 .by $ff, $ff ; '..'
47 .by $ff, $ff ; '..'
48 .by $52, $ff ; '#.'
49 bird_0
50 .by $ff, $ff ; '..'
51 .by $ff, $ff ; '..'
52 .by $40, $41 ; '##'
53 .by $52, $ff ; '#.'
54 bird_1
55 .by $ff, $ff ; '..'
56 .by $40, $41 ; '##'
57 .by $ff, $ff ; '..'
58 .by $52, $ff ; '#.'
59 bird_2
60 .by $40, $41 ; '##'
61 .by $ff, $ff ; '..'
62 .by $ff, $ff ; ''.'
63 .by $52, $ff ; '#.'
64 bird_0a
65 .by $ff, $ff ; '..'
66 .by $ff, $ff ; '..'
67 .by $42, $43 ; '##'
68 .by $52, $ff ; '#.'
69 bird_1a
70 .by $ff, $ff ; '..'
71 .by $42, $43 ; '##'
72 .by $ff, $ff ; '..'
73 .by $52, $ff ; '#.'
74 bird_2a
75 .by $42, $43 ; '##'
76 .by $ff, $ff ; '..'
77 .by $ff, $ff ; ''.'
78 .by $52, $ff ; '#.'
79 cactus_0
80 .by $ff, $ff ; '..'
81 .by $54, $54 ; '##'
82 .by $54, $54 ; '##'
83 .by $52, $52 ; '##'
84
85 ShapesTableL
86 .by <ground_0
87 .by <bird_0
88 .by <bird_0a
89 .by <bird_1
90 .by <bird_1a
91 .by <bird_2
92 .by <bird_2a
93 .by <cactus_0
94 ShapesTableH
95 .by >ground_0
96 .by >bird_0
97 .by >bird_0a
98 .by >bird_1
99 .by >bird_1a
100 .by >bird_2
101 .by >bird_2a
102 .by >cactus_0
103 diff_object_gap ; min distance between obstacles by difficulty level
104 :DIFF_LEVELS .by 20-#
105 ;----------vars----------
106 diff_level .ds 1
107
108
109 .endif ; .IF *>0