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/
__________________________________________________________________________
Message-Centre 
-Edited and Updated Sept 2004 
-Fully Tested.
-Works with clearmsn and vincula and show users colors and msn colors


_________________________________________________________________________
Please Read This to learn how to set the Host Password:

Host Message Centre Password gives room hosts a quick and sure way
to view any host updates.  

They can simply whisper ChristianEthics the password and 
ChristianEthics will whisper them any Host Updates.

1) You can change the host message password below.

2) Just type your password in between the two stars after TEXT.
(where is says: type host password here)
(there should be NO spaces between your password and the stars)

3) Each time you change the password in this file, you will have to turn
Message Centre [off] and then [on] again.
(for the new password to register and take effect)

4) Please ensure that you change the password now. 

*  If you leave it as it is, anyone who types: 
'type host password here' will be able to view your host updates.

5) If you want to leave the password as it is, then just close this
file now.

6) Note, The Host mail only works if ChristianEthics is hosted.

7) If you add names to your Personal Host/Owner List, these people
will automatically be notified of Host mail.

8) All joiners will be notified that mail is on

9) You can also leave messages for participants, just be sure to enter their names exactly.
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------

on *:TEXT:*Type Host Password Here:?: { if (%mcentre == On) {
    if (%message1 == $null) /msg $nick Host Message 1 Empty | else /msg $nick Host (e) %message1
    if (%message2 == $null) /msg $nick Host Message 2 Empty | else /msg $nick Host (e) %message2
    if (%message3 == $null) /msg $nick Host Message 3 Empty | else /msg $nick Host (e) %message3
    if ( $nick == %nick1 ) { /msg $nick (e) %message4 
    }
    if ( $nick == %nick2 ) { /msg $nick (e) %message5  
    }
    if ( $nick == %nick3 ) { /msg $nick (e) %message6  
    }
    if ( $nick == %nick4 ) { /msg $nick (e) %message7  
    }
    if ( $nick == %nick5 ) { /msg $nick (e) %message8
    } 
    if ( $nick == %nick6 ) { /msg $nick (e) %message9 
    } 
    if ( $nick == %nick7 ) { /msg $nick (e) %message10 
    }
    if ( $nick == %nick8 ) { /msg $nick (e) %message11 
    }
    if ( $nick == %nick9 ) { /msg $nick (e) %message12 
    } 
    if ( $nick == %nick10 ) { /msg $nick (e) %message13 
    } 
    if ( $nick == %nick1 ) { halt 
    }
    if ( $nick == %nick2 ) { halt
    }
    if ( $nick == %nick3 ) { halt
    }
    if ( $nick == %nick4 ) { halt
    }
    if ( $nick == %nick5 ) { halt
    }
    if ( $nick == %nick6 ) { halt
    }
    if ( $nick == %nick7 ) { halt
    }
    if ( $nick == %nick8 ) { halt
    }
    if ( $nick == %nick9 ) { halt
    }
    if ( $nick == %nick10 ) { halt
    }
    else { /msg $nick $nick No Personal (e) 
    }
  }
}
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------







STOP
________________________________________________________________________

*Do not edit Below here.
__________________________________________________________________________
on *:RAWMODE:#:{ if (%mcentre == On) && (%message1 == $null) && (%message2 == $null) && (%message3 == $null) { return }
  if (%mcentre == On) {
    if (+o isin $1-) { 
      /cq7 $2 $2 Host Mail is on.. To check for host messages type in: get host mail or get mail
      if ($nick == $me) halt 
      /cq7 $nick $nick Host Mail is on.. To check for host messages type in: get host mail or get mail   
    }
  }
}

;The next two aliases are by Petetje
alias cq7 { 
  inc %cq7_pointer
  /hadd -m cq7 %cq7_pointer $1-
  %cq7 = $addtok(%cq7,%cq7_pointer,32) 
  if (!$timer(cq7)) { .timercq7 -m 1 $iif(%delay_cq7,%delay_cq7,400) /cdeq7 }
} 
alias cdeq7 { 
  if ($hget(cq7,0).item == 0) { unset %cq7 }
  else {
    var %item = $gettok(%cq7,1,32)
    %cq7 = $deltok(%cq7,1,32)
    tokenize 32 $hget(cq7,%item)
    .ctcpreply $1 TIME $2-
    hdel cq7 %item
    if (%cq7) { .timercq7 -m 1 $iif(%delay_cq7,%delay_cq7,400) /cdeq7 }
    else { unset %cq7_pointer }
  }
}

