[EASYUO] Leather farmer

[Klose]

should work. didn't test

sub unload
set %param %1
gosub edit_stato Deposito , #spc , il , #spc , loot
repeat
     if %storebank = #true
     {
        set !nruneatt %nruneatt
        set %nruneatt 1
        gosub recall
        set %nruneatt !nruneatt
        event SysMessage Recallato alla banca
     }
     set %nextrecalltobank #systime + 10000
     set %bagx 345 ;<--- place here x-coord of your dropbag
     set %bagy 23  ;<--- place here y-coord of your dropbag
     set %bagz 50  ;<--- place here z-coord of your dropbag
     event pathfind %bagx %bagy %bagz
     finditem %dropbag
     while #systime < %nextrecalltobank && #findkind <> -1 && #finddist <= 2
     {
                finditem %dropbag
     }
     sleep 10
until #findkind <> -1

   set %dbx #findx + 25
   set %dby #findy + 7
   _p2b1:
   if %lootagold = #TRUE
      {
      finditem %gold  C_ , #backpackid
      if #findkind <> -1   ; found something
           {
           gosub Contatore gold #findstack
           gosub moveItemToPos #findid %dbx %dby 0
           if #result = #true
                goto _p2b1
           }
      }
   if %lootaleather = #TRUE
   {
      finditem %cutleather  C_ , #backpackid
      while #findkind <> -1
      {
            gosub Contatore leather #findstack #findcol
         exevent drag #findid #findstack
         wait 2
         exevent dropc %dropbag
         wait 5
         finditem %cutleather C_ , #backpackid
        }
   }
   if %lootafeather = #TRUE
      {
      finditem %feather  C_ , #backpackid
      if #findkind <> -1   ; found something
           {
           gosub Contatore feather #findstack
           gosub moveItemToPos #findid %dbx %dby 0
           if #result = #true
                goto _p2b1
         }
      }
   if %lootafrecce = #TRUE
      {
      finditem %frecce  C_ , #backpackid
      if #findkind <> -1   ; found something
           {
           gosub Contatore frecce #findstack
           gosub moveItemToPos #findid %dbx %dby 0
           if #result = #true
                goto _p2b1
         }
      }
   if %lootaossa = #TRUE
      {
      finditem GUF  C_ , #backpackid  ;GUF cutted bone IDtype
      if #findkind <> -1   ; found something
           {
           gosub Contatore ossa #findstack
           gosub moveItemToPos #findid %dbx %dby 0
           if #result = #true
                goto _p2b1
         }
      }
   if %lootalana = #TRUE
      {
      finditem %wool  C_ , #backpackid
      if #findkind <> -1   ; found something
           {
           gosub Contatore wool #findstack
           gosub moveItemToPos #findid %dbx %dby 0
           if #result = #true
                goto _p2b1
         }
      }
   if %lootascales = #TRUE
      {
      finditem %drgnscale  C_ , #backpackid
      if #findkind <> -1   ; found something
           {
           gosub Contatore scaglie #findstack #findcol
           gosub moveItemToPos #findid %dbx %dby 0
           if #result = #true
                goto _p2b1
         }
      }
   gosub timecalc
  gosub aggiorna_stats
finditem ZLF C_ , #backpackid
if #findkind = -1 || #findstack < 20
{
   set %bendagesinpack #findstack
   finditem ZLF C
   for %ib 1 #findcnt
   {
       set #findindex %ib
       if #findcnt <> %bendagesinpack
       {
          exevent drag #findid 20
          wait 3
          exevent dropc #backpackid
          wait 7
       }
   }
}

;wait 30
if %param = norecall
   return
else
{
    if %InstantEscape
    {
        while ( #mana < #maxmana - 9 ) || ( #hits < #maxhits - 2 )
        {
              if #hits < #maxhits - 2
                 gosub curati
              sleep 10
        }
    }
    if %param = next
       gosub cambiaspot nounload
    else
        gosub recall
}
return

ok... can you explain me how please.... the first rune is my house? than? thank you..

[fnurov]

ok... can you explain me how please.... the first rune is my house? than? thank you..

yes TT

[Klose]

yes TT

...and than??? explain me better please ^^

thks

[fnurov]

...and than??? explain me better please ^^

thks

what do u want to hear? i v posted sub that should work with house not bank

[fnurov]

seems to be fastest possible searching of closet algoritm.. actualy standard min finding asd. as i said finditem 25 times is not a good idea ))

