5 replies to this topic

[Qvazavr]

Piedavu nokopeet savu autoload.sc te (inject skripti, kuri jus lietojat)

[EnFlame]

sub necromeat()

uo.usetype('0x09F1','0x0049')

end sub



sub masspoison()

uo.usetype('0x1832','0x0487')

end sub



sub archdispel()

uo.usetype('0x183C','0x0427')

end sub



sub archdetect()

uo.usetype('0x183C','0x0447')

end sub



sub lavabomb()

uo.usetype('0x183A','0x0446')

end sub





sub Recal()

var RuneBook='0x400a2c5b'

UO.WarMode(0)

uo.recall(runebook,9)

   wait (100)

end sub



sub AutoHeal1()

VAR Success = 'You put the bloody bandage'

VAR Fizzle = 'failed.'

VAR bandag = '0x0E21'

VAR k

repeat

If UO.GetHP() < UO.GetMaxHP() - 15 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





sub autostart()

uo.exec('exec Stamina')

uo.exec('exec Paralyze')

end sub



sub Loot() 

<< cut >>

end sub



sub AutoHeal()	  

repeat

   If UO.STR>UO.Life Then

	  UO.BandageSelf()

	  wait(1000)

   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



sub PickUp()

uo.set('finddistance','3') 

UO.FindType( -1 , -1 ,'ground')

If UO.FindCount() then

uo.moveitem('finditem')

uo.ignore('finditem')

Wait(200)

Endif

Wait(250)

end sub



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



sub Stamina()

Uo.DeleteJournal()

  REPEAT

	  If Uo.InJournal('You are too fatigued to move') Then

		uo.msg('.drink refresh')

		 Uo.DeleteJournal()

	  Else

		 Wait(100)

	  EndIf

  Until Uo.Dead()

END SUB

nothing special

[Moderators]

tas auto hels met uz sevi targetu ?

[EnFlame]

tas auto hels met uz sevi targetu ?

nu ja, vinjsh ir taa uztaisiits, lai targetu mestu uz Laachpleesi.

[Moderators]

kas tu tads ?

[Hakuno]

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



sub Stamina()

Uo.DeleteJournal()

  REPEAT

	  If Uo.InJournal('You are too fatigued to move') Then

		uo.msg('.drink refresh')

		 Uo.DeleteJournal()

	  Else

		 Wait(100)

	  EndIf

  Until Uo.Dead()

END SUB

Очень часто крэшит с ошибкой 'Unhandled exception in parser'.