toggle_exos_variable.asm
bitfixer_bitfixer/dg/z88dk/libsrc/enterprise/toggle_exos_variable.asm
;
;	Enterprise 64/128 specific routines
;	by Stefano Bodrato, 2011
;
;	toggle_exos_variable(unsigned char variable);
;
;
;	$Id: toggle_exos_variable.asm,v 1.3 2015/01/19 01:32:43 pauloscustodio Exp $
;

	PUBLIC	toggle_exos_variable

;_FASTCALL_

toggle_exos_variable:

	ld	b,2		; TOGGLE mode
	ld	c,l		; Variable
	rst   30h
	defb  16	; SET_GET_EXOS_VARIABLE
	ld	h,0
	ld	l,d

	ret
