Function Main(Player as Long, Target as Long, Text as String) 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