1 .module wc_gvtl 2 .area _CODE 00006006 3 WC_ENTRY = 0x6006 4 .globl _wc_gvtl 00000000 5 _wc_gvtl:: 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 4E 04 [19] 9 ld c, 4(ix) ; C = page 0000000B 47 [ 4] 10 ld b, a ; B = plane 0000000C 3E 46 [ 7] 11 ld a, #0x46 0000000E CD 06 60 [17] 12 call WC_ENTRY 00000011 DD E1 [14] 13 pop ix 14 ; callee cleans 1 byte (page) 00000013 E1 [10] 15 pop hl 00000014 33 [ 6] 16 inc sp 00000015 E9 [ 4] 17 jp (hl)