;*******************************
; MOSEFX.M68
;
; by Dave Heyliger - AMUS Staff
;
; Clears MOOSE.SYS if it gets
; mucked up.
;*******************************
SEARCH SYS
SEARCH SYSSYM
OFINI
OFDEF MOOSYS,14
OFSIZ IMPSIZ
GETIMP IMPSIZ,A3
LEA A2,BUFFER
LEA A4,MOOSYS(A3)
FILNAM @A4
SRCH @A4,A1
MOVB #777,D4
LOOP: MOVB #0,(A1)+
DECB D4
BNE LOOP
EXIT
BUFFER: ASCII /MOOSE.SYS/
EVEN
END
