- menu menubar,channel {
- Anti-Highlight:/dialog -m anti-hl anti-hl
- }
-
- dialog anti-hl {
- title "Anti-HighLight"
- size -1 -1 147 62
- option dbu
- box "Anti-HighLight", 1, 4 2 141 46
- button "Valider", 2, 56 50 88 10, ok
- button "Annuler", 3, 5 50 45 10, cancel
- check "Activer l'Anti-HL", 4, 42 15 67 10
- text "Raison du kick", 5, 10 31 41 9
- edit "", 6, 56 31 85 10, autohs
- }
-
- on *:DIALOG:anti-hl:sclick:*: {
- if ($did == 4) { set %anti-hl $iif($did(4).state,oui,non) }
- { set %anti-hlmsg $did(6) }
- }
-
- on @*:text:*:#: {
- if ($me isin $strip($1-)) && (%anti-hl == oui) {
- /kick $chan $nick %anti-hlmsg
- }
- }
-
- on 1:dialog:anti-hl:init:0: {
- if (%anti-hl == oui) { did -c $dname 4 }
- did -a $dname 6 %anti-hlmsg
- }
menu menubar,channel {
Anti-Highlight:/dialog -m anti-hl anti-hl
}
dialog anti-hl {
title "Anti-HighLight"
size -1 -1 147 62
option dbu
box "Anti-HighLight", 1, 4 2 141 46
button "Valider", 2, 56 50 88 10, ok
button "Annuler", 3, 5 50 45 10, cancel
check "Activer l'Anti-HL", 4, 42 15 67 10
text "Raison du kick", 5, 10 31 41 9
edit "", 6, 56 31 85 10, autohs
}
on *:DIALOG:anti-hl:sclick:*: {
if ($did == 4) { set %anti-hl $iif($did(4).state,oui,non) }
{ set %anti-hlmsg $did(6) }
}
on @*:text:*:#: {
if ($me isin $strip($1-)) && (%anti-hl == oui) {
/kick $chan $nick %anti-hlmsg
}
}
on 1:dialog:anti-hl:init:0: {
if (%anti-hl == oui) { did -c $dname 4 }
did -a $dname 6 %anti-hlmsg
}