Author Topic: Again, I was bored. Sue me.  (Read 3810 times)

DarkStar

  • Full Member
  • ***
  • Posts: 135
  • Scripts for Praise
    • CorpseCorp
Again, I was bored. Sue me.
« on: March 06, 2009, 12:11:26 AM »
Have fun.

Code: [Select]
Dim sapi
Set sapi=CreateObject("sapi.spvoice")

Sub ONTEXT(Message,Channel,Nickname,Host,ServerNumber)
  if instr(lcase(Message), lcase(MyNickName(ServerNumber))) then
    sapi.Speak Message
  End if
End Sub

(Note: Might wanna adjust your speakers settings)
This message brought to you by the Wonderful Wizard of Oz.

Windows_95

  • Newbie
  • *
  • Posts: 31
  • Who's cool and has two thumbs? This guy!
Re: Again, I was bored. Sue me.
« Reply #1 on: March 06, 2009, 12:43:11 PM »
my computer is possessed :-o sweet script
I do not feel obliged to believe that the same God who has endowed us with sense, reason, and intellect has intended us to forgo their use. Galileo Galilei

HackBenjamin

  • Newbie
  • *
  • Posts: 35
Re: Again, I was bored. Sue me.
« Reply #2 on: June 07, 2009, 03:29:59 PM »
Wow Ds you really did it this time