Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

HL PERSO


Information sur la source

Catégorie :AddOns Classé sous : hl Niveau : Débutant Date de création : 05/07/2006 Date de mise à jour : 09/07/2006 15:46:32 Vu / téléchargé: 3 352 / 80

Note :
Aucune note

Commentaire sur cette source (17)
Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale
un petit gestionnaire d'hl,il est pas top,mais bon,pour l'ouvrir /hl,et c tout (enfin,ne pas oublié de charger l'addon dans le script quand mm :)
 

Source

  • on *:load: { echo -a 12[4Inf012]12 Hl personnalisable chargé! Tape /hl pour l'ouvrir :) }
  • alias hl { dialog -m hl hl }
  • dialog hl {
  • title "hl perso ßy Sad_[A]nG3L"
  • size -1 -1 202 266
  • text "Pseudo 1", 1, 8 8 45 12
  • button "Activer", 2, 6 232 60 30, ok
  • button "Desactiver", 3, 71 232 60 30, ok
  • button "Close", 4, 135 232 60 30, ok flat
  • text "Pseudo 2", 5, 8 32 44 12
  • text "Pseudo 4", 6, 8 80 45 13
  • text "Pseudo 3", 7, 8 56 45 13
  • text "Pseudo 7", 8, 8 152 45 13
  • text "Pseudo 8", 9, 8 176 45 13
  • text "Pseudo 6", 10, 7 128 45 13
  • text "Pseudo 5", 11, 8 104 45 13
  • text "Pseudo 9", 12, 7 199 44 13
  • edit "%hl1", 13, 72 7 105 22, autohs
  • edit "%hl2", 14, 72 32 105 22, autohs
  • edit "%hl3", 15, 72 56 105 22, autohs
  • edit "%hl4", 16, 72 80 105 22, autohs
  • edit "%hl5", 17, 72 104 105 22, autohs
  • edit "%hl6", 18, 72 127 105 22, autohs
  • edit "%hl7", 19, 72 152 105 22, autohs
  • edit "%hl8", 20, 72 176 105 22, autohs
  • edit "%hl9", 21, 72 200 105 22, autohs
  • }
  • on *:dialog:hl:init:*: {
  • dll hl\mdx.dll SetMircVersion $version
  • dll hl\mdx.dll MarkDialog $dname
  • dll hl\mdx.dll SetDialog $dname bgcolor $rgb(146,12,249)
  • dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 background $rgb(146,12,249)
  • dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 text $rgb(255,255,255)
  • dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 textbg $rgb(146,12,249)
  • dll hl\mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 verdana 8 verdana
  • }
  • on 1:dialog:hl:edit:*: {
  • if ($did == 13) {
  • set %hl1 $did($dname,13)
  • }
  • if ($did == 14) {
  • set %hl2 $did($dname,14)
  • }
  • if ($did == 15) {
  • set %hl3 $did($dname,15)
  • }
  • if ($did == 16) {
  • set %hl4 $did($dname,16)
  • }
  • if ($did == 17) {
  • set %hl5 $did($dname,17)
  • }
  • if ($did == 18) {
  • set %hl6 $did($dname,18)
  • }
  • if ($did == 19) {
  • set %hl7 $did($dname,19)
  • }
  • if ($did == 20) {
  • set %hl8 $did($dname,20)
  • }
  • if ($did == 21) {
  • set %hl9 $did($dname,21)
  • }
  • }
  • on 1:dialog:hl:sclick:*: {
  • if ($did == 2) {
  • set %hl on | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont activés !
  • }
  • if ($did == 3) {
  • set %hl off | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont desactivés
  • }
  • }
  • on 1:TEXT:*:*:{
  • if ($chan != $active) { if (%hl == on) {
  • if (%hl1 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl2 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl3 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl4 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl5 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl6 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl7 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl8 isin $1- 1) {
  • .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
  • if (%hl9 isin $1- 1) {
  • }
  • }
  • }
  • }
on *:load: { echo -a 12[4Inf012]12 Hl personnalisable chargé! Tape /hl pour l'ouvrir :) }
alias hl { dialog -m hl hl }
dialog hl {
  title "hl perso ßy Sad_[A]nG3L"
  size -1 -1 202 266
  text "Pseudo 1", 1, 8 8 45 12
  button "Activer", 2, 6 232 60 30, ok
  button "Desactiver", 3, 71 232 60 30, ok
  button "Close", 4, 135 232 60 30, ok flat
  text "Pseudo 2", 5, 8 32 44 12
  text "Pseudo 4", 6, 8 80 45 13
  text "Pseudo 3", 7, 8 56 45 13
  text "Pseudo 7", 8, 8 152 45 13
  text "Pseudo 8", 9, 8 176 45 13
  text "Pseudo 6", 10, 7 128 45 13
  text "Pseudo 5", 11, 8 104 45 13
  text "Pseudo 9", 12, 7 199 44 13
  edit "%hl1", 13, 72 7 105 22, autohs
  edit "%hl2", 14, 72 32 105 22, autohs
  edit "%hl3", 15, 72 56 105 22, autohs
  edit "%hl4", 16, 72 80 105 22, autohs
  edit "%hl5", 17, 72 104 105 22, autohs
  edit "%hl6", 18, 72 127 105 22, autohs
  edit "%hl7", 19, 72 152 105 22, autohs
  edit "%hl8", 20, 72 176 105 22, autohs
  edit "%hl9", 21, 72 200 105 22, autohs
}
on *:dialog:hl:init:*: {
  dll hl\mdx.dll SetMircVersion $version
  dll hl\mdx.dll MarkDialog $dname
  dll hl\mdx.dll SetDialog $dname bgcolor $rgb(146,12,249)
  dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 background $rgb(146,12,249)
  dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 text $rgb(255,255,255)
  dll hl\mdx.dll SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 textbg $rgb(146,12,249)
  dll hl\mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21 verdana 8 verdana
}

on 1:dialog:hl:edit:*: {
  if ($did == 13) {
    set %hl1 $did($dname,13)
  }
  if ($did == 14) {
    set %hl2 $did($dname,14)
  }
  if ($did == 15) {
    set %hl3 $did($dname,15)
  }
  if ($did == 16) {
    set %hl4 $did($dname,16)
  }
  if ($did == 17) {
    set %hl5 $did($dname,17)
  }
  if ($did == 18) {
    set %hl6 $did($dname,18)
  }
  if ($did == 19) {
    set %hl7 $did($dname,19)
  }
  if ($did == 20) {
    set %hl8 $did($dname,20)
  }
  if ($did == 21) {
    set %hl9 $did($dname,21)
  }
}

on 1:dialog:hl:sclick:*: {
  if ($did == 2) {
    set %hl on | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont activés !
  }
  if ($did == 3) {
    set %hl off | echo -a $timestamp 4 [12Inf04]13 L13es hl perso sont desactivés
  }
}

on 1:TEXT:*:*:{
  if ($chan != $active) { if (%hl == on) {
      if (%hl1 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl2 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl3 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl4 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl5 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl6 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl7 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl8 isin $1- 1) {
        
      .echo -a $timestamp 4[12HL4]13 $nick sur $chan "$+ $1- $+" | halt }
      if (%hl9 isin $1- 1) {
      }
    }
  }
}

Conclusion

voila quelque temps que je m'acharne apres cette source,je me doute qu'elle est tres mal codé et qu'il y'a des beug,mais bon,je prend mon courage a deux mains et je decide de poster quand mm..

mon gestionnaire d'hl utilise MDX,je c tres bien que d'apprendre a utiliser MDX avant de savoir scripter comme il faut,c pas top mais bon..no comment
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  •   hl
    • hl.mrcTélécharger ce fichier [Réservé aux membres club]Voir ce fichier3 443 octets
    • MDX.DLLTélécharger ce fichier [Réservé aux membres club]42 496 octets

Télécharger le zip

Historique

08 juillet 2006 08:24:22 :
j'ai rajouter le nom de variables dans le dialog pour que sa regle le probleme du premier edit et que les mot reste dans le dialog apres réouverture
09 juillet 2006 15:46:32 :
là correction est faite,merci pour ton aide RCA ArKanis,car j'avais oublié de rajouter les } Pour le reste..je suis encore dessus,je pense galerer un petit moment,mais je vais m'en sortir :)

Commentaires et avis

signaler à un administrateur
Commentaire de PaDa le 05/07/2006 14:33:39

Ta source a le mérite de montrer 2-3 utilisations simples de MDX..
Après, je comprends pas vraiment pourquoi tu la postes, si tu considères toi même que c'est mal codé et déjà vu.. A quoi ca sert ?
Bonne continuation

signaler à un administrateur
Commentaire de SaD_AnG3L le 05/07/2006 14:37:34

a avancé,et a avoir des avis de ceux qui savent vraiment scripter,et ainsi pouvoir apprendre quelque truc au sujet du langage mIRC

signaler à un administrateur
Commentaire de PaDa le 05/07/2006 14:43:58

D'acc ;)
Je te donne un des trucs "moches" de ton script alors :

Cette partie :
#   if ($did == 13) {
#     set %hl1 $did($dname,13)
#   }

Tu la répètes 9 fois ! Alors que tu pourrais faire ca en une seule fois : tu veux regarder les did de 13 a 21, ce qui te fournit les %hl de 1 a 9 :
Tu peux donc en une condition regarder si le $did est entre 13 et 21 :
>> if ($did isnum 13-21) {
Puis tu calcules le numéro de la variable %hl à mettre à jour :
>> var %numero = $did - 12
Puis tu mets cette variable à jour :
>> set %hl $+ %numero $did($dname,$did)
>> }

Une amélioration intéressante serait de te débrouiller pour que le nombre de pseudos que tu peux rentrer soit illimité : utilise pour cela une liste déroulante (combo) ou une liste (list)

Bonne continuation ;)

signaler à un administrateur
Commentaire de PaDa le 05/07/2006 14:46:21

(désolé du double post : si le %numero n'est pas bon, il faut peut être un $calc autour de son calcul : var %numero = $calc($did - 12) .. normalement ca marche comme j'ai fait plus haut, mirc évalue les expressions simples sans $calc, mais bon, on sait jamais)

signaler à un administrateur
Commentaire de SaD_AnG3L le 05/07/2006 14:50:40

je vais m'entrainé d'avantage,et "essayer" ce que tu viens de m'expliqué,encore merci :)

signaler à un administrateur
Commentaire de RCA ArKanis le 05/07/2006 15:06:13

si c'est pour des conseils, j'pense que le forum est plus adapté ^^

en ce qui concerne l'utilité de la source ... pourquoi tu n'utilises pas le système d'highlight fourni par mIRC ?

ligne 103-104 :
      if (%hl9 isin $1- 1) {
      }
utilité ?
"isin $1- 1" ? pourquoi le 1 ?

il te manque une } à la fin

ON *:TEXT:*:*:{
  if (($chan != $active) && (%hl == on)) {
    var %t = 1
    while %t <= 9 {
      if (%hl [ $+ [ %t ] ] isin $1-) echo -at 4[12HL4]13 $nick sur $chan "$+ $1- $+"
;N.B. sur cette dernière ligne :
;echo -t va faire afficher le timestamp
;le . devant echo est inutile
;"$+ $1- $+", c'est moche :x utilise $qt si tu as mIRC 6.17 (voire 6.16 j'sais plus), ou alors $+(",$1-,")
;les [ ] s'appellent evaluation brackets, ça pourrait marcher avec $eval aussi
      inc %t
    }
  }
}

