Bumbání a dolejvání lektvarů

Základní skripty pro všeobecné využití
Odpovědět
Lara Craft
Site Admin
Příspěvky:36
Registrován:čtv bře 08, 2018 9:00 pm
Bumbání a dolejvání lektvarů

Příspěvek od Lara Craft » pát dub 06, 2018 1:57 pm

Umožňuje nejen pít lektvar, ale v případně nouze i doplnit automaticky lahvičky z kádě.

Kód: Vybrat vše

#---------------------------------------------------------------
sub gh()
#---------------------------------------------------------------
uo.print('Greater Heal')
#je-libo salatek?
if UO.GetHP('self')<20 then
UO.UseType('0x09EC','0x06AB') 
endif
#Greater Heal
if UO.Count('0x0F0C','0x0000')>0 then
UO.UseType('0x0F0C','0x0000')
odpocitej(20)  
else
dolejgh()
endif
end sub
#---------------------------------------------------------------
sub GS() 
#---------------------------------------------------------------
UO.DeleteJournal()
uo.print('Greater Strength')
if UO.Count('0x0F09','0x0000','backpack')==0 then
UO.Print('Doplnuji Greater Strength')
dolejgs()
wait(2000)
endif
UO.Print('Nalezeno '+STR(uo.count('0x0F09','0x0000','backpack'))+' Greater Strength')
UO.UseType('0x0F09','0x0000') 
wait(1000)
if UO.Count('0x0F09','0x0000','backpack')==0 then
UO.Print('Pozor, dosly Greater Strength')
#dolejgs()
endif
if UO.InJournal('empty') then 
	odpocitej(20)
        uo.print('muzes chlastat dal ...')
endif
end sub
#---------------------------------------------------------------
sub tmr() 
#---------------------------------------------------------------
var nalej=0
if UO.Count(0x0F09,0x0003)>0 then
UO.UseType(0x0F09,0x0003)
wait(500) 
else
	nalej=1
	if UO.Count(0x0F09,0x0005) > 0 OR UO.Count(0x1843,0x0005) then
		mr()
		return
	endif
endif
wait(1000)
if UO.Count(0x0F09,0x0003)<=1 AND UO.Count(0x1843,0x0003)>0 then
	dolejtmr()
endif
if nalej==1 then
	UO.UseType(0x0F09,0x0003)
	wait(500)
	nalej=0
endif
end sub
#---------------------------------------------------------------
sub TR() 
#---------------------------------------------------------------
uo.DeleteJournal()
uo.print(uo.SkillVal('Alchemy'))
if UO.Count('0x0F0B','0x0000')==0 then
#mas alchemku alespon 25, nemas kad, mas prave jeden mortar a alespon 5 black pearls
if uo.SkillVal('Alchemy') > 250 && UO.Count('0x1843','0x014D') == 0  && UO.Count('0x1843','0x014D') == 0  && UO.Count('0x0E9B') == 1 && UO.Count('0x0F7A','0x0000') >= 5 && UO.Warmode() == 0 then
		uo.waitmenu('Vyber typ potionu','Total Refresh')
		uo.usetype('0x0E9B')
		uo.print('Micham...')
		repeat 
			wait(300)
		until UO.InJournal('You completed|You toss|another action|Targeting Cancelled|preoccupied')
		if UO.InJournal('You completed') then
			uo.usetype('0x0E9B')
			wait(800)
		endif
	endif
endif
if UO.Count('0x0F0B','0x0000')>0 then
	UO.UseType('0x0F0B','0x0000')
	odpocitej(20)
wait(1000)
else
	uo.print('Uz nemas zadna TRka.')
endif
if UO.Count('0x0F0B','0x0000')==0 AND UO.Count('0x1843','0x014D')>0 then
	dolejtr()
endif
end sub
TRka navíc se míchají, pokud máte dostatečný skill
Něco pro vampíry:

Kód: Vybrat vše

#---------------------------------------------------------------
sub GB()
#---------------------------------------------------------------
UO.DeleteJournal()
IF uo.Count('0x0f0c','0x0025')>0 then
	uo.usetype('0x0f0c','0x0025')
	UO.Print('Zbyva jeste: '+str(uo.Count('0x0f0c','0x0025'))+ ' Greater Blood')
else
 	uo.usetype('0x0f0c','0x0089')
	UO.Print('Zbyva jeste: '+str(uo.Count('0x0f0c','0x0089'))+ ' Blood')
	#dolejGB()
 endif
wait(600)
IF uo.Count('0x0f0c','0x0025') == 0 AND uo.Count('0x0f0c','0x0089') == 0 then
	uo.print('Dosla krev, doplnuji...')
	dolejgb()
endif	
if UO.LIFE<60 then
	zerbandy()
endif
if UO.InJournal('empty') then 
	wait(4000)
        uo.print('jeste 15sekund')
        wait(5000)
        uo.print('jeste 10sekund')
        wait(6500)
        uo.print('jeste 3sekund')
        wait(1000)
        uo.print('jeste 2sekundy')
        wait(1000)
        uo.print('jeste 1sekundy')
        wait(1000)
        uo.print('muzes chlastat dal ...')
endif
end sub
#---------------------------------------------------------------
sub zerbandy()
#---------------------------------------------------------------
	if UO.Count('0x0E22')>0 then
		UO.UseType('0x0E22')
	else
		UO.UseType('0x0E20')
	endif
end sub
 
Dolejvání lektvarů:

Kód: Vybrat vše

#---------------------------------------------------------------
sub dolejlektvar(typl,barval, barva, nazev, pocet)
#---------------------------------------------------------------
uo.Print('Doplnuji '+str(pocet)+' lektvaru '+nazev+'.')
var doplnit=pocet
if uo.count('0x1843',barva)> 0 and uo.count('0x0F0E','0x0000')>0 then
UO.UnsetCatchbag()
repeat
uo.deletejournal()
uo.waittargettype('0x0F0E','0x0000')
uo.usetype('0x1843',barva)
wait(600)
pocet=pocet-1
if uo.injournal('nemuzes') then
uo.warmode(uo.warmode())
endif
until pocet==0 or uo.count('0x1843',barva)==0 or uo.count('0x0F0E','0x0000')==0 or uo.injournal('Jsi prilis tezky!')
else 
uo.print("Nemas kad s "+nazev+", mas "+str(uo.count('0x0F09',barva))+"lektvaru.")
endif
if NOT uo.injournal('Jsi prilis tezky!') then
uo.print("Doplneno "+str(doplnit-pocet)+" "+nazev+", mas "+str(uo.count(typl,barval))+" lektvaru.")
else
uo.print("Doplneno 0 "+nazev+", mas "+str(uo.count(typl,barval))+" lektvaru.")
endif
end sub

#---------------------------------------------------------------
sub dolejtmr()
#---------------------------------------------------------------
dolejlektvar('0x0F09','0x0003','0x0003','TMR',3)
end sub

#---------------------------------------------------------------
sub dolejmr()
#---------------------------------------------------------------
dolejlektvar('0x0F09','0x0005','0x0005','MR',3)
end sub

#---------------------------------------------------------------
sub dolejtr()
#---------------------------------------------------------------
UO.UnsetCatchbag()
dolejlektvar('0x0F0B','0x0000','0x014D','TR',6)
end sub 

Odpovědět