Альфа!
Posted: 2007-05-23 19:27:16
подскажите как сделать так чтобы не видно было моих кастов?
2)Чтобы я быстро бегал (вроде догонялка)
Зарание спасибо!
2)Чтобы я быстро бегал (вроде догонялка)
Зарание спасибо!
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
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
Code: Select all
uo.msg(" ")
uo.msg(" ")
uo.msg(" ")
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')
Скрипт который я кинул делает то же самое, только он берёт значения флуда (заклинания) рандомным образом + рандомным образом флудит. То есть может быть флуд; спелл; флуд или спелл;флуд;флуд и.т.д.korzh wrote:думаю есть вариант поинтереснее:)
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
$keR wrote:Ёгрут ну ты молодеЦ, всю малину запорол)
ща пол ОСкома будет так носиться..
3Jlo6Hblu' u0ry®T wrote:$keR wrote:Ёгрут ну ты молодеЦ, всю малину запорол)
ща пол ОСкома будет так носиться..
Давно все так носяться