.text; .even; .globl _DoPkt4

_DoPkt4:
	moveml #0x3e02,sp@-
	movel _DOSBase,a6
	movel sp@(28),d1
	movel sp@(32),d2
	movel sp@(36),d3
	movel sp@(40),d4
	movel sp@(44),d5
	movel sp@(48),d6
#APP
	jsr a6@(-0xf0)
#NO_APP
	moveml sp@+,#0x407c
	rts