Channel modes

By [DX] on Jan 25, 2007

Put in Remote :)

Modes are for Unreal services

alias chanmodes { dialog -m chanmodes chanmodes }

dialog chanmodes {
  title ".:. Chan modes .:."
  Size -1 -1 230 305
  box " Channel ", 1, 5 5 220 40
  edit $active, 2, 10 20 210 20, disable, center
  box "", 3, 5 42 72 207
  button "+ i", 4, 10 55 30 20
  button "- i", 5, 41 55 30 20
  button "+ k", 6, 10 76 30 20
  button "- k", 7, 41 76 30 20
  button "+ l", 8, 10 97 30 20
  button "- l", 9, 41 97 30 20
  button "+ m",10, 10 118 30 20
  button "- m",11, 41 118 30 20
  button "+ n",12, 10 139 30 20
  button "- n",13, 41 139 30 20
  button "+ p",14, 10 160 30 20
  button "- p",15, 41 160 30 20
  button "+ s",16, 10 181 30 20
  button "- s",17, 41 181 30 20
  button "+ t",18, 10 202 30 20
  button "- t",19, 41 202 30 20
  button "+ c",37, 10 223 30 20
  button "- c",38, 41 223 30 20
  button "+ u",41, 159 55 30 20
  button "- u",42, 190 55 30 20
  box "", 20, 80 42 72 207
  button "+ C",21, 85 55 30 20
  button "- C",22, 116 55 30 20
  button "+ G",23, 85 76 30 20
  button "- G",24, 116 76 30 20
  button "+ M",25, 85 97 30 20
  button "- M",26, 116 97 30 20
  button "+ N",27, 85 118 30 20
  button "- N",28, 116 118 30 20
  button "+ R",29, 85 139 30 20
  button "- R",30, 116 139 30 20
  button "+ S",31, 85 160 30 20
  button "- S",32, 116 160 30 20
  button "+ T",33, 85 181 30 20
  button "- T",34, 116 181 30 20
  button "+ V",35, 85 202 30 20
  button "- V",36, 116 202 30 20
  button "+ Z",39, 85 223 30 20
  button "- Z",40, 116 223 30 20
  box "", 43, 155 42 70 165
  button "+ f",44, 159 76 30 20
  button "- f",45, 190 76 30 20
  button "+ j",46, 159 97 30 20
  button "- j",47, 190 97 30 20
  button "+ L",48, 159 118 30 20
  button "- L",49, 190 118 30 20
  button "+ H",50, 159 139 30 20
  button "- H",51, 190 139 30 20
  button "+ K",52, 159 160 30 20
  button "- K",53, 190 160 30 20
  button "+ z",54, 159 181 30 20
  button "- z",55, 190 181 30 20
  box " IRCop ", 56, 155 207 70 63
  button "+ O",57, 159 223 30 20
  button "- O",58, 190 223 30 20
  button "+ A",59, 159 244 30 20
  button "- A",60, 190 244 30 20
  button "OK",63, 140 275 80 20,ok
}

