Daniel W. Posted April 26, 2006 Share Posted April 26, 2006 (edited) Hi, this is my first real programm. You need to Compile it before you start it. First you choose on which Key you want to bind something ( F1-F12 and Numblock) and then the weapons etc. you want to bind on... At the moment it is on german but tomorrow i will upload an english version Here is the code: expandcollapse popup#include <GUIConstants.au3> $anfang = FileReadLine( @ScriptDir & "\userconfig.cfg", 1) If $anfang = "" Then FileWrite( @ScriptDir & "\userconfig.cfg", "///////////////" & @CRLF & "// Buyscript //" & @CRLF & "///////////////" & @CRLF) EndIf GUICreate("Buyscript", 320, 190) GUICtrlCreateLabel("Choose the button on which you want to bind something!",10, 10) $F1 = GUICtrlCreateCheckbox("F1", 10, 30) $F2 = GUICtrlCreateCheckbox("F2", 10, 50) $F3 = GUICtrlCreateCheckbox("F3", 10, 70) $F4 = GUICtrlCreateCheckbox("F4", 10, 90) $F5 = GUICtrlCreateCheckbox("F5", 10, 110) $F6 = GUICtrlCreateCheckbox("F6", 10, 130) $F7 = GUICtrlCreateCheckbox("F7", 10, 150) $F8 = GUICtrlCreateCheckbox("F8", 50, 30) $F9 = GUICtrlCreateCheckbox("F9", 50, 50) $F10 = GUICtrlCreateCheckbox("F10", 50, 70) $F11 = GUICtrlCreateCheckbox("F11", 50, 90) $F12 = GUICtrlCreateCheckbox("F12", 50, 110) $NB0 = GUICtrlCreateCheckbox("0", 90, 30) $NB1 = GUICtrlCreateCheckbox("1", 90, 50) $NB2 = GUICtrlCreateCheckbox("2", 90, 70) $NB3 = GUICtrlCreateCheckbox("3", 90, 90) $NB4 = GUICtrlCreateCheckbox("4", 90, 110) $NB5 = GUICtrlCreateCheckbox("5", 90, 130) $NB6 = GUICtrlCreateCheckbox("6", 90, 150) $NB7 = GUICtrlCreateCheckbox("7", 130, 30) $NB8 = GUICtrlCreateCheckbox("8", 130, 50) $NB9 = GUICtrlCreateCheckbox("9", 130, 70) $NBSLASH = GUICtrlCreateCheckbox("Slash", 170, 30) $NBSTERN = GUICtrlCreateCheckbox("Star", 170, 50) $NBMINUS = GUICtrlCreateCheckbox("Minus", 170, 70) $NBPLUS = GUICtrlCreateCheckbox("Plus", 170, 90) $NBENTER = GUICtrlCreateCheckbox("Enter", 170, 110) $NBKOMMA = GUICtrlCreateCheckbox("Dot", 170, 130) GUISetState() While 1 $msg = GUIGetMsg() $i = 1 Select Case $msg = $F1 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F1") weapon() Case $msg = $F2 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F2") weapon() Case $msg = $F3 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F3") weapon() Case $msg = $F4 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F4") weapon() Case $msg = $F5 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F5") weapon() Case $msg = $F6 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F6") weapon() Case $msg = $F7 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F7") weapon() Case $msg = $F8 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F8") weapon() Case $msg = $F9 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F9") weapon() Case $msg = $F10 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F10") weapon() Case $msg = $F11 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F11") weapon() Case $msg = $F12 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind F12") weapon() Case $msg = $NB0 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_INS") weapon() Case $msg = $NB1 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_END") weapon() Case $msg = $NB2 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_DOWNARROW") weapon() Case $msg = $NB3 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_PGDN") weapon() Case $msg = $NB4 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_LEFTARROW") weapon() Case $msg = $NB5 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_5") weapon() Case $msg = $NB6 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_RIGHTARROW") weapon() Case $msg = $NB7 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_HOME") weapon() Case $msg = $NB8 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_UPARROW") weapon() Case $msg = $NB9 FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_PGUP") weapon() Case $msg = $NBKOMMA FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_DEL") weapon() Case $msg = $NBENTER FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_ENTER") weapon() Case $msg = $NBMINUS FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_MINUS") weapon() Case $msg = $NBPLUS FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_PLUS") weapon() Case $msg = $NBSLASH FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind KP_SLASH") weapon() Case $msg = $NBSTERN FileWrite( @ScriptDir & "\userconfig.cfg", @CRLF & "bind *") weapon() Case $msg = $GUI_EVENT_CLOSE ProcessClose("buyscript.exe") EndSelect WEnd Func weapon() GUICreate("Buyscript", 550, 250) ;Pistols GUICtrlCreateGroup("Pistols", 5, 10, 80, 150) $glock = GUICtrlCreateRadio("Glock", 10, 30) $usp = GUICtrlCreateRadio("Usp", 10, 50) $p228 = GUICtrlCreateRadio("P228", 10, 70) $deagle = GUICtrlCreateRadio("Deagle", 10, 90) $dual = GUICtrlCreateRadio("Duals", 10, 110) $fiveseven = GUICtrlCreateRadio("FiveSeven", 10, 130) GUICtrlCreateGroup("", -99, -99, 1, 1) ;Shotguns GUICtrlCreateGroup("Pumpguns", 95, 10, 80, 70) $m3 = GUICtrlCreateRadio("M3", 100, 30) $xm1014 = GUICtrlCreateRadio("xm1014", 100, 50) GUICtrlCreateGroup("", -99, -99, 1, 1) ;Machine Guns GUICtrlCreateGroup("Machine Guns", 185, 10, 80, 130) $mac10 = GUICtrlCreateCheckbox("Mac10", 190, 30) $tmp = GUICtrlCreateCheckbox("TMP", 190, 50) $mp5 = GUICtrlCreateCheckbox("MP5", 190, 70) $ump = GUICtrlCreateCheckbox("UMP", 190, 90) $p90 = GUICtrlCreateCheckbox("P90", 190, 110) GUICtrlCreateGroup("", -99, -99, 1, 1) ;Rifles GUICtrlCreateGroup("Rifles", 275, 10, 80, 230) $famas = GUICtrlCreateCheckbox("Famas", 280, 30) $galil = GUICtrlCreateCheckbox("Galil", 280, 50) $scout = GUICtrlCreateCheckbox("Scout", 280, 70) $ak47 = GUICtrlCreateCheckbox("AK", 280, 90) $m4a1 = GUICtrlCreateCheckbox("M4A1", 280, 110) $bullpup = GUICtrlCreateCheckbox("Bullpup", 280, 130) $sg550 = GUICtrlCreateCheckbox("SG550", 280, 150) $awp = GUICtrlCreateCheckbox("AWM", 280, 170) $g3sg1 = GUICtrlCreateCheckbox("G3SG1", 280, 190) $d3au1 = GUICtrlCreateCheckbox("D3AU1", 280, 210) GUICtrlCreateGroup("", -99, -99, 1, 1) ;Para GUICtrlCreateGroup("Para", 365, 10, 80, 50) $para = GUICtrlCreateCheckbox("Para", 370, 30) GUICtrlCreateGroup("", -99, -99, 1, 1) ;Equipment GUICtrlCreateGroup("Equipment", 455, 10, 80, 210) $prim = GUICtrlCreateCheckbox("PrimAmmo", 460, 30) $sec = GUICtrlCreateCheckbox("SecAmmo", 460, 50) $defuser = GUICtrlCreateCheckbox("Defusekit", 460, 70) $vest = GUICtrlCreateCheckbox("Weste", 460, 90) $vesthelm = GUICtrlCreateCheckbox("Westhelm", 460, 90) $flash = GUICtrlCreateCheckbox("Flash", 460, 110) $he = GUICtrlCreateCheckbox("HE", 460, 130) $smoke = GUICtrlCreateCheckbox("Smoke", 460, 150) $nightvision = GUICtrlCreateCheckbox("Nightvision", 460, 170) $shield = GUICtrlCreateCheckbox("Shield", 460, 190) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState() While 1 $msg = GUIGetMsg() Select ;Pistols Case $msg = $glock If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";glock") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""glock") EndIf Case $msg = $usp If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";usp") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""usp") EndIf Case $msg = $p228 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";p228") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""p228") EndIf Case $msg = $deagle If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";deagle") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""deagle") EndIf Case $msg = $dual If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";elites") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""elites") EndIf Case $msg = $fiveseven If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";fiveseven") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""fiveseven") EndIf ;Shotguns Case $msg = $m3 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";m3") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""m3") EndIf Case $msg = $xm1014 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";xm1014") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""xm1014") EndIf ;Machine Guns Case $msg = $mac10 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";mac10") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""mac10") EndIf Case $msg = $tmp If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";tmp") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""tmp") EndIf Case $msg = $mp5 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";mp5") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""mp5") EndIf Case $msg = $ump If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";ump45") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""ump45") EndIf Case $msg = $p90 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";p90") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""p90") EndIf ;Rifles Case $msg = $famas If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";famas") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""famas") EndIf Case $msg = $galil If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";defender") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""defender") EndIf Case $msg = $scout If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";scout") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""scout") EndIf Case $msg = $ak47 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";ak47") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""ak47") EndIf Case $msg = $m4a1 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";m4a1") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""m4a1") EndIf Case $msg = $bullpup If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";aug") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""aug") EndIf Case $msg = $sg550 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";sg552") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""sg552") EndIf Case $msg = $awp If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";awp") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""awp") EndIf Case $msg = $g3sg1 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";g3sg1") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""g3sg1") EndIf Case $msg = $d3au1 If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";d3au1") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""d3au1") EndIf ;Para Case $msg = $para If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";m249") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""m249") EndIf ;Equipment Case $msg = $prim If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";primammo") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""primammo") EndIf Case $msg = $sec If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";secammo") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""secammo") EndIf Case $msg = $defuser If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";defuser") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""defuser") EndIf Case $msg = $vest If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";vest") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""vest") EndIf Case $msg = $vesthelm If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";vesthelm") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""vesthelm") EndIf Case $msg = $flash If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";flash") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""flash") EndIf Case $msg = $he If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";hegren") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""hegren") EndIf Case $msg = $smoke If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";sgren") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""sgren") EndIf Case $msg = $nightvision If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";nvgs") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""nvgs") EndIf Case $msg = $shield If FileReadLine("C:\asdf.txt", 1) <> "" Then FileWrite( @ScriptDir & "\userconfig.cfg", ";shield") Else FileWrite("C:\asdf.txt", "x") FileWrite( @ScriptDir & "\userconfig.cfg", " ""shield") EndIf Case $msg = $GUI_EVENT_CLOSE FileDelete("C:\asdf.txt") FileWrite( @ScriptDir & "\userconfig.cfg", """ ") ProcessClose("buyscript.exe") EndSelect WEnd EndFunc If you got ideas to improve Tell me Edited April 29, 2006 by Daniel W. --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
Xenobiologist Posted April 26, 2006 Share Posted April 26, 2006 Hi, I don't play the game, but I thought there are already shortcuts in the game for that. So long, Mega Scripts & functions Organize Includes Let Scite organize the include files Yahtzee The game "Yahtzee" (Kniffel, DiceLion) LoginWrapper Secure scripts by adding a query (authentication) _RunOnlyOnThis UDF Make sure that a script can only be executed on ... (Windows / HD / ...) Internet-Café Server/Client Application Open CD, Start Browser, Lock remote client, etc. MultipleFuncsWithOneHotkey Start different funcs by hitting one hotkey different times Link to comment Share on other sites More sharing options...
Daniel W. Posted April 26, 2006 Author Share Posted April 26, 2006 What do you mean with shortcuts? Buyscript means that when you hit the Key F1 for example you get a primary weapon , a new pistol , munition, grenades , vest etc. with just one keypress and not more.. --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
Busti Posted April 26, 2006 Share Posted April 26, 2006 (edited) what the helll^^ nice script but tooooooooooooooooooooooooooooo much code..^^ i think i will release my script0r here^^ its a scripting programm(editor) for counter-strike Edited April 26, 2006 by Busti My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity Link to comment Share on other sites More sharing options...
Daniel W. Posted April 26, 2006 Author Share Posted April 26, 2006 Yes much code but it's my first programm and i dont know how to make it without that much code... --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
Busti Posted April 26, 2006 Share Posted April 26, 2006 (edited) Yes much code but it's my first programm and i dont know how to make it without that much code...use combo box! Case $msg = $GUI_EVENT_CLOSE ProcessClose("start.exe") processclose("start.exe") ~~ exit^^ Edited April 26, 2006 by Busti My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity Link to comment Share on other sites More sharing options...
ConsultingJoe Posted April 27, 2006 Share Posted April 27, 2006 why do I get an error for run( @ScriptDir & "\buyscript" ) its right but i get an error>? [center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center] Link to comment Share on other sites More sharing options...
Busti Posted April 27, 2006 Share Posted April 27, 2006 run( @ScriptDir & "\buyscript.exe" ) ? My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity Link to comment Share on other sites More sharing options...
ConsultingJoe Posted April 28, 2006 Share Posted April 28, 2006 run( @ScriptDir & "\buyscript.exe" )?yeah he has two scripts. for some reason the run command doesn't run it. I don't think it is his script tho? I don;t know what it is [center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center] Link to comment Share on other sites More sharing options...
kclteam Posted April 28, 2006 Share Posted April 28, 2006 You could bind the keys in-game for multiple buying. If you need m4a1, deagle, kevlar, vest, defuser with one key, then all you have to do is type in following in console: bind "F1" "m4a1; deagle; vest; helmvest; defuser" But since this is your first program...welcome to the community, hope to see more of your programs I believe we should all pay our tax with a smile. I tried - but they wanted cash! Link to comment Share on other sites More sharing options...
Daniel W. Posted April 29, 2006 Author Share Posted April 29, 2006 hello, last days i got no inet so here is a new version. if there are wrong english sentences then tell me... I am working on an update now to make it not possible to bind 2 or more pistols on one key --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
Busti Posted April 29, 2006 Share Posted April 29, 2006 hello,last days i got no inet so here is a new version.if there are wrong english sentences then tell me...I am working on an update now to make it not possible to bind 2 or more pistols on one keyhi daniel, i said somethink about a gui with combos, see my release of script0r, under tools - buymenumaker you will see what i meant^^ive done this long time ago, veryvery old prj. of me now i started using it again! now its growing better and better if you want some help oder some testers im there ! My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity Link to comment Share on other sites More sharing options...
Daniel W. Posted April 29, 2006 Author Share Posted April 29, 2006 Ok thanks busti are you german? maybe you know me / i know you from another forum --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
Busti Posted April 29, 2006 Share Posted April 29, 2006 Ok thanks busti are you german? maybe you know me / i know you from another forumyep iam, but now b2t , send me pm bout this My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity Link to comment Share on other sites More sharing options...
w0uter Posted April 30, 2006 Share Posted April 30, 2006 my buyscript has ALT+1-9 maby you should support modifiers too ? My UDF's:;mem stuff_Mem;ftp stuff_FTP ( OLD );inet stuff_INetGetSource ( OLD )_INetGetImage _INetBrowse ( Collection )_EncodeUrl_NetStat_Google;random stuff_iPixelSearch_DiceRoll Link to comment Share on other sites More sharing options...
Busti Posted April 30, 2006 Share Posted April 30, 2006 my buyscript has ALT+1-9 maby you should support modifiers too ?in counterstrike youcan use ALT key ?! My UDF's : Startet on : 06.06.2006_CaseSearchOrReplaceStr();~> Searches OR Replaces a String,;~> With or Without Casesensivity Link to comment Share on other sites More sharing options...
Daniel W. Posted April 30, 2006 Author Share Posted April 30, 2006 (edited) You can'use the Alt 1-9 Keys in CS but its not much used because 1-9 is used for Slots and alt is just like ctrl ... Edited April 30, 2006 by Daniel W. --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote] Link to comment Share on other sites More sharing options...
akm16 Posted May 1, 2012 Share Posted May 1, 2012 Stupid. You Can create Config file and put this file like resource into file when you compilated the script and you need just find where counter-strike folder to put it CFG. Link to comment Share on other sites More sharing options...
BrewManNH Posted May 1, 2012 Share Posted May 1, 2012 Did you seriously just respond to a 6 year old thread with that? I certainly hope the rest of your time here is spent in better pursuits than insulting people that will NEVER READ IT. If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag GudeHow to ask questions the smart way! I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from. Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays. - ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script. - Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label. - _FileGetProperty - Retrieve the properties of a file - SciTE Toolbar - A toolbar demo for use with the SciTE editor - GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI. - Latin Square password generator 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