All pastes #337972 Raw Edit

ELS

public text v1 · immutable
·published 2007-02-03 02:26 UTC
rendered paste body
Sub Main(int UseDelay)
	/echo ${Macro.Name} started...
	/declare ZoneID			int		outer	${Zone.ID}
	/declare Loc[3]		float	outer
	/varset Loc[1] ${Me.X}
	/varset Loc[2] ${Me.Y}
	/varset Loc[3] ${Me.Z}
	:Loop
		/if (${Zone.ID} != ${ZoneID}) /return
		/if (${Math.Distance[${Loc[2]},${Loc[1]}]} > 50) /squelch /warp loc ${Loc[2]} ${Loc[1]} ${Loc[3]}
	/goto :Loop
/return