All pastes #565518 Raw Edit

Untitled

public text v1 · immutable
·published 2007-06-14 00:55 UTC
rendered paste body
menu * {
  Channel Helper:{ Channelhelper
    did -a Channelhelper 3 $active
    did -a Channelhelper 72 $remove($chan($active).mode,r)
  }
}
alias Channelhelper { dialog -m ChannelHelper ChannelHelper }
dialog ChannelHelper {
  title "Channel Buddy!"
  size -1 -1 170 170
  option dbu
  text "Made by: iStink" 1, 1 163 60 10
  tab "Modes", 75, 10 30 150 120
  tab "Un-Modes", 76,
  tab "Param-Modes", 77,
  tab "Options" 78,
  edit "" 3, 10 20 50 10
  text "Channel" 4, 10 10 20 10
  button "+c" 6, 20 50 10 10, tab 75
  button "+m" 9, 20 60 10 10, tab 75
  button "+n" 10, 20 70 10 10, tab 75
  button "+p" 11, 20 80 10 10, tab 75
  button "+s" 12, 20 90 10 10, tab 75
  button "+t" 13, 20 100 10 10, tab 75
  button "+z" 14, 20 110 10 10, tab 75
  button "+C" 16, 20 120 10 10, tab 75
  button "+G" 17, 20 130 10 10, tab 75
  button "+M" 18, 30 50 10 10, tab 75
  button "+K" 19, 30 60 10 10, tab 75
  button "+N" 20, 30 70 10 10, tab 75
  button "+Q" 21, 30 80 10 10, tab 75
  button "+R" 22, 30 90 10 10, tab 75
  button "+S" 23, 30 100 10 10, tab 75
  button "+T" 24, 30 110 10 10, tab 75
  button "+V" 25, 30 120 10 10, tab 75
  button "+u" 26, 30 130 10 10, tab 75
  button "-c" 28, 20 50 10 10, tab 76
  button "-m" 31, 20 60 10 10, tab 76
  button "-n" 32, 20 70 10 10, tab 76
  button "-p" 33, 20 80 10 10, tab 76
  button "-s" 34, 20 90 10 10, tab 76
  button "-t" 35, 20 100 10 10, tab 76
  button "-z" 36, 20 110 10 10, tab 76
  button "-C" 38, 20 120 10 10, tab 76
  button "-G" 39, 20 130 10 10, tab 76
  button "-M" 40, 30 50 10 10, tab 76
  button "-K" 41, 30 60 10 10, tab 76
  button "-N" 42, 30 70 10 10, tab 76
  button "-Q" 43, 30 80 10 10, tab 76
  button "-R" 44, 30 90 10 10, tab 76
  button "-S" 45, 30 100 10 10, tab 76
  button "-T" 46, 30 110 10 10, tab 76
  button "-V" 47, 30 120 10 10, tab 76
  button "-u" 48, 30 130 10 10, tab 76
  button "+e" 50, 30 50 10 10, tab 77
  button "+I" 51, 30 60 10 10, tab 77
  button "+f" 52, 30 70 10 10, tab 77
  button "+j" 53, 30 80 10 10, tab 77
  button "+k" 54, 30 90 10 10, tab 77
  button "+l" 55, 30 100 10 10, tab 77
  button "+L" 56, 30 110 10 10, tab 77
  edit "" 57, 40 50 80 10, autohs, tab 77
  edit "" 58, 40 60 80 10, autohs, tab 77
  edit "" 59, 40 70 80 10, autohs, tab 77
  edit "" 60, 40 80 80 10, autohs, tab 77
  edit "" 61, 40 90 80 10, autohs, tab 77
  edit "" 62, 40 100 80 10, autohs, tab 77
  edit "" 70, 40 110 80 10, autohs, tab 77
  button "-e" 63, 20 50 10 10, tab 77
  button "-I" 64, 20 60 10 10, tab 77
  button "-f" 65, 20 70 10 10, tab 77
  button "-j" 66, 20 80 10 10, tab 77
  button "-k" 67, 20 90 10 10, tab 77
  button "-l" 68, 20 100 10 10, tab 77
  button "-L" 69, 20 110 10 10, tab 77
  text "Mode-Lock" 71, 20 120 40 10, tab 77
  edit "" 72, 20 127 80 10, tab 77
  button "Lock!!" 73, 100 127 30 10, tab 77
  check "Show Mode usages?" 74, 50 50 57 10, tab 75
  text "Are you dissatisfied? Please use the box below to tell me if you have been dissatisfied, and include a reason, and your nickname." 79, 13 50 70 50, tab 78
  edit "I, <name> am dissatisfied because of: <reason>" 80, 13 95 60 10, autohs, tab 78
  button "Send Notice" 81, 73 95 40 10, tab 78
}