alias message1.set {
  set %message1 $?="Enter Host Message 1 Here. The current message is: %message1 " | set %message1status $=scl Active | /splay chimes.wav | set %chan1 $active | /echo $color(highlight text)  -at Host message 1 sent to: %chan1 ..be sure to click cursor onto room you want to set host message for, as it uses active room. | /splay chimes.wav | set %chan1b $$?"You can also enter a 2nd room name to send Host Message 2 in.  Be sure to add the name EXACTLY as it is on the the top of the mIRC room window..vincula and clearmsn use slightly different format, but watch to include the number sign and percent sign and the G_ for groups.  Type the word [off] if you do not want a 2nd room. For example: $active " | /splay chimes.wav | 
}
alias message2.set {
  set %message2 $?="Enter Host Message 2 Here. The current message is: %message2 " | set %message2status $=scl Active | /splay chimes.wav | set %chan2 $active | /echo $color(highlight text)  -at Host message 2 sent to: %chan2 ..be sure to click cursor onto room you want to set host message for, as it uses active room. | /splay chimes.wav | set %chan2b $$?="You can also enter a 2nd room name to send Host Message 2 in.  Be sure to add the name EXACTLY as it is on the the top of the mIRC room window..vincula and clearmsn use slightly different format, but watch to include the number sign and percent sign and the G_ for groups.  Type the word [off] if you do not want a 2nd room. For example: $active " | /splay chimes.wav | 
}
alias message3.set {
  set %message3 $?="Enter Host Message 3 Here. The current message is: %message2 " | set %message3status $=scl Active | /splay chimes.wav | set %chan3 $active | /echo $color(highlight text)  -at Host message 3 sent to: %chan3  ..be sure to click cursor onto room you want to set host message for, as it uses active room.  | /splay chimes.wav | set %chan3b $$?="You can also enter a 2nd room name to send Host Message 2 in.  Be sure to add the name EXACTLY as it is on the the top of the mIRC room window..vincula and clearmsn use slightly different format, but watch to include the number sign and percent sign and the G_ for groups.  Type the word [off] if you do not want a 2nd room. For example: $active " | /splay chimes.wav | 
}

alias chan1.set {
  set %chan1 $active | echo $color(highlight text) -at Host message 1 re-set for %chan1 ..be sure to click cursor onto desired room, as it auto sets the active room. | /splay chimes.wav 
}
alias chan1b.set {
  set %chan1b $$?="You can also enter a 2nd room name to send Host Message2 in.  Remeber to add a percent sign (shift 5) and OR a number sign (shift 3)[depending on clearmsn or vincula] infront of the room name, and use \b for spaces and G_for groups[enter room exactly as it is on the top of the mIRC window screen]. For example: $active " | /splay chimes.wav 
}
alias chan2.set {
  set %chan2 $active | echo $color(highlight text) -at Host message 2 re-set for %chan2 ..be sure to click cursor onto desired room, as it auto sets the active room. | /splay chimes.wav 
}
alias chan2b.set {
  set %chan2b $$?="You can also enter a 2nd room name to send Host Message2 in.  Remeber to add a percent sign (shift 5) and OR a number sign (shift 3)[depending on clearmsn or vincula] infront of the room name, and use \b for spaces and G_for groups[enter room exactly as it is on the top of the mIRC window screen]. For example: $active " | /splay chimes.wav 
}
alias chan3.set {
  set %chan3 $active | echo $color(highlight text) -at Host message 3 re-set for %chan3 ..be sure to click cursor onto desired room, as it auto sets the active room. | /splay chimes.wav 
}
alias chan3b.set {
  set %chan3b $$?="You can also enter a 2nd room name to send Host Message3 in.  Remeber to add a percent sign (shift 5) and OR a number sign (shift 3)[depending on clearmsn or vincula] infront of the room name, and use \b for spaces and G_for groups[enter room exactly as it is on the top of the mIRC window screen]. For example: $active " | /splay chimes.wav 
}


