DESCRIPTION.

L'instruction PRINT # écrit les enregistrements dans un fichier ouvert en écriture en ajoutant un Retour Chariot (RC).

SYNTAXE.

PRINT #kfichier& , kdonnee$

PRINT#kfichier& , kdonnee$

REMARQUES.

kfichier& doit être une valeur numérique correspondant au canal de communication avec un ficher ouvert valide.

Pour enregistrer des données dans un fichier existant et ouvert en écriture, on utilise l'instruction PRINT #, à laquelle on associe le numéro du canal adéquat. L'instruction ajoute à la suite de chaque enregistrement un caractère de Retour Chariot (CR ou CHR$(13)) puis attribut au pointeur la valeur de l'octet suivant à la fin du fichier.

Il n'est pas obligatoire que les données se trouvent dans une variable, elles peuvent être exprimées de manière brute. Il est aussi possible d'écrire plusieurs enregistrements avec une seule instruction PRINT #. Les données numériques seront converties dans le format le plus adéquat pour une utilisation avec le BBC BASIC.

Avec l'instruction PRINT # :

- les chaînes de caractères sont écrites telles quelles plus un Retour Chariot (CR) ;

- les valeurs numériques sont écrites sous forme de : 

- 5 octets de données binaires ou ; 

- 8 octets de données binaires en mode *FLOAT6.

ATTENTION à ne pas confondre les instructions PRINT et PRINT #.

RUBRIQUE.

Les fichiers de données pour plus de détails sur la création et l'utilisation des fichiers de données.

EXEMPLE.

REM --- Initialisation ---

kfichier$ = @dir$ + "Tester.txt"

REM --- Création du fichier et enregistrement ---

kfichier& = OPENOUT( kfichier$ )

PRINT #kfichier&, "BBC BASIC"

PRINT #kfichier&, "BBC BASIC" , "pour SDL" , 2.0

PRINT #kfichier&, kfichier$ 

CLOSE #kfichier&

REM --- Lecture du fichier ---

kfichier& = OPENIN( kfichier$ )

WHILE PTR #kfichier& < EXT #kfichier&

INPUT #kfichier&, kdonnee$

PRINT kdonnee$ 

ENDWHILE

CLOSE #kfichier&

REM --- Fin de l'exemple ---

END

retourne :

BBC BASIC 

BBC BASIC

SDL

2.0

/home/user/BBCBasic/examples/Tester.txt