Accueil > Forum > > > > aide a finir mon code away combo
aide a finir mon code away combo
samedi 13 mars 2010 à 21:59:35 |
aide a finir mon code away combo

snip74
|
Bonjour,
j'aimerai un coup de pouce pour finir mon une système away en combo
alias Coul { if !$dialog(away) { dialog -m away away } | else { dialog -x away } }
dialog away {
title "Barre away"
size -1 -1 70 12
option dbu
combo 7, 2 0 65 60, size drop
}
on 1:dialog:away:*:*: {
if $devent == init {
didtok -i $dname 4 44 Autre Motif..,Oqp,abs,Revenir etc...
}
if $devent == sclick {
if ($did(7).seltext == Autre Motif..) { /away $?="Entrer le message away :" | /ame $chr(91) $+ $! $+ $chr(93) | /tnick $me $+ $chr(91) $+ $?="pseudo d'absence ex: abs; oqp; etc... :"$! $+ $chr(93) }
if ($did(7).seltext == oqp) { /away /ame $chr(91) $+ oqp $+ $chr(93) | /tnick $me $+ $chr(91) $+ oqp $+ $chr(93) }
if ($did(7).seltext == abs) { /away /ame $chr(91) $+ abs $+ $chr(93) | /tnick $me $+ $chr(91) $+ abs $+ $chr(93) }
if ($did(7).seltext == Revenir) { /away | /nick $readini mirc.ini mirc nick | /ame $chr(91) $+ $?="Entrer le message de retour :"$! $+ $chr(93) }
}
}
j'aimerai ajouter une notice lorsque une personne me Hl que sa lui envoie une notice du style
on *:text:*:#:if ($me isin $1-) /notice $nick Je suis oQp ?
Ou on *:text:*:#:if ($me isin $1-) /notice $nick Je suis Abs ?
etc... pour X raison.
et si je suis en mode away que je ne puisse pas sélectionner un autre mode d'absence pour ne pas me retrouve avec un pseudo dans se style Test-Oqp-abs etc..
et sans vouloir abusé, dans ma conbo rajouter un système auto away après X seconde ou minute sans parler sur un salon ou sur le server
Cordialement Stéphane
|
|
dimanche 14 mars 2010 à 22:24:26 |
Re : aide a finir mon code away combo

MoiMdr
|
Réponse acceptée !
salut snip74,
alors déja ton code pense que c'est une erreur de recopiage mais ton id de didtok est pas le bon 4 devient 7 ,
pour le reste tu peut faire comme ceci :
dialog away {
title "Barre away"
size -1 -1 70 12
option dbu
combo 7, 2 0 65 60, size drop
}
on 1:dialog:away:*:*: {
if $devent == init {
didtok -i $dname 7 44 Autre Motif,Oqp,abs
;did -a $dname 8 Revenir
did -c $dname 7 1
;did -c $dname 8 1
}
if $devent == sclick {
if ($did(7).seltext == Autre Motif) {
echo 4 -s autre motif
did -r $dname 7
did -i $dname 7 1 Revenir
}
if ($did(7).seltext == oqp) {
echo 4 -s oqp
did -r $dname 7
did -i $dname 7 1 Revenir
}
if ($did(7).seltext == abs) {
echo 4 -s abs
did -r $dname 7
did -i $dname 7 1 Revenir
}
if ($did(7).seltext == Revenir) {
echo 4 -s revenu
didtok -i $dname 7 44 Autre Motif,Oqp,abs
}
}
}
biensure tu remet les actions que tu veux faire
par contre pour remtre le revenir sur la combo je n'ai aps encore la solution car si tu fais le did -c $dname 7 1 dans tes lignes d'absences ca exécutera aussi revenir, ce qui serrait balo MDR
sinon le did -r efface tous ce que tu as dans la liste combo
le did -i $dname 7 1 Revenir insert le mot Revenir a la ligne 1
j'espère que tu pourras un peut avancer avec ca ;)
Et si qulqu'un peut aider pour mettre revenir sur le boutton combo et bien son astuce serrait la bienvenue ;)
|
|
dimanche 14 mars 2010 à 22:34:01 |
Re : aide a finir mon code away combo

