Channel Censor (+g) List Dialog

By Merbo on Jul 30, 2011

Screenshots

This will list your channel's censor list. You can also add lists.
Right click the channel window and click spamfilter list.

dialog gList {
  title "mIRC Channel Spamfilter (+g) List"
  size -1 -1 307 214
  option dbu
  tab "List", 1, 0 0 306 210
  list 3, 0 38 307 173, tab 1 size vscroll
  button "Refresh", 4, 5 19 37 12, tab 1
  button "Delete selected entry", 5, 214 21 86 12, tab 1
  tab "Add", 2
  edit "*cunt*", 6, 107 97 94 10, tab 2 autohs
  button "Add", 7, 108 108 37 12, tab 2
  text " Enter a glob mask for spamfilter here!", 8, 107 88 93 8, tab 2
}
on 1:dialog:gList:init:0: {
  .set %glist.open True
}
on 1:dialog:gList:close:0: {
  .set %glist.open False
}
on 1:dialog:gList:sclick:5: {
  if ($?!="Are you sure you wish to delete this entry?" == $true) { 
    tokenize 32 $did(gList,3).seltext
    /mode %glist.chan -g $3
    did -d gList 3 $did(gList,3,1).sel 
  }
}
on 1:dialog:gList:sclick:7: {
  /mode %glist.chan +g $did(gList,6).text
}
on 1:dialog:gList:sclick:4: {
  did -r gList 3
  /mode %glist.chan g
}
alias glist {
  if ($1) && (!$2) {
    .dialog -m gList gList
    .mode $1 g
  }
  else {
    echo -a Invalid syntax. Use '/glist <chan>' to see the +g list for <chan>
  }
}
menu channel {
  .SpamFilter List:set %glist.chan $chan | /glist %glist.chan
}
on *:RAWMODE:*: {
  if (?g iswm $1) && (%glist.open == true) {
    did -r gList 3
    /mode %glist.chan g
  } 
}
raw 941:*: {
  if (%glist.open == true) {
    did -a gList 3 Glob mask $3 set by $4 on $asctime($5)
    halt
  }
}
raw 940:*: {
  if (%glist.open == true) {
    halt
  }
}

Comments

Sign in to comment.
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.