Альфа!

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
abas
Posts: 58
Joined: 2005-05-26 12:25:53

Альфа!

Post by abas »

подскажите как сделать так чтобы не видно было моих кастов?
2)Чтобы я быстро бегал (вроде догонялка)
Зарание спасибо!
$keR
Posts: 185
Joined: 2006-05-25 23:02:02
Location: Uoo

Post by $keR »

1*не кастовать
2* научиться быстро бегать
kak to tak
to4a
Posts: 265
Joined: 2006-03-10 00:19:11
Location: http://drw.ru/

Post by to4a »

1. поиск
2. туда же
DRW - Glorior Belli
Image
Rivory
Posts: 205
Joined: 2005-01-06 11:49:28

Post by Rivory »

Догонялка

Code: Select all

;----------------------------------------------------------------- 
;--------------------------NMY------------------------------------
sub chase()
   If uo.getglobal('chase')=='On' then
   uo.setglobal ('chase',0)
   uo.print(' !!! -= Chase Terminated =- !!! ')
   uo.exec('Terminate chase')
   else
   uo.setglobal('chase','On')
   uo.print(' !!! -= Chasing =- !!! ')
   endif

  VAR target
  target = uo.getserial('lasttarget')

   while not uo.dead() and target<>"" and uo.getdistance(target)
    if UO.GetDistance(target)>-1 then
    uo.say('')
    Chaser(target)
    endif
   wend

  uo.setglobal('chase',0)
  uo.print(' !!! -= Chasing ended =- !!! ')
end sub
;-----------------------------------------------------------------
sub Chaser(Target)
   VAR dx, dy
While 1
   If Target<>"" and not uo.dead() Then
   dx=UO.GetX(Target)-UO.GetX()
   dy=UO.GetY(Target)-UO.GetY()
    If UO.GetDistance(Target)<0 Then
     return
    Endif
    else
     Return
   Endif

   If dx<>0 AND dy<>0 Then
    If dx>0 AND dy>0 Then
    UO.Press(40) ; DownArrow
    Endif

    If dx>0 AND dy<0 Then
    UO.Press(39) ; RightArrow
    Endif

    If dx<0 AND dy>0 Then
    UO.Press(37) ; LeftArrow
    Endif

    If dx<0 AND dy<0 Then
    UO.Press(38) ; UpArrow
    Endif
   Endif
   
   If dx<>0 AND dy==0 Then
     If dx>0 Then
    UO.Press(34) ; PgDown
    Endif

    If dx<0 Then
    UO.Press(36) ; Home key
    Endif
   Endif

   If dx==0 AND dy<>0 Then
    If dy>0 Then
    UO.Press(35) ; End
    Endif

    If dy<0 Then
    UO.Press(33) ; PgUp
    Endif
   Endif
Wend
end sub


На хайд кастов у меня есть скрипт но он очень большой и неудобный. Я недавно на листочке в школе быстро написал более удобный вариант, но я его ещё не тестил. Ниже идёт длинный вариант.

Code: Select all

sub randspell()
var x
dim flood[20]
flood[0] = 'In Por Ylem'
flood[1] = 'An Ex Por'
flood[2] = 'Des Mani'
flood[3] = 'Rel Wis'
flood[4] = 'Por Ort Grav'
flood[5] = 'An Mani'
flood[6] = 'Kal Vas Flam'
flood[7] = 'In Vas Mani'
flood[8] = 'In Mani'
flood[9] = 'An Ort'
flood[10] = 'In Nox'
flood[11] = 'In Lor'
flood[12] = 'Rel Por'
flood[13] = 'In Sanct Ylem'
flood[14] = 'Por Ort Grav'
flood[15] = 'Ort Rel'
flood[16] = 'An Lor Xen'
flood[17] = 'In Jux Sanct'
flood[18] = 'An Corp'
flood[19] = 'Vas An Ort'
x = uo.random (19)
return flood[x]
end sub




sub randspell1()
var x
dim flood[20]
flood[0] = 'In Por Ylem'
flood[1] = 'An Ex Por'
flood[2] = 'Des Mani'
flood[3] = 'Rel Wis'
flood[4] = 'Por Ort Grav'
flood[5] = 'An Mani'
flood[6] = 'Kal Vas Flam'
flood[7] = 'In Vas Mani'
flood[8] = 'In Mani'
flood[9] = 'An Ort'
flood[10] = 'In Nox'
flood[11] = 'In Lor'
flood[12] = 'Rel Por'
flood[13] = 'In Sanct Ylem'
flood[14] = 'Por Ort Grav'
flood[15] = 'Ort Rel'
flood[16] = 'An Lor Xen'
flood[17] = 'In Jux Sanct'
flood[18] = 'An Corp'
flood[19] = 'Vas An Ort'
wait(15)
x = uo.random (19)
return flood[x]
end sub

sub fs1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.cast ('Flame Strike','last')
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub paralyze1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.cast ('Paralyze','last')
repeat
   wait(50)
until uo.injournal(name+':')
uo.deletejournal()
uo.msg (randspell())
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub innox1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.msg (randspell1())
repeat
   wait(50)
until uo.injournal(name+':')
uo.cast ('Poison','last')
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub strlast1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.cast ('Magic Arrow','last')
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub strself1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.cast ('Magic Arrow','self')
repeat
   wait(50)
