El-Trucha Posted February 2, 2005 Share Posted February 2, 2005 Look @ what I just made: expandcollapse popup; ASCII GIF of a cowboy made by El-Trucha in AutoIt, AutoBuilder, and Notepad... :) #include <GuiConstants.au3> If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000 GuiCreate("MyGUI", 120, 200,(@DesktopWidth-172)/2, (@DesktopHeight-316)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $Label_1 = GuiCtrlCreateLabel("Label1", 10, 20, 150, 280) GUICtrlSetFont(-1, 10, 400, 0, "Lucida Console") GuiSetState() While 1 GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ "// || \\" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(1000) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ "// || //" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // ||\\" & @CRLF & _ "// ||//" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1,_ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ "// || \\" & @CRLF & _ " |||||| =|" & @CRLF & _ " || |" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\\" & @CRLF & _ " //|| \\" & @CRLF & _ " // || \\" & @CRLF & _ "// || \\" & @CRLF & _ " |||||| =|" & @CRLF & _ " || |" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\\" & @CRLF & _ " //|| \\" & @CRLF & _ " // || \\" & @CRLF & _ "// || --|==" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\\" & @CRLF & _ " //|| \\" & @CRLF & _ " // || ==--|==" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\\" & @CRLF & _ " //|| ====--|==" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||======--|==" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__/===--|==" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " |" & @CRLF & _ " |" & @CRLF & _ " =" & @CRLF & _ " __ //" & @CRLF & _ " __|__|__//" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " ." & @CRLF & _ " |" & @CRLF & _ " |" & @CRLF & _ " =" & @CRLF & _ " __ //" & @CRLF & _ " __|__|__//" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " ." & @CRLF & _ "" & @CRLF & _ " |" & @CRLF & _ " |" & @CRLF & _ " =" & @CRLF & _ " __ //" & @CRLF & _ " __|__|__//" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " ." & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ " |" & @CRLF & _ " |" & @CRLF & _ " =" & @CRLF & _ " __ //" & @CRLF & _ " __|__|__//" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " ." & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ " |" & @CRLF & _ " |" & @CRLF & _ " =" & @CRLF & _ " __ //" & @CRLF & _ " __|__|__//" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(100) GUICtrlSetData(-1, _ " ." & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ "" & @CRLF & _ " |" & @CRLF & _ " |" & @CRLF & _ " =" & @CRLF & _ " __ //" & @CRLF & _ " __|__|__//" & @CRLF & _ " |__|//" & @CRLF & _ " /||//" & @CRLF & _ " //||" & @CRLF & _ " // ||" & @CRLF & _ "// ||" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(1000) WEnd Kool huh?? El-Truchahttp://www.truchasoft.tk[url="ftp://tsfc.homeftp.net"]ftp://tsfc.homeftp.net[/url]hotline://tsfc.ath.cx Link to comment Share on other sites More sharing options...
tazdev Posted February 2, 2005 Share Posted February 2, 2005 Modify the GUI box so that the control buttons work. It won't close without ending the script at the taskbar. Wish I had how to modify it off the top of my head but I forgot. Link to comment Share on other sites More sharing options...
El-Trucha Posted February 2, 2005 Author Share Posted February 2, 2005 Yeah, I tried putting: If $msg = $GUI_EVENT_CLOSE @ the top of the loop but it didnt work kuz it takes 2 much time 2 move the character... El-Truchahttp://www.truchasoft.tk[url="ftp://tsfc.homeftp.net"]ftp://tsfc.homeftp.net[/url]hotline://tsfc.ath.cx Link to comment Share on other sites More sharing options...
layer Posted February 2, 2005 Share Posted February 2, 2005 lol thats pretty neat! good work use a hotkey for exiting or something along those lines... FootbaG Link to comment Share on other sites More sharing options...
El-Trucha Posted February 2, 2005 Author Share Posted February 2, 2005 lol thats pretty neat! good work use a hotkey for exiting or something along those lines...How dint I think about a hotkey before??!!But yeah, it worked...thanx!! (I sent a birthday present to my cousin which was something similar and and she said she spent hours trying to close it!! )HotKeySet("{ESC}", "MyExit") ; rest of script; Func MyExit() Exit EndFunc(BTW, how do I quote smileys without having 2 retype them?? ) El-Truchahttp://www.truchasoft.tk[url="ftp://tsfc.homeftp.net"]ftp://tsfc.homeftp.net[/url]hotline://tsfc.ath.cx Link to comment Share on other sites More sharing options...
El-Trucha Posted February 2, 2005 Author Share Posted February 2, 2005 Sorry, for double posting, but I forgot to press the "Send" button and I let it stand there for like an hour!! Here's a new one I just made, its the same cowboy that transforms into something that looks like "Mom" from Futurama!! expandcollapse popup; ASCII GIF of a cowboy made by El-Trucha in AutoIt, AutoBuilder, and Notepad... :) #include <GuiConstants.au3> HotKeySet("{ESC}", "MyExit") If Not IsDeclared('WS_CLIPSIBLINGS') Then Global $WS_CLIPSIBLINGS = 0x04000000 GuiCreate("MyGUI", 120, 200,(@DesktopWidth-172)/2, (@DesktopHeight-316)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $Label_1 = GuiCtrlCreateLabel("Label1", 10, 20, 150, 280) GUICtrlSetFont(-1, 10, 400, 0, "Lucida Console") GuiSetState() While 1 GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ " // || \\" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ " // \\" & @CRLF & _ "_// \\_" & @CRLF) Sleep(1000) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ " // || \\" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ " //\\" & @CRLF & _ "_//// \\\\_" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ " // || \\" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ "_//////\\\\\\_" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ " // || \\" & @CRLF & _ " ||||||" & @CRLF & _ " ||" & @CRLF & _ "_//////\\\\\\_" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " __|__|__" & @CRLF & _ " |__|" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " // || \\" & @CRLF & _ " | || |" & @CRLF & _ " \||/" & @CRLF & _ "_//////\\\\\\_" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " |..|" & @CRLF & _ " ||__||" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " | || |" & @CRLF & _ " \||/" & @CRLF & _ "_//////\\\\\\_" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " |..|" & @CRLF & _ " ||__||" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " | || |" & @CRLF & _ "_/ \||/ \_" & @CRLF & _ "///// \\\\\" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " |..|" & @CRLF & _ " ||__||" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " _/ | || | \_" & @CRLF & _ "\\ \||/ //" & @CRLF & _ " /// \\\" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " |..|" & @CRLF & _ " ||__||" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " | || | \_" & @CRLF & _ " \||/ //" & @CRLF & _ "_/ \\\" & @CRLF & _ "\\" & @CRLF & _ "///" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " |..|" & @CRLF & _ " ||__||" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " | || | \_" & @CRLF & _ " \||/ //" & @CRLF & _ " \\\ " & @CRLF & _ "_/ " & @CRLF & _ "\\" & @CRLF & _ "///" & @CRLF) Sleep(200) GUICtrlSetData(-1, _ " __" & @CRLF & _ " |..|" & @CRLF & _ " ||__||" & @CRLF & _ " /||\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " //||\\" & @CRLF & _ " | || | \_" & @CRLF & _ " \||/ //" & @CRLF & _ " \\\ " & @CRLF & _ "_/ " & @CRLF & _ "\\" & @CRLF & _ "///" & @CRLF) Sleep(1000) WEnd Func MyExit() Exit EndFunc El-Truchahttp://www.truchasoft.tk[url="ftp://tsfc.homeftp.net"]ftp://tsfc.homeftp.net[/url]hotline://tsfc.ath.cx 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