;---------------------------------------------
; == GUI generated with Koda ==

#include <GUIConstants.au3>

Dim $Str[150]

;--------------------------------------------------------------
$Str[1] = "I have legs, twice."
$Str[2] = "The golden flywheel mice too, johnny."
$Str[3] = "Where's my necks, are you?"
$Str[4] = "Give me cotten dogs please."
$Str[5] = "The four wax rabbits are here."
$Str[6] = "You had better pay respects to the food wall."
$Str[7] = "My shoes are souless."
$Str[8] = "I have sandwiches."
$Str[9] = "Our friend here, can't talk to you."
$Str[10] ="On the other hand is scabs"
$Str[11] ="Have at it thomas."
$Str[12] ="I have scabies."
$Str[13] ="Meat has calcium in it."
$Str[14] ="Remember the boat! HaHaHaHa"
$Str[15] ="Because you eat too much lettuce."
$Str[16] ="Those hamsters"
$Str[17] ="It's hilarious - Those kids need to take baths."
$Str[18] ="Yes, I've got cabbage patch kids disease."
$Str[19] ="What if i were to ask you a hypothetical question?"
$Str[20] ="No, I don't skip anymore."
$Str[21] ="How about a Rhetorical question? "
$Str[22] ="Yes, but ask me 5 times so I can eat."
$Str[23] ="11% is good for a guy with one leg, No?"
$Str[24] ="When do you think he will be back?"
$Str[25] ="We have time to marinate the steaks."
$Str[26] ="Yeah, 73 minutes later."
$Str[27] ="I must have busted the damn flywheel."
$Str[28] ="I wish I had my economics book right now."
$Str[29] ="Drywall on the right, pancakes on the right, dogs to the left."
$Str[30] ="Where did you get a leg?"
$Str[31] ="That's no lawnmower for me."
$Str[32] ="I have never gone, thanks."
$Str[33] ="You don't live in texas."
$Str[34] ="Am I right about the hotdog?"
$Str[35] ="No, the clown."
$Str[36] ="Tell me where your dad went."
$Str[37] ="But i know sign language."
$Str[38] ="Then why did you have the pig roast? "
$Str[39] ="Do you have somthing against an old man?"
$Str[40] ="You're just some fat slob!"	
$Str[41] ="Jesus I have never kissed a boy."
$Str[42] ="Do you have mustard stains on your chin, fatty?"
$Str[43] ="Yeah, I hate you."
$Str[44] ="Leave this house?"
$Str[45] ="I come to eat, not to play bingo, sally."
$Str[46] ="Who's the left handed one now? hahahah"
$Str[47] ="Can I borrow that cheese?"
$Str[48] ="The machine of the future."
$Str[49] ="No, shut the hell up."
$Str[50] ="I wish you were haitian."
$Str[51] ="You Stupid Teapot You"
$Str[52] ="Im a little teapot Short and Stout"
$Str[53] ="You Plonker"
$Str[54] ="Scapegoat"
$Str[55] ="Little naked"
$Str[56] ="Daughter of the gonad"
$Str[57] ="I have much skin."
$Str[58] ="Sun of a Gun"
$Str[59] ="You`re just a big baby."
$Str[60] ="I love Computers, but I could never eat a Whole one."
$Str[61] ="A day for the whole dog."
$Str[62] ="Eat your whole neck, Bobby."
$Str[62] ="Honey I`m Home!"
$Str[63] ="Hey, Dad"
$Str[64] ="Do you wanna get slapped??"
$Str[65] ="Yeah, you're nothing but a sloth farmer"
$Str[66] ="Yum, worm pie for tea!"
$Str[67] ="Only plastic will do."
$Str[68] ="Why not shave your tounge already?"
$Str[69] ="Oh, my point exactly."
$Str[70] ="Really, how fasinating, I never knew that!"
$Str[71] ="No pun intended."
$Str[72] ="Hey maggot lips!"
$Str[73] ="Do I look ugly to you?"
$Str[74] ="I'm not adlibbing."
$Str[75] ="Help, I`ve punned to death!"
$Str[76] ="Slut count!"
$Str[77] ="I like the Meatvest."
$Str[78] ="You could say it's my life."
$Str[79] ="I sleep on a bed of meat."
$Str[80] ="What's a meat vest?"
$Str[81] ="Oh, because they like to eat."
$Str[82] ="I've never owned a fish."
$Str[83] ="The president is a an idiot!"
$Str[84] ="Do you like squid?"
$Str[85] ="I will have a pint of Stupid please."
$Str[86] ="What do you think about metal dogs?"
$Str[87] ="I have legs."
$Str[88] ="Who's ya daddy?"
$Str[89] ="Do you talk to the cheese?"
$Str[90] ="My house has one wall."
$Str[91] ="Talk to the Hand."
$Str[92] ="My shoes are made of butter."
$Str[93] ="The lettuce is nice."
$Str[94] ="So, Thanks, you maggot"
$Str[95] ="You better not talk if you know what's good for you."
$Str[96] ="Cats will prevail."
$Str[97] ="What's the gig?"
$Str[98] ="44 mimes?"
$Str[99] ="Fourty Four down, one hundred and twenty to go."
$Str[100] ="Talk to me little boy."
$Str[101] ="Do you wear a cape?"
$Str[102] ="why do you wear underpants on the outside? "
$Str[103] ="Act your age not your shoe size."
$Str[104] ="Walmart Sucks!"
$Str[105] ="I dont like mondays."
$Str[106] ="This is all part of a bigger plan"
$Str[107] ="I have a clear dad."
$Str[108] ="Bears are the master race."
$Str[109] ="Electronic pigs dance wildly."
$Str[110] ="I have wooden teeth."
$Str[111] ="Do Androids have Electric Dreams?"
$Str[112] ="Ok, ok, ok, I'll leave."
$Str[113] ="The crow is the anwser."
$Str[114] ="Give me onions, or give me death."
$Str[115] ="Vegitation of the artic."
$Str[116] ="But to have it happen to my own neck"
$Str[117] ="Be gone Foul Person."
$Str[118] ="welcome to my wardrobe."
$Str[119] ="I like many shapes, 5 isn't one of them."
$Str[120] ="Please leave this cat here with me."
$Str[121] ="I will take good care of your yeti, Ms. Gordon."
$Str[122] ="My pants are free standing."
$Str[123] ="The ham jack?"
$Str[124] ="Take my other pants."
$Str[125] ="You have a box? "
$Str[126] ="You are very pink tonight."
$Str[127] ="You will be Sorry"
$Str[128] ="You, you carnivore you!"
$Str[129] ="I see naked People."
$Str[130] ="Be Alert, your country need Lerts!"
$Str[131] ="Throw another Kanga on the Barbie"
$Str[132] ="call me anything you like, but never call me late for tea!"
$Str[133] ="Can you whistle?"
$Str[134] ="You Jive Mow Fo"
$Str[135] ="Well slap my face with a wet Haddock!"
$Str[136] ="Get thee behind me Painted Jezabell!"
$Str[137] ="He shoots, He scores!"
$Str[138] ="You can show me your elephent now."
$Str[139] ="I`m the only Gay in the Village."
$Str[140] ="I am not a number, I am a Free Man!"
$Str[141] ="Oh, I think we`ve got a live one here!"
$Str[142] ="Nurse, the screens!"
$Str[143] ="I`m ready for my sponge bath now."
$Str[144] ="Shall I operate now?"
$Str[145] ="Hi Im Jack Michealson."
$Str[146] ="You need extra Protein."
$Str[147] ="Well, Knock me down with a feather!"
$Str[148] ="You are the creme del a creme"
$Str[149] ="Just another day in the life of Joe plastic."
;------------------------------------------------------

