ChristianEthics 9.4
_________________________________________________________________________
E-mail: ChristianEthics2@yahoo.ca 
Messenger: ChristianEthics@hotmail.com 
Home page: http://ca.geocities.com/christianethics2
Message Board: http://groups.yahoo.com/group/ChristianEthics_BibleBotDownloadZone/
__________________________________________________________________________

Cute-Replys.
1) Are set to respond when someone says the key word onto the main screen.

2) You can add more cute-replys to this file. Just copy and paste a command
and add a new word and response. (The top commands are self commands
so that ChristianEthics can use them, the lower commands are for
external users who type the key words onto the msn screen.

3) This file will also Add and Subract from the main screen.
Example: Type !sub 9-3 it will respond 6
Type !add 9+3 it will respond 12

4)Be careful not to have the reply the exact same as the trigger word
as it may cause a 'flood loop' if another ChristianEthics is in the 
room with the same settings. 

Cross symbol is: 

Editted Sept 2001 works with show users colors and should work with clearmsn
Added in !hug so and so command.
__________________________________________________________________________
on *:INPUT:*:{ if (%cutesayings = on) {
    IF (!sub isin $1-) { /msg # S Trebuchet\bMS;0 $calc($2-)   
    }
    elseif (!add isin $1-) { /msg # S Trebuchet\bMS;0 $calc($2+) 
    }
    elseif (!hug isin $1-) {  
      if ($2 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $2- (f)(l)(f)))))) 
      if ($2 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }
    elseif (God Bless you isin $1-) { /msg $chan S Trebuchet\bMS;0 $nick and you also 
    }
    elseif (hug me isin $1-) { /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }
    elseif (hugs for me isin $1-) { /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }
    elseif (hug for me isin $1-) { /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }

    elseif (hugs for you isin $1-) { /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) hugs for you (f)(l)(f)))))) 
    }
    elseif (hug for you isin $1-) { /msg $chan S Trebuchet\bMS;0((((((f)(l)(f) Hug for you (f)(l)(f)))))) 
    }
    elseif (hug isin $1) && (for isin $2) {  
      if (hugged isin $1-) halt
      if ($3 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $3 (f)(l)(f)))))) 
      if ($3 == $null) /msg $chan ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }
    elseif (hug == $1) {  
      if (hugged isin $1-) halt
      if (hugs isin $1-) halt 
      if ($2 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $2- (f)(l)(f)))))) 
      if ($2 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }
    elseif (hug == $2) {  
      if (hugged isin $1-) halt
      if (hugs isin $1-) halt 
      if ($3 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $3- (f)(l)(f)))))) 
      if ($3 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }

  }
} 
------------------------------------------------------------------------
on *:TEXT:*!add*:*: { if (%cutesayings = on) /msg # S Trebuchet\bMS;0 $calc($2-) 
}
on *:TEXT:*!sub*:*: { if (%cutesayings = on) /msg # S Trebuchet\bMS;0 $calc($2+) 
}
on *:TEXT:*God Bless you*:*: { if (%cutesayings = on) /msg # S Trebuchet\bMS;0 $nick and you also 
}

on *:TEXT:*!hug*:*: { if (%cutesayings = on) {
    if ($2 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $2- (f)(l)(f)))))) 
    if ($2 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
  }
}
on *:TEXT:*hug for you*:*: { if (%cutesayings = on) { 

    /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) hug for you (f)(l)(f)))))) 
  }
}
on *:TEXT:*hugs for you*:*: { if (%cutesayings = on) { 
    /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) hugs for you (f)(l)(f)))))) 
  }
}

on *:TEXT:*hug me*:*: { if (%cutesayings = on) { 
    if (hugged isin $1) halt
    if (hugs isin $1) halt 
    /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
  }
}
on *:TEXT:*hugs for me*:*: { if (%cutesayings = on) { 
    /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
  }
}
on *:TEXT:*hug for me*:*: { if (%cutesayings = on) { 
    /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
  }
}

on *:TEXT:*hug*:*: { if (%cutesayings = on) {
    if (hugs == $1) && (for isin $2) { 
      if ($3 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $3- (f)(l)(f)))))) 
      if ($3 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
      halt
    }
    if (hug == $1) && (for isin $2) { 
      if ($3 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $3- (f)(l)(f)))))) 
      if ($3 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
      halt
    }
    elseif (hug == $1) && (for !isin $2) { 
      if (hugged isin $1-) halt
      if (hugs isin $1-) halt 
      if ($2 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $2- (f)(l)(f)))))) 
      if ($2 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }

    elseif (hug == $2) { 
      if (hugged isin $1-) halt 
      if (hugs isin $1-) halt 
      if ($3 !== $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $3- (f)(l)(f)))))) 
      if ($3 == $null) /msg $chan S Trebuchet\bMS;0 ((((((f)(l)(f) $nick (f)(l)(f)))))) 
    }

  }
}






__________________________________________________________________________

*Do NOT edit below here.
________________________________________________________________________

on *:LOAD: { set %cutesayings $=gl On | /splay notify.wav
}

on *:UNLOAD: { set %cutesayings $=gl Off | /splay unload.wav
}
