Автоприцел
Posted: 2006-09-01 18:49:25
Нужен скрипт на автоприцеливание типа на синих на рыжых на красных на зеленых!
Code: Select all
if UO.JournalColor(UO.InJournal()+1)=='0x0000' then
I'm wrote:Ну у нас есть спец шняга для таких дел.
http://yoko.com.ua/help/help.php?lang=r ... tNotoriety
NMY wrote:улыбнулшняга
Code: Select all
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
#++++++++++++++-= Auto Attack Men\Women =-++++++++++++++++
#++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
#+++++++++++++-= Auto Attack all players =-+++++++++++++++
sub StartAttack1() ;биндим для атаки всех чаров
StartAttack(1)
end sub
#++++++++++-= Auto Attack PK players only =-+++++++++++++++
sub StartAttack0() ;биндим для атаки только ПК,серых и вражественной гильдии
StartAttack(0)
end sub
sub StartAttack(status)
UO.Ignore("self")
Var FindOK=false,temp,mess,t=0,k
DIM Friend[50]
VAR endlist=4; последнее число в списке друзей
Friend[0]="feduk"
Friend[1]="SENYA"
Friend[2]="Gurza"
Friend[3]="ALF"
Friend[4]="Flatra"
uo.set('finddistance','20')
for t=0 to 1
repeat
uo.findtype("0x019"+str(t),"-1","ground")
temp=0
for k=0 to endlist
if Uo.GetName("finditem")==Friend[k] and uo.findcount()<>0 then
UO.Ignore("finditem")
k=endlist
temp=1
end if
next
if temp==0 and uo.findcount()<>0 then
if status==0 and uo.getnotoriety("finditem")>2 then
UO.addobject('Enemy',uo.getserial("finditem"))
Uo.print ("Curent target = "+uo.getname('Enemy'))
uo.ignore('Enemy')
return
else
if status==1 then
UO.addobject('Enemy',uo.getserial("finditem"))
Uo.print("Curent target = "+uo.getname('Enemy'))
uo.ignore('Enemy')
return
else
uo.ignore("finditem")
end if
end if
end if
until uo.findcount()==0
if uo.findcount()==0 then
UO.IgnoreReset()
end if
next
end sub