home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
alib
/
d5xx
/
d566
/
apfelkiste.lha
/
Apfelkiste
/
Apfelkiste1.3
/
Source
/
Apfelkiste1.3src.lzh
/
Misc.c
< prev
next >
Wrap
C/C++ Source or Header
|
1991-06-13
|
2KB
|
64 lines
/************************************************************************/
/* misc.c --- Contains some intuition related functions that had to */
/* be compiled separately due to faster debugging. */
/************************************************************************/
#include <exec/types.h>
#include <exec/alerts.h>
#include <intuition/intuitionbase.h>
#include <intuition/intuition.h>
#include <proto/intuition.h>
#include <string.h>
extern struct IntuitionBase *IntuitionBase;
/* -------------------------------------------------------------------- */
/* Make an Gadget "active", selected by window - ptr and Gadget ID. */
/* Used to make the cursor appear in the next String Gadget for */
/* convenience of the user. */
/* -------------------------------------------------------------------- */
void __regargs Activate_Gadget(struct Window *w, USHORT ID)
{
struct Gadget *g;
g = w->FirstGadget;
while ( g && g->GadgetID != ID ) { g = g->NextGadget; }
if ( g ) { ActivateGadget(g, w, NULL); }
}
/* -------------------------------------------------------------------- */
/* Show a warning message by using a recoverable alert. Text is */
/* selected by an offset to message array below. */
/* -------------------------------------------------------------------- */
char *Apfel_Text[] = {
" Everything OK\0",
" Can't open intuition.library -- aborting\0",
" Can't open graphics.library -- aborting\0",
" Can't open iff.library V18.5+ -- aborting\0",
" Can't open arp.library V39.1+ -- aborting\0",
" Can't open color.library V1.0+ -- aborting\0",
" No memory for filerequester -- aborting\0",
" Can't open printer port -- aborting\0",
" Can't open IORequest for printer -- aborting\0",
" Can't open window -- trying to recover\0",
" Can't open screen -- trying to recover\0",
" Can't find configuration file --- using build in defaults\0",
" IFF file not found -- Load aborted\0",
" Not an IFF/ILBM file -- Load aborted\0",
" Scrambled IFF file -- Load aborted\0"
};
void __regargs Apfel_Alert(long num)
{
short x;
x = ( IntuitionBase->ActiveScreen->Width - strlen(Apfel_Text[num]+3) * 8) / 2;
Apfel_Text[num][0] = x >> 8;
Apfel_Text[num][1] = x & 0xFF;
Apfel_Text[num][2] = 14;
DisplayAlert(RECOVERY_ALERT, Apfel_Text[num], 23);
}