[Goldfarming] Dank Celler [AutoIT Script] [DH based on chancitys] [800x600] menu

Shout-Out

User Tag List

Page 15 of 19 FirstFirst ... 111213141516171819 LastLast
Results 211 to 225 of 273
  1. #211
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by Peage View Post
    here is it.

    ok here you go

    find the line
    Code:
    	  $SlotPixelLine = PixelSearch(Round($slotLineTopX + $i * $slotLineOffSet * $x_ratio), Round($slotLineTopY  + $j * $slotLineOffSet * $y_ratio), Round($slotLineBotX + $i * $slotLineOffSet * $x_ratio), Round($slotLineBotY + $j * $slotLineOffSet * $y_ratio), 0x35251C,0)
    and replace it with
    Code:
    	  $SlotPixelLine = PixelSearch(Round($slotLineTopX + $i * $slotLineOffSet * $x_ratio), Round($slotLineTopY  + $j * $slotLineOffSet * $y_ratio), Round($slotLineBotX + $i * $slotLineOffSet * $x_ratio), Round($slotLineBotY + $j * $slotLineOffSet * $y_ratio), 0x34241C,1)

    [Goldfarming] Dank Celler [AutoIT Script] [DH based on chancitys] [800x600]
  2. #212
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by jahwarrior28 View Post
    Here's a pic: imgur: the simple image sharer

    Once you find the correct color code, I will try to replicate. Then maybe I won't be so helpless! I'm using these autoit bots for an excuse to get into coding.
    This looked like the best color according to your screenshot but I cant guarantee it for some reason your colors were weird lol

    0x302310, 2

    so you need to find the line similiar to this and paste this over it
    Code:
     $SlotPixelLine = PixelSearch(Round($slotLineTopX + $i * $slotLineOffSet * $x_ratio), Round($slotLineTopY  + $j * $slotLineOffSet * $y_ratio), Round($slotLineBotX + $i * $slotLineOffSet * $x_ratio), Round($slotLineBotY + $j * $slotLineOffSet * $y_ratio), 0x302310, 2)

    taking meds and then taking a nap will check back when i wake up
    Last edited by stealthingyew; 07-19-2012 at 11:03 AM.

  3. #213
    Peage's Avatar Member
    Reputation
    1
    Join Date
    Jul 2012
    Posts
    27
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    will change this codewhen iam athome , why should i change just this code color?

  4. #214
    jahwarrior28's Avatar Sergeant
    Reputation
    2
    Join Date
    Jul 2012
    Posts
    40
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by Peage View Post
    will change this codewhen iam athome , why should i change just this code color?
    I am having the same problem (check the previous few pages) and it seems to be caused by the color of the pixels on the line between inventory slots (from my limited understanding).

    Stealthingyew: I tried the numbers you gave me, but it still only managed the top row. I played with the second number and that gave me better results, but it was still just managing random inventory slots. I'm still trying to figure out why my pixel colors would be messed up.

  5. #215
    Peage's Avatar Member
    Reputation
    1
    Join Date
    Jul 2012
    Posts
    27
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by stealthingyew View Post
    ok here you go

    find the line
    Code:
    	  $SlotPixelLine = PixelSearch(Round($slotLineTopX + $i * $slotLineOffSet * $x_ratio), Round($slotLineTopY  + $j * $slotLineOffSet * $y_ratio), Round($slotLineBotX + $i * $slotLineOffSet * $x_ratio), Round($slotLineBotY + $j * $slotLineOffSet * $y_ratio), 0x35251C,0)
    and replace it with
    Code:
    	  $SlotPixelLine = PixelSearch(Round($slotLineTopX + $i * $slotLineOffSet * $x_ratio), Round($slotLineTopY  + $j * $slotLineOffSet * $y_ratio), Round($slotLineBotX + $i * $slotLineOffSet * $x_ratio), Round($slotLineBotY + $j * $slotLineOffSet * $y_ratio), 0x34241C,1)
    It's nice , pretty good now. Can you explain me , why just 1 pixelcolor to change make it work :O? , also i have running my bot 2 hours ; where you see gold per hours etc , i have got a messagr "" salvage freeze , bot paused etc etc sorry" can we make somethink for that not appens? dont care if the bot salvage by a mistake one items :d it's really hard to wake up and read this message :d.

  6. #216
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by Peage View Post
    It's nice , pretty good now. Can you explain me , why just 1 pixelcolor to change make it work :O? , also i have running my bot 2 hours ; where you see gold per hours etc , i have got a messagr "" salvage freeze , bot paused etc etc sorry" can we make somethink for that not appens? dont care if the bot salvage by a mistake one items :d it's really hard to wake up and read this message :d.
    The pixel tells the bot if the line between bags is there so it can tell if the item is 1 or 2 slots. It couldnt read the old pixel color so it thought the rows were just 1 big row since it couldnt find it.

    The salvage from freeze thing is probably due to missing the 2nd link to the tesseract program in your goldread.au3 so link me your goldread.au3


    Originally Posted by jahwarrior28 View Post
    I am having the same problem (check the previous few pages) and it seems to be caused by the color of the pixels on the line between inventory slots (from my limited understanding).

    Stealthingyew: I tried the numbers you gave me, but it still only managed the top row. I played with the second number and that gave me better results, but it was still just managing random inventory slots. I'm still trying to figure out why my pixel colors would be messed up.
    To be honest I am completely unsure on your screen all the pixels are like completely different try giving me a screenshot with just 1 unid rare in the bag in like the 3rd row or something and let me see what it looks like


    Currently working on:
    1.Some of the click points for cellar found seem to be causing some small issues/few missing of the cellar so I am re-recording these and will post and update version.
    2. Working on a fix for the slotlinepixel color.(issue with only stash/salvage/vendor first row)
    3. Going to add in movement speed to help those with weird/random ammounts of movement speed get more accurate find cellar.
    4. Thinking of possibly adding some smokescreen to town portion to speed up the run times from stash to salvage to vendor but not 100% positive on doing this yet.
    Last edited by stealthingyew; 07-19-2012 at 04:37 PM.

  7. #217
    Peage's Avatar Member
    Reputation
    1
    Join Date
    Jul 2012
    Posts
    27
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by stealthingyew View Post
    link me your goldread.au3




    To be honest I am completely unsure on your screen all the pixels are like completely different try giving me a screenshot with just 1 unid rare in the bag in like the 3rd row or something and let me see what it looks like
    #include-once
    #Include <Array.au3>
    #Include <File.au3>
    #include <GDIPlus.au3>
    #include <ScreenCapture.au3>
    #include <WinAPI.au3>
    #include <ScrollBarConstants.au3>
    #include <WindowsConstants.au3>
    #Include <GuiComboBox.au3>
    #Include <GuiListBox.au3>



    #EndRegion Header
    #Region Global Variables and Constants
    Global $last_capture
    Global $tesseract_temp_path = "C:\Tesseract-OCR\"
    #EndRegion Global Variables and Constants
    #Region Core functions
    ; #FUNCTION# ;===============================================================================
    ;
    ; Name...........: _TesseractTempPathSet()
    ; Description ...: Sets the location where Tesseract functions temporary store their files.
    ; You must have read and write access to this location.
    ; The default location is "C:\".
    ; Syntax.........: _TesseractTempPathSet($temp_path)
    ; Parameters ....: $temp_path - The path to use for temporary file storage.
    ; This path must not contain any spaces (see "Remarks" below).
    ; Return values .: On Success - Returns 1.
    ; On Failure - Returns 0.
    ; Author ........: seangriffin
    ; Modified.......:
    ; Remarks .......: The current version of Tesseract doesn't support paths with spaces.
    ; Related .......:
    ; Link ..........:
    ; Example .......: No
    ;
    ; ;=============================================================================== ===========
    func _TesseractTempPathSet($temp_path)

    $tesseract_temp_path = $temp_path

    Return 1
    EndFunc

    ; #FUNCTION# ;===============================================================================
    ;
    ; Name...........: _TesseractScreenCapture()
    ; Description ...: Captures text from the screen.
    ; Syntax.........: _TesseractScreenCapture($get_last_capture = 0, $delimiter = "", $cleanup = 1, $scale = 2, $left_indent = 0, $top_indent = 0, $right_indent = 0, $bottom_indent = 0, $show_capture = 0)
    ; Parameters ....: $get_last_capture - Retrieve the text of the last capture, rather than
    ; performing another capture. Useful if the text in
    ; the window or control hasn't changed since the last capture.
    ; 0 = do not retrieve the last capture (default)
    ; 1 = retrieve the last capture
    ; $delimiter - Optional: The string that delimits elements in the text.
    ; A string of text will be returned if this isn't provided.
    ; An array of delimited text will be returned if this is provided.
    ; Eg. Use @CRLF to return the items of a listbox as an array.
    ; $cleanup - Optional: Remove invalid text recognised
    ; 0 = do not remove invalid text
    ; 1 = remove invalid text (default)
    ; $scale - Optional: The scaling factor of the screenshot prior to text recognition.
    ; Increase this number to improve accuracy.
    ; The default is 2.
    ; $iLeft - x-Left coordinate
    ; $iTop - y-Top coordinate
    ; $iRight - x-Right coordinate
    ; $iBottom - y-Bottom coordinate
    ; $show_capture - Display screenshot and text captures
    ; (for debugging purposes).
    ; 0 = do not display the screenshot taken (default)
    ; 1 = display the screenshot taken and exit
    ; Return values .: On Success - Returns an array of text that was captured.
    ; On Failure - Returns an empty array.
    ; Author ........: seangriffin
    ; Modified.......:
    ; Remarks .......: Use the default values for first time use. If the text recognition accuracy is low,
    ; I suggest setting $show_capture to 1 and rerunning. If the screenshot of the
    ; window or control includes borders or erroneous pixels that may interfere with
    ; the text recognition process, then use $left_indent, $top_indent, $right_indent and
    ; $bottom_indent to adjust the portion of the screen being captured, to
    ; exclude these non-textural elements.
    ; If text accuracy is still low, increase the $scale parameter. In general, the higher
    ; the scale the clearer the font and the more accurate the text recognition.
    ; Related .......:
    ; Link ..........:
    ; Example .......: No
    ;
    ; ;=============================================================================== ===========
    func _TesseractScreenCapture($get_last_capture = 1, $delimiter = "", $cleanup = 1, $scale = 2, $iLeft = 0, $iTop = 0, $iRight = 1, $iBottom = 1, $show_capture = 0)

    Local $tInfo
    dim $aArray, $final_ocr[1], $xyPos_old = -1, $capture_scale = 3
    Local $tSCROLLINFO = DllStructCreate($tagSCROLLINFO)
    DllStructSetData($tSCROLLINFO, "cbSize", DllStructGetSize($tSCROLLINFO))
    DllStructSetData($tSCROLLINFO, "fMask", $SIF_ALL)

    if $last_capture = "" Then

    $last_capture = ObjCreate("Scripting.Dictionary")
    EndIf

    ; if last capture is requested, and one exists.
    if $get_last_capture = 1 and $last_capture.item(0) <> "" Then

    return $last_capture.item(0)
    EndIf

    $capture_filename = _TempFile($tesseract_temp_path, "~", ".tif")
    $ocr_filename = StringLeft($capture_filename, StringLen($capture_filename) - 4)
    $ocr_filename_and_ext = $ocr_filename & ".txt"

    CaptureToTIFF("", "", "", $capture_filename, $scale, $iLeft , $iTop , $iRight , $iBottom )

    ShellExecuteWait("C:\Program Files (x86)\Tesseract-OCR\tesseract.exe", $capture_filename & " " & $ocr_filename, "", "", @SW_HIDE) ;edit this location

    ; If no delimter specified, then return a string
    if StringCompare($delimiter, "") = 0 Then

    $final_ocr = FileRead($ocr_filename_and_ext)
    Else

    _FileReadToArray($ocr_filename_and_ext, $aArray)
    _ArrayDelete($aArray, 0)

    ; Append the recognised text to a final array
    _ArrayConcatenate($final_ocr, $aArray)
    EndIf

    ; If the captures are to be displayed
    if $show_capture = 1 Then

    GUICreate("Tesseract Screen Capture. Note: image displayed is not to scale", 640, 480, 0, 0, $WS_SIZEBOX + $WS_SYSMENU) ; will create a dialog box that when displayed is centered

    GUISetBkColor(0xE0FFFF)

    ; $Obj1 = ObjCreate("Preview.Preview.1")
    ; $Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 640, 480)
    ; $Obj1.ShowFile ($capture_filename, 1)

    $Obj1 = ObjCreate("WMPlayer.OCX") ;NEW OBJECT REPLACING ORIGINAL IN UDF
    $Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 640, 480)
    With $Obj1
    .URL = $capture_filename
    .fullScreen = True
    .windowlessVideo = True
    .stretchToFit = True
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"; none / mini full
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100; 0 - 100
    .settings.Balance = 0; -100 to 100
    EndWith

    GUISetState()

    if IsArray($final_ocr) Then

    _ArrayDisplay($aArray, "Tesseract Text Capture")
    Else

    MsgBox(0, "Tesseract Text Capture", $final_ocr)
    EndIf

    GUIDelete()
    EndIf

    FileDelete($ocr_filename & ".*")

    ; Cleanup
    if IsArray($final_ocr) And $cleanup = 1 Then

    ; Cleanup the items
    for $final_ocr_num = 1 to (UBound($final_ocr)-1)

    ; Remove erroneous characters
    $final_ocr[$final_ocr_num] = StringReplace($final_ocr[$final_ocr_num], ".", "")
    $final_ocr[$final_ocr_num] = StringReplace($final_ocr[$final_ocr_num], "'", "")
    $final_ocr[$final_ocr_num] = StringReplace($final_ocr[$final_ocr_num], ",", "")
    $final_ocr[$final_ocr_num] = StringStripWS($final_ocr[$final_ocr_num], 3)
    Next

    ; Remove duplicate and blank items
    for $each in $final_ocr

    $found_item = _ArrayFindAll($final_ocr, $each)

    ; Remove blank items
    if IsArray($found_item) Then
    if StringCompare($final_ocr[$found_item[0]], "") = 0 Then

    _ArrayDelete($final_ocr, $found_item[0])
    EndIf
    EndIf

    ; Remove duplicate items
    for $found_item_num = 2 to UBound($found_item)

    _ArrayDelete($final_ocr, $found_item[$found_item_num-1])
    Next
    Next
    EndIf

    ; Store a copy of the capture
    if $last_capture.item(0) = "" Then

    $last_capture.item(0) = $final_ocr
    EndIf

    Return $final_ocr
    EndFunc

    func _TesseractGoldCapture($get_last_capture = 0, $delimiter = "", $cleanup = 1, $scale = 2, $iLeft = 0, $iTop = 0, $iRight = 1, $iBottom = 1, $show_capture = 0)

    Local $tInfo
    dim $aArray, $final_ocr[1], $xyPos_old = -1, $capture_scale = 3
    Local $tSCROLLINFO = DllStructCreate($tagSCROLLINFO)
    DllStructSetData($tSCROLLINFO, "cbSize", DllStructGetSize($tSCROLLINFO))
    DllStructSetData($tSCROLLINFO, "fMask", $SIF_ALL)

    if $last_capture = "" Then

    $last_capture = ObjCreate("Scripting.Dictionary")
    EndIf

    ; if last capture is requested, and one exists.
    if $get_last_capture = 1 and $last_capture.item(0) <> "" Then

    return $last_capture.item(0)
    EndIf

    $capture_filename = _TempFile($tesseract_temp_path, "~", ".tif")
    $ocr_filename = StringLeft($capture_filename, StringLen($capture_filename) - 4)
    $ocr_filename_and_ext = $ocr_filename & ".txt"

    CaptureToTIFF("", "", "", $capture_filename, $scale, $iLeft , $iTop , $iRight , $iBottom )

    ShellExecuteWait("C:\Program Files (x86)\Tesseract-OCR\tesseract.exe", $capture_filename & " " & $ocr_filename &" nobatch digits", "", "", @SW_HIDE) ;edit this location

    ; If no delimter specified, then return a string
    if StringCompare($delimiter, "") = 0 Then

    $final_ocr = FileRead($ocr_filename_and_ext)
    Else

    _FileReadToArray($ocr_filename_and_ext, $aArray)
    _ArrayDelete($aArray, 0)

    ; Append the recognised text to a final array
    _ArrayConcatenate($final_ocr, $aArray)
    EndIf

    ; If the captures are to be displayed
    if $show_capture = 1 Then

    GUICreate("Tesseract Screen Capture. Note: image displayed is not to scale", 640, 480, 0, 0, $WS_SIZEBOX + $WS_SYSMENU) ; will create a dialog box that when displayed is centered

    GUISetBkColor(0xE0FFFF)

    ; $Obj1 = ObjCreate("Preview.Preview.1")
    ; $Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 640, 480)
    ; $Obj1.ShowFile ($capture_filename, 1)

    $Obj1 = ObjCreate("WMPlayer.OCX") ;NEW OBJECT REPLACING ORIGINAL IN UDF
    $Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 640, 480)
    With $Obj1
    .URL = $capture_filename
    .fullScreen = True
    .windowlessVideo = True
    .stretchToFit = True
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"; none / mini full
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100; 0 - 100
    .settings.Balance = 0; -100 to 100
    EndWith

    GUISetState()

    if IsArray($final_ocr) Then

    _ArrayDisplay($aArray, "Tesseract Text Capture")
    Else

    MsgBox(0, "Tesseract Text Capture", $final_ocr)
    EndIf

    GUIDelete()
    EndIf

    FileDelete($ocr_filename & ".*")

    ; Cleanup
    if IsArray($final_ocr) And $cleanup = 1 Then

    ; Cleanup the items
    for $final_ocr_num = 1 to (UBound($final_ocr)-1)

    ; Remove erroneous characters
    $final_ocr[$final_ocr_num] = StringReplace($final_ocr[$final_ocr_num], ".", "")
    $final_ocr[$final_ocr_num] = StringReplace($final_ocr[$final_ocr_num], "'", "")
    $final_ocr[$final_ocr_num] = StringReplace($final_ocr[$final_ocr_num], ",", "")
    $final_ocr[$final_ocr_num] = StringStripWS($final_ocr[$final_ocr_num], 3)
    Next

    ; Remove duplicate and blank items
    for $each in $final_ocr

    $found_item = _ArrayFindAll($final_ocr, $each)

    ; Remove blank items
    if IsArray($found_item) Then
    if StringCompare($final_ocr[$found_item[0]], "") = 0 Then

    _ArrayDelete($final_ocr, $found_item[0])
    EndIf
    EndIf

    ; Remove duplicate items
    for $found_item_num = 2 to UBound($found_item)

    _ArrayDelete($final_ocr, $found_item[$found_item_num-1])
    Next
    Next
    EndIf

    ; Store a copy of the capture
    if $last_capture.item(0) = "" Then

    $last_capture.item(0) = $final_ocr
    EndIf

    Return $final_ocr
    EndFunc


    ; #FUNCTION# ;===============================================================================
    ;
    ; Name...........: CaptureToTIFF()
    ; Description ...: Captures an image of the screen, a window or a control, and saves it to a TIFF file.
    ; Syntax.........: CaptureToTIFF($win_title = "", $win_text = "", $ctrl_id = "", $sOutImage = "", $scale = 1, $left_indent = 0, $top_indent = 0, $right_indent = 0, $bottom_indent = 0)
    ; Parameters ....: $win_title - The title of the window to capture an image of.
    ; $win_text - Optional: The text of the window to capture an image of.
    ; $ctrl_id - Optional: The ID of the control to capture an image of.
    ; An image of the window will be returned if one isn't provided.
    ; $sOutImage - The filename to store the image in.
    ; $scale - Optional: The scaling factor of the capture.
    ; $iLeft - x-Left coordinate
    ; $iTop - y-Top coordinate
    ; $iRight - x-Right coordinate
    ; $iBottom - y-Bottom coordinate
    ; $bottom_indent - A number of pixels to indent the screen capture from the
    ; bottom of the window or control.
    ; Return values .: None
    ; Author ........: seangriffin
    ; Modified.......:
    ; Remarks .......:
    ; Related .......:
    ; Link ..........:
    ; Example .......: No
    ;
    ; ;=============================================================================== ===========
    Func CaptureToTIFF($win_title = "", $win_text = "", $ctrl_id = "", $sOutImage = "", $scale = 1, $iLeft = 0, $iTop = 0, $iRight = 1, $iBottom = 1)

    Local $hWnd, $hwnd2, $hDC, $hBMP, $hImage1, $hGraphic, $CLSID, $tParams, $pParams, $tData, $i = 0, $hImage2, $pos[4]
    Local $Ext = StringUpper(StringMid($sOutImage, StringInStr($sOutImage, ".", 0, -1) + 1))
    Local $giTIFColorDepth = 24
    Local $giTIFCompression = $GDIP_EVTCOMPRESSIONNONE

    ; If capturing a control
    if StringCompare($ctrl_id, "") <> 0 Then

    $hwnd2 = ControlGetHandle($win_title, $win_text, $ctrl_id)
    $pos[0] = 0
    $pos[1] = 0
    $pos[2] = $iRight - $iLeft
    $pos[3] = $iBottom - $iTop
    Else

    ; If capturing a window
    if StringCompare($win_title, "") <> 0 Then

    $hwnd2 = WinGetHandle($win_title, $win_text)
    $pos[0] = 0
    $pos[1] = 0
    $pos[2] = $iRight - $iLeft
    $pos[3] = $iBottom - $iTop
    Else

    ; If capturing the desktop
    $hwnd2 = ""
    $pos[0] = 0
    $pos[1] = 0
    $pos[2] = $iRight - $iLeft
    $pos[3] = $iBottom - $iTop
    EndIf
    EndIf

    ; Capture an image of the window / control
    if IsHWnd($hwnd2) Then

    WinActivate($win_title, $win_text)
    $hBitmap2 = _ScreenCapture_CaptureWnd("", $hwnd2, $iTop, $iRight, $iBottom, False)
    Else

    $hBitmap2 = _ScreenCapture_Capture("", $iLeft, $iTop, $iRight, $iBottom, False)
    EndIf

    _GDIPlus_Startup ()

    ; Convert the image to a bitmap
    $hImage2 = _GDIPlus_BitmapCreateFromHBITMAP ($hBitmap2)

    $hWnd = _WinAPI_GetDesktopWindow()
    $hDC = _WinAPI_GetDC($hWnd)
    $hBMP = _WinAPI_CreateCompatibleBitmap($hDC, $pos[2] * $scale , $pos[3] * $scale)

    _WinAPI_ReleaseDC($hWnd, $hDC)
    $hImage1 = _GDIPlus_BitmapCreateFromHBITMAP ($hBMP)
    $hGraphic = _GDIPlus_ImageGetGraphicsContext($hImage1)
    _GDIPLus_GraphicsDrawImageRect($hGraphic, $hImage2, 0 , 0 , $pos[2] * $scale, $pos[3] * $scale)
    $CLSID = _GDIPlus_EncodersGetCLSID($Ext)

    ; Set TIFF parameters
    $tParams = _GDIPlus_ParamInit(2)
    $tData = DllStructCreate("int ColorDepth;int Compression")
    DllStructSetData($tData, "ColorDepth", $giTIFColorDepth)
    DllStructSetData($tData, "Compression", $giTIFCompression)
    _GDIPlus_ParamAdd($tParams, $GDIP_EPGCOLORDEPTH, 1, $GDIP_EPTLONG, DllStructGetPtr($tData, "ColorDepth"))
    _GDIPlus_ParamAdd($tParams, $GDIP_EPGCOMPRESSION, 1, $GDIP_EPTLONG, DllStructGetPtr($tData, "Compression"))
    If IsDllStruct($tParams) Then $pParams = DllStructGetPtr($tParams)

    ; Save TIFF and cleanup
    _GDIPlus_ImageSaveToFileEx($hImage1, $sOutImage, $CLSID, $pParams)
    _WinAPI_DeleteObject ($hBitmap2)
    _GDIPlus_ImageDispose($hImage1)
    _GDIPlus_ImageDispose($hImage2)
    _GDIPlus_GraphicsDispose ($hGraphic)
    _WinAPI_DeleteObject($hBMP)
    _GDIPlus_Shutdown()
    EndFunc
    red = what i have change.

    Else , my bot dont sell/stash/salvage all items that i want ,

    Here is my data about that :

    [Anal Loot]
    Stash Rare=60
    Salvage Rare=64
    Vendor Rare=59
    Stash Magic=64
    Salvage Magic=60
    Vendor Magic=59
    I want to stash all Rare>=60
    I want to vendor all Rare <= 60
    I want to salvage Rare=0 ( nothink )

    I want to vendor magic<=59
    i want to salvage magic >=60
    I want to stash magic=0 ( nothink )

    I am completely out with AutoIT , i just know C language.

    I will try with this config :

    [Anal Loot]
    Stash Rare=63
    Salvage Rare=64
    Vendor Rare=59
    Stash Magic=64
    Salvage Magic=63
    Vendor Magic=59
    Last edited by Peage; 07-19-2012 at 04:30 PM.

  8. #218
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by Peage View Post
    red = what i have change.

    Else , my bot dont sell/stash/salvage all items that i want ,

    Here is my data about that :



    I want to stash all Rare>=60
    I want to vendor all Rare <= 60
    I want to salvage Rare=0 ( nothink )

    I want to vendor magic<=59
    i want to salvage magic >=60
    I want to stash magic=0 ( nothink )

    I am completely out with AutoIT , i just know C language.

    I will try with this config :

    [Anal Loot]
    Stash Rare=63
    Salvage Rare=64
    Vendor Rare=59
    Stash Magic=64
    Salvage Magic=63
    Vendor Magic=59
    Your goldread.au3 looks good is there an image in your bot folder called currentinventory.png and if you open it does it match your current inventory?
    also you should do all the editing of the bot through the gui. Start the bot then click options. However according to what you said you want to do the first file looked right.

  9. #219
    Peage's Avatar Member
    Reputation
    1
    Join Date
    Jul 2012
    Posts
    27
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by stealthingyew View Post
    Your goldread.au3 looks good is there an image in your bot folder called currentinventory.png and if you open it does it match your current inventory?
    also you should do all the editing of the bot through the gui. Start the bot then click options. However according to what you said you want to do the first file looked right.
    When i open this .png , i see just the stuff weared. but no inventory ^^ , else
    [Anal Loot]
    Stash Rare=63
    Salvage Rare=64
    Vendor Rare=59
    Stash Magic=64
    Salvage Magic=63
    Vendor Magic=59

    this setting are right , i have change for this , and all is nice.

    Now , just want to know where can i fixe the problem if i got the error message "sorry freeze salvage etc etc" i have got it 2 more time atm before that i have fixe my Anal loot , i hope i will not getting it when i sleep :d because bot getting Pause automaticaly near to the marchant.

    also , i havent inderstand what are you talking about that i should do all editing of the bot , i delete the setting .ini then ? and i just edit the script?

    Thanks for all anyway , just hoping to find where i have a problem about this freeze manager message.

  10. #220
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by Peage View Post
    When i open this .png , i see just the stuff weared. but no inventory ^^ , else
    [Anal Loot]
    Stash Rare=63
    Salvage Rare=64
    Vendor Rare=59
    Stash Magic=64
    Salvage Magic=63
    Vendor Magic=59

    this setting are right , i have change for this , and all is nice.

    Now , just want to know where can i fixe the problem if i got the error message "sorry freeze salvage etc etc" i have got it 2 more time atm before that i have fixe my Anal loot , i hope i will not getting it when i sleep :d because bot getting Pause automaticaly near to the marchant.

    also , i havent inderstand what are you talking about that i should do all editing of the bot , i delete the setting .ini then ? and i just edit the script?

    Thanks for all anyway , just hoping to find where i have a problem about this freeze manager message.
    There is a bypass but if you sell you swap your wep or something on accident then you are going to have major problems.

    Code:
     If Not _ImageSearchArea("CurrentInventory.png", 1, Round(625 * $x_ratio), Round(93 * $y_ratio), Round(772 * $x_ratio), Round(300 * $y_ratio), $gX, $gY, 9) Then
    			GUICtrlSetData($lblStatus, "Status: Frozen to prevent vendor of worn item, sorry....")
    				TogglePause()
    		 EndIf

    Code:
    If Not _ImageSearchArea("CurrentInventory.png", 1, Round(625 * $x_ratio), Round(93 * $y_ratio), Round(772 * $x_ratio), Round(300 * $y_ratio), $gX, $gY, 9) Then
    		   
    		  GUICtrlSetData($lblStatus, "Status: Frozen to prevent salvage of worn item, sorry....")
    			 TogglePause()	
    		 EndIf
    Find those lines and delete them.

    About the editing of the bot. Start the bot like normal. Then click the button on the window that says options. This is how you edit the settings of the bot not through the ini file

  11. #221
    Peage's Avatar Member
    Reputation
    1
    Join Date
    Jul 2012
    Posts
    27
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by stealthingyew View Post
    There is a bypass but if you sell you swap your wep or something on accident then you are going to have major problems.

    Code:
     If Not _ImageSearchArea("CurrentInventory.png", 1, Round(625 * $x_ratio), Round(93 * $y_ratio), Round(772 * $x_ratio), Round(300 * $y_ratio), $gX, $gY, 9) Then
    			GUICtrlSetData($lblStatus, "Status: Frozen to prevent vendor of worn item, sorry....")
    				TogglePause()
    		 EndIf

    Code:
    If Not _ImageSearchArea("CurrentInventory.png", 1, Round(625 * $x_ratio), Round(93 * $y_ratio), Round(772 * $x_ratio), Round(300 * $y_ratio), $gX, $gY, 9) Then
    		   
    		  GUICtrlSetData($lblStatus, "Status: Frozen to prevent salvage of worn item, sorry....")
    			 TogglePause()	
    		 EndIf
    Find those lines and delete them.

    About the editing of the bot. Start the bot like normal. Then click the button on the window that says options. This is how you edit the settings of the bot not through the ini file

    Then , if i delete this script ? what's the accident that i can get ? bot can sell my weapon accidentel?

    or no worry to delete this ?

    Yes i have see the Options , i will look it.

  12. #222
    Angrycoder's Avatar Knight-Lieutenant
    Reputation
    20
    Join Date
    Jun 2012
    Posts
    370
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by Peage View Post
    Then , if i delete this script ? what's the accident that i can get ? bot can sell my weapon accidentel?

    or no worry to delete this ?

    Yes i have see the Options , i will look it.
    Yes, without that you could swap out gear and sell or salvage your gear. Basically if your bot messes up by say... it Identifies a Rare item, but for some reason it skipped selling it this round. When you come back the next time, the script will again try to ID the rare in your bags, but since it is already identified, it will now equip that item. You then go to sell or salvage and you just lost a piece of your gear.

    Removing that code will make it possible to sell your gear if something goes wrong.

  13. #223
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    yes if it accidently double clicks a rare weapon you can use it will equip it and could possibly sell it. That code is to prevent it from selling anything incase your real items got swapped out from something of this nature.

    What I am Currently working on:
    1. Cellar click there is 1 point that it misses barely and you end up against brick wall
    2. movement speed factoring in (helps people with random movement speed get cellar clicks easier)
    3. imagesearch for slot line instead of a pixel color(fix vendoring/stashing/salvaging of only some items)
    Last edited by stealthingyew; 07-19-2012 at 06:32 PM.

  14. #224
    airfreshjoe's Avatar Member
    Reputation
    1
    Join Date
    Jun 2012
    Posts
    46
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    hey what kind of iphone app is that? i want that so i could check on my bot!!

  15. #225
    stealthingyew's Avatar Knight-Lieutenant
    Reputation
    12
    Join Date
    Jun 2012
    Posts
    257
    Thanks G/R
    1/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Originally Posted by airfreshjoe View Post
    hey what kind of iphone app is that? i want that so i could check on my bot!!


    its teamviewer.

    I am working on the fixs above but i am sick and have to lay down every so often or i get dizzy and really sick. Soon as I get it done I will post it.

Similar Threads

  1. Replies: 4466
    Last Post: 05-07-2013, 07:39 AM
  2. Replies: 397
    Last Post: 08-11-2012, 04:48 AM
  3. Replies: 148
    Last Post: 08-03-2012, 04:19 PM
  4. Replies: 3
    Last Post: 07-31-2012, 06:54 PM
  5. Replies: 52
    Last Post: 07-01-2012, 11:01 AM
All times are GMT -5. The time now is 12:22 PM. Powered by vBulletin® Version 4.2.3
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved. User Alert System provided by Advanced User Tagging (Pro) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
Google Authenticator verification provided by Two-Factor Authentication (Free) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
Digital Point modules: Sphinx-based search