finditem %animals G_ , %searchdistance
if #findkind <> -1
{
   if #findcnt > 1
   {
      if #findrep notin 1_2_7
         set %victim #findid
      set %mdist #finddist
      for #findindex 2 #findcnt
      {
          if #finddist < %mdist && #findrep notin 1_2_7
          {
             set %mdist #finddist
             set %victim #findid
          }
      }
   }
   else
   {
       if #findrep notin 1_2_7
          set %victim #findid
   }
}

even no need to ignore. tamed creatures can be released asd

[Klose]

problems:

1) the script doesn't kill and loot the sheep (i have put a X on wool)

2) house modality------> GOODDDD!

3) 340/521 the script recall to house do put in the leather.... so earlyyyyy

4) often at delucia, after some kill, the script recall to next rune when a animals comes to me for attack... why the script does this recall??? to earlyyyy.... it should kill ALL animal in the range and than recall...

HELP

[fnurov]

problems:

1) the script doesn't kill and loot the sheep (i have put a X on wool)

2) house modality------> GOODDDD!

3) 340/521 the script recall to house do put in the leather.... so earlyyyyy

4) often at delucia, after some kill, the script recall to next rune when a animals comes to me for attack... why the script does this recall??? to earlyyyy.... it should kill ALL animal in the range and than recall...

HELP

1 dunno
3 script doesn't searches for mobs when >350. finishes killing what is very close, loots and changes position. iv made it becasue in some spots i collect many just standing on one place.
4 if u set #checkforplayers #true, script recalls whan players are nearby after killing close mobs and looting

[Klose]

1 dunno

what is dunno? what does it means?

so you have done a great job felix! toegheter with fengyr...... clap clap clap

[SirMods]

fengyr io avevo gia tolto l'accoda azioni di razor, ora ho tolto anche il setup di aprire i corpi da un tot di tiles (come hai scritto te) ma a me dopo un tot (circa dopo un 10 k di pelli) continuaa crashare forse qualche delay nello script che posso aumentare?

[fengyr]

Segnalare un bug

Visto che può capitare di trovare un bug vi do qualche consiglio su come aiutarmi a capire il problema (sono regole consigliabili per tutte le segnalazioni in generale):

1. Fondamentale: se riuscite a trovare il modo di riprodurre il bug e comunicarmelo sarebbe il metodo migliore per risolvere il problema.
   In caso non riusciate a rispettare il punto 1 potete cmq comunicarmi se:
   
2. Il bug si verifica in una versione rispetto che ad un altra.
3. Il bug avviene durante una certa determinata azione, o stato dello script (lo potete vedete dal menu statistiche)
4. Ci sono fenomeni esterni allo script che determinano l'anomalia (ad es: save, mostri non in lista ecc.)
5. Lo script non si comporta come dovrebbe: pause troppo lunghe oppure non riesce a killare o raggiungere un mob.

In generale quindi è consigliabile dare più informazioni possibili inerenti allo script e al client, per esempio se vi accorgete che lo script è condizionato dalla lag aggiungete anche il ping (scrivete -ping se usate razor), oppure fare uno screen se il pg si "incastra", insomma qualsiasi cosa utile può aiutare e velocizzare la soluzione dei problemi.
Se avrò bisogno di informazioni cercherò di contattarvi e chiedervi info, cercate di rendervi reperibili ^^

Detto questo spero che ci siano meno post possibili di questo tipo XD

Torna al Topic

[Klose]

a me crasha da morì..... (disattivate autoaccoda azioni e apri corpi da)... appena dopo poco.. anche un minuto o 8 minuti crasha... ti posso dire per aiutarti che i luoghi erano diversi l'uno dall'altro e i mob non centrano nulla.. l'unica cosa che puo entrarci è che ho attivato lo script di relogin in caso di connection lost... ora sto provando senza quello script e pare che vada... mah... per ora almeno.. ti saprò ridire meglio..

[SirMods]

fengyr oltre al problema crash irrisolto ( come mi hai spiegato te su icq stai provvedendo e di questo ti ringrazio) le modifiche fatte per il pet sono scarse ogni tano se lo perde bisognerebbe rivedere il richiamo del pet e l all guard

[fnurov]

total stability recall