until uo.injournal(name+':')
uo.deletejournal()
uo.msg (randspell())
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub heal1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.msg (randspell1())
repeat
   wait(50)
until uo.injournal(name+':')
uo.cast ('Greater Heal','self')
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub light1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.cast ('Lightning','last')
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub clusm1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.cast ('Clusmy','last')
repeat
   wait(50)
until uo.injournal(name+':')
uo.deletejournal()
uo.msg (randspell())
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub anort1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.msg (randspell1())
repeat
   wait(50)
until uo.injournal(name+':')
uo.cast ('Dispel','last')
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub weak1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.msg (randspell())
uo.msg (randspell1())
repeat
   wait(50)
until uo.injournal(name+':')
uo.cast ('Weaken','last')
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub manadr1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.cast ('Mana Drain','self')
repeat
   wait(50)
until uo.injournal(name+':')
uo.deletejournal()
uo.msg (randspell())
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub

sub feebl1()
var name = uo.getname('self')
uo.fontcolor('0x03a1')
uo.cast ('Feeblemind','self')
repeat
   wait(50)
until uo.injournal(name+':')
uo.deletejournal()
uo.msg (randspell())
repeat
   wait(50)
until uo.injournal(name+':')
uo.msg (randspell1())
uo.fontcolor('0x0021')
uo.deletejournal()
end sub
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

я скрытием незанимался имо я и так их видел, но если надо то лудше написать скрипт 1 и ихо просто прописать ко всем кастам на кнопках тот скрипт

ща посмотрю- есть идея :roll:
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

тестил на:

Code: Select all

cast 'Magic Arrow' self;exec hc

дальше смотрите сами

Code: Select all

sub hc() ;Hide Casting Nmy
uo.deletejournal()
repeat
wait(1)
until uo.injournal(" ")
uo.msg(" :: ------- :: ")
uo.msg(" :: ------- :: ")
uo.msg(" :: ------- :: ")
end sub
Kazoo
Posts: 173
Joined: 2004-04-03 18:39:28
Contact:

Post by Kazoo »

Code: Select all

uo.msg(" ")
uo.msg(" ")
uo.msg(" ")
11
korzh
Posts: 220
Joined: 2007-04-26 23:35:15

Post by korzh »

думаю есть вариант поинтереснее:)
ставим в инже фонт темно серый как на кастах.

Code: Select all

 
uo.msg('Kal Vas Flam')
wait(10)
UO.Cast('Lightning','laststatus')
wait(10)
uo.msg('An Ex Por')
wait(10)
uo.msg('In Nox')

ну и соответсвенно для кажого каста менять порядок и мсг. а если совсем поморочитьс, можно написать скрипт, который после\перед\в момент каста будет писать названия других спелов рандомом
Rivory
Posts: 205
Joined: 2005-01-06 11:49:28

Post by Rivory »

korzh wrote:думаю есть вариант поинтереснее:)
Скрипт который я кинул делает то же самое, только он берёт значения флуда (заклинания) рандомным образом + рандомным образом флудит. То есть может быть флуд; спелл; флуд или спелл;флуд;флуд и.т.д.
korzh
Posts: 220
Joined: 2007-04-26 23:35:15

Post by korzh »

ето я понимаю, но я всмысле о том чтобы както оптимизировать его, и сделать поменьше, имхо он медленный.
Rivory
Posts: 205
Joined: 2005-01-06 11:49:28

Post by Rivory »

он не медленный.. а оптимизировать эт легко, просто лень. Я примерно знаю как это сделать подругому.
Ururu
Posts: 479
Joined: 2007-02-21 20:15:57

Post by Ururu »

Может помочь флуд перед кастом и после. Но нужно и по цвету флуд выбирать (под цвет каста)
Шард Антарес
Ururu
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

Code: Select all

#Открывает гейт и скрывает надпись
sub pechka()
Var runa = "0x403734FF"
CheckLag()
uo.waittargetobject(runa)
uo.exec("cast Gate")
repeat
until UO.InJournal('Vas Rel Por')
uo.msg (' ')
uo.msg (' ')
uo.msg (' ')
end sub

переделывай.
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc
$keR
Posts: 185
Joined: 2006-05-25 23:02:02
Location: Uoo

Post by $keR »

Ёгрут ну ты молодеЦ, всю малину запорол)
ща пол ОСкома будет так носиться..
kak to tak
u0rypT
Posts: 175
Joined: 2004-12-30 18:13:16
Location: Russia
Contact:

Post by u0rypT »

$keR wrote:Ёгрут ну ты молодеЦ, всю малину запорол)
ща пол ОСкома будет так носиться..

Давно все так носяться ;)
Design, webdev, coding, c#, php, asp.net, xml, perl, sql, ajax, drawing, illustrating, restoration, photo, photoshop, schedule, pron, guitar, lead-guitar, js, jsp, java, dom, html, *nix, struts, cs, etc
$keR
Posts: 185
Joined: 2006-05-25 23:02:02
Location: Uoo

Post by $keR »

3Jlo6Hblu' u0ry®T wrote:
$keR wrote:Ёгрут ну ты молодеЦ, всю малину запорол)
ща пол ОСкома будет так носиться..

Давно все так носяться ;)

аха, терь точно все..
kak to tak
Post Reply