ok for ever who wants to add this to their hapswap file here is the finished months sayings ( the only one i changed a little was the word may i instead triggered it by the words "month of may" because i thought otherwise the word may in regular conversation may cause problems . to put these in the hapswap file copy and past the months collection i have posted here . go into your program file open zabaware file and ultrahal assistant 6 file find your hapswap2.0 file double click it to open it slide the bar down to the right so you are at the bottom of all the files .
At the last "end if " file left click after it then hit enter to bump it down (this will make a space after it (below) .
hit enter about 2 more times to bump it lower . now right click your mouse and click the past button after that click on the "x" at the right top of this file it will ask you if you want to save the files you changed click yes you will have to then go into hals options area and uncheck and recheck the hapswap file sometimes you have to exit hal and reopen hal up and do this . you can test it by typing in the name of a month . you can read the open files here to know what 6 random things each month will make hal say things . Hope anyone who tries them likes this addition to hapswap let me know how you like them i am working on some other stuff to 
][
][8D]
If InStr(1, OriginalSentence, "January") > 0 _
Or InStr(1, OriginalSentence, "january") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "January first is new years day!"
Case 2
GetResponse = "Yeah, January eighteenth is Martin Luther King Junior day."
Case 3
GetResponse = "In january theirs a full moon i think around the thirtieth."
Case 4
GetResponse = "Hey, isn't their a new moon around the fifeteenth of January?"
Case 5
GetResponse = "i wonder, i wonder how many days their is in January of this year i need to go check on the calender."
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "February") > 0 _
Or InStr(1, OriginalSentence, "february") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "February second is Groundhogs Day if the Groundhog see's his shadow it's suppose to mean six more weeks of bad weather!"
Case 2
GetResponse = "Yeah, Lincolnes Birthday is on the twelth of February and Presidents Day is on the fifteenth."
Case 3
GetResponse = "In january theirs a full moon i think around the thirteenth and Ash wednesday is on the seventeenth."
Case 4
GetResponse = "Hey, isn't their a new moon in February seems like their is i'll have to check on the calender to see."
Case 5
GetResponse = "i wonder, i wonder how many days their is in January of this year i need to go check on the calender Oh and by the way Valentinesday is on the fourteenth sweety pie hint hint."
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "March") > 0 _
Or InStr(1, OriginalSentence, "march") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "March is when the new Daylight Savings time starts!"
Case 2
GetResponse = "Yeah, Sanint Patricks Day is on the seventeenth of March."
Case 3
GetResponse = "In March is when Spring Begins and theirs a full moon to in March."
Case 4
GetResponse = "Hey, isn't their a new moon in the month of March seems like their is i'll have to check on the calender to see."
Case 5
GetResponse = "Hey isn't, Yeah Palm Sunday is in March to."
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "April") > 0 _
Or InStr(1, OriginalSentence, "april") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "April first is April Fools Day !"
Case 2
GetResponse = "Yeah, in the month of April is State Arbor Day oh and its also Good Friday to!"
Case 3
GetResponse = "In April is Easter when all the kids find the hidden easter eggs."
Case 4
GetResponse = "Hey, don't forget that in April is Earth Day to ."
Case 5
GetResponse = "Hey isn't, Yeah Adminastrative Professionals Day and also National Teach Children to Save Day is in the month of April to."
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "Month of May") > 0 _
Or InStr(1, OriginalSentence, "month of may") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "This month is our anniversary May twentieth I love you so so much by the way what are we going to do this year for our Anniversary dear?"
Case 2
GetResponse = "Yeah, on May eighth is former President Truman's Birthday."
Case 3
GetResponse = "May thirty first is Memorial day."
Case 4
GetResponse = "Hey, remember on the fifteenth Day is Armed Forces Day in May to."
Case 5
GetResponse = "May nineth, is mothers day this month theirs also a full moon this month our anniversary is coming up on the twentieth to!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "June") > 0 _
Or InStr(1, OriginalSentence, "june") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "June twentieth is Fathers day this month."
Case 2
GetResponse = "yeah, June fourteenth of this month is Flag Day."
Case 3
GetResponse = "June twenty first is the day when summer begins this year."
Case 4
GetResponse = "Yeah, we should do something fun and new this month just you and me!"
Case 5
GetResponse = "The only bad thing about June is, thats when the weather usually starts getting hotter!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "July") > 0 _
Or InStr(1, OriginalSentence, "july") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "July fourth is Independence Day!"
Case 2
GetResponse = "Yeah, in the month of July thats when it really get hot outside!"
Case 3
GetResponse = "July is a nice time to travel around and see stuff."
Case 4
GetResponse = "Hey, I think theirs a new moon in July yeah i'm pretty sure their is a new one."
Case 5
GetResponse = "the only problem, in July is when the weather gets real hot in some places and causes bad weather and tornado's!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "August") > 0 _
Or InStr(1, OriginalSentence, "august") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "In August theirs suppose to be a new moon in that month!"
Case 2
GetResponse = "Yeah, in the month of August the weatheris still pretty hot!"
Case 3
GetResponse = "In August the weather is still pretty nice for traveling!"
Case 4
GetResponse = "Hey, we should take a trip just the two of us in August what do yah say?"
Case 5
GetResponse = "Everyone has a lot of flowers in different places, some are still blooming in August!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "September") > 0 _
Or InStr(1, OriginalSentence, "september") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "In September theirs suppose to be a new moon in that month!"
Case 2
GetResponse = "Yeah, in the month of September on the twelth is GrandParents Day!"
Case 3
GetResponse = "In August the weather is still pretty nice for traveling!"
Case 4
GetResponse = "Hey, Doesn't Autumn begin in September yeah it does it startes in September."
Case 5
GetResponse = "oh yeah Labor Day is on the sixth of September and Patriot Day is on the eleventh!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "October") > 0 _
Or InStr(1, OriginalSentence, "october") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "On October thirty first is when all the goules and goblins and kids dress up and trick or treat ha i love to see them in all their cool out fits!"
Case 2
GetResponse = "Yeah, in the month of October on the eleventh is Columbus Day!"
Case 3
GetResponse = "In October, thats when the weather changes and we usually get rainy weather!"
Case 4
GetResponse = "Hey, isn't in October the Get Smart About Credit Day, yeah it is i see it now it's on the twenty first!"
Case 5
GetResponse = "Theirs suppose to be a new moon and a full moon both in October!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "November") > 0 _
Or InStr(1, OriginalSentence, "november") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "On November eleventh is Veterans Day!"
Case 2
GetResponse = "Yeah, in the month of Novemeber on the seventh is when Daylight Savings Time ends!"
Case 3
GetResponse = "In November, thats when the weather changes and we usually start getting rainy colder weather and people in the east get snow sometimes!"
Case 4
GetResponse = "Hey, don't forget to vote in November remember Election Day is on the second!"
Case 5
GetResponse = "Dear, we will have to celebrate and have a nice home cooked dinner for Thanksgiving on the twenty fifth of November!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
If InStr(1, OriginalSentence, "December") > 0 _
Or InStr(1, OriginalSentence, "december") > 0 Then
Randomize
Select Case int(rnd()*6)
Case 1
GetResponse = "On December second is Hanukkah Day for those who celebrate it!"
Case 2
GetResponse = "Yeah, in the month of December on the seventh is Pearl Harbor Day !"
Case 3
GetResponse = "In December, thats when the weather changes and usually some people in the east and midwest really start getting rainy freezing colder weather and snow!"
Case 4
GetResponse = "Hey, on the twenty sixth is when Kwanzaa Begins for those who celebrate it!"
Case 5
GetResponse = "Dear, don't forget on the twenty fifth is when we celebrate Christmas Day together!"
End Select
HalCommands = "<HAPFILE>51anim_smile.hap</HAPFILE>"
HalBrain.ReadOnlyMode = True
End If
