Systeme de highlights persos a configuré dan une liste

Contenu du snippet

C'est un simple systeme d'highlghts qui vous aveti lorsque un des mots entré dans votre liste est prononcer.Rien de bien compliquer juste pour montrer un peu l'utilisation des fichiers txt.

Source / Exemple :


dialog hls {
  title "-- Hl'S PeRsOs --"
  size -1 -1 111 162
  option dbu
  list 1, 16 28 73 72, size vsbar
  text "Entre les mots pour lesquels tu veut etre averti par le script lorsqu'ils seront prononcé", 2, 1 4 108 18, center
  edit "", 3, 17 105 71 10, autohs
  button "Ajouter", 4, 17 120 29 12
  button "Enlever", 5, 56 120 29 12  
  check "Activer", 6, 5 139 50 10
  button "Fermer", 7, 61 138 37 12, ok cancel
}

on *:dialog:hls:*:*: {

  if $devent == init { 
     if $exists($mircdirhls.txt) { loadbuf -o hls 1 hls.txt }
if (%hlperso == on) { did -c hls 6 }
  }

  if $devent == sclick {

    if $did == 4 {

      did -a $dname 1 $did(3)
      write hls.txt $did(3)
    }

    if $did == 5 {  write -dl hls.txt $did(1).seltext | did -d hls 1 $did(1).sel  }

    if $did == 6 { If ( $did(6).state == 1 ) .set %hlperso on |    If ( $did(6).state == 0 ) .set %hlperso off }

  }
}

on *:text:*:#:{
  if %hlperso == on {  
    %d = 1
    while (%d <= $lines(hls.txt)) {   
      If ($read(hls.txt,%d) iswm $1- ) { 
        echo -a 4Highlight System:2 [ $time ]12 $nick 2A Dit10 $read(hls.txt,%d) 2sur10 $chan                 
      }

      inc %d
    }
  }
}

Conclusion :


Voila :)

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