Надо обьяснит как этот скрипт работает???
Он мне выдает ошибку, смотреть сам скрипт покажу на нем
sub Carpentry()
VAR k, bag, type
VAR chesttoput = '0x4009AECB' --------ЧТО ЭТО ТАКОЕ??
VAR chestwithbags = '0x4009B6A4' --------ЧТО ЭТО ТАКОЕ??
VAR chestwithlogs = '0x4009A0CD' ---------ЧТО ЭТО ТАКОЕ??
UO.Print(' What are you making? ')
uo.exec('addobject type')
while uo.targeting()
wait(250)
wend
uo.Deletejournal()
type = UO.GetGraphic('type')
uo.useobject(chesttoput)
checklag() -------------- ВОТ ЗДЕСЬ ОШИБКА
uo.useobject(chestwithbags)
checklag()
uo.useobject(chestwithlogs)
checklag()
while true
If uo.injournal('World Save') then
wait(30000)
end if
While not UO.Hidden()
uo.warmode(0)
UO.UseSkill('Hiding')
Wait(4000)
Wend
check:
uo.findtype('0x0E76', -1 , chesttoput )
if uo.findcount() then
del('255|bag')
uo.click('finditem')
repeat
wait(100)
until uo.injournal('bag')
if uo.injournal('255') then
uo.ignore('finditem')
goto check
else
bag = uo.getserial('finditem')
end if
else
uo.findtype('0x0E76', -1 , chestwithbags )
bag = uo.getserial('finditem')
uo.moveitem( bag , 0 , chesttoput , 18 , 148 , 0 )
wait(1000)
end if
find:
uo.findtype( type , -1 ,'backpack')
If UO.FindCount() Then
UO.moveitem('finditem', 0 , bag )
wait(1000)
goto find
end if
uo.findtype('0x1BDD', -1 ,'backpack')
If UO.GetQuantity('finditem') < 20 then
UO.FindType('0x1BDD', -1 , chestwithlogs )
If uo.FindCount() == 0 then
return
end if
UO.moveitem('finditem','100','backpack')
wait(1000)
end if
checklag()
Del('You put|fail|World Save')
uo.FindType('0x1034')
uo.recall(uo.GetSerial('finditem'), 3 )
k = 0
while NOT UO.InJournal('You put') AND NOT UO.InJournal('fail') AND ( k < 30 )
k = k + 1
wait(500)
wend
wend
end sub
Toggle shoutbox Chat
|
Помогите разобраться, плиз!!!!!
Started by Olorin, Aug 02 2006 15:58
3 replies to this topic
#1
Posted 02 August 2006 - 15:58
#2
Posted 02 August 2006 - 16:06
VAR chesttoput = '0x4009AECB' - ID сундука куда кидать VAR chestwithbags = '0x4009B6A4' - ID сундука откуда брать скмки VAR chestwithlogs = '0x4009A0CD' - ID сундука откуда брать логи
P.S. За не соблюдения правил будет бан!
Если ты не являешься частью решения, то ты являешься частью проблемы...
#3
Posted 02 August 2006 - 16:43
[quote=Dark_Storm]
У вас что совсем крыша поехала даже на уомкаросе можно было кувать и делать что хочешь а щяс Нельзя обьясняйте ПОЧЕМУ?
VAR chesttoput = '0x4009AECB' - ID сундука куда кидать VAR chestwithbags = '0x4009B6A4' - ID сундука откуда брать скмки VAR chestwithlogs = '0x4009A0CD' - ID сундука откуда брать логиP.S. За не соблюдения правил будет бан!
У вас что совсем крыша поехала даже на уомкаросе можно было кувать и делать что хочешь а щяс Нельзя обьясняйте ПОЧЕМУ?
#4
Posted 02 August 2006 - 16:48
Блок за то, что скрипт выложил без тега [code=auto:0]. Не первый раз.
Я намерен жить вечно,
Пока всё идет нормально.
Ultima Online предоставляет куда больше возможностей, чем просто ходить и убивать монстров или других игроков. Единственная вещь, ограничивающая игру - ваше собственное воображение!
© Bazuzu
0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users