Yoko

Posted: **2006-11-15 02:53:34**

Народ мне нужен не сложный скрипт на мининг без всяких хайдингов, телепортов и тд, чтобы этим скрптом я мог спокойно стоять, копать руду, и ненужную руду кидать под себя при этом не мешая копанию, просто играю я на отличном от дрв, оскома и др шарде, где такие штуки как копание в хайде не прет ;D Пожалуйста помогите мне достать такой скрипт!

Posted: **2006-11-15 03:19:17**

Поиск юзай ! :evil:

Копает киркой, дистанция 2 тайла.

Code: Select all

sub mineone() 
var x,y,z, n
VAR LastTimer 
UO.Set('finddistance','2')
n=0
z=UO.GetZ("self") 
  for x=-2 to 2 
     for y=-2 to 2 
        UO.Print(str(x)+" "+str(y))
        Repeat 
           if UO.InJournal('TORMOZ') then
             pause()
           endif
           UO.DeleteJournal()
           UO.Warmode("0")
           UO.WaitTargetTile("1341",STR(UO.GetX()+x),STR(UO.GetY()+Y),str(z)) 
           UO.UseType('0x0E85')
           LastTimer=UO.Timer() 
           Repeat
              wait(500)
           Until UO.InJournal("You put") or UO.InJournal("can't see") or UO.InJournal("heavy") or UO.InJournal("location") or UO.InJournal("no ore") or UO.InJournal("but fail") or UO.InJournal("far away") or UO.InJournal("in rock") or UO.InJournal("must wait") or UO.InJournal("nothing") or UO.InJournal("elsewhere") or UO.InJournal("where it") OR UO.Timer()>LastTimer+200
           if UO.InJournal("You put") then 
               n=0
           else
              n=n+1
           endif
        Until UO.InJournal("nothing") or UO.InJournal("elsewhere") or UO.InJournal("no ore here") or UO.InJournal("location") or UO.InJournal("far away") or UO.InJournal("in rock") or UO.InJournal("where it") or n>=5
     next 
  next
end sub

Posted: **2006-11-16 02:25:23**

Хотелось бы скриптик который можно спокойно оставить на ночь ;D помогите кто нибудь дописать его плз, и желательно чтобы был сброс ненужной руды, пожалуйста помогите!

Posted: **2006-11-16 08:52:01**

Br4in5torm wrote:Хотелось бы скриптик который можно спокойно оставить на ночь ;D помогите кто нибудь дописать его плз, и желательно чтобы был сброс ненужной руды, пожалуйста помогите!

только что тебе нужен был самый простой скрипт теперь те нужен другой потом ваще захочешь мега скрипт :roll:

нехорошо

Posted: **2006-11-16 18:41:01**

Из всего что я писал ранее, я допросил к тому скрипту что хотел только чтобы его можно было оставить на ночь, пожалуйста помогите ;D

Posted: **2006-11-16 19:05:19**

Br4in5torm wrote:Из всего что я писал ранее, я допросил к тому скрипту что хотел только чтобы его можно было оставить на ночь, пожалуйста помогите ;D

и что значит в твоем понятии оставить на ночь :roll:

обьяснитесь плз :arrow:

Posted: **2006-11-17 20:58:26**

Я имею ввиду чтобы он копал ночью без моей помощи ;D а то так мне приходится постоянно врубать новую функцию. Спасибо за пониманию, пожалуйста помогите!

Posted: **2006-11-17 21:56:47**

Br4in5torm wrote:Я имею ввиду чтобы он копал ночью без моей помощи ;D а то так мне приходится постоянно врубать новую функцию. Спасибо за пониманию, пожалуйста помогите!

Чем тебя не устраивают полномасштабные скрипты ?! (Ветерана и ко к примеру? )

Posted: **2006-11-17 22:01:05**

Code: Select all

sub mineone() 
var x,y,z, n 
VAR LastTimer 
UO.Set('finddistance','2') 
while not uo.dead()
n=0 
z=UO.GetZ("self") 
  for x=-2 to 2 
     for y=-2 to 2 
        UO.Print(str(x)+" "+str(y)) 
        Repeat 
           if UO.InJournal('TORMOZ') then 
             pause() 
           endif 
           UO.DeleteJournal() 
           UO.Warmode("0") 
           UO.WaitTargetTile("1341",STR(UO.GetX()+x),STR(UO.GetY()+Y),str(z)) 
           UO.UseType('0x0E85') 
           LastTimer=UO.Timer() 
           Repeat 
              wait(500) 
           Until UO.InJournal("You put") or UO.InJournal("can't see") or UO.InJournal("heavy") or UO.InJournal("location") or UO.InJournal("no ore") or UO.InJournal("but fail") or UO.InJournal("far away") or UO.InJournal("in rock") or UO.InJournal("must wait") or UO.InJournal("nothing") or UO.InJournal("elsewhere") or UO.InJournal("where it") OR UO.Timer()>LastTimer+200 
           if UO.InJournal("You put") then 
               n=0 
           else 
              n=n+1 
           endif 
        Until UO.InJournal("nothing") or UO.InJournal("elsewhere") or UO.InJournal("no ore here") or UO.InJournal("location") or UO.InJournal("far away") or UO.InJournal("in rock") or UO.InJournal("where it") or n>=5 
     next 
  next 
wend
end sub

Posted: **2006-11-17 22:25:14**

Br4in5torm wrote:Хотелось бы скриптик который можно спокойно оставить на ночь ;D помогите кто нибудь дописать его плз, и желательно чтобы был сброс ненужной руды, пожалуйста помогите!

Они сликом сложные, да и на шарде не работают ;D
Спасибо за скрипт!

Yoko

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

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