annuncio

Comprimi
Ancora nessun annuncio.

[EASYUO HELP] Spewy runebook mining

Comprimi
X
 
  • Filtro
  • Ora
  • Visualizza
Elimina tutto
nuovi messaggi

  • [EASYUO HELP] Spewy runebook mining

    Dopo il connection lost di ieri sera improvvisamente non crafta piu gli Showel..
    Apre il tinkeer toolas e la si ferma... non ho modificato nulla... qualcuno sa cosa possa essere successo?


    DOOM sei un forumer di M***A....peggio del capezzolo un altro pò!!!

  • #2
    stesso problema, probabilmente con gli ultimi aggiornamenti devono aver modificato qualcosa del menu del tinker tool e quindi lo script diciamo che clicca in punti diversi e non riesce a craftare... questo è forse il motivo perchè ho provato a disabilitare la funziona che crafta gli sholves e lo script funge correttamente... ci sarebbe da lavorarci su un attimo ma per mancanza di tempo ora non posso...

    Commenta


    • #3
      lo utilizzo anch'io questo script e credo che il problema sia da ricercarsi qui, più precisamente nella Sub ClickTinkerButton
      codice:
      Sub MakeShovel
         GoSub CheckEscapeStatus
         If %CheckEscapeStatus
            Return
      
         Set %_msTimeStart #sCnt2
         GoSub UpdateStatusWindow MakeShovel
      
         FindItem %TinkerType C_ , %BackpackId
         Wait 5
         If #FindKind <> -1 && #FindCnt = 1
         {
            If %UOATinkerToolKey <> N/A
            {
               Key %UOATinkerToolKey %UOATinkerToolMod
               Wait %UOATinkerToolWait
            }
            If %UOATinkerToolKey = N/A
            {
               GoSub BringUpTinkerMenu #FindId
               Wait 10
               GoSub ClickTinkerButton 30 110
               If %return
                  GoSub ClickTinkerButton 230 130
               Set %LastMadeWasShovel #false
            }
         }
         FindItem %TinkerType C_ , %BackpackId
         If #FindKind <> -1
         {
            If %UOAShovelKey <> N/A
            {
               Key %UOAShovelKey %UOAShovelMod
               Wait %UOAShovelWait
            }
            If %UOAShovelKey = N/A
            {
               GoSub BringUpTinkerMenu #FindId
               If %LastMadeWasShovel  ; If the last thing we made was a shovel, its easy!
                  GoSub ClickTinkerButton 285 410
               If ! %LastMadeWasShovel
               {
                  GoSub ClickTinkerButton 30 110
                  If %Return
                  {
                     GoSub ClickTinkerButtonNext
                     GoSub ClickTinkerButton 230 70
                  }
               }
               If %return
               {
                  Set %LastMadeWasShovel #true
                  If %MakeTwoShovels
                     GoSub ClickTinkerButton 285 410
               }
            }
            Set %_msCancelX #ContPosX + 10
            Set %_msCancelY #ContPosY + 10
            Click %_msCancelX %_msCancelY R ; Close tinker menu
         }
         GoSub RecordTiming %_msTimeStart MakeShovel
      Return
      
      ; ** ClickTinkerButton **
      Sub ClickTinkerButton
         Set %_ctbX %1 + #ContPosX
         Set %_ctbY %2 + #ContPosY
         Click %_ctbX %_ctbY
         Gosub waitForSysVar contSize <> 530_437 30
         Gosub waitForSysVar contSize = 530_437 30
         Wait 5
      Return
      
      ; ** ClickTinkerButtonNoWait **
      Sub ClickTinkerButtonNext
         Set %_ctbnX 385 + #ContPosX
         Set %_ctbnY 270 + #ContPosY
         Click %_ctbnX %_ctbnY F
         Wait 2s
      Return

      Commenta


      • #4
        Nessuno riesce a risolvere?
        Fai click QUI e scoprirai il mondo EOS!

        Commenta


        • #5
          qualcuno che ha testato il minerscorna sà se dà lo stesso problema?

          Commenta


          • #6
            da quel che ho visto nella sezione bug, il menu tinker è sballato...

            Premettendo che non ho grande esperienza, quindi prima di ogni eventuale modifica, salvate una copia dello script
            Provate a sostituire il pezzo di codice incriminato con una macro razor per il craft...
            Domani cerco in giro xkè mi pare di avere degli script che usano le macro di razor, cosi vedo come si chiamano...

            edit:
            per chiamare la macro, sembra basti settare la macro su un tasto (con razor) e poi editare il codice mettendo key tasto.

            es: se si binda la macro su F12 nello script al posto di tutta quella sbrodolata (la sub MakeShovel) mettete:
            key F12
            wait 10s (per evitare che lo script vada per i fatti suoi mentre la macro sta andando

            ...
            se funziona è una cosa molto rozza...
            Ultima modifica di doomer; 14-03-2011, 23:48.
            ASTA ring da mage 1/3 - lrc - int - sdi
            COMPRO leafblade semplice (3props)

            Ayra AoS

            Commenta


            • #7
              Il minerscorna funziona perfettamente
              Icq 165095609


              Io NON vendo item per soldi veri...

              Commenta


              • #8
                qui mi viene da pensare che c'è qualcosa che non và ho rincontrollato 10 volte ogni singolo click dello script ho messo a lato la sua funzione combaciano perfettamente tutti qualcuno ha qualche idea su cosa può essere? si accettano anche idee strambalate
                codice:
                ;*****************************************
                ;******** Tinkering
                ;*****************************************
                ; ** FindShovel **
                ; Tries to find a shovel, if non are found will initial
                ; tinkering or recall back to home base
                Sub FindShovel
                   GoSub UpdateStatusWindow FindShovel
                   FindShovelStart:
                      GoSub CheckEscapeStatus
                      If %CheckEscapeStatus
                         Return
                
                      GoSub FindUsableMiningTool %BackpackId
                      If #FindId = X
                      {
                         if %UseTinkering
                         {
                            If %TinkerSkill >= 900
                               Set %_fsIngotsNeeded 10
                            Else
                               Set %_fsIngotsNeeded 20
                            FindItem %IngotType C_ , %BackpackId
                            If #FindKind = -1 || #FindStack < %_fsIngotsNeeded
                               GoSub UnloadAtBase #false
                            GoSub MakeShovel
                            Goto FindShovelStart
                         }
                         if ! %UseTinkering
                         {
                            GoSub UnloadAtBase #false
                            Goto FindShovelStart
                         }
                      }
                Return
                
                ; ** MakeShovel **
                ; Will make 1-2 shovels using tinkering - Using the menus or
                ; UOA macros if they have been setup
                Sub MakeShovel
                   GoSub CheckEscapeStatus
                   If %CheckEscapeStatus
                      Return
                
                   Set %_msTimeStart #sCnt2
                   GoSub UpdateStatusWindow MakeShovel
                
                   FindItem %TinkerType C_ , %BackpackId
                   Wait 5
                   If #FindKind <> -1 && #FindCnt = 1
                   {
                      If %UOATinkerToolKey <> N/A
                      {
                         Key %UOATinkerToolKey %UOATinkerToolMod
                         Wait %UOATinkerToolWait
                      }
                      If %UOATinkerToolKey = N/A
                      {
                         GoSub BringUpTinkerMenu #FindId
                         Wait 10
                         GoSub ClickTinkerButton 30 110      ; pulsante tools
                         If %return
                            GoSub ClickTinkerButton 230 70   ; pulsante shovel
                         Set %LastMadeWasShovel #false
                      }
                   }
                   FindItem %TinkerType C_ , %BackpackId
                   If #FindKind <> -1
                   {
                      If %UOAShovelKey <> N/A
                      {
                         Key %UOAShovelKey %UOAShovelMod
                         Wait %UOAShovelWait
                      }
                      If %UOAShovelKey = N/A
                      {
                         GoSub BringUpTinkerMenu #FindId
                         If %LastMadeWasShovel  ; If the last thing we made was a shovel, its easy!
                            GoSub ClickTinkerButton 285 410  ;    pulsante make last
                         If ! %LastMadeWasShovel
                         {
                            GoSub ClickTinkerButton 30 110  ; pulsante tools
                            If %Return
                            {
                               GoSub ClickTinkerButtonNext
                               GoSub ClickTinkerButton 230 70  ; pulsante  shovel
                            }
                         }
                         If %return
                         {
                            Set %LastMadeWasShovel #true
                            If %MakeTwoShovels
                               GoSub ClickTinkerButton 285 410 ; 285 410 pulsante make last
                         }
                      }
                      Set %_msCancelX #ContPosX + 10
                      Set %_msCancelY #ContPosY + 10
                      Click %_msCancelX %_msCancelY R ; Close tinker menu
                   }
                   GoSub RecordTiming %_msTimeStart MakeShovel
                Return
                
                ; ** ClickTinkerButton **
                Sub ClickTinkerButton
                   Set %_ctbX %1 + #ContPosX
                   Set %_ctbY %2 + #ContPosY
                   Click %_ctbX %_ctbY
                   Gosub waitForSysVar contSize <> 530_437 30
                   Gosub waitForSysVar contSize = 530_437 30
                   Wait 5
                Return
                
                ; ** ClickTinkerButtonNoWait **
                Sub ClickTinkerButtonNext    ; pulsante next page corretto
                   Set %_ctbnX 385 + #ContPosX
                   Set %_ctbnY 270 + #ContPosY
                   Click %_ctbnX %_ctbnY F
                   Wait 2s
                Return

                Commenta


                • #9
                  a sto punto marino sistema anche questo

                  Commenta

                  Sto operando...
                  X