; -----------------+
; dalsrv.mrc |
; dialog driven |
; DALnet services |
; processing |
; author: HorseC |
; -----------------+
; +==================================+
; | handy aliases used by the script |
; +==================================+
; alias to call main display
; (used in menus, status and menubar )
alias dalserv { dialog -m dalserv_main dalserv_main }
; a cute alias (thanks to tw|tch)
; to make tool tip coding easier
alias showtip { noop $tip($ctime,DALserv,$1-,20,,,,) }
; add ability to call main dialog from channel,status (right click)
menu channel,status,menubar {
DALnet services: /dialog -m dalserv_main dalserv_main
}
; +=============================================+
; | processing section (main an other dialogs) |
; +=============================================+
;
; +=================================+
; | Help from mmain menu processing |
; +=================================+
on *:dialog:dalserv_main:menu:73:{ /dialog -m dalserv_author dalserv_author }
on *:dialog:dalserv_main:menu:74:{ /dialog -m dalsrv_usage_note dalsrv_usage_note }
on *:dialog:dalserv_main:menu:75:{ /dialog -m dalserv_links dalserv_links }
; +=============================+
; | Memoserv section processing |
; +=============================+
on *:dialog:dalserv_main:menu:4:{
showtip 4Check status window for response!
./msg MemoServ@services.dal.net list
}
on *:dialog:dalserv_main:menu:7:{
./msg MemoServ@services.dal.net read $$?="enter memo number to read"
showtip 4Check status window for response!
}
on *:dialog:dalserv_main:menu:32:{
./msg MemoServ@services.dal.net del $$?="enter memo number to DELETE"
showtip 4Check status window for response!
}
on *:dialog:dalserv_main:menu:34:{
./msg MemoServ@services.dal.net undel $$?="enter memo number to UNDELETE"
showtip 4Check status window for response!
}
on *:dialog:dalserv_main:menu:9:{
./msg MemoServ@services.dal.net purge
showtip 3Memo purge done
}
on *:dialog:dalserv_main:menu:29:{
./msg MemoServ@services.dal.net send $$?="nickname to get memo" $$?="Enter text of memo"
showtip 3Memoserv send processed
showtip 4Check status window for response!
}
on *:dialog:dalserv_main:menu:30:{
./msg MemoServ@services.dal.net send $$?="Enter Channel to send memo to:" $$?="Enter text of memo"
showtip 3Memoserv send to channel processed
showtip 4Check status window for response!
}
on *:dialog:dalserv_main:menu:31:{
./msg MemoServ@services.dal.net SENDSOP $$?="Enter Channel for send to SOPs, MANAGERs & founder :" $$?="Enter text of memo"
showtip 3Memoserv send to sops processed
showtip 4Check status window for response!
}
on *:dialog:dalserv_main:menu:33:{
./msg MemoServ@services.dal.net DEL all
showtip 3Memoserv del all processed
}
on *:dialog:dalserv_main:menu:32:{
./msg MemoServ@services.dal.net del $$?="enter memo number to DELETE"
showtip 4Check status window for response
}
on *:dialog:dalserv_main:menu:34:{
./msg MemoServ@services.dal.net undel $$?="enter memo number to UNDELETE"
showtip 4Check status window for response!
}
; +=====================================+
; | MemoServ section submenu processing |
; +=====================================+
;
; "Forward" submemo section
; item "show status", 37, 36
on *:dialog:dalserv_main:menu:37:{
./msg MemoServ@services.dal.net forward
showtip 4Check status window for response!
}
; item "turn off", 35, 36
on *:dialog:dalserv_main:menu:35:{
./msg MemoServ@services.dal.net forward -
showtip 4Check status window for response!
}
; item "forward to nick", 40, 36
on *:dialog:dalserv_main:menu:35:{
./msg MemoServ@services.dal.net forward $$?="nickname to forward to" $$?="password required for this function"
showtip 4Check status window for response!
}
; item "news", 41, 1
on *:dialog:dalserv_main:menu:41:{
./msg MemoServ@services.dal.net news
showtip 4Check status window for response!
}
; +=============================+
; | Nickserv section processing |
; +=============================+
;
; registration:
on *:dialog:dalserv_main:menu:5: {
/nickreg
}
;
; Nickserv "Identify", 15, 2
on *:dialog:dalserv_main:menu:15: {
./nickserv IDENTIFY $$?="enter your password to identify to DALnet please:"
}
; nickserv registation (via seperate dialog)
alias nickreg { dialog -m dalserv_nickreg dalserv_nickreg }
; processing for Nickserv Registration Dialog
on *:dialog:dalserv_nickreg:sclick:9:{
/set %regok 1
if ($did(6).text = $null) {
showtip 4Nickserv registration: ERROR missing password!
/set %regok 0
}
if ($did(.text = $null) {
showtip 4Nickserv registration: ERROR missing email!
/set %regok 0
}
if (%regok = 1) {
./msg NickServ@services.dal.net REGISTER $did(6).text $did(.text
showtip 3Nickserv registration: request sent $crlf 4Check status window!
}
}
; nickserv authorization dialog (via seperate dialog)
alias nickauth { dialog -m dalsrv_nick_auth dalsrv_nick_auth }
on *:dialog:dalserv_main:menu:14: {
/nickauth
}
; process response from dalsrv_nick_auth
on *:dialog:dalsrv_nick_auth:sclick:8:{
/set %authok 1
if ($did(7).text = $null) {
showtip 4Nickserv AUTHORIZE: ERROR missing requred code!
/set %authok 0
}
if (%authok = 1) {
/NickServ@services.dal.net AUTH $did(7).text
showtip 3Nickserv Authorization: request sent 4Check status window!
/unset %authok
}
}
;
; nickserv drop processing dialog
;
alias nickdrop { dialog -m dalsrv_nick_drop dalsrv_nick_drop }
on *:dialog:dalserv_main:menu:16: {
/nickdrop
}
; process click on drop dialog
on *:dialog:dalsrv_nick_drop:sclick:5:{
/set %dropok 1
if ($did(4).text = $null) {
showtip 4Nickserv DROP: ERROR to verify you must enter nickname!
/set %dropok 0
}
if (%dropok = 1) {
./msg NickServ@services.dal.net DROP $did(4).text
showtip 3Nickserv Drop: request sent 4Check For email to finish process!
/unset %authok
}
}
; nickserv drop code processing
on *:dialog:dalserv_main:menu:17:{
./msg NickServ@services.dal.net AUTH $$?="nickname to be droped " $$?="authcode from email"
showtip 4Check status window for response!
}
;
; nickserv access processing
alias nickaccwhat { dialog -m dalsrv_nick_access_what dalsrv_nick_access_what }
on *:dialog:dalserv_main:menu:38: {
/nickaccwhat
}
dialog -l dalsrv_nick_access_what {
title "What is the Nickserv Access list"
size -1 -1 452 169
option pixels
text "Allows you to list, add, or delete user@host masks from your access list. ", 1, 50 10 353 22, center
text "If your address matches a mask in this list, you will not need to IDENTIFY to NickServ to use your nick.", 2, 81 38 291 42
button "Done", 3, 195 135 65 25, cancel
text "You may also wipe your entire access list using the WIPE command.", 4, 60 91 332 17
}
; nickserv access list process item "list", 42, 18
on *:dialog:dalserv_main:menu:42: {
./msg NickServ@services.dal.net ACCESS LIST
}
; nickserv access add process item "Add", 43, 18
;
on *:dialog:dalserv_main:menu:43: {
./msg NickServ@services.dal.net ACCESS ADD $$?="Enter mask to add to access list and press ok *OR* just hit cancel"
}
; nickserv access delete process item "Del", 44, 18
on *:dialog:dalserv_main:menu:44: {
./msg NickServ@services.dal.net ACCESS DEL $$?="Enter mask to DELETE from access list and press ok *OR* just hit cancel"
}
; nickserv access wipe process item "Wipe", 45, 18
on *:dialog:dalserv_main:menu:45: {
/set %dowipe $?!="Do you realy want to WIPE your access list?"
if (%dowipe) {
./msg NickServ@services.dal.net ACCESS WIPE
}
}
; nickserv ghost dialog processing
on *:dialog:dalserv_main:menu:19:{ /dialog -m dalsrv_nick_ghost dalsrv_nick_ghost }
; nickserv ghost dialog processing:
on *:dialog:dalsrv_nick_ghost:sclick:10:{
/set %ghostok 1
if ($did(7).text = $null) {
showtip 4Nickserv GHOST: ERROR you must enter a nickname!
/set %ghostok 0
}
if ($did(9).text = $null) {
showtip 4Nickserv GHOST: ERROR you must enter a password!
/set %ghostok 0
}
if (%ghostok = 1) {
./msg NickServ@services.dal.net GHOST $did(7).text $did(9).text
showtip 3Nickserv GHOST command issued: check status window for results
/unset %ghostok
}
}
; item "Recover", 20, 2
on *:dialog:dalserv_main:menu:20:{
showtip 7Nickserv RECOVER is used if someone else is using your registered nick
./msg NickServ@services.dal.net RECOVER $$?="Enter Nickname to recover" $$?="Enter password for the nicname please"
}
; item "Release", 21, 2
on *:dialog:dalserv_main:menu:21:{
showtip 7Release - use if Nickserv is holding your nickname.
./msg NickServ@services.dal.net RELEASE $$?="Enter Nickname to recover" $$?="Enter password for the nicname please"
}
; item "SendPass", 22, 2
on *:dialog:dalserv_main:menu:22:{
showtip SendPass is used to send your password to your KNOWN email adderss
showtip you input MUST match the one on file with DALnet.
./msg NickServ@services.dal.net RELEASE $$?="Enter Nickname for sendpass" $$?="Enter password known for this nickname"
}
; ********* nickserv set sub functions **********
;
; item "Email", 46, 23
on *:dialog:dalserv_main:menu:46:{
showtip SET EMAIL is used to CHANGE your email address on file
showtip be VERY carefull when you enter new email address
./msg NickServ@services.dal.net SET EMAIL $$?="Enter password known for this nickname" $$?="Enter NEW EMAIL address to save"
}
; item "Enforce", 47, 23
on *:dialog:dalserv_main:menu:47:{
showtip SET ENFORCE OPTION has been removed from DALnet. $crlf By default registered nicknames 4ARE ENFORCED now.
}
; item "MailBlock", 48, 23
on *:dialog:dalserv_main:menu:48:{
showtip 4CAUTION: If you enable the MAILBLOCK feature you will no longer be able to request your password be sent via email. $crlf 4You will be entirely responsible for keeping track of it on your own.
./msg NickServ@services.dal.net SET MAILBLOCK $$?="Enter ON or OFF for mail block please"
}
; item "NoMemo", 49, 23
on *:dialog:dalserv_main:menu:49:{
showtip NoMemo:When this option is ON .. ALL memos to your nickname will be ignored! 4use with care
./msg NickServ@services.dal.net SET NOMEMO $$?="Enter ON or OFF for NOMEMO option please"
}
; item "NoOP", 50, 23
on *:dialog:dalserv_main:menu:50:{
showtip NoOP: When NoOP is set to On .. No one can add you to their autoop in a channel $crlf It is recomended to set this option 3ON and only turn OFF when YOU want to be added to an op list
./msg NickServ@services.dal.net SET NOOP $$?="Enter ON or OFF for NOOP option please"
}
; item "Change Password", 51, 23
on *:dialog:dalserv_main:menu:51:{
showtip Password change: This function is used to CHANGE your password on DALnet $crlf 4REMEMBER to remember your password if you change it! $crlf You will be required to enter both your CURRENT and the new password for this command to work
./msg NickServ@services.dal.net SET PASSWD $$?="Enter your CURRENT password please" $$?="Enter your NEW password please"
}
; item "ShowEmail", 52, 23
on *:dialog:dalserv_main:menu:52:{
showtip ShowEmail: With this set to 4ON any user can see the email address that you have provided. $crlf With this set to 3OFF your email address becomes hidden to them. $crlf 3OFF is the recomended setting!
./msg NickServ@services.dal.net SET SHOWEMAIL $$?="Enter ON or OFF for SHOWEMAIL option please"
}
; nickserv set menu submenu URL
; item "Set URL", 54, 53
on *:dialog:dalserv_main:menu:54:{
showtip Set URL:Will show anyone who asks NickServ for info on your nickname an URL (Uniform Resource Locator) along with the rest of your info.
showtip This could be your home page location or an email address. $crlf website example: http://www.dal.net/lefler/ $crlf email example: mailto:lefler@dal.net
./msg NickServ@services.dal.net SET URL $$?="ENTER website or email addres for URL"
}
; item "Clear URL", 55, 53
; we dont want to enable this so leave as not done
on *:dialog:dalserv_main:menu:55:{ /dialog -m dalsrv_in_progress dalsrv_in_progress }
;
; start of "ChanServ" section
;
; chanserv item "register", 6, 3
on *:dialog:dalserv_main:menu:6:{ /dialog -m dalsrv_channel_reg dalsrv_channel_reg }
; processing for Chanserv Registration Dialog
on *:dialog:dalsrv_channel_reg:sclick:9:{
/set %cregok 1
if ($did(6).text = $null) {
showtip 4Chanserv registration: ERROR missing new channel name!
/set %cregok 0
}
if ($did(.text = $null) {
showtip 4Chanserv registration: ERROR password for channel missing!
/set %cregok 0
}
if ($did(11).text = $null) {
showtip 4Chanserv registration: ERROR description for channel missing!
/set %cregok 0
}
if (%cregok = 1) {
./msg ChanServ@services.dal.net REGISTER $did(6).text $did(.text $did(11).txt
showtip 3Chanserv registration: Request sent! $crlf 4Check status window!
}
}
; chanserv item "Identify", 24, 3
on *:dialog:dalserv_main:menu:24:{
./msg ChanServ@services.dal.net identify $$?="Enter Channel name for Identify" $$?="Enter Channel Password"
showtip 3Request sent to Chanserv! $crlf 4Check Status window for results!"
}
; chanserv item "SendPass", 25, 3
on *:dialog:dalserv_main:menu:25:{ /dialog -m dalsrv_chan_sendpass dalsrv_chan_sendpass }
on *:dialog:dalsrv_chan_sendpass:sclick:9:{
/set %cspok 1
if ($did(6).text = $null) {
showtip 4Chanserv registration: ERROR missing channel name!
/set %cspok 0
}
if ($did(.text = $null) {
showtip 4Chanserv registration: ERROR Email to send to missing!
/set %cspok 0
}
if (%cspok = 1) {
./msg ChanServ@services.dal.net SENDPASS $did(6).text $did(.text
showtip 3Chanserv SENDPASS: Request sent! $crlf 4Check status window!
}
}
; chanserv item "Access", 26, 3
on *:dialog:dalserv_main:menu:26:{ /dialog -m dalsrv_in_progress dalsrv_in_progress }
; chanserv item "Drop", 27, 3
on *:dialog:dalserv_main:menu:27:{ /dialog -m dalsrv_chan_drop dalsrv_chan_drop }
on *:dialog:dalsrv_chan_drop:sclick:14:{
/set %cdrok 1
if ($did(.text = $null) {
showtip 4Chanserv channel DROP: ERROR missing channel name!
/set %cdrok 0
}
if (%cdrok = 1) {
./msg ChanServ@services.dal.net DROP $did(.text $did(12).text
showtip 3Chanserv Channel DROP: Request sent! $crlf 4Check status window!
}
}
; item "Info", 28, 3
on *:dialog:dalserv_main:menu:28:{
showtip Channel INFO: Just provide the name of the channel then check status window for reply.
./msg ChanServ@services.dal.net INFO $$?="Enter name of channel for INFO data"
}
; item "Invite Self", 56, 3
on *:dialog:dalserv_main:menu:56:{
showtip Channel INVITE: 3You must be AOP or above on the channel for ivite to work... $crlf 4Check status window for results
./msg ChanServ@services.dal.net INVITE $$?="Enter name of channel for INVITE"
}
; item "Invite others", 57, 3
on *:dialog:dalserv_main:menu:57:{
showtip 4You can not invite other to a channel via ChanServ! please see DALnet documents
}
; item "Invite", 58, 3
on *:dialog:dalserv_main:menu:58:{
showtip Channel INVITE: 3You must be AOP or above on the channel for ivite to work... $crlf 4Check status window for results
./msg ChanServ@services.dal.net INVITE $$?="Enter name of channel for INVITE"
}
; item "MKick", 59, 3
on *:dialog:dalserv_main:menu:59:{
showtip Channel MKICK: 4This command is VERY powerfull and Dangerious. $crlf 3See Status window for information (help request for command has been issued for you
./msg ChanServ@services.dal.net help MKICK
}
; item "MDeop", 60, 3
on *:dialog:dalserv_main:menu:60:{
showtip Channel MDeop: 4This command is VERY powerfull and Dangerious. $crlf 3See Status window for information (help request for command has been issued for you
./msg ChanServ@services.dal.net help MDeop
}
; menu "Unban", 61, 3
; item "Self", 62, 61
on *:dialog:dalserv_main:menu:62:{
showtip Channel UNBAN (self): 4This command will unban you in the channel you name IF you are aop or above on the channel $crlf4See status window for results
./msg ChanServ@services.dal.net UNBAN $$?="Name channel for UNBAN of self"
}
; item "Others", 63, 61
on *:dialog:dalserv_main:menu:63:{
showtip Channel UNBAN (others): 4use with care when entering mask $crlf 3See status window for results
./msg ChanServ@services.dal.net UNBAN $$?="Name channel for this UNBAN" $$?="Enter nickname or user@host mask for UNBAN"
}
; item "Count", 64, 3
on *:dialog:dalserv_main:menu:64:{
showtip 3This command will display the number of AOPs, SOPs, MANAGERs and AKICKs in a channel. $crlf Limited to AutoOp or higher. $crlf 4see status window for results.
./msg ChanServ@services.dal.net COUNT $$?="Enter Channel name for count information"
}
; item "Why", 65, 3
on *:dialog:dalserv_main:menu:65:{
showtip 3This command will explain why a nick has ops in a channel $crlf 4See status window for results.
./msg ChanServ@services.dal.net WHY $$?="Enter Channel name for why information" $$?="Enter Nickname for why information"
}
;
; menu "SET" off chanserv... (, 66, 3)
;
; process set description off set menu item "Desc", 67, 66
on *:dialog:dalserv_main:menu:67:{
showtip 3This command will set the topic for a channel (if you have access to do so). $crlf 4Check Status Window for results.
./msg ChanServ@services.dal.net SET DESC $$?="Enter Channel name for SET DESCRIPTION input" $$?="Enter Description to set"
SET <channel> DESC <description>
}
; item "Ident", 68, 66
on *:dialog:dalserv_main:menu:68:{
showtip 3Chanserv set ident: This command makes it harder for anyone to use someone elses nick to gain ops in your channel. $crlf If this option is ON, then all ops have to identify to NickServ before ChanServ ops them.
./msg ChanServ@services.dal.net SET IDENT $$?="Enter Channel name for SET IDENT option" $$?="Enter ON or OFF for this option"
}
; item "KeepTopic", 69, 66
on *:dialog:dalserv_main:menu:69:{
showtip 3Turns Sticky topics for a channel on or off. If everybody in a certain channel leaves that channel.. then the topic is normally lost. $crlf But with this option ON ChanServ will save the last topic and
Showtip when the channel is recreated it will set the topic to what it previously was followed by the nick who previously set that topic.
./msg ChanServ@services.dal.net SET KeepTopic $$?="Enter Channel name for SET KeepTopic " $$?="Enter ON or OFF for this option"
}
; item "MailBlock", 70, 66
on *:dialog:dalserv_main:menu:70:{
showtip 3Chanserv SET MailBlock: 4Since this command can be very dangerious (if used incorrectly) it has not been included in this tool!
}
on *:dialog:dalserv_main:menu:71:{
showtip 3Chanserv SET Mlock: 4Due to the complex nature of setting modes for a channel $crlf This function is NOT included in this tool!
}
; +=================================+
; | JBW work on this stuff |
; +=================================+
; menu "AKICK", 39, 3
; item "LIST", 76, 39
on *:dialog:dalserv_main:menu:76:{
showtip 3AKICK LIST: Limited to AOP and above $crlf 4See status window for results.
./msg ChanServ@services.dal.net AKICK $$?="Enter Channel name for AKICK LIST" LIST
}
; item "ADD", 77, 39
on *:dialog:dalserv_main:menu:77:{
showtip 3AKICK ADD: Limited to SOP and above $crlf 4See status window for results.
./msg ChanServ@services.dal.net AKICK $$?="Enter Channel name for AKICK ADD" ADD $$?="Enter MASK OR NICKNAME for AKICK ADD"
}
; item "DELETE", 78, 39
on *:dialog:dalserv_main:menu:78:{
showtip 3AKICK DELETE: Limited to SOP and above $crlf 4See status window for results.
./msg ChanServ@services.dal.net AKICK $$?="Enter Channel name for AKICK DELETE" DELETE $$?="Enter NUMBER from LIST to DELETE"
}
; item "WIPE", 79, 39
on *:dialog:dalserv_main:menu:79:{
showtip 3AKICK WIPE: Limited to FOUNDER ONLY $crlf 4See status window for results.
./msg ChanServ@services.dal.net AKICK $$?="Enter Channel name for AKICK WIPE!" WIPE
}
; +=================================+
; | ALL Dialogs used in this script |
; +=================================+
;
; +=============================+
; | Dialog for main menu |
; +=============================+
dialog Dalserv_main {
title "Dalnet Services Helper"
size -1 -1 279 133
option pixels notheme
text "Click on an item above for a drop down list of choices", 10, 10 9 258 17, center
text "click on 'Done' to close this Dialog", 11, 53 40 170 17, center
button "Done", 12, 107 80 65 25, cancel
menu "MemoServ", 1
item "list", 4, 1
item "read", 7, 1
menu "delete", 8, 1
item "delete memo", 32, 8
item "clear memos", 33, 8
item "UNdelete memo", 34, 8
item "purge", 9, 1
menu "send", 13, 1
item "nickname", 29, 13
item "channel", 30, 13
item "sendSOP", 31, 1
menu "Forward", 36, 1
item "show status", 37, 36
item "turn off", 35, 36
item "forward to nick", 40, 36
item "news", 41, 1
menu "NickServ", 2
item "Register", 5, 2
item "Authorize", 14, 2
item "Identify", 15, 2
item "Dop", 16, 2
item "Enter Drop Code", 17, 2
menu "Access", 18, 2
item "What is the Acces list?", 38, 18
item "List", 42, 18
item "Add", 43, 18
item "Del", 44, 18
item "Wipe", 45, 18
item "Ghost", 19, 2
item "Recover", 20, 2
item "Release", 21, 2
item "SendPass", 22, 2
menu "Set", 23, 2
item "Email", 46, 23
item "Enforce", 47, 23
item "MailBlock", 48, 23
item "NoMemo", 49, 23
item "NoOP", 50, 23
item "Change Password", 51, 23
item "ShowEmail", 52, 23
menu "URL", 53, 23
item "Set URL", 54, 53
item "Ckear URL", 55, 53
menu "ChanServ", 3
item "register", 6, 3
item "Identify", 24, 3
item "SendPass", 25, 3
item "Access", 26, 3
item "Drop", 27, 3
item "Info", 28, 3
item "Invite Self", 56, 3
item "Invite others", 57, 3
item "Invite", 58, 3
item "MKick", 59, 3
item "MDeop", 60, 3
menu "Unban", 61, 3
item "Self", 62, 61
item "Others", 63, 61
item "Count", 64, 3
item "Why", 65, 3
menu "SET", 66, 3
item "Desc", 67, 66
item "Ident", 68, 66
item "KeepTopic", 69, 66
item "MailBlock", 70, 66
item "Mlock", 71, 66
menu "AKICK", 39, 3
item "LIST", 76, 39
item "ADD", 77, 39
item "DELETE", 78, 39
item "WIPE", 79, 39
menu "About", 72
item "Author", 73, 72
item "Usage Notes", 74, 72
item "Dalnet URL's", 75, 72
}
; +=============================+
; | Nickserv Registation dialog |
; +=============================+
dialog dalserv_nickreg {
title "Nickname Registration"
size -1 -1 418 321
option pixels notheme
text " Please change to the nickname you wish to register before you proceed", 1, 32 19 355 17
text "To register a nickname you will be required to provide a valid email address. Services WILL send you and email at that account that you must answer before registraion is complte.", 2, 31 50 356 46, center
text "You will also need to provide the password you plan to use on DALnet", 3, 40 112 339 17
text "Once this is done, please check the status window for further instructions. You will be asked a simple question to validate that the request is comming from a human being.", 4, 53 138 313 47
text " password", 5, 56 198 56 17
edit "", 6, 149 199 128 20
text "email Address:", 7, 56 231 74 17
edit "", 8, 149 231 147 20
button "Done", 9, 107 267 65 25, ok
button "Cancel", 10, 232 264 65 25, cancel
}
; +=============================+
; | Nickserv AUTHORIZE Dialog |
; +=============================+
dialog dalsrv_nick_auth {
title "Nickserv Authorize"
size -1 -1 209 149
option dbu notheme
text "The AUTH command is the final step in nickname registration.", 1, 8 4 194 8, center
text "process. Once you have received an acknowledgment at the ", 2, 8 17 195 8, center
text "e-mail address you provided during registration, you must", 3, 8 29 196 8, center
text "use the AUTH code given in that email with this command to ", 4, 8 40 196 8, center
text "complete the registration of the nickname.", 5, 7 52 196 8, center
text "Please enter the authorization code in the box that follows:", 6, 30 72 148 8
edit "", 7, 27 89 155 10
button "Done", 8, 88 106 32 12, ok
button "Cancel", 9, 88 128 32 12, cancel
}
; +=============================+
; | Nickserv DROP Dialog |
; +=============================+
dialog dalsrv_nick_drop {
title "Nickserv DROP nickame"
size -1 -1 418 299
option pixels notheme
text "Using this command makes NickServ stop watching your nick, and will remove it from services' database. If a nick is dropped, anyone else can register it. You must use the NickServ IDENTIFY command before doing this. Use the command with the nickname as the only argument.", 1, 46 20 326 70
text "You will then be sent an email with an authorization code. You must then use the AUTH code to complete the DROP process.", 2, 66 106 287 50
text "Please enter your nickname in the box to verify this what you wish to do: ", 3, 65 170 290 37
edit "", 4, 112 219 195 20
button "DO it", 5, 125 256 65 25, ok
button "Cancel", 6, 236 255 65 25, cancel
}
; +=============================+
; | Nickserv Ghost Dialog |
; +=============================+
dialog dalsrv_nick_ghost {
title "Nickserv GHOST processing"
size -1 -1 411 294
option pixels notheme
text "If, for some reason, your Internet connection fails, then your", 1, 46 19 318 17
text "client may not log off IRC properly. This is called a ghost.", 2, 45 41 321 17
text "With this command, you can remove your ghost.", 3, 44 64 322 17
text "If you're not in the access list for the nick, you must", 4, 45 87 320 17
text "use the password.", 5, 46 111 319 17
text "Enter nickname to GHOST: ", 6, 39 153 133 17
edit "", 7, 187 152 165 20
text "Enter Password for the Nick", 8, 39 182 138 17
edit "", 9, 184 184 168 20
button "OK", 10, 94 226 65 25, ok
button "Cancel", 11, 209 225 65 25, cancel
}
; +=============================+
; | ChanServ register Dialog |
; +=============================+
dialog dalsrv_channel_reg {
title "Channel Registration"
size -1 -1 418 321
option pixels notheme
text "Your nickname must be registered to register a channel.", 1, 33 5 355 17
text "Channel Name", 5, 24 201 73 17
edit "", 6, 140 201 114 20
text "password for channel", 7, 24 224 110 17
edit "", 8, 140 224 114 20
button "Done", 9, 102 293 65 25, ok
button "Cancel", 10, 265 294 65 25, cancel
text "When you register a channel with ChanServ, you don't need to worry about takeovers, or bots to keep a list of Ops. ChanServ does all of this and more. The founder is the person who does the registering. Make up a password to register with. The password is used so that only the founder can completely control the channel. The description is only used when a user asks ChanServ for information on a channel, and you make this up also.", 2, 29 31 357 102
text "PLEASE NOTE: ", 3, 27 132 76 16
text "Description of channel: (avoid use of ',' please)", 4, 24 249 359 17
edit "", 11, 25 263 385 22
text "PLEASE memorize your password, write it down somewhere, but PLEASE remember it! You will need it later on. Also, all passwords are case-sensitive!", 12, 25 149 354 43
text "<-- no '|' or ',' please", 13, 253 225 104 17
}
; +=============================+
; | ChanServ SendPass Dialog |
; +=============================+
; item "SendPass", 25, 3
dialog dalsrv_chan_sendpass {
title "Channel SENDPASS"
size -1 -1 418 304
option pixels notheme
text "Channel Name", 5, 17 193 73 17
edit "", 6, 104 194 114 20
text "email to send to", 7, 16 225 78 17
edit "", 8, 104 223 201 20
button "Do it!", 9, 104 258 65 25, ok
button "Cancel", 10, 263 255 65 25, cancel
text "The SENDPASS command allows a user to reset their channel password.", 1, 35 8 348 18
text "After issuing the command; an email will be sent to the email address on file for that channel's founder nickname with an authorization code to confirm the request. ", 2, 8 26 395 41
text "After confirming the request; services will generate a new random password for the channel and will tell it to the user. ", 3, 6 69 396 31
text "The email address you specify must match the email address on file for the founder's nickname. ", 4, 5 99 396 38
text "Do not share your password(s) with anyone.", 12, 100 160 218 17
}
; +=============================+
; | Chanserv Drop Dialog |
; +=============================+
dialog dalsrv_chan_drop {
title "DALsrv Channel DROP process"
size -1 -1 418 304
option pixels notheme
text "This command is used when you no longer want ChanServ to manage a channel. Use of this command is limited to the channel founder.", 1, 12 7 405 28
text "Before using the DROP command you MUST use the ChanServ IDENTIFY command.", 2, 7 42 410 17
text "First use the command with the channel as the only argument. ", 3, 6 65 411 18
text "Check for a response BACK from Chanserv (normally in the status window)", 4, 4 90 409 17
text "You will be given a confirmation drop code, which you must issue with the DROP command a second time.", 5, 8 114 407 32
text "Come back to this Dialog, and do the second time WITH the confirmation code. Only then will the channel be Dropped.", 6, 9 151 407 34
text "Once you issue the second time, there is no turning back.. ", 7, 6 193 410 17
text "Channel Name:", 8, 7 217 76 17
edit "", 9, 112 216 114 20
text "<-- Required for both times!", 10, 224 217 156 17
text "Confirmation Code:", 11, 5 239 100 17
edit "", 12, 111 240 191 20
text "<-- Only Second time", 13, 307 241 110 17
button "Do it!", 14, 61 267 65 25, ok
button "cancel", 15, 264 266 65 25, cancel
}
; +=============================+
; | section in progress dialog |
; +=============================+
dialog -l dalsrv_in_progress {
title "Dalnet Tools: work in progress"
size -1 -1 330 157
option pixels notheme
text "This section has not been completed!", 1, 72 22 186 17
text "Check with HorseC for updates", 2, 86 54 158 17
button "Done", 3, 122 91 65 25, cancel
}
; +=============================+
; | author dialog (off about) |
; +=============================+
dialog dalserv_author {
title "DALserv Author"
size -1 -1 279 231
option pixels
text "This tool was developed by:", 1, 65 1 150 20, center
text "He can often be found on the DALnet IRC network", 2, 14 65 254 17, center
text "Please direct any questions, or suggestions about this tool to him at:", 3, 6 88 265 31, center
text "horsec@mirc.org", 4, 91 128 101 17, center
text "Please include the word 'DALserv' in the subject of any email sent.", 5, 8 151 259 33, center
text "HorseC", 6, 89 33 100 17, center
button "Done", 7, 112 194 65 25, cancel
}
; +=============================+
; | usage dialog (off about) |
; +=============================+
dialog -l dalsrv_usage_note {
title "Usage Notes"
size -1 -1 398 363
option pixels
text "For the most part usage of this tool is very simple. Just follow the instructions found in each of the sub-menu displays to complete the process desired. ", 1, 60 25 279 53
button "Close", 2, 167 320 65 25, cancel
text "Email: horsec@mirc.org", 7, 136 286 126 17
text "Some of the more destructive commands (like WIPE of access list) may ask you if you are sure before they process the request.", 3, 63 97 272 44
text "Since all of the commands in this tool use DALnet services the response from the commands (if any) is normally shown in the 'status' window.", 4, 61 169 276 55
text "Your comments and suggestions about this tool are welcome. Please email me at the address listed.", 5, 61 233 276 39
}
; +=============================+
; | links dialog (off about) |
; +=============================+
dialog dalserv_links {
title "dalserv_links"
size -1 -1 330 334
option pixels notheme
text "This is a list of usefull links for DALnet information:", 1, 41 1 247 17
text "Nickserv Commands:", 2, 111 22 106 17
text "Chanserv Commands:", 4, 106 63 116 17
text "MemoServ Commands: ", 6, 106 104 117 17
text "Main Dalnet Documentation:", 8, 93 145 140 17
button "Done", 10, 134 302 65 25, cancel
text "DALnet Security documents:", 3, 96 200 137 17
text "DALnet Password Guide:", 7, 103 248 123 17
link "http://docs.dal.net/docs/passwords.html", 11, 62 273 204 17
link "http://docs.dal.net/docs/exploits.html", 5, 69 224 191 17
link "http://docs.dal.net/", 9, 111 168 105 17
link "http://www.dal.net/services/servdetail.php3?type=nickserv", 12, 16 40 297 17
link "http://www.dal.net/services/servdetail.php3?type=chanserv", 13, 19 84 300 17
link "http://www.dal.net/services/servdetail.php3?type=memoserv", 14, 12 125 307 17
}
; +=============================+
; | End of script |
; +=============================+
above is at this link: zip of dalserv.mrc