Помогите со скрптом

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Frippy
Posts: 2
Joined: 2009-06-10 18:03:32

Помогите со скрптом

Post by Frippy »

Поделитесь плиз скриптом на майнинг на дрв.
Нужно, чтобы персонаж входил в хайд, использовал кирку которая в руке находится, обкапывал сколько можно вокруг себя, а если макс. вес набрал или всю руду выкопал - дисконнектился. возможно ли такое? Помогите бедному нюбу :lol: ни дома ни рунбуки нема :)
Frippy
Posts: 2
Joined: 2009-06-10 18:03:32

Post by Frippy »

пробовал удалятьиз скрипта лишнее: рекол, проверка пк и элемов - оставил вот это:

Code: Select all

sub maning()
   #BETEP™#
   var mx, my, mz, i, j, jor, ser, noto
   Uo.exec("set norbcheck 1"); для рекола
   uo.exec("set norbcalc 1"); тоже
   
   uo.print('!!Выбери Лопату!! ')
   uo.exec('addobject Shovel')
   while uo.targeting()
      wait(100)
   wend
   
   
   na4alo:
   mx = UO.GetX("self")
   my = UO.GetY("self")
   mz = UO.GetZ("self")
   UO.DeleteJournal()
   for i = mx-4 to mx+4
      for j = my -4 to my+4
         while not UO.Hidden()
            UO.Warmode("0")
            uo.print("Прячемся...")
            UO.UseSkill("Hiding")
            wait(4000)
         wend
         UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j))
         while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore")
            UO.DeleteJournal()
            if uo.waiting() then
               uo.canceltarget()
            endif
            UO.Waittargettile("1341", str(i), str(j), str(mz))
            UO.Useobject("Shovel")
            while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock")
               wait (500)
               if uo.injournal("heavy") or uo.dead() then
                  pwav()
                  #Pause()
               endif
               for jor = 0 to 9
                  ser = uo.journalserial(jor)
                  noto = uo.getnotoriety(ser)
                  if noto == 1 and noto == 2 and noto == 0 and not uo.injournal("elemental") then
                     if uo.waiting() then
                        uo.canceltarget()
                     endif
                     Save()
                     pwavw()
                     wait(180000) ; время в секундах при ожидании пока уйдет ПК
                     loot()
                     wait(3000)
                     goto reccal
                  endif
               next
            wend
            if uo.weight > 400 then ; Максимальный вес при котором домой с рудой
               goto end
            endif
         wend
         UO.DeleteJournal()
      next
   next
   goto na4alo
   end:
   if uo.waiting() then
      uo.canceltarget()
   endif
   uo.exec("recall Runebook 21") ; домой ( в рунбуке слот 1 )
   wait(10000)
   loot()
   wait(3000)
   reccal:
   uo.deletejournal()
   if uo.waiting() then
      uo.canceltarget()
   endif
   #uo.exec("recall Runebook 46") ; в шахту ( в рунбуке слот 3 )
   uo.exec("recall Runebook 33") ; в шахту ( в рунбуке слот 2 )
   #uo.exec("recall Runebook 58") ; в шахту ( в рунбуке слот 4 )
   mx = UO.GetX("self")
   my = UO.GetY("self")
   wait(10000)
   if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
      goto reccal
   endif
   goto na4alo
end sub

при переходе в другое место (в другую шахту) -пишет "too far away" и постоянно так, приходилось выходить и заходить снова. подскажите пожалуйста, где ошибка?
Post Reply