Yoko

All sides of Injection
It is currently 2025-11-05 21:14:39

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 10 posts ] 
  Print view Previous topic | Next topic 
Author Message
pivovar
 Post subject: cast timer
PostPosted: 2005-07-08 10:43:18 
Offline
User avatar

Joined: 2004-09-05 10:41:06
Posts: 57
Кому не лень плз помогите
как написать скрипт который будет мне говорить время сколько будет колдоватся каждое заклинание . Т.к. я нашёл тут скрипт
Code:
sub multi_Drain() 
VAR a =  3000   ;  Подбери время каста 
UO.Cast( 'Mana Drain', 'laststatus' ) 
wait( a )    
UO.Cast( 'Mana Drain', 'laststatus' ) 
wait( a )    
UO.Cast( 'Mana Drain', 'laststatus' ) 
wait( a )    
UO.Cast( 'Mana Drain', 'laststatus' ) 
wait( a )    
end sub


и я хочу узнать вот это "a"

и ещё есле не лень

Code:
sub supermegagiga() 
  for var i=1 to 4 
    UO.Cast( 'Mana Drain', 'laststatus' ) 
   UO.WaitENDCAST() 
  next 
uo.exec('wall of stone')
UO.waitENDCAST()
uo.exec('paralyze field')
END SUB


Так в этом скрипте пишет что не знает команды " uo.waitendcast()"
какой её аналог есть ну чтобы ждало завершения каста ?

спасибо зарание
Top
   
Reply with quote  
666Man666
 Post subject:
PostPosted: 2005-07-08 11:35:04 
Offline
Junior Expert
User avatar

Joined: 2004-11-13 00:43:55
Posts: 474
Location: Киберзадроцк
Вот КастВэйтер скриптовый... как функция
можно вставлять перед кастами, вместо вэйта

Code:
sub CastWait()
var LastMana=UO.Mana
UO.DeleteJournal()
   REPEAT
         If LastMana > UO.Mana or UO.InJournal("The spell fizzles") Then
            return
         Else
            If LastMana < UO.Mana Then
               LastMana = UO.Mana
            End If
         End If
      Wait(250)
   Until UO.Dead()
end sub
Top
   
Reply with quote  
Solaire
 Post subject:
PostPosted: 2005-07-08 11:51:19 
Offline
User avatar

Joined: 2005-05-21 07:12:12
Posts: 163
Location: DRW
Code:
VAR m=UO.Mana, lt
UO.WaitTargetObject('laststatus')
UO.Cast('Mana Drain') 
lt=UO.Timer()
repeat
   wait(50)
until UO.Mana<m
UO.Print(str((UO.Timer()-lt)*10)+"ms")
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2005-07-08 12:02:26 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Классно народ выдумывает новые функции инжи :)
UO.WaitEndCast() :lol:

Я хочу тогда
UO.Kill( [object] )
И
UO.Set( 'SkillValue', '1000' )
Top
   
Reply with quote  
pivovar
 Post subject:
PostPosted: 2005-07-08 13:06:17 
Offline
User avatar

Joined: 2004-09-05 10:41:06
Posts: 57
flake wrote:
Классно народ выдумывает новые функции инжи :)
UO.WaitEndCast() :lol:

Я хочу тогда
UO.Kill( [object] )
И
UO.Set( 'SkillValue', '1000' )


Проста я скопировал скрипт а там такая штука была : )
Top
   
Reply with quote  
pivovar
 Post subject:
PostPosted: 2005-07-08 13:10:07 
Offline
User avatar

Joined: 2004-09-05 10:41:06
Posts: 57
666Man666 wrote:
Вот КастВэйтер скриптовый... как функция
можно вставлять перед кастами, вместо вэйта

Code:
sub CastWait()
var LastMana=UO.Mana
UO.DeleteJournal()
   REPEAT
         If LastMana > UO.Mana or UO.InJournal("The spell fizzles") Then
            return
         Else
            If LastMana < UO.Mana Then
               LastMana = UO.Mana
            End If
         End If
      Wait(250)
   Until UO.Dead()
end sub


а может ктонить из данных мной скриптов обьединить с этим так , чтобы кастовалось 4 или 3 лайты подряд ?
Top
   
Reply with quote  
pivovar
 Post subject:
PostPosted: 2005-07-08 13:14:59 
Offline
User avatar

Joined: 2004-09-05 10:41:06
Posts: 57
Code:
sub light()
for var i=1 to 4
uo.cast('Lightning','last') 
var LastMana=UO.Mana 
UO.DeleteJournal() 
   REPEAT 
         If LastMana > UO.Mana or UO.InJournal("The spell fizzles") Then 
            return 
         Else 
            If LastMana < UO.Mana Then 
               LastMana = UO.Mana 
            End If 
         End If 
      Wait(250) 
   Until UO.Dead()
   next
end sub



вот попробовал но всеравно кастует 1 раз , а нужно 3 :(
Top
   
Reply with quote  
pivovar
 Post subject:
PostPosted: 2005-07-08 13:15:58 
Offline
User avatar

Joined: 2004-09-05 10:41:06
Posts: 57
Solaire wrote:
Code:
VAR m=UO.Mana, lt
UO.WaitTargetObject('laststatus')
UO.Cast('Mana Drain') 
lt=UO.Timer()
repeat
   wait(50)
until UO.Mana<m
UO.Print(str((UO.Timer()-lt)*10)+"ms")


а этот скрипт я кастую лайтнинг
он показывает 220ms , что это значит? Не может же лайта кастоватся
0.22мс от секунды
Top
   
Reply with quote  
666Man666
 Post subject:
PostPosted: 2005-07-08 15:01:15 
Offline
Junior Expert
User avatar

Joined: 2004-11-13 00:43:55
Posts: 474
Location: Киберзадроцк
Вот тебе объеденение моего с твоим
и запускаеш просто exec multi_Drain, естессно стрелку в таргет кого будеш дрейнить

Code:
sub multi_Drain() 
UO.Cast('Mana Drain','lasttarget')
CastWait()
UO.Cast('Mana Drain','lasttarget')
CastWait()
UO.Cast('Mana Drain','lasttarget')
CastWait()
UO.Cast('Mana Drain','lasttarget')
CastWait()
end sub

Sub CastWait()
var LastMana=UO.Mana 
UO.DeleteJournal() 
   REPEAT 
         If LastMana > UO.Mana or UO.InJournal("The spell fizzles") Then 
            return 
         Else 
            If LastMana < UO.Mana Then 
               LastMana = UO.Mana 
            End If 
         End If 
      Wait(250) 
   Until UO.Dead() 
end sub
Top
   
Reply with quote  
Solaire
 Post subject:
PostPosted: 2005-07-08 15:29:12 
Offline
User avatar

Joined: 2005-05-21 07:12:12
Posts: 163
Location: DRW
pivovar wrote:
а этот скрипт я кастую лайтнинг
он показывает 220ms , что это значит? Не может же лайта кастоватся
0.22мс от секунды

UO.Print(str((UO.Timer()-lt)*100)+"ms")
Ну да, опечаталась слегка. :)
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 10 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: Bing [Bot] and 6 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited