;Death Crypt boss summoning script

If GetUserFlag(0,37) = 0
	SetUserFlag(0,37,3)
	;Unsummon old monsters
	UnspawnMonster(1189,187)
	UnspawnMonster(1189,197)
	UnspawnMonster(1189,197)
	
	;Summon new boss
	SendMessageToAll(GetUserName(#USERID)+" has entered the crypt of the Liche.",#MSG_SERVER) 
	SpawnMonster(1189, 187, 10, 5)
	
	;Set timer to boss skills
	Timer(625,10000,0,0,0)
EndIf

TakeItem(#USERID,461)
TakeItem(#USERID,462)
TakeItem(#USERID,463)
TakeItem(#USERID,464)
TakeItem(#USERID,465)

SetUserMana(#USERID, Floor(GetUserMana(#USERID) * 0.5))
WarpUser(#USERID,1189,10,10)

Continue = 1