The Random Insanity Generator is a little program I made while in the backseat of the Drivers Ed. car on my (at that time) new TI-83. It generates sentences based on a few wordlists I gave it. You make a list of subjects, a list of verbs, a list of objects, and a list of prepositional phrases and/or adverbs to end the sentence with. The program randomly selects a word from each list and displays them in a predetermined order.
:CLRHOME
:GOTO B
:LBL A
:DISP Str1,Str2,Str3
:PAUSE
:LBL B
:randint(1,2)->A
:IF A=1
:"MR T."->Str1
:IF A=2
:"PEE-WEE HERMAN"->Str2
:randint(1,2)->A
:IF A=1
:"WAS HUMPED BY"->Str2
:IF A=2
:"ATE"->Str2:randint(1,2)->A
:IF A=1
:"A FLUFFY KITTY"->Str3
:IF A=2
:"A CRAZED WEASEL"->Str3
:randint(1,2)->A
:IF A=1
:"AT A HIGH SPEED"->Str4
:IF A=2
:"PASSIONATELY"->Str4
:GOTO A
:END
Naturally, it won't be fun until you expand the list's to include celebrity's/friends/verbs/places that you think will be funny. Though it isn't exactly high class humor, it can be an interesting distraction during school days that never seem to end. My Random Insanity Generator has grown and grown and now the beast takes up over half the memoryon my calculator, and takes a good 2 seconds to load a new phrase. But everytime I consider deleting it, I remember some of the things it has generated and amused me with over the months.
BILL GATES
WAS HUMPED BY
A RABID GOAT
ON NATIONAL TV
MR T
FONDLED
A CHIPMUNK
IN THE HOT TUB