snip74
|
Réponse acceptée !
moimdr Loooooool Re coucou ma biche XD,
oui pour le on 1:dialog:away:*:*: {
if $devent == init {
didtok -i $dname 4 44 Autre Motif..,Oqp,abs,Revenir etc... une erreur de code car le mien en original et a 179 ligne et acouplet avec d'autre bouton qui non rien avoir avec ma combo donc j'ai mis le code de base et oublier de changer le 4 en 7 :$
aprés je pense qu'il y a deux souci mais je suis pas sur tu a un souci ici
;did -a $dname 8 Revenir
did -c $dname 7 1
;did -c $dname 8 1
et ici
if ($did(7).seltext == Revenir) {
echo 4 -s revenu
didtok -i $dname 7 44 Autre Motif,Oqp,abs
}
mais comme je suis pas sur té envoyer mon code complet pour que tu puisse regardé si c'est moi qui a mal compris ou c'est bien 2 petites erreur de chifrage ;)
Cordialement Stéphane
|
|
dimanche 14 mars 2010 à 22:51:29 |
Re : aide a finir mon code away combo

MoiMdr
|
Réponse acceptée !
re ;)
oui le :
;did -a $dname 8 Revenir
did -c $dname 7 1
;did -c $dname 8 1
j'avais commencé en voulant fair deux combo avec la revenir qui remplcait l'autre mais j'ai changé de méthode en cour de chemin MDRRRRR
et oui le :
if ($did(7).seltext == Revenir) {
echo 4 -s revenu
didtok -i $dname 7 44 Autre Motif,Oqp,abs
}
il manque un did -r $dname 7 a mettre juste avant le didtok évidement :))
en gros tes ligne de code serront dans ce style:
elseif ($did(7).seltext == oqp) {
/away /ame $chr(91) $+ oqp $+ $chr(93) | /tnick $me $+ $chr(91) $+ oqp $+ $chr(93)
did -r $dname 7
did -i $dname 7 1 Revenir
}
voila j'espère que ca peut t'aider un peut en tous cas ;)
|
|
dimanche 14 mars 2010 à 22:59:58 |
Re : aide a finir mon code away combo

snip74
|
re oui sa m'aide mais trouve pas comment envoyer la notice sur un Hl :D quand on et away XD
Cordialement Stéphane
|
|
mardi 16 mars 2010 à 10:34:31 |
Re : aide a finir mon code away combo

snip74
|
Bonjour,
Bon bah j'arrive a la fin de mon système mais me reste quand même a trouvé 2 petits truc
1) Comment mettre le nom de mon Combo
2) Comment lui ajouter un système d'auto away
exemple :
if ($did(7).seltext == Auto away) { /away $?="combien de minute pour l'auto-Away :" | /ame $?="Motif D'absence :" | /tnick $me $+ $chr(91) $+ $?="Quelle pseudo d'absence ex: abs;etc. :"$! $+ $chr(93) }
Cordialement Stéphane
|
|
jeudi 1 avril 2010 à 01:08:13 |
Re : aide a finir mon code away combo

WorldDMT
|
salut
n'importe quoi!!! en bref voilà le code
dsl j'ai pas le temp pour une expliqation a toi de tester et voir si ça te convient
Code ActionScript : alias coul dialog $iif($dialog(away),-v,-m away) away
dialog away {
title Barre away
size -1 -1 70 12
option dbu
combo 1, 2 0 65 60, size drop
}
on *:dialog:away:*:*:{
if ($devent == init) didtok $dname 1 44 Autre Motif..,Oqp,abs
elseif $devent == sclick {
if $istok(oqp|abs|Autre Motif..,$did(1).seltext,124) {
var %x $iif($did(1).seltext == Autre Motif..,$?="Entrer le message away :",$v1)
away %x
ame $chr(91) $+ $iif($!,%x,away) $+ $chr(93)
did -a $dname 1 Revenir
tnick $me $+ $chr(91) $+ $iif($!,$?="pseudo d'absence ex: abs; oqp; etc... :",$iif(%x,$v1,away)) $+ $chr(93)
}
else {
away
nick $anick
did -d $dname 1 4
ame $chr(91) $+ $$?="Entrer le message de retour :"$! $+ $chr(93)
}
}
}
|
|
jeudi 1 avril 2010 à 11:25:19 |
Re : aide a finir mon code away combo

