utiliser une procédure d'un script A dans un script B

[CrazyCat]

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:

tclcopier

# script A
bind - join "#toto *" scan
proc scan {nick uhost handle chan} {
   ...
}

#script B
proc timed {
   scan
   timer 60 timed
}

Exemple 2:

tclcopier

# 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