Services

By PuNkTuReD on Jun 07, 2008

services script i made awhile ago with the aid of pnplus

;=================================
;This is the ChanServ menu
;=================================
menu status,channel,nicklist {
  -
  ChannelServices
  .Setting Up Your Channel
  ..Register Channel:ChanServ REGISTER $chan $$?"Set Your Channel Password" $$?"Set Your Channel Description"
  ..Set
  ...Description:ChanServ SET $chan DESCRIPTION $$?"Description"
  ...Email:ChanServ SET $chan EMAIL $$?"Email Address"
  ...EnForce:ChanServ SET $chan ENFORCE $$?"ON , OFF"
  ...EntryMessage:ChanServ SET $chan ENTRYMSG $$?"Channel Entry Message"
  ...Founder:ChanServ SET $chan FOUNDER $$?"Founders Nick"
  ...KeepTopic:ChanServ SET $chan KEEPTOPIC $$?"ON , OFF"
  ...LeaveOps:ChanServ SET $chan LEAVEOPS $$?"ON , OFF"
  ...ModeLock:ChanServ SET $chan MLOCK $$?"Modes"
  ...OpNotice:ChanServ SET $chan OPNOTICE $$?"ON , OFF"
  ...PassWord:ChanServ SET $chan PASSWORD $$?"Channel Password"
  ...Provate:ChanServ SET $chan PRIVATE $$?"ON , OFF"
  ...Restricted:ChanServ SET $chan RESTRICTED $$?"ON , OFF"
  ...Secure:ChanServ SET $chan SECURE $$?"ON , OFF"
  ...SecureOps:ChanServ SET $chan SECUREOPS $$?"ON , OFF"
  ...Successor:ChanServ SET $chan SUCCESSOR $$?"Successor's Nick"
  ...Topic:ChanServ SET $chan TOPIC $$?"Topic"
  ...TopicLock:ChanServ SET $chan TOPICLOCK $$?"ON , OFF"
  ...Url:ChanServ SET $chan URL $$?"Url Address"
  ..UnSet
  ...Email:ChanServ UNSET $chan EMAIL
  ...EntryMessage:ChanServ UNSET $chan ENTRYMSG
  ...Successor:ChanServ UNSET $chan SUCCESSOR
  ...Url:ChanServ UNSET $chan URL
  ..Identify As Channel Owner:ChanServ IDENTIFY $chan $$?"Channel Password
  ..UnBan Self:ChanServ UNBAN $$?"Channel Name-include the #"
  ..Channel Info:ChanServ INFO $chan ALL
  ..Drop Channel:ChanServ DROP $chan
  ..Channel Access List
  ...Add:ChanServ ACCESS $chan ADD $$?"Nick" $$?"Level 1-9999"
  ...Count:ChanServ ACCESS $chan COUNT
  ...Del:ChanServ ACCESS $chan DEL $$?"Nick , Entry Number"
  ...List:ChanServ ACCESS $chan LIST 
  ..Levels
  ...AutoProtect:ChanServ LEVELS $chan SET AUTOPROTECT $$?"Level 0-10"
  ...AutoOp:ChanServ LEVELS $chan SET AUTOOP $$?"Level 0-10"
  ...AutoHalfOp:ChanServ LEVELS $chan SET AUTOHALFOP $$?"Level 0-10"
  ...AutoVoice:ChanServ LEVELS $chan SET AUTOVOICE $$?"Level 0-10"
  ...-
  ...Disable
  ....AutoProtect:ChanServ LEVELS $chan DISABLE AUTOPROTECT
  ....AutoOp:ChanServ LEVELS $chan DISABLE AUTOOP
  ....AutoHalfOp:ChanServ LEVELS $chan DISABLE AUTOHALFOP
  ....AutoVoice:ChanServ LEVELS $chan DISABLE AUTOVOICE
  ...List:ChanServ LEVELS $chan LIST
  ...Reset:ChanServ LEVELS $chan RESET
  .AOP,SOP,HOP,VOP Lists
  ..SOP List - SOP users get mode +o and +a on join
  ...Add:ChanServ SOP $chan $$?"Nick"
  ...Count:ChanServ SOP $chan COUNT
  ...Del:ChanServ SOP $chan DEL $$?"Nick"
  ...List:ChanServ SOP $chan LIST
  ..AOP List - AOP users get mode +o on join
  ...Add:ChanServ AOP $chan $$?"Nick"
  ...Count:ChanServ AOP $chan COUNT
  ...Del:ChanServ AOP $chan DEL $$?"Nick"
  ...List:ChanServ AOP $chan LIST
  ..HOP List - HOP users get mode +h on join
  ...Add Nick:ChanServ HOP $chan ADD $$?"Nick"
  ...Count Entries:ChanServ HOP $chan COUNT
  ...Delete Nick:ChanServ HOP $chan DEL $$?"Nick"
  ...List Entries:ChanServ HOP $chan LIST
  ..VOP List - VOP users get mode +v on join
  ...Add Nick:ChanServ VOP $chan $$?"Nick"
  ...Count Entries:ChanServ VOP $chan COUNT
  ...Delete Nick:ChanServ VOP $chan DEL $$?"Nick"
  ...List Entries:ChanServ VOP $chan LIST
  .+ohva Modes
  ..+o - Gives User Op Status
  ...Op Nick:ChanServ OP $chan $$1
  ...DeOp Nick:ChanServ DEOP $chan $$1
  ..+h - Gives User HalfOp Status
  ...HalfOp Nick:ChanServ HALFOP $chan $$1
  ...DeHalfOp Nick:ChanServ HALFOP $chan $$1
  ..+v - Gives User Voice Status
  ...Voice Nick:ChanServ VOICE $chan $$1
  ...DeVoice Nick:ChanServ DEVOICE $chan $$1
  ..+a - Gives User Protection
  ...Protect Nick:ChanServ PROTECT $chan $$1
  ...DeProtect Nick:ChanServ DEPROTECT $chan $$1
  .AKick List
  ..Add Mask:ChanServ AKICK $chan ADD $$?"Mask" $$?"Reason"
  ..Count Entries:ChanServ AKICK $chan COUNT
  ..Delete Mask:ChanServ AKICK $chan DEL $$?"Mask"
  ..Enforce:ChanServ AKICK $chan ENFORCE
  ..List Entries:ChanServ AKICK $chan LIST
  .Clear
  ..Bans-Clears All Channel Bans:ChanServ CLEAR $chan BANS
  ..Exceptions-Clears Channel exceptions:ChanServ CLEAR $chan EXCEPTIONS
  ..HalfOps-Removes +h From All Users:ChanServ CLEAR $chan HALFOPS
  ..Modes-Removes All Modes Except Those Set With ModeLock:ChanServ CLEAR $chan MODES
  ..Ops-Removes +o From All Users:ChanServ CLEAR $chan OPS
  ..Users-Kicks All Users From The Channel:ChanServ CLEAR $chan USERS
  ..Voices-Removes +v From All Users:ChanServ CLEAR $chan VOICES
  .Channel Modes
  ..Administrator Only Channel +A 
  ...ON:ChanServ SET $chan MLOCK +A
  ...OFF:ChanServ SET $chan MLOCK -A
  ..Block ANSII Color +c
  ...ON:ChanServ SET $chan MLOCK +c
  ...OFF:ChanServ SET $chan MLOCK -c
  ..No CTCP'S Allowed +C
  ...ON:ChanServ SET $chan MLOCK +C
  ...OFF:ChanServ SET $chan MLOCK -C  
  ..Flood Protection +f
  ...ON:MODE $chan +f $$?"Lines:Seconds-Example 6:3"
  ...OFF:MODE $chan -f
  ..Swear Word Protection +G
  ...ON:ChanServ SET $chan MLOCK +G
  ...OFF:ChanServ SET $chan MLOCK -G
  ..No +I User May Join +H
  ...ON:ChanServ SET $chan MLOCK +H
  ...OFF:ChanServ SET $chan MLOCK -H
  ..Invite Only +i
  ...ON:ChanServ SET $chan MLOCK +i
  ...OFF:ChanServ SET $chan MLOCK -i
  ..Users Need Channel Key To Join +k
  ...ON:MODE $chan +k $$?"Channel Key"
  ...OFF:MODE $chan -k $$?"Channel Key"
  ../Knock is not allowed +K
  ...ON:MODE $chan +K
  ...OFF:MODE $chan -K
  ..Most Users Allowed In Channel +l
  ...ON:ChanServ SET $chan MLOCK +l $$?"Number Of Users"
  ...OFF:ChanServ SET $chan MLOCK -l
  ..If Channel Is Full Users Go To 2nd Channel +L
  ...ON:ChanServ SET $chan MLOCK +L $$?"Channel 2 Name"
  ...OFF:ChanServ SET $chan MLOCK -L
  ..Users Need +v To Speak +m
  ...ON:ChanServ SET $chan MLOCK +m
  ...OFF:ChanServ SET $chan MLOCK -m
  ..Registered Nicks Only Allowed +M
  ...ON:MODE $chan +M
  ...OFF:MODE SET $chan -M
  ..No OutSide Messages +n
  ...ON:ChanServ SET $chan MLOCK +n
  ...OFF:ChanServ SET $chan MLOCK -n
  ..No NickName Changes In Channel +N
  ...ON:ChanServ SET $chan MLOCK +N
  ...OFF:ChanServ SET $chan MLOCK -N
  ..IrCOP Only Channel +O
  ...ON:ChanServ SET $chan MLOCK +O
  ...OFF:ChanServ SET $chan MLOCK -O
  ..Private Channel +p
  ...ON:ChanServ SET $chan MLOCK +p
  ...OFF:ChanServ SET $chan MLOCK -p
  ..No Kicks Allowed In Channel +Q
  ...ON:ChanServ SET $chan MLOCK +Q
  ...OFF:ChanServ SET $chan MLOCK -Q
  ..Only Registered Nicks May Join +R
  ...ON:ChanServ SET $chan MLOCK +R
  ...OFF:ChanServ SET $chan MLOCK -R
  ..Secret Channel +s
  ...ON:ChanServ SET $chan MLOCK +s
  ...OFF:ChanServ SET $chan MLOCK -s
  ..No Color +S
  ...ON:ChanServ SET $chan MLOCK +S
  ...OFF:ChanServ SET $chan MLOCK -S
  ..Only Op's May Set The Topic +t
  ...ON:ChanServ SET $chan MLOCK +t
  ...OFF:ChanServ SET $chan MLOCK -t
  ..No Channel Notices Allowed +T
  ...ON:MODE $chan +T
  ...OFF:MODE $chan -T
  ..Auditorium +u
  ...ON:ChanServ SET $chan MLOCK +u
  ...OFF:ChanServ SET $chan MLOCK -u
  ../Invite Is Not Allowed +V
  ...ON:ChanServ SET $chan MLOCK +V
  ...OFF:ChanServ SET $chan MLOCK -V
  ..Only SSL Clients May Join +z
  ...ON:ChanServ SET $chan MLOCK +z
  ...OFF:ChanServ SET $chan MLOCK -z
}
;=================================
;This is the NickServ menu
;=================================
menu status,channel,nicklist {
  NickServices
  .Setting Up Your Nick
  ..Register:NickServ REGISTER $$?"Set Your NickServ Password" $$?"Email"
  ..Set
  ...Email:NickServ SET EMAIL $$?"Email Address"
  ...Kill:NickServ SET KILL $$?" ON , QUICK , OFF"
  ...Password:NickServ SET PASSWORD $$?"Set Your NickServ Password"
  ...Private:NickServ SET PRIVATE $$?"ON , OFF"
  ...Secure:NickServ SET SECURE $$?"ON , OFF"
  ...Url:NickServ SET URL $$?"Url Address"
  ...Language
  ....English:NickServ SET LANGUAGE 1
  ....Dutch:NickServ SET LANGUAGE 2
  ....German:NickServ SET LANGUAGE 3
  ....Italian:NickServ SET LANGUAGE 4
  ....Japanese/EUC:NickServ SET LANGUAGE 5
  ....Japanese/SJIS:NickServ SET LANGUAGE 6
  ....Portuguese:NickServ SET LANGUAGE 7
  ....Spanish:NickServ SET LANGUAGE 8 
  ....Turkish:NickServ SET LANGUAGE 9
  ...Hide
  ....Email:NickServ SET HIDE EMAIL $$?"ON , OFF"
  ....Mask:NickServ SET HIDE USERMASK $$?"ON , OFF"
  ....Quit:NickServ SET HIDE QUIT $$?"ON , OFF"
  ..UnSet
  ...Email:NickServ UNSET EMAIL
  ...Url:NickServ UNSET URL
  ..Identify:NickServ IDENTIFY $$?"NickServ Password"
  ..Link:NickServ LINK $$?"Nick" $$?"NickServ Password"
  ..UnLink:NickServ UNLINK $$?"Nick Password"
  ..Info:NickServ INFO $$?"Nick" ALL
  ..List:NickServ LIST $$?"Pattern In nick!@host format"
  ..ListChannels:NickServ LISTCHANS
  ..Ghost:NickServ GHOST $$?"Nick" $$?"NickServ Password"
  ..Recover:NickServ RECOVER $$?"Nick" $$?"NickServ Password"
  ..Release:NickServ RELEASE $$?"Nick" $$?"NickServ Password"
  ..Drop:NickServ DROP
  .Access
  ..Add:NickServ ACCESS ADD $$?"Mask"
  ..Delete:NickServ ACCESS DEL $$?"Mask"
  ..List:NickServ ACCESS LIST
  .Status:NickServ STATUS $$?"Nick"
  .User Modes
  ..Marks You As A Bot
  ...On:MODE $me +B
  ...Off:MODE $me -B
  ..Do Not Recieve Channel Messages +d
  ...On:MODE $me +d
  ...Off:MODE $me -d  
  ..Filter Out All Swear Words +G
  ...On:MODE $me +G
  ...Off:MODE $me -G
  ..Invisible Not Shown In /Names Or /Who Searches +i
  ...On:MODE $me +i
  ...Off:MODE $me -i
  ..Recieve Private Messages From Registered Users Only +R
  ...On:MODE $me +R
  ...Off:MODE $me -R
  ..Says Your Using A /Vhost +t
  ...On:MODE $me +t
  ...Off:MODE $me -t
  ..Prevents You From Recieving CTCP'S +T
  ...On:MODE $me +T
  ...Off:MODE $me -T
  ..Recieve Infected DCC Send Rejection Notices +v
  ...On:MODE $me +v
  ...Off:MODE $me -v
  ..Marks You As A WebTv User +V
  ...On:MODE $me +V
  ...Off:MODE $me -V
  ..Listen To Wallop Messages +w
  ...On:MODE $me +w
  ...Off:MODE $me -w
  ..Marks You As Being On A Secure Connection +z
  ...On:MODE $me +z
  ...Off:MODE $me -z
}
;=================================
;This is the MemoServ menu
;=================================
menu status,channel,nicklist {
  MemoServices
  .Read
  ..Channel Memos:MemoServ READ $$?"Channel Name-include the #" $$?"NUMBER , LAST , NEW"
  ..Yours:MemoServ READ $$?"NUMBER , LAST , NEW"
  .Delete
  ..Channel:MemoServ DEL $$?"Channel Name-include the #" $$?"NUMBER , ALL"
  ..Yours:MemoServ DEL $$?"NUMBER , ALL"
  .Send
  ..To Channel:MemoServ SEND $$?"Channel Name-include the #" $$?"Memo Message"
  ..To Nick:MemoServ SEND $$?"Nick" $$?"Memo Message"
  .Info:MemoServ INFO $$?"Channel Name-include the #"
  .List
  ..Channel:MemoServ $$?"Channel Name-include the #" $$?"LIST , NEW"
  ..Yours:MemoServ $$?"LIST , NEW"
  .Set
  ..Limit Channel:MemoServ SET LIMIT $$?"Channel Name-include the #" $$?"Limit 0-20"
  ..Limit You:MemoServ SET LIMIT $$?"Limit 0-20"
  ..Notify:MemoServ SET NOTIFY $$?"ON , LOGON , NEW , OFF"
  -
}

Comments

Sign in to comment.
Johnny92   -  Aug 23, 2008

NICE DUDe i liek it

 Respond  
Jamiie   -  Jun 07, 2008

Would be great if this was all in a dialog. 3/10

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.