fastnick1oo Posted July 12, 2007 Share Posted July 12, 2007 How to? Any idea? I was trying to include randomly generated file, but it ain't working. Thanks in advance. SciTE - much better than notepad. ; ] Link to comment Share on other sites More sharing options...
Uten Posted July 12, 2007 Share Posted July 12, 2007 Why would you do that? Please keep your sig. small! Use the help file. Search the forum. Then ask unresolved questions :) Script plugin demo, Simple Trace udf, TrayMenuEx udf, IOChatter demo, freebasic multithreaded dll sample, PostMessage, Aspell, Code profiling Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted July 12, 2007 Moderators Share Posted July 12, 2007 How to? Any idea?I was trying to include randomly generated file, but it ain't working.Thanks in advance.It's only going to flag that exe as a threat doing something like that ... Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
Bert Posted July 12, 2007 Share Posted July 12, 2007 The only reason I know to do something like that is to hide the exe, or make a file that is harmful. This one gives me the creaps. The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
spac3m0nk3y Posted July 12, 2007 Share Posted July 12, 2007 I think you're going to need to explain your intentions a little better if you want help. Website: http://www.mayniac.org Link to comment Share on other sites More sharing options...
fastnick1oo Posted July 12, 2007 Author Share Posted July 12, 2007 (edited) Sry, sry - I was away a bit. I'm explaining it right now... I want to make something like "extreamly hard to detect cheat base" for... dunno, css cheats (I got one - which slows my shooting, for better accuracy). Here is code: expandcollapse popup; What to do: ; randomize filesize ; randomize file creation time ; 07.07.2007 -> 08.07.2007 -> 09.07.2007 ; Kecz4p If DriveGetFileSystem(StringLeft(@ScriptDir, 3)) <> "NTFS" Then MsgBox(0, StringTrimRight(@ScriptName, 4), "NTFS filesystem only.") Exit EndIf Dim $useOnce[2] = [0, 0] If $CmdLine[0] > 0 Then For $i = 1 To $CmdLine[0] Step 1 Switch $CmdLine[$i] Case "/?" ; DOS-based help needed..! Msgbox(0, StringTrimRight(@ScriptName, 4), "Help:" & @CRLF & " baseName - go back to scripts base name" & @CRLF & " safeMode:[ON/OFF] - set random filename generation on/off") Exit Case "safeMode:ON" If $useOnce[0] Then Exit Else IniWrite(@ScriptName & ":ini", "main", "safeMode", "1") If Not $useOnce[1] Then IniWrite(@ScriptName & ":ini", "main", "genName", "1") $useOnce[0] = 1 EndIf Case "safeMode:OFF" If $useOnce[0] Then Exit Else IniWrite(@ScriptName & ":ini", "main", "safeMode", "0") If Not $useOnce[1] Then IniWrite(@ScriptName & ":ini", "main", "genName", "0") $useOnce[0] = 1 EndIf Case "baseName" If $useOnce[1] Then Exit Else IniWrite(@ScriptName & ":ini", "main", "genName", "-1") $useOnce[1] = 1 EndIf EndSwitch Next EndIf If @Compiled Then $newName = "" Switch Int(IniRead(@ScriptName & ":ini", "main", "genName", "0")) Case 1 #NoTrayIcon Do Sleep(2) $newName = _GetRandName(0) & ".exe" Until FileMove(@ScriptName, $newName, 0) Case -1 #NoTrayIcon $newName = "some_code.exe" FileMove(@ScriptName, $newName, 1) EndSwitch If $newName Then IniWrite($newName & ":ini", "main", "genName", "0") Run($newName) Exit EndIf EndIf #include <Misc.au3> #Include <Constants.au3> if Not _Singleton("hack base", 1) Then Msgbox(0, StringTrimRight(@ScriptName, 4), "Multirun use detected.", 1) Exit EndIf Opt("OnExitFunc", "_Exit") Opt("TrayMenuMode", 1) HotKeySet("{NUMPADSUB}", "_Exit") $name = StringTrimRight(@ScriptName, 4) $ini = @ScriptName & ":ini" TrayCreateItem("") $about = TrayCreateItem("About") $exit = TrayCreateItem("Exit") TraySetClick(8) TraySetToolTip($name) TraySetState(1) Func _GetRandName($special = 1, $min = 8, $max = 12) If $min < 1 Then Return 0 If $max > 32 Then Return 0 If $min > $max Then Return 0 $str = "" $max = Random($min, $max, 1) For $i = 1 To $max Step 1 If $i = 1 Or $i = $max Or Not $special Then $num = Random(1, 9, 1) Else $num = Random(1, 10, 1) EndIf Switch $num Case 1 To 3 $str &= Chr(Random(97, 122, 1)) Case 4 To 6 $str &= Chr(Random(65, 90, 1)) Case 7 To 9 $str &= Random(0, 9, 1) Case 10 Switch Random(1, 23, 1) Case 1 $str &= "!" Case 2 $str &= "#" Case 3 $str &= "$" Case 4 $str &= "%" Case 5 $str &= "&" Case 6 $str &= "`" Case 7 $str &= "(" Case 8 $str &= ")" Case 9 $str &= "+" Case 10 $str &= "," Case 11 $str &= "-" Case 12 $str &= "." Case 13 $str &= ";" Case 14 $str &= "=" Case 15 $str &= "@" Case 16 $str &= "[" Case 17 $str &= "]" Case 18 $str &= "^" Case 19 $str &= "_" Case 20 $str &= "'" Case 21 $str &= "{" Case 22 $str &= "}" Case 23 $str &= "~" EndSwitch EndSwitch Next Return $str EndFunc Func _Exit() If Int(IniRead($ini, "main", "safeMode", "0")) Then IniWrite($ini, "main", "genName", "1") HotKeySet("{NUMPADSUB}") Exit EndFunc While 1 Sleep(2) TrayTip($name, "This script does nothing...", 1) WEnd Queoted parts are the one I need to solve out (random size, creation date, DOS-like help msg). Edited July 12, 2007 by fastnick1oo SciTE - much better than notepad. ; ] Link to comment Share on other sites More sharing options...
Bert Posted July 12, 2007 Share Posted July 12, 2007 sorry dude...no can do. The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
fastnick1oo Posted July 12, 2007 Author Share Posted July 12, 2007 (edited) ...anyone? @Volly As i can see, all ppl who know much (more) about coding have it's own sense od "good and evil". If someone tries to code soemthing "dangerous" they stop providing help. It's... hmm... Coding is my hobby, I really enjoy it, every new stuff I'm trying to do is sorta like adventure to find answer. Not to use it in "hell's-millenium-virus-of-all-the-times-to-destroy-the-earth". ; P If you can't provide me with straight-to-do help, could you point me a direction? ...and what about "DOS-like help msg"? Peace! ; ) Edited July 12, 2007 by fastnick1oo SciTE - much better than notepad. ; ] 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