Магия со спиритом

DeviL [WoF] · Post by **DeviL [WoF]** » 2005-09-09 11:25:52

подскажите возможно ли в скрипт тинкер локпиков вписать циклично скрипт например спирит спика или эвалюты????
ЗЫ-играю на DRW

Leo · Post by **Leo** » 2005-09-09 11:48:07

Взято из скриптв Асканели:

Где-нить в начале скрипт пишешь:

Code: Select all

var LastTimer=UO.Timer()

Потом в скрипт вставляешь:

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

DeviL [WoF] · Post by **DeviL [WoF]** » 2005-09-24 11:52:11

спс Лео!

DeviL [WoF] · Post by **DeviL [WoF]** » 2005-09-24 11:54:24

еше раз попрошу помоши.....плз....
я тут чето нарисовал чтоб с магери спирит качался но чет непашет(
глянь плз че не так

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

Leo · Post by **Leo** » 2005-09-24 11:57:10

Лучше так

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

DeviL [WoF] · Post by **DeviL [WoF]** » 2005-09-24 12:05:10

в нем чето ругаеться на 11 строку - Variable undefined - P =(

Leo · Post by **Leo** » 2005-09-24 12:10:34

В начале напиши var p

DeviL [WoF] · Post by **DeviL [WoF]** » 2005-09-24 12:15:06

да,кастует и медитит...но почемуто не спирит спичит*((пишит ю маст ваит ту перформ эназе экшн(

Leo · Post by **Leo** » 2005-09-24 12:21:15

Значит не успевает, поставь задержку после каста побольше.

DeviL [WoF] · Post by **DeviL [WoF]** » 2005-09-24 12:30:20

чет у мнгу ниче не получается

Leo · Post by **Leo** » 2005-09-24 15:40:29

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

Orbi · Post by **Orbi** » 2005-10-09 16:16:48

а как сделать чтобы после неудачной попытки медитировать он начинал ещё раз медитировать, а спиприт спик не в какую не хочет работатть, сервак тоже ДРВ