app/mpg/2.2/src/Muster

Raw file
Back to index

INCLUDE "Name der Include-Datei"; 
 
PLOTTER "Plottername",<Station>,<Kanal>,<Xpixel>,<Ypixel>,<Xcm>,<Ycm>; 
 
LINK <Station>/<Kanal>,<Station>/<Kanal>....; 
 
COLORS "<RGB-Kombinationen als 3-Byte Codefolge>";
 
  . 
  . 
  . 
<Hier koennen Endgeraetspezifische Prozeduren/Variablen (globalebene) 
 eingefuegt werden. Achtung! um Namenskonflikte mit globalobjekten 
 anderer Endgeraete zu vermeiden sollten die Namen dieser Objekte 
 auch stets den Endgeraet-Namen enthalten 
 (z.B. 'TEXT PROC videostar koordinaten (INT CONST x,y)') 
> 
 
PROC initplot: 
   Warnung: Da der Configurator den Prozedur-Rumpf in ein Refinement
            verwandelt, muessen Namenskonflikte vermieden wrden !
END PROC initplot;
 
PROC endplot: 
END PROC endplot; 

PROC prepare: 
END PROC prepare; 
 
PROC clear: 
END PROC clear; 
 
PROC home: 
END PROC home;

PROC moveto (INT CONST x,y): 
END PROC moveto;
 
PROC drawto (INT CONST x,y): 
END PROC drawto;

PROC setpixel (INT CONST x,y): 
END PROC setpixel;

PROC foreground (INT CONST type): 
END PROC foreground;

PROC background (INT CONST type):
END PROC background; 
        
PROC setpalette: 
END PROC setpalette:

PROC circle (INT CONST x,y,rad,from,to): 
END PROC circle; 
 
PROC box (INT CONST x1,y1,x2,y2,pattern): 
END PROC box; 
 
PROC fill (INT CONST x,y,pattern): 
END PROC fill;
 
EDITOR; (* Durch EDITOR wird das optionale Vorhandensein nachfolgender 
           Editor-Befehle angezeigt *) 
 
PROC get cursor (INT VAR x,y,TEXT VAR exit char): 
END PROC get cursor; 
 
PROC graphik cursor (INT CONST x,y,BOOL CONST on): 
END PROC graphik cursor; 
 
PROC set marker (INT CONST x,y,type): 
END PROC set marker;