Voila un addon qui regroupe un away répondeur et un anti pv avec control en popup, avec un log des actions. Ceci est la 1ère version et ne gère pas encore le multi server
Source / Exemple :
[AWAY, ANTI PV, REPONDEUR V.1 by n0m@n]
alias away_pv /dialog -m Away_pv Away_pv
dialog away_pv {
title "Away/Anti Pv"
size -1 -1 89 134
option dbu
tab "Away", 1, 0 0 88 118
box "Pseudo et raison d' away", 3, 3 33 82 58, tab 1
button "Ajouter", 4, 3 92 40 12, tab 1
button "Effacer", 5, 44 92 40 12, tab 1
button "S' absenter" , 6, 3 105 81 12, tab 1
list 7, 8 41 72 47, tab 1 sort size extsel
box "Activer", 15, 1 14 86 18, tab 1
check "Away", 16, 4 21 27 9, tab 1 left
check "anti pv", 17, 57 21 28 10, tab 1
tab "Anti Pv", 2
box "Phrase anti pv", 8, 3 15 82 21, tab 2
edit "", 9, 5 23 78 10, tab 2 size extsel autohs
box "Pseudo autorisé", 10, 3 37 82 78, tab 2
list 11, 5 46 50 66, tab 2 sort size extsel
button "Ajouter", 12, 56 47 27 31, tab 2
button "Effacer", 13, 56 80 27 31, tab 2
button "° Valider °", 14, 1 120 87 13, ok cancel
}
on *:dialog:away_pv:sclick:*: {
if ($did(16).state == 1) { set %away.activé oui | did -e $dname 4,7 | did -b $dname 5,6 }
else { set %away.activé non | did -b $dname 4,5,6,7 }
if ($did(17).state == 1) { set %pv.activé oui | did -e $dname 12,11,9 | $iif($group(#pv) == off,enable #pv) }
else { set %pv.activé non | did -b $dname 9,11,12,13 | $iif($group(#pv) == on,disable #pv) }
if ($did == 4) { addaway | did -b $dname 5,6 }
if ($did == 5) { delaway | did -b $dname 5,6 }
if ($did == 12) { addpv }
if ($did == 13) { delpv | did -b $dname 13 }
if ($did == 6) { partaway | did -b $dname 5,6 }
if ($did == 7) && ($away) { did -e $dname 5 }
else { if ($did == 7) { did -e $dname 5,6 } }
if ($did == 11) { did -e $dname 13 }
if ($did == 14) && ($did(9) != %pv) { set %pv $did(9) }
}
on 1:dialog:away_pv:init:*: {
did -a $dname 9 %pv
if (%away.activé == oui) { did -c $dname 16
did -b $dname 5,6 }
else { did -u $dname 16
did -b $dname 4,5,6,7 }
if (%pv.activé == oui) { did -c $dname 17
did -b $dname 13 }
else { did -u $dname 17
did -b $dname 9,11,12,13 }
var %a 1 | while (%a <= $ini(systeme\ident\away_pv.ini,away,0) ) { did -a away_pv 7 $ini(systeme\ident\away_pv.ini,away,%a) | inc %a }
var %b 1 | while (%b <= $ini(systeme\ident\away_pv.ini,pv_pseudo,0) ) { did -a away_pv 11 $ini(systeme\ident\away_pv.ini,pv_pseudo,%b) | inc %b }
}
alias jours { return $mid($date,1,2) } stime { if ($mid($time,1,2) <= 9) return $+(0,$time) }
alias mois { return $replace($time(mmmm),January,Janvier,February,Février,March,Mars,April,Avril,May,Mai,June,Juin,July,Juillet,August,Août,September,Septembre,October,Octobre,November,Novembre,December,Décembre) }
alias jour { if ( $day == Monday ) return Lundi | if ( $day == Tuesday ) return Mardi | if ( $day == Wednesday ) return Mercredi | if ( $day == Thursday ) return Jeudi | if ( $day == Friday ) return Vendredi | if ( $day == Saturday ) return Samedi | if ( $day == Sunday ) return Dimanche }
alias -l addaway { var %addnick $$?="Entre le pseudo d' away " | var %addraison $$?"Entre la raison d' away" | writeini -n systeme\ident\away_pv.ini away %addnick %addraison | saveini | did -a away_pv 7 %addnick }
alias -l delaway { remini systeme\ident\away_pv.ini away $did(7).seltext | saveini | did -d away_pv 7 $did(7).sel }
alias -l addpv { var %addnick $$?="Entre le pseudo autorisé au Pv " | writeini -n systeme\ident\away_pv.ini pv_pseudo %addnick autorisé | saveini | did -a away_pv 11 %addnick }
alias -l delpv { remini systeme\ident\away_pv.ini pv_pseudo $did(11).seltext | saveini | did -d away_pv 11 $did(11).sel }
alias -l partaway { enable #away | $iif($group(#rep) == off,enable #rep) | window -g2k0nze @Répondeur | set %away.nick $me | nick $did(away_pv,7).seltext | timer. $+ $me 1 1 if ($readini(systeme\ident\away_pv.ini,away,$did(away_pv,7).seltext)) { amsg 11je suis absent 4- 7raison 4-11 $readini(systeme\ident\away_pv.ini,away,$did(away_pv,7).seltext) }
set %away.raison $readini(systeme\ident\away_pv.ini,away,$did(away_pv,7).seltext) | away %away.raison }
#away off
alias reaway { if ($away) { $iif($group(#rep) == on,disable #rep) | amsg 11je suis de retour d' absence4- 7raison 4-11 %away.raison 4- 7Pendant 4-11 $duration($awaytime) | away | nick %away.nick | unset %away.nick | unset %away.raison } }
#away end
#rep off
On !1:TEXT:*:#: { if ($istok($strip($1-),$me,32) ) && ($away) { window -g2k0nze @Répondeur | msg $nick Je suis absent depuis11 $duration($awaytime) 4- 7raison4 - 11 %away.raison | msg $nick Ton message 4 $$1- a été enregistrer et me seras remis à mon retour. 7@14~15+0+ $nick
//echo @Répondeur [Méssage] 4 $jour $jours $mois à $time 11 $nick a écrit sur 7 $chan 4"11 $1- 4" | log on @Répondeur -f } }
#rep end
#pv on
on !*:OPEN:?: { if ($readini(systeme\ident\away_pv.ini,pv_pseudo,$nick)) { msg $nick 4 ANTI PV PASSIF 10user autorisé }
else { msg $nick 7/4!7\4 ANTI_PV ACTIF 11user non autorisé 7/4!7\ | //msg $nick %pv | window -g2k0nze @Anti_Pv | echo @Anti_Pv [Anti Pv] 4 $jour $jours $mois à $time 11 $nick $address a tenté un Pv avec se méssage " 11 $1- " | log on @Anti_Pv -f | close -m } }
#pv end
menu channel {
°Away°
.Configurer:away_pv
.-
.$iif($group(#away) == on,Revenir d' away):reaway | disable #away
.-
.Répondeur
..$iif($group(#rep) == on,Désactiver):disable #rep
..$iif($group(#rep) == off,Activer):enable #rep | window -g2k0nze @Répondeur
..-
..Logs
...Lire:run $logdir
.-
.Anti Pv
..$iif($group(#pv) == on,Désactiver):disable #pv
..$iif($group(#pv) == off,Activer):enable #pv | window -g2k0nze @Anti_Pv
..-
..Logs
...Lire:run $logdir
}
on *:LOAD: {
mkdir systeme | mkdir systeme\ident | set %pv Je n' accepte pas les PV ...
echo -at Merci10 $me d avoir choisi le système 4[AWAY,4 ANTI PV,4 REPONDEUR V.4I by 10n0m@n] have fun :]D
}
Conclusion :
Voila c ma 1ére source, qui feras partis de mon script :]D
Alors histoire de savoir si je fait bonne route je v montrez le truc :))
Ps: les remarques style c nul, à chier ou autres, c pas tres constructif et ca m aideras guére, puis ca gache de l' espace, donc réfréné votre envie et donner un vrai avis ;)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.