/*-------------------- Deklarationen -------------------------*/
#define SKALAR 12                   // Konstantendefinition
NUMBER  nZahl;                      // Variablendeklaration
STRING  szText;
prototype ZeigeZahl( NUMBER);       // Funktionsdeklaration

/*-------------------- Programmblock -------------------------*/
program                             // Beginn des Programmblocks
   nZahl=SKALAR;                    // Wertzuweisung
   szText="Hallo Welt!";
   ZeigeZahl( nZahl);               // Funktionsaufruf
endprogram                          // Ende des Programmblocks

/*------------------- Funktionsblock -------------------------*/
function ZeigeZahl( nZahl1)         // Definition einer Funktion
   NUMBER nZahl2;                   // Vereinbarung einer lokalen Var.
begin                               // Beginn der Funktionsdefinition
   nZahl2=nZahl1+2;
   MessageBox( szText,INFORMATION); // Ausgabe einer Mesagebox
   SprintfBox(INFORMATION,"Rechenking", "%d+2=%d",nZahl1, nZahl2);
   /* eine Messagebox a la printf() */

end;                                // Ende der Funktionsdefinition
