All pastes #430849 Raw Edit

Something

public text v1 · immutable
·published 2007-04-09 09:57 UTC
rendered paste body
opt("PixelCoordMode", 2)
opt("MouseCoordMode", 2)
opt("ColorMode", 1)
WinActivate("Diablo II")

$AA = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "LC_TELE_Checksum", "0")
;IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "Meditation_Checksum", "0")
$BB = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "HammerLC_Checksum", "0")
$CC = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "Concentration_Checksum", "0")
If $AA = 0 or $BB = 0 or $CC = 0 Then
	Sleep(300)
EndIf

$TeleportKey = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Keys", "TeleportKey", "r")
;$MeditationKey = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Keys", "MeditationKey", "b")
$ConcentrationKey  = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Keys", "ConcentrationKey", "e")
;$BlessedHammerKey = IniRead(@ScriptDir & "\Kuk_bot_settings.ini", "Keys", "BlessedHammerKey", "g")

Send($ConcentrationKey)
Sleep(250)
$Concentration_Checksum = PixelChecksum(655,568, 667,580,3)

Sleep(250)

;Send($MeditationKey)
;Sleep(1000)
;$Meditation_Checksum = PixelChecksum(655,568, 667,580,3)

;Sleep(200)

Send($TeleportKey)
Sleep(250)
$LC_TELE_Checksum = PixelChecksum(655,568, 667,580,3)

Sleep(250)

$HammerLC_Checksum = PixelChecksum(133,568, 145,580,3)

Sleep(250)




IniWrite(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "LC_TELE_Checksum", $LC_TELE_Checksum)
IniWrite(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "Meditation_Checksum", "0")
IniWrite(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "HammerLC_Checksum", $HammerLC_Checksum)
IniWrite(@ScriptDir & "\Kuk_bot_settings.ini", "Throne", "Concentration_Checksum", $Concentration_Checksum)

;MsgBox(0,"ChecksumGetter","Checksums gotten and written successfully!")

EXIT(1)