Page 1 of 2
Добавление к касту
Posted: 2006-04-23 01:39:05
by CONDOMchick
ПЛз помогите.
вот мне нада сделать в этом скрипте -
Code: Select all
sub FS()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Flame Strike','laststatus')
UO.Print("Spell")
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
чтобы если в паке находится опредилённый айтем (тип) то он его юзал 5 раз. (максимально быстро).
Заранее спасибо.
Re: Добавдение к касту
Posted: 2006-04-23 08:03:02
by DokKor
CONDOMchick wrote:ПЛз помогите.
вот мне нада сделать в этом скрипте -
Code: Select all
sub FS()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Flame Strike','laststatus')
UO.Print("Spell")
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
чтобы если в паке находится опредилённый айтем (тип) то он его юзал 5 раз. (максимально быстро).
Заранее спасибо.
про вулканик обчитался что ли?
Re: Добавдение к касту
Posted: 2006-04-23 08:40:16
by Scripts Writer
CONDOMchick wrote:ПЛз помогите.
вот мне нада сделать в этом скрипте -
Code: Select all
sub FS()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Flame Strike','laststatus')
UO.Print("Spell")
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
чтобы если в паке находится опредилённый айтем (тип) то он его юзал 5 раз. (максимально быстро).
Заранее спасибо.
а чё это за Итем и када его юзать то?
Posted: 2006-04-23 10:32:18
by Destruction
Скрипт кстате кривой..
PS:
Code: Select all
If uo.count( TYPE ) Then
uo.UsetTpe( TYPE )
uo.UsetTpe( TYPE )
uo.UsetTpe( TYPE )
uo.UsetTpe( TYPE )
uo.UseType( TYPE )
End If
Posted: 2006-04-23 11:20:55
by skiv
Да лана... Норм скрипт помойму... Это же вроде Едреда каст со скрола...
Posted: 2006-04-23 11:30:25
by CONDOMchick
ну ребята вот в обычный скрипт я знаю как сделать уже далал.
а сюда и чтобы если нету айтема просто кастовал если есть со скролов а если нету и айтема и скролоа то просто так а если нету скролов но есть айтем то по спелбуке с айтемом тоже.
кароче 2 раза вставить но хз куда.
плз поконкретней.
Posted: 2006-04-23 11:58:22
by flake
После UO.UseObject('finditem') и после UO.Cast('Flame Strike','laststatus')
Posted: 2006-04-23 19:11:15
by Scripts Writer
CONDOMchick wrote:ну ребята вот в обычный скрипт я знаю как сделать уже далал.
а сюда и чтобы если нету айтема просто кастовал если есть со скролов а если нету и айтема и скролоа то просто так а если нету скролов но есть айтем то по спелбуке с айтемом тоже.
кароче 2 раза вставить но хз куда.
плз поконкретней.
ты про ванды чтоли?
2Дестр
Code: Select all
for i = 0 to 4
uo.UseType(ITEM)
wait(200)
next
Posted: 2006-04-23 19:43:57
by flake
Posted: 2006-04-23 21:53:57
by CONDOMchick
You Must Die wrote:CONDOMchick wrote:ну ребята вот в обычный скрипт я знаю как сделать уже далал.
а сюда и чтобы если нету айтема просто кастовал если есть со скролов а если нету и айтема и скролоа то просто так а если нету скролов но есть айтем то по спелбуке с айтемом тоже.
кароче 2 раза вставить но хз куда.
плз поконкретней.
ты про ванды чтоли?
2Дестр
Code: Select all
for i = 0 to 4
uo.UseType(ITEM)
wait(200)
next
нет не про ванду.
мне же надо чтобы просто дабл клик делал 5 раз на айтем.
Для коечего другого.
Но я ещё не потестил но завтра пробывать буду.
Posted: 2006-04-23 21:54:42
by CONDOMchick
кста при простом добавлении ничё не выходит.
покажите плз хоть примерно как должно выглядить.
(напомню что айтем должен быть заюзан 5 раз непрырывно быстро сразу после каста)
а если айтема нету то всё как обычный выложенный мной скрипт.
буду очень приизнателен
Posted: 2006-04-23 22:39:34
by flake
Code: Select all
sub FS()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
Item()
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Flame Strike','laststatus')
UO.Print("Spell")
Item()
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
Sub Item()
var ID = 'сюда вставь айди своего айтема'
var x, wt = 100 ; задержка после юза айтема
if uo.containerof(ID) == 'my' then
for x = 1 to 5
uo.useobject(ID)
wait(wt)
next
endif
endsub
Posted: 2006-04-24 12:24:31
by CONDOMchick
хмм спс ща попробую.
Только вот я не понял а что придётся 2 бинда чтоли делать?
Posted: 2006-04-24 12:44:03
by flake
Нет, вторая процедура вызывается из первой.
Posted: 2006-04-24 12:53:14
by CONDOMchick
айди прописал - айтем в паке.
но всёравно просто кастует.
Posted: 2006-04-24 12:54:08
by CONDOMchick
ы можно сделать какнить по типу?
Posted: 2006-04-24 13:31:03
by Scripts Writer
Code: Select all
sub FS()
var item=' id '
var k , i
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
for k = 0 to 5
uo.Useobject(item)
wait(100)
next
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Flame Strike','laststatus')
UO.Print("Spell")
for i = 0 to 5
uo.Useobject(item)
wait(100)
next
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
Posted: 2006-04-24 13:37:49
by flake
You Must Die, ну и нафиг ты повторяешь то, что 2 поста назад уже выложенно?
CONDOMchick, чтобы было по типу измени это:
Code: Select all
Sub Item()
var ID = 'сюда вставь айди своего айтема'
var x, wt = 100 ; задержка после юза айтема
if uo.containerof(ID) == 'my' then
for x = 1 to 5
uo.useobject(ID)
wait(wt)
next
endif
endsub
на это:
Code: Select all
Sub Item()
var Type = 'тип айтема'
var x, wt = 100 ; задержка после юза айтема
if uo.count(Type) then
for x = 1 to 5
uo.usetype(Type)
wait(wt)
next
endif
endsub
Posted: 2006-04-24 16:03:15
by Scripts Writer
flake wrote:You Must Die, ну и нафиг ты повторяешь то, что 2 поста назад уже выложенно?
CONDOMchick, чтобы было по типу измени это:
Code: Select all
Sub Item()
var ID = 'сюда вставь айди своего айтема'
var x, wt = 100 ; задержка после юза айтема
if uo.containerof(ID) == 'my' then
for x = 1 to 5
uo.useobject(ID)
wait(wt)
next
endif
endsub
на это:
Code: Select all
Sub Item()
var Type = 'тип айтема'
var x, wt = 100 ; задержка после юза айтема
if uo.count(Type) then
for x = 1 to 5
uo.usetype(Type)
wait(wt)
next
endif
endsub
сори, расценил месагу "по типу" -в значении"как по аналогии", а не как по типу предмета. Так бы сам исправил без б =)
Posted: 2006-05-05 17:51:34
by CONDOMchick
Code: Select all
sub FS()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
Item()
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Flame Strike','laststatus')
UO.Print("Spell")
Item()
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
Sub Item()
var Type = 'bla bla bla'
var x, wt = 100 ; çàäåðæêà ïîñëå þçà àéòåìà
if uo.count(Type) then
for x = 1 to 5
uo.usetype(Type)
wait(wt)
next
endif
endsub
Unexpected target info.
Мож чёта с задержкой?
(с задержкой юза айтема всё ок)