Swift Posted January 3, 2008 Share Posted January 3, 2008 (edited) EDIT: working on one now...may not look like it...but may work like it... like the Gray weird style text the _ underscore flashing..the gray X and and minimize buttons... i know how to set the background color and the text color...i know how to change the font and style...but is it possible to make a GUI look like cmd? im tring to make a "movie scene" from Terminator 3: Rise of The Machines ©...where there at skynet and and a popup on the computer says: <-SkyNet-> ()Iniate Connection To SkyNet?() [ Y / N ]_ <----- is the flashing underscore Then once you press "y" on your keyboard it...sends aabout 50 lines of text with all these .exe files like this ==Preparing:== -iniate=SkyNet.exe -iniate=SN-Con.exe -iniate=SN-Connect.exe -run=SkyNet.ccr (but about 150 of lil .exe's) But if you press "n" <-SkyNet-> ()Iniate Connect To SkyNet?() [ Y / N ]_ <---- flashing underscore <---END ALL PROCESSES TO CONNECT TO SKYNET?---> [ Y / N ]_ <------flashy underscore if "y" is pressed then it all would say: <-SkyNet-> ()Iniate Connect To SkyNet?() [ Y / N ]_ <---- flashing underscore <---END ALL PROCESSES TO CONNECT TO SKYNET?---> [ Y / N ]_ <------flashy underscore ===SkyNet=== =All Connections Terminated= but if "n" was pressed then: ()Iniate Connect To SkyNet?() [ Y / N ]_ <---- flashing underscore if yes...then...lol...read up then it will say all the .exe's and stuff and if you press "y" to that...then it will say: ==SkyNet== -Uploading- (sleep 2 sec) Connecting... (Sleep 2000) 1 Service Connected. Sleep(1500) 2 Services Connected. Sleep(1250) 3 Services Connected. Sleep(1000) 4 Services Connected. Sleep(750) 5 Services Connected. Sleep(500) 6 Services Connected. Sleep(250) 7 Services Connected. (=== **sl=Sleep 250=**) sl 8 services sl 9 sl 10 sl 11 sl 12 sl 13 ETC...then at 25 20 msgboxs saying: Error: Connection was disabled by an undetected source. then...after 2 seconds...SHUTDOWN THE COMP! I Don't Want You To Make It...Just Tell Me How. Thanks Edited January 3, 2008 by Swift Link to comment Share on other sites More sharing options...
JustinReno Posted January 3, 2008 Share Posted January 3, 2008 Koda GUI Creator will help you design the CMD style GUI. Link to comment Share on other sites More sharing options...
Swift Posted January 3, 2008 Author Share Posted January 3, 2008 Ehh...i tried Koda...it didnt like meh Link to comment Share on other sites More sharing options...
JustinReno Posted January 3, 2008 Share Posted January 3, 2008 Sorry for a late reply, I've been really busy... I'll look into making an example CMD style GUI and show you, sounds good? Link to comment Share on other sites More sharing options...
JustinReno Posted January 3, 2008 Share Posted January 3, 2008 Sorry I deleted my previous post, I wanted to update it a bit. I made this with Koda. One Bug: The Exit button has dissapeared... #Include <GUIConstants.au3> #Include <Misc.au3> HotKeySet("{ENTER}", "_Set") $GUI = GUICreate("CMD Style GUI made for Swift", 626, 290, -1, -1, $WS_EX_TOOLWINDOW) $Edit = GUICtrlCreateEdit("", 0, 0, 625, 289, $ES_AUTOVSCROLL + $ES_AUTOHSCROLL + $ES_WANTRETURN + $WS_VSCROLL) GUICtrlSetFont($Edit, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor($Edit, 0xFFFFFF) GUICtrlSetBkColor($Edit, 0x000000) GUICtrlSetData($Edit, @HomeDrive&"\") GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _Set() Local $Opt = Opt("WinTitleMatchMode", 4) If WinGetHandle("Active") = $GUI Then If @HotKeyPressed = "{ENTER}" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&@HomeDrive&"\") Else HotKeySet(@HotKeyPressed) Send(@HotKeyPressed) HotKeySet(@HotKeyPressed, "_Set") EndIf Opt("WinTitleMatchMode", $Opt) EndFunc Link to comment Share on other sites More sharing options...
MrCreatoR Posted January 3, 2008 Share Posted January 3, 2008 If i understand correct, take a look at this one. Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team Link to comment Share on other sites More sharing options...
Swift Posted January 3, 2008 Author Share Posted January 3, 2008 I tried contributing all those parts to make one...of my own...but its not working out... Link to comment Share on other sites More sharing options...
Linux Posted January 3, 2008 Share Posted January 3, 2008 for the shutdown, you have to run the command "shutdown -s -t 1" -s is for shutdown, or -r for reboot -t 1 is the number of seconds. type cmd and type shutdown /? for more help. you can even costumize a message to appear in the box. You can help! Donate to AutoIt! or, visit ClimatePREDICTION.netMy posts:Travian Bot Example (100+ servers) BETAHow to Host you code/app for free! (unlimited team number) (Public or Private)"Sir, we're surrounded!" "Excellent. We can attack in any direction!" Link to comment Share on other sites More sharing options...
Swift Posted January 4, 2008 Author Share Posted January 4, 2008 heh...or i could do... Shutdown(9) Link to comment Share on other sites More sharing options...
JustinReno Posted January 4, 2008 Share Posted January 4, 2008 Here is an updated, better looking GUI if you want: #Include <GUIConstants.au3> #Include <GUIEdit.au3> HotKeySet("{Enter}", "_Function") $GUI = GUICreate("Justin Reno's Command Window", 530, 242, -1, -1, BitOr($WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_TILEDWINDOW)) $Edit = GUICtrlCreateEdit("", 0, 0, 529, 241, $WS_VSCROLL) GUICtrlSetFont($Edit, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor($Edit, 0xFFFFFF) GUICtrlSetBkColor($Edit, 0x000000) GUICtrlSetData($Edit, @HomeDrive&"\") GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _Function() Local $Opt = Opt("WinTitleMatchMode", 4) If WinGetHandle("Active") = $GUI Then If @HotKeyPressed = "{ENTER}" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&@HomeDrive&"\") EndIf Else HotKeySet(@HotKeyPressed) Send(@HotKeyPressed) HotKeySet(@HotKeyPressed, "_Function") EndIf Opt("WinTitleMatchMode", $Opt) EndFunc Link to comment Share on other sites More sharing options...
Swift Posted January 4, 2008 Author Share Posted January 4, 2008 Thanks justin but how would it reconize if say if i edited it: so it would say: CMD:/ then if you typed (all together) CMD:/runskynet (then it would change the thingy to SkyNet:/) SkyNet:/ is there anyway for that to work? Link to comment Share on other sites More sharing options...
BrettF Posted January 4, 2008 Share Posted January 4, 2008 Thanks justinbut how would it reconize if say if i edited it:so it would say:CMD:/then if you typed(all together)CMD:/runskynet(then it would change the thingy to SkyNet:/)SkyNet:/is there anyway for that to work?Ermmm... Look at every single of the string functions. And RegExp. All of them. Just "eat" them all up. Vist my blog!UDFs: Opens The Default Mail Client | _LoginBox | Convert Reg to AU3 | BASS.au3 (BASS.dll) (Includes various BASS Libraries) | MultiLang.au3 (Multi-Language GUIs!)Example Scripts: Computer Info Telnet Server | "Secure" HTTP Server (Based on Manadar's Server)Software: AAMP- Advanced AutoIt Media Player | WorldCam | AYTU - Youtube Uploader Tutorials: Learning to Script with AutoIt V3Projects (Hardware + AutoIt): ArduinoUseful Links: AutoIt 1-2-3 | The AutoIt Downloads Section: | SciTE4AutoIt3 Full Version! Link to comment Share on other sites More sharing options...
JustinReno Posted January 4, 2008 Share Posted January 4, 2008 Yes, there is: expandcollapse popup#Include <GUIConstants.au3> #Include <GUIEdit.au3> Global $Run = 0 HotKeySet("{Enter}", "_Function") $GUI = GUICreate("Justin Reno's Command Window", 530, 242, -1, -1, BitOr($WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_TILEDWINDOW)) $Edit = GUICtrlCreateEdit("", 0, 0, 529, 241, $WS_VSCROLL) GUICtrlSetFont($Edit, 10, 800, 0, "MS Sans Serif") GUICtrlSetColor($Edit, 0xFFFFFF) GUICtrlSetBkColor($Edit, 0x000000) GUICtrlSetData($Edit, "CMD:\") GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _Function() Local $Opt = Opt("WinTitleMatchMode", 4) If WinGetHandle("Active") = $GUI Then If @HotKeyPressed = "{ENTER}" Then If $Run = 1 Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"SkyNet:\") If GUICtrlRead($Edit) = "CMD:\RunSkyNet" Then $Run = 1 GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"SkyNet:\") EndIf EndIf Else HotKeySet(@HotKeyPressed) Send(@HotKeyPressed) HotKeySet(@HotKeyPressed, "_Function") EndIf Opt("WinTitleMatchMode", $Opt) EndFunc Link to comment Share on other sites More sharing options...
Swift Posted January 4, 2008 Author Share Posted January 4, 2008 Ehhh...I need help this isnt working and i used what you had to try to make it expandcollapse popup#Include <GUIConstants.au3> #Include <GUIEdit.au3> Global $Run = 0 HotKeySet("{Enter}", "_Function") $GUI = GUICreate("C:\WINDOWS\system32\cmd.exe", 530, 242, -1, -1, BitOr($WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_TILEDWINDOW)) $Edit = GUICtrlCreateEdit("", 0, 0, 529, 241, $WS_VSCROLL) GUICtrlSetFont($Edit, 10, 800, 0, "Courier New") GUICtrlSetColor($Edit, 0xFFFFFF) GUICtrlSetBkColor($Edit, 0x000000) GUICtrlSetData($Edit, "CMD:\") GUISetState(@SW_SHOW) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _Function() Local $Opt = Opt("WinTitleMatchMode", 4) If WinGetHandle("Active") = $GUI Then If @HotKeyPressed = "{ENTER}" Then If $Run = 1 Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"SkyNet:\") If GUICtrlRead($Edit) = "CMD:\RunSkyNet" Then $Run = 1 GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"SkyNet:\") ;=================================================================================================== ==========================; If GUICtrlRead($Edit) = "CMD:\help" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"Help Center!"&@CRLF&"Help:"&@CRLF&"runskynet - runs skynet") GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"Help:\") EndIf If GUICtrlRead($Edit) = "SkyNet:\connect" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"Warning: Property Of SkyNet. Please Do Not Connect If Your Are Unsure About ANYTHING!"&@CRLF&"<SkyNet>"&@CRLF&"Connect - Connects And Loads SkyNet.") If GUICtrlRead($Edit) = "SkyNet:\cmd" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"CMD:\") EndIf ;=================================================================================================== =========================; EndIf EndIf EndIf Else HotKeySet(@HotKeyPressed) Send(@HotKeyPressed) HotKeySet(@HotKeyPressed, "_Function") EndIf If GUICtrlRead($Edit) = "CMD:\help" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"Help Center!"&@CRLF&"Help:"&@CRLF&"runskynet - runs skynet") GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"Help:\") EndIf If GUICtrlRead($Edit) = "SkyNet:\connect" Then GUICtrlSetData($Edit, GUICtrlRead($Edit)&@CRLF&"Warning: Property Of SkyNet. Please Do Not Connect If Your Are Unsure About ANYTHING!"&@CRLF&"<SkyNet>"&@CRLF&"Connect - Connects And Loads SkyNet.") EndIf Opt("WinTitleMatchMode", $Opt) EndFunc im tring to make it: so if you put CMD:\help then if you want to go back to cmd you put Help:\cmd and it CMD:\ again but if your in SkyNet:\ and you type SkyNet:\connect i want it to do what its suppost to do... and if you put SkyNet:\cmd then back to CMD CMD:\ I tried..its not working though....thanks for your help everyone 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