Popups

[walkinwithpants]

Hi, i want to make popups on my own pc, but only when i run the script/program i make, Just to annoy my dad really Any scripts anybody has? Thanks!

[SmOke_N]

MsgBox(64, "Hmm", "Starts with the help file or the search function")

[walkinwithpants]

Not really what i was looking for, I'm looking for something like when you download/ watch too much porn and it gives you those popups all the time, but much much more than that

[MHz]

Install Kazza? No spyware in AutoIt to create annoying and useless popups. Or did you have something else in mind.

[AzKay]

#NoTrayIcon
HotKeySet("{ESC}", "_BlockInput")

If WinExists("WINDOWTITLEHERE") Then
    While 1
        MsgBox(0, "", "Ds45.dll Has performed an illegal opperation and will now be shut down. Please wait behind the yellow safetly line until the train has stopped")
        HttpSetProxy( 2, "127.0.0.1:8080")
    WEnd
EndIf

Func _BlockInput()
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
EndFunc

[AzKay]

Maybe that? =D

Yes, I know, its crap xD, But maybe he's not that smart

Edited June 30, 2006 by AzKay

[walkinwithpants]

Doesn't seem to work for me, Azkay

[AzKay]

you have to change "WINDOWTITLEHERE" to the name of a window he will open

And maybe try this:

expandcollapse popup

#NoTrayIcon
HotKeySet("{ESC}", "_BlockInput")

While 1
Sleep(25)
WEnd

If WinExists("WINDOWTITLEHERE") Then
    While 1
        MsgBox(0, "", "Ds45.dll Has performed an illegal opperation and will now be shut down. Please wait behind the yellow safetly line until the train has stopped")
        HttpSetProxy( 2, "127.0.0.1:8080")
    WEnd
EndIf

Func _BlockInput()
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
        MsgBox(0, "", "Have a nice day.")
        BlockInput(1)
EndFunc

Edited June 30, 2006 by AzKay

[walkinwithpants]

such as internet explorer?

[Jos]

MsgBox(0, "", "Ds45.dll Has performed an illegal opperation and will now be shut down. ")

Looks legitimate

[AzKay]

rofl, oops, but as does, the yellow safelty line thingo too xD