Page 1 of 1
инскрипт помогите доделать
Posted: 2008-01-03 20:36:06
by MeLFiS
Code: Select all
sub inckript()
VAR bl = '0x0e34'
VAR sb = '0x0efa'
while not uo.Dead()
uo.useskill('Inscription')
uo.waittargetobject('_'+bl, '_'+sb)
uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
uo.automenu('Select a spell to inscribe', 'Poison')
while not uo.InJournal('You create the scroll and put it in your backpack') or uo.InJournal('You fail and destroy the scroll') or uo.InJournal('you fail')
wait(100)
wend
wend
end sub
Что здесь может быть не правельно помогите доделать
Re: инскрипт помогите доделать
Posted: 2008-01-03 21:31:37
by Kynep
MeLFiS wrote:Code: Select all
sub inckript()
VAR bl = '0x0e34'
VAR sb = '0x0efa'
uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
uo.automenu('Circle 3 spells', 'Poison')
while not uo.Dead()
uo.waittargettype(bl)
wait(500)
uo.useskill('Inscription')
while not uo.InJournal('You create the scroll and put it in your backpack') or uo.InJournal('You fail and destroy the scroll') or uo.InJournal('you fail')
wait(100)
wend
wend
end sub
Что здесь может быть не правельно помогите доделать
Posted: 2008-01-04 15:05:21
by MeLFiS
Code: Select all
sub inckript()
VAR bl = '0x0e34'
VAR sb = '0x0efa'
uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
uo.automenu('Select a spell to inscribe', 'Poison')
while not uo.Dead()
uo.waittargetobject('_'+bl, '_'+sb)
wait(500)
uo.useskill('Inscription')
while not uo.InJournal('You create the scroll and put it in your backpack') or uo.InJournal('You fail and destroy the scroll') or uo.InJournal('you fail')
wait(100)
wend
wend
end sub
Я подправил немножко токо тепер нада с журналом чтото зделать а то он 1 раз делает а дальше не хочет
Posted: 2008-01-04 15:10:53
by Kynep
Code: Select all
sub inckript()
VAR bl = '0x0e34'
VAR sb = '0x0efa'
uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
uo.automenu('Select a spell to inscribe', 'Poison')
while not uo.Dead()
UO.DeleteJournal()
uo.waittargetobject('_'+bl, '_'+sb)
wait(500)
uo.useskill('Inscription')
while not uo.InJournal('You create the') or uo.InJournal('You fail and')
wait(100)
wend
wend
end sub
Posted: 2008-01-04 20:41:59
by MeLFiS
вписал я свои настройки в журнал всеравно 1 раз делает и все
Posted: 2008-01-04 20:57:52
by MeLFiS
Code: Select all
sub inckript()
VAR bl = '0x0e34'
VAR sb = '0x0efa'
uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
uo.automenu('Select a spell to inscribe', 'Poison')
while not uo.Dead()
UO.DeleteJournal()
repeat
uo.waittargetobject('_'+bl, '_'+sb)
wait(500)
uo.useskill('Inscription')
while not uo.InJournal('You fail') or uo.InJournal('"You create')
wait(100)
wend
If UO.InJournal("You fail and destroy the scroll") and uo.InJournal("You create the scroll and put it in your backpack") then
repeat
wait(500)
wend
end sub
Дописал еше такое токо вот не знаю как тепер
Code: Select all
If UO.InJournal("You fail and destroy the scroll") and uo.InJournal("You create the scroll and put it in your backpack")
Токо тепер он начинает заного если пишетса 1 а если 2 то он не чего не делает как правильно написать чтобы при 2 тоже наченал заного
Posted: 2008-01-04 21:40:10
by stickman
while wend repeat...

все перепутано, напутано...брр
Posted: 2008-01-04 22:04:39
by Kynep
MeLFiS wrote:Code: Select all
sub inckript()
VAR bl = '0x0e34'
VAR sb = '0x0efa'
uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
uo.automenu('Select a spell to inscribe', 'Poison')
while not uo.Dead()
UO.DeleteJournal()
uo.waittargetobject('_'+bl, '_'+sb)
wait(500)
uo.useskill('Inscription')
while not uo.InJournal('You fail') or uo.InJournal('"You create')
wait(100)
wend
wend
end sub
Блин я же тебе написал, пробуй. Если хоцца своих сообщений то исправь, текущие на свои.
Posted: 2008-01-05 01:35:37
by MeLFiS
все я нашол вчем проблема можете тепер помоч чтобы он медетировал када маны не будет