.text; .even; .globl _SetVar

_SetVar:
	moveml #0x3802,sp@-
	movel _DOSBase,a6
	movel sp@(20),d1
	movel sp@(24),d2
	movel sp@(28),d3
	movel sp@(32),d4
#APP
	jsr a6@(-0x384)
#NO_APP
	extl d0
	moveml sp@+,#0x401c
	rts