signaler à un administrateur
Commentaire de Panthouffle le 05/07/2006 17:50:14

J'aime pas trop la couleur de fond du dialog

signaler à un administrateur
Commentaire de Panthouffle le 05/07/2006 17:55:42

*tu pourrais rajouter quelques options, sons, bloquage sur certains salons, ou même sur certains pseudos

ps: le code serait moin long si tu utiliserais un combo comme pada l'a déjà dit (même si c'est assez rare de voir quelqu'un avec 9 pseudos) mais ça serait déjà plus propre que 9 edit ;)

Bonne continuation

signaler à un administrateur
Commentaire de wims le 05/07/2006 17:57:39

Idem que les deux plus haut, essaye une list
mais sinon pour le code actuel, si on réouvre le dialog, les pseudos que l'on avait chosis le coup precedent ne sont pas afficher, pour résoudre ca il suffit de rentrer le nom des variables ds le /dialog comme ca :
edit "%hl1", 13, 72 7 105 22, autohs

pour le premier edit :)

signaler à un administrateur
Commentaire de tofu le 05/07/2006 19:04:01

oublie MDX, passes à DCX direct..

signaler à un administrateur
Commentaire de SaD_AnG3L le 06/07/2006 13:03:06

DCX? quel est la difference entre DCX et MDX? et ou le trouve t'on?