$TalkerGUI = GUICreate("CrapTalker (Small)", 511, 375, 195, 130)

GUICtrlCreateLabel("This", 448, 24, 28, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

GUICtrlCreateLabel("Voices", 8, 24, 42, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$SickoNe = "eaailoyoeeuu uaaaeaolllllaal lloooaauoyoe euuuaailoiooo olaa"

$Male = GUICtrlCreateButton("Male", 8, 40, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Female = GUICtrlCreateButton("Female", 8, 56, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$LargeMale = GUICtrlCreateButton("Large Male", 8, 72, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Child = GUICtrlCreateButton("Child", 8, 88, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Lowmale = GUICtrlCreateButton("Low Male", 8, 104, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$CrispMale = GUICtrlCreateButton("Crisp Male", 8, 152, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$MellowMale = GUICtrlCreateButton("Mellow Male", 8, 136, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$MellowFemale = GUICtrlCreateButton("Mellow Female", 8, 120, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$TheFly = GUICtrlCreateButton("The Fly", 8, 168, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Roboto = GUICtrlCreateButton("Roboto", 8, 184, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Martian = GUICtrlCreateButton("Martian", 8, 200, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Colussus = GUICtrlCreateButton("Colossus", 8, 216, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Fastfred = GUICtrlCreateButton("Fast Fred", 8, 232, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$OLDWoman = GUICtrlCreateButton("Old Woman", 8, 248, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Munchkin = GUICtrlCreateButton("Munchkin", 8, 264, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Troll = GUICtrlCreateButton("Troll", 8, 280, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Nerd = GUICtrlCreateButton("Nerd", 8, 296, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$MilkToast = GUICtrlCreateButton("Milk Toast", 8, 312, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Tipsy = GUICtrlCreateButton("Tipsy", 8, 328, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$ChoirBoy = GUICtrlCreateButton("ChoirBoy", 8, 344, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
;--------------------------------------------------------------------

$FuckYou = GUICtrlCreateButton("Fuck You!", 408, 40, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Shutup = GUICtrlCreateButton("Shut Up", 408, 56, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Ass = GUICtrlCreateButton("AssHole", 408, 72, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$EatShit = GUICtrlCreateButton("Eat My Shit", 408, 88, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$GoHell = GUICtrlCreateButton("Go to Hell", 408, 104, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$MonkeyFAce = GUICtrlCreateButton("Monkeyface", 408, 152, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$SoWhat = GUICtrlCreateButton("So What?", 408, 136, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$shitHead = GUICtrlCreateButton("Shit Head", 408, 120, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$SickoNoise = GUICtrlCreateButton("Sicko Noise", 408, 168, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

;------------------------------------------------------------------------

$Hello = GUICtrlCreateButton("Hello", 296, 40, 97, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Goodbye = GUICtrlCreateButton("GoodBye", 296, 56, 97, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$YourWelcome = GUICtrlCreateButton("You`re Welcome", 296, 88, 97, 17, $WS_CLIPSIBLINGS)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Thankyou = GUICtrlCreateButton("Thank you", 296, 72, 97, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Dontknow = GUICtrlCreateButton("I don`t know", 208, 40, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Thinkso = GUICtrlCreateButton("I think so", 208, 56, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Isnice = GUICtrlCreateButton("That is nice", 208, 72, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$WowCool = GUICtrlCreateButton("Wow, Cool", 208, 88, 89, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Iwill = GUICtrlCreateButton("I will", 112, 88, 97, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Maybe = GUICtrlCreateButton("Maybe", 112, 72, 97, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Ok = GUICtrlCreateButton("OK", 112, 56, 97, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Yes = GUICtrlCreateButton("Yes", 112, 40, 49, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$No = GUICtrlCreateButton("No", 160, 40, 49, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

GUICtrlCreateLabel("Statements/Responses", 112, 24, 135, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$WantTalk = GUICtrlCreateButton("I just want to talk", 112, 112, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$CalmDown = GUICtrlCreateButton("Please Calm Down", 256, 112, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$NotShout = GUICtrlCreateButton("Please do not Shout", 256, 128, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$AmConfused = GUICtrlCreateButton("I am Confused", 112, 128, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$overSoon = GUICtrlCreateButton("I will over soon", 112, 144, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$NeverMind = GUICtrlCreateButton("Never Mind", 256, 208, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$DontDo = GUICtrlCreateButton("Please don`t do that", 256, 144, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$PleaseSay = GUICtrlCreateButton("Please say something", 256, 160, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$WhatSay = GUICtrlCreateButton("What did you say?", 256, 192, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$CarBroken = GUICtrlCreateButton("My Car is broken", 256, 176, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Whynot = GUICtrlCreateButton("Why Not?", 112, 208, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$SixMyself = GUICtrlCreateButton("I have about six Myself", 112, 192, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$haveCold = GUICtrlCreateButton("I have a Cold", 112, 176, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Needtalk = GUICtrlCreateButton("I need to Talk to you", 112, 160, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$WhatFuck = GUICtrlCreateButton("What the Fuck?", 112, 224, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$ThatsBullshit = GUICtrlCreateButton("Thats Bullshit", 256, 224, 137, 17, $WS_BORDER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Prev = GUICtrlCreateButton("Prev", 408, 192, 41, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Next = GUICtrlCreateButton("Next", 456, 192, 41, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Random = GUICtrlCreateButton("Random", 408, 216, 89, 25)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

;------------------------------------------------------------------------
$Sayit = GUICtrlCreateButton("Say It!", 112, 336, 97, 23)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$AllVoices = GUICtrlCreateButton("Preview All Voices", 216, 336, 113, 23)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$Exit = GUICtrlCreateButton("Exit", 336, 336, 97, 23)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

$TalkBox = GUICtrlCreateEdit("", 112, 272, 321, 57, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetData($TalkBox, $SickoNe)
;------------------------------------------------------------------------

$Title = "Define Custom Voices"
$Custom = "Edit1"
$Close = "Button2"
$Save = "Button3"
$Remove = "Button4"
$Speak = "Button5"

$Model = "ComboBox2"
$Pitch = "Edit2"
$WPM = "Edit3"
$Contour = "ComboBox3"
$Gender = "ComboBox4"
$Quality = "ComboBox5"

$SpeechText = "Edit4"
$Sel = 0
$n=0

GUISetState(@SW_SHOW)

Run ("C:\Documents and Settings\Clive.MYCOMPUTER\Desktop\Willow Pond talker\doc.exe")  ;Change this to where you have the program
Sleep (500)

While 1
If WinExists ( $Title) = 0 then
	 GUIDelete ($TalkerGUI)
	Exit
Endif

	$msg = GuiGetMsg()
	Select
		Case $msg = $GUI_EVENT_CLOSE
		ExitLoop
		Case Else
		;;;;
	EndSelect

Select
	Case $msg= $Male
		ControlFocus($Title,"",$Model)
	_SetSel(0)

	Case $msg= $Female
		ControlFocus($Title,"",$Model)
	_SetSel(1)

	Case $msg= $LargeMale
		ControlFocus($Title,"",$Model)
	_SetSel(2)

	Case $msg= $Child
		ControlFocus($Title,"",$Model)
	_SetSel(3)

	Case $msg= $Lowmale
		ControlFocus($Title,"",$Model)
	_SetSel(4)

	Case $msg= $MellowFemale
		ControlFocus($Title,"",$Model)
	_SetSel(5)

	Case $msg = $Mellowmale
		ControlFocus($Title,"",$Model)
	_SetSel(6)

	Case $msg= $Crispmale
		ControlFocus($Title,"",$Model)
	_SetSel(7)

	Case $msg= $TheFly
		ControlFocus($Title,"",$Model)
	_SetSel(8)

	Case $msg= $Roboto
		ControlFocus($Title,"",$Model)
	_SetSel(9)

	Case $msg= $Martian
		ControlFocus($Title,"",$Model)
	_SetSel(10)

	Case $msg= $Colussus
		ControlFocus($Title,"",$Model)
	_SetSel(11)

	Case $msg= $Fastfred
		ControlFocus($Title,"",$Model)
	_SetSel(12)

	Case $msg= $OldWoman
		ControlFocus($Title,"",$Model)
	_SetSel(13)

	Case $msg= $Munchkin
		ControlFocus($Title,"",$Model)
	_SetSel(14)

	Case $msg= $Troll
		ControlFocus($Title,"",$Model)
	_SetSel(15)

	Case $msg= $Nerd
		ControlFocus($Title,"",$Model)
	_SetSel(16)

	Case $msg= $MilkToast
		ControlFocus($Title,"",$Model)
	_SetSel(17)

	Case $msg= $Tipsy
		ControlFocus($Title,"",$Model)
	_SetSel(18)

	Case $msg= $ChoirBoy
		ControlFocus($Title,"",$Model)
	_SetSel(19)

	Case $msg= $AllVoices
		For $n = 0 to 19
			ControlFocus($Title,"",$Model)
			_SetSel($n)
			$CurrentSel = ControlCommand($Title, "", $Model, "GetCurrentSelection", "")
			_saytext ("This is the "&$CurrentSel &" Voice Speaking")
			sleep (3500)
		next

	Case $msg= $Sayit
		ControlFocus ($TalkerGUI,"","Edit1")
		$Say = ControlGetText ($TalkerGUI, "", "Edit1")
		_saytext ($Say)

	Case $msg= $Exit
		ControlClick($Title, "", $Close)
		GUIDelete ($Title )
		Exit

;----------------------------
	Case $msg= $FuckYou
	_saytext ("Fuck You!")

	Case $msg= $ShutUp
	_saytext ("Shut the Fuck Up!")

	Case $msg= $EatShit
	_saytext ("Eat Shit and Die MuthaFucka!")

	Case $msg= $GoHell
	_saytext ("You go to Hell!")

	Case $msg= $Ass
	_saytext ("You Asshole!")

	Case $msg= $MonkeyFace
	_saytext ("Hey You, yes, you, MonkeyFace!")

	Case $msg= $SoWhat
	_saytext ("So?, What?")

	Case $msg= $ShitHead
	_saytext ("You Shithead!")

	Case $msg= $SickoNoise
	_saytext ($SickoNe)
;------------------------------
	Case $msg= $Hello
	_saytext ("Hello")

	Case $msg= $Goodbye
	_saytext ("Goodbye")
;
	Case $msg= $Maybe
	_saytext ("Maybe")

	Case $msg= $IWill
	_saytext ("I will")

	Case $msg= $YourWelcome
	_saytext ("Your Welcome")
;
	Case $msg= $Thankyou
	_saytext ("Thank You")
;
	Case $msg= $Dontknow
	_saytext ("I Do not know")
;
	Case $msg= $Thinkso
	_saytext ("I think so")
;
	Case $msg= $Isnice
	_saytext ("That is nice")
;
	Case $msg= $WowCool
	_saytext ("Wow Cool")
;
	Case $msg= $Ok
	_saytext ("Ok")
;
	Case $msg= $Yes
	_saytext ("Yes")
;
	Case $msg= $No
	_saytext ("No")
;
	Case $msg= $WantTalk
	_saytext ("I just want to talk")
;
	Case $msg= $CalmDown
	_saytext ("Please calm down")
;
	Case $msg= $NotShout
	_saytext ("Please do not shout")
;
	Case $msg= $AmConfused
	_saytext ("I am confused")
;
	Case $msg= $overSoon
	_saytext ("I will over soon")
;
	Case $msg= $NeverMind
	_saytext ("Oh Nevermind")
;
	Case $msg= $DontDo
	_saytext ("Please do not do that")
;
	Case $msg= $PleaseSay
	_saytext ("Please say something")
;
	Case $msg= $WhatSay
	_saytext ("What did you say?")
;
	Case $msg= $CarBroken
	_saytext ("My car is broken")
;
	Case $msg= $Whynot
	_saytext ("Why not?")
;
	Case $msg= $SixMyself
	_saytext ("I have six myself")
;
	Case $msg= $haveCold
	_saytext ("I have a cold")
;
	Case $msg= $Needtalk
	_saytext ("We need to talk")
;
	Case $msg= $WhatFuck
	_saytext ("What the Fuck?")
;
	Case $msg= $ThatsBullshit
	_saytext ("Thats Bullshit")
;
	Case $msg= $Random
		$Ran = Random(1,149,1)
	GUICtrlSetData($TalkBox,$Str[$Ran])

	Case $msg= $Prev
		$n = $n-1
		If $n < 0 then
		$n=0
		Endif
	GUICtrlSetData($TalkBox,$Str[$n])

	Case $msg= $Next
		$n = $n+1
		If $n >149 then
		$n=149
		Endif
	GUICtrlSetData($TalkBox,$Str[$n])
;------------------------------

	EndSelect	
WEnd


Func _SetSel($Sel)
		ControlFocus($Title,"",$Model)
	ControlCommand($Title, "", $Model, "SetCurrentSelection", $Sel)
EndFunc


func _saytext($text)
		ControlFocus ($title,"",$Speechtext)
	ControlSetText ($title,"",$Speechtext,"")
	ControlSend ($title,"",$Speechtext,$text)
		ControlClick($Title, "", $Speak)
EndFunc

Exit