Scrivere nella console (standard output) di Gambas

Da Gambas-it.org - Wikipedia.

Per scrivere nello standard output di un programma Gambas, ossia in pratica all'interno della console del'IDE di Gambas oppure nel Terminale nel quale sia stato lanciato il nostro programma Gambas a linea di comando, si potranno adottare (come il classico Print) le seguenti modalità che mostreremo nel seguente esempio:

Private fl As File
Private fd As File
Private pts As File


Public Sub Main()

' Viene utilizzata l'istruzione "Open...For Write" in funzione della terza modalità presente nella subroutine "Scrive()".

' Apre il file-device dello "standard output" in scrittura:
  fl = Open "/dev/stdout" For Write

' Apre il file-device "/dev/tty" in scrittura:
  fl = Open "/dev/tty" For Write
 
' Apre il file-descriptor dello standard out in scrittura:
  fd = Open "/proc/self/fd/1" For Write
 
' Apre il file-speciale "pts" (che andrà di volta in volta individuato) della console:
  pts = Open "/dev/pts/?" For Write

  
  Scrive()

End


Private Procedure Scrive()    ' Va a scrivere in console, o nel Terminale in cui il programma è stato lanciato, con 4 modalità


' 1 - Mediante il classico e consueto "Print":
  Print "Scrive con il 'Print'\n"
 

' 2 - Mediante il metodo "File.Save" si diversi file particolari:
  File.Save("/dev/stdout", "Scrive con 'File.Save' sul file-device '/dev/stdout' \n")
  File.Save("/dev/tty", "Scrive con 'File.Save' sul file-device '/dev/tty' \n")
  File.Save("/proc/self/fd/1", "Scrive con 'File.Save' sul file-descriptor dello standard-out\n")
  File.Save("/dev/pts/?", "Scrive con 'File.Save' sul file-speciale "pts" (da individuare di volta in volta) della console\n\n")

 
' 3 - Mediante "Open...For Write" su diversi file particolari:
  Write #fl, "Scrive con 'Open... For Write' sul file-device '/dev/stdout'\n"
  Write #fl, "Scrive con 'Open... For Write' sul file-device '/dev/tty'\n"
  Write #fd, "Scrive con 'Open... For Write' sul file-descriptor dello standard-out\n"
  Write #pts, "Scrive con 'Open... For Write' sul file-speciale "pts" (da individuare di volta in volta) della console\n\n"


' 4 - Mediante la funzione "Write" ed il metodo ".Out" della Classe "File":
  Write #File.Out, "Scrive con la funzione 'Write' ed il metodo 'File.Out'\n"

End