<Effect name="Move To Random Location">
<Param name="SrcObject" dispName="Source Units" varType="unit">default</Param>
<Param name="EventID" dispName="Trigger" varType="event">-1</Param>
<Param name="AttackMove" dispName="Attack Move" varType="bool">false</Param>
<Command>trUnitSelectClear();</Command>
<Command>trQuestVarSet("lastplayer", xsGetContextPlayer());</Command>
<Command>xsSetContextPlayer(0);</Command>
<Command>kbLookAtAllUnitsOnMap();</Command>
<Command>trQuestVarSetFromRand("MapXRandom", 0, kbGetMapXSize(), true);</Command>
<Command>trQuestVarSetFromRand("MapZRandom", 0, kbGetMapZSize(), true);</Command>
<Command loop="" loopParm="SrcObject">trUnitSelect("%SrcObject%");</Command>
<Command>trUnitMoveToPoint(trQuestVarGet("MapXRandom"),0,trQuestVarGet("MapZRandom"), %EventID%, %AttackMove%);</Command>
<Command>xsSetContextPlayer(trQuestVarGet("lastplayer"));</Command>
</Effect>
<Effect name="Army Teleport to Random Location">
<Param name="SrcArmy" dispName="Army" VarType="group">default</Param>
<Command>trQuestVarSet("lastplayer", xsGetContextPlayer());</Command>
<Command>xsSetContextPlayer(0);</Command>
<Command>kbLookAtAllUnitsOnMap();</Command>
<Command>trQuestVarSetFromRand("MapXRandom", 0, kbGetMapXSize(), true);</Command>
<Command>trQuestVarSetFromRand("MapZRandom", 0, kbGetMapZSize(), true);</Command>
<Command>trArmySelect("%SrcArmy%");</Command>
<Command>trUnitTeleport(trQuestVarGet("MapXRandom"),0,trQuestVarGet("MapZRandom"));</Command>
<Command>xsSetContextPlayer(trQuestVarGet("lastplayer"));</Command>
</Effect>
<Effect name="Teleport Units to Random Location">
<Param name="SrcObject" dispName="Source Units" varType="unit">default</Param>
<Command>trUnitSelectClear();</Command>
<Command>trQuestVarSet("lastplayer", xsGetContextPlayer());</Command>
<Command>xsSetContextPlayer(0);</Command>
<Command>kbLookAtAllUnitsOnMap();</Command>
<Command>trQuestVarSetFromRand("MapXRandom", 0, kbGetMapXSize(), true);</Command>
<Command>trQuestVarSetFromRand("MapZRandom", 0, kbGetMapZSize(), true);</Command>
<Command loop="" loopParm="SrcObject">trUnitSelect("%SrcObject%");</Command>
<Command>trUnitTeleport(trQuestVarGet("MapXRandom"),0,trQuestVarGet("MapZRandom"));</Command>
<Command>xsSetContextPlayer(trQuestVarGet("lastplayer"));</Command>
</Effect>
<Effect name="Unit Create at Random Location">
<Param name="PlayerID" dispName="Player" varType="string">1</Param>
<Param name="ProtoName" dispName="ProtoName" varType="protounit">Anubite</Param>
<Param name="ScenName" dispName="Name" varType="string">Default</Param>
<Param name="Heading" dispName="Heading" varType="long">0</Param>
<Command>trQuestVarSet("lastplayer", xsGetContextPlayer());</Command>
<Command>xsSetContextPlayer(0);</Command>
<Command>kbLookAtAllUnitsOnMap();</Command>
<Command>trQuestVarSetFromRand("MapXRandom", 0, kbGetMapXSize(), true);</Command>
<Command>trQuestVarSetFromRand("MapZRandom", 0, kbGetMapZSize(), true);</Command>
<Command>trUnitCreate("%ProtoName%", "%ScenName%", trQuestVarGet("MapXRandom"),0,trQuestVarGet("MapZRandom"),
%Heading%, %PlayerID%);</Command>
<Command>xsSetContextPlayer(trQuestVarGet("lastplayer"));</Command>
</Effect>
<Effect name="Unit Create Random at Random Location">
<Param name="PlayerID" dispName="Player" varType="string">1</Param>
<Param name="ScenName" dispName="Name" varType="string">Default</Param>
<Param name="Heading" dispName="Heading" varType="long">0</Param>
<Command>trQuestVarSet("lastplayer", xsGetContextPlayer());</Command>
<Command>xsSetContextPlayer(0);</Command>
<Command>kbLookAtAllUnitsOnMap();</Command>
<Command>trQuestVarSetFromRand("MapXRandom", 0, kbGetMapXSize(), true);</Command>
<Command>trQuestVarSetFromRand("MapZRandom", 0, kbGetMapZSize(), true);</Command>
<Command>trQuestVarSetFromRand("ProtoRandom", 1, 800, true);</Command>
<Command>trUnitCreate(""+kbGetProtoUnitName(trQuestVarGet("ProtoRandom")), "%ScenName%", trQuestVarGet
("MapXRandom"),0,trQuestVarGet("MapZRandom"), %Heading%, %PlayerID%);</Command>
<Command>xsSetContextPlayer(trQuestVarGet("lastplayer"));</Command>
</Effect>