All pastes #240691 Raw Edit

^Rasputin

public text v1 · immutable
·published 2006-11-05 21:23 UTC
rendered paste body
#  User Ranks			Level	Global|Chan Flags
#
# Fleet Admiral(Owner)		10	ghjlmnoptxA|-
# Admiral(Master)		09	fghjlmoptxB|-
# Vice Admiral(Global Op)	08	fghjloptxC|-
# Up.Rear Admiral(Bot Master)	07	fhlptvxD|-
# Captian(File Master)		06	fhjlpvxE|-
# Commander(Chan Owner)		05	fghpx|lmnoA
# Lt.Commander(Chan Master)	04	fhpvx|lmoB
# Lieutenant(Chan Op)		03	hpx|lovC
# Lt.Jr.Grade(Chan HalfOp)	02	hx|lvD
# Ensign(Chan Voice)		01	hx|vE
# Civillian(NewUser)		00	h|F
#
#  Bot Ranks			Level	Global|bot Flags
#
# Lo.Rear Admiral(Hub)		09	bfo|ghp
# Lo.Rear Admiral(Alt Hub)	08	bfo|gap
# Lo.Rear Admiral(Security)	07	bfo|gls
# Lo.Rear Admiral(File)		06	bfv|gls
# Lo.Rear Admiral(Game)		05	bfv|gls
# Lo.Rear Admiral(Help)		04	bfv|gls
# Lo.Rear Admiral(Info)		03	bfv|gls
# Lo.Rear Admiral(Spam)		02	bf|gls
# Lo.Rear Admiral(Site)		01	bf|gls
#
###################################
# Useage .rank
###################################
#
# .rank - Your rank 
# .rank list - List Ranks
# .rank <nick> - Rank of <nick>
# .rank <#chan> - The ranks of users in the channel
#
###################################
# Binds
###################################
#
bind pub -|- .rank nsb_r_cmd
#
###################################
# procceses
###################################
#
proc nsb_r_cmd {nick uhost hand chan arg} {
  if {$arg == "list"} {
    putserv "NOTICE $nick :Ranks:"
    putserv "NOTICE $nick :  Fleet Admiral     10      Botnet Owner"
    putserv "NOTICE $nick :  Admiral           09      Botnet Master"
    putserv "NOTICE $nick :  Vice Admiral      08      Botnet Global Op"
    putserv "NOTICE $nick :  Up.Rear Admiral   07      Botnet Admin"
    putserv "NOTICE $nick :  Captain           06      File Admin"
    putserv "NOTICE $nick :  Commander         05      Channel Owner"
    putserv "NOTICE $nick :  Lt.Commander      04      Channel Master"
    putserv "NOTICE $nick :  Lieutenant        03      Channel Op"
    putserv "NOTICE $nick :  Lt.Jr.Grade       02      Channel HalfOp"
    putserv "NOTICE $nick :  Ensign            01      Channel Voice"
    putserv "NOTICE $nick :  Civillian         00      New User"
    return 0
  }
  if {![$arg == ""] && [vailduser $arg] {
    return 1
  }  
  if {![$arg == ""] && [vaildchan $arg] {
    return 2
  }  
  if {$arg == ""} {
    set rank ""
    if {[matchattr $hand A|]} { set rank "Fleet Admiral," }
    if {[matchattr $hand B|]} { set rank "$rank Admiral," }
    if {[matchattr $hand C|]} { set rank "$rank Vice Admiral," }
    if {[matchattr $hand D|]} { set rank "$rank Up.Rear Admiral," }
    if {[matchattr $hand E|]} { set rank "$rank Captain," }
    if {[matchattr $hand |A $chan]} { set rank "$rank Commander $chan," }
    if {[matchattr $hand |B $chan]} { set rank "$rank Lt.Commander $chan," }
    if {[matchattr $hand |C $chan]} { set rank "$rank Lieutenant $chan," }
    if {[matchattr $hand |D $chan]} { set rank "$rank Lt.Jr Grade $chan," }
    if {[matchattr $hand |E $chan]} { set rank "$rank Ensign $chan," }
    if {[matchattr $hand |F $chan]} { set rank "Civillian" }
    putserv "PRIVMSG $chan :Your Rank is \002<$rank>"
    return 3
  }
}