Dracoo
25-01-2004, 21:47
Questa è una mia creazione fatta oggi... :)
Serve per kickbannare se si vuole un utente che scrive !list o @find in un canale:
//Da inserire nei remote
on *:text:*:#:{
if ($me isop $chan) {
if (($1 == !list) || ($1 == @find)) { set %wareznick $nick | set %warezchan $chan | set %wareztype $1 | WarezDifense | join $chan }
}
}
dialog WarezDifense {
title "WarezDifense"
size -1 -1 170 90
option dbu
box "Caution", 1, 5 5 160 80
text %wareznick ha esordito con un %wareztype in %warezchan Lo devo Kickbannare?, 2, 10 15 230 110
button "&Sì, con re&ason di default", 3, 10 35 70 15, default
button "&No", 4, 90 35 70 15, cancel
button "&Si, con re&ason alternativo", 5, 50 60 70 15, default
}
dialog ReasonA {
title "Alternative Reason..."
size -1 -1 140 60
option dbu
box "Re&ason", 1, 5 5 130 50
edit "", 2, 10 15 120 10, autohs limit 307
button "&OK", 3, 10 35 55 15,default
button "&Annulla", 4, 75 35 55 15, cancel
}
on 1:dialog:WarezDifense:sclick:*: {
if ($did == 3) { ban %warezchan %wareznick 2 | kick %warezchan %wareznick Non siamo un canale warez!! Perciò è inutile che tu ti esibisca con un %wareztype $+ !!! Non troverai mai nulla qui! | dialog -x $dname | unset %warez* }
if ($did == 5) { reasonA }
}
on 1:dialog:ReasonA:sclick:*:{
if ($did == 3) { ban %warezchan %wareznick 2 | kick %warezchan %wareznick $did(2).text | dialog -x $dname | dialog -x WarezDifense | unset %warez* }
}
//Da inserire negli alias (ho creare un alias alternativo da mettere nei remote)
/WarezDifense /dialog -m WarezDifense WarezDifense
/reasonA /dialog -m reasonA reasonA
:)
Script per mIRC. Testato sulla versione 6.12
Mi sollevo da ogni responsabilità nel caso in cui il programma causi problemi a coloro che lo utilizzeranno.
Serve per kickbannare se si vuole un utente che scrive !list o @find in un canale:
//Da inserire nei remote
on *:text:*:#:{
if ($me isop $chan) {
if (($1 == !list) || ($1 == @find)) { set %wareznick $nick | set %warezchan $chan | set %wareztype $1 | WarezDifense | join $chan }
}
}
dialog WarezDifense {
title "WarezDifense"
size -1 -1 170 90
option dbu
box "Caution", 1, 5 5 160 80
text %wareznick ha esordito con un %wareztype in %warezchan Lo devo Kickbannare?, 2, 10 15 230 110
button "&Sì, con re&ason di default", 3, 10 35 70 15, default
button "&No", 4, 90 35 70 15, cancel
button "&Si, con re&ason alternativo", 5, 50 60 70 15, default
}
dialog ReasonA {
title "Alternative Reason..."
size -1 -1 140 60
option dbu
box "Re&ason", 1, 5 5 130 50
edit "", 2, 10 15 120 10, autohs limit 307
button "&OK", 3, 10 35 55 15,default
button "&Annulla", 4, 75 35 55 15, cancel
}
on 1:dialog:WarezDifense:sclick:*: {
if ($did == 3) { ban %warezchan %wareznick 2 | kick %warezchan %wareznick Non siamo un canale warez!! Perciò è inutile che tu ti esibisca con un %wareztype $+ !!! Non troverai mai nulla qui! | dialog -x $dname | unset %warez* }
if ($did == 5) { reasonA }
}
on 1:dialog:ReasonA:sclick:*:{
if ($did == 3) { ban %warezchan %wareznick 2 | kick %warezchan %wareznick $did(2).text | dialog -x $dname | dialog -x WarezDifense | unset %warez* }
}
//Da inserire negli alias (ho creare un alias alternativo da mettere nei remote)
/WarezDifense /dialog -m WarezDifense WarezDifense
/reasonA /dialog -m reasonA reasonA
:)
Script per mIRC. Testato sulla versione 6.12
Mi sollevo da ogni responsabilità nel caso in cui il programma causi problemi a coloro che lo utilizzeranno.