alias message4.set {
  set %message4 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message5.set {
  set %message5 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message6.set {
  set %message6 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message7.set {
  set %message7 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message8.set {
  set %message8 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message9.set {
  set %message9 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message10.set {
  set %message10 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message11.set {
  set %message11 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message12.set {
  set %message12 $$?="Enter Message and Date here:" | /splay chimes.wav 
}
alias message13.set {
  set %message13 $$?="Enter Message and Date here:" | /splay chimes.wav 
}



alias nick1.set {
  set %nick1 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is:  " | /splay chimes.wav 
}
alias nick2.set {
  set %nick2 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick3.set {
  set %nick3 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick4.set {
  set %nick4 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick5.set {
  set %nick5 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick6.set {
  set %nick6 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick7.set {
  set %nick7 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick8.set {
  set %nick8 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick9.set {
  set %nick9 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 
alias nick10.set {
  set %nick10 $$?="Enter Name of Message Recipiant. (Don't forget to add any symbols the name may have. The symbol for a cross is: " | /splay chimes.wav 
} 

on hostlist:JOIN:#: { if (%mcentre == on) {
    if ($me isop #) { /msg $chan $nick Host (e)
    } 
    if ($mi isop #) { /msg $chan $nick Host (e)
    }   
    if ($me isop #) && (%message1 == $null) { /cq7 $nick Host (e) 1 Empty }
    elseif ($me isop #) && (%message1 != $null) { /cq7 $nick Host (e) %message1 }
    if ($me isop #) && (%message2 == $null) { /cq7 $nick Host (e) 2 Empty }
    elseif ($me isop #) && (%message2 == $null) { /cq7 $nick Host (e) %message2 }
    if ($me isop #) && (%message3 == $null) { /cq7 $nick Host (e) 3 Empty }
    elseif ($me isop #) && (%message2 == $null) { /cq7 $nick Host (e) %message3 }
    if ($mi isop #) && (%message1 == $null) { /cq7 $nick Host (e) 1 Empty }
    elseif ($mi isop #) && (%message2 == $null) { /cq7 $nick Host (e) %message1 }
    if ($mi isop #) && (%message2 == $null) { /cq7 $nick Host (e) 2 Empty }
    elseif ($mi isop #) && (%message2 == $null) { /cq7 $nick Host (e) %message2 }
    if ($mi isop #) && (%message3 == $null) { /cq7 $nick Host (e) 3 Empty }
    elseif ($mi isop #) && (%message2 == $null) { /cq7 $nick Host (e) %message3 }
    if ( $nick == %nick1 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)  
      /cq7 $nick Personal (e) %message4 
    }
    if ( $nick == %nick2 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message5 
    }
    if ( $nick == %nick3 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message6 
    }
    if ( $nick == %nick4 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message7 
    }
    if ( $nick == %nick5 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message8 
    }
    if ( $nick == %nick6 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message9 
    }
    if ( $nick == %nick7 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message10 
    }
    if ( $nick == %nick8 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message11 
    }
    if ( $nick == %nick9 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message12 
    }
    if ( $nick == %nick10 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message13 
    }
    /halt
  }
}
on ownerlist:JOIN:#: { if (%mcentre == on) { 
    if ($me isop #) { /msg $chan $nick Host (e)
    } 
    if ($mi isop #) { /msg $chan $nick Host (e)
    }   
    if ($me isop #) && (%message1 == $null) {  /cq7 $nick Host (e) 1 Empty | else /cq7 $nick Host (e) %message1
    }
    if ($me isop #) && (%message2 == $null) { /cq7 $nick Host (e) 2 Empty | else /cq7 $nick Host (e) %message2
    }
    if ($me isop #) && (%message3 == $null) { /cq7 $nick Host (e) 3 Empty | else /cq7 $nick Host (e) %message3
    }
    if ($mi isop #) && (%message1 == $null) { /cq7 $nick Host (e) 1 Empty | else /cq7 $nick Host (e) %message1
    }
    if ($mi isop #) && (%message2 == $null) { /cq7 $nick Host (e) 2 Empty | else /cq7 $nick Host (e) %message2
    }
    if ($mi isop #) && (%message3 == $null) { /cq7 $nick Host (e) 3 Empty | else /cq7 $nick Host (e) %message3
    }
    if ( $nick == %nick1 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message4 
    }
    if ( $nick == %nick2 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) message5 
    }
    if ( $nick == %nick3 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message6 
    }
    if ( $nick == %nick4 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message7 

    }
    if ( $nick == %nick5 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message8 

    }
    if ( $nick == %nick6 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message9 

    }
    if ( $nick == %nick7 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message10 
    }
    if ( $nick == %nick8 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message11 
    }
    if ( $nick == %nick9 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message12 
    }
    if ( $nick == %nick10 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message13 
    }
    halt
  }
}

on *:join:#: { if (%mcentre == on) { 
    if ( $nick == %nick1 ) {  
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message4 
    }
    if ( $nick == %nick2 ) {  
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message5 
    }
    if ( $nick == %nick3 ) { 
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message6 
    }
    if ( $nick == %nick4 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message7 
    }
    if ( $nick == %nick5 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message8 
    }
    if ( $nick == %nick6 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message9 
    }
    if ( $nick == %nick7 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message10 
    }
    if ( $nick == %nick8 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message11 
    }
    if ( $nick == %nick9 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message12 
    }
    if ( $nick == %nick10 ) {
      if ($me isop $chan) /msg $chan $nick has (e)
      if ($mi isop $chan) /msg $chan $nick has (e)
      /cq7 $nick Personal (e) %message13 
    }
    /halt
  }
}

on *:TEXT:*get mail*:?: { if (%mcentre == On) { 
    if ( $nick == %nick1 ) { /msg $nick Personal (e) %message4 
    }
    if ( $nick == %nick2 ) { /msg $nick Personal (e) %message5  
    }
    if ( $nick == %nick3 ) { /msg $nick Personal (e) %message6  
    }
    if ( $nick == %nick4 ) { /msg $nick Personal (e) %message7  
    }
    if ( $nick == %nick5 ) { /msg $nick Personal (e) %message8
    } 
    if ( $nick == %nick6 ) { /msg $nick Personal (e) %message9 
    } 
    if ( $nick == %nick7 ) { /msg $nick Personal (e) %message10 
    }
    if ( $nick == %nick8 ) { /msg $nick Personal (e) %message11 
    }
    if ( $nick == %nick9 ) { /msg $nick Personal (e) %message12 
    } 
    if ( $nick == %nick10 ) { /msg $nick Personal (e) %message13 
    } 
    if ( $nick == %nick1 ) { halt 
    }
    if ( $nick == %nick2 ) { halt
    }
    if ( $nick == %nick3 ) { halt
    }
    if ( $nick == %nick4 ) { halt
    }
    if ( $nick == %nick5 ) { halt
    }
    if ( $nick == %nick6 ) { halt
    }
    if ( $nick == %nick7 ) { halt
    }
    if ( $nick == %nick8 ) { halt
    }
    if ( $nick == %nick9 ) { halt
    }
    if ( $nick == %nick10 ) { halt
    }
    else { /msg $chan $nick No Personal (e) 
    }
  }
}


on *:TEXT:*get message:*: { if (%mcentre == on) {
    if ($me isop $chan) { /msg $chan $nick (f) type: get mail }
    if ($mi isop $chan) { /msg $chan $nick (f) type: get mail }
  }
}
on *:TEXT:*get host message:*: { if (%mcentre == on) {
    if ($me isop $chan) { /msg $chan $nick (f) type: get host mail }
    if ($mi isop $chan) { /msg $chan $nick (f) type: get host mail }
  }
}

on *:TEXT:*get host update:*: { if (%mcentre == on) {
    if ($me isop $chan) { /msg $chan $nick (f) type: get host mail }
    if ($mi isop $chan) { /msg $chan $nick (f) type: get host mail }
  }
}

on *:TEXT:*get mail:#: { if (%mcentre == on) {
    if ( $nick == %nick1 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message4 
    }
    if ( $nick == %nick2 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message5 
    }
    if ( $nick == %nick3 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message6
    }
    if ( $nick == %nick4 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message7
    }
    if ( $nick == %nick5 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message8
    }
    if ( $nick == %nick6 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message9
    }
    if ( $nick == %nick7 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message10
    }
    if ( $nick == %nick8 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message11
    }
    if ( $nick == %nick9 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message12
    }
    if ( $nick == %nick10 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message13 
    }
    if ( $chan == %chan1 ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1  
    } 
    if ( $chan == %chan1 ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1  
    } 
    if ( $chan == %chan1b ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1
    }
    if ( $chan == %chan1b ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1
    }
    if ( $chan == %chan2 ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan2 ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan2b ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan2b ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan3 ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ( $chan == %chan3 ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ( $chan == %chan3a ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ( $chan == %chan3a ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ($me isop #) && ($nick isop #) && (%message1 == $null) && (%message2 == $null) && (%message3 == $null) {
      /cq7 $nick There is no Host (e) 
    }
    if ($mi isop #) && ($nick isop #) && (%message1 == $null) && (%message2 == $null) && (%message3 == $null) {
      /cq7 $nick There is no Host (e) 
    }
    if ( $nick == %nick1 ) { halt 
    }
    if ( $nick == %nick2 ) { halt
    }
    if ( $nick == %nick3 ) { halt
    }
    if ( $nick == %nick4 ) { halt
    }
    if ( $nick == %nick5 ) { halt
    }
    if ( $nick == %nick6 ) { halt
    }
    if ( $nick == %nick7 ) { halt
    }
    if ( $nick == %nick8 ) { halt
    }
    if ( $nick == %nick9 ) { halt
    }
    if ( $nick == %nick10 ) { halt
    }
    else { 
      if ($me isop $chan) { /msg $chan $nick No Personal (e) }
      if ($mi isop $chan) { /msg $chan $nick No Personal (e) }
    }
    halt
  }
}

on *:TEXT:*get host mail:?: { if (%mcentre == on) {
    /msg $nick (f) Please whisper the password or re-type 'get host mail' onto the main screen. Host Mail Only Works If I'm Hosted.
  }
}

on *:TEXT:*get host mail:#: { if (%mcentre == on) {
    if ($me isop #) && ($nick isop #) && (%message1 == $null) && (%message2 == $null) && (%message3 == $null) {
    /msg $chan Host (e) -> $nick | /cq7 $nick There is no Host (e) }
    if ( $chan == %chan1 ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1 
    }
    if ( $chan == %chan1 ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1   
    }
    if ( $chan == %chan1b ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1
    }
    if ( $chan == %chan1b ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message1   
    }
    if ( $chan == %chan2 ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan2 ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan2b ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan2b ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message2
    }
    if ( $chan == %chan3 ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ( $chan == %chan3 ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ( $chan == %chan3b ) && ($me isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    if ( $chan == %chan3b ) && ($mi isop #) && ($nick isop #) { /msg $chan Host (e) -> $nick | /cq7 $nick Host (e) %message3
    }
    else { 
      if ($me isop #) && ($nick !isop $chan) { /msg $chan (f) Error. $nick  you must be a Host to use this option. }
      if ($mi isop #) && ($nick !isop $chan) { /msg $chan (f) Error. $nick  you must be a Host to use this option. }
    }  
    if ( $nick == %nick1 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message4 
    }
    if ( $nick == %nick2 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message5 
    }
    if ( $nick == %nick3 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message6
    }
    if ( $nick == %nick4 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message7
    }
    if ( $nick == %nick5 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message8
    }
    if ( $nick == %nick6 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message9
    }
    if ( $nick == %nick7 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message10
    }
    if ( $nick == %nick8 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal (e) %message11
    }
    if ( $nick == %nick9 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick (Personal e) %message12
    }
    if ( $nick == %nick10 ) { /msg $chan Personal (e) -> $nick | /cq7 $nick Personal(e) %message13 
    }
    if ($nick != %nick1) && ($nick != %nick2) && ($nick != %nick3) && ($nick != %nick4) && ($nick != %nick5) && ($nick != %nick6) && ($nick != %nick7) && ($nick != %nick8) && ($nick != %nick9) && ($nick != %nick10) { 
      /cq7 $nick No Personal (e)
    }
  }
}


on *:LOAD:{ set %mcentre $=w On  | /splay notify.wav
}
on *:UNLOAD:{ set %mcentre $=w Off | /splay unload.wav
}
