Jump to content
Sign in to follow this  
AlmarM

Southpark Movie Randomizer

Recommended Posts

#include <GUIConstants.au3>
DIM $Movie

$GUI = GUICreate("Southpark Randomizer", 455, 90, -1, -1)
$Label_1 = GUICtrlCreateLabel("", 10, 10, 445, 20)
$Label_2 = GUICtrlCreateLabel("", 10, 30, 445, 20)
$Button_1 = GUICtrlCreateButton("Randomize", 10, 50, 335, 30)
$Button_2 = GUICtrlCreateButton("Go to link", 345, 50, 105, 30)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Select
    Case $nMsg = $GUI_EVENT_CLOSE
        Exit
    Case $nMsg = $Button_1
        _Random()
    Case $nMsg = $Button_2
        Run("cmd /c start " & $Movie, "", @SW_HIDE)
    EndSelect
WEnd

Func _Random()
    $Movie = Random(1, 20, 1)
    Switch $Movie
    Case 1
        $Movie = "http://www.southparkzone.com/episodes/102/Weight-Gain-4000.html"
        $Movie_Name = "Weight Gain"
    Case 2
        $Movie = "http://www.southparkzone.com/episodes/406/Cartman-Joins-NAMBLA.html"
        $Movie_Name = "Cartman Joins NAMBLA"
    Case 3
        $Movie = "http://www.southparkzone.com/episodes/603/Asspen.html"
        $Movie_Name = "Asspen"
    Case 4
        $Movie = "http://www.southparkzone.com/episodes/210/Chickenpox.html"
        $Movie_Name = "Chickenpox"
    Case 5
        $Movie = "http://www.southparkzone.com/episodes/506/Cartmanland.html"
        $Movie_Name = "Cartmanland"
    Case 6
        $Movie = "http://www.southparkzone.com/episodes/316/Are-you-there-God?-Its-me-Jesus.html"
        $Movie_Name = "Are you there God? It's me Jesus"
    Case 7
        $Movie = "http://www.southparkzone.com/episodes/301/Rainforest-Schmainforest.html"
        $Movie_Name = "Rainforest Schmainforest"
    Case 8
        $Movie = "http://www.southparkzone.com/episodes/608/Red-Hot-Catholic-Love.html"
        $Movie_Name = "Red Hot Catholic Love"
    Case 9
        $Movie = "http://www.southparkzone.com/episodes/315/Mr.-Hankey's-Christmas-Classics.html"
        $Movie_Name = "Mr. Hankey's Chismas Classics"
    Case 10
        $Movie = "http://www.southparkzone.com/episodes/1104/The-Snuke.html"
        $Movie_Name = "The Snuke"
    Case 11
        $Movie = "http://www.southparkzone.com/episodes/1014/Stanleys-cup.html"
        $Movie_Name = "Stanleys cup"
    Case 12
        $Movie = "http://www.southparkzone.com/episodes/602/Jared-Has-Aides.html"
        $Movie_Name = "Jared Has Aides"
    Case 13
        $Movie = "http://www.southparkzone.com/episodes/311/Starvin'-Marvin-in-Space.html"
        $Movie_Name = "Starvin' Marvin in Space"
    Case 14
        $Movie = "http://www.southparkzone.com/episodes/1103/Lice-Capades.html"
        $Movie_Name = "Lice Capades"
    Case 15
        $Movie = "http://www.southparkzone.com/episodes/1001/The-Return-of-Chef!.html"
        $Movie_Name = "The Return of Chef!"
    Case 16
        $Movie = "http://www.southparkzone.com/episodes/313/Hooked-on-Monkey-Phonics.html"
        $Movie_Name = "Hooken on Mokey Phonics"
    Case 17
        $Movie = "http://www.southparkzone.com/episodes/409/Something-You-Can-Do-With-Your-Finger.html"
        $Movie_Name = "Something You Can Do With Your Finger"
    Case 18
        $Movie = "http://www.southparkzone.com/episodes/207/City-on-the-Edge-of-Forever.html"
        $Movie_Name = "City on the Edge of Forever"
    Case 19
        $Movie = "http://www.southparkzone.com/episodes/309/Jewbilee.html"
        $Movie_Name = "Jewbilee"
    Case 20
        $Movie = "http://www.southparkzone.com/episodes/10000/South_Park_-_Bigger_Longer_&_Uncut.html"
        $Movie_Name = "Southpark: The Movie"
    EndSwitch
GUICtrlSetData($Label_1, $Movie)
GUICtrlSetData($Label_2, $Movie_Name)
EndFunc

Have Fun !! ^^

-AlmarM-


Minesweeper

A minesweeper game created in autoit, source available.

_Mouse_UDF

An UDF for registering functions to mouse events, made in pure autoit.

2D Hitbox Editor

A 2D hitbox editor for quick creation of 2D sphere and rectangle hitboxes.

Share this post


Link to post
Share on other sites

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  

×
×
  • Create New...