СИлтно скрипты не критикуйте
Code: sub field()
uo.waittargettile("400",str(uo.getx("lastattack")),str(uo.gety("lastattack")),str(uo.getz("lastattack")))
uo.cast("Wall of Stone")
end sub
## Bandaid Self
sub healself()
var myarm
uo.setarm('myarm')
uo.bandageself()
wait(300)
UO.arm('myarm')
end sub
## FS
sub fslast()
var f=0
if UO.Count("0x1f5f") > 0 then
Uo.waittargetobject('lastattack')
UO.Exec("usetype 0x1f5f")
VAR fsscrlcnt=UO.Count("0x1f5f" - 1)
UO.Print(""+STR(fsscrlcnt)+" Flame Strike Scrolls left")
UO.Exec("exec fs_timer")
else
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Flame Strike'")
f=1
UO.Print("No Flame Strike Scrolls!...")
end if
end sub
## pl
sub pst()
var f=0
if UO.Count("0x1f52") > 0 then
Uo.waittargetobject('lastattack')
UO.Exec("usetype 0x1f52")
VAR parascrlcnt=UO.Count("0x1f52" - 1)
UO.Print(""+STR(parascrlcnt)+" Paralyze Scrolls left")
else
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Paralyze'")
f=1
UO.Print("No Paralyze Scrolls!....")
end if
end sub
## Run Away Recall
sub home()
UO.Print("Going to Home!...")
UO.Exec("cast 'Recall'")
UO.Exec("waittargetobject 0x40282A3E") ; Поменять
end sub
## Cast MA Last
sub M()
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Magic Arrow'")
UO.Print("You are mine!...")
end sub
###
sub Drain()
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Mana Drain'")
UO.Print("No Mana!...")
end sub
## Cast Feeblemind Last
sub Feeblimind()
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Feeblemind'")
end sub
##Cast Poison Last!
sub Poison()
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Poison'")
end sub
## Cast Lighting Last
sub Light()
var f=0
if UO.Count("0x1f4a") > 0 then
Uo.waittargetobject('lastattack')
uo.print("Lighting Storm!...")
UO.Exec("usetype 0x1f4a")
VAR lghtscrlcnt=UO.Count("0x1f4a") - 1
UO.Print(""+STR(lghtscrlcnt)+" Lightning Scrolls left")
else
Uo.waittargetobject('lastattack')
UO.Exec("cast 'Lightning'")
f=1
UO.Print("No Lightning Scrolls!...")
end if
end sub
##Weaken
sub WeakenLast()
uo.waittargetobject('lastattack')
UO.Exec("cast 'Weaken'")
end sub
##Track Peoples
sub tracking()
UO.Exec("waitmenu 'Tracking' 'Players'")
UO.Exec("useskill 'Tracking'")
end sub
##Protect
sub Protect()
UO.waittargetself()
UO.Exec("cast 'Protection'")
UO.Print("Protection!...")
end sub
## Reactive Armor
sub Rarmor()
UO.waittargetself()
UO.Exec("cast 'Reactive Armor'")
UO.Print("Reactive Armor!...")
end sub
## reflect
sub reflect()
VAR f=0
if UO.Count("reflectscrl") > 1 then
UO.WaitTargetSelf()
UO.Exec("usetype reflectscrl")
UO.Print("Magic Reflection!...")
VAR reflectscrlcnt=UO.Count("reflectscrl" - 1)
UO.PRINT(""+STR(reflectscrlcnt)+" Magic Reflection Scrolls left")
else
UO.WaitTargetSelf()
UO.Exec("cast 'Magic Reflection'")
f=1
UO.Print("No Magic Reflection Scrolls!....")
end if
end sub
## Cure
sub cure()
UO.waittargetself()
UO.Exec("cast 'Cure'")
UO.Print("Casting Cure!...")
end sub
## AntiParalaZyng
sub antiplz()
uo.waittargettype('0x0F0D','0x0B99')
uo.cast('Clumsy')
end sub
##Hiding
sub Hiding()
UO.Warmode("0")
UO.UseSkill("Hiding")
uo.print("Прячемся...")
end sub
##Meditation
sub Meditation()
UO.Warmode("0")
UO.UseSkill("Meditation")
end sub
##HorseAtack
sub horse()
UO.FindType('0x00CC',-1,'ground')
If UO.FindCount('finditem')>0 Then
UO.UseObject('finditem')
Else
uo.UseObject('self')
uo.waittargetobject('lastattack')
uo.say("All Kill")
Endif
end sub
##FF
sub fire()
uo.waittargettype ('0x0E75')
uo.cast ('Fire Field')
end sub
##PF
sub grav()
uo.waittargettype ('0x0E75')
uo.cast ('Paralyze Field')
end sub
###FL
sub fastloot2()
var i
dim fastloot[94]
fastloot[0]=0x13B9
fastloot[1]=0x13BA
fastloot[2]=0x13FE
fastloot[3]=0x13FF
fastloot[4]=0x13B5
fastloot[5]=0x13B6
fastloot[6]=0x143E
fastloot[7]=0x143F
fastloot[8]=0x0F4D
fastloot[9]=0x0F4E
fastloot[10]=0x1440
fastloot[11]=0x1441
fastloot[12]=0x0F60
fastloot[13]=0x0F61
fastloot[14]=0x0F5E
fastloot[15]=0x0F5F
fastloot[16]=0x13B7
fastloot[17]=0x13B8
fastloot[18]=0x13FA
fastloot[19]=0x13FB
fastloot[20]=0x0F45
fastloot[21]=0x0F46
fastloot[22]=0x0F4B
fastloot[23]=0x0F4C
fastloot[24]=0x13AF
fastloot[25]=0x13B0
fastloot[26]=0x0F49
fastloot[27]=0x0F4A
fastloot[28]=0x0F62
fastloot[29]=0x0F63
fastloot[30]=0x1402
fastloot[31]=0x1403
fastloot[32]=0x1400
fastloot[33]=0x1401
fastloot[34]=0x0F51
fastloot[35]=0x0F52
fastloot[36]=0x1406
fastloot[37]=0x1407
fastloot[38]=0x1438
fastloot[39]=0x1439
fastloot[40]=0x0F5C
fastloot[41]=0x0F5D
fastloot[42]=0x143A
fastloot[43]=0x143B
fastloot[44]=0x143C
fastloot[45]=0x143D
fastloot[46]=0x1B76
fastloot[47]=0x1B77
fastloot[48]=0x1B7B
fastloot[49]=0x1B7A
fastloot[50]=0x1B72
fastloot[51]=0x1B73
fastloot[52]=0x1B74
fastloot[53]=0x1B75
fastloot[54]=0x1B79
fastloot[55]=0x1B78
fastloot[56]=0x1416
fastloot[57]=0x1415
fastloot[58]=0x13BF
fastloot[59]=0x13C4
fastloot[60]=0x1411
fastloot[61]=0x141A
fastloot[62]=0x13BE
fastloot[63]=0x1410
fastloot[64]=0x1417
fastloot[65]=0x1412
fastloot[66]=0x1419
fastloot[67]=0x140C
fastloot[68]=0x140D
fastloot[69]=0x140A
fastloot[70]=0x140B
fastloot[71]=0x1408
fastloot[72]=0x1409
fastloot[73]=0x140E
fastloot[74]=0x140F
fastloot[75]=0x13BB
fastloot[76]=0x13C0
fastloot[77]=0x1414
fastloot[78]=0x1418
fastloot[79]=0x1413
fastloot[80]=0x1086
fastloot[81]=0x13B1
fastloot[82]=0x13B2
fastloot[83]=0x0F4F
fastloot[84]=0x0F50
fastloot[85]=0x13FC
fastloot[86]=0x13FD
fastloot[87]=0x0F0E
fastloot[88]=0x1F4A
fastloot[89]=0x1F5F
fastloot[90]=0x0E76
fastloot[91]=0x0E75
fastloot[92]=0x0E79
fastloot[93]=0x09B0
UO.SetReceivingContainer('loot')
for i=0 to 93
repeat
uo.findtype(fastloot[i],'0x0E75','lastcontainer')
if uo.findcount()>0 then
CheckLag()
uo.waittargetObject('finditem')
uo.grab()
wait(550)
endif
until uo.findcount()==0
next
uo.print('Looting Completed....')
uO.UnSetReceivingContainer()
end sub
sub autoloot()
uo.useobject('lastcorpse')
wait(6000)
uo.emptycontainer(2500,'lastcontainer','backpack')
wait(2500)
uo.hide('lastcontainer')
uo.exec('resend')
end sub
###mana
sub Mana()
UO.FindType('0x0F0E','0x09DF',-1,'my')
UO.WaitTargetSelf()
UO.UseObject('finditem')
UO.Print("Mana Potion")
Endif
end sub
sub dtotalmana()
UO.FindType('0x0F0E','0x09BB',-1,'my')
UO.WaitTargetSelf()
UO.UseObject('finditem')
UO.Print("ManaPotionTotal")
Endif
end sub
sub heal2()
uo.waittargetobject('self')
uo.cast('Greater Heal')
uo.say("Ща, погодь подлечусь чутка...")
end sub
sub Drop()
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')-1), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')+1), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')-1), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')+1), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99')
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(500)
uo.FindType('0x0f0d', '0x0B99', '1')
uo.waittargetObject('finditem')
uo.Cast('Feeblemind')
end sub
sub Paral()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F52',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Paralyze','laststatus')
UO.Print("Spell")
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub
|