Erik. Posted May 9, 2007 Share Posted May 9, 2007 Hallo, i think you will know about it: Call of Duty 2 For almost every game you have an rcon: remote control whit rcon you can control the game on distance Now do i want to make some for fun. here is a code you will need to send something to a server and to recieve: UDPStartup() $socket = UDPBind("172.27.183.213", 28960) UDPOpen("172.27.183.213", 28960) UDPSend($socket,"ÿÿÿÿ rcon password") While 1 $data = UDPRecv($socket,99999999) If $data <> "" Then MsgBox(0, "UDP DATA", $data) EndIf sleep(100) WEnd Func OnAutoItExit() UDPCloseSocket($socket) UDPShutdown() EndFunc Only whit that you can not make a program that everyone can use... Now did i make this whit koda: expandcollapse popup#Include <GUIConstants.au3> #Include <GuiListView.au3> #Include <File.au3> #include <Date.au3> #include <Array.au3> #include <Date.au3> #include <string.au3> $Form1_1 = GUICreate("Remote control for Call of Duty 2", 827, 598, 191, 101) $Label1 = GUICtrlCreateLabel("Server address", 8, 16, 75, 17) $Label2 = GUICtrlCreateLabel("Port", 120, 16, 23, 17) $Label3 = GUICtrlCreateLabel("Rcon password", 176, 16, 78, 17) $connect = GUICtrlCreateButton("Connect", 272, 40, 129, 25, 0) GUICtrlSetTip(-1, "Press to connect to a server") $serverip = GUICtrlCreateInput("", 8, 40, 81, 21) GUICtrlSetTip(-1, "Full in the server ip address") $serverport = GUICtrlCreateInput("", 112, 40, 41, 21) GUICtrlSetTip(-1, "Full in the server port") $serverpassword = GUICtrlCreateInput("", 168, 40, 89, 21) GUICtrlSetTip(-1, "Full in the server rcon") $Label4 = GUICtrlCreateLabel("Response from server", 136, 112, 107, 17) $response = GUICtrlCreateEdit("", 8, 136, 393, 321, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_HSCROLL,$WS_VSCROLL)) GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetBkColor(-1, 0x316AC5) GUICtrlSetState(-1, $GUI_DISABLE) GUICtrlSetTip(-1, "In this window you can see what the server response is") $command = GUICtrlCreateInput("", 96, 472, 241, 21) GUICtrlSetTip(-1, "You can enter a direct command to the server") $Label5 = GUICtrlCreateLabel("Direct command", 8, 472, 81, 17) $sendcommand = GUICtrlCreateButton("Send", 352, 472, 49, 25, 0) GUICtrlSetTip(-1, "Press to send the direct command") $Label6 = GUICtrlCreateLabel("Name for message", 8, 80, 92, 17) $message = GUICtrlCreateInput("", 112, 80, 129, 21) GUICtrlSetTip(-1, "If you full in you name will be displayed when you type a message") $serverinfo = GUICtrlCreateButton("Server info", 16, 504, 89, 25, 0) GUICtrlSetTip(-1, "Get the server information") $serverstatus = GUICtrlCreateButton("Server status", 112, 504, 89, 25, 0) GUICtrlSetTip(-1, "Get the server status") $sendmessage = GUICtrlCreateButton("Send message", 211, 504, 89, 25, 0) GUICtrlSetTip(-1, "Send a message to all players in the game") $Label7 = GUICtrlCreateLabel("Messages", 8, 544, 52, 17) GUICtrlCreateEdit("", 80, 536, 337, 33, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL)) $tab = GUICtrlCreateTab(424, 16, 393, 513, $TCS_TOOLTIPS, $TCS_EX_FLATSEPARATORS) $Servertab = GUICtrlCreateTabItem("Server") GUICtrlCreateButton("Get info from server", 437, 53, 145, 33, 0) GUICtrlSetTip(-1, "Press this button to get the server information") GUICtrlCreateButton("Send to server", 603, 53, 145, 33, 0) GUICtrlSetTip(-1, "Press this button to send the information to the server") $Label8 = GUICtrlCreateLabel("Server password", 445, 120, 83, 17) $Input1 = GUICtrlCreateInput("", 541, 117, 105, 21) GUICtrlSetTip(-1, "if you want a server password full in this box and press Set") $Button1 = GUICtrlCreateButton("Set", 653, 117, 57, 25, 0) GUICtrlSetTip(-1, "Add a server password") $Button2 = GUICtrlCreateButton("Remove", 725, 117, 57, 25, 0) GUICtrlSetTip(-1, "Remove the server password") $Label9 = GUICtrlCreateLabel("Server name", 445, 157, 64, 17) $Label10 = GUICtrlCreateLabel("Max. clients", 445, 197, 60, 17) $Label11 = GUICtrlCreateLabel("Max. Ping", 581, 197, 51, 17) $Label12 = GUICtrlCreateLabel("Max. Rate", 445, 237, 53, 17) $Label13 = GUICtrlCreateLabel("Team icons", 581, 237, 59, 17) $Label14 = GUICtrlCreateLabel("Allow voting", 669, 237, 61, 17) $Checkbox1 = GUICtrlCreateCheckbox("", 645, 237, 17, 17) GUICtrlSetTip(-1, "Check to set team icons on") $Checkbox2 = GUICtrlCreateCheckbox("", 733, 237, 17, 17) GUICtrlSetTip(-1, "Check to set voting on") $Input2 = GUICtrlCreateInput("", 517, 197, 49, 21) GUICtrlSetTip(-1, "Max. clients that can enter the sever") $Input3 = GUICtrlCreateInput("", 637, 197, 57, 21) GUICtrlSetTip(-1, "Max. ping that clients can have") $Input4 = GUICtrlCreateInput("", 517, 237, 49, 21) GUICtrlSetTip(-1, "Max. rate that clients can have") $Input5 = GUICtrlCreateInput("", 517, 157, 193, 21) GUICtrlSetTip(-1, "Enter here the server name") $Group1 = GUICtrlCreateGroup("Common Settings", 437, 93, 361, 185) GUICtrlCreateGroup("", -99, -99, 1, 1) $Label15 = GUICtrlCreateLabel("Kill Cam", 445, 309, 41, 17) $Label16 = GUICtrlCreateLabel("Free Look", 445, 347, 52, 17) $Label17 = GUICtrlCreateLabel("Team Balance", 587, 307, 73, 17) $Label18 = GUICtrlCreateLabel("Enemy Spectate", 587, 349, 82, 17) $Checkbox3 = GUICtrlCreateCheckbox("", 513, 307, 17, 17) GUICtrlSetTip(-1, "Check to set kill cam on") $Checkbox4 = GUICtrlCreateCheckbox("", 513, 346, 17, 17) GUICtrlSetTip(-1, "Check to set free look on") $Checkbox5 = GUICtrlCreateCheckbox("", 685, 306, 17, 17) GUICtrlSetTip(-1, "Check to set team balance on") $Checkbox6 = GUICtrlCreateCheckbox("", 685, 344, 17, 17) GUICtrlSetTip(-1, "Check to set enemy spectate on") $Button3 = GUICtrlCreateButton("Set friendly fire", 445, 429, 113, 33, 0) GUICtrlSetTip(-1, "Press to set friendly fire ,Off, On, Reflecteed, Shared") $Checkbox7 = GUICtrlCreateCheckbox("Off", 565, 437, 41, 17) GUICtrlSetTip(-1, "Press to set firendlyfire off") $Checkbox8 = GUICtrlCreateCheckbox("On", 613, 437, 41, 17) GUICtrlSetTip(-1, "Press to set friendly fire on") $Checkbox10 = GUICtrlCreateCheckbox("Shared", 741, 437, 57, 17) GUICtrlSetTip(-1, "Press to set friendly fire shared") $Checkbox9 = GUICtrlCreateCheckbox("Reflected", 661, 437, 73, 17) GUICtrlSetTip(-1, "Press to set friendly fire reflected") $Group2 = GUICtrlCreateGroup("Friendly fire", 429, 413, 377, 65) GUICtrlCreateGroup("", -99, -99, 1, 1) $modestab = GUICtrlCreateTabItem("Modes") $Button5 = GUICtrlCreateButton("Search & Destroy", 441, 59, 113, 25, 0) $Button6 = GUICtrlCreateButton("Death Match", 566, 60, 113, 25, 0) $Button7 = GUICtrlCreateButton("Team Death Match", 687, 60, 113, 25, 0) $Button8 = GUICtrlCreateButton("Capture the Flag", 440, 100, 113, 25, 0) $Button9 = GUICtrlCreateButton("Headquaters", 565, 100, 113, 25, 0) $Label19 = GUICtrlCreateLabel("Grace Period", 445, 157, 66, 17) $Label20 = GUICtrlCreateLabel("Score Limit", 445, 193, 56, 17) $Label21 = GUICtrlCreateLabel("Round Length", 562, 157, 72, 17) $Label22 = GUICtrlCreateLabel("Map Time Limit", 562, 193, 75, 17) $Label23 = GUICtrlCreateLabel("Round Limit", 686, 157, 60, 17) $Label24 = GUICtrlCreateLabel("Map score Limit", 445, 245, 78, 17) $Label25 = GUICtrlCreateLabel("Time Limit", 586, 245, 51, 17) $Label26 = GUICtrlCreateLabel("Map score Limit", 445, 315, 78, 17) $Label27 = GUICtrlCreateLabel("Time Limit", 586, 315, 51, 17) $Label28 = GUICtrlCreateLabel("Map score Limit", 445, 380, 78, 17) $Label29 = GUICtrlCreateLabel("Time Limit", 586, 380, 51, 17) $Label30 = GUICtrlCreateLabel("Map score Limit", 445, 446, 78, 17) $Label31 = GUICtrlCreateLabel("Time Limit", 586, 446, 51, 17) $Input6 = GUICtrlCreateInput("50", 526, 245, 33, 21) $Input7 = GUICtrlCreateInput("30", 644, 244, 33, 21) $Input8 = GUICtrlCreateInput("100", 526, 311, 33, 21) $Input9 = GUICtrlCreateInput("30", 644, 311, 33, 21) $Input10 = GUICtrlCreateInput("5", 526, 377, 33, 21) $Input11 = GUICtrlCreateInput("30", 644, 377, 33, 21) $Input12 = GUICtrlCreateInput("450", 526, 443, 33, 21) $Input13 = GUICtrlCreateInput("30", 644, 443, 33, 21) $Input14 = GUICtrlCreateInput("15", 518, 158, 33, 21) $Input15 = GUICtrlCreateInput("10", 518, 189, 33, 21) $Input16 = GUICtrlCreateInput("4", 644, 158, 33, 21) $Input17 = GUICtrlCreateInput("0", 644, 189, 33, 21) $Input18 = GUICtrlCreateInput("0", 761, 158, 33, 21) $Group3 = GUICtrlCreateGroup("Instant game mode switch", 429, 45, 377, 89) GUICtrlCreateGroup("", -99, -99, 1, 1) $Button10 = GUICtrlCreateButton("Set", 685, 189, 49, 25, 0) $Button11 = GUICtrlCreateButton("Defaults", 741, 189, 57, 25, 0) $Button12 = GUICtrlCreateButton("Set", 685, 244, 49, 25, 0) $Button13 = GUICtrlCreateButton("Set", 685, 311, 49, 25, 0) $Button14 = GUICtrlCreateButton("Set", 685, 377, 49, 25, 0) $Button15 = GUICtrlCreateButton("Set", 685, 443, 49, 25, 0) $Button16 = GUICtrlCreateButton("Defaults", 741, 244, 57, 25, 0) $Button17 = GUICtrlCreateButton("Defaults", 741, 311, 57, 25, 0) $Button18 = GUICtrlCreateButton("Defaults", 741, 377, 57, 25, 0) $Button19 = GUICtrlCreateButton("Defaults", 741, 443, 57, 25, 0) $Group4 = GUICtrlCreateGroup("Seach & Destroy settings", 429, 141, 377, 81) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group6 = GUICtrlCreateGroup("Team Death Match settings", 429, 357, 377, 57) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group8 = GUICtrlCreateGroup("Headquaters settings", 429, 421, 377, 57) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group5 = GUICtrlCreateGroup("Death Match settings", 429, 229, 377, 57) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group7 = GUICtrlCreateGroup("Team Death Match settings", 429, 293, 377, 57) GUICtrlCreateGroup("", -99, -99, 1, 1) $weaponstab = GUICtrlCreateTabItem("Weapons") $Checkbox11 = GUICtrlCreateCheckbox("M1 Carabine", 445, 85, 153, 17) $Checkbox12 = GUICtrlCreateCheckbox("M1 Garand", 445, 111, 153, 17) $Checkbox13 = GUICtrlCreateCheckbox("Thompson", 445, 139, 153, 17) $Checkbox14 = GUICtrlCreateCheckbox("Browing Auto Rfle", 641, 85, 153, 17) $Checkbox15 = GUICtrlCreateCheckbox("Springfield", 641, 111, 153, 17) $Checkbox16 = GUICtrlCreateCheckbox("Greace gun", 641, 139, 153, 17) $Checkbox17 = GUICtrlCreateCheckbox("Lee Enfield", 445, 190, 81, 17) $Checkbox18 = GUICtrlCreateCheckbox("Scoped Lee Enfield", 445, 216, 113, 17) $Checkbox19 = GUICtrlCreateCheckbox("Sten", 445, 242, 41, 17) $Checkbox20 = GUICtrlCreateCheckbox("Bren LMG", 445, 268, 73, 17) $Checkbox21 = GUICtrlCreateCheckbox("PPSH", 641, 190, 49, 17) $Checkbox22 = GUICtrlCreateCheckbox("Mosin Naqant", 641, 216, 89, 17) $Checkbox23 = GUICtrlCreateCheckbox("Scoped Mosin Naqant", 641, 242, 129, 17) $Checkbox24 = GUICtrlCreateCheckbox("MP40", 445, 336, 57, 17) $Checkbox25 = GUICtrlCreateCheckbox("MP44", 445, 361, 57, 17) $Checkbox26 = GUICtrlCreateCheckbox("Kar98", 445, 387, 49, 17) $Checkbox27 = GUICtrlCreateCheckbox("Scoped Kar98", 445, 412, 89, 17) $Checkbox28 = GUICtrlCreateCheckbox("G43", 641, 336, 41, 17) $Checkbox29 = GUICtrlCreateCheckbox("PPS 42", 641, 361, 57, 17) $Checkbox30 = GUICtrlCreateCheckbox("Shotgun", 641, 387, 65, 17) $Checkbox31 = GUICtrlCreateCheckbox("SVT 40", 641, 412, 65, 17) $Button20 = GUICtrlCreateButton("Get from server", 437, 45, 153, 25, 0) $Button21 = GUICtrlCreateButton("Send to server", 607, 45, 153, 25, 0) $Group9 = GUICtrlCreateGroup("Allies", 429, 69, 369, 97) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group10 = GUICtrlCreateGroup("British", 429, 173, 169, 121) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group11 = GUICtrlCreateGroup("Russian", 613, 173, 177, 121) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group12 = GUICtrlCreateGroup("German", 429, 317, 169, 121) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group13 = GUICtrlCreateGroup("Other", 613, 317, 177, 121) GUICtrlCreateGroup("", -99, -99, 1, 1) $playerstab = GUICtrlCreateTabItem("Players") $othertab = GUICtrlCreateTabItem("Other") $Button22 = GUICtrlCreateButton("Get from server", 445, 61, 129, 33, 0) $Button23 = GUICtrlCreateButton("Send to server", 605, 61, 129, 33, 0) $Checkbox32 = GUICtrlCreateCheckbox("Frag Granades", 445, 125, 97, 25) $Checkbox33 = GUICtrlCreateCheckbox("Smoke Granades", 605, 125, 129, 25) $Group14 = GUICtrlCreateGroup("Other settings", 429, 109, 369, 49) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet1 = GUICtrlCreateTabItem("Punkbuster") GUICtrlCreateTabItem("") $Button4 = GUICtrlCreateButton("Disconnect", 272, 73, 129, 25, 0) GUICtrlSetTip(-1, "Press to disconnect from a server") $MenuItem4 = GUICtrlCreateMenu("&File") $MenuItem5 = GUICtrlCreateMenuItem("Save message log", $MenuItem4) $MenuItem6 = GUICtrlCreateMenuItem("Clear message log", $MenuItem4) $MenuItem7 = GUICtrlCreateMenuItem("Save rcon log", $MenuItem4) $MenuItem8 = GUICtrlCreateMenuItem("Clear rcon log", $MenuItem4) $MenuItem9 = GUICtrlCreateMenuItem("Exit", $MenuItem4) $MenuItem3 = GUICtrlCreateMenu("&Common tasks") $MenuItem14 = GUICtrlCreateMenuItem("Restart map", $MenuItem3) $MenuItem15 = GUICtrlCreateMenuItem("Fast restart", $MenuItem3) $MenuItem13 = GUICtrlCreateMenuItem("Friendly fire on", $MenuItem3) $MenuItem12 = GUICtrlCreateMenuItem("Friendly fire off", $MenuItem3) $MenuItem11 = GUICtrlCreateMenuItem("Friendly fire reflected", $MenuItem3) $MenuItem10 = GUICtrlCreateMenuItem("Friendly fire shared", $MenuItem3) $MenuItem2 = GUICtrlCreateMenu("&Game mode") $MenuItem16 = GUICtrlCreateMenuItem("Search & Destroy", $MenuItem2) $MenuItem17 = GUICtrlCreateMenuItem("Deathmatch", $MenuItem2) $MenuItem18 = GUICtrlCreateMenuItem("Capture the flag", $MenuItem2) $MenuItem19 = GUICtrlCreateMenuItem("Team Deathmatch", $MenuItem2) $MenuItem20 = GUICtrlCreateMenuItem("Headquaters", $MenuItem2) $MenuItem1 = GUICtrlCreateMenu("&Help") $MenuItem21 = GUICtrlCreateMenuItem("MenuItem21", $MenuItem1) $MenuItem22 = GUICtrlCreateMenuItem("MenuItem22", $MenuItem1) $MenuItem23 = GUICtrlCreateMenuItem("About", $MenuItem1) GUISetState(@SW_SHOW) While 1 UDPStartup() $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $connect connect() Case $Button23 Case $tab EndSwitch WEnd Func connect() If GUICtrlRead($serverip) = "" or GUICtrlRead($serverport) = "" or GUICtrlRead($serverpassword) = ""Then MsgBox(48,"Error","Please full in all forms to connect to a server") Else $ip = GUICtrlRead($serverip) $port = GUICtrlRead($serverport) $password = GUICtrlRead($serverpassword) $socket = UDPBind($ip, $port) UDPOpen($ip,$port) UDPSend($socket,"ÿÿÿÿ rcon" & $password) EndIf EndFunc As you can see i made a func... Only it does not work.. It needs to read the ip,port and password and then send it to the server. What am i doing wrong? Some who can help me? I know there is here an topic for quake mabey he can help me? I little problem, hard to find and fix Link to comment Share on other sites More sharing options...
i542 Posted May 9, 2007 Share Posted May 9, 2007 ...i think there was a forum before I came here called Gaming and bots.(...)Gaming questions may not be asked in the other forums unless they are phrased politely as a non-gaming question. (...)View the whole topici542 I can do signature me. Link to comment Share on other sites More sharing options...
Erik. Posted May 9, 2007 Author Share Posted May 9, 2007 Deleted... I hope you can help me here and do not close this topic.. it has noting whit bots, or gaming only how to control a server so nothing whit wallhacks aimbot ect.. I little problem, hard to find and fix Link to comment Share on other sites More sharing options...
i542 Posted May 9, 2007 Share Posted May 9, 2007 Deleted... I hope you can help me here and do not close this topic..it has noting whit bots, or gaming only how to control a server so nothing whit wallhacks aimbot ect..I think Remote Admin Project (by Mandar) can help you...i542 I can do signature me. Link to comment Share on other sites More sharing options...
Erik. Posted May 9, 2007 Author Share Posted May 9, 2007 can not found it whit the search...link? Mabey someone can help me whit this? I am trying it about 2 days but i can not found what i am doing wrong I little problem, hard to find and fix Link to comment Share on other sites More sharing options...
i542 Posted May 9, 2007 Share Posted May 9, 2007 Actually, do you have a MSN? This link can help you:http://www.autoitscript.com/forum/index.php?showtopic=25527Controling PC via messenger.i542 I can do signature me. Link to comment Share on other sites More sharing options...
Erik. Posted May 9, 2007 Author Share Posted May 9, 2007 Yes i have MSN, Thanks i take a look I little problem, hard to find and fix Link to comment Share on other sites More sharing options...
i542 Posted May 9, 2007 Share Posted May 9, 2007 (edited) ThanksAny time i542EDIT: typo Edited May 9, 2007 by i542 I can do signature me. Link to comment Share on other sites More sharing options...
Erik. Posted May 9, 2007 Author Share Posted May 9, 2007 The only problem is.. i need to send a command whit a password and wait till i get a message back and put it into a guictrlcreatetext I little problem, hard to find and fix Link to comment Share on other sites More sharing options...
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