ok any noob with a hammerdin can now run baal and it kinda makes me sick lol its a ripoff of d2jsp works the same way but without all the setup "baal bot fx"
peace pplz
ok any noob with a hammerdin can now run baal and it kinda makes me sick lol its a ripoff of d2jsp works the same way but without all the setup "baal bot fx"
peace pplz
Last edited by jedimaster86; 04-23-2006 at 10:54 AM.
sounds suspicous... 2 poster posting a download, im not gonna be the one to test it
DL'ed and scanned the DUPEHACK and ****in Baal Bot FX crap...First, there are 2 dll files in the baal bot folder. The one is also titled "ActiveX bla bla bla" (you know what I mean). He also says this in a help file:
This is what I got from the bot scanif you are having problems with a missing file you may need to take the 2 files MSWinSck.ocx and YMSG12ENCRYPT.dll and put them into your system 32 folder if you still have this problem you may need to download a program to register you ocx files
this program is set up to find your chars skills and auto tele to baal if you are having problems geting killed you may want to try a strong merc with a dlearum helm or a cta
THANKS DEEN
BTW, this is the "config" file for hammerdin (dunno if you can see out of this if it's workin and safe)<table class="servicetable" border="0" cellpadding="2" cellspacing="2" width="90%"><tbody><tr><td class="resultcell" align="right"> File: </td> <td class="resultcell"> Baal_Bot_FX_1.11b.exe </td> </tr> <tr> <td class="resultcell" align="right"> Status: </td> <td class="resultcell" width="800"> OK (Note: this file has been scanned before. Therefore, this file's scan results will not be stored in the database)
</td> </tr> <tr> <td class="resultcell" align="right"> MD5 </td> <td class="resultcell"> b2751f7fcac622acca38e2b1e9f55179 </td> </tr> <tr> <td class="resultcell" align="right"> Packers detected: </td> <td class="resultcell"> -
</td> </tr> <tr> <td colspan="2" align="center"> Scanner results
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> AntiVir </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> ArcaVir </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Avast </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> AVG Antivirus </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> BitDefender </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> ClamAV </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Dr.Web </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> F-Prot Antivirus </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Fortinet </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Kaspersky Anti-Virus </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> NOD32 </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Norman Virus Control </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> UNA </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> VirusBuster </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> VBA32 </td> <td class="resultcell"> Found nothing
</td></tr></tbody></table>
This is what I got from the dupehack
; Version 1.1; include these function:
; ------------------------------------
;
; Constants and default parameters loading.
; CheckIfInGame() ==> "CALIBRATED" POINT...
; Path($PathName)
; GetMercLifeStatus()
; GetLifePercent()
; GetManaPercent()
; Unstuck($EscNb)
; LogEvent($EventType, $String)
; SlowClick($Button, $X, $Y, $R, $N)
; FastClickAbs($Button, $X, $Y, $R, $N)
; CheckMove ($Delay)
; ValidateWP()
; FromBlockSureClick ($XBS_Start, $YBS_Start, $XBS_Stop, $YBS_Stop, $XBlock, $YBlock)
; FromBlockClickTo ($XBS_Start, $YBS_Start, $XBS_Stop, $YBS_Stop, $XBlock, $YBlock, $NBClicks)
;======================================
; Constants definition, can be
; defined in the script too...
;======================================
$XDiff = 0
$YDiff = 0
$FastClickMini = 20
$FastClickMaxi = 30
$SlowClickMini = 80
$SlowClickMaxi = 100
$Char_CheckMoveDelay = 120
$D2_SlowIntMDelay = 2
$D2_FastIntMDelay = 1
$D2_IdingMouseSpeed = 1
$D2_MouseClickDelay = 5
$D2_SendKeyDelay = 5
;======================================
; Colors definition
;======================================
$XUNIQUES_Color = 6521492
$SETS_Color = 1623816 ;(in act 5)
;$SETS_Color = 65304 ;(in act 1)
$XRARES_Color = 6535902
$MAGICS_Color = 11358546
$GRAYS_Color = 5394770
$WHITES_Color = 13027270
$UNID_RED_Color = 3229109
$NPC_BODY_Color = 16720037
$NPC_MENU_Color = 1623816
$GREEN_BLOCKS_Color = 65304
$MERC_GREEN_BAR_Color = 34304
$MERC_ORANGE_BAR_Color = 2197206
$UNID_RED_Color = 3229109
;======================================
; Options
;======================================
AutoItSetOption ( "ColorMode", 1 )
AutoItSetOption("WinTitleMatchMode", 3)
AutoItSetOption("WinWaitDelay", 250)
AutoItSetOption ("PixelCoordMode", 0)
AutoItSetOption ("MouseCoordMode", 0)
;======================================
; Functions....
;=================================================
; GET Calibrated point + Confirm we are in game...
;=================================================
;(Consider starting this script from InGame)
Func CheckIfInGame()
$CPoint = PixelSearch ( 15, 565, 35, 585, 9750503 )
If @error == 1 Then
Return 0
EndIf
$Xbase = 23
$Ybase = 574
$XDiff = $CPoint[0] - $Xbase
$YDiff = $CPoint[1] - $Ybase
Return 1
EndFunc
;(Consider starting this script from InGame)
Func CheckIfInGame()
$CPoint = PixelSearch ( 15, 565, 35, 585, 9750503 )
If @error == 1 Then
Return 0
EndIf
$Xbase = 23
$Ybase = 574
$XDiff = $CPoint[0] - $Xbase
$YDiff = $CPoint[1] - $Ybase
Return 1
EndFunc
;(Consider starting this script from InGame)
Func CheckIfInGame()
$CPoint = PixelSearch ( 15, 565, 35, 585, 9750503 )
If @error == 1 Then
Return 0
EndIf
$Xbase = 23
$Ybase = 574
$XDiff = $CPoint[0] - $Xbase
$YDiff = $CPoint[1] - $Ybase
Return 1
EndFunc
;================================================= =====================
; Relative to block click (green block, right up side) take first block
;$XBS_Start ; left of the scanned area
;$YBS_Start ; top of the scanned area
;$XBS_Stop ; right of the scanned area
;$YBS_Stop ; bottom of the scanned area
;$XBlock ; from block X to click for
;$YBlock ; from block y to click for
;$NBClicks ; number of clicks (can be Zero)
;================================================= =====================
Func FromBlockClickTo ($XBS_Start, $YBS_Start, $XBS_Stop, $YBS_Stop, $XBlock, $YBlock, $NBClicks)
$XBS_Start = $XBS_Start + $XDiff
$YBS_Start = $YBS_Start + $YDiff
$XBS_Stop = $XBS_Stop + $XDiff
$YBS_Stop = $YBS_Stop + $YDiff
$FailsCount = 0
Do
$XYBlock = PixelSearch ($XBS_Start, $YBS_Start, $XBS_Stop, $YBS_Stop, $GREEN_BLOCKS_Color, 0, 15)
If Not @error Then
$XBS = $XYBlock[0]
$YBS = $XYBlock[1]
Do
$XBS = $XBS + 4
$ApixBS = PixelGetColor ($XBS, $YBS)
Until $ApixBS <> 65304
Do
$YBS = $YBS - 4
$ApixBS = PixelGetColor ($XBS, $YBS)
Until $ApixBS <> 65304
$XBC = $XBS + $XBlock
$YBC = $YBS + $YBlock
If $XBC > 795 Then
$XBC = 795
EndIf
If $YBC > 550 Then
$YBC = 550
EndIf
If $XBC < 5 Then
$XBC = 5
EndIf
If $YBC < 35 Then
$YBC = 35
EndIf
If $NBClicks > 1 Then
$NBClicks = $NBClicks + Round(Random(0, 1))
EndIf
FastClickAbs("Left", $XBC, $YBC, 1, $NBClicks)
CheckMove($Char_CheckMoveDelay)
Return 1
EndIf
$FailsCount = $FailsCount + 1
Sleep (Random(200,300))
Until $FailsCount > 2
LogEvent(3, "In town green block search failure: " & $XBS_Start & ", " & $YBS_Start & ", " & $XBS_Stop & ", " & $YBS_Stop & ", " & $XBlock & ", " & $YBlock)
Return 0
EndFunc
;================================================= =======
; Make a paused click. Nice for Tps.
;================================================= =======
Func FromBlockSureClick ($XBS_Start, $YBS_Start, $XBS_Stop, $YBS_Stop, $XBlock, $YBlock)
CheckMove($Char_CheckMoveDelay)
Sleep (Random(150,200))
FromBlockClickTo ($XBS_Start, $YBS_Start, $XBS_Stop, $YBS_Stop, $XBlock, $YBlock, 0)
Sleep (Random(200,250))
MouseDown ("Left")
Sleep (Random(80,100))
MouseUp ("Left")
CheckMove($Char_CheckMoveDelay)
EndFunc
;==================
; Validate WP menu
;==================
Func ValidateWP()
For $testWP = 1 To 8
Sleep (Random(200,300))
$ApixVWP1 = PixelGetColor (17 + $XDiff, 391 + $YDiff)
$ApixVWP2 = PixelGetColor (18 + $XDiff, 337 + $YDiff)
$ApixVWP3 = PixelGetColor (15 + $XDiff, 253 + $YDiff)
$ApixVWP4 = PixelGetColor (16 + $XDiff, 142 + $YDiff)
If (($ApixVWP1 == 10855077) AND ($ApixVWP2 == 3234147) AND ($ApixVWP3 == 5399931) AND ($ApixVWP4 == 8685188)) Then
Return 1
EndIf
Next
Return 0
EndFunc
;================================================= ======================
; Wait stop move function, function loop until character is stop moving
;================================================= ======================
Func CheckMove ($Delay)
$X_Start = 5 + $XDiff ; Left side of area
$X_Stop = 795 + $XDiff ; Right side of area
$Y_Start = 35 + $YDiff ; Up side of area
$Y_Stop = 510 + $YDiff ; Bottom side of area
$Begin = TimerStart()
Do
$CMA0 = PixelGetColor($X_Start, $Y_Start)
$CMB0 = PixelGetColor($X_Stop, $Y_Start)
$CMC0 = PixelGetColor($X_Stop, $Y_Stop)
$CMD0 = PixelGetColor($X_Start, $Y_Stop)
$CME0 = PixelGetColor((($X_Stop - $X_Start) / 2), $Y_Start)
$CMF0 = PixelGetColor((($X_Stop - $X_Start) / 2), $Y_Stop)
$CMG0 = PixelGetColor($X_Start, (($Y_Stop - $Y_Start) / 2))
$CMH0 = PixelGetColor($X_Stop, (($Y_Stop - $Y_Start) / 2))
Sleep ($Delay)
$CMA1 = PixelGetColor($X_Start, $Y_Start)
$CMB1 = PixelGetColor($X_Stop, $Y_Start)
$CMC1 = PixelGetColor($X_Stop, $Y_Stop)
$CMD1 = PixelGetColor($X_Start, $Y_Stop)
$CME1 = PixelGetColor((($X_Stop - $X_Start) / 2), $Y_Start)
$CMF1 = PixelGetColor((($X_Stop - $X_Start) / 2), $Y_Stop)
$CMG1 = PixelGetColor($X_Start, (($Y_Stop - $Y_Start) / 2))
$CMH1 = PixelGetColor($X_Stop, (($Y_Stop - $Y_Start) / 2))
$Check5 = 0
If $CMA0==$CMA1 Then
$Check5 = $Check5 + 1
EndIf
If $CMB0==$CMB1 Then
$Check5 = $Check5 + 1
EndIf
If $CMC0==$CMC1 Then
$Check5 = $Check5 + 1
EndIf
If $CMD0==$CMD1 Then
$Check5 = $Check5 + 1
EndIf
If $CME0==$CME1 Then
$Check5 = $Check5 + 1
EndIf
If $CMF0==$CMF1 Then
$Check5 = $Check5 + 1
EndIf
If $CMG0==$CMG1 Then
$Check5 = $Check5 + 1
EndIf
If $CMH0==$CMH1 Then
$Check5 = $Check5 + 1
EndIf
If ($Check5 >= 5) Then
ExitLoop
EndIf
Until (TimerStop($Begin)>3000)
EndFunc
;================================
; Randomized fast click Absolute
;================================
Func FastClickAbs($Button, $X, $Y, $R, $N)
MouseMove($X + Random(- $R, $R), $Y + Random(- $R, $R), $D2_FastIntMDelay)
Sleep (Random($FastClickMini,$FastClickMaxi))
For $Repeat = 1 To $N
MouseDown ($Button)
Sleep (Random($FastClickMini,$FastClickMaxi))
MouseUp ($Button)
Sleep (Random($FastClickMini,$FastClickMaxi))
Next
EndFunc
;=======================
; Randomized slow click
;=======================
Func SlowClick($Button, $X, $Y, $R, $N)
MouseMove($X + Random(- $R, $R) + $XDiff, $Y + Random(- $R, $R) + $YDiff, $D2_SlowIntMDelay)
Sleep (Random($SlowClickMini,$SlowClickMaxi))
For $Repeat = 1 To $N
MouseDown ($Button)
Sleep (Random($SlowClickMini,$SlowClickMaxi))
MouseUp ($Button)
Sleep (Random($SlowClickMini,$SlowClickMaxi))
Next
EndFunc
;=======================
; Randomized fast click
;=======================
Func FastClick($Button, $X, $Y, $R, $N)
MouseMove($X + Random(- $R, $R) + $XDiff, $Y + Random(- $R, $R) + $YDiff, $D2_FastIntMDelay)
Sleep (Random($FastClickMini,$FastClickMaxi))
For $Repeat = 1 To $N
MouseDown ($Button)
Sleep (Random($FastClickMini,$FastClickMaxi))
MouseUp ($Button)
Sleep (Random($FastClickMini,$FastClickMaxi))
Next
EndFunc
;=================================
; Provide script events log
; Event type:
; 1 = Information
; 2 = Warning
; 3 = Error
;=================================
Func LogEvent($EventType, $String)
Select
Case $EventType == 1
$EventName = " [I]> "
Case $EventType == 2
$EventName = " [W]> "
Case $EventType == 3
$EventName = " [E]> "
EndSelect
$LogFile = FileOpen (@SCRIPTDIR & "\Events_Script.txt", 1)
If $LogFile = -1 Then
Return
EndIf
FileWriteLine ($LogFile, @MON & "/" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & $EventName & $String)
FileClose ($LogFile)
EndFunc
;================================================= =======================
; In game Unstuck function: quit trade/stash/inv/npcmenu/WP/esc/
; $EscNb = 0 = quiet; done in normal conditions to exit from npc
; $EscNb = number of optional "esc" keyst. Use in unknow stuck conditions.
;================================================= =======================
Func Unstuck($EscNb)
If $EscNb >= 1 Then
For $un = 1 To $EscNb
Send ("{ESC}")
Sleep (Random(300,400))
Next
EndIf
Send ("{ESC}")
Sleep (Random(300,400))
For $i = 1 To 3
; ESC MENU
$ApixCU1 = PixelGetColor (326 + $XDiff, 230 + $YDiff)
$ApixCU2 = PixelGetColor (477 + $XDiff, 233 + $YDiff)
$ApixCU3 = PixelGetColor (303 + $XDiff, 334 + $YDiff)
$ApixCU4 = PixelGetColor (555 + $XDiff, 329 + $YDiff)
If (($ApixCU1 == 3234147) AND ($ApixCU2 == 2698281) AND ($ApixCU3 == 3761523) AND ($ApixCU4 == 5406092)) Then
Send ("{ESC}")
Sleep (Random(300,400))
EndIf
; VENDOR/STASH
$ApixCU1 = PixelGetColor (17 + $XDiff, 391 + $YDiff)
$ApixCU2 = PixelGetColor (18 + $XDiff, 337 + $YDiff)
$ApixCU3 = PixelGetColor (15 + $XDiff, 253 + $YDiff)
$ApixCU4 = PixelGetColor (16 + $XDiff, 142 + $YDiff)
If (($ApixCU1 == 10855077) AND ($ApixCU2 == 3234147) AND ($ApixCU3 == 5399931) AND ($ApixCU4 == 8685188)) Then
Send ("{ESC}")
Sleep (Random(300,400))
EndIf
; INVENTORY
$ApixCU1 = PixelGetColor (782 + $XDiff, 469 + $YDiff)
$ApixCU2 = PixelGetColor (788 + $XDiff, 367 + $YDiff)
$ApixCU3 = PixelGetColor (788 + $XDiff, 265 + $YDiff)
$ApixCU4 = PixelGetColor (787 + $XDiff, 152 + $YDiff)
If (($ApixCU1 == 8093051) AND ($ApixCU2 == 7565683) AND ($ApixCU3 == 2700354) AND ($ApixCU4 == 11382445)) Then
Send ("{ESC}")
Sleep (Random(300,400))
EndIf
Next
EndFunc
;(Consider starting this script from InGame)
Func CheckIfInGame()
$CPoint = PixelSearch ( 15, 565, 35, 585, 9750503 )
If @error == 1 Then
Return 0
EndIf
$Xbase = 23
$Ybase = 574
$XDiff = $CPoint[0] - $Xbase
$YDiff = $CPoint[1] - $Ybase
Return 1
EndFunc;(Consider starting this script from InGame)
Func CheckIfInGame()
$CPoint = PixelSearch ( 15, 565, 35, 585, 9750503 )
If @error == 1 Then
Return 0
EndIf
$Xbase = 23
$Ybase = 574
$XDiff = $CPoint[0] - $Xbase
$YDiff = $CPoint[1] - $Ybase
Return 1
EndFunc;(Consider starting this script from InGame)
Func CheckIfInGame()
$CPoint = PixelSearch ( 15, 565, 35, 585, 9750503 )
If @error == 1 Then
Return 0
EndIf
$Xbase = 23
$Ybase = 574
$XDiff = $CPoint[0] - $Xbase
$YDiff = $CPoint[1] - $Ybase
Return 1
EndFunc
;================================================= ================================================== ==
; Return mana "percent" available 100>="90">=90 to 20>="10">=10 and 10>="0">=0 for less than 10% mana
;================================================= ================================================== ==
Func GetManaPercent()
$ManaPercent = 90
$Ymana = 536 + $YDiff
While ($ManaPercent >= 20)
$Pix = PixelGetColor (744 + $XDiff, $Ymana)
If $Pix == 5898240 Then
Return $ManaPercent
Else
$ManaPercent = $ManaPercent - 10
$Ymana = $Ymana + 8
EndIf
Wend
$Pix = PixelGetColor (735 + $XDiff, 601 + $YDiff)
If $Pix == 2690056 Then
$ManaPercent = 10
Return $ManaPercent
Else
$ManaPercent = 0
Return $ManaPercent
EndIf
EndFunc
;================================================= ================================================== ====
; Return Life "percent" available: 100>="90">=90 to 60>="50">=50 and 50>="0"=>0 for less than 50% life
;================================================= ================================================== ====
Func GetLifePercent()
$LifePercent = 90
$Ylife = 537 + $YDiff
Do
$Pix = PixelGetColor (84, $Ylife)
If (($Pix == 90) OR ($Pix == 543000)) Then
Return $LifePercent
Else
$LifePercent = $LifePercent - 10
$Ylife = $Ylife + 8
EndIf
Until ($LifePercent == 40)
$LifePercent = 0
Return $LifePercent
EndFunc
;================================================= ================================================== ==
; Return merc/hireling status:
; 1 for green bar
; 0 for alive but 1/3 life (drink need)
; -1 == dead.
;================================================= ================================================== ==
Func GetMercLifeStatus()
$Pix = PixelGetColor (36 + $XDiff, 36 + $YDiff)
If $Pix == $MERC_GREEN_BAR_Color OR $Pix == $MERC_ORANGE_BAR_Color Then
Return 1
Else
$Pix1 = PixelGetColor (40 + $XDiff, 36 + $YDiff)
$Pix2 = PixelGetColor (45 + $XDiff, 36 + $YDiff)
$Pix3 = PixelGetColor (50 + $XDiff, 36 + $YDiff)
$Pix4 = PixelGetColor (55 + $XDiff, 36 + $YDiff)
If ($Pix1 + $Pix2 + $Pix3 + $Pix4) == 0 Then
Return 0
Else
Return -1
EndIf
EndIf
EndFunc
;==============================================
; This is the path library
; Using the relative to block trick
; Axe point is the DownStairs
;==============================================
Func Path($PathName)
Select
Case $PathName == "StartToMalah"
FromBlockClickTo (5, 25, 795, 545, - 190, 140, 2)
Case $PathName == "StartToDownStairs"
FromBlockClickTo (5, 25, 795, 545, - 130, 400, 2)
FromBlockClickTo (400, 300, 795, 545, - 230, - 100, 2)
FromBlockClickTo (400, 25, 795, 545, - 230, 20, 2)
Case $PathName == "MalahToDownStairs"
If FromBlockClickTo (5, 25, 795, 545, - 190, 140, 2) == 0 Then
LogEvent(2, "Failed to found Block after malah interact, make a blind click try")
FastClick("Left", 725, 515, 10, 2)
CheckMove ($Char_CheckMoveDelay * 2)
EndIf
FromBlockClickTo (5, 25, 795, 545, 20, 200, 2)
FromBlockClickTo (5, 25, 795, 545, - 195, 430, 2)
FromBlockClickTo (400, 300, 795, 545, - 240, - 80, 2)
FromBlockClickTo (400, 25, 795, 545, - 230, 20, 2)
Case $PathName == "DownStairsToWP"
FromBlockClickTo (450, 140, 730, 420, - 360, 100, 1)
Case $PathName == "DownStairsToStash"
FromBlockClickTo (200, 140, 730, 420, 0, 60, 1)
Case $PathName == "StashToDownStairs"
FromBlockClickTo (290, 120, 540, 390, - 135, 85, 2)
Case $PathName == "DownStairsToLarzuk"
FromBlockClickTo (450, 140, 730, 420, 95, 160, 2)
FromBlockClickTo (120, 35, 385, 270, 310, 100, 2)
Case $PathName == "LarzukToDownStairs"
SlowClick("Left", 30, 350, 20, 1)
CheckMove ($Char_CheckMoveDelay)
FromBlockClickTo (20, 40, 330, 290, - 145, 80, 2)
Case $PathName == "DownStairsToQual"
FromBlockClickTo (450, 140, 730, 420, - 510, 250, 2)
FromBlockClickTo (220, 40, 535, 355, - 330, - 50, 2)
FromBlockClickTo (400, 190, 530, 320, - 324, - 95, 2)
Case $PathName == "QualToDownStairs"
FromBlockClickTo (400, 125, 760, 430, 100, 300, 2)
FromBlockClickTo (550, 250, 785, 500, - 70, 80, 2)
FromBlockClickTo (300, 100, 550, 330, 300, - 40, 2)
Case $PathName == "DownStairsToAnya"
FromBlockClickTo (450, 140, 730, 420, - 475, 260, 2)
FromBlockClickTo (200, 50, 470, 425, - 100, 360, 2)
FromBlockClickTo (100, 250, 400, 500, - 180, - 30, 2)
Case $PathName == "DownStairsToPindle"
FromBlockClickTo (450, 140, 730, 420, - 475, 260, 2)
If FromBlockClickTo (200, 50, 470, 425, - 100, 360, 2) == 0 Then
Unstuck(0)
Sleep (Random(800,1000))
LogEvent(2, "DownStairsToPindle. This can be a Black wall or Cain. Retry.")
FromBlockClickTo (450, 140, 730, 420, - 475, 260, 2)
FromBlockClickTo (200, 50, 470, 425, - 100, 360, 2)
EndIf
FromBlockClickTo (500, 200, 780, 480, - 425, 75, 2)
FromBlockSureClick (280, 230, 490, 430, - 305, - 85)
Case $PathName == "WPToPindle"
FromBlockClickTo (650, 120, 790, 290, - 475, 260, 2) ; real difference is here.
If FromBlockClickTo (200, 50, 470, 425, - 100, 360, 2) == 0 Then
Unstuck(0)
Sleep (Random(800,1000))
LogEvent(2, "DownStairsToPindle. This can be a Black wall or Cain. Retry.")
FromBlockClickTo (450, 140, 730, 420, - 475, 260, 2)
FromBlockClickTo (200, 50, 470, 425, - 100, 360, 2)
EndIf
FromBlockClickTo (500, 200, 780, 480, - 410, 65, 2)
FromBlockSureClick (280, 230, 490, 430, - 305, - 85)
Case $PathName == "PindleTpRecovery"
FromBlockSureClick (5, 35, 300, 300, 175, 185)
EndSelect
EndFunc
;================================================= ================================================
; Will search for a 1*1 item in inventory, trade, or gamble and return XY string with "|" separator.
; -1 if not found. inv=10*4, stash=6*8, trade=10*10 .Only used for scrolls yet.
; Fast. Deprecated. Used for inventory Id scrolls.
;================================================= ================================================
Func DetectInGUI($Width, $Height, $Color1, $Color2, $Color3, $StartX1, $StartY1, $DiffX2, $DiffY2, $DiffX3, $DiffY3)
Dim $Xinv[$Width]
Dim $Yinv[$Height]
$Xinv[0] = ($StartX1 + $XDiff)
$Yinv[0] = ($StartY1 + $YDiff)
For $i = 1 To ($Width -1)
$Xinv[$i] = ($Xinv[($i-1)] + 29)
Next
For $j = 1 To ($Height -1)
$Yinv[$j] = ($Yinv[($j-1)] + 29)
Next
For $i = 0 To ($Width -1)
For $j = 0 To ($Height -1)
$TestColor = PixelGetColor ($Xinv[$i],$Yinv[$j])
If $TestColor == $Color1 Then
$TestColor = PixelGetColor (($Xinv[$i] + $DiffX2),($Yinv[$j] + $DiffY2))
If $TestColor == $Color2 Then
$TestColor = PixelGetColor (($Xinv[$i] + $DiffX3),($Yinv[$j] + $DiffY3))
If $TestColor == $Color3 Then
$XY = ($Xinv[$i] & "|" & $Yinv[$j])
Return $XY
EndIf
EndIf
EndIf
Next
Next
Return 0
EndFunc
This still looks VERY suspicious to me since there's only 1 DUPEHACK.exe and no config files and crap like that.<table class="servicetable" border="0" cellpadding="2" cellspacing="2" width="90%"><tbody><tr><td class="resultcell" align="right"> File: </td> <td class="resultcell"> DUPEHACK.exe </td> </tr> <tr> <td class="resultcell" align="right"> Status: </td> <td class="resultcell" width="800"> OK (Note: this file has been scanned before. Therefore, this file's scan results will not be stored in the database)
</td> </tr> <tr> <td class="resultcell" align="right"> MD5 </td> <td class="resultcell"> 60b9a8bd767bed9aff5d597b7e25dd72 </td> </tr> <tr> <td class="resultcell" align="right"> Packers detected: </td> <td class="resultcell"> -
</td> </tr> <tr> <td colspan="2" align="center"> Scanner results
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> AntiVir </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> ArcaVir </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Avast </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> AVG Antivirus </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> BitDefender </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> ClamAV </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Dr.Web </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> F-Prot Antivirus </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Fortinet </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Kaspersky Anti-Virus </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> NOD32 </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> Norman Virus Control </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> UNA </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> VirusBuster </td> <td class="resultcell"> Found nothing
</td> </tr> <tr> <td class="resultcell" align="right" width="250"> VBA32 </td> <td class="resultcell"> Found nothing
</td></tr></tbody></table>
I don't trust that guy.
I saw the dupehack download and closed the window.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks