100 msgboxes

[Frost]

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?

[B3TA_SCR1PT3R]

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

Edited October 16, 2005 by B3TA_SCR1PT3R

[theguy0000]

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.

[markusss]

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)

[Frost]

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

[gamerman2360]

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

[DoctorX]

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

[gamerman2360]

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 October 17, 2005 by gamerman2360

[Garanator]

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 October 18, 2005 by Garanator

[Confuzzled]

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...

[Nuffilein805]

what do you want to do with that?

do you wanna piss people off who you don't like or just make a mad joke?

[Frost]

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)

[Nuffilein805]

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

[gamerman2360]

nvm

Edited October 18, 2005 by gamerman2360