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

ПОМОГИТЕ ИСКАЛ НЕНАШОЛ
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2648		 Page 1 of 1
Author:  Saiman [ 2005-01-15 22:17:00 ]
Post subject:  ПОМОГИТЕ ИСКАЛ НЕНАШОЛ
Где можно взять скрипт Анатомий негде нету помогите зарание блогодарен !!!
Author:  kuviCk [ 2005-01-15 23:14:58 ]
Post subject:  Re: ПОМОГИТЕ ИСКАЛ НЕНАШОЛ
Saiman wrote:
Где можно взять скрипт Анатомий негде нету помогите зарание блогодарен !!!

Drw Shard !
Code:
sub Anatomy() 
var Exit=0    
while Exit==0 
uo.DeleteJournal() 
uo.Waittargetself() 
uo.Useskill('Anatomy') 
while not (uo.InJournal('looks')or uo.InJournal('You'))    
wait(1000) 
wend 
wend 
end sub
Author:  KrafteR [ 2005-01-15 23:15:13 ]
Post subject:  Re: ПОМОГИТЕ ИСКАЛ НЕНАШОЛ
Saiman wrote:
Где можно взять скрипт Анатомий негде нету помогите зарание блогодарен !!!

Code:
sub Evaluating()
While NOT Uo.Dead()
Uo.Useskill('Anatomy','self')
wait(5000)
wend
end sub

Это если работает прокачка анатомии на себе.
Author:  Lord [ 2005-01-16 12:31:43 ]
Post subject: 
sub main()
while not uo.dead()
uo.useskill('Anatomy')
uo.waittargetground(0x0027) #Id того на чем качаешь
wait(5000)
wend
end sub

Для шардов на которых анатомия на себе не растет!
Author:  666Man666 [ 2005-01-16 13:40:54 ]
Post subject: 
В клиенте делаеш макрос, изскил анатомия, ласт таргет, таргет некст...
и задержку на нажатие этой клвиши где-то 2500.... весь макрос....
Author:  Saiman [ 2005-01-16 15:58:14 ]
Post subject:  ПЛИЗ
Плиз можите ещё дать Скрипт на Magic Arrow срочно надо зарание благодарен!!!!
Author:  SAMURAI [ 2005-01-16 16:51:37 ]
Post subject:  Re: ПЛИЗ
Saiman wrote:
Плиз можите ещё дать Скрипт на Magic Arrow срочно надо зарание благодарен!!!!

#================================
# Arrow() - cast magic arrow on laststatus
#---------------------------------------------------------
sub Arrow()
VAR ManaNeed=4
UO.Set('lasttarget','laststatus')
if UO.Mana>=ManaNeed then
UO.Cast('Magic Arrow','laststatus')
else
UO.Print("Low mana!!!")
endif
end sub

(с) Взято с автолоада Саваджева
Author:  Saiman [ 2005-01-16 19:58:41 ]
Post subject: 
Это неработает!!!
Author:  KrafteR [ 2005-01-17 00:06:59 ]
Post subject: 
Saiman wrote:
Это неработает!!!

Скрипт на магию, как я убедился очень сложен (Для меня ,по крайне мере.) и написать его достаточно проблемматично.
Code:
sub Magery()
VAR NS='0x0F88'
VAR Sunduk='0x4021C658'
VAR Kolvo=10
VAR k = 0, j
VAR LastTimer
while NOT UO.Dead() 
While UO.NS<=1
UO.FindType(NS, -1, Sunduk)
If UO.FindCount()==0 Then
UO.Print("NS not found, script terminated")
else
j = UO.GetQuantity( 'finditem' )
If j > Kolvo Then
UO.Print("I can use" + str( j ) + "NS")
else
UO.Print("I can't use" + str( j ) + "NS")
Endif
If Kolvo == 1 Then
UO.FindType( NS )
UO.MoveItem( 'finditem', '2', Sunduk )
wait(500)
Else
UO.Grab( Str( Kolvo ), 'finditem' )
wait(500)
Endif
Endif
wend
while UO.Mana>=9
UO.Cast('Poison','self')
wait(3000)
wend
while UO.Mana<UO.Int 
LastTimer=UO.Timer() 
UO.UseSkill('Meditation') 
repeat 
wait(100) 
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200 
UO.DeleteJournal() 
wait(2000) 
wend 
Wend
end sub
- достаточно горбатый скриптю, написанный мной, но работает, если ты не будешь ничего трогать кроме VAR'ок.
Author:  Saiman [ 2005-01-17 01:23:03 ]
Post subject: 
Спасибо большое Это на Arrow?Magic?
Author:  KrafteR [ 2005-01-17 16:18:06 ]
Post subject: 
Saiman wrote:
Спасибо большое Это на Arrow?Magic?

Нет это на пойзон, если ты мне напомнишь, скока маны ест стрелка, то я переделаю.
Author:  Saiman [ 2005-01-17 16:36:42 ]
Post subject: 
Примерно 5 маны
Author:  KrafteR [ 2005-01-17 23:30:01 ]
Post subject: 
Saiman wrote:
Примерно 5 маны

Code:
sub Magery() 
VAR NS='0x0F88' 
VAR Sunduk='0x4021C658' 
VAR Kolvo=10 
VAR k = 0, j 
VAR LastTimer 
while NOT UO.Dead() 
While UO.NS<=1 
UO.FindType(NS, -1, Sunduk) 
If UO.FindCount()==0 Then 
UO.Print("NS not found, script terminated") 
else 
j = UO.GetQuantity( 'finditem' ) 
If j > Kolvo Then 
UO.Print("I can use" + str( j ) + "NS") 
else 
UO.Print("I can't use" + str( j ) + "NS") 
Endif 
If Kolvo == 1 Then 
UO.FindType( NS ) 
UO.MoveItem( 'finditem', '2', Sunduk ) 
wait(500) 
Else 
UO.Grab( Str( Kolvo ), 'finditem' ) 
wait(500) 
Endif 
Endif 
wend 
while UO.Mana>=5 
UO.Cast('Magic Arrow','self') 
wait(3000) 
wend 
while UO.Mana<UO.Int 
LastTimer=UO.Timer() 
UO.UseSkill('Meditation') 
repeat 
wait(100) 
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200 
UO.DeleteJournal() 
wait(2000) 
wend 
Wend 
end sub
Author:  Saiman [ 2005-01-19 02:32:46 ]
Post subject: 
большое спасибо
Author:  KrafteR [ 2005-01-19 15:50:34 ]
Post subject: 
Saiman wrote:
большое спасибо

Щас напишу инструкцию на нормальный скрипт, с помощью Eder'a всё таки он работает и замечательно! Как напишут появится в этом разделе.
Author:  Saiman [ 2005-01-20 14:39:50 ]
Post subject: 
Спасибо за помощ
Author:  Saiman [ 2005-01-20 14:41:07 ]
Post subject: 
Спасибо за помощ
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/