;God - Warp all to me

;if GetUserName(#USERID)="dracflamloc"
;  GiveUserWisdomExp(#USERID,10000)
;  Goto END
;endif 

If GetUserAccess(#USERID)>0
  m=GetUserMap(#USERID)
  x=GetUserX(#USERID)
  y=GetUserY(#USERID)
  i=GetNextOnlineUser(0)
  while i > 0
    WarpUser(i,m,x,y)	
    i=GetNextOnlineUser(i)
  wend 
EndIf

LABEL END
Continue = 1