on *:DIALOG:chanmodes:sclick:4:{ mode $active +i }
on *:DIALOG:chanmodes:sclick:5:{ mode $active -i }
on *:DIALOG:chanmodes:sclick:6:{ mode $active +k $$?="Type key" }
on *:DIALOG:chanmodes:sclick:7:{ mode $active -k }
on *:DIALOG:chanmodes:sclick:8:{ mode $active +l $$?="Type limit" }
on *:DIALOG:chanmodes:sclick:9:{ mode $active +l }
on *:DIALOG:chanmodes:sclick:10:{ mode $active +m }
on *:DIALOG:chanmodes:sclick:11:{ mode $active -m }
on *:DIALOG:chanmodes:sclick:12:{ mode $active +n }
on *:DIALOG:chanmodes:sclick:13:{ mode $active -n }
on *:DIALOG:chanmodes:sclick:14:{ mode $active +p }
on *:DIALOG:chanmodes:sclick:15:{ mode $active -p }
on *:DIALOG:chanmodes:sclick:16:{ mode $active +s }
on *:DIALOG:chanmodes:sclick:17:{ mode $active -s }
on *:DIALOG:chanmodes:sclick:18:{ mode $active +t }
on *:DIALOG:chanmodes:sclick:19:{ mode $active -t }
on *:DIALOG:chanmodes:sclick:37:{ mode $active +c }
on *:DIALOG:chanmodes:sclick:38:{ mode $active -c }
on *:DIALOG:chanmodes:sclick:41:{ mode $active +u }
on *:DIALOG:chanmodes:sclick:42:{ mode $active -u }
on *:DIALOG:chanmodes:sclick:21:{ mode $active +C }
on *:DIALOG:chanmodes:sclick:22:{ mode $active -C }
on *:DIALOG:chanmodes:sclick:23:{ mode $active +G }
on *:DIALOG:chanmodes:sclick:24:{ mode $active -G }
on *:DIALOG:chanmodes:sclick:25:{ mode $active +M }
on *:DIALOG:chanmodes:sclick:26:{ mode $active +M }
on *:DIALOG:chanmodes:sclick:27:{ mode $active +N }
on *:DIALOG:chanmodes:sclick:28:{ mode $active -N }
on *:DIALOG:chanmodes:sclick:29:{ mode $active +R }
on *:DIALOG:chanmodes:sclick:30:{ mode $active -R }
on *:DIALOG:chanmodes:sclick:31:{ mode $active +S }
on *:DIALOG:chanmodes:sclick:32:{ mode $active -S }
on *:DIALOG:chanmodes:sclick:33:{ mode $active +T }
on *:DIALOG:chanmodes:sclick:34:{ mode $active -T }
on *:DIALOG:chanmodes:sclick:35:{ mode $active +V }
on *:DIALOG:chanmodes:sclick:36:{ mode $active -V }
on *:DIALOG:chanmodes:sclick:39:{ mode $active +Z }
on *:DIALOG:chanmodes:sclick:40:{ mode $active -Z }
on *:DIALOG:chanmodes:sclick:44:{ mode $active +f $$?="Type flood [lines:seconds] (Example 5:3)" }
on *:DIALOG:chanmodes:sclick:45:{ mode $active -f }
on *:DIALOG:chanmodes:sclick:46:{ mode $active +j $$?="Type joins [joins:seconds] (Example 2:3)" }
on *:DIALOG:chanmodes:sclick:47:{ mode $active -j }
on *:DIALOG:chanmodes:sclick:48:{ mode $active +l 1 | mode $active +L $$?="Link channel with another (Example #bosnia)" }
on *:DIALOG:chanmodes:sclick:49:{ mode $active -l | mode $active -L }
on *:DIALOG:chanmodes:sclick:50:{ mode $active +H }
on *:DIALOG:chanmodes:sclick:51:{ mode $active -H }
on *:DIALOG:chanmodes:sclick:52:{ mode $active +K }
on *:DIALOG:chanmodes:sclick:53:{ mode $active -K }
on *:DIALOG:chanmodes:sclick:54:{ mode $active +z }
on *:DIALOG:chanmodes:sclick:55:{ mode $active -z }
on *:DIALOG:chanmodes:sclick:57:{ mode $active +O }
on *:DIALOG:chanmodes:sclick:58:{ mode $active -O }
on *:DIALOG:chanmodes:sclick:59:{ mode $active +A }
on *:DIALOG:chanmodes:sclick:60:{ mode $active -A }

menu channel {
  Channel modes for $active :/dialog -m chanmodes chanmodes
}

Comments

Sign in to comment.
guest598594   -  Sep 24, 2007

you should have a drop down list that shows the channels ur on

var %x = 1
while (%x <= $chan(0)) {
  did -a name <id of drop down> $chan(%x)
  inc %x
}

then you can do

mode $did(name,id).seltext +/-<mode>
 Respond  
DarthReven   -  Jan 25, 2007

Might want to do a check to see if you are an op in a certain channel and to check if $active is a channel at all

 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.