Yoko

Привет всем,нужен очень простой (я так думаю) скриптик
На прокачьку Хеллинга на Улии (под Оском)

Юзал поиск-непомогло...есть скрипты для ДРВ,но их в Топку,на Оскоме не кактит прокачька Хеллинга на Курсе

Если есть добрые Люди-помогите....

Вначале напиши что именно от скрипта нужно?
Можно кроме курсы использовать фаер бол, можно второго чара и т.д. Что нужно то??

кто ищет - тот всегда наидет..
ищи, где то был тут..сам на нем качал.. давно правда..

Ururu wrote:Вначале напиши что именно от скрипта нужно?
Можно кроме курсы использовать фаер бол, можно второго чара и т.д. Что нужно то??

Я помоему написал - на Улии - или ты не когда невстречял слово "Улий"?

Тб. чар кликает на улий , пчёлы его кочают,когда у чара ХП меньше 50 он хелиться и так поновой...

3Jlo6Hblu' u0ry®T wrote:

Code: Select all

sub healing() 
repeat
repeat
uo.usefromground('0x091A')#Улей
Lag()
until UO.Life < 20
repeat
UO.Exec("bandageself")
wait(8000)
until UO.Life > 139#-1 от макс хп
Lag()
until UO.Dead()
end sub 




sub Lag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub


sub Reconnector() 
var ReconnectTime, RFlag 
ReconnectTime = '0' 
RFlag = 1 
Repeat 
While (UO.ObjAtLayer('Bpack') == '') 
if RFlag Then 
ReconnectTime = MakeTime() 
RFlag = 0 
endif 
Wait(20000) # WorldSave Protection 
UO.Say('') 
Wait(3000) 
UO.Say('') 
Wait(3000) 
UO.Say('') 
Wait(3000) 
UO.LDblClick(357,164) 
UO.LClick(616,459) 
Wait(3000) 
WEnd 
Wait(3000) 
if (RFlag == 0) and (ReconnectTime <> '0') Then 
;UO.Exec('terminate all') 
;UO.Exec('exec autoload') 
UO.TextOpen() 
UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime) 
RFlag = 1 
ReconnectTime = '0' 
endif 
Until false 
end sub

Бдагодарю Bum Bam BigloOoO


UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime) , а в етой строке нада что-то меньят или нет?

нет

Если интересно! то хиты до 50 доводить не ндо зачем?
просто тупо долбишЬ 1 раз по улью и хилшся! быстрее, удомнее меньше шанс умереть! точнее не умрешь)

Windows Xp wrote:Если интересно! то хиты до 50 доводить не ндо зачем?
просто тупо долбишЬ 1 раз по улью и хилшся! быстрее, удомнее меньше шанс умереть! точнее не умрешь)

если есть скриптик то мог бы скинуть

мона сюда ещё всунуть что бы он стамину пил,а то на оскоме она афигеть как падает...а без неё чар зависает и ждёт пока хелл пройдёт...

sub healing()
repeat
repeat
uo.usefromground('0x091A')#Улей
Lag()
until UO.Life < 20
repeat
UO.Exec("bandageself")
wait(8000)
until UO.Life > 139#-1 от макс хп
Lag()
until UO.Dead()
end sub


sub Lag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub


sub Reconnector()
var ReconnectTime, RFlag
ReconnectTime = '0'
RFlag = 1
Repeat
While (UO.ObjAtLayer('Bpack') == '')
if RFlag Then
ReconnectTime = MakeTime()
RFlag = 0
endif
Wait(20000) # WorldSave Protection
UO.Say('')
Wait(3000)
UO.Say('')
Wait(3000)
UO.Say('')
Wait(3000)
UO.LDblClick(357,164)
UO.LClick(616,459)
Wait(3000)
WEnd
Wait(3000)
if (RFlag == 0) and (ReconnectTime <> '0') Then
;UO.Exec('terminate all')
;UO.Exec('exec autoload')
UO.TextOpen()
UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime)
RFlag = 1
ReconnectTime = '0'
endif
Until false
end sub

d1e 4 y0u можеш стукнуть - 1748747
Откуда знаеш ? кстате уже играю Wicked'ом.. но сегодня забил)

d1e 4 y0u wrote:мона сюда ещё всунуть что бы он стамину пил,а то на оскоме она афигеть как падает...а без неё чар зависает и ждёт пока хелл пройдёт...

куру одеваешь +72 помойму и стамину делаешь 0 или 1 и пашел! и рефрехи не надо)

Windows Xp wrote:

d1e 4 y0u wrote:мона сюда ещё всунуть что бы он стамину пил,а то на оскоме она афигеть как падает...а без неё чар зависает и ждёт пока хелл пройдёт...

куру одеваешь +72 помойму и стамину делаешь 0 или 1 и пашел! и рефрехи не надо)

если, тебя не затруднит,то мона всё поподробнее описать?

Вообщем так! делаешь себе статы примерно такие 150Str 70Dex 130Int!
берешь в себя 6-7к бинтов, стаёшь рядом с ульем, одеваешь курсу, одеваешь до тех пор пока DEX не останется 1 или 0 ( я качал оставлял 1)
собсно и всё! Тыкаешь 1-2 раза и хилишся!
Буддешь хилится всегда отменно так как у тебя всегда стамина будет полная 1:1 или 1:0! как то так! удачи в прокачке! если что то не понятно, вдруг ещё чем могу памочь стучи 479128054

Sub main()
repeat
repeat
uo.usefromground('0x091A')
Lag()
until UO.Life < 40
repeat
if uo.stam < 50 then
uo.useobject('0x0F0B')
else
UO.Exec("bandageself")
wait(8000)
end_if
until UO.Life > 109

Lag()
until UO.Dead()
end sub


sub Lag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub


sub Reconnector()
var ReconnectTime, Rflag
ReconnectTime = '0'
Rflag = 1
Repeat
While (UO.ObjAtLayer('Bpack') == '')
if Rflag Then
ReconnectTime = MakeTime()
Rflag = 0
endif
Wait(20000) # WorldSave Protection
UO.Say('')
Wait(3000)
UO.Say('')
Wait(3000)
UO.Say('')
Wait(3000)
UO.LdblClick(357,164)
UO.Lclick(616,459)
Wait(3000)
Wend
Wait(3000)
if (Rflag == 0) and (ReconnectTime <> '0') Then
;UO.Exec('terminate all')
;UO.Exec('exec autoload')
UO.TextOpen()
UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime)
Rflag = 1
ReconnectTime = '0'
endif
Until false
end sub



народ в чём трабл???
почему не пашет??
пмшет типо "Эрор Лаин 41"
непойму что не так