snip74
|
Bonjour WorldDMT
merci encor ppour toi aide précieux :p
Mais voila aprés avoir fait le test avec ton combo sa mais des trucs po logique :p.
voici l'exeple :
[11:11] * bad [away]
[11:11] 1[4Nick1]14 bad 05a pris le pseudo4 bad[Oqp]
[11:11] * bad[Oqp] [away]
[11:11] 1[4Nick1]14 bad[Oqp] 05a pris le pseudo4 bad[Oqp][abs]
[11:11] * bad[Oqp][abs] [away]
[11:11] 1[4Nick1]14 bad[Oqp][abs] 05a pris le pseudo4 bad[Oqp][abs][abs]
[11:11] * bad[Oqp][abs][abs] [dg]
Le combo en lui même fonction.
Le souci reste qu'il ne bloque les autres absence voir >>bad[Oqp][abs]<<
y a plusieur revenir, plus aucun motif quand je vais prendre le pseudo OQP ou ABS etc... :/
et je recherché juste le systeme avec un timer et son alias ou autre vue que je c pas se que c'est pour quand je selection auto away sa me dise déclacher le auto away dans moi je rentre les minutes style 10 et que dans 10 mn sa me mais en auto away si je ne parler pas :
if ($did(7).seltext == Auto away) { timer /away $?="combien de minute pour l'auto-Away :" | /ame $?="Motif D'absence :" | /tnick $me $+ $chr(91) $+ $?="Quelle pseudo d'absence ex: abs;etc. :"$! $+ $chr(93) }
et en suite lui donner un nom au combo car la case quand on l'ouvre et vide sa fait un carre blanc faut cliquer dessus pour savoir a quoi sa sert :)
Codialement Stéphane
|
|
jeudi 1 avril 2010 à 11:29:10 |
Re : aide a finir mon code away combo

