home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fresh Fish 7
/
FreshFishVol7.bin
/
new
/
gfx
/
show
/
bview
/
picsrc
/
picture.c
< prev
next >
Wrap
C/C++ Source or Header
|
1994-01-30
|
3KB
|
102 lines
/*
* Changed by Joeri Alberty to work with output of Bview 1.05 or higher
* as example.
* Created: 03/09/93 Update: 30/01/94 Compiler: SASC 6.50
*/
// Shows how to include C Source from IFF ILBM's in your own source.
// The color table used in Brush.h is 4 bits/gun. These are TRIPLETS.
// For ECS Amiga's 4 bits/gun use LoadRGB4() for colortable
// Use function LoadRGB4() (see code below)
// 'Save picture...' (BUTTON gadget)
// Format: 'SASC source'(CYCLE gadget).
// Colors: 'LoadRGB4()' (CYCLE gadget).
// For AGA 32 bits/gun use LoadRGB32() or SetRGB32() for colortable.
// 'Save picture...'
// Format: 'SASC source'.
// Colors: 'LoadRGB32()' or 'SetRGB32()'.
// Bview will make than a table for this function.
/*
This example is provided in electronic form by Commodore-Amiga, Inc. for
use with the "Amiga ROM Kernel Reference Manual: Libraries", 3rd Edition,
published by Addison-Wesley (ISBN 0-201-56774-1).
*/
#define INTUI_V36_NAMES_ONLY
#include <exec/types.h>
#include <intuition/intuition.h>
#include <graphics/displayinfo.h>
#include <graphics/gfxbase.h>
#include <stdio.h>
#include <clib/exec_protos.h>
#include <clib/alib_protos.h>
#include <clib/dos_protos.h>
#include <clib/intuition_protos.h>
#include <clib/graphics_protos.h>
#include <pragmas/graphics_pragmas.h>
#include <pragmas/intuition_pragmas.h>
/* My .h file made by Bview */
#include "Brush.h"
#ifdef LATTICE
int CXBRK(void) { return(0); } /* Disable Lattice CTRL/C handling */
int chkabort(void) { return(0); } /* really */
#endif
struct IntuitionBase *IntuitionBase = NULL;
struct GfxBase *GfxBase = NULL;
//UWORD pens[] = { ~0 };
VOID main(int argc, char *argv[])
{
struct Screen *scr;
struct Window *win;
// Note: OpenLibrary not needed any more in SASC6.5 (done here for compatib.)
// Use ...
// extern struct IntuitionBase *IntuitionBase;
// extern struct GfxBase *GfxBase;
// and no OpenLibrary() or CloseLibrary()
if(IntuitionBase = (struct IntuitionBase *)OpenLibrary("intuition.library",37))
{
if(GfxBase = (struct GfxBase *)OpenLibrary("graphics.library",37))
{
if (NULL != (scr = OpenScreenTags(NULL,
SA_DisplayID, ModeID,
SA_Depth, 2,
TAG_END)))
{
// This depends on what colortable Bview generated (See above)
LoadRGB4(&scr->ViewPort,colortable,COLORS);
if (NULL != (win = OpenWindowTags(NULL,
WA_RMBTrap, TRUE,
WA_CustomScreen, scr,
TAG_END)))
{
// See .h file for stucture Im_xxx
DrawImage(win->RPort,&Im_Brush,20,20);
Delay(500);
CloseWindow(win);
}
CloseScreen(scr);
}
CloseLibrary((struct Library *)GfxBase);
}
CloseLibrary((struct Library *)IntuitionBase);
}
}