btparser/cparser/tests/TGATemplate.bt

159 lines
3.5 KiB
Plaintext

//--------------------------------------
//--- 010 Editor v2.0.2 Binary Template
//
// File: TGATemplate.bt
// Author: Chiuta Adrian Marius
// E-mail: camsoftwarero@yahoo.com
// Revision: 1.0
// Purpose: Shows the fields of a TGA image.
//--------------------------------------
//Definim structurile folosite de TGA
typedef struct{
WORD FirstIndexEntry;
WORD ColorMapLength;
UBYTE ColorMapEntrySize;
}COLORMAPSPECIFICATION;
typedef struct{
WORD XOrigin;
WORD YOrigin;
WORD Width;
WORD Height;
UBYTE PixelDepth;
UBYTE ImageDescriptor;
}IMAGESPECIFICATION <read=ReadImageSpecification>;
typedef struct{
UBYTE IDLength;
UBYTE ColorMapType;
UBYTE ImageType;
COLORMAPSPECIFICATION CMSpecification;
IMAGESPECIFICATION ISpecification;
}TGAFILEHEADER <read=ReadTGAHeader>;
typedef struct{
DWORD B:5;
DWORD G:5;
DWORD R:5;
}RGB555 <read=ReadRGB555>;
typedef struct{
DWORD B:5;
DWORD G:5;
DWORD R:5;
DWORD X:1;
}XRGB1555 <read=ReadXRGB1555>;
typedef struct{
UBYTE B;
UBYTE G;
UBYTE R;
}RGB888 <read=ReadRGB888>;
typedef struct{
UBYTE B;
UBYTE G;
UBYTE R;
UBYTE A;
}ARGB8888 <read=ReadARGB8888>;
string ReadTGAHeader(TGAFILEHEADER &a)
{
switch( a.ImageType )
{
case 0:
return "No Image Data Included";
case 1:
return "Uncompressed, Color-mapped Image";
case 2:
return "Uncompressed, True-color Image";
case 3:
return "Uncompressed, Black-and-white Image";
case 9:
return "Run-length encoded, Color-mapped Image";
case 10:
return "Run-length encoded, True-color Image";
case 11:
return "Run-length encoded, Black-and-white Image";
}
}
string ReadImageSpecification(IMAGESPECIFICATION &a)
{
string s;
SPrintf( s, "Res: %dx%d^%d", a.Width, a.Height, a.PixelDepth );
return s;
}
string ReadRGB555( RGB555 &a )
{
string s;
SPrintf( s, "B=%03d G=%03d R=%03d", a.B, a.G, a.R );
return s;
}
string ReadXRGB1555( XRGB1555 &a )
{
string s;
SPrintf( s, "X=%1d B=%03d G=%03d R=%03d",a.X, a.B, a.G, a.R );
return s;
}
string ReadRGB888( RGB888 &a )
{
string s;
SPrintf( s, "B=%03d G=%03d R=%03d", a.B, a.G, a.R );
return s;
}
string ReadARGB8888( ARGB8888 &a )
{
string s;
SPrintf( s, "A=%03d B=%03d G=%03d R=%03d",a.A, a.B, a.G, a.R );
return s;
}
LittleEndian();
SetBackColor( cLtGray );
//Definim headerului fisierului TGA
TGAFILEHEADER TGAfh;
if( TGAfh.IDLength!=0 )//Definim ID-ul imaginii TGA
UBYTE ImageID[ TGAfh.IDLength ];
SetBackColor( cSilver );
//Definim culorile indexate asociate TGA-ului
if( TGAfh.ColorMapType!=0 )
switch( TGAfh.CMSpecification.ColorMapEntrySize)
{
case 15:
RGB555 ColorMap[ TGAfh.CMSpecification.ColorMapLength ];
break;
case 16:
XRGB1555 ColorMap[ TGAfh.CMSpecification.ColorMapLength ];
break;
case 24:
RGB888 ColorMap[ TGAfh.CMSpecification.ColorMapLength ];
break;
case 32:
ARGB8888 ColorMap[ TGAfh.CMSpecification.ColorMapLength ];
break;
}
SetBackColor( cLtAqua );
struct TGALine {
switch( TGAfh.ISpecification.PixelDepth )
{
case 8:
UBYTE ColorIndex[TGAfh.ISpecification.Height];
break;
case 16:
XRGB1555 Pixel[TGAfh.ISpecification.Height];
break;
case 24:
RGB888 Pixel[TGAfh.ISpecification.Height];
break;
case 32:
ARGB8888 Pixel[TGAfh.ISpecification.Height];
break;
}
}TGALines [ TGAfh.ISpecification.Width ] <optimize=true>;