#ifdef __STORM__
#pragma tagcall(GMSBase,0x222,AddScreenTags(a0))
#pragma tagcall(GMSBase,0x11A,LoadPicTags(a1))
#pragma tagcall(GMSBase,0x3B4,InitBobTags(a0,a1))
#pragma amicall(GMSBase,0x3B4,InitBobTaglist(a0,a1))
#pragma tagcall(GMSBase,0x2D6,InitSpriteTags(a0,a1))
#pragma tagcall(GMSBase,0x510,InitSoundTags(a0))
#endif

#ifdef __SASC_60
#pragma tagcall GMSBase AddScreenTags  222 801
#pragma tagcall GMSBase InitBobTags    3B4 9802
#pragma tagcall GMSBase InitSpriteTags 2D6 9802
#pragma tagcall GMSBase LoadPicTags    11A 901
#pragma tagcall GMSBase InitSoundTags  510 801
#endif

#if defined(_DCC) || defined(__SASC)
#pragma libcall GMSBase AddScreenTagList  222 801
#pragma libcall GMSBase InitBobTagList    3B4 9802
#pragma libcall GMSBase InitSpriteTagList 2D6 9802
#pragma libcall GMSBase LoadPicTagList    11A 901
#pragma libcall GMSBase InitSoundTagList  510 801
#endif

#ifdef _DCC

#include <exec/types.h>

#ifndef HYPER
#define HYPER
#endif

typedef struct TagItem TagItem;

struct GameScreen *
HYPER ## AddScreenTags(tag1, ...)
unsigned long tag1;
{ return(AddScreenTagList((TagItem *)&tag1)); }

struct Sound *
HYPER ## InitSoundTags(tag1, ...)
unsigned long tag1;
{ return(InitSoundTagList((TagItem *)&tag1)); }

struct Picture *
HYPER ## LoadPicTags(tag1, ...)
unsigned long tag1;
{ return(LoadPicTagList((TagItem *)&tag1)); }

struct Sprite *
HYPER ## InitSpriteTags(struct GameScreen *gs, tag1, ...)
unsigned long tag1;
{ return(InitSpriteTagList(gs, (TagItem *)&tag1)); }

struct Bob *
HYPER ## InitBobTags(struct GameScreen *gs, tag1, ...)
unsigned long tag1;
{ return(InitBobTagList(gs, (TagItem *)&tag1)); }

#endif