Ombladon Posted June 23, 2008 Posted June 23, 2008 ok i made this sts checker....but i checked it on a site and they found 5 viruses wtf??http://www.virustotal.com/analisis/1d6c16c...a958fcae85a1aa7expandcollapse popup#include <GUIConstants.au3> #include <WindowsConstants.au3> TCPShutdown() TCPStartup() Dim $Server1 = IniRead("config.ini","IP","login","null") Dim $Server2 = iniRead("config.ini","IP","game","null") Dim $PORT1 = "2106" Dim $PORT2 = "7777" Dim $S1P1ACK = "" Dim $S1P2ACK = "" Dim $IPADRESS1 = TCPNameToIP($Server1) Dim $IPADRESS2 = TCPNameToIP($Server2) Dim $ConnectedSocket1 = 0 GUICreate("Status",110,50, -1,-1 ,BitOR($WS_CAPTION, $WS_POPUP, $WS_SYSMENU), -1, WinGetHandle("Program Manager")) $ConnectedSocket1 = TCPConnect($IPADRESS1, $PORT1) If @error Then MsgBox(16,"Error"," Login Server is Offline") $S1P1ACK = "Offline" GUICtrlCreateLabel($S1P1ACK ,67,3) GUICtrlSetColor(-1, 0xFF0000) Else $S1P1ACK = "Online" GUICtrlCreateLabel($S1P1ACK ,67,3) GUICtrlSetColor(-1, 0x00FF00) EndIf $ConnectedSocket1 = TCPConnect($IPADRESS2, $PORT2) If @error Then MsgBox(16,"Error"," Game Server is Offline") $S1P2ACK = "Offline" GUICtrlCreateLabel($S1P2ACK ,68,20) GUICtrlSetColor(-1, 0xFF0000) Else $S1P2ACK = "Online" GUICtrlCreateLabel($S1P2ACK ,68,20) GUICtrlSetColor(-1, 0x00FF00) EndIf GUICtrlCreateLabel("LoginServer:",3,3,62,20) GUICtrlCreateLabel("GameServer:",3,20,62,20) GUICtrlCreateLabel("by Ombladon",45,35) TCPShutdown() GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case Else ;;; EndSelect WEnd Exit
zorphnog Posted June 23, 2008 Posted June 23, 2008 Try reading the sticky at the top of the forum: Are my AutoIt EXEs really infected?
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now