Page 1 of 1

помажите=)

Posted: 2006-04-05 15:54:22
by alex86alex
можно ли в этот скрипт вписать спирит спик??? плиз нарон помагите

Code: Select all

var Cont='0x4005FF4E' ##ID сундука с тканью, так же туда будут складыватся бинты 
var Creat='0x1541'    ##Тип того, что сшили 
sub Tailoring() 
#¤Leo¤# 
   while NOT UO.Dead() 
      ToHide() 
      UO.FindType('0x175D','0x0000','backpack') 
      if UO.GetQuantity('finditem')<4 then 
         UO.UseObject(Cont) 
         UO.FindType('0x0E21','0x0000','backpack') 
         if UO.GetQuantity('finditem')>0 then 
            UO.SetReceivingContainer(Cont) 
               wait(1000) 
            UO.Grab('all','finditem') 
               wait(1000) 
            UO.UnSetReceivingContainer() 
         Endif 
         UO.FindType('0x175D','0x0000',Cont) 
            wait(1000) 
         UO.Grab('600','finditem') 
            wait(1000) 
      endif 
      CheckLag() 
      UO.WaitMenu('Cloth','Misc','Misc','body sash') 
      UO.WaitTargetType('0x175D') 
      UO.UseType('0x0F9D') 
      UO.DeleteJournal() 
         wait(1000) 
      repeat 
         wait(100) 
      until UO.InJournal('fail') or UO.InJournal('put') 
      UO.DeleteJournal() 
         wait(500) 
      UO.WaitTargetType(Creat) 
      UO.UseType('0x0F9E') 
      CheckLag() 
         wait(500)    
   wend 
endsub 

Sub ToHide() 
   while NOT UO.Hidden() 
      UO.DeleteJournal() 
      UO.Exec('warmode 0') 
      UO.UseSkill('Stealth') 
         repeat 
            wait(50) 
         until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied') 
   wend 
end sub 

Sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(50) 
   until UO.InJournal('backpack') 
end sub [code]

Posted: 2006-04-05 16:07:14
by Scripts Writer
научись в код вставлять млин!

Re: помажите=)

Posted: 2006-04-05 16:07:22
by Kynep
alex86alex wrote:можно ли в этот скрипт вписать спирит спик??? плиз нарон помагите
Смари, вставь это себе:

Code: Select all

CheckLag() 
      UO.WaitMenu('Cloth','Misc','Misc','body sash') 
      UO.WaitTargetType('0x175D') 
      UO.UseType('0x0F9D') 
      UO.DeleteJournal() 
         wait(1000) 
      repeat 
         wait(100) 
      until UO.InJournal('fail') or UO.InJournal('put') 
      UO.DeleteJournal() 
         wait(500) 
      UO.WaitTargetType(Creat) 
      UO.UseType('0x0F9E')
      wait(500) 
      CheckLag() 
      UO.UseSkill('Spirit Speak')
         wait(2500)    
   wend 
endsub 

Posted: 2006-04-05 16:08:24
by alex86alex
You Must Die wrote:научись в код вставлять млин!

а я что делаю))))))))))))))))))))))

Posted: 2006-04-05 16:09:57
by alex86alex

Code: Select all

var Cont='0x4005FF4E' ##ID сундука с тканью, так же туда будут складыватся бинты 
var Creat='0x1541' ##Тип того, что сшили 
sub Tailoring() 
#¤Leo¤# 
while NOT UO.Dead() 
ToHide() 
UO.FindType('0x175D','0x0000','backpack') 
if UO.GetQuantity('finditem')<4 then 
UO.UseObject(Cont) 
UO.FindType('0x0E21','0x0000','backpack') 
if UO.GetQuantity('finditem')>0 then 
UO.SetReceivingContainer(Cont) 
wait(1000) 
UO.Grab('all','finditem') 
wait(1000) 
UO.UnSetReceivingContainer() 
Endif 
UO.FindType('0x175D','0x0000',Cont) 
wait(1000) 
UO.Grab('600','finditem') 
wait(1000) 
endif 
CheckLag() 
UO.WaitMenu('Cloth','Misc','Misc','body sash') 
UO.WaitTargetType('0x175D') 
UO.UseType('0x0F9D') 
UO.DeleteJournal() 
wait(1000) 
repeat 
wait(100) 
until UO.InJournal('fail') or UO.InJournal('put') 
UO.DeleteJournal() 
wait(500) 
UO.WaitTargetType(Creat) 
UO.UseType('0x0F9E') 
CheckLag() 
wait(500) 
wend 
endsub 

Sub ToHide() 
while NOT UO.Hidden() 
UO.DeleteJournal() 
UO.Exec('warmode 0') 
UO.UseSkill('Stealth') 
repeat 
wait(50) 
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied') 
wend 
end sub 

Sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 
repeat 
wait(50) 
until UO.InJournal('backpack') 
end sub 

Re: помажите=)

Posted: 2006-04-05 16:11:57
by alex86alex
Cooper wrote:
alex86alex wrote:можно ли в этот скрипт вписать спирит спик??? плиз нарон помагите
Смари, вставь это себе:

Code: Select all

