#include <xpk/xpk.h>
#include <pragma/dos_lib.h>

/* Includesheader

	Name:		PrintFlags.c
	Versionstring:	$VER: PrintFlags.c 1.0 (06.12.96)
	Author:		SDI
	Distribution:	PD
	Description:	prints flags

 1.1   06.12.96 : build with GetXpkSubLibData.c code
*/

ULONG PrintFlag(ULONG *data, ULONG flag, STRPTR str)
{
  if(*data & flag)
  {
    PutStr(str);
    *data ^= flag;
    if(*data)
    {
      PutStr("|");
      return 2;
    }
    return 1;
  }
  return 0;
}

ULONG PrintEndFlag(ULONG data, ULONG origdata)
{
  if(data)
  {
    VPrintf("%ld\n",&data);
    return 1;
  }
  else if(!origdata)
    PutStr("0");
  PutStr("\n");
  return 0;
}