ChristianEthics-VSIXc V3.1
Updated Sept 2006 to work on VSIXc Chat Network
www.VSIXc.com
_________________________________________________________________________
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, or when 
you say something from your bot.  

input responds to what you type from your bot.
text responds to what others type.

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) { tokenize 32 $vstrip($1-)
    If (!sub isin $1-) { /msg # $calc($2-)  
    }
    elseif (!add isin $1-) { /msg # $calc($2+)
    }
    elseif (!hug isin $1-) {  
      if ($2 == me) { /msg $chan ((((((f)(f) $nick (f)(f)))))) | halt }
      if ($2 !== $null) /msg $chan ((((((f)(f) $2- (f)(f)))))) 
      if ($2 == $null) /msg $chan ((((((f)(f) $nick (f)(f)))))) 
    }
    elseif (God Bless you isin $1-) { /msg $chan $nick and you also
    }
    elseif (hug me isin $1-) { /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (hugs for me isin $1-) { /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (hug for me isin $1-) { /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (hugs for you isin $1-) { /msg $chan ((((((f)(f) huggs for you (f)(f))))))
    }
    elseif (hug for you isin $1-) { /msg $chan((((((f)(f) Hugg for you (f)(f))))))
    }
    elseif (hug isin $1) && (for isin $2) {  
      if (hugged isin $1-) halt
      if ($3 !== $null) /msg $chan ((((((f)(f) $3 (f)(f))))))
      if ($3 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (hug == $1) {  
      if (hugged isin $1-) halt
      if (hugs isin $1-) halt 
      if ($2 !== $null) /msg $chan ((((((f)(f) $2- (f)(f))))))
      if ($2 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (hug == $2) {  
      if (hugged isin $1-) halt
      if (hugs isin $1-) halt 
      if ($3 !== $null) /msg $chan ((((((f)(f) $3- (f)(f))))))
      if ($3 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (I need a hug isin $1-) { /msg $chan ((((((f)(f) hugs for $nick (f)(f))))))
    }

  }
} 
------------------------------------------------------------------------
on *:TEXT:*!add*:*: { tokenize 32 $vstrip($1-) 
  if (%cutesayings = on) /msg # $calc($2-)
}
on *:TEXT:*!sub*:*: { tokenize 32 $vstrip($1-)
  if (%cutesayings = on) /msg # $calc($2+)
}
on *:TEXT:*God Bless you*:*: { tokenize 32 $vstrip($1-)
  if (%cutesayings = on) /msg # $nick and you also
}

on *:TEXT:*!hug*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    if ($2 == me) { /msg $chan ((((((f)(f) $nick (f)(f)))))) | halt }

    if ($2 !== $null) /msg $chan ((((((f)(f) $2- (f)(f))))))
    if ($2 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
  }
}
on *:TEXT:*hug for you*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)

    /msg $chan ((((((f)(f) hugg for you (f)(f))))))
  }
}
on *:TEXT:*hugs for you*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    /msg $chan ((((((f)(f) huggs for you (f)(f))))))
  }
}
on *:TEXT:*I need a hug*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    /msg $chan ((((((f)(f) hugs for $nick (f)(f))))))
  }
}



on *:TEXT:*hug me*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    if (hugged isin $1) halt
    if (hugs isin $1) halt 
    /msg $chan ((((((f)(f) $nick (f)(f))))))
  }
}
on *:TEXT:*hugs for me*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    /msg $chan ((((((f)(f) $nick (f)(f))))))
  }
}
on *:TEXT:*hug for me*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    /msg $chan ((((((f)(f) $nick (f)(f))))))
  }
}

on *:TEXT:*hug*:*: { if (%cutesayings = on) { tokenize 32 $vstrip($1-)
    if (hugs == $1) && (for isin $2) { 
      if ($3 !== $null) /msg $chan ((((((f)(f) $3- (f)(f))))))
      if ($3 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
      halt
    }
    if (hug == $1) && (for isin $2) { tokenize 32 $vstrip($1-)
      if ($3 !== $null) /msg $chan ((((((f)(f) $3- (f)(f))))))
      if ($3 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
      halt
    }
    elseif (hug == $1) && (for !isin $2) { tokenize 32 $vstrip($1-)
      if (hugged isin $1-) halt
      if (hugs isin $1-) halt 
      if ($2 !== $null) /msg $chan ((((((f)(f) $2- (f)(f))))))
      if ($2 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
    elseif (hug == $2) { tokenize 32 $vstrip($1-)
      if (hugged isin $1-) halt 
      if (hugs isin $1-) halt 
      if ($3 !== $null) /msg $chan ((((((f)(f) $3- (f)(f))))))
      if ($3 == $null) /msg $chan ((((((f)(f) $nick (f)(f))))))
    }
  }
}






__________________________________________________________________________

*Do NOT edit below here.
________________________________________________________________________

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

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