El-Trucha Posted February 2, 2005 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
tazdev Posted February 2, 2005 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.
El-Trucha Posted February 2, 2005 Author 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
layer Posted February 2, 2005 Posted February 2, 2005 lol thats pretty neat! good work use a hotkey for exiting or something along those lines... FootbaG
El-Trucha Posted February 2, 2005 Author 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
El-Trucha Posted February 2, 2005 Author 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
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