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

Народ пожалуйста помагите Модернизировать скрипт для ZHL БС
http://forum.yoko.com.ua/viewtopic.php?f=20&t=367		 Page 1 of 1
Author:  Sergei [ 2004-05-17 19:38:08 ]
Post subject:  Народ пожалуйста помагите Модернизировать скрипт для ZHL БС
sub main()
var bs_hammer='0x13e3', ingots='0x1bf2', bplate='0x1415' # platemail breastplate
var f=UO.count(bplate), i
wait(500)
if uo.count(bplate)>0 then
wait(500)
smelt(bplate,1)
endif
while uo.count(ingots)>30
if uo.count(bplate)>0 then
wait(500)
smelt(bplate,1)
endif
f=UO.count(bplate)
wait(500)
while f<30 and uo.count(ingots)>30
i=uo.count(ingots)
UO.Exec("waitmenu 'like to make' 'Armors' 'armor' 'Platemail' 'like' 'Breastplate'")
UO.waittargettype(ingots)
uo.deletejournal()
UO.usetype(bs_hammer)
repeat
wait(100)
until i<>uo.count(ingots) or f<>uo.count(bplate)
repeat
wait(100)
until uo.injournal('You stop.')
f=UO.count(bplate)
wend
wend
end sub


sub smelt(item, loop)
var forge='0x0fb1', tongs='0x0fbb', count1,count2
count1=uo.count(item)
if count1>0 then
if loop then
count2=0
else
count2=count1-1
endif
repeat
uo.waittargettype(item)
uo.usetype(tongs)
uo.deletejournal()
repeat
wait(10)
until uo.injournal('What')
uo.waittargetground(forge)
uo.deletejournal()
repeat
wait(100)
until uo.injournal('failed') or uo.injournal('turned')
wait(500)
until uo.count(item)<=count2
endif
end sub

как сделать чтобы сделаный мною фул Exceptional и Perfect не переплавлялся с переплавкой не эксепт и завершением скрипта на момент фула.

при изготовлении Exceptional предмета шард выдаёт сообщение:
Success: Exceptional,

а при изготовлении Perfect предмета шард выдаёт сообщение:
Success: Perfect.

при изготовлении простого предмета:
Success.

не могли бы Вы мне помочь?
очень нужен скрипт плиз хелп
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/