CheckLag() 
      UO.WaitMenu('Cloth','Misc','Misc','body sash') 
      UO.WaitTargetType('0x175D') 
      UO.UseType('0x0F9D') 
      UO.DeleteJournal() 
         wait(1000) 
      repeat 
         wait(100) 
      until UO.InJournal('fail') or UO.InJournal('put') 
      UO.DeleteJournal() 
         wait(500) 
      UO.WaitTargetType(Creat) 
      UO.UseType('0x0F9E')
      wait(500) 
      CheckLag() 
      UO.UseSkill('Spirit Speak')
         wait(2500)    
   wend 
endsub 


слух а ты можеш встааить а то я ни доганяю куда именно???!!!!

Posted: 2006-04-05 16:13:17
by Scripts Writer
alex86alex wrote:
You Must Die wrote:научись в код вставлять млин!

а я что делаю))))))))))))))))))))))
свои посты редактировать можно, а ты флудишь и непонятки наводишь только

Posted: 2006-04-05 16:14:22
by Kynep
Вот, а че Лео не хочет?? этож его скрипт

Code: Select all

var Cont='0x4005FF4E' ##ID сундука с тканью, так же туда будут складыватся бинты 
var Creat='0x1541' ##Тип того, что сшили 
sub Tailoring() 
#¤Leo¤# 
while NOT UO.Dead() 
ToHide() 
UO.FindType('0x175D','0x0000','backpack') 
if UO.GetQuantity('finditem')<4 then 
UO.UseObject(Cont) 
UO.FindType('0x0E21','0x0000','backpack') 
if UO.GetQuantity('finditem')>0 then 
UO.SetReceivingContainer(Cont) 
wait(1000) 
UO.Grab('all','finditem') 
wait(1000) 
UO.UnSetReceivingContainer() 
Endif 
UO.FindType('0x175D','0x0000',Cont) 
wait(1000) 
UO.Grab('600','finditem') 
wait(1000) 
endif 
CheckLag() 
UO.WaitMenu('Cloth','Misc','Misc','body sash') 
UO.WaitTargetType('0x175D') 
UO.UseType('0x0F9D') 
UO.DeleteJournal() 
wait(1000) 
repeat 
wait(100) 
until UO.InJournal('fail') or UO.InJournal('put') 
UO.DeleteJournal() 
wait(500) 
UO.WaitTargetType(Creat) 
UO.UseType('0x0F9E') 
wait(500) 
CheckLag() 
UO.UseSkill('Spirit Speak') 
wait(2500)    
wend 
endsub 

Sub ToHide() 
while NOT UO.Hidden() 
UO.DeleteJournal() 
UO.Exec('warmode 0') 
UO.UseSkill('Stealth') 
repeat 
wait(50) 
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied') 
wend 
end sub 

Sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 
repeat 
wait(50) 
until UO.InJournal('backpack') 
end sub 

Posted: 2006-04-05 16:26:02
by alex86alex
Cooper wrote:Вот, а че Лео не хочет?? этож его скрипт

Code: Select all

var Cont='0x4005FF4E' ##ID сундука с тканью, так же туда будут складыватся бинты 
var Creat='0x1541' ##Тип того, что сшили 
sub Tailoring() 
#¤Leo¤# 
while NOT UO.Dead() 
ToHide() 
UO.FindType('0x175D','0x0000','backpack') 
if UO.GetQuantity('finditem')<4 then 
UO.UseObject(Cont) 
UO.FindType('0x0E21','0x0000','backpack') 
if UO.GetQuantity('finditem')>0 then 
UO.SetReceivingContainer(Cont) 
wait(1000) 
UO.Grab('all','finditem') 
wait(1000) 
UO.UnSetReceivingContainer() 
Endif 
UO.FindType('0x175D','0x0000',Cont) 
wait(1000) 
UO.Grab('600','finditem') 
wait(1000) 
endif 
CheckLag() 
UO.WaitMenu('Cloth','Misc','Misc','body sash') 
UO.WaitTargetType('0x175D') 
UO.UseType('0x0F9D') 
UO.DeleteJournal() 
wait(1000) 
repeat 
wait(100) 
until UO.InJournal('fail') or UO.InJournal('put') 
UO.DeleteJournal() 
wait(500) 
UO.WaitTargetType(Creat) 
UO.UseType('0x0F9E') 
wait(500) 
CheckLag() 
UO.UseSkill('Spirit Speak') 
wait(2500)    
wend 
endsub 

Sub ToHide() 
while NOT UO.Hidden() 
UO.DeleteJournal() 
UO.Exec('warmode 0') 
UO.UseSkill('Stealth') 
repeat 
wait(50) 
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preoccupied') 
wend 
end sub 

Sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 
repeat 
wait(50) 
until UO.InJournal('backpack') 
end sub 


его просто в аси нету !!!! а тебе спасибо кстати асю ты на форуме кажись неправильную дал

Posted: 2006-04-05 16:33:07
by Kynep
alex86alex wrote: его просто в аси нету !!!! а тебе спасибо кстати асю ты на форуме кажись неправильную дал
Исправил Асю смотри инфо

Posted: 2006-04-05 16:49:43
by alex86alex
Cooper wrote:
alex86alex wrote: его просто в аси нету !!!! а тебе спасибо кстати асю ты на форуме кажись неправильную дал
Исправил Асю смотри инфо
автаризуй меня вот ася 328- 528 889