Herding

[Castian]

Mate prosim niekto uzitocny script na Herding? Ja som jeden mal, ale niekam som ho zapatrosil a uz ho nejak neviem najst.
Trebars nech to privolava zvierata na targetself, to uplne staci

[Driana]

Kód: Vybrat vše

sub Trening_Hearding()

  UO.DeleteJournal()
  UO.Print('Jake zvire chces ovladat?')           
  UO.AddObject('zviratko')
  While UO.Targeting()
    Wait(100)
  Wend
  While UO.Count('0x0E81')> 0
    UO.DeleteJournal()
    UO.WaitTargetObject('zviratko')
    UO.UseType('0x0E81')
    Uo.Print('Kam ma jit?')
     Wait(500)
    Repeat 
       Wait(2000)
    Until UO.InJournal("animal goes|seem to be able")
  WEnd
endsub

[annalori]

zkousel si tlacitko hledat na tomhle foru? resilo se to tu xkrat pokud se nepletu...

[Roubicek]

sice stare vlakno, ale ted jsem herding resil, takze kdyby nekdo nahodou potreboval:

Kód: Vybrat vše

######
sub herding()
uo.set("finddistance","10")
var i
dim npc[20]
	npc[1]='0x0005' # eagle
	npc[2]='0x00D9' # dog
	npc[3]='0x00EE' # rat
	npc[4]='0x00C9' # cat
	npc[5]='0x00DF' # lamb
	npc[6]='0x0097' # dolphin
	npc[7]='0x00D7' # giant rat
	npc[8]='0x00CB' # pig
	npc[9]='0x00EA' # hart
	npc[10]='0x00CF'# sheep
	npc[11]='0x00E7'# cow
	npc[12]='0x0006'# magpie,raven
	npc[13]='0x00CD'# rabbit
	npc[14]='0x00D0'# chicken
	
while not uo.dead()
for i = 1 to 14
	uo.findtype(npc[i],-1,'ground')
	while uo.findcount()
		uo.print('nalezeno npc')
		if not uo.count('0x0E81','0x0000') then
			uo.print('nemas sherperdku')
			uo.exec('terminate all')
			wait(500)
		end if
		uo.deletejournal()
		uo.waittargetobject('finditem','self')
		uo.usetype('0x0E81','0x0000')
		repeat
			wait(100)
		until uo.injournal('seem to be able|animal goes where')
		uo.charprint(0x0040+uo.random(200),str(uo.skillval("Herding",1)/10))
		wait(1000)
	uo.findtype(npc[i],-1,'ground')
	wend
next
wait(5000)
wend
end sub
#################