Hmm ok I`ve been trying to add a few more Waypoint buttons but somehow I`m stuck. My first goal was to add just 1 more Waypoint. For some reason the char keeps running into a direction because he cant find the echo of the previous post.
Please Kram could you give me a hint on how to add more waypoints ... here is the code I edited:
||||||FROM KROMBOT.ISS||||||
function Roaming()
{
declare B1 int local
declare P2 int local
declare P3 int local
declare P4 int local
B1:Set${Math.Distance${Me.X},${Me.Y},${BaseCampX},${BaseCampY}]}]
P2:Set[${Math.Distance[${Me.X},${Me.Y},${Patrol2X},${Patrol2Y}]}]
P3:Set[${Math.Distance[${Me.X},${Me.Y},${Patrol4X},${Patrol4Y}]}]
P4:Set[${Math.Distance[${Me.X},${Me.Y},${Patrol6X},${Patrol6Y}]}]
call DoEvents
call DebugIt "D. echo Roam Dist: ${B1}, ${P2}, ${P3}, ${P4}"
call DebugIt "D. echo Last Patrol ${LastPatrol}"
if "${B1}<${P2} && ${B1}<${P4}"
{
;Return move to basecamp
echo Close to base camp, returning to patrol 1
call moveto ${BaseCampX} ${BaseCampY} 300
CurrentPatrol:Set[1]
}
if "${P2}<${B1} && ${P2}<${P3}"
{
if "${LastPatrol}==2"
{
call moveto ${Patrol2X}${Patrol2Y} 300
CurrentPatrol:Set[2]
}
if "${LastPatrol}==4"
{
call moveto ${Patrol2X} ${Patrol2Y} 300
CurrentPatrol:Set[3]
}
}
if "${P3}<${P2} && ${P3}<${P4}"
{
if "${LastPatrol}==4"
{
call moveto ${Patrol4X} ${Patrol4Y} 300
CurrentPatrol:Set[2]
}
if "${LastPatrol}==6"
{
call moveto ${Patrol4X} ${Patrol4Y} 300
CurrentPatrol:Set[3]
}
}
if "${P3}<${P2} && ${P3}<${P4}"
{
;move to p4
call moveto ${Patrol6X} ${Patrol6Y} 300
CurrentPatrol:Set[4]
}
call DoEvents
if "${CurrentPatrol}==6"
{
LastPatrol:Set[1]
call moveto ${BaseCampX} ${BaseCampY} 300
return
}
if "${CurrentPatrol}==5"
{
LastPatrol:Set[6]
call moveto ${Patrol2X} ${Patrol2Y} 300
return
}
if "${CurrentPatrol}==4"
{
LastPatrol:Set[5]
call moveto ${Patrol3X} ${Patrol3Y} 300
return
}
if "${CurrentPatrol}==3"
{
LastPatrol:Set[4]
call moveto ${Patrol4X} ${Patrol4Y} 300
return
}
if "${CurrentPatrol}==2"
{
LastPatrol:Set3]
call moveto ${Patrol5X} ${Patrol5Y} 300
return
}
if "${CurrentPatrol}==1"
{
LastPatrol:Set[2]
call moveto ${Patrol6X} ${Patrol6Y} 300
return
}
}
!!!!This part is messy... could you corret the wrong sections? Also I dont understand what the IF condition is fore at P2, since P1 and P3 dident have an IF condition at the beginning.
!!!!!!!THE XML FILE!!!!!!!!!!!
<button name='SetBaseCamp'>
<X>10</X>
<Y>10</Y>
<Width>110</Width>
<Height>20</Height>
<AutoTooltip>Click here to change your base camp to your current loc</AutoTooltip>
<Text>Set Patrol Point 1</Text>
<OnLeftClick>
echo Patrol point 1 Set!
Script[KramBot].Variable[BaseCampX]:Set[${Me.X}]
Script[KramBot].Variable[BaseCampY]:Set[${Me.Y}]
</OnLeftClick>
</button>
<button name='SetPatrol1'>
<X>10</X>
<Y>32</Y>
<Width>110</Width>
<Height>20</Height>
<AutoTooltip>Click here to set patrol point 2</AutoTooltip>
<Text>Set Patrol Point 2</Text>
<OnLeftClick>
echo Patrol Point 2 Set!
Script[KramBot].Variable[Patrol2X]:Set[${Me.X}]
Script[KramBot].Variable[Patrol2Y]:Set[${Me.Y}]
Script[KramBot].Variable[Patrol3X]:Set[${Me.X}]
Script[KramBot].Variable[Patrol3Y]:Set[${Me.Y}]
</OnLeftClick>
</button>
<button name='SetPatrol2'>
<X>10</X>
<Y>54</Y>
<Width>110</Width>
<Height>20</Height>
<AutoTooltip>Click here to set patrol point 3</AutoTooltip>
<Text>Set Patrol Point 3</Text>
<OnLeftClick>
echo Patrol Point 3 Set!
Script[KramBot].Variable[Patrol4X]:Set[${Me.X}]
Script[KramBot].Variable[Patrol4Y]:Set[${Me.Y}]
Script[KramBot].Variable[Patrol5X]:Set[${Me.X}]
Script[KramBot].Variable[Patrol5Y]:Set[${Me.Y}]
</OnLeftClick>
</button>
<button name='SetPatrol3'>
<X>10</X>
<Y>98</Y>
<Width>110</Width>
<Height>20</Height>
<AutoTooltip>Click here to set patrol point 3</AutoTooltip>
<Text>Set Patrol Point 3</Text>
<OnLeftClick>
echo Patrol Point 4 Set!
Script[KramBot].Variable[Patrol6X]:Set[${Me.X}]
Script[KramBot].Variable[Patrol6Y]:Set[${Me.Y}]
</OnLeftClick>
</button>
!!!! I think the bug`s here somewhere... !!!!!
Or could you add like 8 Points into the published script? I`d kiss your feet for that.
thx a lot for looking into this.
