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

Yoko http://forum.yoko.com.ua/

Помогите со скриптом ! http://forum.yoko.com.ua/viewtopic.php?f=20&t=9423	Page 1 of 1

Author:	Br4in5torm [ 2006-11-15 02:53:34 ]
Post subject:	Помогите со скриптом !
Народ мне нужен не сложный скрипт на мининг без всяких хайдингов, телепортов и тд, чтобы этим скрптом я мог спокойно стоять, копать руду, и ненужную руду кидать под себя при этом не мешая копанию, просто играю я на отличном от дрв, оскома и др шарде, где такие штуки как копание в хайде не прет ;D Пожалуйста помогите мне достать такой скрипт!

Author:

slonopotam [ 2006-11-15 03:19:17 ]

Post subject:

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

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

Code:

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

Author:	Br4in5torm [ 2006-11-16 02:25:23 ]
Post subject:
Хотелось бы скриптик который можно спокойно оставить на ночь ;D помогите кто нибудь дописать его плз, и желательно чтобы был сброс ненужной руды, пожалуйста помогите!

Author:	GimFlex [ 2006-11-16 08:52:01 ]
Post subject:
Br4in5torm wrote: Хотелось бы скриптик который можно спокойно оставить на ночь ;D помогите кто нибудь дописать его плз, и желательно чтобы был сброс ненужной руды, пожалуйста помогите! только что тебе нужен был самый простой скрипт теперь те нужен другой потом ваще захочешь мега скрипт нехорошо

Author:	Br4in5torm [ 2006-11-16 18:41:01 ]
Post subject:
Из всего что я писал ранее, я допросил к тому скрипту что хотел только чтобы его можно было оставить на ночь, пожалуйста помогите ;D

Author:	GimFlex [ 2006-11-16 19:05:19 ]
Post subject:
Br4in5torm wrote: Из всего что я писал ранее, я допросил к тому скрипту что хотел только чтобы его можно было оставить на ночь, пожалуйста помогите ;D и что значит в твоем понятии оставить на ночь обьяснитесь плз

Author:	Br4in5torm [ 2006-11-17 20:58:26 ]
Post subject:
Я имею ввиду чтобы он копал ночью без моей помощи ;D а то так мне приходится постоянно врубать новую функцию. Спасибо за пониманию, пожалуйста помогите!

Author:	Scripts Writer [ 2006-11-17 21:56:47 ]
Post subject:
Br4in5torm wrote: Я имею ввиду чтобы он копал ночью без моей помощи ;D а то так мне приходится постоянно врубать новую функцию. Спасибо за пониманию, пожалуйста помогите! Чем тебя не устраивают полномасштабные скрипты ?! (Ветерана и ко к примеру? )

Author:

GimFlex [ 2006-11-17 22:01:05 ]

Post subject:

Code:

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

Author:	Br4in5torm [ 2006-11-17 22:25:14 ]
Post subject:
Br4in5torm wrote: Хотелось бы скриптик который можно спокойно оставить на ночь ;D помогите кто нибудь дописать его плз, и желательно чтобы был сброс ненужной руды, пожалуйста помогите! Они сликом сложные, да и на шарде не работают ;D Спасибо за скрипт!

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/