Zabaware Support Forums

Zabaware Forums => Ultra Hal 7.0 => Topic started by: C-Murder_187 on December 03, 2004, 09:44:44 pm

Title: Uncensored Hal
Post by: C-Murder_187 on December 03, 2004, 09:44:44 pm

Hi there. I have downloaded the uncensored brain for Hal, loaded it, and it makes absolutely no difference. I still get the constant "Please don't swear". I am using the newest full version. Can anyone tell me why this plugin is exactly the same as the default? Cheers.

Title: Uncensored Hal
Post by: CoCoKid on December 04, 2004, 02:11:37 pm

You might find better support for this isssue in the "Programming Using the Ultra Hal Brain Editor" Forum.
Since I believe what you installed is a third party script, you might get the answers in there.

-=Rick=-

Title: Uncensored Hal
Post by: C-Murder_187 on December 05, 2004, 09:29:42 pm

Much appreciated. Thanks dude.

Title: Uncensored Hal
Post by: moreis62 on December 09, 2004, 03:35:35 am

quote:

---

Originally posted by C-Murder_187

Hi there. I have downloaded the uncensored brain for Hal, loaded it, and it makes absolutely no difference. I still get the constant "Please don't swear". I am using the newest full version. Can anyone tell me why this plugin is exactly the same as the default? Cheers.

---

Murder_187 i have a fix for that try this.

If InStr(UserSentence, "****") > 0 Then Naughty = True
   If InStr(UserSentence, "**** OFF") > 0 Then Naughty = True
   If InStr(UserSentence, "**** ME") > 0 Then Naughty = True
   If InStr(UserSentence, "BLOW ME") > 0 Then Naughty = True
   If InStr(UserSentence, "BLOW YOU") > 0 Then Naughty = True
   If InStr(UserSentence, "I *****") > 0 Then Naughty = True
   If InStr(UserSentence, "BITCH") > 0 Then Naughty = True
   If InStr(UserSentence, "BASTARD") > 0 Then Naughty = True
   If InStr(UserSentence, "YOU ASSHOLE") > 0 Then Naughty = True
   If InStr(UserSentence, "GO TO HELL") > 0 Then Naughty = True
   If Naughty = True Then
       Swear = Swear + 2
       If Swear > 1 And Swear < 99 Then Insult = GenerateInsult & VbCrLf
       If Swear > 1 And Swear < 99 Then Insult = GenerateInsult & VbCrLf
       If Swear = 100 Then Insult = Insult + "I'm tired of your swearing.  I'm just going to ignore you from now on." & VbCrLf
       If Swear > 101 Then Insult = Insult + ". . . . . . . . . . . . . . . ." & VbCrLf
   End If

Title: Uncensored Hal
Post by: CoCoKid on December 09, 2004, 05:57:25 am

Hehe...

That isn't nice