1; ZX Implementation of the hardware out for VortexTracker/z80
2
3	SECTION	code_psg
4
5	PUBLIC	asm_vt_hardware_out
6	PUBLIC	asm_vt_hardware_out_A0
7	EXTERN	asm_VT_AYREGS
8
9
10asm_vt_hardware_out:
11        XOR A
12asm_vt_hardware_out_A0:
13ROUT_A0:
14        LD DE,$FFBF
15        LD BC,$FFFD
16        LD HL,asm_VT_AYREGS
17LOUT:
18        OUT (C),A
19        LD B,E
20        OUTI
21        LD B,D
22        INC A
23        CP 13
24        JR NZ,LOUT
25        OUT (C),A
26        LD A,(HL)
27        AND A
28        RET M
29        LD B,E
30        OUT (C),A
31        RET
32