Yoko

All sides of Injection
It is currently 2025-12-20 13:58:07

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 3
  [ 60 posts ]  Go to page 1 2 3 Next
  Print view Previous topic | Next topic 
Author Message
-=icq=-
PostPosted: 2005-08-13 18:33:37 
Offline

Joined: 2005-06-11 15:57:55
Posts: 8
Корчое нужен скрипт такой чтобы чар автоматом кастовал стрелку, когда на него кидают парализ, т.е. прилетел парализ он автоматом стрелку кидает!

Поиск юзал, но он не работает вообще, ни одно слово не находит!

Спасибо!
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-13 18:36:48 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Code:
sub main() 
Var ser, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("An Ex Por") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1)) 
     if UO.Mana>=ManaNeed then 
          UO.Cast('Magic Arrow',ser) 
     else 
          UO.Print("Low mana!!!") 
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub
Top
   
Reply with quote  
-=icq=-
 Post subject:
PostPosted: 2005-08-13 19:18:47 
Offline

Joined: 2005-06-11 15:57:55
Posts: 8
Спасибо, но:
1. Он тихо работает, т.е. кинули парализ и он через несколько секунд начинает только стрелку кидать!
2. Он не заканчивает своё действие и пытаеся кинуть стрелку дальше!
3. А можно такой скрипт который кидает на ся стрелку и не вырубается, а продолжает работать, т.е. ждать когда снова кинут парализ и снова стрелку кастовать на ся и так сидеть в режим ожидания :)
Top
   
Reply with quote  
MazaFaka
 Post subject:
PostPosted: 2005-08-14 13:13:54 
Offline

Joined: 2005-02-22 20:03:13
Posts: 77
хороший скрипт но с таким скриптом тока 1х1 бегать)

_________________
говорила мне мама "учись неуч"
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-14 13:18:35 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
MazaFaka wrote:
хороший скрипт но с таким скриптом тока 1х1 бегать)


Навтыкать туда проверок и можно бегать командами.
Top
   
Reply with quote  
Dread Masta
 Post subject:
PostPosted: 2005-08-15 17:34:46 
Offline

Joined: 2005-02-06 19:28:02
Posts: 57
Класный скрипт!
НО стрелку он кастит бесконечно
Top
   
Reply with quote  
flake
 Post subject:
PostPosted: 2005-08-15 19:52:29 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
Вот так будет лучше:

Code:
sub main() 
Var ser, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("An Ex Por") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1)) 
     uo.deletejournal()
     if UO.Mana>=ManaNeed then 
          UO.Cast('Magic Arrow',ser) 
     else 
          UO.Print("Low mana!!!") 
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub
Top
   
Reply with quote  
Adil
 Post subject:
PostPosted: 2005-08-26 15:29:36 
Offline
User avatar

Joined: 2005-08-13 05:35:29
Posts: 32
Location: Almaty
Flake a ved pri pomoshi etogo scripta mojno shahterov ubivat pomenyav an ex por na an lor xen i kal ort por :)
Top
   
Reply with quote  
PCGamer
 Post subject:
PostPosted: 2005-08-26 16:45:39 
Offline

Joined: 2005-08-12 03:04:00
Posts: 125
Мне вот интересно, а можно этот скрипт защитит от флуда? Потому как если кто-то в радиусе экрана будет флудить "An Ex Por", то этот скрипт самого себя насмерть стрелками закидает :lol: .
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-26 16:47:08 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Не узнаешь ты флудят это или кастуют, так что скрипт такой используется на свой же страх и риск :wink:
Top
   
Reply with quote  
Adil
 Post subject:
PostPosted: 2005-08-26 16:53:09 
Offline
User avatar

Joined: 2005-08-13 05:35:29
Posts: 32
Location: Almaty
А можно сделать так чтобы он одной и тойже клавишей включался/выключался ?
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-26 16:55:49 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Проще двумя :wink:
Вот функция выключения:
Code:
sub Terminate() 
UO.Exec('terminate main') 
wait(100) 
end sub
Top
   
