Среда, 2025-07-16, 11:06 AM
Приветствую Вас Прохожий | RSS
 
Главная страница | Tailoring - Форум гильдии Gelezinis Vilkas | Регистрация | Вход
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: PAR  
Tailoring
montДата: Воскресенье, 2007-06-03, 0:00 AM | Сообщение # 1
Одмин.
Группа: Администраторы
Сообщений: 1051
Статус: Offline
Code
var Hides =0x1078
var SewingKit=0x0f9d
var Scissors=0x0F9E
var Product=0x1C0C #ëèô÷èê áðîíèðîâàííûé
#var food=0x09F2 #ribs
var food=0x097B #fish steaks
#var food=0x171F #bananas
   
sub main()
while not uo.dead()
while UO.Count(Hides)>3
       UO.DeleteJournal()
       uo.usetype(food)
       UO.WaitMenu('Choose a category.','female','What','Studded Bustier')
       UO.WaitTargetType(Hides)
       UO.UseType(SewingKit)

       while not UO.InJournal('create') and not UO.InJournal('destroy') and not UO.InJournal('exceptional') and not UO.InJournal('capabilities,') and not UO.InJournal('something') and not UO.InJournal('Targetting') and not UO.InJournal('exist.') and not UO.InJournal('already')
         wait(100)
       wend
       
       while UO.Count(Product)<>0         
         UO.WaitTargetType(Product)           
         UO.UseType(Scissors)         
             
          if UO.InJournal('capabilities,') or UO.InJournal('Targetting') then
            UO.WaitTargetType(Hides)
          endif

         repeat
           wait(100)       
         until UO.InJournal('material') or UO.InJournal('object>!')
              
         UO.DeleteJournal()
       wend
wend
wend
end sub


Сообщение отредактировал PAR - Понедельник, 2007-06-04, 0:33 AM
 
montДата: Воскресенье, 2007-06-03, 3:58 AM | Сообщение # 2
Одмин.
Группа: Администраторы
Сообщений: 1051
Статус: Offline
не доделан еще) надо будет добавить что-бы он еще шкурки брал с пола, когда кончаються

Сообщение отредактировал mont - Воскресенье, 2007-06-03, 3:59 AM
 
  • Страница 1 из 1
  • 1
Поиск:

Gelezinis Vilkas © 2007
Конструктор сайтовuCoz