Systeme de highlights persos a configuré dan une liste

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 998 fois - Téléchargée 27 fois

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

Ajouter un commentaire Commentaires
cs_NeO47
Messages postés
33
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
5 août 2004

23 juin 2004 à 13:59
JuJuLoL Tu Sait Lire ??? "Rien de bien compliquer juste pour montrer un peu l'utilisation des fichiers txt." :)
cs_JuJuLoL
Messages postés
56
Date d'inscription
samedi 10 mai 2003
Statut
Membre
Dernière intervention
20 novembre 2004

23 juin 2004 à 13:53
moi j'dis : le script est pas terrible, mon H.L moi il tient en 4 lignes :s




---------------------------------------------
#ADeSiGNer : libertygeneration.net:7000
http://skyern.free.fr/design/tchat.php
www.adesigner.new.fr
Kerrigan
Messages postés
708
Date d'inscription
lundi 15 juillet 2002
Statut
Membre
Dernière intervention
17 mars 2005

7 juin 2004 à 12:23
oui mais c'est lent ça en plus il pourra pas en mettre une infinité :
set line too long ....;
talking
Messages postés
343
Date d'inscription
dimanche 30 novembre 2003
Statut
Membre
Dernière intervention
19 août 2006
1
7 juin 2004 à 09:34
Sinon il y a un autre moyen de faire sans utiliser un fichier txt
Tu peux utiliser des tokens . Lorsque tu cliques sur ajouter tu fais /set %variable $addtok(%variable,$did(id),44) et aprés quand tu veux ajouter dans ta liste tu fais un alias style
alias liste {
var %i = 1
while (%i <= $numtok(%variable,44) ) {
.did -a $dname Iddelaliste $gettok(%variable,%i,44) }
inc %i
}
}
voila aprés pour supprimer et modifier il faut utiliser $remtok et $reptok mais sinon c'est bien codé ça mérite un 8/10 bv et bonne continuation a toi
cs_NeO47
Messages postés
33
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
5 août 2004

6 juin 2004 à 16:53
Et bien je vais esayer de prendre tout ca en compte les htables je ne connait pas du tout j'en ai seulement entendu parler mais bon je vais essayer de trouver un tuto afin de poster une source meilleure.
Merci pour vos commentaires :) ++
Afficher les 16 commentaires

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)