Mumms

yep they do, and ill take a look at it, didn't see his statment at the bottom haha. Thanks!

Hey, I'm getting the same error as listed above, here is my code: Func sendColours($msg) colors() If $msg <> "" Then For $Ox = 0 to UBound($SOCKET) - 1 If $SOCKET[$Ox] <> "" Then If TCPSend($SOCKET[$Ox], "COLOURS" & $c1 & $c2 & $c3 & $c4) == 0 And @error Then TCPCloseSocket($SOCKET[$Ox]) _ArrayDelete($SOCKET,$Ox) _ArrayDelete($NICKS,$Ox) Sleep(1000) EndIf EndIf Next EndIf EndFunc Any Help?

Thanks for the Help, I got it working using a Hamachi VPN. Now is it possible to send color messages like through a GUI, and / or a Sound, if they have the file?

But this isn't a game automation. For example if someone is constantly swearing in our server, I want to message an admin that there is someone doing it. Then the admin will go into the game and check it out. So the Bot is just reading logs and if something it sees is wrong it flags an admin. Thats it P.S - The name doesn't really mean its a bot. Basicly the program is for our admins. ITs annoying to sit and watch the server 24/7 when they have other shit they could be doing. This just messages them when they are needed.

So my program is an "Admin Bot" for Soldier of Fortune 2. When Players "report" another player while in game, It logs thier Id, and the reason they were reported. When a player has been reported 3 times, I want it to send an admin running the program a message saying that they are needed in the server, but have no clue how to do that. My guess would be to use TCP but have to clue how to make it work, any help Func reportAdd() $kill = IniRead("demo/MP/AdminBot/Reports.ini", "ID: " & $userName, $reason,0) $kills = ($kill + 1) $totalReport = IniRead("demo/MP/AdminBot/Reports.ini", "ID: " & $userName, "Total Reports ",0) $totalReports = ($totalReport + 1) IniWrite("demo/MP/AdminBot/Reports.ini", "ID: " & $userName, $reason, $kills) IniWrite("demo/MP/AdminBot/Reports.ini", "ID: " & $userName, "Total Reports ", $totalReports) If $totalReports = 3 Then _KickReportWarn() Elseif $totalReports = 5 Then _KickReport() Else printReport() EndIf EndFunc Func printReport() $s_FileName = _TempFile("demo/MP/", "vPlaybind", ".cfg") FileWrite("demo/MP/vPlaybind.cfg",'rcon "') FileWrite("demo/MP/vPlaybind.cfg","^3[^3AdminBot^3]^7: ID: ^3" & $userName & " ^7has been reported for: ^3" & $reason) FileWrite("demo/MP/vPlaybind.cfg",'"') Sleep(1755) Send("{Home}") FileDelete("demo/MP/vPlaybind.cfg") EndFunc Func _KickReportWarn() $s_FileName = _TempFile("demo/MP/", "vPlaybind", ".cfg") FileWrite("demo/MP/vPlaybind.cfg",'rcon "') FileWrite("demo/MP/vPlaybind.cfg","^3[^3AdminBot^3]^7: ID: ^3" & $userName & " ^7has been reported ^33 ^7or more times.") FileWrite("demo/MP/vPlaybind.cfg",'"') Sleep(1755) Send("{Home}") FileDelete("demo/MP/vPlaybind.cfg") _SendAdmin() EndFunc Func _SendAdmin() $s_FileName = _TempFile("demo/MP/", "vPlaybind", ".cfg") FileWrite("demo/MP/vPlaybind.cfg",'rcon "') FileWrite("demo/MP/vPlaybind.cfg","^3[^3AdminBot^3]^7: ID: ^3" & $userName & " ^7has been ^3Reported^7 to an Admin.") FileWrite("demo/MP/vPlaybind.cfg",'"') Sleep(1755) ;This is where i would add the TCP message or whatever I need to do. _GetStatus() EndFunc

Thanks for the fast response.

There are no errors when I Syntex Check, and I can compile this and run it. But Then I get an error saying that a variable has be used without being declared. . Logicly This should work, as far as I can tell and it shouldn't be giving me this error. Any help with fixing this? Thanks.

On Most modems, there is a button called "standby". When pressed it blocks you from receiving interet until pressed again. Is there anyway you could write a program that copied the standby button? Any hints?

@sahsanu Thank you so much! your script worked perfectly. Can you explain how you made the pattern work though? @everyone else Thank you very much for posting. Your scripts have gave me new ideas that I will most likely use! Once again thanks for the help

Thanks for all the help, but Its not quite what I'm looking for. Sure your code works when you know what the Text is. But this is a log file so I don't always know what "mixx" would be. So here is what i want to do. I want to get a returned string that is from the first ^7 to the left of "^7 was shot by Mumms" so for example this is what it would say in the log file. "^7Some Name Here^7was shot by Mumms" So i want it to return "^7Some Name Here" So im searching for "^7was shot by Mumms" in the log file and then i need to go to the left until the next ^7 and then get that string that is inbetween those two spots. Sorry I don't know how to explain this properly, So im trying to make it as simple as possible. Thanks again!

