← Back to contents
C source, ASCII text
— 952 bytes
— 1991-02-24
— PP20 compressed
extern struct Menu menu[];
extern struct Window *wind;
extern struct IntuitionBase *IntuitionBase;
extern struct GfxBase *GfxBase;
extern struct Screen *scr;
extern struct playerinfo plr1,plr2,plr3,*plr[];
extern struct card fdp[53],fup[53],nulcard;
extern struct set *fupset[6];
extern USHORT volatile quit,exgm,mandeal,cont,numhand,contplay,
initpack[],shufpack[];
extern struct MsgPort *mp;
extern struct Task *tc;
extern struct TextAttr defaultfont;
extern struct NewScreen scrspec;
extern struct NewWindow winspec;
extern struct Image *packim[][53],plrids[],cardrem,setrem,handrem,packrem;
extern struct IntuiText inittxt[],gt,mmtxt[],rwtxt[],gwtxt[];
extern struct Gadget *gaddr,stdgad[],hgads[],setgads[],cardgads[],mmgads[],
mdgads[];
extern USHORT fuptc,fdptc,ncs,cdsc[];
extern ULONG setpos[];
extern char out[];
extern struct Requester aboutr,mmreq,mdreq,rwreq,gwreq;
extern USHORT chip ptr1[],plr1ptr[],plr2ptr[],plr3ptr[];
extern struct custptr ptrs[];
extern struct suitset ss[];
extern struct numset ns[];
extern struct condset cs[],selcs[],testcs[];
extern char intbuf[8][4];
VOID closeall(VOID), openall(VOID), instexcp(VOID), remexcp(VOID),
playgame(USHORT),
initdisp(VOID),
initialisepack(VOID),
shuffle(VOID),
manturn(struct playerinfo *,struct playerinfo *,struct playerinfo *,USHORT),
autoturn(struct playerinfo *,struct playerinfo *,struct playerinfo *),
displaywin(struct playerinfo *,USHORT,USHORT,USHORT),
displayresult(USHORT),
reorder(struct playerinfo *),
prgenmsg(ULONG,USHORT,APTR,struct playerinfo *),
modmem(struct playerinfo *),
about(VOID),
initplrs(VOID),
disphand(struct playerinfo *),
compacthand(struct card *, USHORT *),
handgads(USHORT,USHORT),
hidecards(struct playerinfo *),
initcardgads(VOID),
maintainmem(struct playerinfo *,struct playerinfo *,struct playerinfo *,struct card, USHORT),
ssortn(struct card *,USHORT *),
sortdispset(VOID),
hsort(struct card *,USHORT),
buildsets(struct playerinfo *),
score(struct condset *,struct playerinfo *),
checksets(struct condset *,struct playerinfo *),
autosubset(struct condset *,struct playerinfo *),
autoaddset(struct condset *,struct playerinfo *),
corrupt(struct playerinfo *);
struct card rvspk(VOID);
ULONG __asm excp(register __d0 ULONG ,register __a1 ULONG );
USHORT submitset(struct playerinfo *),
addtofus(struct playerinfo *,ULONG),
mutexcl(struct playerinfo *),
manualdeal(USHORT);