Il Linguaggio Fortran 90/95

206 Operazioni di I/O interattive
Si noti, infine, che se devono essere prodotte in uscita n ≥2 costanti identiche il processore può
scegliere di stamparle nella forma:
n*valore
dove valore è il valore delle costanti identiche.
4.8 Caratteri di controllo per la stampante
Fino ad ora si è appreso come controllare il layout di dati da o verso i dispositivi standard di
I/O. Quando, tuttavia, durante operazioni di output i dati vengono inviati ad un dispositivo
che il sistema identifica come stampante, è possibile esercitare un ulteriore (limitato) controllo
della spaziatura verticale del foglio stampato.
Quando un record viene inviato ad un dispositivo di uscita designato come stampante, il
primo carattere del record viene rimosso dalla linea ed interpretato come carattere di controllo
che determina di quanto il foglio deve ”salire” prima che i restanti caratteri del record vengano
stampati. Al riguardo, esistono quattro caratteri che hanno un particolare significato. Se il
primo carattere del record di uscita non è uno di essi, l’effetto sulla stampante risulta indefinito
anche se, in pratica, qualsiasi carattere viene interpretato come uno spazio e, pertanto, produce
l’avanzamento di un rigo. Tali caratteri sono elencati di seguito:
Carattere di controllo Avanzamento verticale
b (spazio) una linea
0 (zero) due linee
1 (uno) una pagina
+ (più) nessun avanzamento
Dal momento che il primo carattere è rimosso e, pertanto, non riprodotto è importante
inserire un carattere extra (”di controllo”) all’inizio di ogni record da stampare.
Esistono molti modi per inserire un carattere di controllo in testa ad un record, soprattutto
se tale carattere è uno spazio bianco. E’ preferibile, tuttavia, per motivi di leggibilità, inserire
esplicitamente il suddetto carattere di controllo, come mostrano i seguenti esempi:
100 FORMAT(1X,...) 200 FORMAT(’ ’,...) 300 FORMAT(T2,...)
E’ importante sottolineare che quanto detto si applica esclusivamente alla unità stampante e
a tutte quelle unità che il compilatore identifica come stampanti, inclusa, in alcuni casi, l’unità
video. Tutte le altre unità di uscita non richiedono alcun carattere di controllo e stamperanno,
pertanto, il record completo del suo carattere di testa. Si noti, infine, che nel caso l’unità stampante
sia l’unità standard di uscita, l’istruzione PRINT inserisce automaticamente il carattere
di controllo blank all’inizio di ogni record.
Si consideri, ancora, il seguente esempio:
WRITE(*,100) 100 FORMAT(’1’,"Questo e’ il titolo e viene stampato a
inizio pagina") WRITE(*,200) 200 FORMAT(’0’,"Ora si e’ raddoppiata