Added Availibility-Check (#28)

Updated GUi (Logo)

SMACheck.au3

@@ -12,8 +12,8 @@
 
 ;#AutoIt3Wrapper_Res_ProductVersion=x.x.x.x	; Broken, use #AutoIt3Wrapper_Res_Field=ProductVersion|x.x.x as workarround.
 #AutoIt3Wrapper_Res_Field=ProductVersion|Freeware
-#AutoIt3Wrapper_Res_Fileversion=1.0.0.17
-#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=P	;(Y/N/P) AutoIncrement FileVersion After Aut2EXE is finished. default=N. P=Prompt, Will ask at Compilation time if you want to increase the versionnumber
+#AutoIt3Wrapper_Res_Fileversion=1.0.0.19
+#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=N	;(Y/N/P) AutoIncrement FileVersion After Aut2EXE is finished. default=N. P=Prompt, Will ask at Compilation time if you want to increase the versionnumber
 #AutoIt3Wrapper_Res_Language=1033	;Resource Language code . german = 1031, english (U.S.) = 1033. default 2057=English (United Kingdom). For a List see http://technet.microsoft.com/en-us/library/dd346950.aspx
 
 #AutoIt3Wrapper_OutFile=..\..\COMPILED\SMACheck.exe
@@ -33,7 +33,7 @@
 
 ;############################################################################################
 
-Global $VERSION = "1.0.0 alpha 3b"
+Global $VERSION = "1.0.0 alpha 4"
 
 #NoTrayIcon
 
@@ -49,15 +49,21 @@ Global $VERSION = "1.0.0 alpha 3b"
 #include "includes/functions.inc.au3"
 #include "includes/gui.inc.au3"
 
+Global $g_eventerror = 0, $oError
+Global $oError = ObjEvent("AutoIt.Error","MyErrFunc")
+
 ;; Main
 $GUi = GUICreate("SMACheck - smacbans.com", 370, 177, 353, 206)
 $GUiBG = GUICtrlCreatePic("", 0, 0, 370, 177)
 	_ResourceSetImageToCtrl($GUiBG, "img_bg", $RT_RCDATA)
 	GUICtrlSetState(-1, $GUI_DISABLE)
-$gTitle = GUICtrlCreateLabel("SMACheck", 0, 0, 369, 52, $SS_CENTER)
-	GUICtrlSetFont(-1, 30, 400, 0, "Tahoma")
+;$gTitle = GUICtrlCreateLabel("SMACheck", 0, 0, 369, 52, $SS_CENTER)
+	;GUICtrlSetFont(-1, 30, 400, 0, "Tahoma")
+	;GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
+$gInput = GUICtrlCreateLabel("SteamID:", 0, 50, 368, 17, $SS_CENTER)
+	GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
 	GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
-$gSteamId = GUICtrlCreateInput("", 112, 64, 145, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
+$gSteamId = GUICtrlCreateInput("", 112, 70, 145, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER))
 	GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
 $gButton_Submit = GUICtrlCreateButton("Check", 144, 104, 83, 25, $BS_CENTER)
 	GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)

includes/functions.inc.au3

@@ -6,6 +6,10 @@ Func getStatusFromSMACb($input)
 	;$oXML.Open("GET", "http://api.smacbans.com/xml/getbanninfo_multiple/" & $input & "/", 0)
 	$oXML.Open("GET", "http://api.spiffytek.com/pub/smacheck/steamid/" & $input, 0)
 	$oXML.Send
+	IF $g_eventerror <> 0 Then
+		MsgBox(16, "ERROR", "API not available")
+		Return "ERROR_HANDELED"
+	EndIf
 
 	Local $sFile = _TempFile(@TempDir, '~', '.xml')
 	;Local $sFile = _TempFile(".\", '~', '.xml')
@@ -52,7 +56,7 @@ Func getStatusFromSMACb($input)
 		;MsgBox(16, "ERROR", "Oops :S")
 		Local $return = "ERROR"
 		FileDelete($sFile)
-		Return
+		Return $return
 	EndIf
 
 	FileDelete($sFile)
@@ -95,4 +99,24 @@ EndFunc
 
 Func resetInput($iID)
 	GUICtrlSetData($iID, "")
-EndFunc
+EndFunc
+
+
+Func MyErrFunc()
+	;Msgbox(0,"AutoItCOM Test","We intercepted a COM Error !"      & @CRLF  & @CRLF & _
+	;		"err.description is: "    & @TAB & $oError.description    & @CRLF & _
+	;		"err.windescription:"     & @TAB & $oError.windescription & @CRLF & _
+	;		"err.number is: "         & @TAB & hex($oError.number,8)  & @CRLF & _
+	;		"err.lastdllerror is: "   & @TAB & $oError.lastdllerror   & @CRLF & _
+	;		"err.scriptline is: "     & @TAB & $oError.scriptline     & @CRLF & _
+	;		"err.source is: "         & @TAB & $oError.source         & @CRLF & _
+	;		"err.helpfile is: "       & @TAB & $oError.helpfile       & @CRLF & _
+	;		"err.helpcontext is: "    & @TAB & $oError.helpcontext _
+	;)
+
+	Local $err = $oError.number
+	If $err = 0 Then
+		$err = -1
+	EndIf
+	$g_eventerror = $err  ; to check for after this function returns
+Endfunc