-
Notifications
You must be signed in to change notification settings - Fork 0
/
128-margins.lst
107 lines (107 loc) · 2.06 KB
/
128-margins.lst
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
SCREEN_ADR EQU 4000
ENTRY_POINT EQU 8000
ORG 8000
8000: label start
8000:060E LD B, 0E
8002:0E02 LD C, 02
8004:CD2080 CALL 8020
8007:CD2F80 CALL 802F
800A:060E LD B, 0E
800C:0E05 LD C, 05
800E:CD2080 CALL 8020
8011:CD2F80 CALL 802F
8014:061F LD B, 1F
8016:0E17 LD C, 17
8018:CD2080 CALL 8020
801B:CD2F80 CALL 802F
801E: label finish
801E:18FE JR 801E
8020: label calc_sprite_address
8020:79 LD A, C
8021:E607 AND 07
8023:0F RRCA
8024:0F RRCA
8025:0F RRCA
8026:B0 OR B
8027:5F LD E, A
8028:79 LD A, C
8029:E618 AND 18
802B:F640 OR 40
802D:57 LD D, A
802E:C9 RET
Defining MACRO add_e
Params: n
802F: label draw_sprite
802F:215A80 LD HL, 805A
8032:D5 PUSH DE
8033:CD4A80 CALL 804A
8036:D1 POP DE
Expanding MACRO add_e
n= 0020
LD A , E
8037:7B LD A, E
ADD A , n
8038:C620 ADD A, 20
LD E , A
803A:5F LD E, A
ENDM
ENDM
End of MACRO add_e
803B:D5 PUSH DE
803C:CD4A80 CALL 804A
803F:D1 POP DE
Expanding MACRO add_e
n= 0020
LD A , E
8040:7B LD A, E
ADD A , n
8041:C620 ADD A, 20
LD E , A
8043:5F LD E, A
ENDM
ENDM
End of MACRO add_e
8044:CD4A80 CALL 804A
8047:C9 RET
8048:0608 LD B, 08
804A: label draw_8_lines
804A:011008 LD BC, 0810
804D: label loop
804D:EDA0 LDI
804F:EDA0 LDI
8051:7E LD A, (HL)
8052:12 LD (DE), A
8053:23 INC HL
8054:1D DEC E
8055:1D DEC E
8056:14 INC D
8057:10F4 DJNZ 804D
8059:C9 RET
805A: label SPRITE_ADR
805A:000000 DEFB of 3 bytes
805D:000000 DEFB of 3 bytes
8060:01F010 DEFB of 3 bytes
8063:033810 DEFB of 3 bytes
8066:05D710 DEFB of 3 bytes
8069:05CC10 DEFB of 3 bytes
806C:053010 DEFB of 3 bytes
806F:04C810 DEFB of 3 bytes
8072:073610 DEFB of 3 bytes
8075:0CFE38 DEFB of 3 bytes
8078:1FF800 DEFB of 3 bytes
807B:000030 DEFB of 3 bytes
807E:03FFB0 DEFB of 3 bytes
8081:05FEE0 DEFB of 3 bytes
8084:0EFDC0 DEFB of 3 bytes
8087:18FC00 DEFB of 3 bytes
808A:180000 DEFB of 3 bytes
808D:01F800 DEFB of 3 bytes
8090:03FC00 DEFB of 3 bytes
8093:01B000 DEFB of 3 bytes
8096:020C00 DEFB of 3 bytes
8099:070E00 DEFB of 3 bytes
809C:1E0780 DEFB of 3 bytes
809F:000000 DEFB of 3 bytes
80A2: END 8000
Emiting TAP basic loader
Emiting TAP from 8000 to 80A1