snip74
|
re a oui j'ai oublier
Je mais une partie du code ou j'en suis certe c'est pas jolie mais bon me manque juste a trouvé le auto away et le nom du combo
on *:dialog:pseudo-passe:*:*: {
if $devent == init {
dll dlls/mdx.dll SetMircVersion $version
dll dlls/mdx.dll MarkDialog $dname
dll dlls/mdx.dll SetDialog $dname bgcolor $rgb(211,211,211)
dll dlls/mdx.dll SetColor 3 background $rgb(211,211,211)
dll dlls/mdx.dll SetColor 3 textbg $rgb(211,211,211)
didtok -i $dname 7 44 Autre Motif..,Oqp,Abs,Pala,Clope,Mange,Zedore,Taff,Wc,Dvd,Café,Revenir
}
elseif $devent == sclick {
if $did == 1 { nick %nick $did(2) }
elseif ($did == 4) {
var %nickpass $?*="Entrez ici votre mot de passe"
if %nickpass { ns identify %nickpass }
}
elseif ($did == 5) {
.lance_multicrit
}
elseif ($did == 6) { /list }
elseif ($did(7).seltext == Autre Motif..) { /away $?="Entrer le message away :" | /ame $chr(91) $+ $! $+ $chr(93) | /tnick $me $+ $chr(91) $+ $?="pseudo d'absence ex: abs; oqp; etc... :"$! $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == oqp) { /away 6Je 7suis4 [12oQp4]12 je 1reviens 3bientot 4(2Bippez 13si 2besoin4)2... | /ame 6Je 7suis 5OQP1, 12je 1reviens 3bientot 4(2Bippez 13si 2besoin4)2... | /tnick $me $+ $chr(91) $+ oqp $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Abs) { /away 4Je suis Absent tout simplement | /ame 4Je suis Absent tout simplement | /tnick $me $+ $chr(91) $+ Abs $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Pala) { /away 12désoler je suis actuellement pas la!! pour cause de 3[ 4Paperasse 3] | /ame 12désoler je suis actuellement pas la!! pour cause de 3[ 4Paperasse 3] | /tnick $me $+ $chr(91) $+ Pala $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Clope) { /away 6Je 7file 5m'en 12grillé une tite13, 12à 1Toute 4^12¸4^ :shit: | /ame 6Je 7file 5m'en 12grillé une tite13, 12à 1Toute 4^12¸4^ :shit: | /tnick $me $+ $chr(91) $+ Clope $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Mange) { /away 13À 4Table 2^3^ :d | /ame 13À 4Table 2^3^ :d | /tnick $me $+ $chr(91) $+ Miam $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Zedore) { /away 6Bon 7aller 5jvé 3dodoter :z 4^^ 13Bonne 1nuit 4a 10Tous 2sur 12I4R3C12.Tchat-Fusion.org :) | /ame 6Bon 7aller 5jvé 3dodoter :z 4^^ 13Bonne 1nuit 4a 10Tous 2sur 12I4R3C12.Tchat-Fusion.org :) | /tnick $me $+ $chr(91) $+ Zedore $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Taff) { /away 12l'escavage exsiste encore 4sisi 12la preuve j'vai aller bossé 12@+ 3tard :)) | /ame 12l'escavage exsiste encore 4sisi 12la preuve j'vai aller bossé 12@+ 3tard :)) | /tnick $me $+ $chr(91) $+ Taff $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == WC) { /away 4Urgence 12S'impose | /ame 4Urgence 12S'impose | /tnick $me $+ $chr(91) $+ Wc $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Dvd) { /away 12Je mate un 4Film | /ame 12Je mate un 4Film | /tnick $me $+ $chr(91) $+ Dvd $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Café) { /away 6C'est 7l'heure11!11! 5de 4la 12pause 10café :d :cafe: 3à 13Toute 4^12¸4^ | /ame 6C'est 7l'heure11!11! 5de 4la 12pause 10café :d :cafe: 3à 13Toute 4^12¸4^ | /tnick $me $+ $chr(91) $+ Cafe $+ $chr(93) | did -r $dname 7 | did -i $dname 7 1 Revenir }
elseif ($did(7).seltext == Revenir) { /away | /nick $readini mirc.ini mirc nick | /ame 10® 2/13/6/ 4^12¸4^ 7(2De 12retour7) | did -r $dname 7 | didtok -i $dname 7 44 Autre Motif..,Oqp,Abs,Pala,Clope,Mange,Zedore,Taff,Wc,Dvd,Café,Revenir
}
elseif ($did == 8) {
var %affiche_page = $html_page(@Photo_Membres)
}
elseif ($did == 9) {
var %affiche_page = $html_page(@Le_Site)
}
else { halt }
}
elseif $devent == edit {
did -a $dname 2 %nick
}
}
Cordialement Stephane
ps: au fait mes excuse pour mais faute plus haut lol j'ai re lut y a na plus que bab lol
|
|
jeudi 1 avril 2010 à 20:30:22 |
Re : aide a finir mon code away combo

