1 .module wc_tmrkdfl 2 .area _CODE 00006006 3 WC_ENTRY = 0x6006 4 .globl _wc_tmrkdfl 00000000 5 _wc_tmrkdfl:: 00000000 DD E5 [15] 6 push ix 00000002 E5 [11] 7 push hl ; save panel (HL = 1st arg) 00000003 D5 [11] 8 push de ; save filenum (DE = 2nd arg) 00000004 DD 21 00 00 [14] 9 ld ix, #0 00000008 DD 39 [15] 10 add ix, sp 0000000A DD 5E 08 [19] 11 ld e, 8(ix) 0000000D DD 56 09 [19] 12 ld d, 9(ix) ; DE = namebuf (from stack) 00000010 DD 6E 00 [19] 13 ld l, 0(ix) 00000013 DD 66 01 [19] 14 ld h, 1(ix) ; HL = filenum (from saved DE) 00000016 D9 [ 4] 15 exx 00000017 DD 6E 02 [19] 16 ld l, 2(ix) 0000001A DD 66 03 [19] 17 ld h, 3(ix) ; HL = panel (from saved HL) 0000001D E5 [11] 18 push hl 0000001E DD E1 [14] 19 pop ix ; IX = panel 00000020 D9 [ 4] 20 exx ; HL=filenum, DE=namebuf 00000021 3E 36 [ 7] 21 ld a, #0x36 00000023 CD 06 60 [17] 22 call WC_ENTRY 00000026 D1 [10] 23 pop de ; remove saved filenum 00000027 E1 [10] 24 pop hl ; remove saved panel 00000028 DD E1 [14] 25 pop ix 26 ; callee cleans 2 bytes (namebuf) 0000002A E1 [10] 27 pop hl 0000002B 33 [ 6] 28 inc sp 0000002C 33 [ 6] 29 inc sp 0000002D E9 [ 4] 30 jp (hl)