Graphical Data Display Manager

Dies ist eine alte Version dieser Seite, zuletzt bearbeitet am 27. Juli 2007 um 10:28 Uhr durch JonnyBrazil (Diskussion | Beiträge) (AZ: Die Seite wurde neu angelegt.). Sie kann sich erheblich von der aktuellen Version unterscheiden.
(Unterschied) ← Nächstältere Version | Aktuelle Version (Unterschied) | Nächstjüngere Version → (Unterschied)

GDDM (Graphical Data Display Manager) ist ein computer grafiksystem für das System IBM /370, entwickelt von IBM 1979. GDDM wurde ursprünglich für den IBM 3279 Farbbildschirm und den Farbdrucker 3287 entwickelt. Der Farbbildschirm 3279 war der erste Farbbildschirm der in Büros verwendet wurde.

GDDM wurde in den frühen 1980er Jahren erweitert um auf allen IBM Bildschirmen und Druckern eingesetzt werden zu können.

Ab 1991 wurde GDDM auch für AS400 verwendbar.

Programmbeispiel Pascal

PROGRAM LINECHRT;
TYPE
   %INCLUDE QATTPAS(ADMUSTNO);    /* IBM-supplied TYPE declarations */
VAR
  A, B : INTEGER;                                 /* work variables */
  AX, AY : REALARR_20;                     /* parameters for CHPLOT */
  ATTVAL, ATTYPE, COUNT : INTEGER;         /* parameters for ASREAD */
%INCLUDE QATTPAS(ADMUSLNO);       /* IBM-supplied PROC declarations */
BEGIN
/********************************************************************/
/* INITIALIZE                                                       */
/********************************************************************/
AX(.1.) := 1.0; AY(.1.) := 5.0; AY(.6.) := 8.0;      /* Init arrays */
AX(.2.) := 2.0; AY(.2.) := 3.0; AY(.7.) := 13.0;
AX(.3.) := 3.0; AY(.3.) := 5.0; AY(.8.) := 6.0;
AX(.4.) := 4.0; AY(.4.) := 5.0; AY(.9.) := 1.0;
AX(.5.) := 5.0; AY(.5.) := 11.0; AY(.10.) := 7.0;
FSINIT;                          /* Initialize graphics environment */
/********************************************************************/
/* DRAW THE CHART                                                   */
/********************************************************************/
A := 2;
B := 5;
CHPLOT(A,B,AX,AY);                                /* Draw the chart */
/********************************************************************/
/* DISPLAY THE CHART                                                */
/********************************************************************/
ASREAD(ATTVAL,ATTYPE,COUNT);                   /* Display the chart */
/********************************************************************/ 
/* END GRAPHICS                                                     */
/********************************************************************/
FSTERM                                  /* End graphics environment */
END.                                    /* End Pascal program */

Literatur

  • Charles Petzold, Programming the OS/2 Presentation Manager, Microsoft Press, 1989. ISBN 1-55615-170-5.