WorldDMT
|
we normalement il fallait que tu teste le code puisque je n'ai pas testé :p
bon il falait que la combo list soit toute effacé quand t'es away mais là tu reviens avec un autre code :p
bref pour le code precedent tu remplace
did $diname -d 1 4
par
did -r $dname 1
didtok $dname 1 44 Autre Motif..,Oqp,abs
et
did -a $dname 1 Revenir
par
did -ra $dname 1 Revenir
|
|
Cette discussion est classée dans : chr, away, abs, oqp, if
Répondre à ce message
Sujets en rapport avec ce message
2 p'tites alias qui trainaient... [ par uaip ]
Bonjour, étant donné que je ne peux plus poster dans la catégorie des codes, je pose ici 2 petites aliases (mIRC), en même temps j'accepte toute criti
question language mirc [ par besky ]
Bonjour,En language mirc je voudrais connaitre le contraire de "isop" dans un code tel que: if ($nick isop $chan)en d'autres thermes je voudrais avoir
détecteur badword en PV qui Kick,ignore et ferme le PV [ par freenaute ]
bonjour tous !J'ai "compilée" cette remote qui détecte des badwords dans mes PV et répond par kick,donne la raison puis ignore et ferme le PV et ban l
début de away [ par Camanche ]
Bonjour, j'aimerais envoyer une notice à la personne qui me hl quand je suis away et lui dire depuis quand. J'ai donc fait ça: on 1:text:*:*:{ if ($
ecriture [ par mixam ]
bonjour j'ai un code pour l'ecriture pour avoir la premiere lettre d'une couleur differente du reste du textemais je voudrais qu'elle sois aussi en ma
Pour 'minerbe' - debug [ par TropNul ]
; MODIFIED/OPTIMIZED CODE!; Je ne l'ai volontairement pas commente. A toi, minerbe, de; chercher, d'apprendre et de comprendre. Bien evidemment, nous;
probleme d'auto away [ par mixam ]
bonjour j'ai un probleme avec mon systeme d'auto away il s'affiche plusieurs fois voici le code on 1:input:*: if ( %away == off ) && ( %auto == on ) {
enregistrer et indentidié pseudo [ par mikl59 ]
voila on ma donner ce petit truc mais des commande ne marche pas ( !id et !ag et le reste ) si quelqu' un pourrais me dire ce qu' il ne va aps ou le
Socket + Dcc chat [ par Anatolei ]
Bonjour,Je tombe sur un os.. Voilà, je connecte une socket sur un serveur IRC, lorsque je tente, avec celle-ci, une connection dcc chat avec un autre
pb de if() pour bot Perl [ par uaip ]
Bonjour à tous, ma question est très simple : quelqu'un sait-il comment coder en Perl l'hypothèse de la présence d'un user sur un salon IRC ? C'est en
Livres en rapport
|
Derniers Blogs
SESSION SILVERLIGHT 5 3D : SLIDES ET DEMOSSESSION SILVERLIGHT 5 3D : SLIDES ET DEMOS par Groc
Durant les techdays, j'ai eu le plaisir d'animer une session sur Silverlight 5 et la 3D avec Simon Ferquel. Comme promis, voici nos slides et mes démos (celles avec le viper BSG) ici et là. Pour mémoire, les démos utilisent toutes le viper BSG...
Cliquez pour lire la suite de l'article par Groc [TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES[TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES par gpommier
Suite à la session que j'ai présenté sur WebMatrix 2, vous pouvez trouver les slides ici, ainsi que les démos en packages nuget : démos1 et démos2 J'en profite pour remercier chaleureusement tous ceux qui sont venus très nombreux à cette sess...
Cliquez pour lire la suite de l'article par gpommier [SHAREPOINT] LES SESSIONS TECHDAYS 2012.[SHAREPOINT] LES SESSIONS TECHDAYS 2012. par Patrick Guimonet
Voici donc pour ceux qui n'ont pas pu venir, ou ceux qui n'ont pas pu toutes les suivre la liste des sessions SharePoint aux TechDays 2012, que je mettrais à jour dès que les liens des vidéo seront disponibles. Ou ici : http...
Cliquez pour lire la suite de l'article par Patrick Guimonet TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3 par ROMELARD Fabrice
Speaker: Bernard Ourghanlian Cette session est comme chaque jour transmise en live par BrainSonic, et j'ai donc suivi cette troisième pleinière par ce moyen sur mon iPad . Elle est dédiée comme chaque année à la mise en perspective de l'é...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE !MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE ! par Vko
Hier durant une session dédiée aux Techdays 2012, j'ai eu le plaisir d'annoncer la sortie de la Béta 2 de Mishra Reader. C'est quoi ? Pour les utilisateurs, c'est une vraie expérience de lecture de flux RSS sur Windows. Rien à voir avec les produit...
Cliquez pour lire la suite de l'article par Vko
Forum
RE : AIDERE : AIDE par Nico26000
Cliquez pour lire la suite par Nico26000 RE : AIDERE : AIDE par WorldDMT
Cliquez pour lire la suite par WorldDMT AIDEAIDE par Nico26000
Cliquez pour lire la suite par Nico26000
Logiciels
Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning
|