Label Start

VarX=Random(-1,1)
VarY=Random(-1,1)


If GetUserMap(#PARAM1)=#PARAM2
If GetTileType(#PARAM2,GetUserX(#PARAM1)+VarX,GetUserY(#PARAM1)+VarY)<>#TILE_WALL

	DamageMonster(#PARAM2,8,25000)
	SpawnMonster(#PARAM2,88,GetUserX(#PARAM1)+VarX,GetUserY(#PARAM1)+VarY)
	SetMonsterTarget(#PARAM2,8,#PARAM1)
Else
Goto Start
Endif
Endif


Continue = 1