Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


utiliser une procédure d'un script A dans un script B
#1
bonjour,

tout ou presque est dans le titre.

j'ai un script A.tcl avec une procédure de scan qui se lance sur les utilisateurs qui entrent sur le chan, et que je peux lancer manuellement en party line

je veux éviter de modifier le script A.tcl

je veux créer dans un script B.tcl une procédure qui lance toutes les heures la procédure de scan. pour l'instant j'ai le timer, mais je ne sais pas comment appeler la procédure dans l'autre script?

j'imagine avec "global", mais comme j'ai jamais utilisé...

merci d'avance.
#2
Il y a deux possibilités:
- soit le script A est "simple" et du moment qu'il est chargé avant B (par sécurité), tu peux appeler la procédure depuis B,
- soit le script A possède un namespace, il te faut donc appeler la procédure en la "nommant" complètement.

Exemple 1:

tcl
# script A
bind - join "#toto *" scan
proc scan {nick uhost handle chan} {
   ...
}
 
#script B
proc timed {
   scan
   timer 60 timed
}


Exemple 2:

tcl
# script A
namespace eval Scan {
   bind - join "#toto *" Scan::scan
   proc scan {nick uhost handle chan} {
      ...
   }
 
#script B
proc timed {
   Scan::scan 
   timer 60 timed
}


Bien entendu, je n'ai pas mis dans l'exemple la boucle qui va faire scanner chaque utilisateur du canal
irc.zeolia.net - Offrez-moi un café
Merci de ne pas demander d'aide en MP
Away
#3
Merci de la rapidité de la réponse,
et désolé pour mon silence.

J'ai testé mais sans succès

J'essaye autre chose,
encore merci


Possibly Related Threads…
Thread Author Replies Views Last Post
  AIde dans une procédure ksao 2 1,817 04/01/2020, 18:37
Last Post: ksao
  Modifier le script du trivia pour défiler les questions dans l'ordre Mimisth 2 3,547 05/12/2015, 19:45
Last Post: MisterS
  [Résolu] Problème, plusieurs rand dans la même procédure Ez3kiel 2 4,294 03/07/2012, 16:20
Last Post: Ez3kiel
  transformation du script mirc en script tcl vins 28 15,663 04/12/2009, 13:42
Last Post: heretoc
  récupérer le nom de la procédure parent [résolu] MenzAgitat 4 4,781 28/05/2009, 22:39
Last Post: BdS

Forum Jump:


Users browsing this thread: 1 Guest(s)