home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
oct93
/
graphics
/
graphtal.lha
/
Graphtal
/
AMIGA_Window.C
next >
Wrap
C/C++ Source or Header
|
1980-02-02
|
3KB
|
174 lines
/*
* AMIGA_Window.C - AMIGA window driver.
*
* Copyright (C) 1992, Lucas Ammon
* University of Berne, Switzerland
* All rights reserved.
*
* This software may be freely copied, modified, and redistributed
* provided that this copyright notice is preserved on all copies.
*
* You may not distribute this software, in whole or in part, as part of
* any commercial product without the express consent of the authors.
*
* There is no warranty or other guarantee of fitness of this software
* for any purpose. It is provided solely "as is".
*
*/
#include <stdlib.h>
#include "AMIGA_Window.h"
#include "Error.h"
extern "C" printf(...);
//___________________________________________________________ AMIGA_Window
AMIGA_Window::AMIGA_Window() {}
void AMIGA_Window::open(int width, int height, const rcString& windowName)
{
struct NewWindow nw =
{
0,10,
400,400,
3,
1,
VANILLAKEY,
WINDOWDEPTH|WINDOWDRAG|SMART_REFRESH|GIMMEZEROZERO,
NULL,
NULL,
NULL,
NULL,
NULL,
20,
20,
640,
512,
WBENCHSCREEN
};
printf("Window name: %s ...\n",windowName.chars());
BaseWindow::open(width, height, windowName);
WindowName=windowName;
w_xres=width;
w_yres=height;
nw.Title=(unsigned char *)WindowName.chars();
nw.Width=width;
nw.Height=height;
if(!(GfxBase = gfxbase = (struct GfxBase *)OpenLibrary("graphics.library",0))) {
Error(ERR_PANIC,rcString("can't open graphics library"));
}
if(!(IntuitionBase = intuitionbase = (struct IntuitionBase *)OpenLibrary("intuition.library",0))){
CloseLibrary(gfxbase);
Error(ERR_PANIC,rcString("can't open intuition library"));
}
if (!(w = (struct Window *)OpenWindow(&nw) )) {
CloseLibrary(gfxbase);
CloseLibrary(intuitionbase);
Error(ERR_PANIC,rcString("can't open window"));
}
rp = w->RPort;
SetAPen(rp,1);
SetBPen(rp,0);
}
void AMIGA_Window::close()
{
printf("Window close ...\n");
BaseWindow::close();
CloseWindow(w);
CloseLibrary(gfxbase);
CloseLibrary(intuitionbase);
}
void AMIGA_Window::clear()
{
printf("Window clear ...\n");
BaseWindow::clear();
SetRast(rp,0);
}
char AMIGA_Window::waitForKey()
{
ULONG MessageClass;
USHORT code;
LONG warte;
printf("Window wait for key ...\n");
for(;;) {
if (message = (struct IntuiMessage *)GetMsg(w->UserPort)) {
MessageClass = message->Class;
code = message->Code;
ReplyMsg(message);
if (MessageClass == VANILLAKEY) {
return(code);
}
}
}
}
void AMIGA_Window::writeText(const rcString& msg, int x, int y)
{
struct IntuiText txt =
{
1,0,
JAM1,
0,0,
NULL,
NULL,
NULL
};
printf("Window text: %s x: %d y: %d ...\n",msg.chars(),x,y);
txt.IText=(unsigned char *)msg.chars();
PrintIText(rp,&txt,x,w_yres-y);
}
void AMIGA_Window::drawLine(int x1, int y1, int x2, int y2)
{
Move(rp,x1,w_yres-y1);
Draw(rp,x2,w_yres-y2);
}
void AMIGA_Window::flush()
{
printf("Window flush\n");
BaseWindow::flush();
}