j1.asm
bitfixer_bitfixer/dg/z88dk/libsrc/zxvgs/j1.asm
;ZXVGS specific functions

;020121	(C) created by Yarek

	PUBLIC	j1

;int j1()
;returns joystick 1 state

.j1
	RST	8
	DEFB	$81
	LD	L,A
	LD	H,0		;does H have any matter?
	RET
