HL PERSO

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) {
      }
    }
  }
}

Télécharger le zip

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 :)