PVP-ALFA(2009-2010) by Sin
Posted: 2009-12-14 22:14:15
И так ребята, после того, как потерял свой autoload, столкнулся с проблемой поиска нормальных рабочих скриптов.В данном топике будут выложены скрипты для всех классов.Данный топик будет регулярно пополняться и редактироваться мною.
Топик будет разделен по тематике, а именно:
- общеклассовые скрипты( подходящии для всех классов)
- классовые скрипты ( для определенного класса)
НАчнемс....
Общеклассовые скрипты
Касты
Каст стрелки по последнему статусу.
Каст парализа по последнему статусу.
Каст пойзона по последнему статусу.
Каст манадрейн по последнему статусу.
Каст фс по последнему статусу.
Каст лайтинга по последнему статусу.
Каст харма по последнему статусу.
Каст вэакена по последнему статусу.
Каст диспела по последнему статусу.
Каст парализ филд по последнему статусу.
Каст стены по последнему статусу.
Каст куре на себя
Каст Грейтхил на себя
Каст стрелки на себя
Каст зеркала на себя
Каст реактив армора и протекта на себя
Бутылки
Тотал мана
Грейт хил
Инвиз
Информация о полученном поинте
Информация о жизни
Очистка пака
Топик будет разделен по тематике, а именно:
- общеклассовые скрипты( подходящии для всех классов)
- классовые скрипты ( для определенного класса)
НАчнемс....
Общеклассовые скрипты
Касты
Каст стрелки по последнему статусу.
Code: Select all
Sub Arrow()
If UO.Mana>=4 AND UO.BP>0 AND UO.NS>0 Then
UO.Cast('Magic Arrow','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст парализа по последнему статусу.
Code: Select all
Sub Paralyze()
If UO.Mana>=12 AND UO.GA>0 And UO.MR>0 AND UO.SS>0 Then
UO.Cast('Paralyze','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст пойзона по последнему статусу.
Code: Select all
Sub Poison()
If UO.Mana>=9 AND UO.NS>0 Then
UO.Cast('Poison','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст манадрейн по последнему статусу.
Code: Select all
Sub ManaDrain()
If UO.Mana>=11 AND UO.BP>0 AND UO.MR>0 AND UO.SS>0 Then
UO.Cast('Mana Drain','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст фс по последнему статусу.
Code: Select all
Sub FlameStrike()
If UO.Mana>=40 AND UO.SS>0 AND UO.SA>0 Then
UO.Cast('Flame Strike','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст лайтинга по последнему статусу.
Code: Select all
Sub Lightning()
If UO.Mana>=10 AND UO.SS>0 AND UO.SA>0 Then
UO.Cast('Lightning','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст харма по последнему статусу.
Code: Select all
Sub Harm()
If UO.Mana>=5 AND UO.SS>0 AND UO.SA>0 Then
UO.Cast('Harm','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст вэакена по последнему статусу.
Code: Select all
Sub Weaken()
If UO.Mana>=5 AND UO.SS>0 AND UO.SA>0 Then
UO.Cast('Weaken','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст диспела по последнему статусу.
Code: Select all
Sub Dispel()
If UO.Mana>=5 AND UO.SS>0 AND UO.SA>0 Then
UO.Cast('Dispel','laststatus')
Else
UO.Print("No mana")
Endif
Endsub
Каст парализ филд по последнему статусу.
Code: Select all
sub paralF()
Uo.waittargettile("400",str(Uo.getx("laststarget")),str(Uo.gety("lasttarget")),str(Uo.getz("lasttarget")))
Uo.cast("Paralyze Field")
end sub
Каст стены по последнему статусу.
Code: Select all
sub Stone()
Uo.waittargettile("400",str(Uo.getx("laststarget")),str(Uo.gety("lasttarget")),str(Uo.getz("lasttarget")))
Uo.cast("Wall of Stone")
end sub
Каст куре на себя
Code: Select all
Sub Cure()
If UO.Mana>=6 AND UO.GA>0 Then
UO.Cast('Cure','self')
Else
UO.Print("No mana")
Endif
Endsub
Каст Грейтхил на себя
Code: Select all
Sub GHeal()
If UO.Mana>=11 Then
UO.Cast('Greater Heal','self')
Else
UO.Print("No mana")
Endif
Endsub
Каст стрелки на себя
Code: Select all
Sub UnParalyze()
If UO.Mana>=4 AND UO.BP>0 AND UO.NS>0 Then
UO.Cast('Magic Arrow','self')
Else
UO.Print("No mana")
Endif
Endsub
Каст зеркала на себя
Code: Select all
Sub Reflect()
If UO.Mana>=12 AND UO.GA>0 AND UO.MR>0 AND UO.SS>0 Then
UO.Cast('Magic Reflect','self')
Else
UO.Print("No mana")
Endif
Endsub
Каст реактив армора и протекта на себя
Code: Select all
Sub RArm()
UO.Exec("cast 'Reactive Armor'self")
wait(2000)
UO.Exec("cast 'Protection'self")
end sub
Бутылки
Тотал мана
Code: Select all
Sub Manka()
Var Type='0x0F06'
Var Color='0x076A'
UO.FindType(Type, Color, 2)
UO.UseObject('finditem')
Endsub
Грейт хил
Code: Select all
Sub GreaterHeal()
Var Type='0x0F0C'
Var Color='0x0000'
UO.FindType(Type, Color, 2)
UO.UseObject('finditem')
Endsub
Инвиз
Code: Select all
Sub Invise()
Var Type='0x0F09'
Var Color='0x0060'
UO.FindType(Type, Color, 2)
UO.UseObject('finditem')
Endsub
Информация о полученном поинте
Code: Select all
sub points()
repeat
if UO.InJournal("PvP") Then
UO.msg("Желаемый текст")
wait(100)
Uo.DeleteJournal()
else
wait(50)
end if
until false
end sub
Информация о жизни
Code: Select all
sub say_life()
var p
var q
var k
p=uo.life
k=uo.armor
repeat
if uo.life <> p then
q=p
p=uo.life
if p<q then
uo.fontcolor('0x002d')
UO.msg("Life is "+str(p) +" Damage= - " +str(q-p))
else
uo.fontcolor('150')
UO.msg("Life is "+str(p) +" (+"+str(p-q)+")")
end if
end if
IF UO.armor <> k then
k=uo.armor
uo.fontcolor('0x028f')
UO.msg("Armor = "+str(k))
end if
wait(30)
until false
# until uo.dead()
end sub
Очистка пака
Code: Select all
Sub drop()
UO.undress('0x1401')
wait (100)
Uo.drop('0','0','0','7','^0x1412')
wait (20)
Uo.drop('0','0','0','7','^0x1415')
wait (20)
Uo.drop('0','0','0','7','^0x1410')
wait (20)
Uo.drop('0','0','0','7','^0x1414')
wait (20)
Uo.drop('1','0','0','7','^0x1413')
wait (20)
Uo.drop('0','0','0','7','^0x1411')
wait (20)
Uo.drop('0','0','0','7','^0x09B0')
wait (20)
Uo.drop('0','0','0','7','^0x09B0')
wait (20)
Uo.drop('0','0','0','7','^0x09B0')
wait (20)
Uo.drop('0','0','0','7','^0x09B0')
wait (20)
Uo.drop('0','0','0','7','^0x0E76')
wait (20)
Uo.drop('0','0','0','7','^0x1B76')
wait (20)
Uo.drop('0','0','0','7','^0x13B1')
wait (20)
Uo.drop('0','0','0','7','^0x13B1')
wait (20)
Uo.drop('0','0','0','7','^0x0F3F')
wait (20)
Uo.drop('0','0','0','7','^0x0E21')
wait (20)
Uo.drop('0','0','0','7','^0x09B0')
wait (20)
Uo.drop('0','0','0','7','^0x0F0E')
wait (20)
Uo.drop('0','0','0','7','^0x0E20')
end sub