„Graphical Data Display Manager“ – Versionsunterschied
Erscheinungsbild
[gesichtete Version] | [gesichtete Version] |
Inhalt gelöscht Inhalt hinzugefügt
YMS (Diskussion | Beiträge) K Formatkorrekturen, insb. Restrukturierung des Beispielcodes und Übersetzung der Kommentare |
|||
Zeile 40: | Zeile 40: | ||
* [http://www.ibm.com/software/applications/gddm/about/index.html IBMs GDDM-Seite] (englisch) |
* [http://www.ibm.com/software/applications/gddm/about/index.html IBMs GDDM-Seite] (englisch) |
||
* [http://www-03.ibm.com/ibm/history/history/year_1979.html IBM-Ankündigung 3279 und 3287] (englisch) |
* [http://www-03.ibm.com/ibm/history/history/year_1979.html IBM-Ankündigung 3279 und 3287] (englisch) |
||
*[http://www-1.ibm.com/support/docview.wss?rs=0&context=SWG60&dc=DB520&dc=D900&dc=D800&dc=DA900&dc=DA800&q1=GDDM+AND+AS400KBXXYYZZRCH&uid=nas1a4fc1c7b2f6202d88625706000521abb&loc=en_US&cs=UTF-8&lang=all von GDDM unterstützte Terminals] (englisch) |
|||
== Literatur == |
== Literatur == |
Version vom 10. April 2009, 11:42 Uhr
GDDM (Graphical Data Display Manager) ist ein Computergrafiksystem für das System/370, das 1979 von IBM entwickelt wurde. 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 1986 wurde GDDM unter dem Namen IBM System/38 Business Graphics Utility (Program 5714-GP1) auch auf dem System/38 verwendbar.
Programmbeispiel Pascal
PROGRAM LINECHRT;
TYPE
%INCLUDE QATTPAS(ADMUSTNO); /* Typdeklarationen von IBM */
VAR
A, B : INTEGER; /* Arbeitsvariablen */
AX, AY : REALARR_20; /* Parameter for CHPLOT */
ATTVAL, ATTYPE, COUNT : INTEGER; /* Parameter for ASREAD */
%INCLUDE QATTPAS(ADMUSLNO); /* Proc-Deklarationen von IBM */
BEGIN
/* Initialisierung */
AX(.1.) := 1.0; AY(.1.) := 5.0; AY(.6.) := 8.0; /* Arrays init. */
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; /* Grafikumgebung initialisieren */
/* Diagramm zeichnen */
A := 2;
B := 5;
CHPLOT(A,B,AX,AY); /* Diagramm zeichnen */
ASREAD(ATTVAL,ATTYPE,COUNT); /* Diagramm anzeigen */
/* Ende */
FSTERM /* Grafikumgebung schließen */
END. /* Pascal-Programm beenden */
Weblinks
- IBMs GDDM-Seite (englisch)
- IBM-Ankündigung 3279 und 3287 (englisch)
- von GDDM unterstützte Terminals (englisch)
Literatur
- Charles Petzold: Programming the OS/2 Presentation Manager, Microsoft Press, 1989. ISBN 1-55615-170-5.