Let>TAB=0
  Let>working=1

  Let>foundDuelist=0
  Let>foundVagaboundo=0
  Let>foundLegendary=0
  Let>foundBonus=0

  Let>timeout=15

  Let>confirmX=270
  Let>confirmY=960

  Let>autoDuel=0
  Let>duelStart=0
  Let>duelOver=0
  Let>NEXT=0
  Let>ok=0

  // MouseMoveRel>450,150


  SRT>findDuelist
    Let>foundDuelist=0


    FindImagePos>%BMP_DIR%\image_3.bmp,WINDOW:Nox App Player,0.50,1,XArr,YArr,distance1,CCOEFF
    If>distance1>0
      MouseMove>XArr_0,YArr_0
      Let>foundDuelist=1
    EndIf

    If>foundDuelist=0
      FindImagePos>%BMP_DIR%\image_1.bmp,WINDOW:Nox App Player,0.53,1,XArr,YArr,distance2,CCOEFF
      If>distance2>0
        MouseMove>XArr_0,YArr_0
        Let>foundDuelist=1
      EndIf
    EndIf

    If>foundDuelist=0
      FindImagePos>%BMP_DIR%\image_11.bmp,WINDOW:Nox App Player,0.53,1,XArr,YArr,distance2,CCOEFF
      If>distance2>0
        MouseMove>XArr_0,YArr_0
        Let>foundDuelist=1
      EndIf
    EndIf

    If>foundDuelist=0
      FindImagePos>%BMP_DIR%\image_9.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        Let>foundDuelist=1
      Endif
    Endif


    FindImagePos>%BMP_DIR%\image_6.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
    If>NumFound>0
      MouseMove>XArr_0,YArr_0
      Let>foundDuelist=1
      Let>foundVagaboundo=1
      lClick
      Wait>1
      lClick
      WaitScreenImage>%BMP_DIR%\ok.bmp,0.7,CCOEFF
      FindImagePos>%BMP_DIR%\ok.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        LClick
      EndIf
    Endif

    FindImagePos>%BMP_DIR%\image_7.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
    If>NumFound>0
      MouseMove>XArr_0,YArr_0
      Let>foundDuelist=1
      Let>foundVagaboundo=1
      lClick
      Wait>1
      lClick
      WaitScreenImage>%BMP_DIR%\ok.bmp,0.7,CCOEFF
      FindImagePos>%BMP_DIR%\ok.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        LClick
      EndIf
    Endif


  END>findDuelist

  SRT>nextTab

  Let>foundTab=0

  If>TAB=0
    If>foundTab=0
      FindImagePos>%BMP_DIR%\tab1.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        Let>foundTab=1
        Let>TAB=TAB+1
      Endif
    Endif
  Endif

  If>TAB=1
    If>foundTab=0
      FindImagePos>%BMP_DIR%\tab2.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        Let>foundTab=1
        Let>TAB=TAB+1
      Endif
    Endif
  Endif

  If>TAB=2
    If>foundTab=0
      FindImagePos>%BMP_DIR%\tab3.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        Let>foundTab=1
        Let>TAB=TAB+1
      Endif
    Endif
  Endif

  If>TAB=3
    If>foundTab=0
      FindImagePos>%BMP_DIR%\tab0.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        Let>foundTab=1
        Let>TAB=0
      Endif
    Endif
  Endif

  LClick
  Wait>1
END>nextTab

  SRT>startDuel
      Let>duelStart=0
      While>duelStart=0
          Wait>1

          If>timeout=0
           Wait>0.5
           SetFocus>Nox App Player
           Wait>0.5
           MouseMoveRel>270,900
           SetFocus>Nox App Player
           LClick
           Let>duelStart=1
           Let>timeout=15
          EndIf

          FindImagePos>%BMP_DIR%\duel.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
          If>NumFound>0
            MouseMove>XArr_0,YArr_0
            Let>timeout=15
            Let>duelStart=1
            Wait>1
          EndIf
          LClick

      EndWhile
  END>startDuel

  SRT>startAuto
      WaitScreenImage>%BMP_DIR%\auto.bmp,0.7,CCOEFF
      Wait>0.5
      FindImagePos>%BMP_DIR%\auto.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        Wait>0.5
        LClick
      EndIf

  END>startAuto

  SRT>solveDuelist
    Let>buttonsSolved=0
    Wait>5
    WaitScreenImage>%BMP_DIR%\ok.bmp,0.7,CCOEFF
    SetFocus>Nox App Player
    While>buttonsSolved=0
      MouseMoveRel>%confirmX%,%confirmY%
      LClick
      Wait>1
      FindImagePos>%BMP_DIR%\image_10.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        Let>buttonsSolved=1
      EndIf
    EndWhile

  End>solveDuelist


  SRT>findBonus

    FindImagePos>%BMP_DIR%\image_4.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
    If>NumFound>0
      MouseMove>XArr_0,YArr_0
      LClick
      WaitScreenImage>%BMP_DIR%\ok.bmp,0.7,CCOEFF
      FindImagePos>%BMP_DIR%\ok.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        LClick
      Endif
    Endif

    FindImagePos>%BMP_DIR%\image_5.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
    If>NumFound>0
      MouseMove>XArr_0,YArr_0
      LClick
      WaitScreenImage>%BMP_DIR%\ok.bmp,0.7,CCOEFF
      FindImagePos>%BMP_DIR%\ok.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF
      If>NumFound>0
        MouseMove>XArr_0,YArr_0
        LClick
      Endif
    Endif

    Wait>2

   END>findBonus

  //// START
  //// FindImagePos>%BMP_DIR%\image_11.bmp,WINDOW:Nox App Player,0.7,1,XArr,YArr,NumFound,CCOEFF

  While>working=1

    Gosub>findDuelist
    If>foundDuelist=1
      Gosub>startDuel
      Gosub>startAuto
      Gosub>solveDuelist
    EndIf

      if>foundDuelist=0
        // Gosub>findBonus
        SetFocus>Nox App Player
        Gosub>nextTab
      EndIf
  EndWhile