19 lines
1.2 KiB
Plaintext
19 lines
1.2 KiB
Plaintext
1 .module wc_nork
|
|
2 .area _CODE
|
|
00006006 3 WC_ENTRY = 0x6006
|
|
4 .globl _wc_nork
|
|
00000000 5 _wc_nork::
|
|
00000000 DD E5 [15] 6 push ix
|
|
00000002 DD 21 00 00 [14] 7 ld ix, #0
|
|
00000006 DD 39 [15] 8 add ix, sp
|
|
00000008 DD 7E 04 [19] 9 ld a, 4(ix) ; A = val (from stack)
|
|
0000000B 08 [ 4] 10 ex af, af' ; A' = val
|
|
11 ; HL = addr (1st arg, already in HL)
|
|
0000000C 3E 0A [ 7] 12 ld a, #0x0A
|
|
0000000E CD 06 60 [17] 13 call WC_ENTRY
|
|
00000011 DD E1 [14] 14 pop ix
|
|
15 ; callee cleans 1 byte (val)
|
|
00000013 E1 [10] 16 pop hl
|
|
00000014 33 [ 6] 17 inc sp
|
|
00000015 E9 [ 4] 18 jp (hl)
|