Addon Mouchard pour 10 nick

Menu menubar {
mouchard:mouchard
}
alias mouchard dialog -m sentc sentc

dialog sentc {
title "Mouchard Par DhcP"
size -1 -1 580 360
text "Veillez mettre les pseudos à espionner dans les cases ci-dessous ." ,1,10 10 450 40,style(left)
box "Please fill in your sentences: ",50,10 53 530 275,style
text "Sentence 1:",2,20 70 65 20,style(left)
combo 3,85 70 445 20,style(edit)
text "Sentence 2:",4,20 95 65 20,style(left)
combo 5,85 95 445 20,style(edit)
text "Sentence 3:",6,20 120 65 20,style(left)
combo 7,85 120 445 20,style(edit)
text "Sentence 4:",8,20 145 65 20,style(left)
combo 9,85 145 445 20,style(edit)
text "Sentence 5:",10,20 170 65 20,style(left)
combo 11,85 170 445 20,style(edit)
text "Sentence 6:",12,20 195 65 20,style(left)
combo 13,85 195 445 20,style(edit)
text "Sentence 7:",14,20 220 65 20,style(left)
combo 15,85 220 445 20,style(edit)
text "Sentence 8:",16,20 245 65 20,style(left)
combo 17,85 245 445 20,style(edit)
text "Sentence 9:",18,20 270 65 20,style(left)
combo 19,85 270 445 20,style(edit)
text "Sentence 10:",20,20 295 65 20,style(left)
combo 21,85 295 445 20,style(edit)
button "Clear all",82,310 335 70 20,style(edit)
button "Save",80,390 335 70 20,style(ok)
button "Cancel",81,470 335 70 20,style(cancel)
}
on *:dialog:sentc:init:*:{
if (%spy1 == NotSet) did -ci sentc 3 1 Tapez le pseudo concerné
if (%spy2 == NotSet) did -ci sentc 5 1 Tapez le pseudo concerné
if (%spy3 == NotSet) did -ci sentc 7 1 Tapez le pseudo concerné
if (%spy4 == NotSet) did -ci sentc 9 1 Tapez le pseudo concerné
if (%spy5 == NotSet) did -ci sentc 11 1 Tapez le pseudo concerné
if (%spy6 == NotSet) did -ci sentc 13 1 Tapez le pseudo concerné
if (%spy7 == NotSet) did -ci sentc 15 1 Tapez le pseudo concerné
if (%spy8 == NotSet) did -ci sentc 17 1 Tapez le pseudo concerné
if (%spy9 == NotSet) did -ci sentc 19 1 Tapez le pseudo concerné
if (%spy10 == NotSet) did -ci sentc 21 1 Tapez le pseudo concerné
if (%spy1 != NotSet) did -ci sentc 3 1 %spy1
if (%spy2 != NotSet) did -ci sentc 5 1 %spy2
if (%spy3 != NotSet) did -ci sentc 7 1 %spy3
if (%spy4 != NotSet) did -ci sentc 9 1 %spy4
if (%spy5 != NotSet) did -ci sentc 11 1 %spy5
if (%spy6 != NotSet) did -ci sentc 13 1 %spy6
if (%spy7 != NotSet) did -ci sentc 15 1 %spy7
if (%spy8 != NotSet) did -ci sentc 17 1 %spy8
if (%spy9 != NotSet) did -ci sentc 19 1 %spy9
if (%spy10 != NotSet) did -ci sentc 21 1 %spy10
did -t sentc 80 1
}
on *:dialog:sentc:sclick:80:{
if ($did(sentc,3).text != Tapez le pseudo concerné) set %spy1 $did(sentc,3).text
if ($did(sentc,5).text != Tapez le pseudo concerné) set %spy2 $did(sentc,5).text
if ($did(sentc,7).text != Tapez le pseudo concerné) set %spy3 $did(sentc,7).text
if ($did(sentc,9).text != Tapez le pseudo concerné) set %spy4 $did(sentc,9).text
if ($did(sentc,11).text != Tapez le pseudo concerné) set %spy5 $did(sentc,11).text
if ($did(sentc,13).text != Tapez le pseudo concerné) set %spy6 $did(sentc,13).text
if ($did(sentc,15).text != Tapez le pseudo concerné) set %spy7 $did(sentc,15).text
if ($did(sentc,17).text != Tapez le pseudo concerné) set %spy8 $did(sentc,17).text
if ($did(sentc,19).text != Tapez le pseudo concerné) set %spy9 $did(sentc,19).text
if ($did(sentc,20).text != Tapez le pseudo concerné) set %spy10 $did(sentc,21).text
if ($did(sentc,3).text == Tapez le pseudo concerné) set %spy1 NotSet
if ($did(sentc,5).text == Tapez le pseudo concerné) set %spy2 NotSet
if ($did(sentc,7).text == Tapez le pseudo concerné) set %spy3 NotSet
if ($did(sentc,9).text == Tapez le pseudo concerné) set %spy4 NotSet
if ($did(sentc,11).text == Tapez le pseudo concerné) set %spy5 NotSet
if ($did(sentc,13).text == Tapez le pseudo concerné) set %spy6 NotSet
if ($did(sentc,15).text == Tapez le pseudo concerné) set %spy7 NotSet
if ($did(sentc,17).text == Tapez le pseudo concerné) set %spy8 NotSet
if ($did(sentc,19).text == Tapez le pseudo concerné) set %spy9 NotSet
if ($did(sentc,21).text == Tapez le pseudo concerné) set %spy10 NotSet
}
on *:dialog:sentc:sclick:79:userinfo
on *:dialog:sentc:sclick:82:{
set %spy1 NotSet
set %spy2 NotSet
set %spy3 NotSet
set %spy4 NotSet
set %spy5 NotSet
set %spy6 NotSet
set %spy7 NotSet
set %spy8 NotSet
set %spy9 NotSet
set %spy10 NotSet
did -ci sentc 3 1 Tapez le pseudo concerné
did -ci sentc 5 1 Tapez le pseudo concerné
did -ci sentc 7 1 Tapez le pseudo concerné
did -ci sentc 9 1 Tapez le pseudo concerné
did -ci sentc 11 1 Tapez le pseudo concerné
did -ci sentc 13 1 Tapez le pseudo concerné
did -ci sentc 15 1 Tapez le pseudo concerné
did -ci sentc 17 1 Tapez le pseudo concerné
did -ci sentc 19 1 Tapez le pseudo concerné
did -ci sentc 21 1 Tapez le pseudo concerné
}

on *:text:*:#:{
if ( %spy1 isin $nick) || ( %spy2 isin $nick) || ( %spy3 isin $nick) || ( %spy4 isin $nick) || ( %spy5 isin $nick) || ( %spy6 isin $nick) || ( %spy7 isin $nick) || ( %spy8 isin $nick) || ( %spy9 isin $nick) || ( %spy10 isin $nick) {
if ($window(@Mouchard)) {
aline -ph @Mouchard [ $time ] 11 $nick a dit sur 8 $chan  $1-
}
elseif (!$window(@Mouchard)) {
window -mk0ne @Mouchard
aline -ph 4 @Mouchard [ $time ] 11 $nick a dit sur 8 $chan  $1-
}
}
}