on *:DIALOG:Channelhelper:sclick:6:{ mode $did(3) +c | if ($did(74).state == 0) halt | else echo -a +c blocks colors from being used in the channel. }
on *:DIALOG:Channelhelper:sclick:9:{ mode $did(3) +m | if ($did(74).state == 0) halt | else echo -a +m sets the channel to moderated so you need voice or above to speak. }
on *:DIALOG:Channelhelper:sclick:10:{ mode $did(3) +n | if ($did(74).state == 0) halt | else echo -a +n sets it so no one can send messages to the channel while they aren't in it. }
on *:DIALOG:Channelhelper:sclick:11:{ mode $did(3) +p | if ($did(74).state == 0) halt | else echo -a +p sets the channel to private }
on *:DIALOG:Channelhelper:sclick:12:{ mode $did(3) +s | if ($did(74).state == 0) halt | else echo -a +s sets the channel to secret }
on *:DIALOG:Channelhelper:sclick:13:{ mode $did(3) +t | if ($did(74).state == 0) halt | else echo -a +t sets the channel where you need halfop or above to set/change the topic. }
on *:DIALOG:Channelhelper:sclick:14:{ mode $did(3) +z | if ($did(74).state == 0) halt | else echo -a +z sets the channel so you need SSL (Secure Socket Layer) to join the channel. }
on *:DIALOG:Channelhelper:sclick:16:{ mode $did(3) +C | if ($did(74).state == 0) halt | else echo -a +C sets the channel so users cant use CTCP on the channel, like: /ctcp #channel ping }
on *:DIALOG:Channelhelper:sclick:17:{ mode $did(3) +G | if ($did(74).state == 0) halt | else echo -a +G sets the channel so when someone types out a badword it will show up as <censored> }
on *:DIALOG:Channelhelper:sclick:18:{ mode $did(3) +M | if ($did(74).state == 0) halt | else echo -a +M sets the channel so you need to be registered and identified to type in that channel }
on *:DIALOG:Channelhelper:sclick:19:{ mode $did(3) +K | if ($did(74).state == 0) halt | else echo -a +K sets it so users can't do /knock #channel message when the channel is +i and users are outstide of the channel. }
on *:DIALOG:Channelhelper:sclick:20:{ mode $did(3) +N | if ($did(74).state == 0) halt | else echo -a +N sets the channel so that only Operators of the channel can change there nicks }
on *:DIALOG:Channelhelper:sclick:21:{ mode $did(3) +Q | if ($did(74).state == 0) halt | else echo -a +Q sets the channel so that no one can kick anyone }
on *:DIALOG:Channelhelper:sclick:22:{ mode $did(3) +R | if ($did(74).state == 0) halt | else echo -a +R sets the channel so you need a registered and identified nick to join }
on *:DIALOG:Channelhelper:sclick:23:{ mode $did(3) +S | if ($did(74).state == 0) halt | else echo -a +S sets the channel so that messages with color in them are shown to others as black instead of color }
on *:DIALOG:Channelhelper:sclick:24:{ mode $did(3) +T | if ($did(74).state == 0) halt | else echo -a +T sets the channel so that only Operators of the channel can notice to the channel, /notice #channel message }
on *:DIALOG:Channelhelper:sclick:25:{ mode $did(3) +V | if ($did(74).state == 0) halt | else echo -a +V sets the channel so that no one can invite other users to the channel }
on *:DIALOG:Channelhelper:sclick:26:{ mode $did(3) +u | if ($did(74).state == 0) halt | else echo -a +u sets the channel so that only Operators of the channel are shown on the nicklist, other users can talk but they won't be shown on the nicklist }
on *:DIALOG:Channelhelper:sclick:28:{ mode $did(3) -c }
on *:DIALOG:Channelhelper:sclick:29:{ mode $did(3) -e }
on *:DIALOG:Channelhelper:sclick:30:{ mode $did(3) -i }
on *:DIALOG:Channelhelper:sclick:31:{ mode $did(3) -m }
on *:DIALOG:Channelhelper:sclick:32:{ mode $did(3) -n }
on *:DIALOG:Channelhelper:sclick:33:{ mode $did(3) -p }
on *:DIALOG:Channelhelper:sclick:34:{ mode $did(3) -s }
on *:DIALOG:Channelhelper:sclick:35:{ mode $did(3) -t }
on *:DIALOG:Channelhelper:sclick:36:{ mode $did(3) -z }
on *:DIALOG:Channelhelper:sclick:37:{ mode $did(3) -A }
on *:DIALOG:Channelhelper:sclick:38:{ mode $did(3) -C }
on *:DIALOG:Channelhelper:sclick:39:{ mode $did(3) -G }
on *:DIALOG:Channelhelper:sclick:40:{ mode $did(3) -M }
on *:DIALOG:Channelhelper:sclick:41:{ mode $did(3) -K }
on *:DIALOG:Channelhelper:sclick:42:{ mode $did(3) -N }
on *:DIALOG:Channelhelper:sclick:43:{ mode $did(3) -Q }
on *:DIALOG:Channelhelper:sclick:44:{ mode $did(3) -R }
on *:DIALOG:Channelhelper:sclick:45:{ mode $did(3) -S }
on *:DIALOG:Channelhelper:sclick:46:{ mode $did(3) -T }
on *:DIALOG:Channelhelper:sclick:47:{ mode $did(3) -V }
on *:DIALOG:Channelhelper:sclick:48:{ mode $did(3) -u }
on *:DIALOG:Channelhelper:sclick:50:{ mode $did(3) +e $eval($did(57),2) | if ($did(74).state == 0) halt | else echo -a +e sets a mode so that whoever matches the +e they can join the channel when they are banned }
on *:DIALOG:Channelhelper:sclick:51:{ mode $did(3) +I $eval($did(58),2) | if ($did(74).state == 0) halt | else echo -a +I sets a mode so that whoever matches the +I, they can join the channel when +i is on; invite only }
on *:DIALOG:Channelhelper:sclick:52:{ mode $did(3) +f $did(59) | if ($did(74).state == 0) halt | else echo -a +f sets flood parameters, /helpop chmodef for more help. }
on *:DIALOG:Channelhelper:sclick:53:{ mode $did(3) +j $did(60) | if ($did(74).state == 0) halt | else echo -a +j sets join parameters where you can only join in; joins:seconds }
on *:DIALOG:Channelhelper:sclick:54:{ mode $did(3) +k $did(61) | if ($did(74).state == 0) halt | else echo -a +k sets a key to the channel so you need to type: /join #channel key-here in order to join. }
on *:DIALOG:Channelhelper:sclick:55:{ mode $did(3) +l $did(62) | if ($did(74).state == 0) halt | else echo -a +l sets a user limit to the channel. }
on *:DIALOG:Channelhelper:sclick:56:{ mode $did(3) +L $did(70) | if ($did(74).state == 0) halt | else echo -a +L sets a linked channel, so when the maximum amount of users has been reached (mode +l) the users that try to join with join the linked channel. }
on *:DIALOG:Channelhelper:sclick:63:{ mode $did(3) -e $did(57) }
on *:DIALOG:Channelhelper:sclick:64:{ mode $did(3) -I $did(58) }
on *:DIALOG:Channelhelper:sclick:65:{ mode $did(3) -f }
on *:DIALOG:Channelhelper:sclick:66:{ mode $did(3) -j }
on *:DIALOG:Channelhelper:sclick:67:{ mode $did(3) -k $did(61) }
on *:DIALOG:Channelhelper:sclick:68:{ mode $did(3) -l }
on *:DIALOG:Channelhelper:sclick:69:{ mode $did(3) -L $did(70) }
on *:DIALOG:Channelhelper:sclick:73:{ cs set $did(3) mlock $did(72) }
on *:DIALOG:Channelhelper:sclick:81:{ ms send iStink $did(80) }