sub Recall
    beginrecall:
    set %TotalRecalWait #systime + 60000
   if %nruneatt = 1
      gosub edit_stato Recallo , #spc , alla , #spc , banca
   else
      gosub edit_stato Recallo , #spc , alla , #spc , runa , #spc , %nruneatt
   set %_runenumber %nruneatt
   set %bookx 0
   set %booky 0
   set %_oldx #charposx
   set %_oldy #charposy
   set %_runex 138
   set %ymagie 180
rirecalldopofiz:
   set %runabloccata #false
   if %magie = 1
   {
   set %ymagie 145
   }
   set %_page 0
   set %_side 0
   ;pagina
   set %_page %_runenumber + 1
   set %_page %_page / 2
   ;side
    set %_num %_runenumber / 2
    set %_num %_num * 2
    if %_num = %_runenumber
       set %_side 1
    if %_side = 1
       set %_runex 298

   set  %risp #true

  set %xc 0
  set %yc 0

   set %_pagexmod %_page * 34
   set %_pagex 104
   set %_pagex %_pagex + %_pagexmod
   if %_page > 4
      set %_pagex %_pagex + 31
   recallopenagain:
   gosub atackclosemob 1
   if #CONTSIZE = 452_236 && generic_gump IN #CONTNAME
      goto bookopened
   set #LOBJECTID %bookid
   set !jindex #jindex + 1
   event macro 17 0
   set !error #scnt + 3
   set %openbookagain #false
   while #scnt < !error && %openbookagain = #false && #CONTSIZE <> 452_236 && generic_gump NOTIN #CONTNAME
   {
         set !nextjinedxend #jindex
         if !jindex <= !nextjinedxend
         {
            for !ji !jindex !nextjinedxend
            {
                scanjournal !ji
                if You_must_wait_to_perform_another_action. in #journal
                {
                   wait 1
                   set %openbookagain #true
                   break
                }
            }
            set !jindex !nextjinedxend + 1
         }
         sleep 10
   }
   if %openbookagain || #CONTSIZE <> 452_236 || generic_gump NOTIN #CONTNAME
      goto recallopenagain
   bookopened:
   set %bookx #CONTPOSX
   set %booky #CONTPOSY
   set %xc %bookx + %_pagex
   set %yc %booky + 195
   click %xc %yc
   ;gosub AntiBlock
   set %bookx #contposx
   set %booky #contposy
   set %xc %bookx + %_runex
   set %yc %booky + %ymagie
   set !jindex #jindex + 1
   while #mana < 10
   {
      sleep 10
   }
   click %xc %yc
   set !w4serr #scnt + 3
   set %nextjinedxend #jindex
   set %castagain #false
   set %runabloccata #false
   while %_oldx = #charposx && %_oldy = #charposy && #scnt < !w4serr && %castagain = #false && %runabloccata = #false
   {
         set %nextjinedxend #jindex
         if !jindex <= %nextjinedxend
         {
            for %i !jindex %nextjinedxend
            {
                scanjournal %i
                if Thou_art_too_encumbered_to_move. in #journal
                {
                   set %amounttodrop #weight - #maxweight
                   finditem %cutleather C_ , #backpackid
                   exevent drag #findid %amounttodrop
                   exevent dropg #charposx #charposy #charposz
                   set %castagain #true
                   break
                }
                if THAT_LOCATION_IS_BLOCKED in #journal
                {
                   set %runabloccata #true
                   set %risp #false
                   break
                }
                if disturbed in #journal || recovered in #journal || You_cannot_cast_a_spell_while_frozen. in #journal
                {
                   set %castagain #true
                   break
                }
            }
            set !jindex %nextjinedxend + 1
         }
         if #CONTSIZE = 452_236 && generic_gump IN #CONTNAME
            set %castagain #true
         sleep 10
   }
   if #systime > %TotalRecalWait
      goto beginrecall
   if %castagain && %_oldx = #charposx && %_oldy = #charposy && %runabloccata = #false
      goto recallopenagain
   if %runabloccata = #false
      wait 10

return %risp

[Aerial]

ciao, bello script, ma qualcosa è cambiato,ora cerca i mob, li killa apre il corpo e poi.... se ne va.... senza tagliuzzare il corpo e senza raccogliare pelli piume o chi che sia............... mi sa che qualcosa non va

[Klose]

with felix's script it doesn't kill and loot the sheep (i have put a X on wool).. other wool animals are killed but the script doesn't take the wool..

felix help me!