
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/
__________________________________________________________________________
Host Away Deop
Editted Sept 2004 
works with vincula, but not with clearmsn
--------------------------------------------------------------------------

raw 822:*:{ if ($nick == $me) halt | if ($me !isop $msn.get($cid,fullroom)) halt
  if ($nick !isop $comchan($me,1)) && ($nick !isowner $comchan($me,1)) { HALT }
  if ($nick isowner $comchan($me,1)) { HALT }
  ELSE { 
    mode $comchan($me,1) -o $nick
    msg $comchan($me,1) $nick %hostawaymessage 
    auser nohost $$ial($nick).addr
    auser noawaybackmessage $nick
  } 
}

raw 821:*: {
  if ($level($ial($nick).addr) == nohost) {
    ruser nohost $$ial($nick).addr
    mode $comchan($nick,1) +o $nick
    msg $comchan($me,1) $nick %hostbackmessage  
  }
} 


alias hostawaymessage.set {
set %hostawaymessage $$?="Enter the message you want displayed when your hosts mark as Away and are de-hosted. The current message is: %hostawaymessage "
}
alias hostbackmessage.set {
set %hostbackmessage $$?="Enter the message you want displayed when your hosts return and are re-hosted. The current message is: %hostbackmessage "
}

on *:QUIT:*: { ruser nohost $$ial($nick).addr 
}
on *:PART:*: { ruser nohost $$ial($nick).addr 
}
on *:DISCONNECT:*: { ruser nohost $$ial($nick).addr
}
on *:LEAVE:*: { ruser nohost $$ial($nick).addr
}
on *:LOAD:{ set %hostawaydeop $=pcww On | hostawaymessage.set | hostbackmessage.set | /splay notify.wav  
}
on *:UNLOAD:{ unset %hostawaydeop | /splay unload.wav 
}


