' Horloge minimaliste
' idée : on pourrait ajouter les secondes
'
' (hours) = heure 0-23
' (minutes) = minutes 0-59
' (seconds) = secondes 0-59
' (format zero) = zéro initial (00-59)
' (even) = nombre pair ?
' (create text) = Voxel texte

color 4

' une boucle permanente :
do
	
	' formatage avec un zéro initial pour
	' mettre l'heure sur deux chiffres (01-23)
	?heures = (format zero (hours) to 2)
	?minutes = (format zero (minutes) to 2)
	
	' préparation du texte "HH:MM"
	' avec clignotement du ":"
	if (even (seconds)) = 1
		' les secondes paires
		?heure = ?heures + ":" + ?minutes
	else
		' les secondes impaires
		?heure = ?heures + " " + ?minutes
	end
	
	' on recrée le texte en permanence
	create text ?heure as "horloge"
	zoom "horloge" to 2
	
	' pause d'une seconde avant de recommencer
	wait 1
	
loop