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

Сбор регов в мистик форесте (шард Антарес)
http://forum.yoko.com.ua/viewtopic.php?f=20&t=9357		 Page 1 of 1
Author:  slonopotam [ 2006-11-11 16:45:24 ]
Post subject:  Сбор регов в мистик форесте (шард Антарес)
ВотЪ просто врубаемЪ и бегаемЪ по лесу. Ничего менять ненадо.
Code:
VAR goblin=1
sub Start()
repeat
LootRegs()
      until goblin>2
end sub
Sub LootRegs() 
   DIM Regs[10] 
Regs[0] = '0x0C8D' ; Fertile Dirt
Regs[1] = '0x0C8C' ; Blackmoor
Regs[2] = '0x0C94' ; Obsidian
Regs[3] = '0x0C88' ; Pumice
Regs[4] = '0x0D04' ; Dead Wood
Regs[5] = '0x0C8A' ; Volcanic Ash
Regs[6] = '0x0C85' ; Brimstone
Regs[7] = '0x0C83' ; Executioner's Cap
Regs[8] = '0x0C86' ; Blood Spawn
Regs[9] = '0x0CA9' ; 30 Random Reagent's Pack
   VAR i 
   For i = 0 To 9 
      If UO.Count( Regs[ i ] ) == 0 Then 
UO.UseFromGround( Regs[ i ] )
      wait( 100 )
      Endif 
   Next 
endsub
Author:  Mihail [ 2006-11-11 21:11:59 ]
Post subject: 
честно кривоватый скрипт..
тоесть если в паке нету рега он тыкает на рег на земле?
и почему не установлена дистанция? или можно прямо с 14 тайлов?
Author:  slonopotam [ 2006-11-11 23:32:31 ]
Post subject: 
Реги растут на земле и обычным "юзе итем" он их срывает. Ну а дистанция, как сорвет так и сорвет :D Главное работает безотказно. Тоже самое можно и на сбор хлопка организовать, только тип поменять нужно и проверку на вес. На Антаресе многое делать можно этим скриптом.
Author:  Destruction [ 2006-11-12 07:37:17 ]
Post subject: 
Нда.. А словосочетание "делать нормальные отступы" - нам незнакомо.

PS: Писал другу скрипт, который делает именно это же самое - получился несколько короче ;)
Author:  GimFlex [ 2006-11-12 07:39:20 ]
Post subject: 
Destruction wrote:
Нда.. А словосочетание "делать нормальные отступы" - нам незнакомо.

PS: Писал другу скрипт, который делает именно это же самое - получился несколько короче ;)


нет предела совершенству :wink:
Author:  Destruction [ 2006-11-12 07:46:36 ]
Post subject: 
goblin - что за нах? Зачем нужно ? -)

PS: Вот, наваял...
Code:
;|=======================================|;
;| Reagent looter (c) 2006, Destruction  |;
;|=======================================|;
sub ReagentLooter.do()
   var i, r_len = 1 ; количество типов в списке реагентов
    ; список реагентов
   DIM reagents[ val( str( r_len ) ) ]
   reagents[ 0 ] = '0x0000' ; the reagent ;-)

   uo.set( 'finddistance' , '2' ) ; distance limit
    ; основной цикл -)
   repeat
      for i = 0 to r_len - 1
         uo.usefromground( reagents[ i ] )
      next
      wait(100) ; пауза
   until false
endsub
Author:  Scripts Writer [ 2006-11-12 10:47:03 ]
Post subject: 
Осталось только ходилку наваять с поиском регов на экране.
Author:  slonopotam [ 2006-11-13 14:00:53 ]
Post subject: 
В таком случае к ходилке еще и рекол по стоуну. И кил элемов кастующих 7ой круг магии. :D
Author:  Scripts Writer [ 2006-11-13 14:35:24 ]
Post subject: 
Ну вот. Свободу творчеству-приступай.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/