sundries()
Func sundries()
   Global $goto1 = "sundries"
   Global $goto2 = "openanv100"
   ToolTip("Armor Merchant", 1663, 291)
   Do
      safecheck()
   Until PixelGetColor(962, 469) = 0xB39534 ;sprawdza czy otwarte jest okno dialogowe z sundries
EndFunc

Func openanv100()
      Global $goto1 = "openanv100"
      Global $goto2 = "alarm"
      Opt("SendKeyDownDelay", 100)
      SEND("{ESC}")
      SEND("b")
      SEND("b")
      SEND("b")
      Opt("SendKeyDownDelay", 5)
      sleep(150)
      MouseMove(963, 509,0)     ; otwiera
      fastmouseright()
      sleep(150)
EndFunc

   Func safecheck()
   sleep(20)
   $windowcheck +=1
   If $windowcheck = 25 Then
      call($goto1)
   ElseIf $windowcheck = 50 Then
      Global $windowcheck = 0
      call($goto2)
   EndIf
EndFunc