Авто стрелка
Posted: 2010-05-04 19:55:22
Короче ребят нужен скрипт на авто стрелку для pvp alfa чтоб я забегал в мясо и он на всех кидал стрелку,только можно плиз рабочий скрипт за ранее спасибо.(искал на форуме не чего подходящего нету)
Beyonder wrote:Во первых, совершенно не понятно какой скрипт тебе нужен.
Во вторых, viewtopic.php?p=48543#p48543
В третьих, viewtopic.php?p=15127#p15127
Code: Select all
sub god()
uo.waittargetobject('self')
uo.say('.gm')
uo.waittargetobject('self')
uo.say('.invul')
uo.waittargetobject('self')
uo.say('.set allskills 1000')
endsub
sub kill()
uo.waittargetobject('lastattack')
uo.say('.kill')
endsub
Code: Select all
sub god()
var BFG9000=0x666
uo.UseType('BFG')
uo.say('IDDQD')
uo.say('IDKFA')
endsubCode: Select all
SUB Heal()
var life,h
if UO.Life < uo.GetMaxHP() then
While UO.Life < uo.GetMaxHP()
life=uo.life
uo.WaitTargetSelf()
uo.UseType('0x0E21')
########Тут неработающая пауза впадающая в бесконечный цикл#############
DeleteJournal('You put the bloody bandage in your pack.')
DeleteJournal('Healing failed.')
DeleteJournal('Healing was interrupted.')
DeleteJournal('You don`t need healing or cure.')
repeat
wait(100)
until UO.InJournal('You put the bloody bandage in your pack.|Healing failed.|Healing was interrupted.|You apply the bandages, but they barely help.|You don`t need healing or cure.')
################
uo.ConColor('0x0491')
if uo.life>life+10 then
h=uo.life-life
uo.fontcolor('0x0035')
uo.print('Перебинтовались...+'+STR(h))
endif
Wend
else
uo.print('Здоровье 100%')
endif
CheckLag()
EndsubCode: Select all
sub Heal()
var life,h,LastTimer
if UO.Life < uo.GetMaxHP() then
While UO.Life < uo.GetMaxHP()
life=uo.life
LastTimer=UO.Timer()
DeleteJournal('bloody bandage in your pack|Healing|but they barely help|need healing or cure')
UO.Bandageself()
repeat
wait(100)
until UO.InJournal('bloody bandage in your pack|Healing|but they barely help|need healing or cure') or UO.Timer()>LastTimer+150
uo.ConColor('0x0491')
if uo.life>life+10 then
h=uo.life-life
uo.fontcolor('0x0035')
uo.print('Перебинтовались...+'+STR(h))
endif
Wend
else
uo.print('Здоровье 100%')
endif
CheckLag()
endsubCode: Select all
uo.WaitTargetSelf()
uo.UseType('0x0E21')Полностью предложение писать не стоит.