1
2
3
4
5
6	INCLUDE "z80_crt0.hdr"
7
8
9	SECTION	code_compiler
10
11._func1a
12	pop	bc
13	pop	hl
14	push	hl
15	push	bc
16	inc	hl
17	inc	hl
18	ret
19
20
21
22._func1b
23	pop	bc
24	pop	hl
25	push	hl
26	push	bc
27	inc	hl
28	inc	hl
29	ret
30
31
32
33._func1c
34	ld	hl,2	;const
35	add	hl,sp
36	ld	e,(hl)
37	inc	hl
38	ld	d,(hl)
39	ld	hl,4	;const
40	add	hl,sp
41	call	l_gint	;
42	ex	de,hl
43	and	a
44	sbc	hl,de
45	ret
46
47
48
49._func1d
50	pop	bc
51	pop	hl
52	push	hl
53	push	bc
54	ex	de,hl
55	ld	hl,(_c)
56	ex	de,hl
57	and	a
58	sbc	hl,de
59	ret
60
61
62
63._func1e
64	pop	de
65	pop	hl
66	dec	hl
67	push	hl
68	push	de
69	inc	hl
70	ret
71
72
73
74._func2a
75	pop	bc
76	pop	hl
77	push	hl
78	push	bc
79	ld	bc,4
80	add	hl,bc
81	ret
82
83
84
85._func2b
86	pop	bc
87	pop	hl
88	push	hl
89	push	bc
90	ld	bc,4
91	add	hl,bc
92	ret
93
94
95
96._func2c
97	ld	hl,2	;const
98	add	hl,sp
99	ld	e,(hl)
100	inc	hl
101	ld	d,(hl)
102	ld	hl,4	;const
103	add	hl,sp
104	call	l_gint	;
105	ex	de,hl
106	and	a
107	sbc	hl,de
108	srl	h
109	rr	l
110	ret
111
112
113
114._func2d
115	pop	bc
116	pop	hl
117	push	hl
118	push	bc
119	push	hl
120	ld	hl,(_c)
121	add	hl,hl
122	pop	de
123	ex	de,hl
124	and	a
125	sbc	hl,de
126	ret
127
128
129
130._func2e
131	ld	hl,2	;const
132	add	hl,sp
133	push	hl
134	call	l_gint	;
135	dec	hl
136	dec	hl
137	pop	de
138	call	l_pint
139	inc	hl
140	inc	hl
141	ret
142
143
144
145._func3a
146	pop	bc
147	pop	hl
148	push	hl
149	push	bc
150	ld	bc,4
151	add	hl,bc
152	ret
153
154
155
156._func3b
157	pop	bc
158	pop	hl
159	push	hl
160	push	bc
161	ld	bc,4
162	add	hl,bc
163	ret
164
165
166
167._func3c
168	ld	hl,2	;const
169	add	hl,sp
170	ld	e,(hl)
171	inc	hl
172	ld	d,(hl)
173	ld	hl,4	;const
174	add	hl,sp
175	call	l_gint	;
176	ex	de,hl
177	and	a
178	sbc	hl,de
179	srl	h
180	rr	l
181	ret
182
183
184
185._func3d
186	pop	bc
187	pop	hl
188	push	hl
189	push	bc
190	push	hl
191	ld	hl,(_c)
192	add	hl,hl
193	pop	de
194	ex	de,hl
195	and	a
196	sbc	hl,de
197	ret
198
199
200
201._func3e
202	ld	hl,2	;const
203	add	hl,sp
204	push	hl
205	call	l_gint	;
206	dec	hl
207	dec	hl
208	pop	de
209	call	l_pint
210	inc	hl
211	inc	hl
212	ret
213
214
215
216._func4a
217	pop	bc
218	pop	hl
219	push	hl
220	push	bc
221	ld	bc,8
222	add	hl,bc
223	ret
224
225
226
227._func4b
228	pop	bc
229	pop	hl
230	push	hl
231	push	bc
232	ld	bc,8
233	add	hl,bc
234	ret
235
236
237
238._func4c
239	ld	hl,2	;const
240	add	hl,sp
241	ld	e,(hl)
242	inc	hl
243	ld	d,(hl)
244	ld	hl,4	;const
245	add	hl,sp
246	call	l_gint	;
247	ex	de,hl
248	and	a
249	sbc	hl,de
250	srl	h
251	rr	l
252	srl	h
253	rr	l
254	ret
255
256
257
258._func4d
259	pop	bc
260	pop	hl
261	push	hl
262	push	bc
263	push	hl
264	ld	hl,(_c)
265	add	hl,hl
266	add	hl,hl
267	pop	de
268	ex	de,hl
269	and	a
270	sbc	hl,de
271	ret
272
273
274
275._func4e
276	ld	hl,2	;const
277	add	hl,sp
278	push	hl
279	ld	c,(hl)
280	inc	hl
281	ld	b,(hl)
282	ld	hl,-4
283	add	hl,bc
284	pop	de
285	call	l_pint
286	ld	bc,4
287	add	hl,bc
288	ret
289
290
291
292._func5a
293	pop	bc
294	pop	hl
295	push	hl
296	push	bc
297	ld	bc,4
298	add	hl,bc
299	ret
300
301
302
303._func5b
304	pop	bc
305	pop	hl
306	push	hl
307	push	bc
308	ld	bc,4
309	add	hl,bc
310	ret
311
312
313
314._func5c
315	ld	hl,2	;const
316	add	hl,sp
317	ld	e,(hl)
318	inc	hl
319	ld	d,(hl)
320	ld	hl,4	;const
321	add	hl,sp
322	call	l_gint	;
323	ex	de,hl
324	and	a
325	sbc	hl,de
326	srl	h
327	rr	l
328	ret
329
330
331
332._func5d
333	pop	bc
334	pop	hl
335	push	hl
336	push	bc
337	push	hl
338	ld	hl,(_c)
339	add	hl,hl
340	pop	de
341	ex	de,hl
342	and	a
343	sbc	hl,de
344	ret
345
346
347
348._func5e
349	ld	hl,2	;const
350	add	hl,sp
351	push	hl
352	call	l_gint	;
353	dec	hl
354	dec	hl
355	pop	de
356	call	l_pint
357	inc	hl
358	inc	hl
359	ret
360
361
362
363
364	SECTION	bss_compiler
365._c	defs	2
366	SECTION	code_compiler
367
368
369
370	GLOBAL	_c
371	GLOBAL	_func1a
372	GLOBAL	_func1b
373	GLOBAL	_func1c
374	GLOBAL	_func1d
375	GLOBAL	_func1e
376	GLOBAL	_func2a
377	GLOBAL	_func2b
378	GLOBAL	_func2c
379	GLOBAL	_func2d
380	GLOBAL	_func2e
381	GLOBAL	_func3a
382	GLOBAL	_func3b
383	GLOBAL	_func3c
384	GLOBAL	_func3d
385	GLOBAL	_func3e
386	GLOBAL	_func4a
387	GLOBAL	_func4b
388	GLOBAL	_func4c
389	GLOBAL	_func4d
390	GLOBAL	_func4e
391	GLOBAL	_func5a
392	GLOBAL	_func5b
393	GLOBAL	_func5c
394	GLOBAL	_func5d
395	GLOBAL	_func5e
396
397
398
399
400