Hl perso

Description

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 / Exemple :


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

Codes Sources

A voir également

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.

Du même auteur (cs_SaD_AnG3L)