Toggle shoutbox Chat
|
Autoheal
#1
Posted 06 April 2009 - 23:41
sub morf_heal()
while not uo.dead()
wait(110)
if uo.life < uo.str-5 then
wait(10)
uo.deleteJournal()
uo.bandageself()
wait(30)
repeat
wait(100)
until uo.injournal('fail') or uo.injournal('You put the bloody bandage in your pack') or uo.injournal('fully heal')
end if
wend
end sub
4to nada izmenitj?I vozmozhno voobwe?
#2
Posted 07 April 2009 - 09:37
repeat
If UO.STR>UO.Life Then
UO.BandageSelf()
wait(1600)
endif
until uo.dead()
end sub
sub Paralyze()
Uo.DeleteJournal()
REPEAT
If Uo.InJournal('You are frozen and can not move') Then
uo.msg('.Usetraped')
Uo.DeleteJournal()
Else
Wait(100)
EndIf
Until Uo.Dead()
END SUB
poprobuj etot scp
#3
Posted 07 April 2009 - 11:12
sub AutoHeal()
repeat
If UO.STR>UO.Life Then
UO.BandageSelf()
wait(1600)
endif
until uo.dead()
end sub
sub Paralyze()
Uo.DeleteJournal()
REPEAT
If Uo.InJournal('You are frozen and can not move') Then
uo.msg('.Usetraped')
Uo.DeleteJournal()
Else
Wait(100)
EndIf
Until Uo.Dead()
END SUB
poprobuj etot scp
eto ne rewit moej problemi,on prosto terjaet target kogo le4it, kogda vzrivaetsja trap.. pravda ne vsegda, no bivaet takoe 4asto...
#4
Posted 07 April 2009 - 11:14
#5
Posted 08 April 2009 - 15:36
зы. Тя каждых 5 мин некрашыт с такими кривыми скриптами ?
#6
Posted 08 April 2009 - 15:58
#7
Posted 08 April 2009 - 16:00
da jest ispolzavaj search!A jest takoj scp katorij nezbivajet Cast magu ??? A to autoheal magu nealjo - 4erez kazdij bint navaditsa po novaj
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#8
Posted 08 April 2009 - 16:21
da jest ispolzavaj search!
Ja dumaju rabotajuwij !!! A to po comentam ja ponel wto eti scp nerabotajut ...
#9
Posted 08 April 2009 - 16:24
#10
Posted 08 April 2009 - 16:38
Я создал работающий ... Ищи ...
Kanewna leghche napisat ''Я создал работающий ... Ищи ...'' chem dat silku !!! Ja vot porazajusj jesli vi znajete v kakom topice est nuznij scp no vam legh4e pustije slava napi4atat chem dat konkretnuju infu....
#11
Posted 08 April 2009 - 17:08
var k
var ghtype='0x2384'
var ghcolor='0x7843'
while true
while UO.GetHP()==UO.GetMaxHP()
wait(100)
wend
repeat
UO.BandageSelf()
k=0
uo.DeleteJournal()
repeat
k=k+1
wait(100)
until UO.InJournal("You put the bloody|You apply the") or k==50
until UO.GetHP()==UO.GetMaxHP()
if UO.GetHP()<=1 then
UO.UseType(ghtype,ghcolor)
wait(200)
endif
wait(10)
wend
endsub
PROBUJ !
#12
Posted 08 April 2009 - 17:15
sub Heal()
var k
var ghtype='0x2384'
var ghcolor='0x7843'
while true
while UO.GetHP()==UO.GetMaxHP()
wait(100)
wend
repeat
UO.BandageSelf()
k=0
uo.DeleteJournal()
repeat
k=k+1
wait(100)
until UO.InJournal("You put the bloody|You apply the") or k==50
until UO.GetHP()==UO.GetMaxHP()
if UO.GetHP()<=1 then
UO.UseType(ghtype,ghcolor)
wait(200)
endif
wait(10)
wend
endsub
PROBUJ !
pazalsta polzujtis na zdarovje!nisbivajit target s sjiba i nirabotajit v CTFi...]
sub AutoHeal1() VAR Success = 'You put the bloody bandage' VAR Fizzle = 'failed.' VAR bandag = '0x0E21' VAR k repeat If UO.GetHP() < UO.GetMaxHP() - 1 Then If UO.Count( Bandag ) > 0 Then uo.DeleteJournal( Success ) uo.DeleteJournal( Fizzle ) k = 0 UO.Bandageself() repeat wait(50) k = k + 1 until UO.InJournal( Success ) or UO.InJournal( Fizzle ) or k > 100 Else return Endif Else wait(500) Endif until UO.Life == 0 endsub
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#13
Posted 08 April 2009 - 18:12
Таже история ... Нету проверки на ласт таргет ... Скрипт нечем неотлечаетса от других ...vsoravno budit sbivatj target...
pazalsta polzujtis na zdarovje!nisbivajit target s sjiba i nirabotajit v CTFi...]sub AutoHeal1() VAR Success = 'You put the bloody bandage' VAR Fizzle = 'failed.' VAR bandag = '0x0E21' VAR k repeat If UO.GetHP() < UO.GetMaxHP() - 1 Then If UO.Count( Bandag ) > 0 Then uo.DeleteJournal( Success ) uo.DeleteJournal( Fizzle ) k = 0 UO.Bandageself() repeat wait(50) k = k + 1 until UO.InJournal( Success ) or UO.InJournal( Fizzle ) or k > 100 Else return Endif Else wait(500) Endif until UO.Life == 0 endsub
Kanewna leghche napisat ''Я создал работающий ... Ищи ...'' chem dat silku !!! Ja vot porazajusj jesli vi znajete v kakom topice est nuznij scp no vam legh4e pustije slava napi4atat chem dat konkretnuju infu....
Вписал в серч автохил ... Там есть 3. топик ... Гррр народ .... Камон ... Ненаидеш и щас значет недано ...
#14
Posted 08 April 2009 - 18:17
niznaju men vso rabotajit i target nisbivajitsa!jesli wto etot tvoj skriptТаже история ... Нету проверки на ласт таргет ... Скрипт нечем неотлечаетса от других ...
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#15
Posted 08 April 2009 - 18:18
sub clerikheal() var t=0 while not uo.dead() if uo.life<uo.str then add: if not uo.GetName('laststatus')==uo.getname('last') then uo.click('laststatus') uo.addobject('last','laststatus') else heals: uo.bandageself() uo.deletejournal() uo.click('laststatus') if uo.GetName('laststatus')==uo.getname('self') then uo.waittargetobject('last') end if repeat wait(500) t=t+1 until uo.injournal('You put') or uo.injournal('You fail') or t>10 t=0 end if end if wend end sub
#16
Posted 13 April 2009 - 15:39
sub clerikheal() var t=0 while not uo.dead() if uo.life<uo.str then add: if not uo.GetName('laststatus')==uo.getname('last') then uo.click('laststatus') uo.addobject('last','laststatus') else heals: uo.bandageself() uo.deletejournal() uo.click('laststatus') if uo.GetName('laststatus')==uo.getname('self') then uo.waittargetobject('last') end if repeat wait(500) t=t+1 until uo.injournal('You put') or uo.injournal('You fail') or t>10 t=0 end if end if wend end sub
Poprobyval,ne rabotaet.
#17
Posted 13 April 2009 - 15:55
0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users