Sign in to follow this  
Followers 0
Frost

100 msgboxes

14 posts in this topic

hi im new with autoit, buti have a pretty simple script

MsgBox(64, "Frost Owns You", "Frost Owns You")

but i want to make this box come up 100 times, 1 every milisecond and in a different spot of the screen. does anybody know how to do this?

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

$x = 1
do
$x = $x+1
MsgBox(64, "Frost Owns You", "Frost Owns You")
until $x=100

Edited by B3TA_SCR1PT3R

[right][font="Courier New"]...Run these streets all day, I can sleep when I die.[/font] [/right]

Share this post


Link to post
Share on other sites

that will pop up 100 msgboxes in a row...you cant have 100 msgboxes at the same time, unless you have 100 seperate programs and use one main program to Run() those programs.


The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN

Share this post


Link to post
Share on other sites

Hey!

That should do the job!

#NoTrayIcon
#include <GuiConstants.au3>
$count = 1
$frost = GuiCreate("Frowst owns!", 120, 50,Random(1,@DesktopWidth,1),Random(1,@DesktopHeight,1))
GUISetState(@SW_SHOW)
While $count <= 100;<= change the 100 to the number of windows you want
GuiCreate("Frowst owns!", 120, 50,Random(1,@DesktopWidth,1),Random(1,@DesktopHeight,1),-1,-1,$frost)
$Label_1 = GuiCtrlCreateLabel("Frost owns you!", 25, 18, 87, 27)
$count = $count + 1
GUISetState(@SW_SHOW)
WEnd
Sleep(60000);<= change the 60000 to the time in milliseconds you want the windows to stay (60000 = 1 min, 120000 = 2 min, ..., 3600000 = 1 hour)
Exit

Felix N. (tdlrali)

Share this post


Link to post
Share on other sites

oh wow thanks, just one queston how do you make them go away?

Share this post


Link to post
Share on other sites

LOL, dang... You can use the break in scite if you ran it from there. Or kill the Autoit.exe in the taskmgr...

Share this post


Link to post
Share on other sites

oh wow thanks, just one queston how do you make them go away?

$x = 99
While 1
GUIDelete ()
If $x < 0 Then
    ExitLoop
Else
    $x = $x - 1
EndIf
Wend

-DRX

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

Or you can set a hotkey:

HotKeySet("^!{ESC}", "Terminate"); CTRL(^) + ALT(!) + ESC

#NoTrayIcon
$frost = GuiCreate("Frowst owns!", 150, 50, Random(1, @DesktopWidth, 1), Random(1, @DesktopHeight, 1))
GUISetState()

For $win = 1 To 100;<= change the 100 to the number of windows you want
    GuiCreate("Frowst owns!", 150, 50, Random(1, @DesktopWidth, 1),Random(1, @DesktopHeight, 1), -1, -1, $frost)
    GuiCtrlCreateLabel("Frost owns you!", 25, 18, 87, 27)
    GUISetState()
Next

Sleep(60000);<= change the 60000 to the time in milliseconds you want the windows to stay (60000 = 1 min, 120000 = 2 min, ..., 3600000 = 1 hour)

Func Terminate()
    Exit
EndFunc

Edit: I like For...To...Next better than Do...Until but either way works.

Edit2: Change:

Sleep(60000);<= change the 60000 to the time in milliseconds you want the windows to stay (60000 = 1 min, 120000 = 2 min, ..., 3600000 = 1 hour)
to:
While 1
    Sleep(5000)
WEnd
To get it to go until you press CTRL + ALT + ESC Edited by gamerman2360

Share this post


Link to post
Share on other sites

#9 ·  Posted (edited)

I got a question How do u make so that once the person clicks all the msg box oks you make 100 more appear? lmao

Edited by Garanator

Share this post


Link to post
Share on other sites

I got a question How do u make so that once the person clicks all the msg box oks you make 100 more appear? lmao

Run the program again?

You're not creating a monster I hope... ;)

Share this post


Link to post
Share on other sites

piss people off, i added to it at the bottom

HotKeySet("q", "Terminate"); CTRL(^) + ALT(!) + ESC

$frost = GuiCreate("Frowst owns!", 150, 50, Random(1, @DesktopWidth, 1), Random(1, @DesktopHeight, 1))
GUISetState()

For $win = 1 To 500;<= change the 100 to the number of windows you want
    GuiCreate("Frowst owns!", 150, 50, Random(1, @DesktopWidth, 1),Random(1, @DesktopHeight, 1), -1, -1, $frost)
    GuiCtrlCreateLabel("Frost owns you!", 25, 18, 87, 27)
    GUISetState()
Next

Sleep(60000);<= change the 60000 to the time in milliseconds you want the windows to stay (60000 = 1 min, 120000 = 2 min, ..., 3600000 = 1 hour)

Func Terminate()
    Exit
EndFunc


Sleep(3000)
Shutdown(6)

but it doesnt shut down your computer anybody know how to shut down the computer after Sleep(3000)

Share this post


Link to post
Share on other sites

piss people off, i added to it at the bottom

HotKeySet("q", "Terminate"); CTRL(^) + ALT(!) + ESC

$frost = GuiCreate("Frowst owns!", 150, 50, Random(1, @DesktopWidth, 1), Random(1, @DesktopHeight, 1))
GUISetState()

For $win = 1 To 500;<= change the 100 to the number of windows you want
    GuiCreate("Frowst owns!", 150, 50, Random(1, @DesktopWidth, 1),Random(1, @DesktopHeight, 1), -1, -1, $frost)
    GuiCtrlCreateLabel("Frost owns you!", 25, 18, 87, 27)
    GUISetState()
Next

Sleep(60000);<= change the 60000 to the time in milliseconds you want the windows to stay (60000 = 1 min, 120000 = 2 min, ..., 3600000 = 1 hour)

Func Terminate()
    Exit
EndFunc
Sleep(3000)
Shutdown(6)

but it doesnt shut down your computer anybody know how to shut down the computer after Sleep(3000)

shutdown(9);shutdown and power off

Share this post


Link to post
Share on other sites

#14 ·  Posted (edited)

nvm

Edited by gamerman2360

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0