209 lines
7.9 KiB
AutoIt
209 lines
7.9 KiB
AutoIt
#include <ButtonConstants.au3>
|
||
#include <EditConstants.au3>
|
||
#include <GUIConstantsEx.au3>
|
||
#include <StaticConstants.au3>
|
||
#include <WindowsConstants.au3>
|
||
#include <Clipboard.au3>
|
||
|
||
#include "includes/ext/resources.au3"
|
||
#include "includes/ext/_XMLDomWrapper.au3"
|
||
|
||
Global $gVersionChecked = 0, $iniDisableMinVer = 0, $iniResolveTimeout = 1500, $iniConnectTimeout = 1500, $iniSendTimeout = 3000, $iniReceiveTimeout = 10000
|
||
Global $iniApiUrl = "http://api.spiffytek.com/pub/smacheck/steamid/"
|
||
;; Check for & read config
|
||
Global $ini
|
||
If FileExists(@ScriptDir & "\smacheck.ini") Then
|
||
$ini = IniReadSection(@ScriptDir & "\smacheck.ini", "options")
|
||
If IsArray($ini) Then
|
||
For $i = 1 to $ini[0][0]
|
||
If $ini[$i][0] = "disableUpdate" Then
|
||
$gVersionChecked = $ini[$i][1]
|
||
EndIf
|
||
If $ini[$i][0] = "disableMinVer" Then
|
||
$iniDisableMinVer = $ini[$i][1]
|
||
EndIf
|
||
If $ini[$i][0] = "resolveTimeout" Then
|
||
$iniResolveTimeout = $ini[$i][1]
|
||
EndIf
|
||
If $ini[$i][0] = "connectTimeout" Then
|
||
$iniConnectTimeout = $ini[$i][1]
|
||
EndIf
|
||
If $ini[$i][0] = "sendTimeout" Then
|
||
$iniSendTimeout = $ini[$i][1]
|
||
EndIf
|
||
If $ini[$i][0] = "receiveTimeout" Then
|
||
$iniReceiveTimeout = $ini[$i][1]
|
||
EndIf
|
||
If $ini[$i][0] = "apiUrl" Then
|
||
$iniApiUrl = $ini[$i][1]
|
||
EndIf
|
||
Next
|
||
EndIf
|
||
EndIf
|
||
|
||
#include "includes/functions.inc.au3"
|
||
|
||
Global $oErrorHandler = ObjEvent("AutoIt.Error", "_printError");
|
||
|
||
;; Main
|
||
_main()
|
||
Func _main()
|
||
Global $GuiWidth = 370, $GuiHeight = 177
|
||
Local $GuiPosX = (@DesktopWidth - $GuiWidth) / 2, $GuiPosY = (@DesktopHeight - $GuiHeight) / 2
|
||
|
||
Global $GUi = GUICreate("SMACheck - smacbans.com", $GuiWidth, $GuiHeight, $GuiPosX, $GuiPosY)
|
||
$GUiBG = GUICtrlCreatePic("", 0, 0, $GuiWidth, $GuiHeight)
|
||
_ResourceSetImageToCtrl(-1, "img_bg", $RT_RCDATA)
|
||
GUICtrlSetState(-1, $GUI_DISABLE)
|
||
$gInput = GUICtrlCreateLabel("SteamID:", 0, 50, 368, 17, $SS_CENTER)
|
||
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gSteamId = GUICtrlCreateInput("", 112, 70, 145, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gButton_GetClipb = GUICtrlCreateButton("", 260, 68, 24, 24)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
_ResourceSetImageToCtrl(-1, "paste.png", $RT_RCDATA)
|
||
$gButton_Submit = GUICtrlCreateButton("Check", 144, 104, 83, 25, $BS_CENTER)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
GuiCtrlSetState(-1, 512)
|
||
$gCopyright = GUICtrlCreateLabel("<EFBFBD>2012-2014 SpiffyTek && smacBANS", 0, 159, 368, 17, $SS_RIGHT)
|
||
GUICtrlSetFont(-1, 8, 400, 0, "Tahoma")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gVersion = GUICtrlCreateLabel("v" & $VERSION, 2, 159, 369, 17, $SS_LEFT)
|
||
GUICtrlSetFont(-1, 8, 400, 0, "Tahoma")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
GUISetState(@SW_SHOW)
|
||
|
||
|
||
While 1
|
||
Switch GUIGetMsg()
|
||
Case $GUI_EVENT_CLOSE
|
||
ExitLoop
|
||
Case $gButton_GetClipb
|
||
_ClipBoard_Open($GUi)
|
||
$hMemory = _ClipBoard_GetDataEx($CF_TEXT)
|
||
_ClipBoard_Close()
|
||
$tData = DllStructCreate("char Text[8192]", $hMemory)
|
||
GUICtrlSetData($gSteamId, DllStructGetData($tData, "Text"))
|
||
Case $gButton_Submit
|
||
$iSteamId = StringStripWS(GUICtrlRead($gSteamId), 8)
|
||
If StringLeft($iSteamId, 6) = 765611 Then
|
||
$iSteamId = steamId64ToSteamId($iSteamId)
|
||
EndIf
|
||
|
||
If StringLeft($iSteamId, 6) = "STEAM_" Then
|
||
GUISetState(@SW_DISABLE, $GUi)
|
||
gui_Info($iSteamId)
|
||
GUISetState(@SW_ENABLE, $GUi)
|
||
WinActivate($GUi)
|
||
GUISwitch($GUi)
|
||
Else
|
||
GUISetState(@SW_DISABLE, $GUi)
|
||
_printError("wrongid")
|
||
GUISetState(@SW_ENABLE, $GUi)
|
||
WinActivate($GUi)
|
||
GUISwitch($GUi)
|
||
EndIf
|
||
resetInput($gSteamId)
|
||
EndSwitch
|
||
WEnd
|
||
GUIDelete()
|
||
EndFunc
|
||
|
||
|
||
|
||
Func gui_Info($output)
|
||
Local $pInfo = lookupSteamId($output)
|
||
|
||
If IsArray($pInfo) Then
|
||
Global $GUi
|
||
Local $overlayWidth = 312, $overlayHeight = 154, $pos = WinGetPos($GUi)
|
||
|
||
$GUI2 = GUICreate("INFO (" & $output & ")", $overlayWidth, $overlayHeight, $pos[0] + 20, $pos[1] + 20, BitXOR($GUI_SS_DEFAULT_GUI, $WS_MINIMIZEBOX))
|
||
$GUiBG2 = GUICtrlCreatePic("", 0, 0, $overlayWidth, $overlayHeight)
|
||
_ResourceSetImageToCtrl(-1, "img_bg_popup", $RT_RCDATA)
|
||
GUICtrlSetState(-1, $GUI_DISABLE)
|
||
$bClose = GUICtrlCreateButton("OK", 120, 125, 65, 25, $BS_CENTER)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
GuiCtrlSetState(-1, 512)
|
||
$gStatus = GUICtrlCreateLabel("Status:", 24, 12, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
If $pInfo[0] = "1" Then
|
||
$oStatus = GUICtrlCreateLabel("SteamID is listed on SMACbans", 72, 12, 215, 17)
|
||
GUICtrlSetFont(-1, 8.5, 800)
|
||
GUICtrlSetColor(-1, 0xD11313)
|
||
ElseIf $pInfo[0] = 0 Then
|
||
$oStatus = GUICtrlCreateLabel("SteamID is not listed on SMACbans", 72, 12, 215, 17)
|
||
GUICtrlSetFont(-1, 8.5, 800)
|
||
GUICtrlSetColor(-1, 0x245E00)
|
||
ElseIf $pInfo[0] = -1 Then
|
||
$oStatus = GUICtrlCreateLabel("Could not fetch info from SMACbans", 72, 12, 215, 17)
|
||
GUICtrlSetFont(-1, 8.5, 800)
|
||
GUICtrlSetColor(-1, 0xFF8000)
|
||
EndIf
|
||
GUICtrlSetBkColor($oStatus, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gNick = GUICtrlCreateLabel("Nick:", 24, 36, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oCc = GUICtrlCreatePic("", 72, 36, 50, 17)
|
||
_ResourceSetImageToCtrl($oCc, $pInfo[7] & ".png", $RT_RCDATA)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
GUICtrlSetTip($oCc, StringUpper($pInfo[7]))
|
||
$oNick = GUICtrlCreateLabel($pInfo[1], 93, 36, 215, 17)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gReason = GUICtrlCreateLabel("Reason:", 24, 60, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oReason = GUICtrlCreateLabel($pInfo[2], 72, 60, 215, 40)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gDate = GUICtrlCreateLabel("Date:", 24, 84, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oDate = GUICtrlCreateLabel($pInfo[3], 72, 84, 215, 17)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gMod = GUICtrlCreateLabel("Mod:", 120, 84, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oMod = GUICtrlCreateLabel($pInfo[6], 150, 84, 215, 17)
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gVac = GUICtrlCreateLabel("VAC:", 50, 105, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oVac = GUICtrlCreatePic("", 80, 104, 16, 16)
|
||
_setStatusIcon(-1, $pInfo[5])
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gEac = GUICtrlCreateLabel("EAC:", 100, 105, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oEac = GUICtrlCreatePic("", 130, 104, 16, 16)
|
||
_setStatusIcon(-1, $pInfo[8])
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gEsea = GUICtrlCreateLabel("ESEA:", 150, 105, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oEsea = GUICtrlCreatePic("", 190, 104, 16, 16)
|
||
_setStatusIcon(-1, $pInfo[9])
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$gKac = GUICtrlCreateLabel("KAC:", 210, 105, 48, 17)
|
||
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
$oKac = GUICtrlCreatePic("", 240, 104, 16, 16)
|
||
_setStatusIcon(-1, $pInfo[10])
|
||
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
|
||
GUISetState()
|
||
|
||
|
||
While 1
|
||
; We can only get messages from the second GUI
|
||
Switch GUIGetMsg()
|
||
Case $GUI_EVENT_CLOSE
|
||
GUIDelete($GUI2)
|
||
ExitLoop
|
||
Case $bClose
|
||
GUIDelete($GUI2)
|
||
ExitLoop
|
||
EndSwitch
|
||
WEnd
|
||
EndIf
|
||
EndFunc |