Reply with quote  
Adil
 Post subject:
PostPosted: 2005-08-26 17:02:49 
Offline
User avatar

Joined: 2005-08-13 05:35:29
Posts: 32
Location: Almaty
Санкс, тока есть и ещё одна проблема, я переделал чтобы не паралтизы сбивать а реколы, но рядом реколиться может кто угодно и если дело идёт в гз то можно стать запросто кримом, возможно ли добавить суда определения статуса чара крим ли он для тебя или пк или гильдвраг и тока в етом случаи атаковать ?
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-26 17:05:48 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Code:
sub main() 
Var ser, color, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("An Ex Por") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1)) 
     сolor=UO.GetNotoriety(Enemy)
     uo.deletejournal() 
     if color==2 OR color==1 then
          wait(100)
     else 
          UO.Cast('Magic Arrow',ser)
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub
Top
   
Reply with quote  
Adil
 Post subject:
PostPosted: 2005-08-26 17:08:18 
Offline
User avatar

Joined: 2005-08-13 05:35:29
Posts: 32
Location: Almaty
Leo wrote:
Проще двумя :wink:
Вот функция выключения:
Code:
sub Terminate() 
UO.Exec('terminate main') 
wait(100) 
end sub

И если у меня все боевые скрипты сохранены в автозапуске и что не писать Terminate для каждого скритпа отдельно, то нужно написать
Code:
sub Terminate()
UO.Exec('all terminate')
wait(100)
end sub

?
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-26 17:10:25 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Code:
sub Terminate() 
UO.Exec('terminate all') 
wait(100) 
end sub
Top
   
Reply with quote  
Adil
 Post subject:
PostPosted: 2005-08-26 17:24:12 
Offline
User avatar

Joined: 2005-08-13 05:35:29
Posts: 32
Location: Almaty
Leo wrote:
Code:
sub main() 
Var ser, color, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("An Ex Por") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1)) 
     сolor=UO.GetNotoriety(Enemy)
     uo.deletejournal() 
     if color==2 OR color==1 then
          wait(100)
     else 
          UO.Cast('Magic Arrow',ser)
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub


нет не пашет пишет Variabel undefined - ENEMY ((
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-08-26 17:27:57 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Сорри :oops:
Code:
sub main() 
Var ser, color, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("An Ex Por") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1)) 
     сolor=UO.GetNotoriety(ser) 
     uo.deletejournal() 
     if color==2 OR color==1 then 
          wait(100) 
     else 
          UO.Cast('Magic Arrow',ser) 
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub
Top
   
Reply with quote  
Adil
 Post subject:
PostPosted: 2005-08-26 17:34:26 
Offline
User avatar

Joined: 2005-08-13 05:35:29
Posts: 32
Location: Almaty
Огромный спс )) всё пашет замечательно ))
Top
   
Reply with quote  
empty_
 Post subject: ошибка =(
PostPosted: 2005-08-31 19:31:41 
Offline

Joined: 2005-08-31 19:27:02
Posts: 6
Location: Latvia, Riga
Leo wrote:
Сорри :oops:
Code:
sub main() 
Var ser, color, ManaNeed=4, CastTime = 500 
 while not uo.dead() 
   if uo.injournal("An Ex Por") then 
     ser=uo.getserial(UO.JournalSerial(uo.InJournal("An Ex Por")-1)) 
     сolor=UO.GetNotoriety(ser) 
     uo.deletejournal() 
     if color==2 OR color==1 then 
          wait(100) 
     else 
          UO.Cast('Magic Arrow',ser) 
     end if 
     wait(CastTime) 
   else 
        wait(1000) 
   end if 
 wend 
end sub



:( :( а вот у меня ошибка выскакивает! ":Variable undefined - COLOR
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 3
  [ 60 posts ]  Go to page 1 2 3 Next

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 1 guest

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