get_psg.asm
bitfixer_bitfixer/dg/z88dk/libsrc/psg/spectrum/get_psg.asm
;
;	ZX Spectrum specific routines
;	by Stefano Bodrato, Fall 2013
;
;	int get_psg(int reg);
;
;	Get a PSG register
;
;
;	$Id: get_psg.asm,v 1.2 2015/01/19 01:33:04 pauloscustodio Exp $
;

	PUBLIC	get_psg
	PUBLIC	psg_patch2
	PUBLIC	psg_patch3
	
get_psg:

psg_patch2:
    LD	BC,$fffd
	OUT	(C),l
psg_patch3:
    nop
    nop
	in	a,(C)
	ld	l,a
	ret
