Système d'away avec chans d'affichage configurables

Soyez le premier à donner votre avis sur cette source.

Snippet vu 2 710 fois - Téléchargée 22 fois

Contenu du snippet

hello,

suite à de fréquents soucis rencontrés par tout script sur des systèmes d'away s'affichant sur tous les chans je vous mets ici un petit away qui lui passe en /msg sur des chans que vous définirez -10 chans sont possibles-.
Celui-ci passe dans une double-fenètre : une pour le système d'away et l'autre pour les 10 chans :

[code]
dialog awaysys {
title "Away Système"
size -1 -1 200 100
option dbu

tab "Away System", 100, 2 2 200 100 group
text "Raison :", 1, 30 20 100 20, style center, tab 100
text "Nick Away :", 2, 30 50 100 20, style center, tab 100
button "Partir", 3, 20 90 30 10, tab 100
button "Retour", 4, 80 90 30 10, cancel, tab 100
button "Annuler", 5, 140 90 30 10, cancel, tab 100
edit "", 6, 30 30 130 10, autohs, tab 100
edit "", 7, 30 60 130 10, autohs, tab 100

tab "Chans d'Away", 200, 2 2 200 100, group
text "Chan Away", 8, 5 19 65 10, style center, tab 200
text "Chan Away", 9, 130 19 65 10, style center, tab 200
edit %chanaway1, 10, 5 30 65 10, tab 200
edit %chanaway2, 11, 130 30 65 10, tab 200
edit %chanaway3, 12, 5 41 65 10, tab 200
edit %chanaway4, 13, 130 41 65 10, tab 200
edit %chanaway5, 14, 5 52 65 10, tab 200
edit %chanaway6, 15, 130 52 65 10, tab 200
edit %chanaway7, 16, 5 63 65 10, tab 200
edit %chanaway8, 17, 130 63 65 10, tab 200
edit %chanaway9, 18, 5 74 65 10, tab 200
edit %chanaway10, 19, 130 74 65 10, tab 200
button "Valider", 20, 75 90 50 10, ok, tab 200

button "Quitter", 1000, 75 110 50 10, multiok
}

on *:dialog:awaysys:*:*:{
if ($devent == edit) {
if ($did == 6) set %away.niko $did(6)
elseif ($did == 7) set %nick.niko $did(7)
elseif ($did == 10) set %chanaway1 $did(10).text
elseif ($did == 11) set %chanaway2 $did(11).text
elseif ($did == 12) set %chanaway3 $did(12).text
elseif ($did == 13) set %chanaway4 $did(13).text
elseif ($did == 14) set %chanaway5 $did(14).text
elseif ($did == 15) set %chanaway6 $did(15).text
elseif ($did == 16) set %chanaway7 $did(16).text
elseif ($did == 17) set %chanaway8 $did(17).text
elseif ($did == 18) set %chanaway9 $did(18).text
elseif ($did == 19) set %chanaway10 $did(19).text
}
if ($devent == sclick) {
if ($did == 3) {
set %nicknormal $me
away %away.niko
/nick %nick.niko
msg %chanaway1 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway2 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway3 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway4 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway5 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway6 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway7 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway8 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway9 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway10 se met en away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
away %away.niko
/nick %nick.niko
}
if ($did == 4) {
msg %chanaway1 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway2 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway3 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway4 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway5 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway6 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway7 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway8 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway9 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
msg %chanaway10 revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time 
away
/nick %nicknormal
}
if ($did == 5) {
unset %away.niko
unset %nick.niko
}
if ($did == 20) { echo -a 13 $+ ?8infos validées pour les 4chans d'away13? }
}
}
/code

copiez/collez ce code dans une nouvelle remote et copiez le code suivant dans les aliases

[code]/F5 /dialog -m awaysys awaysys/code

bien sur si vous avez déjà une fonction définie sur la touche F5 changez celle-ci par une autre disponible ;)

petit rappel quand à l'utilisation du système d'away :

Allez déjà dans la partie "Chans d'Away" et mettez les noms des chans puis cliquez sur "Valider", vous aurez un echo qui vous dira que ceux-ci sont validés.

Ensuite fenètre "Away System" remplissez les deux chans "raison d'away" et "pseudo d'away" puis cliquez sur partir, à votre retour cliquez sur revenir, une fois votre pseudo revenu à la normale cliquez sur annuler ce qui aura pour effet de supprimer les variables devenues inutiles. Il va sans dire que la double-fenètre away doit rester ouverte tout le temps où vous êtes away, celle ci se fermera en appuyant sur "annuler".

bisouxxx all 8)

Conclusion :


pour tout report de bug ou correction http://maitre.zen.free.fr

A voir également

Ajouter un commentaire

Commentaires

Messages postés
2466
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
1 août 2010
1
HI Coolman002 !

Pour un system d'away, ya juste besoin de $away $awaymsg et $awaytime
Messages postés
969
Date d'inscription
lundi 16 juin 2003
Statut
Membre
Dernière intervention
1 juillet 2012
1
Bizare, enfin bon, depuis le temps que j'ai pas touché a mIRC... je devais avoir une alias pour le faire alors.

tu utilises plusieurs fois "revient de son away pour 3- 7Raison: 10 %away.niko  3- 7 Depuis: 10 $time ", fais une aliasas, ca ferait mieux (idem pour partir en away)

Utilise $awaymsg pour ton message d'away, ca evite une variable.

elseif ($did == 10) set %chanaway1 $did(10).text
elseif ($did == 11) set %chanaway2 $did(11).text
elseif ($did == 12) set %chanaway3 $did(12).text
elseif ($did == 13) set %chanaway4 $did(13).text
elseif ($did == 14) set %chanaway5 $did(14).text
elseif ($did == 15) set %chanaway6 $did(15).text
elseif ($did == 16) set %chanaway7 $did(16).text
elseif ($did == 17) set %chanaway8 $did(17).text
elseif ($did == 18) set %chanaway9 $did(18).text
elseif ($did == 19) set %chanaway10 $did(19).text

c'est largement simplifiable avec un isnum 10-19...
dans un event edit, si tu fais set %truc.machin $did, $did aura comme valeur la valeur de l'edit il me semble.
Messages postés
281
Date d'inscription
jeudi 21 juillet 2005
Statut
Membre
Dernière intervention
14 avril 2008

"Pour la photo on verra avec le temps ;)"

perso pour tous les codes "graphiques" (dialogs et picwins surtout), je mettrais un screenshot, ça nous donne un avant goût du code sans avoir à le loader dans notre script

Bonne continuation
Messages postés
8
Date d'inscription
lundi 3 octobre 2005
Statut
Membre
Dernière intervention
8 janvier 2007

hello,

après essai %chanaway1,%chanaway2... voilà ce que j'obtiens onglet état ==>

[12:16:26] -> *se* met en away pour - Raison: away test - Depuis: 12:16:26
-
You have been marked as being away
-
se No such nick/channel

++ ^^
Messages postés
8
Date d'inscription
lundi 3 octobre 2005
Statut
Membre
Dernière intervention
8 janvier 2007

hello coolman002,
oui pour la centaine en performant mais je ne parle que d'une utilisation basique.
si tu parles d'un $null ou $true c'est vrai que je ne l'utilise guère mais en validant la partie chans away les inexistants s'effacent mais je zieuterais ca avec plus de détails.
merci pour %chanaway1,%chanaway2... je mets en place effectivement.

oui encore et toujours, mais la vie n'est elle pas aussi une répétition de choses essayant d'évoluer avec le temps ? ;)

merci pour ces commentaires qui me permetten d'évoluer :)
Afficher les 8 commentaires

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.