Yoko

Code: Select all

sub test1 {
   $x=&uo("getx");
   $y=&uo("gety");
   $z=&uo("getz");
   @tree=(3293, 3296, 3286, 3288, 3290, 3299);
   for($i=$x-20;$i<=$x+20;$i++){
      for($j=$y-20;$j<=$y+20;$j++){
         for ($m=0;$m<6;$m++){
            if (&uo("privategettile", $i, $j, 0, $tree[$m], $tree[$m])>0){
               if (&pathfind($i, $j)!=0){
                  while ((abs(&uo("getx")-$i)>1) || (abs(&uo("gety")-$j)>1)){
                     &wait(100);
                  }
                  &uo("waittargettile", $tree[$m], $i, $j, $z);
                  &uo("deletejournal");
                  &uo("usetype", "axe");
                  while (&uo("injournal", "not enough")==0){
                     &wait(100);
                  }
               }   
            }
         }
      }
   }
}

Code: Select all

     
          if (&pathfind($i, $j)!=0){ 
                  while ((abs(&uo("getx")-$i)>1) || (abs(&uo("gety")-$j)>1)){ 
                     &wait(100); 
                  }