; Script Name: Dark Father corpse Opener
; Author: Jebbit
; Version: 1.1
; Client Tested with: 4.0.0q
; EUO version tested with: 1.4 (005b)
; Shard OSI / FS: OSI
; Revision Date:
; Public Release:8/8/04
; Purpose: Dark Father Gauntlet assistant . Simply opens main mob corpse on death
;and reopens if closed within 10 seconds.
Set %time 10

Loop:
finditem YFM G_2
WAIT 5
if #fINDid <> x
gosub gettype
goto loop

sub gettype
event property #findid
if daemon in #property || father in #property || creeper in #property || fleshrenderer in #property || impaler in #property || shadow in #property || abyssmal in #property
{
set %corpse #findid
gosub open
}
ignoreitem %corpse
return

;;------------------Corpse Open-----------------------
sub open
set %scnt #scnt + %time
again:
set #lobjectid %corpse
event macro 17 0
WAIT 15
wait:
finditem * c_ , %corpse
if #findkind = -1 && %scnt > #scnt
goto again
if %scnt > #scnt
goto wait
return