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

Вставте в скрипт проверку на физл
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1795		 Page 1 of 1
Author:  OldArtes [ 2004-10-31 03:56:15 ]
Post subject:  Вставте в скрипт проверку на физл
Code:
sub FullOrchish()
  UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race armor' 'Orcish armor' 'helmet'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    wend
    UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race armor' 'Orcish armor' 'ringmail tunic'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race armor' 'Orcish armor' 'leggins'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    wend
    UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race armor' 'Orcish armor' 'sleeves'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    wend
    UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race armor' 'Orcish armor' 'gloves'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    wend
    UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race armor' 'Orcish armor' 'shield'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    wend
    UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race weapons' 'Orcish Weapons' 'hammerpick'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
    wend
end sub


Вставте плз проверку на физл в этот скрипт, чтобы если он сфизлил то повторил сковать эту вещ заново.
Author:  volhram [ 2004-10-31 22:55:55 ]
Post subject: 
попробуй вынести ожидание сообщений в отдельную процедуру, чтонить типа:
sub wait()
while not UO.InJournal("You put the")
if UO.InJournal("You have failed to make") then
uo.deletejournal()
return 0
endif
uo.deletejournal()
return 1
wend
endsub
вызывай и обрабатывай....чтонить типа:

label=0
while label==0
UO.WaitTargetType(0x1BF2)
UO.UseType(0x13e3)
label=wait()
wend
Author:  OldArtes [ 2004-11-03 23:30:52 ]
Post subject: 
Чет у меня ниче невышло всеравно когда физл он делает следущую вещь :(
А да когда я правил скрипт он иногда пишет что несущестувющая неправлина :( (она обчно последнея)
Author:  Edred [ 2004-11-04 12:46:12 ]
Post subject: 
У второго while отсутствует wend
Author:  OldArtes [ 2004-11-07 00:32:02 ]
Post subject: 
Edred wrote:
У второго while отсутствует wend

и что стого я всё поправил уже давно :), ток я чёт неврубился насчет физлами он всё равно не повтряется...

Если можите напишите скрипт полностью... (точнее мой поправте :) )
Author:  Sfagnum [ 2004-11-07 14:39:16 ]
Post subject: 
Code:
...
repeat
  UO.DeleteJournal()
  UO.WaitTargetType(0x1BF2)
  UO.UseType(0x13e3)
  UO.Exec("waitmenu 'Blacksmithing' 'Race weapons' 'Orcish Weapons' 'hammerpick'")
  while UO.InJournal("You put the")==0 and UO.InJournal("You have failed to make")==0
    wait(300)
  wend
until UO.InJournal('You put')
...
В таком стиле...
Author:  OldArtes [ 2004-11-10 01:53:51 ]
Post subject: 
Воо кулл все работает спасибо!
П.с. Мир не без Жмотов!!
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/