Function Main(Map as Long, Monster as Long, TargetMonster as Long) as Long
Dim Map as Long, X as Long, Y as Long

Map = GetPlayerMap(Player)
X = GetPlayerX(Player)
Y = GetPlayerY(Player)


Main = Continue

End Function