Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Deprecated: urlencode(): Passing null to parameter #1 ($string) of type string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/showposts.php on line 97 Deprecated: preg_replace(): Passing null to parameter #3 ($subject) of type array|string is deprecated in /home/o/ort1981/bestuo.ru/public_html/engine/forum/sources/components/functions.php on line 1849 Скрипт бс  >  Форум
Главная »
Форум » Форум » Вспомогательные программы
 Скрипт бс
Опции Открыть меню

Гости
Сообщений: 195
Рег. 15.10.2012
23 октября 2010 17:58
Сообщение #1
Скиньте ктонить обычный скрипт на бс на изготовление дагеров,чтоб самому закладывать руду!Без сундука и тд просто сам закладываешь и нажимаешь плей)

Frozen
23 октября 2010 20:06
Сообщение #2
sub Blacksmithing()
   While not UO.Count('0x1BEF') < 3
      UO.FindType('0x1BEF', '-1', 'Backpack')
      If UO.FindCount() > 0 Then
         UO.DeleteJournal()
         UO.WaitMenu('Blacksmithing', 'Weapons', 'Weapons', 'Fencing', 'Fencing', 'Dagger')
         UO.WaitTargetObject('finditem')
         UO.UseType('0x13E4')
         Repeat
            Wait(100)
         Until UO.InJournal('You put|fail')
      Endif
   Wend
End Sub

Frozen
23 октября 2010 23:27
Сообщение #3
sub dager()
repeat
while not uo.dead()
UO.DeleteJournal()
UO.WaitMenu ('Blacksmithing', 'Weapons', 'Weapons', 'Fencing', 'Fencing', 'Dagger')
UO.Waittargettype ('0x1bef')
UO.Usetype('0x13E3')
repeat
wait(500)
until UO.InJournal("You put") or UO.InJournal("You have failed")
until UO.Count("0x0F51")>49
end sub

делает 50 дагеров =)

Гости
Сообщений: 195
Рег. 15.10.2012
24 октября 2010 08:39
Сообщение #4

А еще подскажите что с теми дагерами который скрафтил можно сделать)))=)
пїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅпїЅ (3443406)16 пїЅпїЅпїЅ
Druid
Сообщений: 199
Рег. 5.08.2010
24 октября 2010 11:04
Сообщение #5
если время не жалко можно продать

Frozen
24 октября 2010 12:12
Сообщение #6
сдавать на заказы
Последние посетители (0):

 
Сейчас: 27 октября 2026 18:48


© The Best Ultima Online Shard Antares, 2004-2026