Proč funguej a jinde ne?

[Erik Nighelt]

JEden kraft sháněl makro na vyrobu zbrojí.. tak sem něco převytvořil a zjistil sem že po zadání cesty UO.WaitMenu je ten řetěz k brnku tak dlouhý že to yoko nesežere a nekove.. tak sem pátral a vypátral jsem příkaz uo.Automenu a s tím to jde a item m ito vykove.. a teď k problému mě to funguje ale nikoumu jinému kdo to zkoušel to nejede háže to parse erory a pod.. kde je chyba? proč to mě jde a jim ne? a je vubec možné kovat zbroje pomocí skriptu když je ten řetězec k výrobku tak dlouhý?
toto je ono:

Kód: Vybrat vše

sub zbrojeseriovavyroba()
 VAR fizz = 0, pocet = 0, kolik = 20  ###nastavis kolik vyrobku chces vyrobit jen u toho kolik
 VAR material1 = '0x1BEF,0x0665'  # zadas TYPE,BARVU ingotu
 VAR vyrobek = '0x1B73,0x0665'    # zadas TYPE, BARVU vyrobku
 UO.AddObject('bedna_s_materialem') # nastavis bednu ze ktere bere matros
 while UO.Targeting()
  wait(200)
 wEnd
 UO.AddObject('bedna_na_vyrobky') # nastavis bednu do ktere das hotove veci
 while UO.Targeting()
  wait(200)
 wEnd 
 UO.Set('quiet', 1)
 while NOT UO.Dead() AND NOT pocet == kolik
     if UO.Count(material1) < 20 then 
   repeat
    UO.FindType(vyrobek,'-1','backpack')
    UO.MoveItem('finditem','-1','bedna_na_vyrobky')
    wait(500)
   until NOT UO.FindCount()
   UO.FindType(material1,'-1','bedna_s_materialem')
   if NOT UO.FindCount() then
    UO.FindType(material1,'-1','backpack')
    if UO.FindCount() then
     UO.MoveItem('finditem','-1','bedna_s_materialem')
     wait(500)
    endIf
    UO.Set('quiet', 0)
    UO.Print("===== Vyrobeno : "+str(pocet)+" =====")
    UO.Print("===== Pocet fizzu : "+str(fizz)+" =====")
    UO.Print("===== DOSEL MATERIAL =====")
    return
   endIf
   UO.MoveItem('finditem','100','backpack')
   wait(500)
  endIf
  uo.Automenu('Blacksmithing','Armors & Shields')#nastav cestu 1,2
  uo.Automenu('Armors & Shields','Armors & Shields')#nastav cestu 2,2
  uo.Automenu('Armors & Shields','Rose Armor') #nastav cestu 2,3
  uo.Automenu('Rose Armor','Rose Armor')#nastav cestu 3,3
  uo.Automenu('Rose Armor','Rose Shields')#nastav cestu 3,4
  uo.Automenu('Rose Shields','Rose Buckler') #nastav cestu 4,5  
  UO.Usetype('0x13E3')  # TYPE TVEHO NARADI co pouzivas:)
  UO.Deletejournal()
  repeat
   wait(200)
  until UO.Injournal("You put|You have failed|Targeting Cancelled")
  if UO.InJournal("You put the") then
   pocet = pocet + 1
  endIf
  if UO.InJournal("You have failed") then
   fizz = fizz + 1
  endIf
 wEnd
 repeat
  UO.FindType(vyrobek,'-1','backpack')
  UO.MoveItem('finditem','-1','bedna_na_vyrobky')
  wait(500)
 until NOT UO.FindCount()
 UO.FindType(material1,'-1','backpack')
 if UO.FindCount() then
  UO.MoveItem('finditem','-1','bedna_s_materialem')
  wait(500) #crafted by Erik Nighelt:)
 endIf
 UO.Set('quiet', 0)
 UO.Print("===== Vyrobeno : "+str(pocet)+" =====")
 UO.Print("===== Pocet fizzu : "+str(fizz)+" =====")
 UO.Print("===== KONEC VYROBY =====")
end sub

[Samial]

Jestli to jde tobě a někomu jinýmu ne, tak je to určitě verzí joka.. taky sem měl podobný problémy, kdysi...

[Erik Nighelt]

Jestli to jde tobě a někomu jinýmu ne, tak je to určitě verzí joka.. taky sem měl podobný problémy, kdysi...

yoko je stejná verze i stejný nastavení..
ale dík za reakci
nějakej kraftík..nemá s tim zkušenosti?

[Wizzy]

vic skriptu v jednom souboru s timhle ?

[Erik Nighelt]

vic skriptu v jednom souboru s timhle ?

ne jen tento žádný jiný k tomu:)
prostě haluz.. kod je v pořádku a yoko m ito kraftí.. ale nikomu jinýmu ne prostě nechápu.)