#include <dos.h>
static union  REGS  inregs;
static union  REGS  outregs;

...

void setStdio (char kanal)
{
  inregs.h.ah = 0x11;        // SoftINT: A0h, Fkt 11h
  inregs.h.al = kanal;       // im RTOS des IPC@CHIP
  int86(0xA0, &inregs, &outregs);
}

Als Funktion in C-Inlineassembler programmiert, lässt sich setStdio() besser erklären, kann aber nur dann verwendet werden, wenn im Umfang der IDE auch ein Assemblerprogramm enthalten ist.

void setStdio (char kanal)
{
  asm { mov ah, 11h         // SoftINT: A0h, Fkt 11h
        mov al, kanal 
        int 0A0h
      }
}

Mit der Kenntnis, was die Werte für den Parameter kanal bewirken, kann man die Funktion setStdio() anwenden, ohne ihre Programmierung zu verstehen. Die nachfolgende Tabelle erklärt die Wirkung für die möglichen Werte des Übergabeparameters kanal.

kanal

Eingaben von der Tastatur ..

Ausgaben zum Monitor ..

1

.. gelangen zum Betriebssystem

.. kommen nur vom Betriebssystem

2

.. gelangen zum Benutzerprogramm

.. kommen nur vom Benutzerprogramm

3

.. gelangen zum Betriebssystem

.. können sowohl vom Betriebssystem als auch vom Benutzerprogramm stammen. Dieser Zustand entspricht der Voreinstellung

Durch den Aufruf von setStdio(2); am Anfang des Programms pyth.exe werden Eingaben an der Tastatur, auf dieses Programm gerichtet. Seine Ausgaben gelangen wie zuvor zum Terminalbildschirm. Am Ende des Programms wird der Fokus durch setStdio(3); wieder auf das Betriebssystem gerichtet.

// pyth.cpp
// --------------  Version 20.11.2007
//                 Model: small
//                 Fliesskommaemulation ein (beim IPC@CHIP)
//                 Schwarzer, www.GoBlack.de

// Funktion zur Berechnung der Hypotenusenlänge nach dem Satz von
// Pythagoras


// Einbinden von Headerdateien mit Bibliotheksfunktionen
#include <stdio.h>             // für printf()
#include <math.h>              // für sqrt()


// Einbinden einer eigenen Headerdatei, die sich im gleichen
// Verzeichnis wie der Quelltext befindet. Zwischen den
// Gänsefüsschen muss eine Pfadangabe stehen, wenn sich die Datei
// nicht im gleichen Verzeichnis wie der Quelltext befindet.

#include "fstrgin.h"

//                                  fstrgin.h zum Kopieren ansehen
// ===============================================================

// Deklarationen von eigenen Funktionen
double pythagoras(double, double);
void   setStdio  (char kanal);


// Definition der Fkt. pythagoras()
// Berechnet die Länge der Hypotenuse in einem rechtwinkligen
// Dreieck.
// Übergaben: Länge der Katheten a und b
// Rückgabe:  Länge der Hypotenuse

double pythagoras( double a, double b)
{ 
 return(sqrt(a*a + b*b));    // Rückgabe von Wurzel aus a²+b²
}


// Definition der Fkt. setStdio()
// Schaltet beim IPC@CHIP den Fokus auf dieses Programm, bzw. das
// Betriebssystem. Beispiel Inlineassembler
// Übergabe: Kanal 1,2,3
// Rückgabe: keine

void setStdio (char kanal)
{
  asm { mov ah, 11h         // SoftINT: A0h, Fkt 11h
        mov al, kanal       // im RTOS des IPC@CHIP
        int 0A0h
      }
}


// main()
// Testprogramm für die Funktion Pythagoras auf IPC@CHIP Rechnern
// Mit Eingaben über ein Terminalprogramm auf dem PC

void main(void)
{
  double kath1;                 // Deklaration von kath1
  double kath2;                 // Deklaration von kath2
  double hypo;                  // Deklar. Von hypotenuse

  setStdio(2);                  // Fokus auf dieses Programm
 
  char txtbuf[60];              // ein Textbuffer für 60 Bytes

  printf("\r\nKathete1= ");     // Eingabeaufforderung Kathete1
  fstrgin(txtbuf, 10, FLT,"");  // Eingaben in txtbuf[] sammeln 
  kath1= atof(txtbuf);          // ASCII-Code zu Zahl wandeln

  printf("\r\nKathete2= ");     // Eingabeaufforderung Kathete2
  fstrgin(txtbuf, 10, FLT,"");  // Eingaben in txtbuf[] sammeln 
  kath2= atof(txtbuf);          // ASCII-Code zu Zahl wandeln


  hypo = pythagoras (kath1, kath2);   // Aufruf der Funktion

  printf ("\r\nHypotenuse = %f", hypo);

  setStdio(3);                  // Fokus auf das Betriebssystem
}

Die Ausgabeabfolge des obigen Beispiels sieht wie folgt aus:

Kathete1= _          Eingabe max. 10 Zeichen
Kathete2= _          Eingabe max. 10 Zeichen
Hypotenuse =         Ergebnis