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

Ветеран проверь скриптик чтото тут не то :(
http://forum.yoko.com.ua/viewtopic.php?f=20&t=3570		 Page 1 of 1
Author:  Yamakasi*** [ 2005-04-02 09:41:39 ]
Post subject:  Ветеран проверь скриптик чтото тут не то :(
Почему у меня на олд оскоме збиваеться скрипт через несколько минут немогу выслидить когда :(
:oops: :oops: :oops:

sub Magery()
VAR NS='0x0F88'
VAR Sunduk='0x4178FFDB'
VAR Kolvo=100
While NOT UO.Dead()
While UO.Mana>=9 AND UO.NS>0
UO.DeleteJournal()
UO.Cast('Poison', 'lasttarget')
wait(3000)
wend
If UO.Mana<9 Then
While UO.Mana<UO.Int
UO.DeleteJournal()
UO.Useskill('Meditation')
Repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
Wend
Endif
If UO.NS==0 Then
UO.FindType(NS, '-1', Sunduk)
UO.Grab(str(Kolvo), 'finditem')
repeat
wait(100)
until UO.NS>0
Endif
Wend
end sub

Может это я неправельно зделал
UO.Cast('Poison', 'lasttarget')
потому что на оскоме магия на себя действуует и я вместо self зделал так ! помоги плз
Author:  Yamakasi*** [ 2005-04-02 10:18:32 ]
Post subject: 
фаект в том что он скоко то раз кастует потом медитирует потом опять кастует так ХХХ раз не могу пощитать когда останавливаеться но ошибку не ппишит и заходиш во вкладку скрипт он там не убран ...
Author:  Yamakasi*** [ 2005-04-02 10:19:56 ]
Post subject: 
Чють не забыл ещё если ошибку найдёте надо чтоб чар кушал :(
Author:  Yamakasi*** [ 2005-04-02 10:25:54 ]
Post subject: 
Up
Author:  Yamakasi*** [ 2005-04-02 11:23:23 ]
Post subject: 
вверх
Author:  Yamakasi*** [ 2005-04-02 15:45:10 ]
Post subject: 
скриптёры помогите ... Или дайте другой скирпт на магию который работает нормально
Author:  Immelstorn [ 2005-04-03 14:55:56 ]
Post subject: 
Поюзай мой скриптик тогда. Принцип такой же, но еще еда есть (фишстейки):
Quote:
sub magery()
VAR sunduk='0x400ACBAA'
repeat

uo.findtype(0x097B)
if uo.GetQuantity('finditem')>0 then
repeat
uo.deletejournal()
UO.UseObject('finditem')
wait(500)
until uo.count(0x097B)==0 OR uo.injournal('You feel quite full') OR uo.injournal('You are stuffed!') OR uo.injournal('You are simply too full')
endif

uo.findtype('0x0F88','-1',sunduk)
uo.grab('500','finditem')
wait(1000)

while uo.count(0x0F88)>10
while uo.mana>=11
UO.Cast('Poison','self')
wait(1800)
wend
repeat
uo.deletejournal()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
until UO.Mana==Uo.Int
wend

wait(2000)

until uo.dead()
end sub
Author:  Yamakasi*** [ 2005-04-04 11:30:39 ]
Post subject: 
Спосибо за помощ !
Немог бы ты обьяснить этот скирпт пожалуйста:
Quote:

sub magery()
VAR sunduk='0x400ACBAA' ; Это сундукrepeat

uo.findtype(0x097B) ; Честно скозать не понял
if uo.GetQuantity('finditem')>0 then
repeat
uo.deletejournal()
UO.UseObject('finditem')
wait(500)
until uo.count(0x097B)==0 OR uo.injournal('You feel quite full') OR uo.injournal('You are stuffed!') OR uo.injournal('You are simply too full') ; как я понял это еда может ошибаюсь.
endif

uo.findtype('0x0F88','-1',sunduk) ; Реги
uo.grab('500','finditem')
wait(1000)

while uo.count(0x0F88)>10 ; Это если меньше рег то он берёт из сундука
while uo.mana>=11 ; минимамльная мана с которой начинает мидитировать.
UO.Cast('Poison','self')
wait(1800)
wend
repeat
uo.deletejournal()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
until UO.Mana==Uo.Int
wend

wait(2000)

until uo.dead()
end sub

Ещё вопрос я всёже привельно зделал таргет на вещь в первом скрипте ?
Author:  Yamakasi*** [ 2005-04-04 20:12:40 ]
Post subject: 
Спосибо ... Работает я немного доделал у тебя ошибкка была...
И пожалуйста обьясните там где крастно что это за строки и что вставлять надо сюда ???

sub magery()
VAR sunduk='0x40766F1D'
repeat

uo.findtype(0x103B) \\ ???????????????????
if uo.GetQuantity('finditem')>0 then
repeat
uo.deletejournal()
UO.UseObject('finditem')
wait(500)
until uo.count(0x103B)==0 OR uo.injournal('You feel quite full') OR uo.injournal('You are stuffed!') OR uo.injournal('You are simply too full') \\?????????????????
endif
uo.findtype('0x0F88','-1',sunduk)
uo.grab('50','finditem')
wait(1000)
endif

while uo.count(0x0F88)>17
while uo.mana>=10
UO.Cast('Poison', 'lasttarget')
wait(3000)
wend
repeat
uo.deletejournal()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
until UO.Mana==Uo.Int
wend

wait(2000)

until uo.dead()
end sub

С увожением к вам ...
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/