Yoko

Posted: **2006-04-21 17:59:03**

Вообщем скрипт тут наваял на тайлор:

sub Bandage()
   DIM Cloth[4]
   Cloth[0] = '0x1762'
   Cloth[1] = '0x1763'
   Cloth[2] = '0x1764'
   Cloth[3] = '0x1761'
   VAR i
   VAR Chest = '0x4001573A'
   VAR nitki = '0x4000F690'
   For i = 0 To 3
If UO.Count( Cloth[i] ) == 0 Then
UO.FindType( Cloth[i], '-1', Chest )    # FoR TesT!!!!
  If UO.FindCount() > 0 Then
UO.MoveItem( 'finditem' )
wait(1000)
UO.Print( 'Ïåðåïðîâåðü âñ¸ åù¸ ïàðó ðàç. Íåâèæó ÿ â ñóíäóêå òêàíè!!!)
Endif
Endif
Repeat
UO.WaitMenu('Cloth','Clean Bandages') 
wait (1000) 
uo.waittargettype(Cloth[i])
uo.useobject( nitki ) 
wait (1000)
UO.DeleteJournal() 
while not (UO.InJournal("You put") or UO.InJournal("Tailoring failed")) 
wait(300) 
wend 
wait(200) 
until UO.Dead() 
Next
end sub

Смысл в том что у нас на севре несколько типов ткани... Так вот с такой фигнёй сталкиваюсь первый раз. Скрипт постоянно выдаёт ошибки в строчках которые Должны работать, либо в последней строчке, которой не усуществует. Может кто подсказать де косяк?

Posted: **2006-04-21 18:03:25**

Code: Select all

UO.Print( 'Ia?ai?iaa?u an? au? ia?o ?ac. Iaae?o y a noiaoea oeaie!!!)

кавычку забыл...

Posted: **2006-04-21 18:12:17**

Рабочая версия... Может кому пригодится:)

Code: Select all

sub Bandage() 
   DIM Cloth[4] 
   Cloth[0] = '0x1762' 
   Cloth[1] = '0x1763' 
   Cloth[2] = '0x1764' 
   Cloth[3] = '0x1761' 
   VAR i 
   VAR Chest = '0x4001573A' 
   VAR nitki = '0x4000F690' 
   For i = 0 To 3 
Repeat 
If UO.Count( Cloth[i] ) == 0 Then 
UO.FindType( Cloth[i], '-1', Chest )    # FoR TesT!!!! 
  If UO.FindCount() > 0 Then 
UO.MoveItem( 'finditem' ) 
wait(1000) 
Endif 
Endif 
UO.WaitMenu('Cloth','Clean Bandages') 
wait (1000) 
uo.waittargettype(Cloth[i]) 
uo.useobject( nitki ) 
wait (1000) 
UO.DeleteJournal() 
while not (UO.InJournal("You put") or UO.InJournal("Tailoring failed")) 
wait(300) 
wend 
wait(200) 
until UO.Dead() 
Next 
end sub

Yoko

Ошибки в масивах или де?:)

Ошибки в масивах или де?:)