CAB Apollo Anleitung Seite 162

Anhang B - Programmierbeispiele
IF A$ = ESC$ THEN PRINT #1, ESC$; 'Falls ESC entdeckt,
PRINT #1, A$;
WEND
PRINT #1, ESC$; DOT$
PRINT #1, "M s FNT;ARIAL"
CLOSE
END
162
' Zeichen verdoppeln.
'Übertrage Daten in A$ zum Drucker.
'Stopp wenn Dateiende.
'ESC Punkt, kennzeichnet Ende der
' Download-Information.
'Speichere Download-Font als ARIAL
' auf der Speicherkarte.
cab Produkttechnik GmbH