Mein Antwort auf den Trollo Vierus

    Mein Antwort auf den Trollo Vierus

    Bin vor kurzem auf den Trollo Virus gestoßen und finde ihn recht lustig und hab mal etwas ähnliches gescriptet im futurama styl und wollte mal eure Meinung dazu hören,
    hab am ende der au3 noch ne idee wie ich es noch ausbauen könnte aber vielleicht habt ihr auch noch Vorschläge,

    ach ja strg+alt+e stop es


    freu mich schon auf etwas feedback :)
    Dateien
    • spielerei_2.au3

      (1,44 kB, 7 mal heruntergeladen, zuletzt: )
    • neues-hirn.zip

      (1,54 MB, 4 mal heruntergeladen, zuletzt: )

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Griffin453“ ()

    *Virus


    Zu was einem pure Langeweile manchmal treibt ...

    Spoiler anzeigen

    AutoIt Quelltext

    1. #NoTrayIcon
    2. #include <GUIConstants.au3>
    3. #include <Sound.au3>
    4. Global $bool = true, $x = 0, $y = 0
    5. FileInstall("C:\Users\Admin\Desktop\Neuer Ordner\neues-hirn\hirn.mp3", @ScriptDir & "\hirn.mp3", 1)
    6. FileInstall("C:\Users\Admin\Desktop\Neuer Ordner\neues-hirn\zoidberg.ico", @ScriptDir & "\zoidberg.ico", 1)
    7. HotKeySet("{F8}", "_exit")
    8. $gui = GUICreate("ein_neues_hirn", 450, 300, $x, $y, $DS_SETFOREGROUND, $WS_EX_TOPMOST)
    9. GUISetState(@SW_SHOW)
    10. _kidding()
    11. Func _kidding()
    12. SoundPlay("hirn.mp3", 0)
    13. GUICtrlCreateIcon("zoidberg.ico", 1, 90, 30, 250, 250, $BS_ICON)
    14. While $bool
    15. $color = Random(10000, 99999, 1)
    16. GUISetBkColor($color)
    17. $x = Random(0, @DesktopWidth - 450, 1)
    18. $y = Random(0, @DesktopHeight - 300, 1)
    19. WinMove($gui, "", $x, $y)
    20. Sleep(333)
    21. WEnd
    22. EndFunc
    23. Func _exit()
    24. Exit
    25. EndFunc


    Wie dem auch sei. Viel Spaß damit.
    Dateien
    • kidding.exe

      (2,31 MB, 3 mal heruntergeladen, zuletzt: )