/********************************************************************/ /**** ****/ /**** ****/ /**** Program : About.c ****/ /**** ****/ /**** Version : 01.00 ****/ /**** ****/ /**** Erstversion : 01.07.1990 ****/ /**** ****/ /**** Letzte Änderung : 08.08.1990 ****/ /**** ****/ /**** Compiliert mit : siehe MAKEFILE ****/ /**** ****/ /**** Gelinkt mit : siehe MAKEFILE ****/ /**** ****/ /********************************************************************/ /**** ****/ /**** ****/ /**** Copyright by Rüdiger Dreier ****/ /**** ****/ /**** ****/ /********************************************************************/ /* Einbinden der Include-Files */ #include #include #include #include #include struct NewWindow Fenster3= { 159,70, /* Left/TopEdge */ 288,120, /* Width/Height */ 3, 2, /* Detail/BlockPen */ MOUSEBUTTONS, /* IDCMP-Flags */ ACTIVATE, /* Flags */ NULL, /* Gadget */ NULL, /* Image */ "«««««««««« A B O U T »»»»»»»»»»", /* Titel */ NULL, /* Screen */ NULL, /* BitMap */ 0,0,0,0, /* Limits */ CUSTOMSCREEN /* Type */ }; VOID About(VOID) { struct RastPort *RastPort; struct Window *Window3; long enable; if(!(Window3=OpenWindow(&Fenster3)))return; RastPort=Window3->RPort; enable=AskSoftStyle(RastPort); SetSoftStyle(RastPort,FSF_UNDERLINED|FSF_BOLD,enable); Center(Window3,"Matrix",3,30); SetSoftStyle(RastPort,FS_NORMAL,enable); Center(Window3,"zum Lösen lin. Gleichungen",3,50); Center(Window3,"© by Rüdiger Dreier 1990",2,80); Center(Window3,"Version 1.00, 05.08.1990",2,95); Center(Window3,"Dies ist FreeWare",2,110); Wait(1L<UserPort->mp_SigBit); EventAbfrage(Window3,&msgInfo); CloseWindow(Window3); }