Author Topic: Uncensored Hal  (Read 3567 times)

C-Murder_187

  • Newbie
  • *
  • Posts: 2
    • View Profile
Uncensored Hal
« 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.
 

CoCoKid

  • Jr. Member
  • **
  • Posts: 53
    • View Profile
    • http://www.thefinalmix.com
Uncensored Hal
« Reply #1 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=-
 

C-Murder_187

  • Newbie
  • *
  • Posts: 2
    • View Profile
Uncensored Hal
« Reply #2 on: December 05, 2004, 09:29:42 pm »
Much appreciated. Thanks dude.
 

moreis62

  • Full Member
  • ***
  • Posts: 102
    • View Profile
    • http://www.myway.com/
Uncensored Hal
« Reply #3 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
ISMAEL LEDESMA.

CoCoKid

  • Jr. Member
  • **
  • Posts: 53
    • View Profile
    • http://www.thefinalmix.com
Uncensored Hal
« Reply #4 on: December 09, 2004, 05:57:25 am »
Hehe...

That isn't nice