Files

18 lines
1.1 KiB
Plaintext

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)