signaler à un administrateur
Commentaire de PaDa le 06/07/2006 13:08:36

dcx.scriptsdb.org
MDX permet de modifier l'apparence des dialogs, et d'y ajouter quelques fonctionnalités.
MDX n'est plus développé depuis des années, et est très limité.
DCX a été développé pour pallier tous ces manques, il a une approche très différente mais permet de faire énormément de choses dans les dialogues, environ 12 000 fois plus de trucs que MDX..
Cela dit, apprends déja peut être le scripting conventionnel avant de te lancer dans des DLLs complexes :) Faut maitriser les bases, que ce soit pour MDX ou DCX..

signaler à un administrateur
Commentaire de SaD_AnG3L le 06/07/2006 13:12:00

je te remerci pour cette reponse super rapide.
je vais continué a me faire les dents sur le scripting,les dlls,on verras plus tard!
encore merci :)

signaler à un administrateur
Commentaire de RCA ArKanis le 09/07/2006 15:38:02

tu as fait des corrections mais tu as pas tenu compte des miennes ... fort dommage :/
il manque toujours deux } à la fin et le reste de mon message est toujours d'actualité
je te donne des conseils pour t'améliorer, et tu n'en prends même pas compte :/

signaler à un administrateur
Commentaire de MJ92 le 04/09/2006 23:49:30

