/*
 *  VST_FONT                                    (C) Digital Design 1990
 *
 *  SET TEXT FACE
 *
 *  Mit dieser Funktion wird ein Zeichensatz ausgew�hlt. Der Zeichensatz
 *  1 ist Standard. Alle anderen m�ssen evnt. mit der Funktion
 *  �VST_LOAD_FONTS�..\CONTROL\VST_LOAD.C� nachgeladen werden.
 *  Diese Funktion ist nicht auf jedem Ger�t verf�gbar. Die Funktionen
 *  �V_OPNWK�..\CONTROL\V_OPNWK.C� und �V_OPNVWK�..\CONTROL\V_OPNVWK.C� teilen dies in work_out[10] mit.
 */
#include <gemdefs.h>

int vst_font( int handle, int font )
{
  intin[0] = font; /* Zeichensatz-Nummer                                */

  VDI( 21, 0, 1, handle );

  return intout[0]; /* = set_font: Ausgew�hlter Zeichensatz             */
}