Page 1 of 1
Магия со спиритом
Posted: 2005-09-09 11:25:52
by DeviL [WoF]
подскажите возможно ли в скрипт тинкер локпиков вписать циклично скрипт например спирит спика или эвалюты????
ЗЫ-играю на DRW
Posted: 2005-09-09 11:48:07
by Leo
Взято из скриптв Асканели:
Где-нить в начале скрипт пишешь:
Потом в скрипт вставляешь:
Code: Select all
if UO.Timer()>(LastTimer+3000) then
if uo.skillval("Spirit Speak",1)<1000 then
uo.print("Spirit Speak...")
p=0
repeat
p=p+1
uo.useskill ("Spirit Speak")
uo.deletejournal()
repeat
wait(10)
until UO.InJournal("netherworld") or UO.InJournal("You must wait to perform another action") or uo.dead()
until (UO.InJournal("You establish a connection to the netherworld.")) or (p>=10) or uo.dead()
end if
uo.usetype('0x097B')
wait(1000)
LastTimer=UO.Timer()
end if
Posted: 2005-09-24 11:52:11
by DeviL [WoF]
спс Лео!
Posted: 2005-09-24 11:54:24
by DeviL [WoF]
еше раз попрошу помоши.....плз....
я тут чето нарисовал чтоб с магери спирит качался но чет непашет(
глянь плз че не так
Code: Select all
sub PoisonSelf()
var LastTimer=UO.Timer()
while uo.mana >= uo.INT
Uo.Exec("cast 'Poison' self")
wait(2500)
wend
while uo.mana < UO.INT
Uo.Exec("useskill Meditation")
wait(500)
wend
uo.exec("exec PoisonSelf")
if UO.Timer()>(LastTimer+3000) then
if uo.skillval("Spirit Speak",1)<1000 then
uo.print("Spirit Speak...")
p=0
repeat
p=p+1
uo.useskill ("Spirit Speak")
uo.deletejournal()
repeat
wait(10)
until UO.InJournal("netherworld") or UO.InJournal("You must wait to perform another action") or uo.dead()
until (UO.InJournal("You establish a connection to the netherworld.")) or (p>=10) or uo.dead()
end if
uo.usetype('0x097B')
wait(1000)
LastTimer=UO.Timer()
end if
endsub
Posted: 2005-09-24 11:57:10
by Leo
Лучше так
Code: Select all
sub PoisonSelf()
var LastTimer=UO.Timer()
while uo.mana >= uo.INT
Uo.Exec("cast 'Poison' self")
wait(2500)
if UO.Timer()>(LastTimer+3000) then
if uo.skillval("Spirit Speak",1)<1000 then
uo.print("Spirit Speak...")
p=0
repeat
p=p+1
uo.useskill ("Spirit Speak")
uo.deletejournal()
repeat
wait(10)
until UO.InJournal("netherworld") or UO.InJournal("You must wait to perform another action") or uo.dead()
until (UO.InJournal("You establish a connection to the netherworld.")) or (p>=10) or uo.dead()
end if
uo.usetype('0x097B')
wait(1000)
LastTimer=UO.Timer()
end if
wend
while uo.mana < UO.INT
Uo.Exec("useskill Meditation")
wait(500)
wend
uo.exec("exec PoisonSelf")
endsub
Posted: 2005-09-24 12:05:10
by DeviL [WoF]
в нем чето ругаеться на 11 строку - Variable undefined - P =(
Posted: 2005-09-24 12:10:34
by Leo
В начале напиши var p
Posted: 2005-09-24 12:15:06
by DeviL [WoF]
да,кастует и медитит...но почемуто не спирит спичит*((пишит ю маст ваит ту перформ эназе экшн(
Posted: 2005-09-24 12:21:15
by Leo
Значит не успевает, поставь задержку после каста побольше.
Posted: 2005-09-24 12:30:20
by DeviL [WoF]
Posted: 2005-09-24 15:40:29
by Leo
Code: Select all
sub PoisonSelf()
Var LastTimer=UO.Timer()
while UO.Mana >= UO.INT
UO.Cast('Poison','self')
wait(2500)
wend
if UO.Timer()>(LastTimer+3000) then
p=0
repeat
p=p+1
uo.useskill ("Spirit Speak")
uo.deletejournal()
repeat
wait(10)
until UO.InJournal("netherworld") or UO.InJournal("You must wait to perform another action") or uo.dead()
until (UO.InJournal("You establish a connection to the netherworld.")) or (p>=10) or uo.dead()
LastTimer=UO.Timer()
end if
UO.UseSkill('Meditation')
repeat
wait(500)
until UO.Mana >= UO.INT
UO.Exec("exec PoisonSelf")
endsub
Posted: 2005-10-09 16:16:48
by Orbi
а как сделать чтобы после неудачной попытки медитировать он начинал ещё раз медитировать, а спиприт спик не в какую не хочет работатть, сервак тоже ДРВ
