DESCRIPTION.

La fonction FN_ontimer() configure et active un minuteur de grande vitesse.

SYNTAXE.

kminuteur = FN_ontimer( intervalle , procedure , etat )

REMARQUES

intervalle doit être un nombre entier positif indiquant à quelle période entre deux appels de procedure.

procedure doit être l'identifiant d'une procédure définie avec l'instruction DEF PROC / ENDPROC. Cette procédure sera appelé a chaque fois que la durée intervalle sera écoulée.

etat doit être un nombre entier quelconque, mais cette valeur n'est actuellemment pas utilisée. On pourra, par exemple, indiquer 0 pour ce paramètre.

La fonction FN_ontimer() retourne une valeur numérique qui devra être mémorisée dans une variable de ce type. Cette valeur étant indispensable pour l'appel de la procédure PROC_killtimer().

Rappel : Il est important d'annuler tous les minuteurs périodiques avant de quitter votre programme, en utilisant la procédure PROC_killtimer(). Il est fortement recommandé d'utiliser les gestionnaires d'événement ON CLOSE et ON ERROR pour garantir que cette annulation soit effective quelle que soit la méthode d'arrêt du programme.

La fonction FN_ontimer() est importée depuis le module timerlib.bbc. 

EXEMPLE.

REM --- Module de la bibliothèque BBC BASIC ---

INSTALL @lib$ + "timerlib.bbc"

kminuteur = FN_ontimer( 20 , PROC_Minuteur , 0 )

REPEAT : PRINT "." ; : UNTIL FALSE

END

DEF PROC_Minuteur 

PRIVATE kcompteur

kcompteur = kcompteur + 1

PRINT "Passage numero : " ; kcompteur

IF kcompteur > 15 THEN 

PRINT "C'etait le dernier appel ... "

PRINT "Arret du minuteur ... "

PROC_killtimer( kminuteur )

PRINT "Minuteur stoppe ... "

PRINT "Fin du test. "

END

ENDIF

ENDPROC