Je trouve ton code pas mal du tout. Mais je pense que tu devrais mettre au moins de la place pour 10 pseudos, parce que si tu délire a changer de pseudo qui n'est pas dans ta source, on ne se fait pas HL. C'est dommage :/.
Je pense aussi que tu pourrais l'optimiser, puis les conseils d'Arkanis, Wims, Pada et les autres sont utiles pour l'amélioration des codes.

Lol panthouffle c'est vrai que la couleur te pete a la tete, mais bon avec    mdxstudio ca pourrait s'arranger ^^

Bonne continuation...

signaler à un administrateur
Commentaire de XavSniper le 09/01/2007 23:57:41

Il y a aussi dans mIRC, en allant dans Options / IRC / Surbrillance

Tout simplement ;)

signaler à un administrateur
Commentaire de MJ92 le 26/02/2007 00:52:00

XavSniper c'est vrai. Mais tu peux tout aussi le créer en dialog ou le faire de façon On Text sans dialog.
Le scripting ne se résout pas à aller dans Options et les configurer, le scripting c'est créer tes codes...

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

à la base un HL avec des options sup. svp... [ par aoane ] bon... voilà... je vous explique ce que je voudrais (il y a des chance pour que vous ayez déjà répondu 10000x à ce type de questions..) je voudrais un big defie pour les crack de scripting !!! [ par besky ] Voila c'est un gros defie que je propose celui qui r&#233;ussit ca pourras avoir je pense une certaine notori&#233;t&#233;e sur ce site et sur tous le Logger une @windows [ par BiGOuF ] Bonjour,J'ai un petit soucis qu'il ne sera surement pas compliqué à résoudre .Je récupère dans des Windows les notices et les HL qui me sont envoyés, Timestamp [ par Soprano71 ] bonjour tlm je voudrai savoir si il y avait une commande pour mettre le Timestamp en une couleur désiré qd on me hl svp ? j'ai modifié le Timestamp su fenetre pour Hl général des users qui hls les opérateurs [ par luv ] Bonjour et ben je vous enoie ce message pour savoir si quelqu'un aurai la réponse et le code pour faire une fenetre de hls des personnes qui hl les op réponse auto au hl [ par ptsca ] Bonne année à tous , voilà je cherche un add-on que le script réponde autmatiquement et aléatoirement quand on me hl : Merci hl abusif [ par ptsca ] Hello , qui serait sympa pour me donner un alias pour kicker automatiquement quand on me hl , j'ai fait des alias pour des slaps et autre mot mais j'y


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version


LG KP501

Entre 9€ et 159€


Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,421 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.