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

Магия со спиритом
http://forum.yoko.com.ua/viewtopic.php?f=3&t=5114		 Page 1 of 1
Author:  DeviL [WoF] [ 2005-09-09 11:25:52 ]
Post subject:  Магия со спиритом
подскажите возможно ли в скрипт тинкер локпиков вписать циклично скрипт например спирит спика или эвалюты????
ЗЫ-играю на DRW
Author:  Leo [ 2005-09-09 11:48:07 ]
Post subject: 
Взято из скриптв Асканели:

Где-нить в начале скрипт пишешь:
Code:
var LastTimer=UO.Timer()


Потом в скрипт вставляешь:
Code:
   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
Author:  DeviL [WoF] [ 2005-09-24 11:52:11 ]
Post subject: 
спс Лео!
Author:  DeviL [WoF] [ 2005-09-24 11:54:24 ]
Post subject: 
еше раз попрошу помоши.....плз....
я тут чето нарисовал чтоб с магери спирит качался но чет непашет(
глянь плз че не так
Code:
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
Author:  Leo [ 2005-09-24 11:57:10 ]
Post subject: 
Лучше так

Code:
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
Author:  DeviL [WoF] [ 2005-09-24 12:05:10 ]
Post subject: 
в нем чето ругаеться на 11 строку - Variable undefined - P =(
Author:  Leo [ 2005-09-24 12:10:34 ]
Post subject: 
:oops:
В начале напиши var p
Author:  DeviL [WoF] [ 2005-09-24 12:15:06 ]
Post subject: 
да,кастует и медитит...но почемуто не спирит спичит*((пишит ю маст ваит ту перформ эназе экшн(
Author:  Leo [ 2005-09-24 12:21:15 ]
Post subject: 
Значит не успевает, поставь задержку после каста побольше.
Author:  DeviL [WoF] [ 2005-09-24 12:30:20 ]
Post subject: 
чет у мнгу ниче не получается :? :( :cry:
Author:  Leo [ 2005-09-24 15:40:29 ]
Post subject: 
Code:
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
Author:  Orbi [ 2005-10-09 16:16:48 ]
Post subject: 
а как сделать чтобы после неудачной попытки медитировать он начинал ещё раз медитировать, а спиприт спик не в какую не хочет работатть, сервак тоже ДРВ
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/