So here is what I want to do: I get the postion of the string in the string I search. (StringInStr) I want to go to the left of that substring until I get to the next ^7 Then I want to get the string that is inbetween the two "^7" Here is what I have so far: FileGetTime($file) If Not @error Then FileOpen($file, 0) $line = FileReadLine($file, -1) $wik = StringInStr($line, "^7 was shot by " & $User, 2) If $wik > 1 Then ;####This is where I need help :p#### Sleep(2500) EndIf Sorry if this doesn't make much sense. *Edit I added this hopefully to explain more* ^7mixx^7 was shot by Mumms ~> This is an example of a line in the file im reading Mumms = $User in script So lets say that the return value for $wik was 10. I want to go left until the next ^7 so that would be 4? And then i want to stringsplit or something so that I only get: "mixx"

for $i = 0 to stringlen($line) $getBadChar = stringmid($line,($fp + 4),$i) If $getBadChar = "e" or "^" or StringIsUpper($getBadChar) or StringIsDigit($getBadChar) Then ;This is where I want to get the postion of where the $getBadChar is so that I can get a string that starts at ; ($fp + 4) and ends at ($getBadChar - 1) EndIf Any Help?

Thanks for all of the help but I'm having problems :/ This is the error I got when I tried to run my program. Error: Subscript used with non-Array variable. Func getColors() FileGetTime("demo/MP/qconsole.log") If Not @error Then FileOpen("demo/MP/qconsole.log", 0) $line2 = FileReadLine($file, -1) $fairplayline = StringInStr($line2, "fairplay", 2) $fairplayline = ($fairplayline - 2) If $fairplayline > 1 Then If $fpcolor = stringmid($line2,$fairplayline,1) Then for $i = 0 to stringlen($line2) If $fpcolor = "^" Then $fpcolor = stringmid($line2, ($fairplayline + 1),1) EndIf Next EndIf EndIf EndIf bind() EndFunc Little Help?

I am opening a file and reading it, and I get this line from the file I am reading.: ^*^6fairplay ^Nchris ^&14:32:08 ^<demobase.eu What I need is the charactor after the ^ only. (so the 6, N, &, < ) I don't want any other part of the string. I've tried to split up this string but it is not really working. Are there any other methods to get the charactors after the ^

Thank you for all the replies, It has really helpped!

So any coding hints to get me started

Here is my code. What it is doing, is opening the log file every loop and reading the last line to see if someone says "@vp" Is there anyway i can do this a different way that wouldn't make the user lag so badly, because I have had a ton of complaints. While 1 $vp = 0 FileClose($file) FileOpen("demo/MP/qconsole.log", 0) $line = FileReadLine($file, -1) $vp = StringInStr($line, "@vp", 2) If $vp > 1 Then bind() Sleep(3000) EndIf Wend

Thank you so much!

Here is what i am doing. I'm opening the log file for the game i play. Im then reading the last line of the log file to see it someone, or myself has typed "@vp" If they have the i will type, it worked. It seems to be reading the log file properly, but it never works because it is reading the whole line of code. So here is my question. Is it possible to get it to search the line that it gets for only the string of "@vp". While 1 FileOpen("qconsole.log", 0) $line = FileReadLine($file, -1) If $line = "@vp" Then Send("t it worked.") Send("{ENTER}") EndIf FileClose($file) Wend This is what the line looks like (when someone chats) in the log file if it helps: ^4Trime | Team.v!p |^7: ^2^*@vp But everyone's name and the color they type with is different, (so i can't break it into multiple strings with *) Thanks you!

40 + views and no reply

Sorry I guess I wasn't clear The Injector that was injecting the .dll file was infected, not the .dll file itself. So I was wondering if someone could help me by giving some hints on what I need to do in order to inject the file into my game. (Which is SoF2) So I want to create my own injector using Autoit, but don't know where to start and need some help

I have downloaded a .dll that is a wicked crosshair for a game that I play. When doing a virus scan, AVG found that the injector was infected, so it fixed the problem, but now I can't play with the crosshair So I was wondering if anyone could point me in a general direction to inject this .dll into my game. Thanks!

C:\Program Files\AutoIt3\Include\AES.Au ~~~~~~~~~~~~~~~~~3(255,20) : ERROR: undefined macro. If @AutoItUnicode Then~^ This is the error I get. What can I do to fix it :/

Hi, i was wondering if it was possible to make it so that my program would automaticly run when i start my computer. Im making a program that every time i start my computer, i want it to have a pop up box that says password: if the person gets it wrong then it will log in a txt file that someone tried to get on at this time and was wrong. That way i can prove that my brother is fucking with my stuff Thanks.

LOL! Im not cheating, if you would read my post, i just want it so that when i press " mouse2 " to zoom in, it sends " ' " to change my gunfire to single and then when i zoom out again, it changes back, how is that cheating? Its just laziness. your dumb, Mumms