commit 47aee91ef478ff11ae388f0b958be23a98bc6d31
Author: Daveo <daveo@localhost>
Date:   Tue Aug 29 16:26:01 2000 +0000

diff --git a/Utils/MkData/MkData.cpp b/Utils/MkData/MkData.cpp
new file mode 100644
index 000000000..f88d26d19
--- /dev/null
+++ b/Utils/MkData/MkData.cpp
@@ -0,0 +1,591 @@
+/************************/
+/*** DataFile Creator ***/
+/************************/
+
+#include <windows.h>
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <stdio.h>
+#include <time.h>
+#include <math.h>
+#include <io.h>
+#include <fstream.h>
+#include <conio.h>
+#include <vector>
+#include "Mkdata.h"
+
+using namespace std;
+
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+int		DebugFlag=0;
+int		AlignSize=2048;
+char	*AlignBuffer;
+
+//***********************************************************************
+CBank					Banks;
+CFileList				Files;
+char					*BaseDir=0;
+
+//***********************************************************************
+
+static void app_debug_msg(const char * pszFmt,va_list args)
+{
+	char szBuf[256];
+	vsprintf(szBuf,pszFmt,args);
+
+	printf("%s\n",szBuf);
+}
+
+
+//******************************************************************
+//******************************************************************
+
+void __cdecl DEBUG(const char * pszFmt,...)
+{
+	if (DebugFlag)
+	if (pszFmt)
+	{
+		va_list args;
+		va_start(args,pszFmt);
+		app_debug_msg(pszFmt,args);
+		va_end(args);
+	}
+}
+
+void __cdecl FATAL(const char * pszFmt,...)
+{
+	if (pszFmt)
+	{
+		va_list args;
+		va_start(args,pszFmt);
+		app_debug_msg(pszFmt,args);
+		va_end(args);
+	}
+	exit(123);
+}
+
+//******************************************************************
+char	*LoadFileInMem(const char * FileName,int *OutSize)
+{
+FILE	*FileHandle;
+char	*Buffer;
+int		Size;
+		
+		FileHandle= fopen( FileName,"rb" );
+		if(!FileHandle)
+			{
+			FATAL("ERROR : Could not open file %s\n",FileName);
+			}	
+		else
+			{
+			fseek(FileHandle,0,SEEK_END);
+			Size=ftell(FileHandle);
+			fseek(FileHandle,0,SEEK_SET);
+
+			if( (Buffer=(char*)malloc(Size))==NULL ) {printf("Out of memory.\n");exit(123);}
+			fread(Buffer, 1,Size,FileHandle);
+			fclose(FileHandle);
+		}
+	if (OutSize) *OutSize=Size;
+	return Buffer;
+}
+
+
+//******************************************************************
+static char s_illegalChars[] = "\\/!£$%^&*()+-=-:. ";
+static int	s_nbChars = sizeof(s_illegalChars);
+
+void	convertIllegalChar( char *c )
+{
+	for (int i=0;i<s_nbChars;i++)
+		{
+		if (*c == s_illegalChars[i]) *c = '_';
+		}
+}
+
+//******************************************************************
+void	ConvertString(char *Str)	
+{
+		strupr(Str);
+		while(*Str) convertIllegalChar(Str++);
+}
+
+//******************************************************************
+void	MakeEqName(char *In,char *Out)
+{
+int		StrLen=strlen(In);
+int		begin0 = 0;
+int		begin1 = 0;
+
+		for (int i=0;i<StrLen;i++)
+			{
+			if (In[i] == '/' || In[i] == '\\')
+				{
+				begin0 = begin1;
+				begin1 = i;
+				}
+			}
+	if (In[begin0]=='/' || In[begin0]=='\\') begin0++;
+	strcpy(Out,In+begin0);
+	ConvertString(Out);
+
+}
+
+//***********************************************************************
+//*** CFileList *********************************************************
+//***********************************************************************
+CFileList::~CFileList()
+{
+int	ListSize=FileList.size();
+	for (int i=0;i<ListSize;i++) if (!FileList[i].BankIdx) free(FileList[i].Data);
+
+}
+//***********************************************************************
+int	CFileList::FindFileIdx(char *Filename)
+{
+int	ListSize=FileList.size();
+	for (int i=0;i<ListSize;i++) if (!strcmp(Filename,FileList[i].Filename)) return(i);
+	return(-1);
+
+}
+//***********************************************************************
+int	CFileList::AddFile(char *BaseFilename,int BankIdx)
+{
+int		Idx;
+sFile	File;
+
+		File.BankIdx=BankIdx;
+		strupr(BaseFilename);
+		sprintf(File.Filename,"%s/%s",BaseDir,BaseFilename);
+		MakeEqName(File.Filename,File.ShortName);
+		Idx=FindFileIdx(File.Filename);
+
+		if (Idx==-1)
+			{
+			Idx=FileList.size();
+			if (!BankIdx)
+				{
+				File.Data=LoadFileInMem(File.Filename,&File.Size);
+				}
+			else
+				{
+				File.BankIdx=BankIdx;
+				}
+			FileList.push_back(File);
+			}
+	return(Idx);
+
+}
+
+//***********************************************************************
+//*** CBank *************************************************************
+//***********************************************************************
+void	CBank::Start(char *Name,int Align)
+{
+sBank	B;
+		if (Align==0) Align=AlignSize;
+		strcpy(B.Name,Name);
+		B.Align=Align;
+		CurrentBank=BankList.size();
+		BankList.push_back(B);
+		if (CurrentBank) Files.AddFile(Name,CurrentBank);
+}
+
+//***********************************************************************
+void	CBank::End()
+{
+		CurrentBank=0;
+}
+
+//***********************************************************************
+int		CBank::FindEntry(int Idx)
+{
+sBank	&ThisBank=GetBank(CurrentBank);
+
+int		ListSize=ThisBank.FileList.size();
+
+	for (int i=0;i<ListSize;i++)
+		{
+		if (ThisBank.FileList[i].ListIdx==Idx) return(i);
+		}
+	return(-1);
+}
+
+//***********************************************************************
+void	CBank::Add(char *Filename)
+{
+sBankEntry	Entry;
+
+		if (Filename[0]==CHAR_SKIP)	{Files.AddFile(Filename+1); return;}
+		Entry.ListIdx=Files.AddFile(Filename);
+		if (FindEntry(Entry.ListIdx)==-1) BankList[CurrentBank].FileList.push_back(Entry);
+}
+
+//******************************************************************
+//*** Script shite *************************************************
+//******************************************************************
+int		IsWhiteSpace(char c)
+{
+		if (c==' ') return(1);
+		if (c==CHAR_TAB) return(1);
+		if (c==0xd) return(1);
+		if (c==0xa) return(1);
+		return(0);
+}
+
+//******************************************************************
+char	*SkipWhiteSpace(char *Ptr)
+{
+		while (IsWhiteSpace(*Ptr)) Ptr++;
+		return(Ptr);
+}
+
+//******************************************************************
+char	*GotoNextLine(char *Ptr)
+{
+		while (*Ptr && *Ptr!=CHAR_EOL ) Ptr++;
+		return(Ptr+2);
+}
+
+//******************************************************************
+void	Line2Str(char *Ptr,char *EndPtr)
+{
+int		i=0;
+		while (!IsWhiteSpace(*Ptr) && Ptr<EndPtr) Ptr++;
+		*Ptr=0;
+}
+
+//******************************************************************
+char	*ScriptComment(char *Ptr,char *EndPtr)
+{
+		return(GotoNextLine(Ptr));
+}
+
+//******************************************************************
+char	*ScriptStartBank(char *Ptr,char *EndPtr)
+{
+int		Align;
+char	*Name;
+
+		Ptr=SkipWhiteSpace(Ptr+1);
+		Line2Str(Ptr,EndPtr);
+		Name=Ptr;
+		Ptr+=strlen(Ptr)+1;
+		Align=atoi(Ptr);
+		DEBUG("[%s] (%i)\n\t{",Name,Align);
+		Banks.Start(Name,Align);
+		return(GotoNextLine(Ptr));
+}
+
+//******************************************************************
+char	*ScriptEndBank(char *Ptr,char *EndPtr)
+{
+		DEBUG("\t}");
+		Banks.End();
+		return(GotoNextLine(Ptr));
+}
+
+//******************************************************************
+char	*ScriptFile(char *Ptr,char *EndPtr)
+{
+		Line2Str(Ptr,EndPtr);
+		Banks.Add(Ptr);
+		if (DebugFlag)
+			{
+			if (Banks.GetCurrentBankNo()) printf("\t");
+			printf("%s\n",Ptr);
+			}
+		return(GotoNextLine(Ptr));
+}
+
+//******************************************************************
+void	ReadScript(char *Filename)
+{
+char	*Script,*Ptr,*EndPtr;
+int		Size;
+		Script = (char *)LoadFileInMem( Filename,&Size);
+		Ptr=Script;
+		EndPtr=Ptr+Size;
+
+		printf("Reading %s\n",Filename);
+		while (Ptr<EndPtr)
+			{
+			Ptr=SkipWhiteSpace(Ptr);
+			if (Ptr>=EndPtr) return;
+			switch (*Ptr)
+				{
+				case CHAR_COMMENT:
+					Ptr=ScriptComment(Ptr,EndPtr);
+					break;
+				case CHAR_STARTBANK:
+					Ptr=ScriptStartBank(Ptr,EndPtr);
+					break;
+				case CHAR_ENDBANK:
+					Ptr=ScriptEndBank(Ptr,EndPtr);
+					break;
+				default:
+					Ptr=ScriptFile(Ptr,EndPtr);
+					break;
+				}
+			}		
+		free(Script);
+}
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+void	ResetFAT(std::vector<sFAT> &FAT)
+{
+int		FATSize=Files.GetCount();
+int		Loop;
+
+		FAT.resize(FATSize);
+		for (Loop=0; Loop<FATSize; Loop++)
+			{
+			sFile	&F=Files.GetFile(Loop);
+			FAT[Loop].FilePos=-1;
+			FAT[Loop].FileSize=F.Size;
+			}
+}
+
+//***********************************************************************
+void	AlignData(FILE *FileHandle,int Align)
+{
+int		Pos=ftell(FileHandle);
+int		AlignPad= (Pos & (Align-1));
+		if (AlignPad) fwrite(AlignBuffer,1,Align-AlignPad,FileHandle);
+}
+
+//***********************************************************************
+int		WriteFAT(FILE *FileHandle,std::vector<sFAT> &FAT,int Align)
+{
+int		Pos=ftell(FileHandle);
+int		FATSize=Files.GetCount();
+
+	for (int Loop=0;Loop<FATSize;Loop++) 
+		{
+		fwrite(&FAT[Loop],1,sizeof(sFAT),FileHandle);
+		}
+	AlignData(FileHandle,Align);
+	
+	return(Pos);
+}
+
+//***********************************************************************
+void	WriteFileData(FILE *FileHandle,sFile &File,int Align,sFAT &ParentFAT)
+{
+		ParentFAT.FilePos=ftell(FileHandle);
+		ParentFAT.FileSize=File.Size;
+
+		fwrite(File.Data,1,File.Size,FileHandle);
+		AlignData(FileHandle,Align);
+}
+
+//***********************************************************************
+void	WriteBankData(FILE *FileHandle,int BankIdx,sFAT &ParentFAT)
+{
+std::vector<sFAT> FAT;
+sBank	&ThisBank=Banks.GetBank(BankIdx);
+int		ThisListSize=ThisBank.FileList.size();
+int		Loop;
+long	StartFilePos,EndFilePos;
+
+// reset FAT and write dummy FAT
+		ResetFAT(FAT);
+		ParentFAT.FilePos=WriteFAT(FileHandle,FAT,ThisBank.Align);
+		StartFilePos=ftell(FileHandle);;
+	
+// Write files
+
+		for (Loop=0; Loop<ThisListSize; Loop++)
+			{
+			int		Idx=ThisBank.FileList[Loop].ListIdx;
+			sFile	&ThisFile=Files.GetFile(Idx);
+			WriteFileData(FileHandle,ThisFile,ThisBank.Align,FAT[Idx]);
+			FAT[Idx].FilePos-=ParentFAT.FilePos;
+			DEBUG("\t %s %i %i",ThisFile.Filename,FAT[Idx].FilePos,FAT[Idx].FileSize);
+			}
+
+		EndFilePos=ftell(FileHandle);
+		fseek(FileHandle,ParentFAT.FilePos,SEEK_SET);
+		WriteFAT(FileHandle,FAT,ThisBank.Align);
+		fseek(FileHandle,EndFilePos,SEEK_SET);
+
+		ParentFAT.FileSize=EndFilePos-StartFilePos;
+//		printf("%i %i\n",BankSize,ParentFAT.FileSize);
+}
+
+//***********************************************************************
+void	WriteData(char *Filename)
+{
+FILE	*FileHandle;	
+std::vector<sFAT> FAT;
+int		FATSize=Files.GetCount(),Idx;
+
+	FileHandle= fopen( Filename,"wb" );
+	if(!FileHandle)	FATAL( "Could not write %s", Filename);
+	ResetFAT(FAT);
+	WriteFAT(FileHandle,FAT,AlignSize);
+	for (Idx=0; Idx<FATSize; Idx++)
+		{
+		sFile	&ThisFile=Files.GetFile(Idx);
+		if (ThisFile.BankIdx)
+			{ // Databank
+			DEBUG("Bank %s",ThisFile.Filename);
+			WriteBankData(FileHandle,ThisFile.BankIdx,FAT[Idx]);
+			FAT[Idx].FileSize+=FATSize*sizeof(FAT);
+//			printf("%i\n",(int)FAT[Idx].FileSize);
+
+			AlignData(FileHandle,AlignSize);
+			}
+		else
+			{ // Normal File
+			WriteFileData(FileHandle,ThisFile,AlignSize,FAT[Idx]);
+			DEBUG("%s %i %i",ThisFile.Filename,FAT[Idx].FilePos,FAT[Idx].FileSize);
+			}
+		}
+
+	fseek(FileHandle,0,SEEK_SET);
+	WriteFAT(FileHandle,FAT,AlignSize);
+	fclose(FileHandle);
+}
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+void	WriteFileHeader(FILE *FileHandle,char *Name)
+{
+static	Count=0;
+
+		if (!Count)
+			fprintf( FileHandle, "%s=%i,\n" ,Name,Count);
+		else
+			fprintf( FileHandle, "%s,\n" ,Name);
+
+		Count++;
+		
+}
+
+//***********************************************************************
+void	WriteBankHeader(FILE *FileHandle,int BankIdx)
+{
+sBank	&ThisBank=Banks.GetBank(BankIdx);
+
+		WriteFileHeader(FileHandle,ThisBank.Name);
+}
+
+//***********************************************************************
+void	WriteHeader(char *Filename)
+{
+FILE	*FileHandle;	
+int		FATSize=Files.GetCount(),Idx;
+
+	
+	FileHandle= fopen( Filename,"wb" );
+	if(!FileHandle)	FATAL( "Could not write %s", Filename);
+	fprintf( FileHandle, "#ifndef __FILE_EQUATES_H__\n");
+	fprintf( FileHandle, "#define __FILE_EQUATES_H__\n\n");
+	fprintf( FileHandle, "enum FileEquate\n" );
+	fprintf( FileHandle, "{\n" );
+
+	for (Idx=0; Idx<FATSize; Idx++)
+		{
+		sFile	&ThisFile=Files.GetFile(Idx);
+		if (ThisFile.BankIdx)
+			{ // Databank
+			WriteBankHeader(FileHandle,ThisFile.BankIdx);
+			}
+		else
+			{ // Normal File
+			WriteFileHeader(FileHandle,ThisFile.ShortName);
+			}
+		}
+
+	fprintf( FileHandle, "\nFileEquate_MAX,\n");
+	fprintf( FileHandle, "};\n" );
+	fprintf( FileHandle, "#endif\n" );
+
+	fclose(FileHandle);
+}
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+int main(int argc, char *argv[])
+{
+char				*DataFilename=0;
+char				*IncludeFilename=0;
+std::vector<char*>	Scripts;
+// Parse Input
+		for (int Loop=1;Loop<argc;Loop++)
+			{
+			char *StrPtr=argv[Loop];
+			if (StrPtr[0]=='-') StrPtr++;
+			switch(StrPtr[0])
+				{
+				case 'o':	// Output
+					if(*StrPtr=':')StrPtr++;			
+					DataFilename=StrPtr+1;
+					break;
+				case 's':	// script
+					if(*StrPtr=':')StrPtr++;			
+					Scripts.push_back(StrPtr+1);
+					break;
+				case 'i':	// include file
+					if(*StrPtr=':')StrPtr++;			
+					IncludeFilename=StrPtr+1;
+					break;
+				case 'd':	// Cache script
+					DebugFlag=1;
+					break;
+				case 'a':	// Align Size
+					if(*StrPtr=':')StrPtr++;			
+					AlignSize=atoi(StrPtr+1);
+					break;
+				case 'b':	// Base Dir
+					if(*StrPtr=':')StrPtr++;			
+					BaseDir=StrPtr+1;
+					break;
+				default:
+					printf("Unknown Param [%s]\n",StrPtr);
+					break;
+				}
+			}
+
+		if (!AlignSize)	FATAL("ERROR: AlignSize is 0");
+
+		if(!DataFilename || !Scripts.size() || !BaseDir)
+		{
+			printf("Error in command line\n");
+			printf("Usage : MkData [files] -o:OutFile\n");
+			printf("        -s\tIn Script\n");
+			printf("        -i\tHeaderFile\n");
+			printf("        -a\tAlignSize (Default 2048)\n");
+			printf("        -d\tDebug Msgs\n");
+			printf("        -b\tBase Dir\n");
+			return(0);
+		}
+
+		if( (AlignBuffer=(char*)malloc(AlignSize))==NULL ) {printf("Couldnt Alloc AlignBuffer.\n");exit(123);}
+		for (int i=0;i<AlignSize;i++) AlignBuffer[i]=0;
+
+		strupr(DataFilename);
+		printf("Creating Data File: %s\n",DataFilename);
+		Banks.Start("",AlignSize);
+		for (int Script=0;Script<Scripts.size();Script++) 
+			{
+			ReadScript(Scripts[Script]);
+			}
+
+		printf("Writing Data File: %s\n",DataFilename);
+		WriteData(DataFilename);
+		if (IncludeFilename) WriteHeader(IncludeFilename);
+		printf("FATSize =%i\n",Files.GetCount()*sizeof(sFAT));
+	
+		return(0);
+}
+
diff --git a/Utils/MkData/MkData.dsp b/Utils/MkData/MkData.dsp
new file mode 100644
index 000000000..3b87d2180
--- /dev/null
+++ b/Utils/MkData/MkData.dsp
@@ -0,0 +1,97 @@
+# Microsoft Developer Studio Project File - Name="MkData" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Console Application" 0x0103
+
+CFG=MkData - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "MkData.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "MkData.mak" CFG="MkData - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "MkData - Win32 Release" (based on "Win32 (x86) Console Application")
+!MESSAGE "MkData - Win32 Debug" (based on "Win32 (x86) Console Application")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""$/PRLSR/utils/MkData", BLVAAAAA"
+# PROP Scc_LocalPath "."
+CPP=cl.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "MkData - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Ignore_Export_Lib 0
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD BASE RSC /l 0x809 /d "NDEBUG"
+# ADD RSC /l 0x809 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386 /out:"../../tools/MkData.exe"
+
+!ELSEIF  "$(CFG)" == "MkData - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD BASE RSC /l 0x809 /d "_DEBUG"
+# ADD RSC /l 0x809 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+
+!ENDIF 
+
+# Begin Target
+
+# Name "MkData - Win32 Release"
+# Name "MkData - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\MkData.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\MkData.h
+# End Source File
+# End Group
+# End Target
+# End Project
diff --git a/Utils/MkData/MkData.h b/Utils/MkData/MkData.h
new file mode 100644
index 000000000..a73812831
--- /dev/null
+++ b/Utils/MkData/MkData.h
@@ -0,0 +1,86 @@
+/************************/
+/*** DataFile Creator ***/
+/************************/
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+#define	CHAR_COMMENT			'#'
+#define	CHAR_TAB				0x09
+#define	CHAR_EOL				0x0d
+#define	CHAR_SKIP				'-'
+#define	CHAR_STARTBANK			'{'
+#define	CHAR_ENDBANK			'}'
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+typedef	signed char		s8;
+typedef	signed short	s16;
+typedef	signed long		s32;
+
+//***********************************************************************
+//***********************************************************************
+//***********************************************************************
+struct	sFAT
+{
+		s32				FilePos;
+		s32				FileSize;
+};
+
+struct	sBankEntry
+{
+		int				ListIdx;
+		int				Pos;
+};
+
+struct	sBank
+{
+	char					Name[256];
+	int						Align;
+	std::vector<sBankEntry>	FileList;
+};
+
+struct	sFile
+{
+	char				Filename[256];
+	char				ShortName[256];
+	int					Size;
+	char				*Data;
+	int					BankIdx;
+};
+
+//***********************************************************************
+class	CFileList
+{
+public:
+	CFileList(){};
+	~CFileList();
+	int			FindFileIdx(char *Filename);
+	int			AddFile(char *Filename,int BankIdx=0);
+	int			GetCount()			{return(FileList.size());}
+	sFile		&GetFile(int Idx)	{return(FileList[Idx]);}
+
+private:
+
+	std::vector<sFile>		FileList;
+};
+
+//***********************************************************************
+class	CBank
+{
+public:
+	void		Start(char *Name,int Align=0);
+	void		End();
+	int			FindEntry(int Idx);
+	void		Add(char *Filename);
+	int			GetCount()			{return(BankList.size());}
+	sBank		&GetBank(int Idx)	{return(BankList[Idx]);}
+	int			GetCurrentBankNo()	{return(CurrentBank);}
+
+private:
+	int						CurrentBank;
+	std::vector<sBank>		BankList;
+};
+
+//***********************************************************************
diff --git a/Utils/MkSpeech/MkSpeech.cpp b/Utils/MkSpeech/MkSpeech.cpp
new file mode 100644
index 000000000..5ae30b845
--- /dev/null
+++ b/Utils/MkSpeech/MkSpeech.cpp
@@ -0,0 +1,413 @@
+/***********************/
+/*** Speech Compiler ***/
+/***********************/
+
+#include <windows.h>
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <stdio.h>
+#include <time.h>
+#include <math.h>
+#include <io.h>
+#include <fstream.h>
+#include <conio.h>
+#include <vector>
+
+using namespace std;
+
+//************************************************
+#define CHUNKSIZE			2336	// XA track size
+
+#define	SPACE				' '
+#define	MINUS				'-'
+#define	COMMENT				'#'
+#define	TAB					0x09
+#define	EOL					0x0d
+#define	InFileEXT			"Ixa"
+#define	OutFileEXT			"XaB"
+#define	BANK_SHIFT			16
+
+//************************************************
+struct	sLang
+{
+		char	*Dir;
+		char	Prefix;
+};
+
+struct	sInFile
+{
+		char	Name[32];
+		int		Chunks;
+		int		Offset;
+};
+
+//************************************************
+char	*Script;
+char	*OutDir="",*ScriptFile=0;
+int		IncFileSet=0;
+char	IncludeFilename[256];
+int		BankNo=0;
+
+char	drive[_MAX_DRIVE];
+char	dir[_MAX_DIR];
+char	fname[_MAX_FNAME];
+char	ext[_MAX_EXT];
+
+
+std::vector<sLang>		LangList;
+std::vector<sInFile>	FileList;
+
+//***********************************************************************
+//***********************************************************************
+
+static void app_debug_msg(const char * pszFmt,va_list args)
+{
+	char szBuf[256];
+	vsprintf(szBuf,pszFmt,args);
+
+	printf("%s\n",szBuf);
+}
+
+
+//******************************************************************
+//******************************************************************
+
+void __cdecl DEBUG(const char * pszFmt,...)
+{
+	if (pszFmt)
+	{
+		va_list args;
+		va_start(args,pszFmt);
+		app_debug_msg(pszFmt,args);
+		va_end(args);
+	}
+}
+
+void __cdecl FATAL(const char * pszFmt,...)
+{
+	if (pszFmt)
+	{
+		va_list args;
+		va_start(args,pszFmt);
+		app_debug_msg(pszFmt,args);
+		va_end(args);
+	}
+	exit(123);
+}
+
+//******************************************************************
+
+
+
+char	*LoadFileInMem(const char * pszName)
+{
+HANDLE	FileHandle;
+DWORD	SizeRead;
+char	*Buffer;
+char	TName[256];
+int		Size;
+
+	sprintf(TName,pszName);
+
+    if( (FileHandle = CreateFile(TName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_READONLY, NULL)) == INVALID_HANDLE_VALUE )
+		{
+		FATAL("ERROR : Could not open file %s.",TName);
+		return NULL;
+		}
+	else
+		{
+		Size = GetFileSize(FileHandle,NULL);
+
+		if( (Buffer=(char*)malloc(Size))==NULL ) {printf("Out of memory.\n");exit(123);}
+		ReadFile(FileHandle,(void*)Buffer,Size,&SizeRead,NULL);
+		CloseHandle(FileHandle);
+		}
+	return Buffer;
+}
+
+
+//******************************************************************
+
+int		FindFileSize(const char * FileName)
+{
+HANDLE	FileHandle;
+DWORD	Size;
+char	TName[256];
+
+	sprintf(TName,FileName);
+
+    if( (FileHandle = CreateFile(TName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_READONLY, NULL)) == INVALID_HANDLE_VALUE )
+		{
+		FATAL("ERROR : Could not open file %s.",TName);
+		return (0);
+		}
+	else
+		{
+		Size = GetFileSize(FileHandle,NULL);
+		CloseHandle(FileHandle);
+		}
+
+	return (Size);
+}
+
+int		FindFileSizeAlign(const char * FileName)
+{
+int		Size=FindFileSize(FileName);
+		Size = ((Size + 3) & 0xfffffffc);
+		return(Size);
+}
+
+
+//******************************************************************
+//	Read pre-defined script file
+//******************************************************************
+int		IsWhiteSpace(char c)
+{
+		if (c==' ') return(1);
+		if (c==TAB) return(1);
+		if (c==0xd) return(1);
+		if (c==0xa) return(1);
+		return(0);
+}
+
+//******************************************************************
+char	*SkipWhiteSpace(char *Ptr)
+{
+		while (IsWhiteSpace(*Ptr)) Ptr++;
+		return(Ptr);
+}
+
+//******************************************************************
+char	*GotoNextLine(char *Ptr)
+{
+		while (*Ptr!=EOL) Ptr++;
+		return(Ptr+2);
+}
+
+//******************************************************************
+void	ReadScript()
+{
+char	*Ptr,*EndPtr;
+int		Size;
+sInFile	InFile;
+
+	Script = (char *)LoadFileInMem( ScriptFile);
+	Size = FindFileSize(ScriptFile);
+	Ptr=Script;
+	EndPtr=Ptr+Size;
+
+	while (Ptr<EndPtr)
+		{
+		Ptr=SkipWhiteSpace(Ptr);
+		if (Ptr>=EndPtr) return;
+		if (*Ptr==COMMENT) 
+			{	// Comment
+			Ptr=GotoNextLine(Ptr);
+			}
+		else
+			{
+			int	i=0;
+			InFile.Chunks=0;
+			while (!IsWhiteSpace(*Ptr) && Ptr<EndPtr) InFile.Name[i++]=*Ptr++;
+			InFile.Name[i]=0;
+			FileList.push_back(InFile);
+//			printf("%s\n",InFile.Name);
+			}
+		}
+
+}
+
+//******************************************************************
+//*** Get File Sizes ***********************************************
+//******************************************************************
+void	GetFileSizes()
+{
+int		FileCount=FileList.size();
+int		LangCount=LangList.size();
+char	FileName[256];
+
+//		DEBUG( "Parsing Files");
+		for (int File=0; File<FileCount; File++)
+			{
+			sInFile	&ThisFile=FileList[File];
+			ThisFile.Chunks=0;
+			for (int Lang=0; Lang<LangCount; Lang++)
+				{
+				sLang	&ThisLang=LangList[Lang];
+				int		ThisFileSize;
+				int		ThisChunkSize;
+				sprintf(FileName,"%s\\%c%s.%s", ThisLang.Dir, ThisLang.Prefix,  ThisFile.Name, InFileEXT);
+				ThisFileSize=FindFileSize(FileName);
+				ThisChunkSize=(ThisFileSize+(CHUNKSIZE-1))/CHUNKSIZE;
+				if (ThisFile.Chunks<ThisChunkSize) ThisFile.Chunks=ThisChunkSize;
+				}
+			}
+}
+
+//******************************************************************
+//*** Write Data ***************************************************
+//******************************************************************
+void WriteData(sLang &ThisLang)
+{
+char	*Buffer;
+char	FileName[256];
+FILE	*OutFile;
+char	Blank[CHUNKSIZE];
+int		FileCount=FileList.size();
+
+		memset( Blank, 0xBA, CHUNKSIZE );	// clear Blank Buffer
+		sprintf(FileName,"%s%c%s.%s",OutDir,ThisLang.Prefix ,fname,OutFileEXT);
+		OutFile= fopen( FileName,"wb" );
+		if(!OutFile)
+			FATAL( "Could not write %s", FileName);
+		else			
+			DEBUG( "Created File - %s", FileName);
+
+		for (int File=0; File<FileCount; File++)
+			{
+			sInFile	&ThisFile=FileList[File];
+			int	ThisFileSize;
+			sprintf(FileName,"%s\\%c%s.%s", ThisLang.Dir, ThisLang.Prefix,  ThisFile.Name, InFileEXT);
+			Buffer=LoadFileInMem(FileName);
+			ThisFileSize=FindFileSize(FileName);
+			fwrite( Buffer, 1, ThisFileSize, OutFile);
+			fwrite( Blank, 1, (ThisFile.Chunks*CHUNKSIZE)-ThisFileSize, OutFile); // Write Pad
+			fwrite( Blank, 1, CHUNKSIZE, OutFile); // Force Pad
+			ThisFile.Offset=ftell(OutFile);
+			free(Buffer);
+		}
+		fclose(OutFile);
+}
+
+
+//******************************************************************
+//*** Write Header File ********************************************
+//******************************************************************
+static char s_illegalChars[] = "\\/!£$%^&*()+-=-:. ";
+static int	s_nbChars = sizeof(s_illegalChars);
+
+void	convertIllegalChar( char *c )
+{
+	for (int i=0;i<s_nbChars;i++)
+		{
+		if (*c == s_illegalChars[i]) *c = '_';
+		}
+}
+
+//******************************************************************
+void	ConvertString(char *Str)	{while(*Str) convertIllegalChar(Str++);}
+
+//******************************************************************
+void WriteHeader(sLang &ThisLang)
+{
+FILE	*OutFile;
+char	HdrStr[256];
+char	EqStr[256];
+int		FileCount=FileList.size();
+int		Offset=0;
+
+		sprintf(HdrStr,"__%s_SPEECH_DEFINES_H__",strupr(fname));
+		sprintf(EqStr,"%s_STR_",strupr(fname));
+
+		OutFile= fopen( IncludeFilename,"wt" );
+		if(!OutFile)
+			FATAL( "Could not write %s", IncludeFilename);
+		else			
+			DEBUG( "Created File - %s", IncludeFilename);
+
+		fprintf( OutFile, "#ifndef %s\n",HdrStr);
+		fprintf( OutFile, "#define %s\n\n",HdrStr);
+		fprintf( OutFile, "enum %sENUMS\n" ,EqStr);
+		fprintf( OutFile, "{\n" );
+
+		for (int File=0; File<FileCount; File++)
+			{
+			sInFile	&ThisFile=FileList[File];
+			
+			ConvertString(ThisFile.Name);
+			fprintf( OutFile, "%s%s = 0x%x,\n", EqStr,ThisFile.Name, Offset+(BankNo<<BANK_SHIFT));
+			Offset+=ThisFile.Chunks+1; // +1 for pad
+			}
+		fprintf( OutFile, "};\n" );
+		fprintf( OutFile, "#endif\n" );
+
+		fclose(OutFile);
+}
+
+//***************************************************
+//***************************************************
+//***************************************************
+
+int main(int argc, char *argv[])
+{
+int	CmdError=0;
+
+// Parse Input
+		for (int Loop=1;Loop<argc;Loop++)
+			{
+			char *StrPtr=argv[Loop];
+			if (StrPtr[0]!='-') CmdError=1;
+			StrPtr++;
+			switch(StrPtr[0])
+				{
+				case 'o':	// Output
+					OutDir=StrPtr+1;
+					break;
+
+				case 'd':	// Add In Dir
+					{
+					sLang	Dir;
+					Dir.Prefix=StrPtr[1];
+					Dir.Dir=StrPtr+2;
+					LangList.push_back(Dir);
+					DEBUG("Added Lang:%s",Dir.Dir);
+					}
+					break;
+
+				case 's':	// script
+					ScriptFile=StrPtr+1;
+					break;
+				case 'i':	// script
+					IncFileSet=1;
+					strcpy(IncludeFilename,StrPtr+1);
+					break;
+				case 'b':	// script
+					BankNo=atoi(StrPtr+1);
+					break;
+
+				default:
+					printf("Unknown Param [%s]\n",StrPtr);
+					break;
+				}
+
+			}
+
+		if(!ScriptFile || !LangList.size())
+		{
+			DEBUG("Error in command line");
+			DEBUG("Usage : MkSpeech");
+			DEBUG("        -d\tAdd Dir (Prefix & Dir= -dPddddd)");
+			DEBUG("        -o\tOut Dir");
+			DEBUG("        -s\tScript");
+			DEBUG("        -I\tHeaderFile");
+			DEBUG("        -B\tBankNo");
+			return(0);
+		}
+
+		_splitpath( ScriptFile, drive, dir, fname, ext );
+
+		if (!IncFileSet) sprintf(IncludeFilename,"%s%s.h",fname,"_Speech",OutFileEXT);
+
+		ReadScript();
+//		DEBUG( "Script Read.");
+		GetFileSizes();
+
+int	LangCount=LangList.size();
+		for (int Lang=0;Lang<LangCount; Lang++)	WriteData(LangList[Lang]);
+		WriteHeader(LangList[0]);
+
+		DEBUG("Success.");
+
+		return(0);
+}
diff --git a/Utils/MkSpeech/MkSpeech.dsp b/Utils/MkSpeech/MkSpeech.dsp
new file mode 100644
index 000000000..fcdaa39ed
--- /dev/null
+++ b/Utils/MkSpeech/MkSpeech.dsp
@@ -0,0 +1,101 @@
+# Microsoft Developer Studio Project File - Name="MkSpeech" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Console Application" 0x0103
+
+CFG=MkSpeech - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "MkSpeech.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "MkSpeech.mak" CFG="MkSpeech - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "MkSpeech - Win32 Release" (based on "Win32 (x86) Console Application")
+!MESSAGE "MkSpeech - Win32 Debug" (based on "Win32 (x86) Console Application")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""
+# PROP Scc_LocalPath ""
+CPP=cl.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "MkSpeech - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Ignore_Export_Lib 0
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD BASE RSC /l 0x809 /d "NDEBUG"
+# ADD RSC /l 0x809 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386 /out:"C:\PRLSR\tools\MkSpeech.exe"
+
+!ELSEIF  "$(CFG)" == "MkSpeech - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD BASE RSC /l 0x809 /d "_DEBUG"
+# ADD RSC /l 0x809 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+
+!ENDIF 
+
+# Begin Target
+
+# Name "MkSpeech - Win32 Release"
+# Name "MkSpeech - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\MkSpeech.cpp
+# End Source File
+# End Group
+# Begin Group "Header Files"
+
+# PROP Default_Filter "h;hpp;hxx;hm;inl"
+# End Group
+# Begin Group "Resource Files"
+
+# PROP Default_Filter "ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe"
+# End Group
+# End Target
+# End Project
diff --git a/Utils/banker/banker.dsp b/Utils/banker/banker.dsp
new file mode 100644
index 000000000..ed0a515f4
--- /dev/null
+++ b/Utils/banker/banker.dsp
@@ -0,0 +1,94 @@
+# Microsoft Developer Studio Project File - Name="banker" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Console Application" 0x0103
+
+CFG=banker - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "banker.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "banker.mak" CFG="banker - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "banker - Win32 Release" (based on "Win32 (x86) Console Application")
+!MESSAGE "banker - Win32 Debug" (based on "Win32 (x86) Console Application")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""$/PRLSR/utils/banker", KJRAAAAA"
+# PROP Scc_LocalPath "."
+CPP=cl.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "banker - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Ignore_Export_Lib 0
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD BASE RSC /l 0x809 /d "NDEBUG"
+# ADD RSC /l 0x809 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386 /out:"..\..\tools\banker.exe"
+
+!ELSEIF  "$(CFG)" == "banker - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Ignore_Export_Lib 0
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD BASE RSC /l 0x809 /d "_DEBUG"
+# ADD RSC /l 0x809 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /out:"..\..\tools\banker.exe" /pdbtype:sept
+
+!ENDIF 
+
+# Begin Target
+
+# Name "banker - Win32 Release"
+# Name "banker - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\main.cpp
+# End Source File
+# End Group
+# End Target
+# End Project
diff --git a/Utils/banker/main.cpp b/Utils/banker/main.cpp
new file mode 100644
index 000000000..8a00cd825
--- /dev/null
+++ b/Utils/banker/main.cpp
@@ -0,0 +1,399 @@
+#include <windows.h>
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <stdio.h>
+#include <time.h>
+#include <math.h>
+#include <io.h>
+
+//#include "SfxList.h"
+
+
+//************************************************
+
+#define	MAX_SFX		1024
+
+//************************************************
+
+char path_buffer[_MAX_PATH];
+char drive[_MAX_DRIVE];
+char dir[_MAX_DIR];
+char fname[_MAX_FNAME];
+char ext[_MAX_EXT];
+
+
+struct bank_entry
+{
+	WORD	looped;
+	WORD	pitch;
+	DWORD	offset;
+};
+
+typedef struct
+{
+	char	Name[ 100 ];
+	WORD	SfxNo;
+	BYTE	Hashed;
+	BYTE	Looped;
+	WORD	LoopPos;
+} file_entry;
+
+
+char		ThisDir[256];
+file_entry	FileList[MAX_SFX];
+int			NoFiles = 0;
+
+
+//***********************************************************************
+//***********************************************************************
+
+static void app_debug_msg(const char * pszFmt,va_list args)
+{
+	char szBuf[256];
+
+	vsprintf(szBuf,pszFmt,args);
+	printf("\n%s\n",szBuf);
+}
+
+
+//******************************************************************
+//******************************************************************
+
+void __cdecl screen_debug_msg(const char * pszFmt,...)
+{
+	if (pszFmt)
+	{
+		va_list args;
+		va_start(args,pszFmt);
+		app_debug_msg(pszFmt,args);
+		va_end(args);
+	}
+}
+
+void __cdecl app_assert(const char * pszFmt,...)
+{
+	if (pszFmt)
+	{
+		va_list args;
+		va_start(args,pszFmt);
+		app_debug_msg(pszFmt,args);
+		va_end(args);
+	}
+	exit(123);
+}
+
+//******************************************************************
+
+void FreePtr(void *p)
+{
+	if(p) free(p);
+}
+
+//******************************************************************
+
+BYTE* LoadFileInMem(const char * pszName)
+{
+	HANDLE hsFile;
+	DWORD dwSize = NULL;
+	DWORD dwSize2 = NULL;
+	DWORD Temp;
+	BYTE* Buffer;
+
+    if( (hsFile = CreateFile(pszName, GENERIC_READ, FILE_SHARE_READ, NULL,
+				  OPEN_EXISTING, FILE_ATTRIBUTE_READONLY, NULL)) == INVALID_HANDLE_VALUE )
+	{
+		screen_debug_msg("LFIM: Could not open file %s",pszName);
+		return NULL;
+	}else{
+		dwSize = GetFileSize(hsFile,NULL);
+		dwSize2 = dwSize;
+		if(dwSize&0x7) dwSize2 = (dwSize-(dwSize&0x7))+8;
+		if( (Buffer=(BYTE*)malloc(dwSize2))==NULL ) {printf("Out of memory.\n");exit(123);}
+		ReadFile(hsFile,(void*)Buffer,dwSize,&Temp,NULL);
+		CloseHandle(hsFile);
+	}
+
+	return Buffer;
+}
+
+
+//******************************************************************
+
+DWORD FindFileSize(const char * pszName)
+{
+	HANDLE hsFile;
+	DWORD dwSize=NULL;
+
+    if( (hsFile = CreateFile(pszName, GENERIC_READ, FILE_SHARE_READ, NULL,
+				  OPEN_EXISTING, FILE_ATTRIBUTE_READONLY, NULL)) == INVALID_HANDLE_VALUE )
+	{
+		screen_debug_msg("\nFFS: Could not open file %s",pszName);
+		return NULL;
+	}else{
+		dwSize = GetFileSize(hsFile,NULL);
+		if(dwSize&0x7) dwSize = (dwSize-(dwSize&0x7))+8;
+		CloseHandle(hsFile);
+	}
+
+	return dwSize;
+}
+
+
+//***************************************************
+//	Find files in directory
+//***************************************************
+
+int CalcHashNum(char* astring)
+{
+	int result = 0;
+	WORD count;
+
+	for (count=0; count<strlen(astring); count++)
+	{
+		result^=(int) astring[count];
+		result++;
+	}
+
+	return result;
+}
+
+
+
+void FindDirFiles(char * Search)
+{
+	int i;
+	FILE *fh;
+	char loop;
+
+
+	/* De-hash table */
+	for(i=0;i<MAX_SFX;i++)
+	{
+		FileList[i].Name[ 0 ] = '\0';
+		FileList[i].Hashed = false;
+		FileList[i].Looped = false;
+	}
+
+
+	// Open source file
+	if( ( fh = fopen( Search, "rb" ) ) == NULL )
+	{
+		printf( "\nCan't find source file!\n" );
+		return;
+	}
+
+	// Scan source file
+	while( !feof( fh ) )
+	{
+		if( fscanf( fh, "%s %c %d", FileList[NoFiles].Name, &loop, &FileList[NoFiles].LoopPos ) != 3 )
+		{
+			return;
+		}
+		if( loop == 'y' || loop == 'Y' )
+		{
+			FileList[NoFiles].Looped = true;
+		}
+		else
+		{
+			FileList[NoFiles].Looped = false;
+		}
+		FileList[NoFiles].Hashed = true;
+		NoFiles++;
+	}
+
+}
+
+//***************************************************
+//	Write files to bank
+//***************************************************
+
+DWORD FlipLongWord(DWORD val)
+{
+	DWORD result;
+
+	result = ((val&0x000000ff)<<24) + ((val&0x0000ff00)<<8) + ((val&0x00ff0000)>>8) + ((val&0xff000000)>>24);
+
+	return(result);
+}
+
+void WriteBankData(char* Bank)
+{
+	FILE* BANKFILE = NULL;
+	FILE* OFFSETFILE = NULL;
+	BYTE* Buffer = NULL;
+	WORD Size;
+	DWORD filepos = 0;
+	char file[256];
+	bank_entry	BankInfo;
+	WORD pitch;
+	DWORD vagpitch;
+
+	sprintf(file,"%s.bnk",Bank);
+	BANKFILE = fopen(file,"wb");
+	if(!BANKFILE) {printf("\nBank file error\n\n");return;}
+
+	sprintf(file,"%s.bof",Bank);
+	OFFSETFILE = fopen(file,"wb");
+	if(!OFFSETFILE) {printf("\nBank offset error\n\n");return;}
+
+	for(int i=0;i<NoFiles;i++)
+	{
+		if(FileList[i].Hashed)
+		{
+			char Name[256];
+			sprintf(Name, "%s%s", ThisDir, FileList[i].Name);
+			Buffer = LoadFileInMem(Name);
+			if (Buffer)
+			{
+				Size = (WORD)FindFileSize(Name);
+				Size -= 48;
+
+				printf("%s\t\t", Name);
+
+				if( FileList[i].Looped )
+				{
+					// Encode vag file as looped	
+					int LoopBlock = (int)( (float)FileList[i].LoopPos / 3.5f );
+					for(int p=48+16;p<(LoopBlock)-16;p+=16)
+					{
+						Buffer[p+1] = 0x0;
+					}
+
+					Buffer[p+1] = 0x6;
+					for(p=p+16;p<(Size-16);p+=16)
+					{
+						Buffer[p+1] = 0x2;
+					}
+					Buffer[p+1] = 0x3;
+
+				}
+				else
+				{
+					// Encode vag file as non-looped
+					for(int p=48;p<(Size-16);p+=16)
+					{
+						//	Buffer[p+1] = 0x2;
+					}
+					Buffer[p+1] = 0x1;
+				}
+
+				fwrite(Buffer+48, 1, Size, BANKFILE);
+
+				_splitpath(Name, drive, dir, fname, ext);
+
+				vagpitch = *(DWORD*)&Buffer[16];
+				vagpitch = FlipLongWord(vagpitch);
+				pitch=(int)((float)vagpitch*(1024.0/11025.0));
+				printf(" pitch %dkhz (%d)\n",vagpitch,pitch);
+
+				BankInfo.offset = filepos;
+				BankInfo.pitch = pitch;
+				BankInfo.looped = FileList[i].Looped;
+
+				fwrite(&BankInfo, 1, sizeof(bank_entry), OFFSETFILE);
+
+				filepos += Size;
+
+				FreePtr(Buffer);
+			}
+		}
+	}
+
+	fclose(BANKFILE);
+	fclose(OFFSETFILE);
+}
+
+
+static const char BadFileChars[] =
+{
+	'+',	'-',	'*',	'/',	'\\',	'#',	',',
+	'.',	'(',	')',	'!',	'"',	'£',	'$',
+	'%',	'^',	'&',	'=',	'#',	':',	';',	'<',
+	'>',	'?',	'@',	'{',	'}',	'[',	']',	'¬',
+};
+
+static const int	nbBadFileChars = (sizeof(BadFileChars) / sizeof(char));
+
+
+void ExportEnums(char * name)
+{
+	FILE *	ENUMFILE = NULL;
+	char	file[256];
+
+	_splitpath(name, drive, dir, fname, ext);
+	strupr(fname);
+	sprintf( file, "%s.h", name );
+	ENUMFILE = fopen(file,"wt");
+	if(!ENUMFILE) {printf("\nEnum file error\n\n");return;}
+
+	fprintf( ENUMFILE, "enum\n{\n" );
+	for (int i=0;i<NoFiles;i++)
+	{
+		char *	ostr = FileList[i].Name;//SFXNameTab[i];
+		int		len = (int)strlen(ostr)+1;
+		char *	nstr = new char[len];
+
+		for (int t=len-1;t>=0;t--)
+		{
+			if( ostr[ t ] == '\\' )
+			{
+				t++;
+				break;
+			}
+		}
+
+		int o = 0;
+		for (;t<len;t++)
+		{
+			nstr[o] = ostr[t];
+			if (nstr[o] == '.')		nstr[o] = 0;
+			for(int c=0;c<nbBadFileChars;c++)
+			{
+				if (nstr[o] == BadFileChars[c])	nstr[o] = '_';
+			}
+			o++;
+		}
+
+		strupr( nstr );
+
+		if( FileList[i].Looped )
+		{
+			fprintf( ENUMFILE, "\tSFX_%s_%s,\t\t// Looped at %d\n", fname,nstr, FileList[i].LoopPos );
+		}
+		else
+		{
+			fprintf( ENUMFILE, "\tSFX_%s_%s,\n", fname,nstr );
+		}
+	}
+	fprintf( ENUMFILE, "};\n" );
+}
+
+//***************************************************
+//***************************************************
+//***************************************************
+//***************************************************
+
+int main(int argc, char *argv[])
+{
+
+	if(argc!=3)
+	{
+		printf("\nBanker (C)limax 1997");
+		printf("\nWritten by Tim Swann");
+		printf("\nUsage: Banker <Source File> <Output Base>");
+		printf("\nFor example, 'Banker level0.txt \\data\\snd\\level0' will take");
+		printf("\n'level0.txt' as its input and produce three files ( \\data\\snd\\level0.bof,");
+		printf("\n\\data\\snd\\level0.bnk and \\data\\snd\\level0.h ) as output.");
+		printf("\n\n");
+		return(0);
+	}
+
+	FindDirFiles(argv[1]);
+	WriteBankData(argv[2]);
+	ExportEnums(argv[2]);
+
+	printf("\nBank files made\n\n");
+
+	return(0);
+}
diff --git a/Utils/parkgrab/VImage.cpp b/Utils/parkgrab/VImage.cpp
new file mode 100644
index 000000000..c21746ebe
--- /dev/null
+++ b/Utils/parkgrab/VImage.cpp
@@ -0,0 +1,472 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+#include "pak.h"
+
+/*	Local
+	----- */
+#include "vimage.h"
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+VRAMImage::VRAMImage(int NewWidthInTpages,int NewHeightInPixels) : VRAMData(NULL)
+{
+	WidthInTpages=NewWidthInTpages;
+	HeightInPixels=NewHeightInPixels;
+	HeightInTPages=NewHeightInPixels / 256;
+
+	if (!HeightInTPages)
+	{
+		aTPageHeight = 128;
+		HeightInTPages = 1;
+	}
+	else
+	{
+		aTPageHeight = HeightInTPages * 256;
+	}
+	TPageSizeInBytes = 128 * aTPageHeight;
+
+	WidthInBytes=WidthInTpages*128;
+
+	VramAreaBytes=WidthInBytes * HeightInPixels;
+
+	VRAMData=new u8[VramAreaBytes];
+	lbmData = new u8[WidthInTpages*256*HeightInPixels];
+
+	if (!lbmData)
+		Error(ERM_OUTOFMEM);
+
+	if (!VRAMData)
+		Error(ERM_OUTOFMEM);
+
+	memset(VRAMData,0,VramAreaBytes);
+	m_doCompress=false;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+VRAMImage::~VRAMImage(void)
+{
+	if (lbmData)
+		delete lbmData;
+	if (VRAMData)
+		delete VRAMData;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+void VRAMImage::getTpData(unsigned int tp,std::vector<u8> & dest) const
+{
+	const int TPAGES_IN_ALL =WidthInTpages * HeightInTPages;
+
+	if (tp >= TPAGES_IN_ALL)
+		Error(ERR_FATAL,"illegal tpage number");
+
+	int			tpX,tpY;
+	u8 const *	srcTpData;
+	dest.resize(TPageSizeInBytes);
+
+
+	tpX=(tp%WidthInTpages)*128;
+	tpY=(tp/WidthInTpages)*aTPageHeight;
+
+	srcTpData=&VRAMData[tpX+tpY*WidthInBytes];
+
+	for (int x=0;x<128;x++)
+		for (int y=0;y<aTPageHeight;y++)
+			dest[x+y*128]=srcTpData[x+y*WidthInBytes];
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void CompressMem(char const * CmdLine,std::vector<u8> & Body)
+{
+	try
+		{
+		GString		Com;
+
+		char	TmpName[100];
+		char	CompTmpName[100];
+
+		tmpnam(TmpName);
+		tmpnam(CompTmpName);
+
+		GString	ComStr(CmdLine);
+		
+		ComStr.Replace("%1",TmpName);
+		ComStr.Replace("%2",CompTmpName);
+
+		ofstream Out;
+		Out.open(TmpName,ios::binary|ios::trunc);
+		
+		if (Out)
+			{
+			int		CompSize;
+			Out.write((char const *)&Body[0],Body.size());
+			Out.close();
+
+			cout<<(char const *)ComStr<<"from "<<CmdLine<<endl;
+			system(ComStr);
+
+			CompSize=FileSize(CompTmpName);
+
+			Body.resize(CompSize);
+
+			ifstream In;
+			In.open(CompTmpName,ios::binary);
+
+			if (In)
+				{
+				In.read((char *)&Body[0],CompSize);
+				In.close();
+				}
+			else
+				throw("Can't open compressed out file");
+
+			}
+		else
+			throw("Can't open uncompressed out file");
+
+		remove(TmpName);
+		remove(CompTmpName);
+		}
+
+	catch (const char * Err)
+		{
+		GObject::Error(ERR_FATAL,"%s im CompressMem",Err);
+		}
+}
+
+
+
+void VRAMImage::WriteInTpageChunks(ofstream & str)
+{
+	const int TPAGES_IN_ALL =WidthInTpages * HeightInTPages;
+
+	vector<u8>	tpageData;
+	tpageData.resize(TPageSizeInBytes);
+
+	for (int f=0;f<TPAGES_IN_ALL;f++)
+		{
+		getTpData(f,tpageData);
+		str.write((char*)&tpageData[0],TPageSizeInBytes);
+		}
+}
+
+
+void VRAMImage::Write(ofstream & Str)
+{
+	if (m_doCompress)
+		{
+		printf("Packing TPage\n");
+		const int TPAGES_IN_ALL =WidthInTpages * HeightInTPages;
+		const int NUM_OF_WINDOWS = TPAGES_IN_ALL*4;
+
+		vector<u8>	tpageData;
+		vector<u8>	dataToWrite;
+
+		tpageData.resize(TPageSizeInBytes);
+		dataToWrite.resize(TPageSizeInBytes);
+
+		for (int f=0;f<NUM_OF_WINDOWS;f++)
+			{
+			int			dataWriteSize;
+			const u8 *	srcData;
+
+			if ((f&3) == 0)
+				getTpData(f/4,tpageData);
+
+			srcData=&tpageData[(f%4)*128*64];
+			
+			if (f != 0)
+				{
+				vector<u8>	myData;
+
+				myData.resize(128*64);
+
+				memcpy(&myData[0],srcData,128*64);
+
+				#ifdef __USE_LZNP__
+
+					CompressMem("lznp %1 %2",myData);
+					dataWriteSize=myData.size();
+					memcpy(&dataToWrite[0],&myData[0],dataWriteSize);
+
+				#else
+					dataWriteSize=PAK_findPakSize(&myData[0],128*64);
+					PAK_doPak(&dataToWrite[0],&myData[0],128*64);
+				#endif
+
+				}
+			else
+				{
+				dataWriteSize=128*64;
+				memcpy(&dataToWrite[0],srcData,128*64);
+				}
+			for (int a=0;a<16;a++) printf("%i, ",(int)dataToWrite[a]);
+			printf("\n");
+			Str.write((char *)(&dataToWrite[0]),dataWriteSize);
+			}
+
+		}
+	else
+		Str.write((char *)(VRAMData),VramAreaBytes);
+}
+
+
+
+
+
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void VRAMImage::PlotPal(SprPal const & PalToPlot)
+{
+	TPRect  Tp=PalToPlot.GetTPRect();
+	
+	int W=WidthInTpages*256;
+
+	W/=2;
+
+	u16 * Addr=(u16 *)&VRAMData[Tp.Y*W+Tp.X/2];
+
+	std::vector<u16> OutWords;
+
+	PalToPlot.MakePSXPal(OutWords);
+
+	int		f;
+
+	for (f=0;f<OutWords.size();f++)
+		Addr[f]=OutWords[f];
+}
+
+		
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void VRAMImage::PlotFrame(SprFrame const & FrameToPlot)
+{
+	SprFrame::BDEPTH	ThisDepth;
+
+	ThisDepth=FrameToPlot.GetBitDepth();
+
+	switch(ThisDepth)
+		{
+		case SprFrame::BITS_4:
+			PlotFrame4(FrameToPlot);
+			break;
+
+		case SprFrame::BITS_8:
+			PlotFrame8(FrameToPlot);
+			break;
+		};
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+void VRAMImage::SaveAs16ColLbm(const char * Name)
+{
+	Palette	GazPalette;
+
+	GazPalette[0].SetR(0);
+	GazPalette[0].SetG(0);
+	GazPalette[0].SetB(255);
+
+	int		W=WidthInTpages*256;
+	int		H=HeightInPixels;
+
+	Frame	ThisFr;
+
+	for (int f=1;f<15;f++)
+		{
+		int	Col=f*17;
+		GazPalette[1+f].SetR(Col);
+		GazPalette[1+f].SetG(Col);
+		GazPalette[1+f].SetB(Col);
+		}
+
+
+	for (int y=0;y<H;y++)
+		for (int x=0;x<W;x++)
+			{
+			if ((x&1))
+				lbmData[x+y*W]=(VRAMData[ (y*(W/2))+(x/2)]&0xf0) >> 4;
+			else
+				lbmData[x+y*W]=VRAMData[(y*(W/2))+(x/2)]&0x0f;
+			}
+
+	ThisFr.SetFrame(lbmData,W,H,GazPalette);
+	ThisFr.SaveLbm(Name);
+
+	cout<<"Written "<<Name<<endl;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void VRAMImage::PlotFrame4(SprFrame const & Fr)
+{
+	TPRect  Tp=Fr.GetTPRect();
+	
+	int W=WidthInTpages*256;
+
+	W=W/2;			/* we're plotting nibbles */
+
+	if (!Tp.GetRotate())
+		{
+		for (int y=Tp.Y;y<Tp.Y+Tp.H;y++)
+			for (int x=Tp.X;x<Tp.X+Tp.W;x++)
+			{
+			int		FrX=x-Tp.X;
+			int		FrY=y-Tp.Y;
+			u8		ScrNib=Fr.SeeData()[FrY*Tp.W+FrX]&0xf;
+			u8 *	PixAddr=&VRAMData[y*W+x/2];
+
+			if ((x&1))
+				{
+				*PixAddr&=0x0f;
+				*PixAddr|=ScrNib<<4;
+				}
+			else
+				{
+				*PixAddr&=0xf0;
+				*PixAddr|=ScrNib;
+				}
+			}
+		}
+	else
+		{
+		for (int y=Tp.Y;y<Tp.Y+Tp.H;y++)
+			for (int x=Tp.X;x<Tp.X+Tp.W;x++)
+			{
+			int		FrX=x-Tp.X;
+			int		FrY=y-Tp.Y;
+
+			u8		ScrNib=Fr.SeeData()[FrX*Tp.H+(Tp.H-FrY-1)]&0xf;
+			u8 *	PixAddr=&VRAMData[y*W+x/2];
+
+			if ((x&1))
+				{
+				*PixAddr&=0x0f;
+				*PixAddr|=ScrNib<<4;
+				}
+			else
+				{
+				*PixAddr&=0xf0;
+				*PixAddr|=ScrNib;
+				
+				}
+			}
+		}
+
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void VRAMImage::PlotFrame8(SprFrame const & Fr)
+{
+	const TPRect & Tp=Fr.GetTPRect();
+
+	int W=WidthInTpages*256;
+
+	W/=2;
+
+	u8 * Addr=&VRAMData[Tp.Y*W+Tp.X/2];
+
+	if (!Fr.IsRotated())
+		{
+		for (int y=0;y<Fr.GetHeight();y++)
+			for (int x=0;x<Fr.GetWidth();x++)
+				Addr[y*W+x]=Fr.SeeData()[x+y*Fr.GetWidth()];
+		}
+	else
+		{
+
+		for (int y=0;y<Fr.GetWidth();y++)
+			for (int x=0;x<Fr.GetHeight();x++)
+				Addr[y*W+x]=Fr.SeeData()[x*Fr.GetWidth()+(Fr.GetWidth()-y-1)];
+		}
+}
+
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/bmploader.cpp b/Utils/parkgrab/bmploader.cpp
new file mode 100644
index 000000000..d7a8ffff0
--- /dev/null
+++ b/Utils/parkgrab/bmploader.cpp
@@ -0,0 +1,669 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+#include <frame.hpp>
+#include <misc.hpp>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+struct RGB
+{
+	u8	r,g,b;
+};
+
+class BITMAP
+{
+public:
+	BITMAP(void)
+		{
+		m_width=0;
+		m_height=0;
+		}
+
+	void setSize(int width,int height)
+		{
+		bitMap.resize(width*height);
+
+		m_width=width;
+		m_height=height;
+		}
+
+	void clear(void)
+		{
+		if (m_width && m_height)
+			memset(&bitMap[0],0,m_width*m_height);
+		}
+
+	void line(unsigned int y,unsigned int x,u8 pix)
+	{
+		if (x >= m_width)
+		{
+			GObject::Error(ERR_WARNING,"Out of X boundary - %d %d\n", x, m_width);
+			x = m_width-1;
+		}
+		if (y >= m_height)
+		{
+			GObject::Error(ERR_WARNING,"Out of Y boundary - %d %d\n", y, m_height);
+			y = m_height-1;
+		}
+		bitMap[y*m_width+x]=pix;
+
+	}
+
+	u8 const * getBitMap(void) const
+		{return(&bitMap[0]);}
+
+protected:
+	int				m_width;
+	int				m_height;
+	vector<u8>		bitMap;
+};
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+#include <stdlib.h>
+#include <errno.h>
+#include <string.h>
+#include <limits.h>
+
+
+#define BI_RGB          0
+#define BI_RLE8         1
+#define BI_RLE4         2
+#define BI_BITFIELDS    3
+
+#define OS2INFOHEADERSIZE  12
+#define WININFOHEADERSIZE  40
+
+
+typedef struct BITMAPFILEHEADER
+{
+   unsigned long  bfType;
+   unsigned long  bfSize;
+   unsigned short bfReserved1;
+   unsigned short bfReserved2;
+   unsigned long  bfOffBits;
+} BITMAPFILEHEADER;
+
+
+/* Used for both OS/2 and Windows BMP. 
+ * Contains only the parameters needed to load the image 
+ */
+typedef struct BITMAPINFOHEADER
+{
+   unsigned long  biWidth;
+   unsigned long  biHeight;
+   unsigned short biBitCount;
+   unsigned long  biCompression;
+} BITMAPINFOHEADER;
+
+
+typedef struct WINBMPINFOHEADER  /* size: 40 */
+{
+   unsigned long  biWidth;
+   unsigned long  biHeight;
+   unsigned short biPlanes;
+   unsigned short biBitCount;
+   unsigned long  biCompression;
+   unsigned long  biSizeImage;
+   unsigned long  biXPelsPerMeter;
+   unsigned long  biYPelsPerMeter;
+   unsigned long  biClrUsed;
+   unsigned long  biClrImportant;
+} WINBMPINFOHEADER;
+
+
+typedef struct OS2BMPINFOHEADER  /* size: 12 */
+{
+   unsigned short biWidth;
+   unsigned short biHeight;
+   unsigned short biPlanes;
+   unsigned short biBitCount;
+} OS2BMPINFOHEADER;
+
+
+
+/* read_bmfileheader:
+ *  Reads a BMP file header and check that it has the BMP magic number.
+ */
+static int read_bmfileheader(Gifstream & f, BITMAPFILEHEADER *fileheader)
+{
+   fileheader->bfType = f.Get16();
+   fileheader->bfSize= f.Get32();
+   fileheader->bfReserved1= f.Get16();
+   fileheader->bfReserved2= f.Get16();
+   fileheader->bfOffBits= f.Get32();
+
+   if (fileheader->bfType != 19778)
+      return -1;
+
+   return 0;
+}
+
+
+
+/* read_win_bminfoheader:
+ *  Reads information from a BMP file header.
+ */
+static int read_win_bminfoheader(Gifstream & f, BITMAPINFOHEADER *infoheader)
+{
+   WINBMPINFOHEADER win_infoheader;
+
+   win_infoheader.biWidth = f.Get32();
+   win_infoheader.biHeight = f.Get32();
+   win_infoheader.biPlanes = f.Get16();
+   win_infoheader.biBitCount = f.Get16();
+   win_infoheader.biCompression = f.Get32();
+   win_infoheader.biSizeImage = f.Get32();
+   win_infoheader.biXPelsPerMeter = f.Get32();
+   win_infoheader.biYPelsPerMeter = f.Get32();
+   win_infoheader.biClrUsed = f.Get32();
+   win_infoheader.biClrImportant = f.Get32();
+
+   infoheader->biWidth = win_infoheader.biWidth;
+   infoheader->biHeight = win_infoheader.biHeight;
+   infoheader->biBitCount = win_infoheader.biBitCount;
+   infoheader->biCompression = win_infoheader.biCompression;
+
+   return 0;
+}
+
+
+
+/* read_os2_bminfoheader:
+ *  Reads information from an OS/2 format BMP file header.
+ */
+static int read_os2_bminfoheader(Gifstream & f, BITMAPINFOHEADER *infoheader)
+{
+   OS2BMPINFOHEADER os2_infoheader;
+
+   os2_infoheader.biWidth = f.Get16();
+   os2_infoheader.biHeight = f.Get32();
+   os2_infoheader.biPlanes = f.Get32();
+   os2_infoheader.biBitCount = f.Get32();
+
+   infoheader->biWidth = os2_infoheader.biWidth;
+   infoheader->biHeight = os2_infoheader.biHeight;
+   infoheader->biBitCount = os2_infoheader.biBitCount;
+   infoheader->biCompression = 0;
+
+   return 0;
+}
+
+
+/* read_bmicolors:
+ *  Loads the color pallete for 1,4,8 bit formats.
+ */
+static void read_bmicolors(int ncols, RGB *pal, Gifstream & f,int win_flag)
+{
+	int i;
+
+	for (i=0; i<ncols; i++)
+		{
+		pal[i].b = f.get();
+		pal[i].g = f.get();
+		pal[i].r = f.get();
+
+		if (win_flag)
+			f.get();
+		}
+}
+
+
+
+/* read_1bit_line:
+ *  Support function for reading the 1 bit bitmap file format.
+ */
+static void read_1bit_line(int length, Gifstream & f, BITMAP *bmp, int line)
+{
+   unsigned char b[32];
+   unsigned long n;
+
+   int i, j, k;
+   int pix;
+
+	for (i=0; i<length; i++)
+		{
+		j = i % 32;
+		if (j == 0)
+			{
+			n = f.Get32();
+
+			for (k=0; k<32; k++)
+				{
+				b[31-k] = n & 1;
+				n = n >> 1;
+				}
+	      }
+
+		pix = b[j];
+		bmp->line(line,i,pix);
+		}
+}
+
+
+
+/* read_4bit_line:
+ *  Support function for reading the 4 bit bitmap file format.
+ */
+static void read_4bit_line(int length, Gifstream & f, BITMAP *bmp, int line)
+{
+   unsigned char b[8];
+   unsigned long n;
+   int i, j, k;
+   int temp;
+   int pix;
+
+	for (i=0; i<length; i++)
+		{
+		j = i % 8;
+		if (j == 0)
+			{
+			n = f.Get32();
+
+			for (k=0; k<4; k++)
+				{
+				temp = n & 255;
+				b[k*2+1] = temp & 15;
+				temp = temp >> 4;
+				b[k*2] = temp & 15;
+				n = n >> 8;
+				}
+			}
+
+		pix = b[j];
+		bmp->line(line,i,pix);
+		}
+}
+
+
+
+/* read_8bit_line:
+ *  Support function for reading the 8 bit bitmap file format.
+ */
+static void read_8bit_line(int length, Gifstream & f, BITMAP *bmp, int line)
+{
+   unsigned char b[4];
+   unsigned long n;
+   int i, j, k;
+   int pix;
+
+	for (i=0; i<length; i++)
+		{
+		j = i % 4;
+		if (j == 0)
+			{
+			n = f.Get32();
+			for (k=0; k<4; k++)
+				{
+				b[k] = n & 255;
+				n = n >> 8;
+				}
+			}
+		pix = b[j];
+		bmp->line(line,i,pix);
+		}
+}
+
+
+/* read_24bit_line:
+ *  Support function for reading the 24 bit bitmap file format, doing
+ *  our best to convert it down to a 256 color pallete.
+ */
+static void read_24bit_line(int length, Gifstream & f, BITMAP *bmp, int line)
+{
+#if 0
+   int i, nbytes;
+   RGB c;
+
+   nbytes=0;
+
+   for (i=0; i<length; i++) {
+      c.b = f.get();
+      c.g = f.get();
+      c.r = f.get();
+      bmp->line[line][i*3+_rgb_r_shift_24/8] = c.r;
+      bmp->line[line][i*3+_rgb_g_shift_24/8] = c.g;
+      bmp->line[line][i*3+_rgb_b_shift_24/8] = c.b;
+      nbytes += 3;
+   }
+
+   nbytes = nbytes % 4;
+   if (nbytes != 0)
+      for (i=nbytes; i<4; i++)
+	 f.get();;
+#endif
+}
+
+
+
+/* read_image:
+ *  For reading the noncompressed BMP image format.
+ */
+static void read_image(Gifstream & f, BITMAP *bmp, BITMAPINFOHEADER *infoheader)
+{
+   int i, line;
+
+   for (i=0; i<(int)infoheader->biHeight; i++) {
+      line = i;
+
+      switch (infoheader->biBitCount) {
+
+	 case 1:
+	    read_1bit_line(infoheader->biWidth, f, bmp, infoheader->biHeight-i-1);
+	    break;
+
+	 case 4:
+	    read_4bit_line(infoheader->biWidth, f, bmp, infoheader->biHeight-i-1);
+	    break;
+
+	 case 8:
+	    read_8bit_line(infoheader->biWidth, f, bmp, infoheader->biHeight-i-1);
+	    break;
+
+	 case 24:
+	    read_24bit_line(infoheader->biWidth, f, bmp, infoheader->biHeight-i-1);
+	    break;
+      }
+   }
+}
+
+
+
+/* read_RLE8_compressed_image:
+ *  For reading the 8 bit RLE compressed BMP image format.
+ */
+static void read_RLE8_compressed_image(Gifstream & f, BITMAP *bmp, BITMAPINFOHEADER *infoheader)
+{
+   unsigned char count, val, val0;
+   int j, pos, line;
+   int eolflag, eopicflag;
+
+   eopicflag = 0;
+   line = infoheader->biHeight - 1;
+
+   while (eopicflag == 0) {
+      pos = 0;                               /* x position in bitmap */
+      eolflag = 0;                           /* end of line flag */
+
+      while ((eolflag == 0) && (eopicflag == 0)) {
+	 count = f.get();
+	 val = f.get();
+
+	 if (count > 0) {                    /* repeat pixel count times */
+	    for (j=0;j<count;j++) {
+	       bmp->line(line,pos,val);
+	       pos++;
+	    }
+	 }
+	 else {
+	    switch (val) {
+
+	       case 0:                       /* end of line flag */
+		  eolflag=1;
+		  break;
+
+	       case 1:                       /* end of picture flag */
+		  eopicflag=1;
+		  break;
+
+	       case 2:                       /* displace picture */
+		  count = f.get();
+		  val = f.get();
+		  pos += count;
+		  line -= val;
+		  break;
+
+	       default:                      /* read in absolute mode */
+		  for (j=0; j<val; j++) {
+		     val0 = f.get();
+		     bmp->line(line,pos,val0);
+		     pos++;
+		  }
+
+		  if (j%2 == 1)
+		     val0 = f.get();    /* align on word boundary */
+		  break;
+
+	    }
+	 }
+
+	 if (pos > (int)infoheader->biWidth)
+	    eolflag=1;
+      }
+
+      line--;
+      if (line < 0)
+	 eopicflag = 1;
+   }
+}
+
+
+
+/* read_RLE4_compressed_image:
+ *  For reading the 4 bit RLE compressed BMP image format.
+ */
+static void read_RLE4_compressed_image(Gifstream & f, BITMAP *bmp, BITMAPINFOHEADER *infoheader)
+{
+   unsigned char b[8];
+   unsigned char count;
+   unsigned short val0, val;
+   int j, k, pos, line;
+   int eolflag, eopicflag;
+
+   eopicflag = 0;                            /* end of picture flag */
+   line = infoheader->biHeight - 1;
+
+   while (eopicflag == 0) {
+      pos = 0;
+      eolflag = 0;                           /* end of line flag */
+
+      while ((eolflag == 0) && (eopicflag == 0)) {
+	 count = f.get();
+	 val = f.get();
+
+	 if (count > 0) {                    /* repeat pixels count times */
+	    b[1] = val & 15;
+	    b[0] = (val >> 4) & 15;
+	    for (j=0; j<count; j++) {
+	       bmp->line(line,pos,b[j%2]);
+	       pos++;
+	    }
+	 }
+	 else {
+	    switch (val) {
+
+	       case 0:                       /* end of line */
+		  eolflag=1;
+		  break;
+
+	       case 1:                       /* end of picture */
+		  eopicflag=1;
+		  break;
+
+	       case 2:                       /* displace image */
+		  count = f.get();
+		  val = f.get();
+		  pos += count;
+		  line -= val;
+		  break;
+
+	       default:                      /* read in absolute mode */
+		  for (j=0; j<val; j++) {
+		     if ((j%4) == 0) {
+			val0 = f.Get16();
+			for (k=0; k<2; k++) {
+			   b[2*k+1] = val0 & 15;
+			   val0 = val0 >> 4;
+			   b[2*k] = val0 & 15;
+			   val0 = val0 >> 4;
+			}
+		     }
+		     bmp->line(line,pos,b[j%4]);
+		     pos++;
+		  }
+		  break;
+	    }
+	 }
+
+	 if (pos > (int)infoheader->biWidth)
+	    eolflag=1;
+      }
+
+      line--;
+      if (line < 0)
+	 eopicflag = 1;
+   }
+}
+
+
+
+/* load_bmp:
+ *  Loads a Windows BMP file, returning a bitmap structure and storing
+ *  the pallete data in the specified pallete (this should be an array of
+ *  at least 256 RGB structures).
+ *
+ *  Thanks to Seymour Shlien for contributing this function.
+ */
+
+void load_bmp(Frame & frm,char const *filename)
+{
+	BITMAPFILEHEADER fileheader;
+	BITMAPINFOHEADER infoheader;
+
+	RGB		pal[256];
+	BITMAP	bmp;
+
+	Gifstream	f(Gifstream::LITTLE_ENDIAN);
+
+	int ncol;
+	unsigned long biSize;
+
+	f.open(filename,ios::in|ios::binary);
+
+	if (!f)
+		GObject::Error(ERR_FATAL,"couldn't open file %s",filename);
+
+	if (read_bmfileheader(f, &fileheader) != 0)
+		{
+		GObject::Error(ERR_FATAL,"error reading bmp hdr for %s",filename);
+		}
+
+   biSize = f.Get32();
+
+	if (biSize == WININFOHEADERSIZE)
+		{
+		if (read_win_bminfoheader(f, &infoheader) != 0)
+			GObject::Error(ERR_FATAL,"error reading windows bmp info hdr for %s",filename);
+
+		/* compute number of colors recorded */
+		ncol = (fileheader.bfOffBits - 54) / 4;
+		read_bmicolors(ncol, pal, f, 1);
+		}
+	else if (biSize == OS2INFOHEADERSIZE)
+		{
+		if (read_os2_bminfoheader(f, &infoheader) != 0)
+			GObject::Error(ERR_FATAL,"error reading os2 bmp info hdr for %s",filename);
+		
+		/* compute number of colors recorded */
+		ncol = (fileheader.bfOffBits - 26) / 3;
+		read_bmicolors(ncol, pal, f, 0);
+		}
+	else
+		{
+		GObject::Error(ERR_FATAL,"error finding correct hdr for bmp %s",filename);
+		}
+
+	if (infoheader.biBitCount != 4 && infoheader.biBitCount != 8)
+		GObject::Error(ERR_FATAL,"only handles 4 && 8 bit bmps not %d : %s",infoheader.biBitCount,filename);
+
+
+	bmp.setSize(infoheader.biWidth, infoheader.biHeight);
+
+	bmp.clear();
+
+	switch (infoheader.biCompression)
+		{
+
+		case BI_RGB:
+			read_image(f, &bmp, &infoheader);
+			break;
+
+		case BI_RLE8:
+			read_RLE8_compressed_image(f, &bmp, &infoheader);
+			break;
+
+		case BI_RLE4:
+			read_RLE4_compressed_image(f, &bmp, &infoheader);
+			break;
+
+		default:
+			GObject::Error(ERR_FATAL,"unknown compression foramt for %s",filename);
+			break;
+		}
+
+	f.close();
+
+
+		{
+		Palette	palObj;
+
+
+
+		for (int f=0;f<ncol;f++)
+			{
+			Colour & col = palObj[f];
+			col.SetRGB(pal[f].r,pal[f].g,pal[f].b);
+			}
+
+		frm.SetFrame(bmp.getBitMap(),infoheader.biWidth,infoheader.biHeight,palObj);
+		}
+
+}
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/bmploader.h b/Utils/parkgrab/bmploader.h
new file mode 100644
index 000000000..8292ce535
--- /dev/null
+++ b/Utils/parkgrab/bmploader.h
@@ -0,0 +1,58 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+#ifndef __BMPLOADER_H__
+#define __BMPLOADER_H__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+#include <frame.hpp>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+void load_bmp(Frame & frm,char const *filename);
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* __BMPLOADER_H__ */
+
+/*===========================================================================
+ end */
\ No newline at end of file
diff --git a/Utils/parkgrab/cross.cpp b/Utils/parkgrab/cross.cpp
new file mode 100644
index 000000000..100a1c0de
--- /dev/null
+++ b/Utils/parkgrab/cross.cpp
@@ -0,0 +1,158 @@
+/*=========================================================================
+
+	CROSS.CPP	
+
+	Author:  Gary Liddon @ Climax
+	Created:
+	Project: Diablo Playstation Conversion
+	Purpose: Find A Crosshair on a frame
+
+	Copyright (c) 1996 Director's Cut Ltd.
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	STL
+	--- */
+
+/*	Glib
+	---- */
+
+/*	Local
+	----- */
+#include "cross.h"
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Classes
+	------- */
+
+
+/*----------------------------------------------------------------------
+	Description:
+		Find a cross hair in this frame for animation offset and store it
+		into member vars x and y.
+
+	Returns:
+		True if a cross hair is found
+  ---------------------------------------------------------------------- */
+bool CROSS_RES::FindCrossHair(
+							  Frame const & Fr,	/* Frame we're looking for a cross-hair in */
+							  u8 CrossCol		/* Pixel value of cross hair we're looking for */
+							  )
+{
+	u8 const *	FrmData;
+	int *		CountCol=NULL;
+	int *		CountRow=NULL;
+
+	int			Width;
+	int			Height;
+	bool		RetVal;
+
+	RetVal=false;
+
+	Width=Fr.GetWidth();
+	Height=Fr.GetHeight();
+
+	if (Width && Height)
+		{
+		int Col;
+		int Row;
+
+		if (!(CountCol=new int[Width]))
+			{
+			cout<<"Width is "<<Width<<endl;
+			GObject::Error(ERM_OUTOFMEM);
+			}
+
+		if (!(CountRow=new int[Height]))
+			{
+			cout<<"Height is "<<Width<<endl;
+			GObject::Error(ERM_OUTOFMEM);
+			}	
+
+		memset(CountRow,0,sizeof(int)*Height);
+		memset(CountCol,0,sizeof(int)*Width);
+
+		FrmData=Fr.SeeData();
+
+		for (int yy=0;yy<Height;yy++)
+			{
+			u8 const * ThisRow=&FrmData[yy*Width];
+
+			for (int xx=0;xx<Width;xx++)
+				{
+				if (ThisRow[xx] == CrossCol)
+					{
+					CountRow[yy]++;
+					CountCol[xx]++;
+					}
+				}
+			}
+
+		Col=FindLargestIndex(CountCol,Width);
+		Row=FindLargestIndex(CountRow,Height);
+
+		if ((Col != -1) && (Row != -1))
+			{
+			x=Col;
+			y=Row;
+			RetVal=true;
+			}
+		}
+
+	if (CountCol)
+		delete CountCol;
+
+	if (CountRow)
+		delete CountRow;
+
+	return(RetVal);
+}
+
+/*----------------------------------------------------------------------
+	Description:
+	Returns:
+  ---------------------------------------------------------------------- */
+int CROSS_RES::FindLargestIndex(int * CountCol,int Width)
+{
+	int		LargestIndex=-1;
+	int		Largest=0;
+
+	for (int f=0;f<Width;f++)
+		{
+		if (CountCol[f] > Largest)
+			{
+			Largest=CountCol[f];
+			LargestIndex=f;
+			}
+		}
+
+	return(LargestIndex);
+}
+
+/*===========================================================================
+ end */
+
diff --git a/Utils/parkgrab/cross.h b/Utils/parkgrab/cross.h
new file mode 100644
index 000000000..cda039c74
--- /dev/null
+++ b/Utils/parkgrab/cross.h
@@ -0,0 +1,67 @@
+/*=========================================================================
+
+	CROSS.CPP	
+
+	Author:  Gary Liddon @ Climax
+	Created:
+	Project: Diablo Playstation Conversion
+	Purpose: Find A Crosshair on a frame
+
+	Copyright (c) 1996 Director's Cut Ltd.
+
+===========================================================================*/
+
+#ifndef __CROSS_HPP__
+#define __CROSS_HPP__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	STL
+	--- */
+
+/*	Glib
+	---- */
+#include <gobject.hpp>
+#include <frame.hpp>
+
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Description:
+		This structure is used to find centering cross hairs
+		in frame objects using the FindCrossHair method.
+		If a cross hair is found, the results are put in
+		the x and y member vars.
+  ---------------------------------------------------------------------- */
+struct CROSS_RES
+{
+	int		x;			/* x co-ord of cross found */
+	int		y;			/* y co-ord of cross found */
+
+	bool	FindCrossHair(Frame const & Fr,u8 CrossCol);
+
+private:
+	int		FindLargestIndex(int * CountCol,int Width);
+};
+
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* __CROSS_HPP__ */
+
+/*===========================================================================
+ end */
+
+
diff --git a/Utils/parkgrab/grect.cpp b/Utils/parkgrab/grect.cpp
new file mode 100644
index 000000000..80e1dc2fd
--- /dev/null
+++ b/Utils/parkgrab/grect.cpp
@@ -0,0 +1,138 @@
+/*=========================================================================
+
+	GRECT.CPP	
+
+	Author:  Gary Liddon @ Climax
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1997 Climax Development Ltd
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <algorithm>
+
+/*	Glib
+	---- */
+#include <frame.hpp>
+
+/*	Local
+	----- */
+#include "grect.h"
+
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Positional Vars
+	--------------- */
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+static Rect & AddAnotherRect(RectVec & Result);
+static void AddRectMessage(Rect const & T);
+
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+Rect & AddAnotherRect(RectVec & Result)
+{
+	Result.resize(Result.size()+1);
+	return(Result[Result.size()-1]);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+void CutRect(Rect const & ToBeCut,Rect const & TheCutter,RectVec & Result)
+{
+	Rect Cutter=TheCutter;
+
+	ToBeCut.ClipRect(Cutter);
+	
+	if (Cutter)
+		{
+		/* Is there a top rectangle hanging about? */
+
+		if (ToBeCut.Y != Cutter.Y)
+			{
+			Rect & TopRect=AddAnotherRect(Result);
+			TopRect=ToBeCut;
+			TopRect.H=Cutter.Y-TopRect.Y;
+			AddRectMessage(TopRect);
+			}
+
+		/* Is there a bottom rectangle hanging about? */
+
+		if ((ToBeCut.Y+ToBeCut.H) != (Cutter.Y+Cutter.H))
+			{
+			Rect & TopRect=AddAnotherRect(Result);
+			TopRect=ToBeCut;
+			TopRect.Y=Cutter.Y+Cutter.H;
+			TopRect.H=(ToBeCut.Y+ToBeCut.H)-(Cutter.Y+Cutter.H);
+			AddRectMessage(TopRect);
+			}
+
+		/* Is there a left rectangle hanging about? */
+
+		if (ToBeCut.X != Cutter.X)
+			{
+			Rect & TopRect=AddAnotherRect(Result);
+			TopRect=Cutter;
+			TopRect.X=ToBeCut.X;
+			TopRect.W=Cutter.X-ToBeCut.X;
+			AddRectMessage(TopRect);
+			}
+
+		/* Is there a right rectangle hanging about? */
+	
+		if ((ToBeCut.X+ToBeCut.W) != (Cutter.X+Cutter.W))
+			{
+			Rect & TopRect=AddAnotherRect(Result);
+			TopRect=Cutter;
+			TopRect.X=Cutter.X+Cutter.W;
+			TopRect.W=(ToBeCut.X+ToBeCut.W)-(Cutter.X+Cutter.W);
+			AddRectMessage(TopRect);
+			}
+		}
+
+}
+
+void AddRectMessage(Rect const & T)
+{
+}
+
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/grect.h b/Utils/parkgrab/grect.h
new file mode 100644
index 000000000..32460a47c
--- /dev/null
+++ b/Utils/parkgrab/grect.h
@@ -0,0 +1,63 @@
+/*=========================================================================
+
+	GRECT.CPP	
+
+	Author:  Gary Liddon @ Climax
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1997 Climax Development Ltd
+
+===========================================================================*/
+
+#ifndef __GRECT_H__
+#define __GRECT_H__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <vector>
+
+/*	Glib
+	---- */
+#include <frame.hpp>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+typedef std::vector<Rect> RectVec;
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+void CutRect(Rect const & ToBeCut,Rect const & TheCutter,RectVec & Result);
+void ReportRectVec(RectVec & Result);
+void GRectTest(void);
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* __GRECT_H__ */
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/main.cpp b/Utils/parkgrab/main.cpp
new file mode 100644
index 000000000..f39ba18d3
--- /dev/null
+++ b/Utils/parkgrab/main.cpp
@@ -0,0 +1,703 @@
+/*=========================================================================
+
+	MAIN.CPP	
+
+	Author:  Gary Liddon @ Fareham
+	Created: 28th September 1998
+	Project: Theme Park World PSX
+	Purpose: Main file for tpw sprite grabber (it's sprgrab II!)
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Version info
+	
+	1.0 - 1.1		Various changes by various authors
+	1.2			GL	Added -r switch to allow \ disallow sprite rotation
+	1.3			GL	Added -x option to allow saving out of non VRAM sprs
+	1.31		GL	Added -f option so you can force offsets to a value
+	1.4			TS	Added replacement of bad characters in filenames
+	1.5			GL	Added support for BMP files
+	1.6			GL	Made all out files lower case
+					Checked for errrors when writing files (Doh!)
+	1.7			GL	Added -q (turn on\of grabbers shrink to fit routine)
+					Also Added -k option to report where each texture has gone in the VRAM,
+					This will be read by mikes gin -> ars program for deciding what to do about shared
+					textures
+	1.71		GL	Added widths and heights of textures to report file
+	1.72		GL	Actually made the -q switch do what it was supposed to. Doh!
+	1.8			GL	Added -i switch to set output dir for inc files
+	1.81		GL	Corrected bug in 1.8 that meant no .h was written
+	1.9			GL	-e to set maximum size for textures
+	1.91		GL	Changed so that files prefixed with a "+" have col zero as see-through
+	2.0			GL	Added reading of gin files and import of rep files
+	2.1			GL	Added spare tpage space defintions
+	2.11		GL	Added the rather excellent -j option
+	2.12		GL	Fixed a bug, stopped -j textures from being reduced
+	2.13		GL	Removed the -j option and changed it so that all textures starting with ! are auto -j'd ;)
+	2.14		GL	Replaced bit map loader, will move this code into Frame at some point
+	2.15		GL	Restricted it so that only images up to 254x254 are allowed
+	2.16		GL	Fixed bug that meant 256 col images were often shagged
+	2.17		TS	Added '@' filename pre-fix to denote scrolling and transparent textures
+	2.2			GL	Changed the autocropping so that if the image is blank it allocates a 1x1 texture instead of a
+					texture the size of the input lbm
+	2.21		GL	added -twisting_my_melon_man siwtch (don't ask)
+	2.3			GL	added -y command to give us tpage compression
+	2.31		GL	-y didn't work (not even a little bit) but it does now ;)
+	2.4			GL	Added -~ switch to write out a raw tpage chunked version of the VRAM file
+	2.41		GL	Added -^ switch to stop any tpages being written
+	2.5			TS	Added -h half a tpage flag
+	2.6			DO	Added -w only output animated texture frame headers
+					Added -b dont output spare boxes
+					Added -a align headers to 2k
+					
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <vector>
+#include <conio.h>
+
+/*	Glib
+	---- */
+#include <gtypes.h>
+#include <gstring.hpp>
+#include <misc.hpp>
+#include <gfname.hpp>
+#include <pcre.h>
+
+/*	TP Lib
+	------- */
+#include <ginio.h>
+#include <repread.h>
+
+
+/*	Local
+	----- */
+#include "sprset.h"
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Class defintions
+	---------------- */
+
+/*	Hold's a list of all the files to be processed on along with the options that apply to them
+	------------------------------------------------------------------------------------------- */
+class AllFiles : protected FileCycler
+{
+public:
+	AllFiles(void)
+		{
+		RecurseFiles=false;
+		CrossHair=false;
+		ZeroColZero=false;
+		MoveUVs=false;
+		AllowRotate=true;
+		ForceOffsets=false;
+		ShrinkToFit=true;
+		m_allocateAs16bit=false;
+		MaxSize=0;
+		m_noSort=false;
+		}
+
+	void	SetFileRecursion(bool NewRecurseFiles)
+		{RecurseFiles=NewRecurseFiles;}
+
+	void	SetCrossHair(bool NewCrossHair)
+		{CrossHair=NewCrossHair;}
+
+	void	SetZeroColZero(bool NewColZero)
+		{ZeroColZero=NewColZero;}
+
+	void	SetMoveUVs(bool NewMoveUVs)
+		{MoveUVs=NewMoveUVs;}
+
+	void	SetAllowRotate(bool NewAllowRotate)
+		{AllowRotate=NewAllowRotate;}
+
+	void	SetForceOffsets(bool NewForceOffsets)
+		{ForceOffsets=NewForceOffsets;}
+
+	void	SetShrinkToFit(bool NewSetShrinkToFit)
+		{ShrinkToFit=NewSetShrinkToFit;}
+
+	void	SetXOff(int NewXOff)
+		{XOff=NewXOff;}
+
+	void	SetYOff(int NewYOff)
+		{YOff=NewYOff;}
+
+	void	SetMaxSize(int New)
+		{MaxSize=New;}
+
+	int	GetMaxSize(void) const
+		{return(MaxSize);}
+
+	void	AddFile(const char * Name);
+
+	FIVec const & GetFileInfoVector(void) const
+		{return(AllFileInfos);}
+
+	void	SortOrder();
+
+	void ReadRepFile(char const * Name)
+		{
+		vector<RepItem>		MyItems;
+
+		::readRepFile(Name,MyItems);
+
+		for (int f=0;f<MyItems.size();f++)
+			AllExternalSharedTextures.push_back(MyItems[f].m_texName);
+
+		cout<<"Read report file "<<Name<<endl;
+		}
+
+	void setAllocateAs16Bit(bool newVal)
+		{m_allocateAs16bit=newVal;}
+	
+	void setNoSort(void)
+		{
+		m_noSort=true;
+		}
+
+protected:
+	vector<GString>		UniqueTexturesSoFar;
+	vector<GString>		AllExternalSharedTextures;
+
+	void	FileCallback(char const * FName,int FileNum);
+
+	bool	ShrinkToFit;
+	bool	RecurseFiles;
+	bool	CrossHair;
+	bool	ZeroColZero;
+	bool	MoveUVs;
+	bool	AllowRotate;
+	bool	ForceOffsets;
+	
+	bool	m_allocateAs16bit;
+	bool	m_noSort;
+
+	int		XOff,YOff;
+
+	FIVec	AllFileInfos;
+	int		MaxSize;
+};
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+static char *	CycleCommands(char *String,int Num);
+static void		Usage(void);
+static bool		CheckPlusMinus(const char * Str);
+static GString	CheckFileString(const char * Str);
+static GString	OutFile;
+static GString	OutLbm;
+static GString	SprFile;
+static GString	ReportFile;
+static GString	IncOutFile;
+
+static int		PageBase;
+static int		WidthPages;
+static int		HeightPages;
+static bool		PagePlacements=false;
+static bool		s_compressTpages=false;
+static bool		s_noWriteTpages=false;
+static bool		s_useHalfTpage=false;
+static bool		s_AnimatedHeadersOnly=false;
+static bool		s_DontOutputBoxes=false;
+static bool		s_AlignHeaders=false;
+
+static GString	s_rawTpageFile;
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+static AllFiles		MyFiles;
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+static const float	Version = 2.6;
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int main(int argc,char ** argv)
+{
+	cerr<<"GRLiddon() PARKGRAB TPW Spr Grabber "<<Version<<endl;
+	cerr<<"Copyright (c) 1998/1999G R Liddon. All rights reserved"<<endl<<endl;
+
+	if (argc==1)
+		Usage();
+	else
+		{
+		/* TODO:
+			Don't like this command line stuff, will change in glib at some point
+		*/
+
+		CommandLine(argc,argv,CycleCommands);
+
+		SprSet	MySprSet;
+
+		MySprSet.setHalfTpage(s_useHalfTpage);
+		MySprSet.setAnimatedHeader(s_AnimatedHeadersOnly);
+		MySprSet.setDontOutputBoxes(s_DontOutputBoxes);
+		MySprSet.setAlignHeaders(s_AlignHeaders);
+		MySprSet.setCompressTpages(s_compressTpages);
+		MySprSet.setNoWriteTpages(s_noWriteTpages);
+
+		MyFiles.SortOrder();
+
+		if (MyFiles.GetMaxSize())
+			MySprSet.SetMaxSize(MyFiles.GetMaxSize());
+
+		MySprSet.AddFiles(MyFiles.GetFileInfoVector());
+
+		if (IncOutFile)
+			MySprSet.SetIncOutFile(IncOutFile);
+
+		if (SprFile)
+			MySprSet.WriteSprFile(SprFile);
+
+		if (OutFile)
+			{
+			if (PagePlacements)
+				{
+				MySprSet.Write(OutFile,PageBase,WidthPages,HeightPages);
+
+				if (OutLbm)
+					MySprSet.WriteLBM(OutLbm);
+
+				if (ReportFile)
+					MySprSet.WriteReport(ReportFile);
+
+				if (s_rawTpageFile)
+					MySprSet.writeRawTPage(s_rawTpageFile);
+
+				}
+			else
+				GObject::Error(ERR_FATAL,"-t option hasn't been specified");
+			}
+		}
+
+	return(0);
+}
+
+/*----------------------------------------------------------------------
+	Function:	int CountCommas(char const * Str)
+	Purpose:	Count how many commas there are in this str
+	Returns:	Number of commas
+  ---------------------------------------------------------------------- */
+int CountCommas(char const * Str)
+{
+	int	Len=strlen(Str);
+	int	NumOfCommas=0;
+
+	for (int f=0;f<Len;f++)
+		{
+		if (Str[f]==',')
+			NumOfCommas++;
+		}
+
+	return(NumOfCommas);
+}
+
+/*----------------------------------------------------------------------
+	Function:	int ZeroAndCountCommas(char * Str)
+	Purpose:	Count how many commas there are in this str
+				and change each one to a zero
+	Returns:	Number of commas
+  ---------------------------------------------------------------------- */
+int ZeroAndCountCommas(char * Str)
+{
+	int Len=strlen(Str);
+	int NumOfCommas=0;
+
+	for (int f=0;f<Len;f++)
+		{
+		if (Str[f]==',')
+			{
+			NumOfCommas++;
+			Str[f]=0;
+			}
+		}
+
+	return(NumOfCommas);
+}
+
+/*----------------------------------------------------------------------
+	Function:	char *CycleCommands(char *String,int Num)
+	Purpose:	Callback to cycle through command line items
+	Params:		String = Text of item
+				Num = Item number
+  ---------------------------------------------------------------------- */
+char * CycleCommands(char *String,int Num)
+{
+	if (GString(String)=="-twisting_my_melon_man")
+		{
+		MyFiles.setNoSort();
+		}
+	else
+		{
+		if (String[0]=='-' || String[0]=='/')
+			{
+			int			NumOfCommas;
+			char		TpText[100];
+			GString		TpStr;
+			char *		MyText;
+
+			switch (String[1])
+				{
+				/* Switches */
+				case 'w':
+					s_AnimatedHeadersOnly=CheckPlusMinus(String);
+					break;
+				case 'b':
+					s_DontOutputBoxes=CheckPlusMinus(String);
+					break;
+				case 'a':
+					s_AlignHeaders=CheckPlusMinus(String);
+					break;
+				case 'h':
+					s_useHalfTpage=CheckPlusMinus(String);
+					break;
+				case 'y':
+					s_compressTpages=CheckPlusMinus(String);
+					break;
+
+				case '^':
+					s_noWriteTpages=CheckPlusMinus(String);
+					break;
+
+				case 'p':
+					MyFiles.ReadRepFile(CheckFileString(String));
+					break;
+
+				case 'r':
+					MyFiles.SetAllowRotate(CheckPlusMinus(String));
+					break;
+
+				case 's':
+					MyFiles.SetFileRecursion(CheckPlusMinus(String));
+					break;
+
+				case 'c':
+					MyFiles.SetCrossHair(CheckPlusMinus(String));
+					break;
+
+				case 'z':
+					MyFiles.SetZeroColZero(CheckPlusMinus(String));
+					break;
+
+				case 'm':
+					MyFiles.SetMoveUVs(CheckPlusMinus(String));
+					break;
+
+				case 'q':
+					MyFiles.SetShrinkToFit(CheckPlusMinus(String));
+					break;
+
+				/* Options that set output files */
+
+				case 'o':
+					OutFile=CheckFileString(String);
+					break;
+
+				case 'x':
+					SprFile=CheckFileString(String);
+					break;
+
+				case 'l':
+					OutLbm=CheckFileString(String);
+					break;
+
+				case 'k':
+					ReportFile=CheckFileString(String);
+					break;
+
+				case 'i':
+					IncOutFile=CheckFileString(String);
+					break;
+
+				case 'e':
+					{
+					GString		MaxSize;
+					MaxSize=CheckFileString(String);
+					MyFiles.SetMaxSize(atoi(MaxSize));
+					}
+					break;
+
+				/* More complex options */
+
+				case 't':
+					TpStr=CheckFileString(String);
+					
+					strcpy(TpText,TpStr);
+					
+					NumOfCommas=ZeroAndCountCommas(TpText);
+
+					if (NumOfCommas != 2)
+						GObject::Error(ERR_FATAL,"Problem with option %s",String);
+
+					MyText=TpText;
+
+					PageBase=atoi(MyText);
+					MyText+=strlen(MyText)+1;
+
+					WidthPages=atoi(MyText);
+					MyText+=strlen(MyText)+1;
+
+					HeightPages=atoi(MyText);
+
+					PagePlacements=true;
+					break;
+
+				case 'f':
+					TpStr=CheckFileString(String);
+					
+					strcpy(TpText,TpStr);
+					
+					NumOfCommas=ZeroAndCountCommas(TpText);
+
+					if (NumOfCommas != 1)
+						GObject::Error(ERR_FATAL,"Problem with option %s",String);
+
+					MyText=TpText;
+
+					MyFiles.SetXOff(atoi(MyText));
+					MyText+=strlen(MyText)+1;
+
+					MyFiles.SetYOff(atoi(MyText));
+					MyText+=strlen(MyText)+1;
+
+					MyFiles.SetForceOffsets(true);;
+					break;
+					
+				case '~':
+					s_rawTpageFile=CheckFileString(String);
+					break;
+
+				default:
+					GObject::Error(ERR_FATAL,"Unknown switch %s",String);
+					break;
+				}
+			}
+		else
+			{
+			GString	UpperName(String);
+			UpperName.Upper();
+			MyFiles.AddFile(UpperName);
+			}
+		}
+
+
+
+	return(String);
+}
+
+/*----------------------------------------------------------------------
+	Function:	void CheckPlusMinus(const char * Str)
+	Purpose:	Check to see if this cmd line item is of the type
+				-<char>+|-. Aborts out of there was a problem.
+	Params:		Str = Text of item
+	Returns:	true if a plus option
+  ---------------------------------------------------------------------- */
+bool CheckPlusMinus(const char * Str)
+{
+	if (strlen(Str)==3 && (Str[0]=='-' || Str[0]=='/') && (Str[2]=='-' || Str[2]=='+'))
+		{
+		}
+	else
+		GObject::Error(ERR_FATAL,"Problem with cmd line option %s",Str);
+
+	return(Str[2]=='+');
+}
+
+/*----------------------------------------------------------------------
+	Function:	void CheckPlusMinus(const char * Str)
+	Purpose:	Check to see if this cmd line item is of the type
+				-<char>+|-. Aborts out of there was a problem.
+	Params:		Str = Text of item
+	Returns:	true if a plus option
+  ---------------------------------------------------------------------- */
+GString CheckFileString(const char * Str)
+{
+	GString	RetStr;
+
+	if (strlen(Str)>3 && (Str[0]=='-' || Str[0]=='/') && (Str[2]==':' || Str[2]==':'))
+		RetStr=&Str[3];
+	else
+		GObject::Error(ERR_FATAL,"Problem with cmd line option %s",Str);
+
+	return(RetStr);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:		void Usage(void)
+	Notes:			Usage of the util
+  ---------------------------------------------------------------------- */
+void Usage(void)
+{
+	cout<<"Usage: PARKGRAB <file> [ <file>.. ] [ switches.. ]\n";
+	cout<<"Switches:\n"<<endl;
+	cout<<"-s<+|->\t\t\tSet recurse sub dirs			(default off)"<<endl;
+	cout<<"-c<+|->\t\t\tSet cross hair offset detection	(default off)"<<endl;
+	cout<<"-z<+|->\t\t\tSet colour zero trans			(default off)"<<endl;
+	cout<<"-m<+|->\t\t\tSet move in u/v coords			(default off)"<<endl;
+	cout<<"-r<+|->\t\t\tSet if spr rotation allowed		(default  on)"<<endl;
+	cout<<"-q<+|->\t\t\tShrink to bounds of lbm			(default  on)"<<endl;
+	cout<<"-y<+|->\t\t\tCompress tpages					(default off)"<<endl;
+	cout<<"-^<+|->\t\t\tDo not write a tpage			(default off)"<<endl;
+	cout<<"-h<+|->\t\t\tForce tpage height to half		(default off)"<<endl;
+	cout<<"-w<+|->\t\t\tOnly write animated headers		(default off)"<<endl;
+	cout<<"-b<+|->\t\t\tDo not write spare boxes		(default off)"<<endl;
+	cout<<"-a<+|->\t\t\tAlign headers to 2k chunk		(default off)"<<endl;
+	cout<<endl;
+	cout<<"-f:x,y\t\t\tForce offsets for sprs to x,y"<<endl;
+	cout<<"-t:b,w,h\t\tt=base tp,x=# tps wide,h=# tps high"<<endl;
+	cout<<"-e:<maxsize>\t\tSet maximum size for textures"<<endl;
+	cout<<"-p:<rep file>\t\tRead in a shared texture file for gin files"<<endl;
+	cout<<endl;
+	cout<<"-o:<filename>\t\tOutput Vram filename"<<endl;
+	cout<<"-x:<filename>\t\tOutput Sprfile filename"<<endl;
+	cout<<"-l:<tplbmname>\t\tWrite out an lbm of the tpage "<<endl;
+	cout<<"-k:<repname>\t\tWrite out a vram report"<<endl;
+	cout<<"-~:<filename>\t\tWrite out raw VRAM image"<<endl;
+	cout<<endl;
+	cout<<"-twisting_my_melon_man"<<endl;
+	cout<<endl;
+}
+
+/*----------------------------------------------------------------------
+	Function:	void AllFiles::AddFile(const char * Name)
+	Purpose:	Add a file to the list, it takes all the current
+				properties that the AllFiles object has.
+	Params:		Name of file to add
+  ---------------------------------------------------------------------- */
+void AllFiles::AddFile(const char * Name)
+{
+	DoCycle(Name,RecurseFiles);
+}
+
+/*----------------------------------------------------------------------
+	Function:	void AllFiles::FileCallback(char const * FName,int FileNum)
+  ---------------------------------------------------------------------- */
+#include <gintex.h>
+#include <algorithm>
+
+void AllFiles::FileCallback(char const * FName,int FileNum)
+{
+	FileInfo	MyInfo;
+	bool		ThisZeroColZero;
+
+
+	GFName		FileName(FName);
+
+	GString		Ext(FileName.Ext());
+	
+	Ext.Lower();
+
+	if (Ext=="gin")
+		{
+		vector<GString> NonSharedTextures;
+
+//		Gin4File		MyFile;
+		CScene		MyFile;
+		MyFile.Load(FName);
+
+		MyFile.GetNonSharedTextures(AllExternalSharedTextures,NonSharedTextures);
+
+
+		vector<GString> NewEntrys;
+
+		for (int f=0;f<NonSharedTextures.size();f++)
+			{
+			if (find(UniqueTexturesSoFar.begin(),UniqueTexturesSoFar.end(),NonSharedTextures[f]) == UniqueTexturesSoFar.end())
+				{
+				NewEntrys.push_back(NonSharedTextures[f]);
+				UniqueTexturesSoFar.push_back(NonSharedTextures[f]);
+				}
+			}
+
+
+		for (f=0;f<NewEntrys.size();f++)
+			FileCallback(NewEntrys[f],0);
+
+		cout<<"Read gin file *"<<FName<<"*"<<endl;
+		}
+	else
+		{
+		GFName	Name(FName);
+
+		if (Name.File()[0]=='+')
+			ThisZeroColZero=true;
+		else
+			ThisZeroColZero=ZeroColZero;
+
+
+		if (Name.File()[0]=='!')
+			m_allocateAs16bit=true;
+		else
+			m_allocateAs16bit=false;
+
+		if (Name.File()[0] == '@')
+		{
+			ThisZeroColZero = true;
+			m_allocateAs16bit = true;
+		}
+
+		GString TheFile(FName);
+		TheFile.Lower();
+			
+		MyInfo.SetInfo(TheFile,CrossHair,ThisZeroColZero,MoveUVs,AllowRotate,ShrinkToFit,m_allocateAs16bit);
+		cout<<"Add image file "<<TheFile<<endl;
+
+		if (ForceOffsets)
+			MyInfo.SetForceOffsets(XOff,YOff);
+		
+		AllFileInfos.resize(AllFileInfos.size()+1);
+		AllFileInfos[AllFileInfos.size()-1]=MyInfo;
+		}
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	void AllFiles::FileCallback(char const * FName,int FileNum)
+  ---------------------------------------------------------------------- */
+void AllFiles::SortOrder()
+{
+	if (!m_noSort)
+		{
+		int i,j;
+		FileInfo MyInfo;
+		int count = AllFileInfos.size();
+
+		for (i=0; i<count; i++)
+			{
+			for (j=0; j<count; j++)
+				{
+				if (strcmp(AllFileInfos[i].GetFileName(), AllFileInfos[j].GetFileName())<0)
+					{
+					MyInfo = AllFileInfos[i];
+					AllFileInfos[i] = AllFileInfos[j];
+					AllFileInfos[j] = MyInfo;
+					}
+				}
+			}
+		}
+}
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/pak.cpp b/Utils/parkgrab/pak.cpp
new file mode 100644
index 000000000..40da81b94
--- /dev/null
+++ b/Utils/parkgrab/pak.cpp
@@ -0,0 +1,359 @@
+/*=========================================================================
+
+	PAK.CPP	
+
+	Author:  Gary Liddon @ Climax (from work by Nick Pelling && Carl Muller)
+	Created:
+	Project: Diablo PSX
+	Purpose: PAK decompress \ compress code
+
+	Copyright (c) 1997 Climax Development Ltd
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+
+/*	Local
+	----- */
+#include <string.h>
+#include "pak.h"
+
+/*	Graphics
+	-------- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+#define UNPAKBUFFERSIZE 4096
+#define STRMAX			80
+#define BUFFERSIZE		30000
+#define TRIGGER			20000
+#define MAXUNIQUE		127
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+struct Block
+{
+	int		data[128];
+	BOOL	blockrep;
+	int		blocksize;
+	int		blockoffset;
+
+	u8 *	Dest;
+	int		outsize;
+
+	virtual void fputc(u8 Val)
+		{
+		*Dest=Val;
+		Dest++;
+		outsize++;
+		}
+
+	void writeBlock(void);
+};
+
+struct CountBlock : Block
+{
+	virtual void fputc(u8 Val)
+		{
+		Dest++;
+		outsize++;
+		}
+};
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+static int s_lastAmountOfCompressedData;
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+static void writeblock(struct block *theblock);
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void Block::writeBlock(void)
+{
+	if ((blockrep) && (blocksize == 0))
+		{
+		/* Terminator */
+		fputc(128);
+		fputc(0);
+		}
+	else if (blockrep)
+		{
+		fputc(blockoffset);
+		fputc(blocksize);
+		}
+	else /* Unique bytes */
+		{
+		fputc(blocksize & 127);
+
+		for (int i = 0; i <= blocksize; i++)
+			fputc(data[i]);
+		}
+
+	// Get ready for next block
+	blockrep = FALSE;
+	blockoffset = 0;
+	blocksize = -1;
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+static bool memequ(u8 const * p1,u8 const * p2,int size)
+{
+	bool	same;
+
+	same=true;
+
+	for (int f=0;f<size && same;f++)
+		same=p1[f]==p2[f];
+
+	return(same);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int lowLevelPak(u8 * Dest,u8 const * buffer,int insize,Block & theblock)
+{
+	long				begin, end, bestlength;
+	int					offset, bestoffset;
+	unsigned char const *		theptr;
+	unsigned char const *		ptr1;
+	unsigned char const *		ptr2;
+	unsigned char const *		ptr3;
+	long				BACKDIST, FORWARDDIST, MINBLOCK;
+
+	theblock.Dest=Dest;
+	theblock.outsize=0;
+	theblock.blockrep=FALSE;
+
+	BACKDIST = -128;
+	FORWARDDIST = 255;
+	MINBLOCK = 3;
+
+	int  inpos = 0;
+
+	theblock.blocksize = -1;
+	theblock.data[++theblock.blocksize] = buffer[inpos++];
+	theblock.data[++theblock.blocksize] = buffer[inpos++];
+
+	while (inpos < insize)
+		{
+		/* See if we should load new data into the buffer */
+
+		begin = -inpos;
+		end = insize - inpos;
+
+		if (begin < BACKDIST)
+			begin = BACKDIST;
+
+		if (end > FORWARDDIST)
+			end = FORWARDDIST;
+
+		bestoffset = begin;
+		bestlength = 1;
+		theptr = buffer + (inpos);
+
+		ptr1 = buffer + (inpos + begin);
+
+		for (offset = begin; offset < 0; offset++)
+			{
+			if (*ptr1 == *theptr)
+				{
+				if (memequ(ptr1, theptr, bestlength + 1))
+					{
+					bestlength++;
+					bestoffset = offset;
+					ptr2 = ptr1 + bestlength;
+					ptr3 = theptr + bestlength;
+
+					while (*ptr2 == *ptr3)
+						{
+						ptr2++;
+						ptr3++;
+						bestlength++;
+						if (bestlength >= end)
+							break;
+						}
+					}
+				}
+
+			if (bestlength >= end)
+				{
+			 	bestlength = end;
+				break;
+				}
+
+			ptr1++;
+			}
+
+
+		if (bestlength < MINBLOCK)
+			{
+			/* See if last block is unique */
+
+			if (theblock.blockrep) /* Flush previous special block */
+				{
+				theblock.writeBlock();
+				theblock.data[++theblock.blocksize] = buffer[inpos++];
+				}
+			else 
+				{
+				/* Add to it */
+
+				if (theblock.blocksize >= MAXUNIQUE)
+					theblock.writeBlock();
+
+				theblock.data[++theblock.blocksize] = buffer[inpos++];
+				}
+			}
+		else
+			{
+			/* We have found a match */
+			theblock.writeBlock();
+			theblock.blockrep = TRUE;
+			theblock.blocksize = bestlength;
+			theblock.blockoffset = bestoffset;
+			inpos += bestlength;
+			}
+		}
+
+	/* Flush buffer */
+	
+	theblock.writeBlock();
+
+	/* Terminate file */
+
+	theblock.blockrep = TRUE;
+	theblock.blocksize = 0;
+	theblock.blockoffset = 0;
+	theblock.writeBlock();
+
+	return(theblock.outsize);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int PAK_doPak(u8 * Dest,u8 const * buffer,int insize)
+{
+	Block	outBlock;
+	return(lowLevelPak(Dest,buffer,insize,outBlock));
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int	PAK_findPakSize(u8 const * buffer,int insize)
+{
+	CountBlock	outBlock;
+	return(lowLevelPak(NULL,buffer,insize,outBlock));
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int PAK_doUnpak(u8 * Dest,u8 const * Source)
+{
+	int			outsize = 0;
+	u8 const * 	originalSource;
+
+	originalSource=Source;
+
+	while (1)                           /* ie, continue until end mark */
+		{
+		u8 const *	From;
+
+		int		size;
+		int		ch;
+
+		ch = *Source++;
+
+		if (ch < 128)					/* if it is in range {0..127} then */
+			{
+			size = (ch + 1);
+			From=Source;
+			Source+=size;
+			}
+		else
+			{
+			size = *Source++;
+
+			if (size == 0)				/* distance == 0  =>  end of file */
+				break;
+
+			From=Dest+(s8)ch;
+			}
+
+		u8 *	endAddr;
+		endAddr=(u8*)(u32(From)+size);
+
+		outsize += size;
+
+		while (From!=endAddr)
+			{
+			*Dest=*From;
+			Dest++;
+			From++;
+			}
+		}
+
+	s_lastAmountOfCompressedData=Source-originalSource;
+
+	return(outsize);
+}
+
+int	PAK_getLastAmountOfDataRead(void)
+{
+	return(s_lastAmountOfCompressedData);
+}
+
+/*===========================================================================
+ end */
+
+
+
+
diff --git a/Utils/parkgrab/pak.h b/Utils/parkgrab/pak.h
new file mode 100644
index 000000000..f3f5df83f
--- /dev/null
+++ b/Utils/parkgrab/pak.h
@@ -0,0 +1,61 @@
+/*=========================================================================
+
+	PAK.H
+
+	Author:  Carl Muller (algorithm Nick Pelling && Carl Muller)
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1997 Climax Development Ltd
+
+===========================================================================*/
+
+#ifndef __PAK_PAK_H__
+#define __PAK_PAK_H__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+#include <gtypes.h>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+int		PAK_doPak(u8 * Dest,u8 const * source,int insize);
+int		PAK_doUnpak(u8 * Dest,u8 const * Source);
+int		PAK_findPakSize(u8 const * souce,int insize);
+int		PAK_getLastAmountOfDataRead(void);
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* __PAK_PAK_H__ */
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/parkgrab.dsp b/Utils/parkgrab/parkgrab.dsp
new file mode 100644
index 000000000..eb4f5c6bb
--- /dev/null
+++ b/Utils/parkgrab/parkgrab.dsp
@@ -0,0 +1,154 @@
+# Microsoft Developer Studio Project File - Name="parkgrab" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Console Application" 0x0103
+
+CFG=parkgrab - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "parkgrab.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "parkgrab.mak" CFG="parkgrab - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "parkgrab - Win32 Release" (based on "Win32 (x86) Console Application")
+!MESSAGE "parkgrab - Win32 Debug" (based on "Win32 (x86) Console Application")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""$/tp2psx/utils/parkgrab", IXNAAAAA"
+# PROP Scc_LocalPath "."
+CPP=cl.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "parkgrab - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Ignore_Export_Lib 0
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD CPP /nologo /MD /W3 /GX /O2 /I "..\glibdev\glib\include" /I "..\glibdev\glib\include\pc" /I "..\ginutils\tplib" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /FR /YX /FD /c
+# ADD BASE RSC /l 0x809 /d "NDEBUG"
+# ADD RSC /l 0x809 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib win32lib.lib tplib.lib /nologo /subsystem:console /machine:I386 /out:"../../tools/parkgrab.exe" /libpath:"..\glibdev\glib\lib\win32lib\release" /libpath:"..\ginutils\tplib\release"
+
+!ELSEIF  "$(CFG)" == "parkgrab - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Ignore_Export_Lib 0
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD CPP /nologo /G5 /MDd /W3 /Gm /GX /ZI /Od /I "..\glibdev\glib\include" /I "..\glibdev\glib\include\pc" /I "..\ginutils\tplib" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /FR /YX /FD /GZ /c
+# ADD BASE RSC /l 0x809 /d "_DEBUG"
+# ADD RSC /l 0x809 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=link.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib win32lib.lib tplib.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept /libpath:"..\glibdev\glib\lib\win32lib\debug" /libpath:"..\ginutils\tplib\debug"
+
+!ENDIF 
+
+# Begin Target
+
+# Name "parkgrab - Win32 Release"
+# Name "parkgrab - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\bmploader.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\cross.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\grect.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\main.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\pak.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\sprset.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\tpage.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\VImage.cpp
+# End Source File
+# End Group
+# Begin Group "Header Files"
+
+# PROP Default_Filter "h"
+# Begin Source File
+
+SOURCE=.\bmploader.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\cross.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\grect.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\pak.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\sprset.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\tpage.h
+# End Source File
+# Begin Source File
+
+SOURCE=.\vimage.h
+# End Source File
+# End Group
+# End Target
+# End Project
diff --git a/Utils/parkgrab/parkgrab.dsw b/Utils/parkgrab/parkgrab.dsw
new file mode 100644
index 000000000..8bebab67d
--- /dev/null
+++ b/Utils/parkgrab/parkgrab.dsw
@@ -0,0 +1,33 @@
+Microsoft Developer Studio Workspace File, Format Version 6.00
+# WARNING: DO NOT EDIT OR DELETE THIS WORKSPACE FILE!
+
+###############################################################################
+
+Project: "parkgrab"=.\parkgrab.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+    begin source code control
+    "$/PRLSR/utils/parkgrab", TCEAAAAA
+    .
+    end source code control
+}}}
+
+Package=<4>
+{{{
+}}}
+
+###############################################################################
+
+Global:
+
+Package=<5>
+{{{
+}}}
+
+Package=<3>
+{{{
+}}}
+
+###############################################################################
+
diff --git a/Utils/parkgrab/parkgrab.ncb b/Utils/parkgrab/parkgrab.ncb
new file mode 100644
index 000000000..f88fe5a38
Binary files /dev/null and b/Utils/parkgrab/parkgrab.ncb differ
diff --git a/Utils/parkgrab/sprset.cpp b/Utils/parkgrab/sprset.cpp
new file mode 100644
index 000000000..1a24c8508
--- /dev/null
+++ b/Utils/parkgrab/sprset.cpp
@@ -0,0 +1,1314 @@
+/*=========================================================================
+
+	SPRSET.CPP	
+
+	Author:		Gary Liddon @ Fareham
+	Created:
+	Project:	TPW Parkgrab
+	Purpose:	Object that reads in all the frames for sprites
+				processes them into tpages and spits it all out to
+				disk
+							
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <algorithm>
+#include <conio.h>
+#include <math.h>
+
+/*	Glib
+	---- */
+#include <gfname.hpp>
+#include <dpanim.hpp>
+#include <misc.hpp>
+#include <gutils.h>
+#include <tquant.h>
+
+/*	Local
+	----- */
+#include "sprset.h"
+#include "cross.h"
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+static const char BadFileChars[] =
+{
+	'+',	'-',	'*',	'/',	'\\',	'#',	',',
+	'.',	'(',	')',	'!',	'"',	'£',	'$',
+	'%',	'^',	'&',	'=',	'#',	':',	';',	'<',
+	'>',	'?',	'@',	'{',	'}',	'[',	']',	'¬',
+};
+
+static const int	nbBadFileChars = (sizeof(BadFileChars) / sizeof(char));
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+GString  ReplaceBadFileChars(GString s)
+{
+	GString out;
+	const char *textin = (const char*)s;
+	char *textout = new char[s.Len()+1];
+	memset(textout, 0, s.Len()+1);
+	int i, p;
+
+	p=0;
+	for (i=0; i<s.Len(); i++)
+	{
+		char	ic;
+
+		ic=textin[i];
+
+		for (int c=0;c<nbBadFileChars;c++)
+		{
+			if (ic == BadFileChars[c])	ic = '_';
+		}
+		textout[i] = ic;
+	}
+	out = textout;
+	delete textout;
+	return out;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::AddFiles(FIVec const & FileList)
+{
+	FIVecConstIt	It;
+
+	for (It=FileList.begin();It !=FileList.end();It++)
+		AddFile(*It);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Add and process a file from the file info
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::AddFile(FileInfo const & ThisInfo)
+{
+	GFName	FileName(ThisInfo.GetActualFileName());
+
+	GString Ext(FileName.Ext());
+	Ext.Upper();
+
+	if (Ext == "LBM" || Ext == "BMP")
+		AddLbm(ThisInfo);
+	else if (Ext == "ANM")
+		AddAnm(ThisInfo);
+	else
+		Error(ERR_FATAL,"Don't deal with these sort of files : %s", FileName.FullName());
+}
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::AddFrame(Frame const & Fr,FileInfo const & ThisInfo)
+{
+
+
+	AllSprFrames.resize(AllSprFrames.size()+1);
+	SprFrame & AddFr=AllSprFrames[AllSprFrames.size()-1];
+	AddFr.SetFrameAndInfo(Fr,ThisInfo,MaxSize);
+
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Add an LBM file process it according to the file info
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+void SprSet::AddLbm(FileInfo const & ThisInfo)
+{
+	Frame	MyFrame;
+	GString	Ext;
+	GFName	Fname(ThisInfo.GetActualFileName());
+	Ext=Fname.Ext();
+	Ext.Upper();
+
+
+	
+	if (Ext=="LBM")
+		MyFrame.LoadLbm(ThisInfo.GetActualFileName());
+	else if (Ext =="BMP")
+		MyFrame.LoadBMP(ThisInfo.GetActualFileName());
+
+	AddFrame(MyFrame,ThisInfo);
+}
+
+
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Add an ANM file process it according to the file info
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::AddAnm(FileInfo const & ThisInfo)
+{
+	DpAnimFilter	Filter;
+	GAnim			ThisAnim;
+	FileInfo		TempFileInfo;
+
+	TempFileInfo=ThisInfo;
+
+	ThisAnim.Load(Filter,ThisInfo.GetActualFileName());
+
+	GFName ThisName(ThisInfo.GetFileName());
+
+	GString MyStr(ThisName.File());
+	MyStr+="_%04d";
+
+	for (int f=0;f<ThisAnim.NumOfFrames();f++)
+		{
+		char NameBuff[200];
+		sprintf(NameBuff,MyStr,f);
+		TempFileInfo.SetName(NameBuff);
+		AddFrame(ThisAnim[f],TempFileInfo);
+		}
+
+	cout<<"Added anim file "<<ThisInfo.GetFileName()<<" ("<<ThisAnim.NumOfFrames()<<" frames)"<<endl;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Get a list of unique pals from the frames we have
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::ProcessPals(void)
+{
+	SprFrIt it;
+
+	/*
+		Reduce each frame's palette
+		give each frame a paletteindex
+		Also make each zero entry of the palette black
+	*/
+
+	for (it=AllSprFrames.begin();it!=AllSprFrames.end();it++)
+		{
+		SprFrame & frm=(*it);
+
+		frm.ReducePal();
+
+		if (frm.GetZeroColZero() || frm.GetPlusColZero())
+			{
+			frm.GetPal()[0]=Colour(0,0,0);
+			}
+		}
+
+	
+	/* Create a list of unique palettes from the frames we've got and then
+		give each frame a paletteindex
+	*/
+
+	for (it=AllSprFrames.begin();it!=AllSprFrames.end();it++)
+		{
+		SprPalVecIt	PalIt;
+		int			PalIndex;
+
+		/* Run through the palettes we already have to see if it's already there */
+
+		Palette const & ThisPal=(*it).GetPal();
+
+		PalIndex=-1;
+
+		for (PalIt=AllSprPals.begin();PalIt != AllSprPals.end() && PalIndex==-1;PalIt++)
+			{
+			if (ThisPal.IsIntersecting(*PalIt))
+				{
+				if (ThisPal.GetNumOfCols() > (*PalIt).GetNumOfCols())
+					(*PalIt)=ThisPal;
+	
+				PalIndex=PalIt-AllSprPals.begin();
+				}
+			}
+
+		/* If Palindex == -1 then we couldn't find the palette we wanted so add this one to the pool */
+
+		if (PalIndex==-1)
+			{
+			AllSprPals.resize(AllSprPals.size()+1);
+			SprPal & ThisSprPal=AllSprPals[AllSprPals.size()-1];
+			PalIndex=AllSprPals.size()-1;
+			ThisSprPal=ThisPal;
+			ThisSprPal.SetPlusColZero((*it).GetPlusColZero());
+			ThisSprPal.SetZeroColZero((*it).GetZeroColZero());
+			ThisSprPal.SetName((*it).GetName());
+			}
+
+		/* Set the sprframe to have the write pal index */
+
+		(*it).SetPalIndex(PalIndex);
+		AllSprPals[PalIndex].SetPalIndex(PalIndex);
+		}
+
+	cout<<"Found "<<AllSprPals.size()<<" unique pal(s)"<<endl;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Allocate all processed frames into tpages
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::WriteLBM(char const * FileName)
+{
+	if (Vi)
+		Vi->SaveAs16ColLbm(FileName);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+#include <direct.h>
+
+void SprSet::WriteReport(char const * File)
+{
+	const		int DirLen=1024;
+	char		Dir[DirLen+1];
+	GString		CurrDir;
+
+	CurrDir=getcwd(Dir,DirLen);
+	CurrDir.Upper();
+	CurrDir=CurrDir+"\\";
+
+	GString	OutFileName(File);
+	OutFileName.Lower();
+
+	Gofstream Out;
+
+	Out.open(OutFileName,ios::out);
+
+	if (Out)
+		{
+		Out<<"File\tTPage\tClut\tu\tv\tw\th\tRotated"<<endl;
+
+		for (int f=0;f<AllSprFrames.size();f++)
+			{
+			GString		RelName;
+			u16			Clut;
+			u16			Tpage;
+			int			Rotated;
+			GString		Name;
+			int			u,v,w,h;
+
+			SprFrame & Frm =AllSprFrames[f];
+
+			Clut=Frm.GetClut();
+			Tpage=Frm.GetTpage();
+			Rotated=Frm.IsRotated()==true ? 1 : 0;
+			Name=Frm.GetFileInfo()->GetActualName();
+			u=Frm.GetTPRect().X;
+			v=Frm.GetTPRect().Y;
+			w=Frm.GetWidth();
+			h=Frm.GetHeight();
+
+			RelName=GFName::makerelative(CurrDir,Name,Dir);
+
+			Out<<(char const *)RelName<<"\t$"<<hex<<Tpage<<"\t$"<<Clut<<"\t$"<<u<<"\t$"<<v<<"\t$"<<w<<"\t$"<<h<<" "<<Rotated<<endl;
+			}
+
+		Out.close();
+		}
+	else
+		Error(ERR_FATAL,"Couldn't open file %s for output",(char const *)OutFileName);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Allocate all processed frames into tpages
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::Write(char const * File,int TpNumber,int WidthInTpages,int HeightInTpages)
+{
+	int	HeightInPixels;
+
+	if (m_halfTpage)
+	{
+		HeightInPixels = 128;
+	}
+	else
+	{
+		HeightInPixels = HeightInTpages * 256;
+	}
+
+	ProcessPals();
+
+	VRAM MyVram(WidthInTpages,HeightInPixels);
+
+	/* Add all the frames to a Tpage object */
+	AddFramesAndPalsToVRAM(MyVram,TpNumber,WidthInTpages,HeightInPixels);
+
+	/* Now make the output VRAM image */
+
+	int f;
+
+	Vi=new VRAMImage(WidthInTpages,HeightInPixels);
+
+	if (!Vi)
+		Error(ERM_OUTOFMEM);
+
+	for (f=0;f<AllSprFrames.size();f++)
+		Vi->PlotFrame(AllSprFrames[f]);
+
+	for (f=0;f<AllSprPals.size();f++)
+		Vi->PlotPal(AllSprPals[f]);
+
+	/*
+	struct SpriteBankHdr
+	{
+		u16			NumOfSprites;
+		u16			NumOfTPages;
+		
+		u16			TpageStart;
+		u16			WidthInTpages;
+		
+		u16			HeightInTpages;
+		u16			NumOfSpareBoxes;
+	};
+	*/
+
+	Gofstream Out(Gofstream::LITTLE_ENDIAN);
+
+	GString	OutFileName(File);
+	OutFileName.Lower();
+
+	Out.open(OutFileName,ios::out|ios::binary);
+
+	TPRectVec	spareVRAM;
+
+	MyVram.getUnusedSpace(spareVRAM);
+
+	if (Out)
+		{
+int	FrameCount=AllSprFrames.size();
+		if (m_AnimatedHeadersOnly)
+			{
+			FrameCount=0;
+			for (f=0;f<AllSprFrames.size();f++)
+				if (AllSprFrames[f].IsAnimated()) FrameCount++;
+
+			}
+		Out.Put16(FrameCount);
+
+		if (m_noWriteTpages)
+			Out.Put16(0);
+		else
+			Out.Put16(WidthInTpages*HeightInTpages);
+
+		Out.Put16(TpNumber);
+
+		if (m_noWriteTpages)
+			{
+			Out.Put16(0);
+			Out.Put16(0);
+			}
+		else
+			{
+			Out.Put16(WidthInTpages);
+			Out.Put16(HeightInPixels);
+			}
+// Dont output spare boxes
+		if (m_DontOutputBoxes)
+			Out.Put16(0);
+		else
+			Out.Put16(spareVRAM.size());
+		Out.Put16(m_compressTpages ? 1 : 0);
+		Out.Put16(0);
+
+		Out.Align(sizeof(u32));
+
+		int		f;
+
+
+		int		thisPos,size;
+
+		thisPos=Out.tellp();
+		if (m_AnimatedHeadersOnly)
+			{
+			printf("Writing only animated headers (%i).\n",FrameCount);
+			for (f=0;f<AllSprFrames.size();f++)	// Write Animated headers only
+				{
+				if (AllSprFrames[f].IsAnimated()) AllSprFrames[f].WriteHeader(Out);
+				}
+			}
+		else
+			{
+			printf("Writing All headers (%i).\n",AllSprFrames.size());
+			for (f=0;f<AllSprFrames.size();f++)	// Write all headers
+				{
+				AllSprFrames[f].WriteHeader(Out);
+				}
+
+			}
+
+		size=int(Out.tellp())-thisPos;
+		cout<<"size of headers == "<<size<<endl;
+
+		Out.Align(sizeof(u32));
+
+		if (m_DontOutputBoxes)
+			{
+			printf("Skipping spare boxes.\n");
+			}
+		else
+			{
+			for (f=0;f<spareVRAM.size();f++)
+				{
+				Out.Put16(spareVRAM[f].X);
+				Out.Put16(spareVRAM[f].Y);
+				Out.Put16(spareVRAM[f].W);
+				Out.Put16(spareVRAM[f].H);
+				}
+			Out.Align(sizeof(u32));
+			}
+
+		if (m_AlignHeaders)
+			{
+			printf("Aligning headers to 2k chunk.\n");
+			Out.Align(2048);
+			}
+		
+		if (!m_noWriteTpages)
+			{
+			Vi->setDoCompress(m_compressTpages);
+			Vi->Write(Out);
+			}
+
+		Out.close();
+		}
+	else
+		Error(ERR_FATAL,"Error wring file %s",(char const *)OutFileName);
+
+	WriteHeaderFile(GetHeaderFileName(File));
+}
+
+
+GString	SprSet::GetHeaderFileName(char const * File)
+{
+	GString	HeaderFileName;
+
+	if (IncOutFile == "")
+		{
+		GFName	HeaderFile(File);
+		HeaderFile.Ext("h");
+		HeaderFileName=HeaderFile.FullName();
+		}
+	else
+		HeaderFileName=IncOutFile;
+
+	HeaderFileName.Lower();
+
+	return(HeaderFileName);
+}
+
+void SprSet::WriteHeaderFile(char const * HName)
+{
+	ofstream HOut;
+	int			f;
+
+	GFName	HeaderFile(HName);
+	
+	GString OFileDefine;
+	OFileDefine="__SPR_";
+	OFileDefine+=HeaderFile.File();
+	OFileDefine+="_H__";
+	OFileDefine.Upper();
+
+	GString		HeaderFileName(HeaderFile.FullName());
+	HeaderFileName.Lower();
+	
+	HOut.open(HeaderFileName,ios::out);
+
+	if (HOut)
+		{
+		HOut<<"#ifndef "<<(char const *)OFileDefine<<endl;
+		HOut<<"#define "<<(char const *)OFileDefine<<endl;
+
+		HOut<<"/* Palette defines */"<<endl;
+
+		for (f=0;f<AllSprPals.size();f++)
+			HOut<<"#define PAL_"<<ReplaceBadFileChars(AllSprPals[f].GetName())<<" "<<AllSprPals[f].GetClut()<<endl;
+
+		HOut<<"/* Frame defines */"<<endl;
+
+		for (f=0;f<AllSprFrames.size();f++)
+			{
+			HOut<<"#define FRM_"<<ReplaceBadFileChars(AllSprFrames[f].GetName())<<" "<<f<<endl;
+			}
+
+		HOut<<"#endif "<<endl;
+
+		HOut.close();
+		}
+	else
+		Error(ERR_FATAL,"Error writing out file %s",(char const *)HeaderFileName);
+
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Allocate all processed frames into tpages
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::AddFramesAndPalsToVRAM(VRAM & Vr,int TpNumber,int WidthInTpages,int HeightInPixels)
+{
+	int		f;
+
+	/* Add Palettes first */
+
+	std::vector<SprPal>	CopySprPals;		/* Make a copy of the palettes */
+
+	CopySprPals=AllSprPals;
+
+	std::sort(CopySprPals.begin(),CopySprPals.end());	/* Sort em according to how many cols */
+
+	for (f=0;f<AllSprPals.size();f++)
+		{
+		TPRect		MyPalRect;
+		
+		SprPal & OriginalPal=AllSprPals[CopySprPals[f].GetPalIndex()];
+
+
+		MyPalRect.Set(TP_PAL,0,0,OriginalPal.GetNumOfCols(),1);
+
+		if (Vr.AllocVRAM(MyPalRect))
+			OriginalPal.SetVRAMPos(MyPalRect);
+		else
+			Error(ERR_FATAL,"Couldn't fit frames palettes into VRAM");
+		}
+	
+	
+	/* Add Frames */
+
+	std::vector<TPRect>	AllocRects;
+
+	AllocRects.resize(AllSprFrames.size());
+
+	std::vector<TPageType>	oldTypes;
+
+	oldTypes.resize(AllSprFrames.size());
+
+	for (f=0;f<AllSprFrames.size();f++)
+		{
+		AllocRects[f].InitFromFrame(AllSprFrames[f]);
+		AllocRects[f].SetDontRotate(!AllSprFrames[f].GetAllowRotate());
+		AllocRects[f].SetId(f);
+
+		if (AllSprFrames[f].GetFileInfo()->getAllocateAs16Bit())
+			oldTypes[f]=AllocRects[f].convertTo16Bit();
+		}
+
+	/* Allocate int VRAM */
+
+	if(Vr.AllocVRAM(AllocRects,false,true,true))
+		{
+		/*
+			Now go back through all the sprite frames and tell them where
+			they are going to sit in VRAM
+		*/
+
+		for (f=0;f<AllocRects.size();f++)
+			{
+			
+
+			if (AllSprFrames[AllocRects[f].GetId()].GetFileInfo()->getAllocateAs16Bit())
+				AllocRects[f].convertFrom16Bit(oldTypes[AllocRects[f].GetId()]);
+
+			AllSprFrames[AllocRects[f].GetId()].SetVRAMPos(AllocRects[f]);
+			}
+		}
+	else
+		{
+		Error(ERR_FATAL,"Couldn't fit frames into VRAM");
+		}
+
+	/* Go through and tell all pals and frames what the base tpage is */
+
+	for (f=0;f<AllSprFrames.size();f++)
+		AllSprFrames[f].SetTpBase(TpNumber);
+
+	for (f=0;f<AllSprPals.size();f++)
+		AllSprPals[f].SetTpBase(TpNumber);
+
+	/* Now go through all the frames and tell them what Clut values they need */
+
+	for (f=0;f<AllSprFrames.size();f++)
+		AllSprFrames[f].SetClut(AllSprPals[AllSprFrames[f].GetPalIndex()].GetClut());
+}
+/*----------------------------------------------------------------------
+  ---------------------------------------------------------------------- */
+void SprSet::writeRawTPage(char const * file)
+{
+	ofstream		out;
+
+	out.open(file,ios::binary|ios::out|ios::trunc);
+
+	if (out)
+		{
+		
+		if (Vi)
+			Vi->WriteInTpageChunks(out);
+		}
+	else
+		Error(ERR_FATAL,"Error opening raw file %s",file);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Write out sprs and pals to a sprite file (not a VRAM block)
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprSet::WriteSprFile(char const * Name)
+{
+	std::vector<int>	SprOffsets;
+	std::vector<int>	PalOffsets;
+
+	ProcessPals();
+
+	Gofstream	SpriteOut(Gofstream::LITTLE_ENDIAN);
+
+	GString		SpriteOutName(Name);
+	SpriteOutName.Lower();
+	SpriteOut.open(SpriteOutName,ios::binary|ios::out|ios::trunc);
+
+	if (SpriteOut)
+		{
+		int	NumOfSprs;
+		int	NumOfPals;
+		int PalOffsetTable;
+		int SprOffsetTable;
+
+		/*
+		struct SPR_RAM_HDR
+			{
+			int	NumOfPals;
+			int NumOfSprs;
+			int PalOffsets[NumOfPals];
+			int SprOfffsets[NumOfSprs];
+			RAM_FRAME_HDR	Frames[NumOfSprs];
+			Pals	Pals[NumOfPals];
+			Data	[NumOfSprs]
+			}
+	
+		*/
+
+		NumOfSprs=AllSprFrames.size();
+		NumOfPals=AllSprPals.size();
+
+		SpriteOut.Put32(NumOfPals);
+		SpriteOut.Put32(NumOfSprs);
+
+		SprOffsets.resize(NumOfSprs);
+		PalOffsets.resize(NumOfPals);
+
+		PalOffsetTable=SpriteOut.tellp();
+		SpriteOut.seekp(sizeof(u32)*NumOfPals,ios::cur);
+
+		SprOffsetTable=SpriteOut.tellp();
+		SpriteOut.seekp(sizeof(u32)*NumOfSprs,ios::cur);
+
+		int	f;
+
+		for (f=0;f<NumOfSprs;f++)
+			AllSprFrames[f].WriteHeaderNotInVram(SpriteOut);
+
+		for (f=0;f<NumOfPals;f++)
+			{
+			PalOffsets[f]=SpriteOut.tellp();
+			AllSprPals[f].Write(SpriteOut);
+			}
+
+		for (f=0;f<NumOfSprs;f++)
+			{
+			SprOffsets[f]=SpriteOut.tellp();
+			AllSprFrames[f].Write(SpriteOut);
+			}
+
+		SpriteOut.seekp(PalOffsetTable,ios::beg);
+
+		for (f=0;f<NumOfPals;f++)
+			SpriteOut.Put32(PalOffsets[f]);
+
+		SpriteOut.seekp(SprOffsetTable,ios::beg);
+
+		for (f=0;f<NumOfSprs;f++)
+			SpriteOut.Put32(SprOffsets[f]);
+
+		SpriteOut.close();
+		}
+	else
+		Error(ERR_FATAL,"Error opeing sprite file %s",(char const *)SpriteOutName);
+
+	WriteHeaderFile(GetHeaderFileName(Name));
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:	Add an ANM file process it according to the file info
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprFrame::SetFrameAndInfo(Frame const & Fr,FileInfo const & NewMyFileInfo,int MaxSize)
+{
+	Frame::CopyFrame(Fr);
+	MyFileInfo=NewMyFileInfo;
+
+
+	GFName	MyName(MyFileInfo.GetFileName());
+	GString	TempName=MyName.File();
+	TempName.Upper();
+
+	Name=TempName;
+	
+	/* Now Process the frame as needed */
+
+	int		XOff;
+	int		YOff;
+
+	
+	XOff=0;
+	YOff=0;
+
+
+	if (MyFileInfo.GetCrossHair() &&  !NewMyFileInfo.getAllocateAs16Bit())
+		{
+		CROSS_RES	CrossRes;
+
+		if (CrossRes.FindCrossHair(*this,255))
+			{
+			XOff=-CrossRes.x;
+			YOff=-CrossRes.y;
+			ReplaceColour(255,0);
+			}
+		}
+
+	/* Crop sprite down to only the pixels we want */
+
+	if (MyFileInfo.GetShrinkToFit() &&  !NewMyFileInfo.getAllocateAs16Bit())
+		{
+		Rect	Bound;
+		Bound=FindBoundingRect();
+		
+		if (Bound)
+			{
+			}
+		else
+			{
+			Bound.X=0;
+			Bound.Y=0;
+			Bound.W=1;
+			Bound.H=1;
+			}
+
+		Crop(Bound);
+
+		XOff+=Bound.X;
+		YOff+=Bound.Y;
+		}
+
+	if (MyFileInfo.GetForceOffsets() &&  !NewMyFileInfo.getAllocateAs16Bit())
+		{
+		XOff=-(MyFileInfo.GetXOff()-XOff);
+		YOff=-(MyFileInfo.GetYOff()-YOff);
+		}
+
+	if (MaxSize &&  !NewMyFileInfo.getAllocateAs16Bit())
+		{
+		int		NewWidth;
+		int		NewHeight;
+
+		NewWidth=GetWidth();
+		NewHeight=GetHeight();
+
+		if (NewWidth > MaxSize)
+			NewWidth=MaxSize;
+
+		if (NewHeight > MaxSize)
+			NewHeight=MaxSize;
+
+		if (NewWidth != GetWidth() || NewHeight != GetHeight())
+			{
+			cout<<"Reducing frame "<<GetFileInfo()->GetActualFileName()<<endl;
+			ResizeAndReduce(*this,GetNumOfCols(),float(NewWidth)/float(GetWidth()),float(NewHeight)/float(GetHeight()),MyFileInfo.GetZeroColZero());
+
+#if 0
+			char	Name[1024];
+			static int Val;
+			sprintf(Name,"c:\\data\\%d.lbm",Val);
+			Val++;
+			SaveLbm(Name);
+#endif
+			}
+		}
+
+	if (NewMyFileInfo.getAllocateAs16Bit())
+	{
+		int NewWidth = GU_AlignVal( GetWidth(), 4);
+		int NewHeight = GU_AlignVal( GetHeight(), 4);
+		if (NewWidth != GetWidth() || NewHeight != GetHeight())
+			{
+			cout<<"Reducing frame "<<GetFileInfo()->GetActualFileName()<<endl;
+			ResizeAndReduce(*this,GetNumOfCols(),float(NewWidth)/float(GetWidth()),float(NewHeight)/float(GetHeight()),MyFileInfo.GetZeroColZero());
+
+#if 1
+			char	Name[1024];
+			static int Val;
+			sprintf(Name,"c:\\data\\%d.lbm",Val);
+			Val++;
+			SaveLbm(Name);
+#endif
+			}
+	}
+
+	X=XOff;
+	Y=YOff;
+
+	if (Width > 254 || Height > 254)
+		{
+		Error(ERR_FATAL,"Images only allowed to 254x254, this is %dx%d : %s",Width,Height,MyFileInfo.GetActualFileName());
+		}
+
+
+}
+
+struct fRGBA
+	{
+	void Set(float _R,float _G,float _B,float _A)
+		{R=_R;G=_G;B=_B;A=_A;}
+
+	float	R,G,B,A;
+	};
+
+void SprFrame::ResizeAndReduce(Frame & Frm,int TargCols,float XPerc,float YPerc,bool ZeroSeeThrough)
+{
+	std::vector<fRGBA>	FullColNewScreen;
+	std::vector<u8>		DestBytePic;
+	std::vector<u8>		Bitmap;
+
+	u8			Pal[256*3];
+	u8 *		Dest;
+	int			f;
+
+	Bitmap.resize(Frm.GetWidth()*Frm.GetHeight()*4);
+
+	Frm.MakeRGBA(&Bitmap[0],ZeroSeeThrough);
+
+	int		Width,Height;
+
+	Width=Frm.GetWidth();
+	Height=Frm.GetHeight();
+
+	int NewWidth=float(Width)*XPerc;
+	int NewHeight=float(Height)*YPerc;
+	
+	if (!(Dest=new u8[NewWidth*NewHeight]))
+		GObject::Error(ERM_OUTOFMEM);
+
+	FullColNewScreen.resize(NewWidth*NewHeight);
+	DestBytePic.resize(NewWidth*NewHeight*3);
+
+	/* Now Super Sample it down */
+
+	const int Samples=8;
+
+	int		DestW=NewWidth;
+	int		DestH=NewHeight;
+	float	YMul=float(Height)/DestH;
+	float	XMul=float(Width)/DestW;
+
+	for (int dy=0;dy<DestH;dy++)
+		{
+		float	YPos=YMul*float(dy);
+
+		for (int dx=0;dx<DestW;dx++)
+			{
+			float	XPos=XMul*float(dx);
+
+			float	R=0;
+			float	G=0;
+			float	B=0;
+			float	A=0;
+
+			for (int Ys=0;Ys<Samples;Ys++)
+				for (int Xs=0;Xs<Samples;Xs++)
+					{
+					float	xp=floor((XPos)+(Xs*(XMul/Samples)));
+					float	yp=floor((YPos)+(Ys*(YMul/Samples)));
+					int		Index=(yp*Width+xp);
+
+					R+=float(Bitmap[Index*4+0])/255.0f;
+					G+=float(Bitmap[Index*4+1])/255.0f;
+					B+=float(Bitmap[Index*4+2])/255.0f;
+					A+=float(Bitmap[Index*4+3])/255.0f;
+					}
+
+			R/=float(Samples*Samples);
+			G/=float(Samples*Samples);
+			B/=float(Samples*Samples);
+			A/=float(Samples*Samples);
+
+			if (R>1.0f)
+				R=1.0f;
+
+			if (G>1.0f)
+				B=1.0f;
+			
+			if (B>1.0f)
+				B=1.0f;
+
+			int DestIndex=(dy*NewWidth+dx);
+
+			FullColNewScreen[DestIndex].Set(R,G,B,A);
+			}
+		}
+
+	/* Convert Back to RGBA into a dest byte picture */
+
+	const	float	Bound=0.5f;
+
+	for (f=0;f<NewWidth*NewHeight;f++)
+		{
+		float R=FullColNewScreen[f].R;
+		float G=FullColNewScreen[f].G;
+		float B=FullColNewScreen[f].B;
+
+		if (FullColNewScreen[f].A > Bound)
+			{
+			DestBytePic[f*3+0]=R*255;
+			DestBytePic[f*3+1]=G*255;
+			DestBytePic[f*3+2]=B*255;
+			}
+		else
+			{
+			DestBytePic[f*3+0]=0;
+			DestBytePic[f*3+1]=0;
+			DestBytePic[f*3+2]=0;
+			}
+		}
+
+	/* Now reduce colours */
+	Palette NewPal;
+
+	if (ZeroSeeThrough)
+		{
+		int	Cols=TargCols-1;
+
+		tquant(&DestBytePic[0],Dest,Pal,Cols,NewWidth*NewHeight);
+
+		for (f=0;f<NewWidth*NewHeight;f++)
+			{
+			if (FullColNewScreen[f].A > Bound)
+				Dest[f]=Dest[f]+1;
+			else
+				Dest[f]=0;
+			}
+
+		for (f=1;f<Cols+1;f++)
+			NewPal[f].SetRGB(Pal[(f-1)*3+0],Pal[(f-1)*3+1],Pal[(f-1)*3+2]);
+
+		NewPal[0].SetRGB(255,0,255);
+		}
+	else
+		{
+		int	Cols=TargCols;
+		
+		tquant(&DestBytePic[0],Dest,Pal,Cols,NewWidth*NewHeight);
+
+		for (f=0;f<Cols;f++)
+			NewPal[f].SetRGB(Pal[f*3+0],Pal[f*3+1],Pal[f*3+2]);
+		}
+
+	Frm.SetFrame(&Dest[0],NewWidth,NewHeight,NewPal);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+SprFrame::SprFrame(void)
+{
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprFrame::SetVRAMPos(TPRect const & NewRect)
+{
+	MyRect=NewRect;
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprFrame::WriteHeader(Gofstream & Out)
+{
+	/*
+	struct VRAM_FRAME_HDR
+	{
+	u16			tpage;
+	u16			clut;
+	u8			x,y,w,h;
+	u8			u,v;
+	u8			Rotated;
+	};
+	*/
+
+	Out.Align(sizeof(u16));
+	
+	u16	OutTpage=GetTpage();
+	u16	OutClut=GetClut();
+
+	Out.Put16(GetTpage());
+	Out.Put16(OutClut);
+	Out.put(s8(X));
+	Out.put(s8(Y));
+
+	if (MyFileInfo.GetMoveUVs() && Width && !MyFileInfo.getAllocateAs16Bit())
+		Out.put(s8(Width-1));
+	else
+		Out.put(s8(Width));
+
+	if (MyFileInfo.GetMoveUVs() && Height && !MyFileInfo.getAllocateAs16Bit())
+		Out.put(s8(Height-1));
+	else
+		Out.put(s8(Height));
+
+	
+	BDEPTH	RetDepth;
+	RetDepth=GetBitDepth();
+
+	Out.put(getU());
+	Out.put(u8(MyRect.Y));
+
+	IsRotated() ? Out.put(u8(1)) : Out.put(u8(0));
+
+	MyFileInfo.getAllocateAs16Bit() ? Out.put(u8(1)) : Out.put(u8(0));
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprFrame::WriteHeaderNotInVram(Gofstream & Out)
+{
+	/*
+	struct RAM_FRAME_HDR
+		{
+		u32			PalNum;
+		u8			x,y,w,h;
+		};
+	*/
+
+	Out.Align(sizeof(u32));
+
+	Out.Put32(PalIndex);
+	Out.put(s8(X));
+	Out.put(s8(Y));
+
+	if (MyFileInfo.GetMoveUVs() && Width)
+		Out.put(s8(Width-1));
+	else
+		Out.put(s8(Width));
+
+	if (MyFileInfo.GetMoveUVs() && Height)
+		Out.put(s8(Height-1));
+	else
+		Out.put(s8(Height));
+
+	Out.Align(sizeof(u32));
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprFrame::Write(Gofstream & Out) const
+{
+	/* Note, this is shite, it only works on 16 col images. Doh! Gaz */
+
+	const int	AlignPixels=4;
+	std::vector<u8>	Body;
+
+	Frame	NewFrame;
+
+	NewFrame=*this;
+	
+	Rect	OriginalRect;
+
+	OriginalRect=NewFrame;
+
+	OriginalRect.X=0;
+	OriginalRect.Y=0;
+	OriginalRect.W=GU_AlignVal(OriginalRect.W,AlignPixels);
+
+	NewFrame.Crop(OriginalRect);
+
+	int	nfW,nfH,nfLineWidthBytes,nfAreaBytes;
+	
+	nfW=NewFrame.GetWidth();
+	nfH=NewFrame.GetHeight();
+	nfLineWidthBytes=GU_AlignVal(nfW,2)/2;
+	nfAreaBytes=nfLineWidthBytes*nfH;
+
+	Body.resize(nfAreaBytes);
+
+	for (int y=0;y<nfH;y++)
+		for (int x=0;x<nfW;x++)
+			{
+			u8 *	PixAddr;
+			u8		ScrNib;
+
+			ScrNib=NewFrame.SeeData()[y*nfW+x]&0xf;
+
+			PixAddr=&Body[(x/2)+(nfLineWidthBytes*y)];
+			if ((x&1))
+				{
+				*PixAddr&=0x0f;
+				*PixAddr|=ScrNib<<4;
+				}
+			else
+				{
+				*PixAddr&=0xf0;
+				*PixAddr|=ScrNib;
+				}
+			}
+	
+	Out.write((char *)(&Body[0]),nfAreaBytes);
+	Out.Align(sizeof(u32));
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprPal::Write(Gofstream & Out) const
+{
+	std::vector<u16> OutPal;
+	MakePSXPal(OutPal);
+
+	Out.Put32(OutPal.size());
+	
+	for (int f=0;f<OutPal.size();f++)
+		Out.Put16(OutPal[f]);
+	
+	Out.Align(sizeof(u32));
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+u16 SprPal::GetPsxCol(Colour const & Col) const
+{
+	int		R,G,B;
+	R=Col.GetR()>>3;
+	G=Col.GetG()>>3;
+	B=Col.GetB()>>3;
+	return((R&0x1f)<<0)|((G&0x1f)<<5)|((B&0x1f)<<10);
+}
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void SprPal::MakePSXPal(std::vector<u16> & OutWords) const
+{
+
+	int		NumOfCols;
+	int		f;
+	
+	NumOfCols=(*this).GetNumOfCols();
+	OutWords.resize(NumOfCols);
+
+	if (GetZeroColZero() || GetPlusColZero())
+		{
+		OutWords[0]=0;
+
+		for (f=1;f<NumOfCols;f++)
+			{
+			u16	Col=GetPsxCol((*this)[f]);
+			Col += Col ? 0 : 1;
+			OutWords[f]=Col|0x8000;
+			}
+		}
+	else
+		{
+		for (f=0;f<NumOfCols;f++)
+			{
+			u16	Col=GetPsxCol((*this)[f]);
+			OutWords[f]=Col|0x8000;
+			}
+		}
+}
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/sprset.h b/Utils/parkgrab/sprset.h
new file mode 100644
index 000000000..90afc8495
--- /dev/null
+++ b/Utils/parkgrab/sprset.h
@@ -0,0 +1,569 @@
+/*=========================================================================
+
+	SPRSET.CPP	
+
+	Author:		Gary Liddon @ Farehame
+	Created:
+	Project:	TPW Parkgrab
+	Purpose:	Object that reads in all the frames for sprites
+				processes them into tpages and spits it all out to
+				disk
+							
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+#ifndef __SPRSET_H__
+#define __SPRSET_H__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <vector>
+
+/*	Glib
+	---- */
+#include <gobject.hpp>
+#include <gstring.hpp>
+#include <frame.hpp>
+#include <misc.hpp>
+
+/*	Local
+	----- */
+#include "tpage.h"
+#include "vimage.h"
+
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+/*	Encapsulates a file and all the infomation parkgrab needs to process it
+	----------------------------------------------------------------------- */
+class FileInfo
+	{
+	public:
+		FileInfo(void)
+			{
+			CrossHair=false;
+			ForceOffsets=false;
+			}
+
+		FileInfo(FileInfo const & Fi)	
+			{
+			operator=(Fi);
+			}
+
+		void operator=(FileInfo const & Fi)	
+			{
+			FileName = Fi.FileName;
+			strcpy(ActualFileName,Fi.ActualFileName);
+			CrossHair=Fi.CrossHair;
+			ZeroColZero = Fi.ZeroColZero;
+			PlusColZero = Fi.PlusColZero;
+			MoveUVs = Fi.MoveUVs;
+			AllowRotate=Fi.AllowRotate;
+			ForceOffsets=Fi.ForceOffsets;
+			XOff=Fi.XOff;
+			YOff=Fi.YOff;
+			ShrinkToFit=Fi.ShrinkToFit;
+			m_allocateAs16Bit=Fi.m_allocateAs16Bit;
+			}
+
+		void SetForceOffsets(int x,int y)
+			{
+			ForceOffsets=true;
+			XOff=x;
+			YOff=y;
+			}
+
+		GString  CheckForPlus(GString s)
+		{
+			GString out;
+			const char *textin = (const char*)s;
+			char *textout = new char[s.Len()+1];
+			memset(textout, 0, s.Len()+1);
+			int p;
+			bool	plus;
+
+			p=0;
+			if (textin[0] == '+')	plus = true;
+			else					plus = false;
+/*			for (i=0; i<s.Len(); i++)
+			{
+				textout[i]=textin[i];
+				if (textout[i] == '+')	plus = true;
+//				p++;
+//				else					p++;
+			}
+*/			PlusColZero = plus;
+
+			out = textin;
+			delete textout;
+			return out;
+		}
+
+		void SetInfo(const char * NewFileName,bool NewCrossHair,bool NewZeroColZero, bool NewMoveUVs,bool NewAllowRotate,bool NewShrinkToFit,bool allocateAs16Bit)
+			{
+			CrossHair=NewCrossHair;
+			ZeroColZero=NewZeroColZero;
+			MoveUVs  =NewMoveUVs;
+			AllowRotate=NewAllowRotate;
+			SetName(NewFileName);
+			ShrinkToFit=NewShrinkToFit;
+			
+			m_allocateAs16Bit=allocateAs16Bit;
+			
+			/*
+			if we're allocating on a 16 bit pixel boundary then
+			we don't want the texture to be rotated
+			*/
+
+			if (allocateAs16Bit)
+				AllowRotate=false;
+			}
+
+		const char * GetFileName(void) const
+			{return(FileName);}
+
+		const char * GetActualFileName(void) const
+			{return(ActualFileName);}
+
+		void SetName(const char * NewName)
+		{
+			if (NewName)	strcpy(ActualFileName,NewName);
+			FileName = CheckForPlus(ActualFileName);
+		}
+
+		bool	GetCrossHair(void) const
+			{return(CrossHair);}
+
+		bool	GetZeroColZero(void) const
+			{return(ZeroColZero);}
+
+		bool	GetPlusColZero(void) const
+			{return(PlusColZero);}
+
+		bool	GetMoveUVs(void) const
+			{return(MoveUVs);}
+
+		bool	GetAllowRotate(void) const
+			{return(AllowRotate);}
+
+		bool	GetForceOffsets(void) const
+			{
+			return(ForceOffsets);
+			}
+		
+		int		GetXOff(void) const
+			{
+			return(XOff);
+			}
+
+		int		GetYOff(void) const
+			{
+			return(YOff);
+			}
+
+		bool getAllocateAs16Bit(void) const
+			{return(m_allocateAs16Bit);}
+
+	char const * GetActualName(void) const
+		{return(ActualFileName);}
+
+	bool GetShrinkToFit(void) const
+		{return(ShrinkToFit);}
+
+	protected:
+		GString	FileName;
+		char	ActualFileName[256];
+		bool	CrossHair;
+		bool	ZeroColZero;
+		bool	PlusColZero;
+		bool	MoveUVs;
+		bool	AllowRotate;
+		bool	ForceOffsets;
+		bool	ShrinkToFit;
+		
+		bool	m_allocateAs16Bit;
+
+		int		XOff,YOff;
+	};
+
+typedef std::vector<FileInfo> FIVec;
+typedef std::vector<FileInfo>::iterator FIVecIt;
+typedef std::vector<FileInfo>::const_iterator FIVecConstIt;
+
+
+/*  A Palette of graphics with sprset specific stuff
+	---------------------------------------------- */
+class SprPal : public Palette
+{
+public:
+	SprPal(void)
+		{}
+	
+	SprPal(SprPal const & Pal)
+		{MakeCopy(Pal);}
+	
+	void operator=(SprPal const & Pal)
+		{MakeCopy(Pal);}
+
+	void operator=(Palette const & Pal)
+		{Palette::CopyPal(Pal);}
+
+	bool operator==(Palette const & Pal)
+		{return(Palette::operator==(Pal));}
+
+	bool operator<(SprPal const & Pal)
+		{return(GetNumOfCols() < Pal.GetNumOfCols());}
+
+	void SetPalIndex(int NewPalIndex)
+		{PalIndex=NewPalIndex;}
+
+	int GetPalIndex(void) const
+		{return(PalIndex);}
+
+	void SetVRAMPos(TPRect & NewRect)
+		{
+		MyRect=NewRect;
+		}
+
+	void SetTpBase(int NewTpBase)
+		{
+		TpBase=NewTpBase;
+		BaseTpX=((TpBase&0xf)*64);
+		BaseTpY=(TpBase>>4)*256;
+		}
+
+	u16 GetClut(void)
+		{
+		int	x=(MyRect.X/4)+BaseTpX;
+		int	y=MyRect.Y+BaseTpY;
+		return((y<<6)|((x>>4)&0x3f));
+		}
+
+	TPRect const & GetTPRect(void) const
+		{return(MyRect);}
+
+	char const * GetName(void) const
+		{return(Name);}
+
+	void SetName(char const * NewName)
+		{Name=NewName;}
+
+	void	SetZeroColZero(bool New)
+		{ZeroColZero=New;}
+
+	bool	GetZeroColZero(void) const
+		{return(ZeroColZero);}
+
+	void	SetPlusColZero(bool New)
+		{PlusColZero=New;}
+
+	bool	GetPlusColZero(void) const
+		{return(PlusColZero);}
+
+	void		Write(Gofstream & Out) const;
+	void		MakePSXPal(std::vector<u16> & OutWord) const;
+	u16	GetPsxCol(Colour const & Col) const;
+
+protected:
+	int		PalIndex;
+	int		TpBase;
+	int		BaseTpX;
+	int		BaseTpY;
+	bool	ZeroColZero;
+	bool	PlusColZero;
+	TPRect	MyRect;
+	GString	Name;
+
+	void MakeCopy(SprPal const & NewPal)
+		{
+		Palette::CopyPal(NewPal);
+		PalIndex=NewPal.PalIndex;
+		TpBase=NewPal.TpBase;
+		BaseTpX=NewPal.BaseTpX;
+		BaseTpY=NewPal.BaseTpY;
+		MyRect=NewPal.MyRect;
+		Name=NewPal.Name;
+		ZeroColZero=NewPal.ZeroColZero;
+		PlusColZero=NewPal.PlusColZero;
+		}
+};
+
+/*  A Frame of graphics with sprset specific stuff
+	---------------------------------------------- */
+class SprFrame : public Frame
+{
+public:
+	enum BDEPTH
+		{
+		BITS_4,
+		BITS_8,
+		};
+
+	SprFrame(void);
+	SprFrame(SprFrame const & NewFrame)
+		{MakeCopy(NewFrame);}
+
+	void operator=(SprFrame const & NewFrame)
+		{MakeCopy(NewFrame);}
+
+	void SetFrameAndInfo(Frame const & Fr,FileInfo const & MyFileInfo,int MaxSize);
+	FileInfo * GetFileInfo(void)
+	{
+		return (&MyFileInfo);
+	}
+
+	void Process(void);
+	
+	void SetPalIndex(int NewPalIndex)
+		{PalIndex=NewPalIndex;}
+
+	int	GetPalIndex(void) const
+		{return(PalIndex);}
+
+	void SetVRAMPos(TPRect const & Rect);
+
+	BDEPTH	GetBitDepth(void) const
+		{
+		BDEPTH	RetDepth;
+		int		NumOfCols;
+
+		NumOfCols=MyPal.GetNumOfCols();
+
+		if (NumOfCols<=16)
+			RetDepth=BITS_4;
+		else
+			RetDepth=BITS_8;
+
+		return(RetDepth);
+		}
+
+	TPRect const & GetTPRect(void) const
+		{return(MyRect);}
+
+	bool IsRotated(void) const
+		{return(MyRect.GetRotate());}
+
+	void SetTpBase(int NewTpBase)
+		{
+		TpBase=NewTpBase;
+		BaseTpX=((TpBase&0xf)*64);
+		BaseTpY=(TpBase>>4)*256;
+		}
+
+	void SetClut(u16 NewClut)
+		{Clut=NewClut;}
+
+	u16 GetClut(void) const
+		{return(Clut);}
+
+	void WriteHeader(Gofstream & Out);
+
+	bool	GetZeroColZero(void) const
+		{return(MyFileInfo.GetZeroColZero());}
+
+	bool	GetPlusColZero(void) const
+		{return(MyFileInfo.GetPlusColZero());}
+
+	bool	GetAllowRotate(void) const
+		{return(MyFileInfo.GetAllowRotate());}
+
+
+	void	Write(Gofstream & Out) const;
+
+	void	WriteHeaderNotInVram(Gofstream & Out);
+
+
+	int		getV(void)
+		{return(MyRect.X&0xff);}
+
+	int		getU(void)
+		{
+		u16	tpage;
+		int	u;
+		int	pageX;
+
+		tpage=GetTpage();
+		pageX=(tpage&0xf)*256;
+		u=MyRect.X-pageX;
+
+		switch(GetBitDepth())
+			{
+			case BITS_8:
+				u/=2;
+				break;
+			}
+
+		return(u);
+		}
+
+	u16 GetTpage(void)
+		{
+		int	tp;
+		BDEPTH	RetDepth;
+
+		RetDepth=GetBitDepth();
+
+		int	abr=0;
+		int x=BaseTpX + (MyRect.X/4);  //MA
+		int y=BaseTpY + MyRect.Y;  //MA
+
+		switch(RetDepth)
+			{
+			case BITS_4:
+				tp=0;
+				break;
+			case BITS_8:
+				tp=1;
+				break;
+			}
+
+		return((((tp)&0x3)<<7)|(((abr)&0x3)<<5)|(((y)&0x100)>>4)|(((x)&0x3ff)>>6)| (((y)&0x200)<<2));
+		}
+	
+	bool	IsAnimated()	
+		{
+		return(MyFileInfo.getAllocateAs16Bit());
+		}
+protected:
+	void	ResizeAndReduce(Frame & Frm,int TargCols,float XPerc,float YPerc,bool ZeroSeeThrough);
+
+
+	void MakeCopy(SprFrame const & NewFrame)
+		{
+		Frame::CopyFrame(NewFrame);
+
+		Clut=NewFrame.Clut;
+		TpBase=NewFrame.TpBase;
+		BaseTpX=NewFrame.BaseTpX;
+		BaseTpY=NewFrame.BaseTpY;
+		PalIndex=NewFrame.PalIndex;
+		MyFileInfo=NewFrame.MyFileInfo;
+		MyRect=NewFrame.MyRect;
+		}
+
+
+	u16			Clut;
+	int			TpBase;
+	int			BaseTpX;
+	int			BaseTpY;
+
+	GString		loadFileName;
+
+	int			PalIndex;
+	FileInfo	MyFileInfo;
+	TPRect		MyRect;
+};
+
+/*	A collection of sprites
+	----------------------- */
+class SprSet : protected GObject
+{
+public:
+	SprSet(void)
+		{
+		Vi=NULL;
+		MaxSize=0;
+		}
+
+	void	SetMaxSize(int New)
+		{MaxSize=New;}
+
+	void	AddFiles(FIVec const & FileList);
+
+	void	Write(char const * FileName,int TpNumber,int WidthInTpages,int HeightInTpages);
+	void	WriteLBM(char const * FileName);
+	void	WriteSprFile(char const * Name);
+	void	WriteReport(char const * Name);
+	void	writeRawTPage(char const * File);
+	void	SetIncOutFile(char const * NewIncOutFile)
+		{IncOutFile=NewIncOutFile;IncOutFile.Lower();}
+
+	void	setAnimatedHeader(bool newVal)
+		{m_AnimatedHeadersOnly=newVal;}
+
+	void	setDontOutputBoxes(bool newVal)
+		{m_DontOutputBoxes=newVal;}
+
+	void	setAlignHeaders(bool newVal)
+		{m_AlignHeaders=newVal;}
+
+	void	setHalfTpage(bool newVal)
+		{m_halfTpage=newVal;}
+
+	void	setCompressTpages(bool newVal)
+		{m_compressTpages=newVal;}
+
+	void	setNoWriteTpages(bool newVal)
+		{m_noWriteTpages=newVal;}
+
+protected:
+	void	WriteHeaderFile(char const * HName);
+
+	void	ProcessPals(void);
+	void	AddFile(FileInfo const & ThisInfo);
+	void	AddAnm(FileInfo const & ThisInfo);
+	void	AddLbm(FileInfo const & ThisInfo);
+	void	AddFrame(Frame const & Fr,FileInfo const & ThisInfo);
+
+	void	AddFramesAndPalsToVRAM(VRAM & Vr,int TpNumber,int WidthInTpages,int HeightInPixels);
+
+	GString		GetHeaderFileName(char const * File);
+
+
+	typedef std::vector<SprFrame> SprFrVec;
+	typedef std::vector<SprFrame>::iterator SprFrIt;
+
+	typedef std::vector<SprPal> SprPalVec;
+	typedef std::vector<SprPal>::iterator SprPalVecIt;
+
+	GString	IncOutFile;
+
+	bool	m_AnimatedHeadersOnly;
+	bool	m_DontOutputBoxes;
+	bool	m_AlignHeaders;
+	bool	m_halfTpage;
+	bool	m_compressTpages;
+	bool	m_noWriteTpages;
+
+	SprFrVec	AllSprFrames;
+	SprPalVec	AllSprPals;
+	VRAMImage *	Vi;
+
+	int			MaxSize;
+};
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+
+/*---------------------------------------------------------------------- */
+
+#else	/* __SPRSET_H__ */
+
+class SprPal;
+class SprFrame;
+
+#endif
+
+/*===========================================================================
+ end */
diff --git a/Utils/parkgrab/tpage.cpp b/Utils/parkgrab/tpage.cpp
new file mode 100644
index 000000000..84921f5c6
--- /dev/null
+++ b/Utils/parkgrab/tpage.cpp
@@ -0,0 +1,857 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1997 Climax Development Ltd
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <algorithm>
+#include "conio.h"
+
+/*	Glib
+	---- */
+#include "gutils.h"
+
+/*	Local
+	----- */
+#include "tpage.h"
+#include "grect.h"
+
+/*	Graphics
+	-------- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+using namespace std;
+
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+struct TPInfo
+{
+	int		XAlign;
+	int		TpWidth;
+	int		BorderX;
+	int		BorderY;
+};
+
+/*	Information about where I can place this frame in the Tpage
+	----------------------------------------------------------- */
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+static TPInfo const	InfStruct[TP_NUM_OF_TP_TYPES]=
+{
+	{1,256,1,1},			/* TP_4 */
+	{2,512,2,1},			/* TP_8 */
+	{4,256,4,1},			/* TP_16 */
+	{0,0,0,0},				/* TP_SCREEN */
+	{16*4,1024*4,0,0},		/* TP_PAL */
+};
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+int	TPRect::W2Alloc=1;
+int	TPRect::H2Alloc=1;
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+VRAM::VRAM(int nTpWidth,int nTpHeightInPixels)
+{
+	Big2Little=false;
+	RotateEveryEmpty=false;
+
+
+	TpWidth=-1;
+	TpHeightInPixels=-1;
+
+	Clear(nTpWidth,nTpHeightInPixels);
+}
+
+void VRAM::Clear(int nTpWidth,int nTpHeightInPixels)
+{
+	if (nTpWidth >= 0 )
+		TpWidth=nTpWidth;
+
+	if (nTpHeightInPixels >= 0)
+		TpHeightInPixels=nTpHeightInPixels;
+
+	InitEmpty(0,0,TpWidth*256,TpHeightInPixels);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	void VRAM::InitEmpty(void)
+	Purpose:	Initialise the VRAM as empty
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void VRAM::InitEmpty(int vX,int vY,int nW,int nH)
+{
+	const int	Width16=256;
+	const int	Height16=256;
+	
+	W=nW;
+	H=nH;
+	X=vX;
+	Y=vY;
+
+	VRAMWidthPages=W/Width16;
+	VRAMHeightPages=H/Height16;
+
+	if (!VRAMHeightPages)
+	{
+		VRAMHeightPages = 1;
+	}
+
+	NumOfTPages=VRAMWidthPages*VRAMHeightPages;
+
+	VecOfPages.resize(NumOfTPages,TPRectList());
+
+	Unused.reserve(4000);
+	Used.reserve(2000);
+
+	Unused.resize(0);
+	Used.resize(0);
+
+	for (int f=0;f<NumOfTPages;f++)
+		VecOfPages[f].resize(0);
+
+	for (int y=0;y<VRAMHeightPages;y++)
+		for (int x=0;x<VRAMWidthPages;x++)
+			AddEmpty((x*Width16)+vX,(y*Height16)+vY,Width16,Height16);
+}
+
+/*----------------------------------------------------------------------
+	Function:	bool TryNFit(TPRectList & TpList)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool VRAM::TryNFit(TPRectList & TpList,TPRect & ThisRect)
+{
+	bool		Done=false;
+
+	TPRectList::iterator	f;
+
+
+	for (f=TpList.begin();f!=TpList.end();f++)
+		{
+		TPRect &	BlankRect = *f;
+
+		if (TryRect(BlankRect,ThisRect))
+			return(true);
+		else
+			{
+			if (RotateEveryEmpty && CanRotate(ThisRect))
+				{
+				ThisRect.SetRotate(!ThisRect.GetRotate());
+		
+				if (TryRect(BlankRect,ThisRect))
+					return(true);
+				else
+					ThisRect.SetRotate(!ThisRect.GetRotate());
+				}
+			}
+		}
+		
+	return(false);
+}
+
+void VRAM::PosFromTPrect(TPRect & ThisRect,POS_INFO & Pi)
+{
+	TPInfo const *		Tpi;
+	int					WorkingWidth;
+
+	Tpi=&InfStruct[ThisRect.TypeOfPage];
+	Pi.XAlign=Tpi->XAlign;
+
+	WorkingWidth=GU_AlignVal(ThisRect.W,Pi.XAlign);
+
+	Pi.MinX=Tpi->BorderX;
+	Pi.MinY=Tpi->BorderY;
+	Pi.MaxX=W-Tpi->BorderX-WorkingWidth;
+	Pi.MaxY=H-Tpi->BorderY-ThisRect.H;
+
+	Pi.TpWidthPix=Tpi->TpWidth;
+
+	Pi.MinXTp=Tpi->BorderX;
+	Pi.MaxXTp=Tpi->TpWidth-Tpi->BorderX-WorkingWidth;
+
+	Pi.MinYTp=Tpi->BorderY;
+	Pi.MaxYTp=(256-Tpi->BorderY)-ThisRect.H;
+}
+
+bool VRAM::TryRect(TPRect & BlankRect,TPRect & ThisRect)
+{
+	POS_INFO		Pi;
+	PosFromTPrect(ThisRect,Pi);
+
+	int	MinTpX=Pi.MinXTp+(BlankRect.X/Pi.TpWidthPix)*Pi.TpWidthPix;
+	int	MaxTpX=Pi.MaxXTp+(BlankRect.X/Pi.TpWidthPix)*Pi.TpWidthPix;
+	int	MinTpY=Pi.MinYTp+(BlankRect.Y/256)*256;
+	int	MaxTpY=Pi.MaxYTp+(BlankRect.Y/256)*256;
+
+	/* Move to avoid edges of the map */
+	int		MinX = MinTpX > Pi.MinX ? MinTpX : Pi.MinX;
+	int		MaxX = MaxTpX < Pi.MaxX ? MaxTpX : Pi.MaxX;
+	int		MinY = MinTpY > Pi.MinY ? MinTpY : Pi.MinY;
+	int		MaxY = MaxTpY < Pi.MaxY ? MaxTpY : Pi.MaxY;
+
+	int ThisX=GU_AlignVal(BlankRect.X,Pi.XAlign);
+	int ThisY=BlankRect.Y;
+
+	if (ThisX<MinX)
+		ThisX=MinX;
+
+	if (ThisX>MaxX)
+		return(false);
+
+	if (ThisY<MinY)
+		ThisY=MinY;
+
+	if (ThisY>MaxY)
+		return(false);
+
+	ThisRect.SetXY(ThisX,ThisY);
+
+	if (!InColisionWithUsed(ThisRect))
+		{
+		RemovedFromUnused(ThisRect);
+		AddToUsed(ThisRect);
+		return(true);
+		}
+
+	return(false);
+}
+
+/*----------------------------------------------------------------------
+	Function:	TPRect VRAM::AllocVRAM(TPageType nType,int nW,int nH,bool Rotated)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+class Predicate
+{
+public:
+	bool operator()(TPRect const & R1,TPRect const & R2) const
+		{
+		u32 R1Val=(R1.H<<16)|(R1.W);
+		u32 R2Val=(R2.H<<16)|(R2.W);
+		return (R1Val<R2Val);
+		}
+};
+
+class Predicate2
+{
+public:
+	bool operator()(TPRect const & R1,TPRect const & R2) const
+		{
+		u32 R1Val=(R1.H<<16)|(R1.W);
+		u32 R2Val=(R2.H<<16)|(R2.W);
+		return (R1Val>R2Val);
+		}
+};
+
+/*----------------------------------------------------------------------
+	Function:	TPRect VRAM::AllocVRAM(TpRectVec & RectVec)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool VRAM::AllocVRAM(TPRectVec & RectVec,bool nRotateEveryEmpty,bool nBig2Little,bool nWiderThanHigher)
+{
+	int			f;
+
+	RotateEveryEmpty=nRotateEveryEmpty;
+	Big2Little=nBig2Little;
+	WiderThanHigher=nWiderThanHigher;
+
+	if (WiderThanHigher)
+		{
+		for (f=0;f<RectVec.size();f++)
+			{
+			if ((RectVec[f].H > RectVec[f].W) && CanRotate(RectVec[f]))
+				RectVec[f].SetRotate(!RectVec[f].GetRotate());
+			}
+		}
+
+	if (!Big2Little)
+		std::sort(RectVec.begin(),RectVec.end(),Predicate());
+	else
+		std::sort(RectVec.begin(),RectVec.end(),Predicate2());
+
+	bool	AllocedEverything=true;
+
+	for (f=0;f<RectVec.size();f++)
+		{
+		if (!AllocVRAM(RectVec[f]))
+			{
+			AllocedEverything=false;
+			cout<<"Couldn't alloc "<<RectVec[f].W<<","<<RectVec[f].H<<endl;
+			}
+		}
+
+	return(AllocedEverything);
+}
+
+/*----------------------------------------------------------------------
+	Function:	void VRAM::AllocVRAM(TPageType nType,int nW,int nH)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+bool VRAM::AllocVRAM(TPRect & OriginalRect)
+{
+	bool	Done;
+	TPRect	ThisRect;
+
+	ThisRect=OriginalRect;
+
+	Done=false;
+
+	for (int Page=0;Page<NumOfTPages && !Done;Page++)
+		{
+		VecOfPages[Page].sort();
+
+		TPRect::SetAllocWH(ThisRect.W,ThisRect.H);
+
+		if (!TryNFit(VecOfPages[Page],ThisRect))
+			{
+			if (CanRotate(ThisRect))
+				{
+				ThisRect.SetRotate(!ThisRect.GetRotate());
+
+				VecOfPages[Page].sort();
+				TPRect::SetAllocWH(ThisRect.W,ThisRect.H);
+
+				if (!TryNFit(VecOfPages[Page],ThisRect))
+					ThisRect.SetRotate(!ThisRect.GetRotate());
+				else
+					Done=true;
+				}
+			}
+		else
+			Done=true;
+		}
+
+
+	if (Done)
+		{
+		OriginalRect=ThisRect;
+		OriginalRect.SetAlloced(true);
+		return(true);
+		}
+	else
+		{
+		OriginalRect.SetAlloced(false);
+		return(false);
+		}
+}
+
+/*----------------------------------------------------------------------
+	Function:
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool VRAM::CanRotate(TPRect & ThisRect)
+{
+	if (ThisRect.GetDontRotate())
+		return(false);
+
+	switch (ThisRect.TypeOfPage)
+		{
+		case TP_PAL:
+			return(false);
+
+		case TP_4:
+		case TP_8:
+		case TP_16:
+			return(true);
+
+		case TP_SCREEN:
+		case TP_NUM_OF_TP_TYPES:
+		default:
+			Error(ERR_FATAL,"Not catered for");
+			return(false);
+		}
+}
+
+/*----------------------------------------------------------------------
+	Function:	void VRAM::AllocVRAM(TPageType nType,int nW,int nH)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void VRAM::RectFromTpRect(Rect & R,TPRect const & ThisRect)
+{
+	R.W=ThisRect.W;
+	R.H=ThisRect.H;
+	R.X=ThisRect.X;
+	R.Y=ThisRect.Y;
+}
+
+void VRAM::RemovedFromUnused(TPRect const & ThisRect)
+{
+	RectVec		Result;
+	Rect		NewRect;
+	int			f;
+
+	RectFromTpRect(NewRect,ThisRect);
+
+	int		ColidedWith=0;
+
+	for ( f=0;f<Unused.size();f++)
+		{
+		Rect	UnusedRect;
+		
+		RectFromTpRect(UnusedRect,Unused[f]);
+
+		if (UnusedRect.IsColiding(ThisRect) )
+			{
+			CutRect(UnusedRect,ThisRect,Result);
+			ColidedWith++;
+			}	
+		else
+			Result.push_back(UnusedRect);
+		}
+
+	Unused.resize(0);
+
+	for (f=0;f<NumOfTPages;f++)
+		VecOfPages[f].resize(0);
+	
+	for (f=0;f<Result.size();f++)
+		AddEmpty(Result[f].X,Result[f].Y,Result[f].W,Result[f].H);
+}
+
+void VRAM::AddEmpty(int x,int y,int w,int h)
+{
+	Unused.resize(Unused.size()+1);
+
+	TPRect & ThisRect=(Unused[Unused.size()-1]);
+
+	ThisRect.TypeOfPage=TP_4;
+	ThisRect.W=w;
+	ThisRect.H=h;
+	ThisRect.X=x;
+	ThisRect.Y=y;
+
+	int	TpNum=(x/256)+((y/256)*VRAMWidthPages);
+
+
+
+	VecOfPages[TpNum].insert(VecOfPages[TpNum].end(),ThisRect);
+}
+
+void VRAM::AddToUsed(TPRect const & ThisRect)
+{
+
+	Used.push_back(ThisRect);
+}
+
+
+bool VRAM::InColisionWithUsed(TPRect const & R)
+{
+	for (int f=0;f<Used.size();f++)
+		{
+		if (R.IsColiding(Used[f]))
+			return(true);
+		}
+
+	return(false);
+}
+
+/*----------------------------------------------------------------------
+	Function:	bool VRAM::CheckValidAlloc(TPageType nType,int nW,int nH)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool VRAM::CheckValidAlloc(TPageType nType,int nW,int nH)
+{
+	return(true);
+}
+
+/*----------------------------------------------------------------------
+	Function:	int VRAM::GetMaxWidthTp(TPageType nType)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int VRAM::GetMaxWidthTp(TPageType nType)
+{
+	int		RetVal;
+
+	switch (nType)
+		{
+		case TP_4:
+			RetVal=1;
+			break;
+
+		case TP_8:
+			RetVal=2;
+			break;
+
+		case TP_16:
+			RetVal=4;
+			break;
+
+		case TP_SCREEN:
+			RetVal=256;
+			break;
+
+		default:
+			RetVal=-1;
+			Error(ERR_FATAL,"Illegal tpage type");
+			break;
+		}
+
+	return(RetVal);
+}
+
+/*----------------------------------------------------------------------
+	Function:	int VRAM::GetXAlign(TPageType nType)
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int VRAM::GetXAlign(TPageType nType)
+{
+	int		RetVal;
+
+	switch (nType)
+		{
+		case TP_4:
+			RetVal=1;
+			break;
+
+		case TP_8:
+			RetVal=2;
+			break;
+
+		case TP_16:
+			RetVal=4;
+			break;
+		
+		case TP_PAL:
+			RetVal=16*4;
+			break;
+
+		case TP_SCREEN:
+			RetVal=4;
+			break;
+		
+		default:
+			RetVal=-1;
+			Error(ERR_FATAL,"Illegal tpage type");
+			break;
+		}
+
+	return(RetVal);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+TPRect & VRAM::NewItem(TPRectVec & TPRects)
+{
+	TPRects.resize(TPRects.size()+1);
+	return(TPRects[TPRects.size()-1]);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+TPRect::TPRect(void)
+{	
+	InitRect();
+}
+
+void TPRect::InitRect(void)
+{
+	X=0;
+	Y=0;
+	W=0;
+	H=0;
+	TypeOfPage=TP_4;
+	Rotated=false;
+	Alloced=false;
+	DontRotate=false;
+}
+
+TPRect::TPRect(TPageType nType,int nW,int nH)
+{
+	int WidthMul;
+
+	InitRect();
+
+	WidthMul=GetWidthMul(nType);
+
+	W=nW*WidthMul;
+	H=nH;
+	TypeOfPage=nType;
+}
+
+int TPRect::GetWidthMul(TPageType nType)
+{
+	int WidthMul;
+
+	switch (nType)
+		{
+		case TP_4:
+			WidthMul=1;
+			break;
+
+		case TP_8:
+			WidthMul=2;
+			break;
+
+		case TP_16:
+		case TP_SCREEN:
+		case TP_PAL:
+			WidthMul=4;
+			break;
+
+		case TP_NUM_OF_TP_TYPES:
+		default:
+			Error(ERR_FATAL,"Can't alloc type TP_NUM_OF_TP_TYPES");
+			break;
+		}
+	return (WidthMul);
+}
+
+void TPRect::Set(TPageType nType,int nX,int nY,int nW,int nH)
+{
+	TypeOfPage=nType;
+	X=nX;
+	Y=nY;
+	W=nW*GetWidthMul(nType);
+	H=nH;
+}
+
+void TPRect::SetXY(int nX,int nY)
+{
+	X=nX;
+	Y=nY;
+}
+
+u32	TPRect::GetId(void) const
+{
+	int Colis=0;
+
+	int	PageNum=(X/256)+((Y/256)*16);
+
+	if ((X/256) != ((X+W2Alloc-1)/256))
+		Colis|=1;
+
+	if ((Y/256) != ((Y+H2Alloc-1)/256))
+		Colis|=2;
+				
+	return ((Colis<<24)|(PageNum<<16)|((Y&0xff)<<8)|(X&0xff));
+}
+
+bool TPRect::SetRotate(bool Rot)
+{
+	bool	RetBool=Rotated;
+
+	if (Rot != RetBool)
+		{
+		W/=GetWidthMul(TypeOfPage);
+		int	Temp=W;
+		W=H;
+		H=Temp;
+		W*=GetWidthMul(TypeOfPage);
+		}
+
+	Rotated=Rot;
+	return(RetBool);
+}
+
+
+void VRAM::getUnusedSpace(TPRectVec & unusedBoxes)
+{
+	int			vX=X;
+	int			vY=Y;
+	const int	Width16=256;
+	const int	Height16=256;
+
+	for (int y=0;y<VRAMHeightPages;y++)
+		for (int x=0;x<VRAMWidthPages;x++)
+			{
+			TPRect		thisRect;
+			bool		foundRect;
+
+			foundRect=false;
+
+			for (int f=1;f<255 && !foundRect;f++)
+				{
+				int		boxBaseY;
+				int		boxHeight;
+
+				boxBaseY=f;
+				boxHeight=255-f;
+
+				thisRect.X=(x*Width16)+vX;
+				thisRect.Y=(y*Height16)+vY+boxBaseY;
+				thisRect.W=Width16;
+				thisRect.H=boxHeight;
+
+				if (!InColisionWithUsed(thisRect))
+					foundRect=true;
+				}
+			
+			if (foundRect)
+				unusedBoxes.push_back(thisRect);
+			}
+}
+
+
+int VRAM::GetNumOfUsedPages()
+{
+	int			Used=0;
+	int			vX=X;
+	int			vY=Y;
+	const int	Width16=256;
+	const int	Height16=256;
+
+	for (int y=0;y<VRAMHeightPages;y++)
+		for (int x=0;x<VRAMWidthPages;x++)
+			{
+			TPRect		ThisRect;
+			ThisRect.X=(x*Width16)+vX;
+			ThisRect.Y=(y*Height16)+vY;
+			ThisRect.W=Width16;
+			ThisRect.H=Height16;
+
+			if (InColisionWithUsed(ThisRect))
+				Used++;
+			}
+	return(Used);
+}
+
+
+bool TPRect::IsAlloced(void) const
+{
+	return(Alloced);
+}
+
+void TPRect::SetAlloced(bool nAlloced)
+{
+	Alloced=nAlloced;
+}
+
+int VRAM::GetNumOfItems()
+{
+	return(Used.size());
+}
+
+void TPRect::InitFromFrame(Frame const & Fr)
+{
+	/* !!!!! Make this support other bit widths */
+
+	W=Fr.GetWidth();
+	H=Fr.GetHeight();
+	
+	if (Fr.GetNumOfCols() <= 16)
+		TypeOfPage=TP_4;
+	else if (Fr.GetNumOfCols() <= 256)
+		TypeOfPage=TP_8;
+	else
+		Error(ERR_FATAL,"Only 4 & 8 bit supported right now");
+
+	W*=GetWidthMul(TypeOfPage);
+}
+
+
+TPageType TPRect::convertTo16Bit(void)
+{
+	TPageType		oldType;
+
+	switch (TypeOfPage)
+		{
+		case TP_4:
+//			W=GU_AlignVal(W,4)/4;
+			break;
+
+		case TP_8:
+//			W=GU_AlignVal(W,2)/2;
+			break;
+		default:
+			Error(ERR_FATAL,"Only 4 & 8 bit supported right now");
+			break;
+		}
+
+	oldType=TypeOfPage;
+	TypeOfPage=TP_16;
+
+	return(oldType);
+}
+
+void TPRect::convertFrom16Bit(TPageType newType)
+{
+	switch (newType)
+		{
+		case TP_4:
+//			W=W*4;
+			break;
+
+		case TP_8:
+//			W=W*2;
+			break;
+		default:
+			Error(ERR_FATAL,"Only 4 & 8 bit supported right now");
+			break;
+		}
+
+	TypeOfPage=newType;
+}
+
+/*===========================================================================
+ end */
+
+
diff --git a/Utils/parkgrab/tpage.h b/Utils/parkgrab/tpage.h
new file mode 100644
index 000000000..2d6fe4984
--- /dev/null
+++ b/Utils/parkgrab/tpage.h
@@ -0,0 +1,260 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1997 Climax Development Ltd
+
+===========================================================================*/
+
+#ifndef __TPAGE_HPP__
+#define __TPAGE_HPP__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <list>
+
+/*	Glib
+	---- */
+#include <frame.hpp>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+struct POS_INFO
+{
+	int		MinXTp;			/* Minimum x placeable within a Tpage */
+	int		MaxXTp;			/* Maximum x placeable within a Tpage */
+
+	int		MinYTp;			/* Minimum y placeable within a Tpage */
+	int		MaxYTp;			/* Maximum y placeable within a Tpage */
+
+	int		MinX;			/* Minimum global x */
+	int		MaxX;			/* Maximum global x */
+
+	int		MinY;			/* Minimum global y */
+	int		MaxY;			/* Maximum global y */
+
+	int		XAlign;		/* X Alignment */
+	int		TpWidthPix;		/* Width of each tpages for this rect */
+};
+
+
+/*	Different Tpage Types
+	--------------------- */
+enum TPageType
+{
+	TP_4=		0,
+	TP_8,
+	TP_16,
+	TP_SCREEN,
+	TP_PAL,
+	TP_NUM_OF_TP_TYPES,
+};
+
+
+/*	A Rectangle in the Tpage
+	------------------------ */
+class TPRect : public Rect
+{
+public:
+			TPRect(void);
+			TPRect(TPageType nType,int nW,int nH);
+			TPRect(TPRect const & NewR)	{MakeCopy(NewR);}
+
+	void	InitFromFrame(Frame const & Fr);
+	void	SetAlloced(bool nAlloced=true);
+	bool	SetRotate(bool Rot=true);
+	void	operator=(TPRect const & NewR)	{MakeCopy(NewR);}	
+	bool	operator< (TPRect const & R) const	{return(GetId()<R.GetId());}
+	void	SetWH(int nW,int nH)
+		{W=nW;H=nH;}
+
+	void	SetXY(int nX,int nY);
+	void	Set(TPageType nType,int nX,int nY,int nW,int nH);
+	void	SetTpType(TPageType nType)	{TypeOfPage=nType;}
+
+	bool	GetRotate(void) const {return(Rotated);}
+	bool	IsAlloced(void) const;
+	int		GetTpageIn(void) const;
+	u32		GetId(void) const;
+	bool	GetAlloced(void){return(Alloced);}
+
+	static void	SetAllocWH(int nW,int nH)	{W2Alloc=nW; H2Alloc=nH;}
+
+
+	TPageType	convertTo16Bit(void);
+	void		convertFrom16Bit(TPageType newType);
+
+
+	void SetId(int NewId)
+		{Id=NewId;}
+
+	int GetId(void)
+		{return(Id);}
+
+	TPageType	TypeOfPage;
+
+	void	SetDontRotate(bool NewVal=true)	{DontRotate=NewVal;}
+	bool	GetDontRotate(void)	const		{return(DontRotate);}
+
+protected:
+	int		GetWidthMul(TPageType nType);
+	void	InitRect(void);
+
+	bool	Rotated;
+	int		Id;
+
+	void MakeCopy(TPRect const & NewR)
+		{
+		W=NewR.W;
+		H=NewR.H;
+		X=NewR.X;
+		Y=NewR.Y;
+		TypeOfPage=NewR.TypeOfPage;
+		Rotated=NewR.Rotated;
+		Id=NewR.Id;
+		Alloced=NewR.Alloced;
+		DontRotate=NewR.DontRotate;
+		}
+
+	static int	W2Alloc;
+	static int	H2Alloc;
+
+	bool		Alloced;
+	bool		DontRotate;
+};
+
+
+
+
+/*	VRAM Alloc handle
+	----------------- */
+typedef int VHND;
+typedef std::vector<TPRect> TPRectVec;
+
+/*	VRAM
+	---- */
+
+typedef std::list<TPRect>		TPRectList;
+typedef std::vector<TPRectList> TPRectListVec;
+
+class VRAM : public GObject
+{
+public:
+	VRAM(int nTpWidth=16,int nTpHeightInPixels=512);
+
+	int GetNumOfItems(void);
+	int GetNumOfUsedPages();
+
+	bool AllocVRAM(TPRect & OriginalRect);
+	bool AllocVRAM(TPRectVec & RectVec,bool nRotateEveryEmpty,bool nBig2Little,bool nWiderThanHigher);
+
+	TPRect const &	GetVRAM(VHND hnd) const;
+
+	TPRectVec &	GetUsed(void)
+		{return(Used);}
+
+	TPRectVec &	GetUnused(void)
+		{return(Unused);}
+
+	void Clear(int nTpWidth=-1,int nTpHeight=-1);
+
+	void SetBig2Little(bool Val=true)
+		{ Big2Little=Val;}
+
+	void SetRotateEveryEmpty(bool Val=true)
+		{ RotateEveryEmpty=Val;}
+
+	bool CanRotate(TPRect & ThisRect);
+
+	void getUnusedSpace(TPRectVec & unusedBoxes);
+
+protected:
+	void	PosFromTPrect(TPRect & ThisRect,POS_INFO & Pi);
+	bool	TryRect(TPRect & BlankRect,TPRect & ThisRect);
+
+	TPRectListVec	VecOfPages;
+
+	bool		TryNFit(TPRectList & TpList,TPRect & ThisRect);
+
+	void		AddEmpty(int x,int y,int w,int h);
+	bool		InColisionWithUsed(TPRect const & R);
+	void		InitEmpty(int vX,int vY,int W,int H);
+	bool		CheckValidAlloc(TPageType nType,int nW,int nH);
+	int			GetXAlign(TPageType nType);
+	int			GetMaxWidthTp(TPageType nType);
+	void		RemovedFromUnused(TPRect const & ThisRect);
+	void		AddToUsed(TPRect const & ThisRect);
+	void		RectFromTpRect(Rect & R,TPRect const & ThisRect);
+
+	TPRect &	NewItem(TPRectVec & TPRects);
+
+	TPRect &	NewUnused(void)
+		{ return(NewItem(Unused)); }
+
+	TPRect & NewUsed(void)
+		{ return(NewItem(Used)); }
+
+
+	TPRectVec	Unused;
+	TPRectVec	Used;
+	TPRect		ErrorRect;
+
+	int		X,Y,W,H;
+	int		NumOfTPages;
+	int		TpWidth;
+	int		TpHeightInPixels;
+
+	int		VRAMWidthPages;
+	int		VRAMHeightPages;
+
+	bool	Big2Little;
+	bool	RotateEveryEmpty;
+	bool	WiderThanHigher;
+};
+
+/*	Error codes for VHND
+	-------------------- */
+enum
+{
+	VHND_NULL = -1,
+};
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+void TestTPageStuff(void);
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* __TPAGE_HPP__ */
+
+/*===========================================================================
+ end */
+
+
diff --git a/Utils/parkgrab/vimage.h b/Utils/parkgrab/vimage.h
new file mode 100644
index 000000000..43a1d4b43
--- /dev/null
+++ b/Utils/parkgrab/vimage.h
@@ -0,0 +1,103 @@
+/*=========================================================================
+
+	VIMAGE.CPP	
+
+	Author:  Gary Liddon @ Climax
+	Created:
+	Project: TPW Parkgrab
+	Purpose: An object that represents a bit of VRAM
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+#ifndef __VIMAGE_H__
+#define __VIMAGE_H__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+#include <gobject.hpp>
+#include <fstream>
+
+/*	Local
+	----- */
+#include "sprset.h"
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+class VRAMImage : protected GObject
+{
+public:
+
+	VRAMImage(int NewWidthInTpages,int NewHeightInPixels);
+	~VRAMImage(void);
+
+	void WriteInTpageChunks(std::ofstream & Str);
+	void Write(std::ofstream & Str);
+	void PlotPal(SprPal const & PalToPlot);
+	void PlotFrame(SprFrame const & FrameToPlot);
+	void SaveAs16ColLbm(const char * Name);
+
+	void	setDoCompress(bool newVal)
+		{m_doCompress=newVal;}
+
+	bool	getDoCompress(void) const
+		{return(m_doCompress);}
+
+	void getTpData(unsigned int tp,std::vector<u8> & dest) const;
+			
+protected:
+	void	PlotFrame4(SprFrame const & Fr);
+	void	PlotFrame8(SprFrame const & Fr);
+	u16		GetPsxCol(Colour const & Col) const;
+
+	int		WidthInBytes;
+	int		WidthInTpages;
+	int		HeightInTPages;
+	int		HeightInPixels;
+	int		aTPageHeight;
+	int		TPageSizeInBytes;
+	int		VramAreaBytes;
+	bool	m_doCompress;
+
+	u8 *	lbmData;
+	u8 *	VRAMData;
+};
+
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+
+/*---------------------------------------------------------------------- */
+
+#else	/* __VIMAGE_H__ */
+
+class VRAMImage;
+
+#endif
+
+/*===========================================================================
+ end */
diff --git a/Utils/transtext/kanjiclass.cpp b/Utils/transtext/kanjiclass.cpp
new file mode 100644
index 000000000..5706b4b58
--- /dev/null
+++ b/Utils/transtext/kanjiclass.cpp
@@ -0,0 +1,1022 @@
+/*=========================================================================
+
+	KANJICLASS.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+#include "kanjiclass.h"
+
+/*	Std Lib
+	------- */
+#include <iostream>
+
+/*	Glib
+	---- */
+#include <frame.hpp>
+#include <misc.hpp>
+
+/*	Local
+	----- */
+
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+#include	"fontdata/got11j0b.h"
+#include	"fontdata/got11j1b.h"
+#include	"fontdata/got13j0b.h"
+#include	"fontdata/got13j1b.h"
+#include	"fontdata/got15j0b.h"
+#include	"fontdata/got15j1b.h"
+#include	"fontdata/got15gai.h"
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+static int const kanjiAddr0[3]=
+{
+	u32(got11j0b),
+	u32(got13j0b),
+	u32(got15j0b),
+};
+
+static int const kanjiAddr1[3]=
+{
+	u32(got11j1b),
+	u32(got13j1b),
+	u32(got15j1b),
+};
+
+static int const kanjiAddrG[3]=
+{
+	u32(0),
+	u32(0),
+	u32(got15gai),
+};
+
+static int const dotSize[3]={11,13,15};
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+struct SjisS
+{
+	char 			Ascii;
+	unsigned char 	Num;
+	unsigned short 	Sjis;
+	char const *	name;
+};
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+static void dekan(u8 *ptr,u8 *buf,int dot);
+static long kanjiTest( u8 const *sjis,KanjiClass::KanjiFontSize k = KanjiClass::FONT_SIZE_11);
+static int kanjiTrans(u16 scode);
+static void ascii2SJIS(u8 *dest,u8 const *src);
+static void ascii2SJIS(u8 *dest,u8 Ascii);
+static GString makeName(char const * dir,int frameNumber);
+
+
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+static SjisS SjisTable[]=
+{
+	{'0',10, 0x824f,"num" },{'A',26, 0x8260,"upper_case" },{'a',26, 0x8281,"lower_case" },
+	{' ', 1,0x8140,"space"},{'!', 1,0x8149,"exclamation",},{'"', 1,0x8168,"double_quote"},{'#', 1,0x8194,"hash",},{'$', 1,0x8190,"dollar"},
+	{'%', 1,0x8193,"percent"},{'&', 1,0x8195,"and"},{'\'',1,0x8166,"single_quote"},{'(', 1,0x8169,"open_bracket"},{')', 1,0x816a,"close_bracket"},
+	{'*', 1,0x8196,"star"},{'+', 1,0x817b,"plus",},{',', 1,0x8143,"comma",},{'-', 1,0x817c,"minus"},{'.', 1,0x8144,"period"},
+	{'/', 1,0x815e,"forward_slash"},{':', 1,0x8146,"colon"},{';', 1,0x8147,"semi_colon"},{'<', 1,0x8171,"less_than"},{'=', 1,0x8181,"equals"},
+	{'>', 1,0x8172,"greater_than"},{'?', 1,0x8148,"question_mark"},{'@', 1,0x8197,"ampersand"},{'[', 1,0x816d,"open_square_brace"},{'\\',1,0x818f,"back_slash"},
+	{']', 1,0x816e,"close_square_brace"},{'^', 1,0x814f,"carrat"},{'_', 1,0x8151,"underscore"},{'`', 1,0x8165,"other_quote"},{'{', 1,0x816f,"open_brace"},
+	{'|', 1,0x8162,"or"},{'}', 1,0x8170,"close_brace"},{'~', 1,0x8150,"tilde"},{0,0,0,NULL}
+};
+
+/* 
+ * sjis code to access number transfer table (non-Kanji)
+ */
+static unsigned short kanji_0_table[19][2] = {
+	{0x8140, 0}, 
+	{0x8180, 63}, 
+	{0x81b8, 108},
+	{0x81c8, 116},
+	{0x81da, 123},
+	{0x81f0, 138},
+	{0x81fc, 146},
+
+	{0x824f, 147},
+	{0x8260, 157},
+	{0x8281, 183},
+	{0x829f, 209},
+	{0x8340, 292},
+	{0x8380, 355},
+
+	{0x839f, 378},
+	{0x83bf, 402},
+	{0x8440, 426},
+	{0x8470, 459},
+	{0x8480, 474},
+	{0x849f, 492}
+};
+
+/* 
+ * sjis code to access number transfer table (user defined characters)
+ */
+static unsigned short kanji_g_table[19][2] = {
+	{0x8540, 0},
+	{0x8546, 5},
+	{0x8548, 6},
+	{0x854b, 8},
+	{0x8550, 9},
+
+	{0x85a0, 21},
+	{0x85b0, 34},
+
+	{0x8640, 47},
+	{0x8643, 49},
+	{0x8645, 50},
+	{0x8647, 51},
+	{0x864a, 53},
+	{0x864e, 56},
+	{0x8660, 58},
+
+	{0x869f, 74},
+	{0x86b8, 98},
+	{0x8740, 160},
+	{0x875c, 187},
+	{0x8764, 194},
+};
+
+/* 
+ * sjis code to access number transfer table (First level Kanji)
+ */
+static unsigned short kanji_1_table[32][2] = {
+	{0x889f, 0},
+	{0x8940, 94},
+	{0x899f, 188},
+	{0x8a40, 282},
+	{0x8a9f, 376},
+	{0x8b40, 470},
+	{0x8b9f, 564},
+	{0x8c40, 658},
+	{0x8c9f, 752},
+	{0x8d40, 846},
+	{0x8d9f, 940},
+	{0x8e40, 1034},
+	{0x8e9f, 1128},
+	{0x8f40, 1222},
+	{0x8f9f, 1316},
+	{0x9040, 1410},
+	{0x909f, 1504},
+	{0x9140, 1598},
+	{0x919f, 1692},
+	{0x9240, 1786},
+	{0x929f, 1880},
+	{0x9340, 1974},
+	{0x939f, 2068},
+	{0x9440, 2162},
+	{0x949f, 2256},
+	{0x9540, 2350},
+	{0x959f, 2444},
+	{0x9640, 2538},
+	{0x969f, 2632},
+	{0x9740, 2726},
+	{0x979f, 2820},
+	{0x9840, 2914}
+};
+
+/* 
+ * sjis code to access number transfer table (Second level Kanji)
+ */
+static unsigned short kanji_2_table[37][2] = {
+	{0x989f, 0},
+	{0x9940, 94},
+	{0x999f, 188},
+	{0x9a40, 282},
+	{0x9a9f, 376},
+	{0x9b40, 470},
+	{0x9b9f, 564},
+	{0x9c40, 658},
+	{0x9c9f, 752},
+	{0x9d40, 846},
+	{0x9d9f, 940},
+	{0x9e40, 1034},
+	{0x9e9f, 1128},
+	{0x9f40, 1222},
+	{0x9f9f, 1316},
+	{0xe040, 1410},
+	{0xe09f, 1504},
+	{0xe140, 1598},
+	{0xe19f, 1692},
+	{0xe240, 1786},
+	{0xe29f, 1880},
+	{0xe340, 1974},
+	{0xe39f, 2068},
+	{0xe440, 2162},
+	{0xe49f, 2256},
+	{0xe540, 2350},
+	{0xe59f, 2444},
+	{0xe640, 2538},
+	{0xe69f, 2632},
+	{0xe740, 2726},
+	{0xe79f, 2820},
+	{0xe840, 2914},
+	{0xe89f, 3008},
+	{0xe940, 3102},
+	{0xe99f, 3196},
+	{0xea40, 3290},
+	{0xea9f, 3384}
+};
+
+/*
+ * sjis code to access number transfer table (Vertical writing)
+ */
+static unsigned short kanji_t_table[2][2] = {
+	{0xeb40, 0},
+	{0xeb42, 4}
+};
+
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+static GString makeName(char const * dir,int frameNumber)
+{
+	char	tempBuff[1024];
+
+	sprintf(tempBuff,"%s\\%04d.lbm",dir,frameNumber);
+	return(tempBuff);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::writeEnglishFontLbms(char const * _dir,KanjiFontSize k,char const * repFile)
+{
+	SjisS * jisTab;
+
+	jisTab=SjisTable;
+
+	GString		dir;
+
+	dir=_dir;
+	dir+="\\";
+
+	vector<GString>		allLbms;
+
+	while (jisTab->name)
+		{
+		u16			num;
+		GString		name;
+		GString		fileName;
+		
+		num=jisTab->Sjis;
+		name=jisTab->name;
+		fileName=dir+name;
+	
+		if (jisTab->Num != 1)
+			{
+			for (int f=0;f<jisTab->Num;f++)
+				{
+				char		saveName[300];
+
+				sprintf(saveName,"%s_%c.lbm",(char const *)fileName,jisTab->Ascii+f);
+
+				saveKanjiLbm(saveName,k,num);
+				allLbms.push_back(saveName);
+				num++;
+				}
+			}
+		else
+			{
+			GString		saveName;
+			saveName=fileName;
+			saveName+=".lbm";
+			saveKanjiLbm(saveName,k,num);
+			allLbms.push_back(saveName);
+			}
+
+		jisTab++;
+		}
+
+	if (repFile)
+		{
+		ofstream out;
+
+		out.open(repFile,ios::out|ios::trunc);
+
+		if (out)
+			{	
+			for (int f=0;f<allLbms.size();f++)
+				out<<allLbms[f]<<endl;
+			
+			out.close();
+			}
+		else
+			Error(ERR_FATAL,"error opening %s for output",repFile);
+		}
+
+	
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::saveKanjiLbmNames(char const * dir,char const *name)
+{
+	int		num;
+
+	num=0;
+
+	ofstream	nameFile;
+
+	nameFile.open(name,ios::trunc);
+
+	if (nameFile)
+		{
+		for(int l=0;l<256;l++)
+			{
+			for(int h=0;h<256;h++)
+				{
+				if(getKanjiHit(h,l))
+					{
+					GString		name;
+					name=makeName(dir,num);
+					num++;
+					nameFile<<name<<endl;
+					}
+				}
+			}
+		}
+
+	nameFile.close();
+
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+
+int KanjiClass::findKanjiIndex(u16 kan) const
+{
+    if(kan>=0x8140 && kan<=0x84be)
+		kan-=0x8140;
+	else
+		{
+        if(kan>=0x8540 && kan<=0x8796)
+			{
+			kan-=0x8540;
+			kan+=((0x84be-0x8140)+1);
+			}
+		else
+			{
+            if(kan>=0x889f && kan<=0x9872)
+				{
+				kan-=0x889f;
+				kan+=((0x84be-0x8140)+1);
+				kan+=((0x8796-0x8540)+1);
+				}
+			else
+				Error(ERR_FATAL,"illegal kanji char");
+			}
+		}
+	return kan;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::saveKanjiTable(char const *name)
+{
+	int		num,highest;
+
+	num=0;
+	highest=0;
+
+	vector<int>		kanjiChars;
+	kanjiChars.resize(256*256);
+	
+	for (int f=0;f<256*256;f++)
+		kanjiChars[f]=-1;
+
+	for(int l=0;l<256;l++)
+		{
+		for(int h=0;h<256;h++)
+			{
+			if(getKanjiHit(h,l))
+				{
+				u16		kan;
+				int		val;
+
+
+				kan=(h<<8)|l;
+
+
+				val=findKanjiIndex(kan);
+				kanjiChars[val]=num;
+
+				if (val > highest)
+					highest=val;
+
+				num++;
+				}
+			}
+		}
+	
+	cout<<"highest is "<<highest<<endl;
+
+	Gofstream	nameFile(Gofstream::LITTLE_ENDIAN);
+	if (nameFile)
+		{
+		nameFile.open(name,ios::trunc|ios::binary);
+
+		nameFile.Put16(howManyKanjiChars());
+		
+		for (int f=0;f<highest+1;f++)
+			nameFile.Put16(kanjiChars[f]);
+
+		nameFile.close();
+		}
+	else
+		GObject::Error(ERR_FATAL,"error opening %s for writing",name);
+
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::saveKanjiLbm(char const * fileName,KanjiFontSize k,u16 kan)
+{
+	char buff[32*32];
+	long addr;
+	char kbuff[2];
+
+	kbuff[0]=kan>>8;
+	kbuff[1]=kan&0xff;
+
+
+	addr=kanjiTest((u8 *)&kbuff,k);
+
+	if(addr!=-1)
+		{
+		const int PLOT_X = 100;
+		const int PLOT_Y = 100;
+		int			dot;
+
+		dot=dotSize[k];
+
+		memset(buff,0,sizeof(buff));
+		dekan((u8*)addr,(u8*)&buff,dot);
+
+		Frame		myFrame;
+		Frame		topFrame;
+		Palette		myPal;
+
+		for (int f=0;f<256;f++)
+			myPal[f].SetRGB(255,255,0);
+
+		myPal[0].SetRGB(255,0,0);
+		myPal[1].SetRGB(255,255,255);
+		myPal[2].SetRGB(0,0,0);
+		myPal[3].SetRGB(64,64,64);
+		myPal[255].SetRGB(255,0,255);
+
+		myFrame.SetFrame((u8*)buff,16,dot,myPal);
+		topFrame=myFrame;
+
+		myFrame.Resize(32,dot+2);
+		myFrame.Clear(0);
+
+
+		topFrame.ReplaceColour(1,3);
+		topFrame.PlotTrans(myFrame,0,0);
+		topFrame.PlotTrans(myFrame,2,0);
+		topFrame.PlotTrans(myFrame,0,2);
+		topFrame.PlotTrans(myFrame,2,2);
+
+		topFrame.ReplaceColour(3,2);
+		topFrame.PlotTrans(myFrame,1,0);
+		topFrame.PlotTrans(myFrame,1,2);
+		topFrame.PlotTrans(myFrame,0,1);
+		topFrame.PlotTrans(myFrame,2,1);
+		
+		topFrame.ReplaceColour(2,1);
+		topFrame.PlotTrans(myFrame,1,1);
+
+		Rect		myRect;
+
+
+		myRect=topFrame.FindBoundingRect();
+	
+		topFrame.Resize(256,200);
+		topFrame.Clear(0);
+		topFrame.DrawBox(Rect(100,0,1,200),255);
+		topFrame.DrawBox(Rect(0,100,200,1),255);
+		myFrame.PlotTrans(topFrame,100-myRect.X,(100-dot));
+
+		topFrame.SaveLbm(fileName);
+	
+		cout<<"saved "<<fileName<<endl;
+		}
+	else
+		Error(ERR_FATAL,"Kanji Failed bad style on test of kanji hit");
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::saveKanjiLbms(char const * dir,KanjiFontSize k)
+{
+	int num=0;
+
+	for(int l=0;l<256;l++)
+		{
+		for(int h=0;h<256;h++)
+			{
+			if(getKanjiHit(h,l))
+				{
+				GString		name;
+				name=makeName(dir,num);
+				u16		kan;
+
+				kan=(h<<8)|l;
+
+				saveKanjiLbm(name,k,kan);
+				num++;
+				}
+			}
+		}
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::addStr(u8 const * newStr)
+{
+	u8 tempstr[4096];
+
+	u8 const *str=newStr;
+
+	ascii2SJIS(tempstr,str);
+
+	str=tempstr;
+	
+	while(*str)
+		{
+		if(kanjiTest(str)!=-1)
+			{
+			addKanjiHit(str[0],str[1]);
+			str++;
+			}
+		str++;
+		}
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+KanjiClass::KanjiClass(void)
+{
+	initialise();
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void KanjiClass::initialise(void)
+{
+	m_kanjiHit.resize(256*256);
+
+	for (int x=0;x<256;x++)
+		for (int y=0;y<256;y++)
+			clearKanjiHit(x,y);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int KanjiClass::howManyKanjiChars(void)
+{
+	int		count;
+
+	count=0;
+
+	for (int x=0;x<256;x++)
+		for (int y=0;y<256;y++)
+			if (getKanjiHit(x,y) != 0)
+				count++;
+
+	return(count);
+}
+ 
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+static void checkKanjiCode(uint hi,uint lo)
+{
+	if(hi>=256)
+		GObject::Error(ERR_FATAL,"high char too big");
+	if(lo>=256)
+		GObject::Error(ERR_FATAL,"low char too big");
+}
+
+void KanjiClass::addKanjiHit(uint hi,uint lo)
+{
+	if(!hi && !lo)
+		{
+		GObject::Error(ERR_FATAL,"passed a bad kanji code");
+		}
+
+	checkKanjiCode(hi,lo);
+	m_kanjiHit[hi*256+lo]=1;
+}
+
+bool KanjiClass::getKanjiHit(uint hi,uint lo)
+{
+	checkKanjiCode(hi,lo);
+	return(m_kanjiHit[hi*256+lo]!=0);
+}
+
+void KanjiClass::clearKanjiHit(uint hi,uint lo)
+{
+	checkKanjiCode(hi,lo);
+	m_kanjiHit[hi*256+lo]=0;
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ascii2SJIS(u8 *dest,u8 const *src)
+{
+	while (*src)
+		{
+		if ((src[0])&0x80)
+			{
+			*dest++=*src++;
+			*dest++=*src++;
+			}
+		else
+			{
+			ascii2SJIS(dest,*src);
+			src++;
+			dest+=2;
+			}
+		}
+
+    *dest++=0;
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int kanjiTrans(u16 scode)
+{
+	int ret = 0;
+	u8 ss[2];
+	u8 stmp;
+
+	ss[0]=scode&0xff;
+	ss[1]=scode>>8&0xff;
+	//bcopy(&scode, ss, 2);
+	
+	switch(ss[1])
+	{
+	case 0x81:
+		if ((ss[0] >= 0x40) && (ss[0] <= 0x7e))
+			stmp = 0;
+		else
+		if ((ss[0] >= 0x80) && (ss[0] <= 0xac))
+			stmp = 1;
+		else
+		if ((ss[0] >= 0xb8) && (ss[0] <= 0xbf))
+			stmp = 2;
+		else
+		if ((ss[0] >= 0xc8) && (ss[0] <= 0xce))
+			stmp = 3;
+		else
+		if ((ss[0] >= 0xda) && (ss[0] <= 0xe8))
+			stmp = 4;
+		else
+		if ((ss[0] >= 0xf0) && (ss[0] <= 0xf7))
+			stmp = 5;
+		else
+		if (ss[0] == 0xfc)
+			stmp = 6;
+		else {
+			ret = -1;
+			break;
+		}
+		ret = scode - kanji_0_table[stmp][0] + kanji_0_table[stmp][1];
+		break;
+
+	case 0x82:
+		if ((ss[0] >= 0x4f) && (ss[0] <= 0x58))
+			stmp = 7;
+		else
+		if ((ss[0] >= 0x60) && (ss[0] <= 0x79))
+			stmp = 8;
+		else
+		if ((ss[0] >= 0x81) && (ss[0] <= 0x9a))
+			stmp = 9;
+		else
+		if ((ss[0] >= 0x9f) && (ss[0] <= 0xf1))
+			stmp = 10;
+		else {
+			ret = -1;
+			break;
+		}
+		ret = scode - kanji_0_table[stmp][0] + kanji_0_table[stmp][1];
+		break;
+
+	case 0x83:
+		if ((ss[0] >= 0x40) && (ss[0] <= 0x7e))
+			stmp = 11;
+		else
+		if ((ss[0] >= 0x80) && (ss[0] <= 0x96))
+			stmp = 12;
+		else
+		if ((ss[0] >= 0x9f) && (ss[0] <= 0xb6))
+			stmp = 13;
+		else
+		if ((ss[0] >= 0xbf) && (ss[0] <= 0xd6))
+			stmp = 14;
+		else {
+			ret = -1;
+			break;
+		}
+		ret = scode - kanji_0_table[stmp][0] + kanji_0_table[stmp][1];
+		break;
+
+	case 0x84:
+		if ((ss[0] >= 0x40) && (ss[0] <= 0x60))
+			stmp = 15;
+		else
+		if ((ss[0] >= 0x70) && (ss[0] <= 0x7e))
+			stmp = 16;
+		else
+		if ((ss[0] >= 0x80) && (ss[0] <= 0x91))
+			stmp = 17;
+		else
+		if ((ss[0] >= 0x9f) && (ss[0] <= 0xbe))
+			stmp = 18;
+		ret = scode - kanji_0_table[stmp][0] + kanji_0_table[stmp][1];
+		break;
+
+	case 0x85:
+		if ((ss[0] >= 0x40) && (ss[0] <= 0x44))
+			stmp = 0;
+		else
+		if (ss[0] == 0x46)
+			stmp = 1;
+		else
+		if ((ss[0] >= 0x48) && (ss[0] <= 0x49))
+			stmp = 2;
+		else
+		if (ss[0] == 0x4b)
+			stmp = 3;
+		else
+		if ((ss[0] >= 0x50) && (ss[0] <= 0x5b))
+			stmp = 4;
+		else
+		if ((ss[0] >= 0xa0) && (ss[0] <= 0xac))
+			stmp = 5;
+		else
+		if ((ss[0] >= 0xb0) && (ss[0] <= 0xbc))
+			stmp = 6;
+		else {
+			ret = -1;
+			break;
+		}
+		ret = scode - kanji_g_table[stmp][0] + kanji_g_table[stmp][1];
+		break;
+
+	case 0x86:
+		if ((ss[0] >= 0x40) && (ss[0] <= 0x41))
+			stmp = 7;
+		else
+		if (ss[0] == 0x43)
+			stmp = 8;
+		else
+		if (ss[0] == 0x45)
+			stmp = 9;
+		else
+		if ((ss[0] >= 0x47) && (ss[0] <= 0x48))
+			stmp = 10;
+		else
+		if ((ss[0] >= 0x4a) && (ss[0] <= 0x4c))
+			stmp = 11;
+		else
+		if ((ss[0] >= 0x4e) && (ss[0] <= 0x4f))
+			stmp = 12;
+		else
+		if ((ss[0] >= 0x60) && (ss[0] <= 0x6f))
+			stmp = 13;
+		else
+		if ((ss[0] >= 0x9f) && (ss[0] <= 0xb6))
+			stmp = 14;
+		else
+		if ((ss[0] >= 0xb8) && (ss[0] <= 0xf5))
+			stmp = 15;
+		else {
+			ret = -1;
+			break;
+		}
+		ret = scode - kanji_g_table[stmp][0] + kanji_g_table[stmp][1];
+		break;
+
+	case 0x87:
+		if ((ss[0] >= 0x40) && (ss[0] <= 0x5a))
+			stmp = 16;
+		else
+		if ((ss[0] >= 0x5c) && (ss[0] <= 0x62))
+			stmp = 17;
+		else
+		if ((ss[0] >= 0x64) && (ss[0] <= 0x96))
+			stmp = 18;
+		else {
+			ret = -1;
+			break;
+		}
+		ret = scode - kanji_g_table[stmp][0] + kanji_g_table[stmp][1];
+		break;
+
+	default:
+		if ((ss[1] > 0x98) || ((ss[1] == 0x98) && (ss[0] > 0x72)) ||
+		    (ss[1] < 0x88) || ((ss[1] == 0x88) && (ss[0] < 0x9f)) ||
+		    (ss[0] > 0xfc) || (ss[0] < 0x40) ||
+		    ((ss[0] > 0x7e) && (ss[0] < 0x80))) {
+			ret = -1;
+			break;
+		}
+		stmp = ((ss[1] - 0x88)*2) + ((ss[0] < 0x7f) ? 0 : 1) - 1;
+		ret = scode - kanji_1_table[stmp][0] + kanji_1_table[stmp][1];
+	}
+	
+	return(ret);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+  long kanjiTest( u8 const *sjis,KanjiClass::KanjiFontSize k)
+{
+	int	code;
+	u32	kaddr, addr;
+	u16 sjiscode;
+	int	dot;
+
+	dot=dotSize[k];
+
+	sjiscode = *sjis << 8 | *(sjis+1);
+
+	if ((sjiscode >= 0x8140) && (sjiscode <= 0x84be))
+		kaddr = kanjiAddr0[k];
+	else if (dot==15 && (sjiscode >= 0x8540) && (sjiscode <= 0x8796))
+		kaddr = kanjiAddrG[k];
+	else if ((sjiscode >= 0x889f) && (sjiscode <= 0x9872))
+		kaddr = kanjiAddr1[k];
+    else
+		return -1;
+  
+  code = kanjiTrans(sjiscode);
+  addr = kaddr + code * dot * 2;
+
+  return addr;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void dekan(u8 *ptr,u8 *buf,int dot)
+{
+	int i,j,k;
+	char tmp;
+	int xchar, ychar;
+
+	xchar = 2;
+	ychar = dot;
+
+	for (i=0 ; i < ychar ; i++)
+		{
+		for (j=0 ; j < xchar ; j++)
+			{
+			tmp = *(ptr+i*xchar+j);
+			for (k=0 ; k < 8 ; k++)
+				{
+				if (tmp & 0x80)
+					*buf++=1;
+				else
+					*buf++=0;
+
+				tmp *= 2 ;
+				}
+			}
+		}
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ascii2SJIS(u8 *dest,u8 Ascii)
+{
+	u16 kan;
+	int done=0;
+
+    struct  SjisS   *Ptr=SjisTable;
+
+     while (!done && Ptr->Ascii)
+     {
+
+        if ((Ascii>=Ptr->Ascii) && (Ascii<(Ptr->Ascii+Ptr->Num)))
+        {
+            /* Found ASCII char, return SJIS equivalent */
+            kan= (Ptr->Sjis+(Ascii-Ptr->Ascii));
+			done=1;
+        }
+        Ptr++;
+     }
+
+	if(!done)
+		kan=0x8148;
+
+	*dest++=(kan>>8);
+	*dest++=(kan&0xff);
+}
+
+/*===========================================================================
+ end */
diff --git a/Utils/transtext/kanjiclass.h b/Utils/transtext/kanjiclass.h
new file mode 100644
index 000000000..e5ad312ea
--- /dev/null
+++ b/Utils/transtext/kanjiclass.h
@@ -0,0 +1,97 @@
+/*=========================================================================
+
+	KANJICLASS.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+#ifndef __KANJI_CLASS__
+#define __KANJI_CLASS__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <vector>
+
+/*	Glib
+	---- */
+#include <gtypes.h>
+#include <gobject.hpp>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+class KanjiClass : GObject
+{
+public:
+
+	enum KanjiFontSize
+		{
+			FONT_SIZE_11,
+			FONT_SIZE_13,
+			FONT_SIZE_15,
+		};
+private:
+	std::vector<u8> m_kanjiHit;
+
+	void	initialise(void);
+
+	void	addKanjiHit(uint hi,uint lo);
+	bool	getKanjiHit(uint hi,uint lo);
+	void	clearKanjiHit(uint hi,uint lo);
+	int		findKanjiIndex(u16 kan) const;
+	static void	saveKanjiLbm(char const * fileName,KanjiFontSize k,u16 kan);
+
+public:
+
+
+			KanjiClass(void);
+
+	void	addStr(u8 const * newStr);
+
+	int		howManyKanjiChars(void);
+	void	saveKanjiLbms(char const * dir,KanjiFontSize k = KanjiClass::FONT_SIZE_11);
+	void	saveKanjiLbmNames(char const * dir,char const *name);
+	void	saveKanjiTable(char const *name);
+	static void	writeEnglishFontLbms(char const * dir,KanjiFontSize k = KanjiClass::FONT_SIZE_11,char const * repFile= NULL);
+};
+
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+
+
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* XYZ */
+
+/*===========================================================================
+ end */
diff --git a/Utils/transtext/main.cpp b/Utils/transtext/main.cpp
new file mode 100644
index 000000000..0ffa53bc2
--- /dev/null
+++ b/Utils/transtext/main.cpp
@@ -0,0 +1,299 @@
+/*=========================================================================
+
+	MAIN.CPP	
+
+	Author:  Gary Liddon @ Fareham
+	Created: 3rd March 1999
+	Project: Theme Park World Playstation
+	Purpose: Main module for Folio
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <vector>
+#include <conio.h>
+#include <sys/stat.h>
+#include <sys/utime.h>
+#include <fcntl.h>
+#include <io.h>
+
+/*	Glib
+	---- */
+#include <misc.hpp>
+#include <gfname.hpp>
+#include <gstring.hpp>
+#include <pcre.h>
+
+/*	tplib
+	---- */
+#include <trans.h>
+#include <lang.h>
+#include <script.h>
+
+
+/*	local
+	---- */
+#include "kanjiclass.h"
+
+/*----------------------------------------------------------------------
+	Version info
+	
+	1.0 - 1.2	GL	Initial working version
+	1.3			GL	Longer line length (now 4096)
+	1.4			GL	Added comments to file
+	1.5			GL	Changed it so that \n are now returns
+	1.6			GL	Added a slew of stuff to handle kanji
+	1.7			GL	Chganged format of kanji table
+	1.8			GL	Removed bug with kanji frame lookup
+	1.9			GL	added -s so user can specify the size of output font
+	1.91		GL  Transtext also writes out an ID text file (id.dat)
+	1.92		GL	fixed bug with output kanji table being too short
+
+/*----------------------------------------------------------------------
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+static void		usage(void);
+static char *	cycleCommands(char *String,int Num);
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+static const float	version=1.92f;
+static GString		fileWithTranslations;
+static GString		headerFile;
+static GString		outDir;
+
+static GString		g_japKanjiFile;
+static GString		g_japLbmDir;
+static GString		g_englishLbmsDir;
+static GString		g_japLbmListFile;
+static int			g_fontSize=0;
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+int main(int argc, char ** argv)
+{
+	cerr<<"GRLiddon() TRANSTEXT text translation stuphh "<<version<<endl;
+	cerr<<"Copyright (c) 1999 G R Liddon. All rights reserved"<<endl<<endl;
+
+	if (argc==1)
+		usage();
+	else
+		{
+		CommandLine(argc,argv,cycleCommands);
+
+		if (g_englishLbmsDir)
+			{
+			KanjiClass::writeEnglishFontLbms(g_englishLbmsDir,KanjiClass::KanjiFontSize(g_fontSize));
+			}
+
+		if (fileWithTranslations)
+			{
+			AllTextDatabases	myDatabases;
+			myDatabases.readTranslationFile(fileWithTranslations);
+
+			if (outDir)
+				myDatabases.write(outDir);
+
+			if (headerFile)
+				myDatabases.writeHeaderFile(headerFile);
+
+
+			/* Do some kanji jiggery pokery */
+
+
+			if (g_japKanjiFile || g_japLbmDir || g_japLbmListFile) 
+				{
+				TextDatabase *		jDataBase;
+				int					numOfStrings;
+				KanjiClass			kClass;
+
+				jDataBase=myDatabases.getTextDataBase(JAPANESE);
+				numOfStrings=jDataBase->getNumOfStrings();
+
+				for (int f=0;f<numOfStrings;f++)
+					kClass.addStr((u8 const*)jDataBase->getText(f));
+
+				if (g_japLbmDir)
+					{
+					if (g_fontSize >=0 && g_fontSize < 3)
+						kClass.saveKanjiLbms(g_japLbmDir,KanjiClass::KanjiFontSize(g_fontSize));
+					else
+						GObject::Error(ERR_FATAL,"illegal font size parameter");
+					}
+
+				if (g_japKanjiFile)
+					kClass.saveKanjiTable(g_japKanjiFile);
+
+				if (g_japLbmListFile && g_japLbmDir)
+					kClass.saveKanjiLbmNames(g_japLbmDir,g_japLbmListFile);
+
+				cout<<"text uses "<<kClass.howManyKanjiChars()<<endl; 
+				}
+			}
+		else
+			GObject::Error(ERR_FATAL,"you must define a translation file");
+		}
+
+	return(0);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:		void Usage(void)
+	Notes:			Usage of the util
+  ---------------------------------------------------------------------- */
+void usage(void)
+{
+	cout<<"Usage: TRANSTEXT <in file> [ switches.. ]\n";
+	cout<<"Switches:\n"<<endl;
+	cout<<"-o:<dir>            Dir to save translation strings to"<<endl;
+	cout<<"-e:<dir>            Dir write ascii images to"<<endl;
+	cout<<"-h:<file>           File to save lang enums to"<<endl;
+	cout<<endl;
+	cout<<"-d:<dir>            Dir to save kanji lbms to"<<endl;
+	cout<<"-j:<file>           File to save kanji table to"<<endl;
+	cout<<"-p:<file>           File to save list of saved lbms to"<<endl;
+	cout<<endl;
+	cout<<"-s:<0|1|2>          Set the size of the output font"<<endl;
+	cout<<endl;
+}
+
+/*----------------------------------------------------------------------
+	Function:
+	Purpose:
+	Params:
+  ---------------------------------------------------------------------- */
+GString	getFileString(char const * Switch)
+{
+	pcre *			MyPattern;
+	int				Matches;
+	const int		NumOfOffsets=20;
+	int				Offsets[NumOfOffsets];
+	char const *	ErrTxt;
+	int				ErrNum;
+	char			SwitchText[100];
+
+	MyPattern=pcre_compile("^-.:(.*)",0,&ErrTxt,&ErrNum,NULL);
+	Matches=pcre_exec(MyPattern,NULL,Switch,strlen(Switch),0,Offsets,NumOfOffsets);
+
+	if (Matches != 2)
+		GObject::Error(ERR_FATAL,"Ill formatted switch %s",Switch);
+
+	memcpy(SwitchText,&Switch[Offsets[2]],Offsets[3]-Offsets[2]);
+	SwitchText[Offsets[3]-Offsets[2]]=0;
+
+	return(GString(SwitchText));
+}
+
+/*----------------------------------------------------------------------
+	Function:
+	Purpose:
+	Params:
+  ---------------------------------------------------------------------- */
+bool getPlusMinus(char const * Switch)
+{
+	pcre *			MyPattern;
+	int				Matches;
+	const int		NumOfOffsets=20;
+	int				Offsets[NumOfOffsets];
+	char const *	ErrTxt;
+	int				ErrNum;
+
+	MyPattern=pcre_compile("^-.([+|-])",0,&ErrTxt,&ErrNum,NULL);
+	Matches=pcre_exec(MyPattern,NULL,Switch,strlen(Switch),0,Offsets,NumOfOffsets);
+
+	if (Matches != 2)
+		GObject::Error(ERR_FATAL,"Ill formatted switch %s",Switch);
+
+	return(Switch[Offsets[2]]=='+');
+}
+
+/*----------------------------------------------------------------------
+	Function:	char *CycleCommands(char *String,int Num)
+	Purpose:	Callback to cycle through command line items
+	Params:		String = Text of item
+				Num = Item number
+  ---------------------------------------------------------------------- */
+char * cycleCommands(char * cmdString,int num)
+{
+	if (cmdString[0]=='-' || cmdString[0]=='/')
+		{
+		switch (cmdString[1])
+			{
+			case 'e':
+				g_englishLbmsDir=getFileString(cmdString);
+				break;
+
+			case 'h':
+				headerFile=getFileString(cmdString);
+				break;
+
+			case 'o':
+				outDir=getFileString(cmdString);
+				break;
+
+			case 'j':
+				g_japKanjiFile=getFileString(cmdString);
+				break;
+
+			case 'd':
+				g_japLbmDir=getFileString(cmdString);
+				break;
+
+			case 'p':
+				g_japLbmListFile=getFileString(cmdString);
+				break;
+
+			case 's':
+				g_fontSize=atoi(getFileString(cmdString));
+				break;
+
+			default:
+				GObject::Error(ERR_FATAL,"unknown switch %s",cmdString);
+				break;
+			}
+		}
+	else
+		{
+		if (fileWithTranslations)
+			GObject::Error(ERR_FATAL,"translation file already defined as %s",(char const *)fileWithTranslations);
+		else
+			fileWithTranslations=cmdString;
+		}
+
+	return(cmdString);
+}
+
+
+
+
+/*===========================================================================
+ end */
diff --git a/Utils/transtext/script.cpp b/Utils/transtext/script.cpp
new file mode 100644
index 000000000..ef93da0ed
--- /dev/null
+++ b/Utils/transtext/script.cpp
@@ -0,0 +1,336 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+#include "script.h"
+
+/*	Std Lib
+	------- */
+
+/*	Glib
+	---- */
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+using namespace std;
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+const int DEFAULT_LINE_LENGTH=8192;
+
+/*----------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Vars
+	---- */
+
+/*----------------------------------------------------------------------
+	Data
+	---- */
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+ScriptFile::ScriptFile(void)
+{
+	m_isOpen=false;
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+ScriptFile::~ScriptFile(void)
+{
+	close();
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ScriptFile::close(void)
+{
+	if (m_isOpen)
+		m_inStream.close();
+
+	m_isOpen=false;
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ScriptFile::open(char const * fileName)
+{
+	if (m_isOpen)
+		close();
+
+	m_inStream.open(fileName,ios::binary|ios::in);
+
+	if (m_inStream)
+		{	
+		m_fileName=fileName;
+
+		}
+	else
+		GObject::Error(ERR_FATAL,"unable to open script file %s",fileName);
+
+	m_isOpen=true;
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ScriptFile::scriptError(void)
+{
+	GObject::Error(ERR_FATAL,"Ill formatted script file %s, line %d",(char const *)m_fileName,m_lineCount);
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	ak
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ScriptFile::checkIsOpen(void)
+{
+	if (!m_isOpen)
+		GObject::Error(ERR_FATAL,"file operation needed by ScriptFile but no file is open");
+}
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool ScriptFile::getNextNonBlankLine(char * line,int lineLen)
+{
+	checkIsOpen();
+
+	do
+		{
+		if (m_inStream.eof())
+			return(false);
+
+		m_inStream.getline(line,lineLen);
+
+		
+		int		lineLength;
+
+		lineLength=strlen(line);
+
+		for (int f=0;f<lineLength;f++)
+			{
+			if (line[f] == ';')
+				line[f]=0;
+			}
+		
+		if (strlen(line))
+			line[strlen(line)-1]=0;
+
+		m_lineCount++;
+			
+//		stripTrailingSpace(line);
+		}
+	while (!strlen(line));
+
+	return(true);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool ScriptFile::nextLineIsCommand(void)
+{
+	checkIsOpen();
+
+	bool		retVal;
+	streampos	thisPos;
+	const int	lineLength=DEFAULT_LINE_LENGTH;
+	char		line[lineLength];
+	int			oldLineCount;
+
+	oldLineCount=m_lineCount;
+
+	retVal=false;	
+
+	thisPos=m_inStream.tellg();
+
+	if (getNextNonBlankLine(line,lineLength))
+		{
+		stripTrailingSpace(line);
+		retVal=isCommand(line);
+		}
+
+	m_inStream.seekg(thisPos);
+
+	m_lineCount=oldLineCount;
+
+	return(retVal);
+
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+GString ScriptFile::peekNextCommand(void)
+{
+	checkIsOpen();
+
+	GString		retStr;
+
+	if (nextLineIsCommand())
+		{
+		const int	lineLength=DEFAULT_LINE_LENGTH;
+		char		line[lineLength];
+		int			oldLineCount;
+		streampos	thisPos;
+
+		oldLineCount=m_lineCount;
+
+		thisPos=m_inStream.tellg();
+
+		getNextNonBlankLine(line,lineLength);
+		stripTrailingSpace(line);
+		retStr=getCommandString(line);
+
+		m_inStream.seekg(thisPos);
+	
+		m_lineCount=oldLineCount;
+		}
+
+	return(retStr);
+
+}
+
+
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+void ScriptFile::stripTrailingSpace(char * line)
+{
+	if (strlen(line))
+		{
+		bool done=false;
+
+
+		for (int f=strlen(line)-1;f<=0 && !done ;f--)
+			{
+			if ((!isspace(line[f])) )
+				done=true;
+			else
+				line[f]=0;
+			}
+		}
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+GString ScriptFile::getCommandString(char * com)
+{
+	char *		newStr;
+
+	newStr=strdup(com);
+
+	newStr[strlen(newStr)-1]=0;
+	GString	retStr(&newStr[1]);
+
+	free(newStr);
+
+	return(retStr);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool ScriptFile::isCommand(char * line)
+{
+	return ((line[0]=='[') && (line[strlen(line)-1]==']'));
+}
+
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+GString ScriptFile::getNextLine(void)
+{
+	const int	lineLength=DEFAULT_LINE_LENGTH;
+	char		line[lineLength];
+
+	getNextNonBlankLine(line,lineLength);
+
+	return(line);
+}
+
+/*----------------------------------------------------------------------
+	Function:	
+	Purpose:
+	Params:
+	Returns:
+  ---------------------------------------------------------------------- */
+bool ScriptFile::eof(void)
+{
+	checkIsOpen();
+	return(m_inStream.eof());
+}
+
+/*===========================================================================
+ end */
diff --git a/Utils/transtext/script.h b/Utils/transtext/script.h
new file mode 100644
index 000000000..5d0ee3eda
--- /dev/null
+++ b/Utils/transtext/script.h
@@ -0,0 +1,95 @@
+/*=========================================================================
+
+	FILENAME.CPP	
+
+	Author:  Gary Liddon @
+	Created:
+	Project:
+	Purpose:
+
+	Copyright (c) 1998 G R Liddon
+
+===========================================================================*/
+
+#ifndef __SCRIPT_H__
+#define __SCRIPT_H__
+
+/*----------------------------------------------------------------------
+	Includes
+	-------- */
+
+/*	Std Lib
+	------- */
+#include <fstream>
+
+/*	Glib
+	---- */
+#include <gstring.hpp>
+
+/*	Local
+	----- */
+
+/*----------------------------------------------------------------------
+	Tyepdefs && Defines
+	------------------- */
+
+/*----------------------------------------------------------------------
+	Structure defintions
+	-------------------- */
+class ScriptFile
+{
+private:
+	std::ifstream		m_inStream;
+	bool				m_isOpen;
+	GString				m_fileName;
+	int					m_lineCount;
+
+	void		scriptError(void);
+
+	bool		getNextNonBlankLine(char * Line,int LineLen);
+
+	void		stripTrailingSpace(char * Line);
+	GString		getCommandString(char * Com);
+	bool		isCommand(char * Line);
+	void		checkIsOpen(void);
+
+protected:
+	bool		eof(void);
+	GString		peekNextCommand(void);
+	bool		nextLineIsCommand(void);
+	GString		getNextLine(void);
+
+	void		open(char const * fileName);
+	void		close(void);
+
+
+
+public:
+
+
+	ScriptFile(void);
+	~ScriptFile(void);
+};
+
+/*----------------------------------------------------------------------
+	Globals
+	------- */
+
+/*	Vars
+	---- */
+
+/*	Data
+	---- */
+
+/*	Functions
+	--------- */
+
+
+
+/*---------------------------------------------------------------------- */
+
+#endif	/* __SCRIPT_H__ */
+
+/*===========================================================================
+ end */
+
diff --git a/Utils/transtext/transtext.dsp b/Utils/transtext/transtext.dsp
new file mode 100644
index 000000000..580ae07f3
--- /dev/null
+++ b/Utils/transtext/transtext.dsp
@@ -0,0 +1,108 @@
+# Microsoft Developer Studio Project File - Name="transtext" - Package Owner=<4>
+# Microsoft Developer Studio Generated Build File, Format Version 6.00
+# ** DO NOT EDIT **
+
+# TARGTYPE "Win32 (x86) Console Application" 0x0103
+
+CFG=transtext - Win32 Debug
+!MESSAGE This is not a valid makefile. To build this project using NMAKE,
+!MESSAGE use the Export Makefile command and run
+!MESSAGE 
+!MESSAGE NMAKE /f "transtext.mak".
+!MESSAGE 
+!MESSAGE You can specify a configuration when running NMAKE
+!MESSAGE by defining the macro CFG on the command line. For example:
+!MESSAGE 
+!MESSAGE NMAKE /f "transtext.mak" CFG="transtext - Win32 Debug"
+!MESSAGE 
+!MESSAGE Possible choices for configuration are:
+!MESSAGE 
+!MESSAGE "transtext - Win32 Release" (based on "Win32 (x86) Console Application")
+!MESSAGE "transtext - Win32 Debug" (based on "Win32 (x86) Console Application")
+!MESSAGE 
+
+# Begin Project
+# PROP AllowPerConfigDependencies 0
+# PROP Scc_ProjName ""$/TP2psx/utils/transtext", JNXBAAAA"
+# PROP Scc_LocalPath "."
+CPP=xicl6.exe
+RSC=rc.exe
+
+!IF  "$(CFG)" == "transtext - Win32 Release"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 0
+# PROP BASE Output_Dir "Release"
+# PROP BASE Intermediate_Dir "Release"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 0
+# PROP Output_Dir "Release"
+# PROP Intermediate_Dir "Release"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD CPP /nologo /MD /W3 /GX /O2 /I "..\..\glibdev\glib\include" /I "..\..\glibdev\glib\include\pc" /I "..\tplib" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
+# ADD BASE RSC /l 0x809 /d "NDEBUG"
+# ADD RSC /l 0x809 /d "NDEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=xilink6.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib win32lib.lib /nologo /subsystem:console /machine:I386 /libpath:"..\..\glibdev\glib\lib\win32lib\release" /libpath:"..\tplib\release"
+
+!ELSEIF  "$(CFG)" == "transtext - Win32 Debug"
+
+# PROP BASE Use_MFC 0
+# PROP BASE Use_Debug_Libraries 1
+# PROP BASE Output_Dir "Debug"
+# PROP BASE Intermediate_Dir "Debug"
+# PROP BASE Target_Dir ""
+# PROP Use_MFC 0
+# PROP Use_Debug_Libraries 1
+# PROP Output_Dir "Debug"
+# PROP Intermediate_Dir "Debug"
+# PROP Target_Dir ""
+# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
+# ADD CPP /nologo /MDd /W3 /Gm /GX /ZI /Od /I "..\..\glibdev\glib\include" /I "..\..\glibdev\glib\include\pc" /I "..\tplib" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /FR /YX /FD /GZ /c
+# ADD BASE RSC /l 0x809 /d "_DEBUG"
+# ADD RSC /l 0x809 /d "_DEBUG"
+BSC32=bscmake.exe
+# ADD BASE BSC32 /nologo
+# ADD BSC32 /nologo
+LINK32=xilink6.exe
+# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
+# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib win32lib.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept /libpath:"..\..\glibdev\glib\lib\win32lib\debug" /libpath:"..\tplib\debug"
+
+!ENDIF 
+
+# Begin Target
+
+# Name "transtext - Win32 Release"
+# Name "transtext - Win32 Debug"
+# Begin Group "Source Files"
+
+# PROP Default_Filter "cpp;c;cxx;rc;def;r;odl;idl;hpj;bat"
+# Begin Source File
+
+SOURCE=.\kanjiclass.cpp
+# End Source File
+# Begin Source File
+
+SOURCE=.\main.cpp
+# End Source File
+# End Group
+# Begin Group "Header Files"
+
+# PROP Default_Filter "h;hpp;hxx;hm;inl"
+# Begin Source File
+
+SOURCE=.\kanjiclass.h
+# End Source File
+# End Group
+# Begin Group "Resource Files"
+
+# PROP Default_Filter "ico;cur;bmp;dlg;rc2;rct;bin;rgs;gif;jpg;jpeg;jpe"
+# End Group
+# End Target
+# End Project
diff --git a/Utils/transtext/transtext.dsw b/Utils/transtext/transtext.dsw
new file mode 100644
index 000000000..cbaffd59a
--- /dev/null
+++ b/Utils/transtext/transtext.dsw
@@ -0,0 +1,29 @@
+Microsoft Developer Studio Workspace File, Format Version 6.00
+# WARNING: DO NOT EDIT OR DELETE THIS WORKSPACE FILE!
+
+###############################################################################
+
+Project: "transtext"=.\transtext.dsp - Package Owner=<4>
+
+Package=<5>
+{{{
+}}}
+
+Package=<4>
+{{{
+}}}
+
+###############################################################################
+
+Global:
+
+Package=<5>
+{{{
+}}}
+
+Package=<3>
+{{{
+}}}
+
+###############################################################################
+
diff --git a/build/ccopt.mak b/build/ccopt.mak
new file mode 100644
index 000000000..90e8d0d3e
--- /dev/null
+++ b/build/ccopt.mak
@@ -0,0 +1,60 @@
+#----------------------------------------------------------------------------
+#	CCOPT.MAK
+#
+#	This holds all the command line options for C++
+#	compilation
+#
+#	Tabbed for 5 9 (Please do not change)
+#
+#	Created:	3rd February 1999
+#
+#	Copyright (C) 1997-1998 G R Liddon
+#----------------------------------------------------------------------------
+
+COMPILER_INI_FILE :=		$(PSYQ_PATH)/sn.ini
+
+ASM_OPTS :=			/l /zd /z /w /q \
+					/o c+ /o w+ /o ws+ \
+					/j $(PSYQ_INC_DIR)	\
+					/j $(SOURCE_DIR) \
+					/j ./
+
+
+
+COMMON_CCFLAGS :=	-Werror \
+					-D__TERRITORY_$(TERRITORY)__\
+					-D__VERSION_$(VERSION)__\
+					-D__USER_$(USER_NAME)__ \
+					-D__VERSION_STR__=$(VERSION)\
+					-D__TERRITORY_STR__=$(TERRITORY)\
+					-DPSX \
+					-D_LANGUAGE_C_PLUS_PLUS \
+					$(USER_DEF_OPT) \
+					$(GLIB_OPT) \
+					$(FILE_OPT) \
+					$(DEV_OPT) \
+					$(SMALL_OPT) \
+					-Wall \
+					-Wmissing-prototypes\
+					-Wmissing-declarations\
+					-Wno-unused \
+					-Wbad-function-cast \
+					-g \
+					-O2\
+					-fno-builtin\
+					-fomit-frame-pointer\
+					-fno-exceptions \
+					-fno-rtti \
+					-I. \
+					-I$(PSYQ_INC_DIR) \
+					-I$(DDX_INC_DIR)\
+					-I$(MOD_INC_DIR)\
+					-I$(SOURCE_DIR)\
+					-I$(GIN_INC_DIR) \
+					-I$(GAME_DATA_DIR) \
+					-I$(INC_DIR)
+
+#					-fno-inline \
+
+#----------------------------------------------------------------------------
+# end
\ No newline at end of file
diff --git a/build/getuser.mak b/build/getuser.mak
new file mode 100644
index 000000000..bb2a06a62
--- /dev/null
+++ b/build/getuser.mak
@@ -0,0 +1,35 @@
+#----------------------------------------------------------------------------
+#	GETUSER.MAK
+#
+#	Get's the user vars in from their makefile
+#
+#	Their makefile is at $(USERS_DIR)/<user name>/makefile
+#	The user name is whatever they logged onto
+#	their computer as (in lower case)
+#
+#	Tabbed for 5 9 (Please do not change)
+#
+#	Created:	3rd February 1999
+#
+#	Copyright (C) 1997-1998 G R Liddon
+#----------------------------------------------------------------------------
+
+# Now that's all sorted include the users vars
+# --------------------------------------------
+
+ifndef USER_NAME
+
+USER_NAME := $(shell $(LOG_NAME))
+
+endif
+
+
+USER_VAR_FILE :=	$(USERS_DIR)/$(USER_NAME)/makefile
+
+$(USERS_DIR)/$(USER_NAME)/makefile :
+	@$(ECHO) You Need a user file. See gary liddon
+
+include $(USER_VAR_FILE)
+
+#----------------------------------------------------------------------------
+# end
\ No newline at end of file
diff --git a/build/globals.mak b/build/globals.mak
new file mode 100644
index 000000000..0f06e4447
--- /dev/null
+++ b/build/globals.mak
@@ -0,0 +1,162 @@
+#----------------------------------------------------------------------------
+#   globals.mak
+#
+#	Global defintions for all makefiles
+#	Directory definitions and user preference inclusion
+#
+#	Tabbed for 5 9 (Please do not change)
+#
+#	Created:	19th April 1997 by G R Liddon @ Fareham
+#
+#	Copyright (C) 1997 G R Liddon
+#----------------------------------------------------------------------------
+
+ifndef __GLOBALS_MAK__
+__GLOBALS_MAK__ := 1
+
+#----------------------------------------------------------------------------
+#	Useful Macros
+#	-------------
+
+NULL		:=
+SPACE		:=	$(NULL) $(NULL)
+TAB			:=	$(NULL)	$(NULL)
+COMMA		:=	,
+LBRACKET	:=	(
+RBRACKET	:=	)
+DOLLAR		:=	$$
+SQUOTE		:=	'
+DQUOTE		:=	"
+
+define	NEWLINE
+
+
+endef
+
+
+#----------------------------------------------------------------------------
+#	Directory Definitions
+#	---------------------
+
+
+#	Miscellaneous Dirs
+#	------------------
+TOOL_DIR :=				tools
+GRAF_DIR :=				graphics
+GAME_DATA_DIR :=		data
+USERS_DIR :=			users
+SOURCE_DIR :=			source
+SOUND :=				sounds
+
+#	Psyq Utilities and libraries
+#	----------------------------
+PSYQ_DIR :=				$(TOOL_DIR)/psyq
+PSYQ_BIN_DIR :=			$(PSYQ_DIR)/bin
+PSYQ_LIB_DIR :=			$(PSYQ_DIR)/lib
+PSYQ_INC_DIR :=			$(PSYQ_DIR)/include
+
+#	DDX Dodgy test kit
+#	------------------
+DDX_DIR :=				$(TOOL_DIR)/climax
+DDX_BIN_DIR :=			$(DDX_DIR)/exes
+DDX_INC_DIR :=			$(DDX_DIR)/libs
+DDX_LIB_DIR :=			$(DDX_DIR)/libs
+
+#	MOD - mod playing lib
+#	---------------------
+MOD_DIR :=				$(TOOL_DIR)/mod
+MOD_INC_DIR :=			$(MOD_DIR)/include
+MOD_LIB_DIR :=			$(MOD_DIR)/lib
+
+#	VLC - FMV decoder
+#	---------------------
+VLC_DIR :=				$(TOOL_DIR)/vlc
+VLC_INC_DIR :=			$(VLC_DIR)/include
+VLC_LIB_DIR :=			$(VLC_DIR)/lib
+
+#	GIN tools and includes
+#	---------------------
+GIN_TOOL_DIR :=			$(TOOL_DIR)/gin
+GIN_BIN_DIR :=			$(GIN_TOOL_DIR)/bin
+GIN_INC_DIR :=			$(GIN_TOOL_DIR)/include
+
+GIN2MSH :=				$(GIN_BIN_DIR)/Gin2Msh -q
+GIN2ACT :=				$(GIN_BIN_DIR)/Gin2Act -q
+GIN2ANM :=				$(GIN_BIN_DIR)/Gin2Anm
+GIN2LVL :=				$(GIN_BIN_DIR)/Gin2Kdt -q
+
+# Cygwin
+# ------
+CYG_DIR :=				$(TOOL_DIR)/cygwin
+CYG_BIN_DIR :=			$(CYG_DIR)
+
+# Perl
+# ----
+PERL_DIR :=				$(TOOL_DIR)/perl
+PERL_BIN_DIR :=			$(PERL_DIR)/bin
+PERL_SCRIPT_DIR :=		$(PERL_DIR)/pl
+
+# Cygwin tools
+# ------------
+ECHO :=					$(CYG_BIN_DIR)/echo
+RMDIR :=				$(CYG_BIN_DIR)/rmdir
+MKDIR :=				$(CYG_BIN_DIR)/mkdir
+REDIR :=				glecho
+TOUCH :=				touch
+RM :=					rm
+CP :=					cp
+SED :=					sed
+LS :=					$(CYG_BIN_DIR)/ls
+MV :=					$(CYG_BIN_DIR)/mv
+DATE :=					$(CYG_BIN_DIR)/date
+SED :=					$(CYG_BIN_DIR)/sed
+
+LOG_NAME :=				uname
+PARKGRAB :=				parkgrab
+BANKER :=				banker
+BIGLUMP :=				bl2
+
+# PSX and misc tools
+# ------------------
+LNK :=					slink
+PL :=					perl
+CC :=					ccpsx
+ASM :=					asmpsx
+CPE2EXE :=				cpe2exe
+CPE2BIN :=				cpe2bin
+LZNP :=					lznp -Q
+SIZEAPP :=				sizeapp
+MAKEDATA :=				MkData
+
+#----------------------------------------------------------------------------
+#	Vars that need exporting
+#	------------------------
+
+#	Path
+#	----
+export PATH =		$(TOOL_DIR);$(CYG_BIN_DIR);$(PSYQ_BIN_DIR);$(PERL_BIN_DIR)
+export Path =		$(TOOL_DIR);$(CYG_BIN_DIR);$(PSYQ_BIN_DIR);$(PERL_BIN_DIR)
+
+#	PsyQ Vars overidden for those who've installed PSYQ on their machine
+#	--------------------------------------------------------------------
+export	COMPILER_PATH :=
+export  PSYQ_PATH :=
+export	ASSEMBLER_PATH :=
+export  LIBRARY_PATH :=
+export  C_PLUS_INCLUDE_PATH :=
+export  C_INCLUDE_PATH :=
+
+#	These vars are also used by GCC
+#	-------------------------------
+export  GCC_EXEC_PREFIX :=
+export  COMPILER_PATH :=
+export  LIBRARY_PATH  :=
+export  C_INCLUDE_PATH  :=
+export  CPLUS_INCLUDE_PATH  :=
+export	OBJC_INCLUDE_PATH  :=
+
+#----------------------------------------------------------------------------
+endif		# __GLOBALS_MAK__
+#----------------------------------------------------------------------------
+# end
+
diff --git a/build/lnk.mak b/build/lnk.mak
new file mode 100644
index 000000000..f4a533586
--- /dev/null
+++ b/build/lnk.mak
@@ -0,0 +1,88 @@
+#----------------------------------------------------------------------------
+#	LNK.MAK
+#
+#	This creates the macro that finally makes the linker script file
+#	It also holds any linker options needed
+#
+#	Tabbed for 5 9 (Please do not change)
+#
+#	Created:	3rd February 1999
+#
+#	Copyright (C) 1997-1998 G R Liddon
+#----------------------------------------------------------------------------
+
+ifndef STACK_SIZE
+STACK_SIZE := 3000
+endif
+
+LNK_FLAGS:=		-m -psx -c -v -z -o $(PROG_ORG) -entry __SN_ENTRY_POINT \
+				-cpemunge \
+				-strip \
+				-nsf \
+				$(ALL_ASM_OBJS) \
+				$(PSYQ_LIB_DIR)/libsn.lib \
+				-nsf \
+				-we -wm -wo \
+				-nostrip \
+				stup0 \
+				stup1 \
+				stup2 \
+				VectorNormalS \
+				VectorNormal \
+				VectorNormalSS\
+				cqsrt \
+				-nostrip
+
+LINKER_FILE_MACRO :=	   				\
+';nostripfile=$(PSYQ_LIB_DIR)/libsn.lib'	\
+'text				group '						\
+'extractors			group '						\
+'extradtors			group '						\
+'data				group '						\
+'sdata				group '						\
+'sbss				group 	bss'				\
+'bss				group	bss '				\
+'cached				group	cache(0x20000000) '	\
+'' 										\
+'' 										\
+'memend		group	bss'				\
+'' 										\
+'' 										\
+'	section .text,text' 				\
+'	section .cached,cached'				\
+'	section .sdata,sdata'				\
+'	section .ctors,text' 				\
+'	section .dtors,text ' 				\
+'	section .data,data'					\
+'	section .rdata,text'				\
+'	section .sbss,sbss'					\
+'	section .bss,bss'					\
+'	section .memend,memend'				\
+'	section .last,memend'				\
+'' 										\
+'' 										\
+'' 										\
+'' 										\
+'LNK_RamSize		equ	$(RAM_SIZE)'		\
+'LNK_StackSize		equ $(STACK_SIZE)'		\
+'LNK_OrgAddress		equ $(PROG_ORG)'		\
+'LNK_FileSys		equ $(LNK_FILE_SYS)'	\
+'LNK_DevKit			equ $(LNK_DEV_KIT)'		\
+'$(LNK_OVL) ' \
+'' 										\
+'$(TAB)regs$(TAB)pc=__SN_ENTRY_POINT'	\
+'; $(FILE_SYSTEM) Start-Up Objects'							\
+''										\
+$(foreach FILE,$($(FILE_SYSTEM)_STARTUP_OBJ), '$(TAB)startstats "$(FILE)" ' '$(TAB)include $(PSYQ_LIB_DIR)/$(FILE).obj' '$(TAB)endstats') \
+'' 										\
+'; Main Game object files'				\
+$(foreach FILE,$(CODE_OBJS_TO_MAKE), '$(TAB)startstats "$(subst /,.,$(FILE:$(OBJ_DIR)/%.o=%))" ' '$(TAB)include $(FILE) $(ovl_$(subst /,_,$(FILE:$(OBJ_DIR)/%.o=%)))' '$(TAB)endstats') \
+$(foreach FILE,$(EXTRA_OBJS), '$(TAB)startstats "$(subst /,.,$(FILE:$(OBJ_DIR)/%.o=%))" ' '$(TAB)include $(FILE) $(ovl_$(subst /,_,$(FILE:$(OBJ_DIR)/%.o=%)))' '$(TAB)endstats') \
+'' 										\
+'; Libs'								\
+$(foreach FILE,$(ALL_LIBS_FULL),'$(TAB)startstats "$(FILE)"' '$(TAB)inclib $(FILE)' '$(TAB)endstats') \
+''
+
+	
+#----------------------------------------------------------------------------
+# end
diff --git a/build/outdirs.mak b/build/outdirs.mak
new file mode 100644
index 000000000..4490edcbf
--- /dev/null
+++ b/build/outdirs.mak
@@ -0,0 +1,43 @@
+#----------------------------------------------------------------------------
+#  Create all the output directories the game needs
+#----------------------------------------------------------------------------
+
+#	Macros for ouput dirs
+#	---------------------
+OUT_DIR :=				out/$(TERRITORY)
+
+OBJ_DIR :=				$(OUT_DIR)/$(VERSION)/$(FILE_SYSTEM)/objs
+OBJ_DIRS_TO_MAKE :=		$(foreach SRC_DIR,$(SRC_DIRS),$(OBJ_DIR)/$(SRC_DIR))
+VERSION_DIR :=			$(OUT_DIR)/$(VERSION)/version/$(FILE_SYSTEM)
+
+DEPS_DIR :=				$(OUT_DIR)/$(VERSION)/deps/$(FILE_SYSTEM)
+DEP_DIRS_TO_MAKE :=		$(foreach SRC_DIR,$(SRC_DIRS),$(DEPS_DIR)/$(SRC_DIR))
+
+TEMP_DIR :=				$(OUT_DIR)/$(VERSION)/$(FILE_SYSTEM)/temp
+TEMP_BUILD_DIR :=		$(OUT_DIR)/$(VERSION)/build
+DATA_OUT :=				$(OUT_DIR)/data
+INC_DIR :=				$(OUT_DIR)/include
+REPORT_DIR :=			$(OUT_DIR)/report
+SYSTEM_GEN_DIR :=		$(SOURCE_DIR)/system/$(VERSION)/$(TERRITORY)/$(FILE_SYSTEM)	
+SYSTEM_GEN_DIR_O :=		$(OBJ_DIR)/system/$(VERSION)/$(TERRITORY)/$(FILE_SYSTEM)
+SYSTEM_GEN_DIR_D :=		$(DEPS_DIR)/system/$(VERSION)/$(TERRITORY)/$(FILE_SYSTEM)
+
+DIRS_TO_MAKE :=			$(OBJ_DIR) $(VERSION_DIR) $(TEMP_DIR) $(DEPS_DIR) $(OBJ_DIRS_TO_MAKE) $(DEP_DIRS_TO_MAKE) $(TEMP_BUILD_DIR) $(DATA_OUT) $(INC_DIR) $(REPORT_DIR) $(SYSTEM_GEN_DIR) $(SYSTEM_GEN_DIR_O) $(SYSTEM_GEN_DIR_D)
+
+# DIRS_TO_MAKE :=		$(OBJ_DIR) $(VERSION_DIR) $(DEPS_DIR) $(OBJ_DIRS_TO_MAKE) $(TEMP_DIR) $(DEP_DIRS_TO_MAKE) $(TEMP_BUILD_DIR) $(DATA_OUT) $(INC_DIR) $(REPORT_DIR) $(SIZES_DIR) $(SYSTEM_GEN_DIR) $(SYSTEM_GEN_DIR_O) $(SYSTEM_GEN_DIR_D)
+
+#	Stuff needed to make output dirs
+#	--------------------------------
+.PHONY: dirs
+
+$(DIRS_TO_MAKE) :
+	@$(MKDIR) -p $(DIRS_TO_MAKE)
+	@$(ECHO) Created directories $(DIRS_TO_MAKE)
+
+dirs : $(DIRS_TO_MAKE)
+
+#	Some more exports to do after we've decided what the temp dir is
+#	----------------------------------------------------------------
+export TEMP := 					$(TEMP_DIR)
+export TMPDIR := 				$(TEMP_DIR)
+export DEPENDENCIES_OUTPUT :=	$(TEMP_DIR)/dep.tmp
diff --git a/build/parse.mak b/build/parse.mak
new file mode 100644
index 000000000..8c1648a9d
--- /dev/null
+++ b/build/parse.mak
@@ -0,0 +1,288 @@
+#----------------------------------------------------------------------------
+#	PARSE.MAK
+#
+#	Makes sure all the that need defining to build the game have been defined
+#	If not ERR_STR is defined and this cause the makefile to report an error
+#
+#	Tabbed for 5 9 (Please do not change)
+#
+#	Created:	
+#
+#	Copyright (C) 1997-1999 G R Liddon
+#----------------------------------------------------------------------------
+
+# Make sure the basics are defined first
+# --------------------------------------
+ifndef TERRITORY
+
+ERR_STR :=	You must define a territory to build for (USA EUR || JAP)
+
+endif
+
+ifndef VERSION
+
+ERR_STR :=	You must define a version to build
+
+endif
+
+
+# Now Parse for the dev kit stuff
+#	----------------------------------
+ifdef PSYQ_DEV_IRQ
+
+ PSYQ_DEV_IRQ_OPT :=  /i$(PSYQ_DEV_IRQ)
+
+endif
+
+ifndef DEV_KIT
+ ERR_STR :=	You must define DEV_KIT to either SONY_ISA or SONY_PCI or CLIMAX or TPWART
+else
+ DEV_OPT :=		-DSONY_ISA=0 \
+				-DSONY_PCI=1 \
+				-DCLIMAX=2 \
+				-DTPWART=3 \
+		 		-D__DEV_KIT__=$(DEV_KIT)
+
+DK_SONY_ISA :=		0
+DK_SONY_PCI :=		1
+DK_CLIMAX :=		2
+DK_TPWART :=		3
+DK_SONY_H2700 :=	$(DK_SONY_PCI)
+
+LNK_DEV_KIT :=		$(DK_$(DEV_KIT))
+
+endif
+
+# Now sort out how the game loads files
+# -------------------------------------
+ifndef FILE_SYSTEM
+ ERR_STR :=	You must define FILE_SYSTEM to either PC or CD
+else
+ FILE_OPT :=	-DPC=0 \
+				-DCD=1 \
+ 				-D__FILE_SYSTEM__=$(FILE_SYSTEM)
+
+FS_PC :=	0
+FS_CD :=	1
+
+LNK_FILE_SYS :=		$(FS_$(FILE_SYSTEM))
+
+endif
+
+#	Make sure we have everything we need for the sony pci dev kit
+#	--------------------------------------------------------------
+ifeq ($(DEV_KIT),SONY_PCI)
+
+DEV_KIT_FOUND :=	1
+
+endif
+
+#	Make sure we have everything we need for the climax dev kit
+#	-----------------------------------------------------------
+ifeq ($(DEV_KIT),CLIMAX)
+
+ifndef DDX_PORT
+
+ ERR_STR :=	You must define DDX_PORT for the Climax dev kit i/o addr in your personal makefile
+
+endif
+
+DEV_KIT_FOUND :=	1
+
+endif
+
+
+#	Make sure we have everything we need for the climax dev kit
+#	-----------------------------------------------------------
+ifeq ($(DEV_KIT),TPWART)
+
+ifndef DDX_PORT
+
+ ERR_STR :=	You must define DDX_PORT for the Climax dev kit i/o addr in your personal makefile
+
+endif
+
+DEV_KIT_FOUND :=	1
+
+endif
+
+
+#	Make sure we have everything we need for the Sony H2000
+#	--------------------------------------------------------------------
+ifeq ($(DEV_KIT),SONY_ISA)
+
+ifdef SONY_ISA_IRQ
+
+ SONY_ISA_IRQ_OPT :=  /i $(SONY_ISA_IRQ)
+
+endif
+
+ifndef SONY_ISA_ADDR
+
+ ERR_STR :=	You must define SONY_ISA_ADDR for the dtl i/o addr in your personal makefile
+
+endif
+
+DEV_KIT_FOUND :=	1
+
+endif
+
+#	Make sure we have everything we need for the Sony H2700
+#	-------------------------------------------------------
+ifeq ($(DEV_KIT),SONY_H2700)
+
+ifdef SONY_ISA_IRQ
+
+ SONY_ISA_IRQ_OPT :=  /i $(SONY_ISA_IRQ)
+
+endif
+
+ifndef SONY_ISA_ADDR
+
+ ERR_STR :=	You must define SONY_ISA_ADDR for the dtl i/o addr in your personal makefile
+
+endif
+
+DEV_KIT_FOUND :=	1
+
+endif
+
+#----------------------------------------------------------------------------
+#	Macros for dev BIOS load \ unload for all the dev systems
+#	All take form LOAD_BIOS_$(DEV_KIT)
+#----------------------------------------------------------------------------
+
+#	PCI Bios load \ unload
+#	----------------------
+define	LOAD_BIOS_SONY_PCI
+	h25bios
+	RESETPS 1 /n
+endef
+
+define	UNLOAD_BIOS_SONY_PCI
+	-mess1
+	h25bios
+endef
+
+#	H2700 Bios load \ unload
+#	------------------------
+define	LOAD_BIOS_SONY_H2700
+	-mess1
+	-dexbios /a $(SONY_ISA_ADDR) $(SONY_ISA_IRQ_OPT)
+	RESETPS 1 /n
+endef
+
+define	UNLOAD_BIOS_SONY_H2700
+	-dexbios
+	-mess1
+endef
+
+
+#	ISA Bios load \ unload
+#	----------------------
+define	LOAD_BIOS_SONY_ISA
+	-mess1
+	-dexbios /a $(SONY_ISA_ADDR) $(SONY_ISA_IRQ_OPT)
+	RESETPS 1
+	RUN /w4 $(subst /,\,$(PSYQ_BIN_DIR)\snpatch.cpe) > con
+	DELAY
+endef
+
+define	UNLOAD_BIOS_SONY_ISA
+	-mess1
+	-dexbios
+endef
+
+
+#	CLIMAX Bios load \ unload
+#	------------------------
+define	LOAD_BIOS_CLIMAX
+	-mess1
+	-datbios
+endef
+
+define	UNLOAD_BIOS_CLIMAX
+	-datbios
+	-mess1
+endef
+
+
+#	TPWART Bios load \ unload
+#	------------------------
+define	LOAD_BIOS_TPWART
+	-mess1
+	-psy /4
+endef
+
+define	UNLOAD_BIOS_TPWART
+	-psy
+	-mess1
+endef
+
+#	Set the LOAD\UNLOAD_BIOS macros correctly
+#	-----------------------------------------
+LOAD_BIOS :=	$(LOAD_BIOS_$(DEV_KIT))
+UNLOAD_BIOS :=	$(UNLOAD_BIOS_$(DEV_KIT))
+
+
+#	Check to make sure we found a dev kit we know about
+#	---------------------------------------------------
+ifndef ERR_STR
+
+ifndef DEV_KIT_FOUND
+ ERR_STR :=	$(DEV_KIT) is not a recognised dev kit
+endif
+
+endif
+
+#	Sort out the compiler we're using
+#	---------------------------------
+ifdef USE_EGCS
+
+COMPILER :=	  	egcs
+
+else
+
+COMPILER :=		gnu
+
+endif
+
+export  PSYQ_PATH :=			$(PSYQ_BIN_DIR)/$(COMPILER)
+export  SN_PATH :=			$(PSYQ_BIN_DIR)/$(COMPILER)
+
+
+#	Define what we need for the ram size
+#	------------------------------------
+ifdef RAM_SIZE
+MEG :=			$(RAM_SIZE)
+else
+MEG :=			8
+endif
+
+MEG_OPT :=		-D__MEG$(MEG)__
+
+
+#	Bodge Address for 4 meg dev kit
+#	-------------------------------
+ifeq ($(VERSION),debug)
+
+GLIB_OPT :=		-D__GL_DEBUG__
+
+else
+
+GLIB_OPT :=
+
+endif
+
+
+#	Bodge Address for 4 meg dev kit
+#	-------------------------------
+ifeq ($(RAM_SIZE),4)
+PROG_ORG =      0x80210000
+else
+PROG_ORG =      0x80010000
+endif
+
+
+#----------------------------------------------------------------------------
+# end
diff --git a/data/DataCache.scr b/data/DataCache.scr
new file mode 100644
index 000000000..4dfbfdcf3
--- /dev/null
+++ b/data/DataCache.scr
@@ -0,0 +1,703 @@
+translations/swe.dat
+translations/dut.dat
+translations/ita.dat
+translations/ger.dat
+translations/id.dat
+translations/eng.dat
+{ SYSTEM_CACHE 4
+anims/Generic.Abk
+anims/Civ.Abk
+anims/Boss.Abk
+anims/Missions.Abk
+sounds/ui/ui.bof
+}
+
+ui/UIGfx.Spr
+sfx/sfx.spr
+options/options.spr
+
+sounds/ui/ui.bnk
+pickups/pickup_gfx.tex
+sounds/generic/generic.bnk
+sounds/generic/generic.bof
+actors/GENGRP.tex
+
+######################################
+### Front End ########################
+######################################
+{ FRONTEND_CACHE 4
+#options/gameopt.gfx
+options/optmod.msh
+options/optq.msh
+actors/PRB.act
+actors/PRG.act
+actors/PRM.act
+actors/PRP.act
+actors/PRR.act
+actors/PRY.act
+sounds/gameopts/gameopts.bof
+}
+sounds/gameopts/gameopts.bnk
+
+actors/PRB.act
+actors/PRB.tex
+actors/PRG.act
+actors/PRG.tex
+actors/PRM.act
+actors/PRM.tex
+actors/PRP.act
+actors/PRP.tex
+actors/PRR.act
+actors/PRR.tex
+actors/PRY.act
+actors/PRY.tex
+
+options/gameopt.gfx
+sounds/pause/pause.bnk
+sounds/pause/pause.bof
+
+######################################
+### LEVEL 1 ##########################
+######################################
+music/LEVEL1.VH
+music/LEVEL1.VB
+Levels/LEVEL1.tex
+
+{ LEVEL1_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/KID.Act
+actors/MAN.Act
+actors/M01BLUE.Act
+actors/M10.Act
+actors/B03.Act
+
+# Level Data
+Levels/LEVEL1.lvl
+
+# Sound & Music
+music/LEVEL1.PXM
+sounds/level1/level1.bof
+}
+actors/L01GRP.tex
+sounds/level1/level1.bnk
+
+######################################
+### LEVEL 2 ##########################
+######################################
+music/LEVEL2.VH
+music/LEVEL2.VB
+Levels/LEVEL2.tex
+
+{ LEVEL2_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Level Data
+Levels/LEVEL2.lvl
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/KID.Act
+actors/BOY.Act
+queencocoon/queencocoon.msh
+actors/M01ORANGE.Act
+actors/M07.Act
+actors/B04.Act
+
+# Sound & Music
+music/LEVEL2.PXM
+sounds/level2/level2.bof
+}
+actors/L02GRP.tex
+sounds/level2/level2.bnk
+
+######################################
+### LEVEL 3 ##########################
+######################################
+music/LEVEL3.VH
+music/LEVEL3.VB
+Levels/LEVEL3.tex
+
+{ LEVEL3_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+#Level Data
+Levels/LEVEL3.lvl
+levels/section1.msh
+levels/section2.msh
+levels/section3.msh
+levels/section4.msh
+levels/section5.msh
+levels/section6.msh
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/KID.Act
+actors/M01GREEN.Act
+actors/B05.Act
+
+#Sound & Music
+music/LEVEL3.PXM
+sounds/level3/level3.bof
+}
+actors/L03GRP.tex
+sounds/level3/level3.bnk
+
+######################################
+### LEVEL 4 ##########################
+######################################
+music/LEVEL4.VH
+music/LEVEL4.VB
+Levels/LEVEL4.tex
+
+{ LEVEL4_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Level Data
+Levels/LEVEL4.lvl
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/MAN.Act
+actors/BOY.Act
+actors/KID.Act
+actors/M01.Act
+actors/M02.Act
+actors/M03.Act
+actors/B02.Act
+
+# Sound & Music
+music/LEVEL4.PXM
+sounds/level4/level4.bof
+}
+actors/L04GRP.tex
+sounds/level4/level4.bnk
+
+######################################
+### LEVEL 5 ##########################
+######################################
+music/LEVEL5.VH
+music/LEVEL5.VB
+Levels/LEVEL5.tex
+
+{ LEVEL5_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Level Data
+Levels/LEVEL5.lvl
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/KID.Act
+actors/M01PURPLE.Act
+actors/M08.Act
+actors/B06.Act
+
+# Sound & Music
+music/LEVEL5.PXM
+sounds/level5/level5.bof
+}
+actors/L05GRP.tex
+sounds/level5/level5.bnk
+
+######################################
+### LEVEL 6 ##########################
+######################################
+music/LEVEL6.VH
+music/LEVEL6.VB
+Levels/LEVEL6.tex
+
+{ LEVEL6_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Level Data
+Levels/LEVEL6.lvl
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/SCIENTIST.Act
+actors/KID.Act
+queencocoon/queencocoon.msh
+actors/M01PINK.Act
+actors/M06.Act
+actors/M09.Act
+
+# Sound & Music
+music/LEVEL6.PXM
+sounds/level6/level6.bof
+}
+actors/L06GRP.tex
+sounds/level6/level6.bnk
+
+######################################
+### LEVEL 7 ##########################
+######################################
+music/LEVEL7.VH
+music/LEVEL7.VB
+Levels/LEVEL7.tex
+
+{ LEVEL7_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Level Data
+Levels/LEVEL7.lvl
+
+# Actors
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/TITANIUM.Act
+# actors/kid.Act
+queencocoon/queencocoon.msh
+actors/M01YELLOW.Act
+# actors/B01.Act
+actors/B02.Act
+actors/B03.Act
+actors/B04.Act
+actors/B05.Act
+actors/B06.Act
+
+# Sound & Music
+music/LEVEL7.PXM
+sounds/level7/level7.bof
+}
+actors/L07GRP.tex
+sounds/level7/level7.bnk
+
+######################################
+### LEVEL 8 ##########################
+######################################
+music/LEVEL8.VH
+music/LEVEL8.VB
+Levels/LEVEL8.tex
+
+{ LEVEL8_CACHE 4
+# Generic
+ui/PAUSEMENU.msh
+ui/PAUSELIGHTS.msh
+ui/PAUSELIGHTS2.msh
+ui/compass.msh
+ui/moveon.msh
+sfx/asteroid.msh
+sfx/card.msh
+sfx/dagger.msh
+sfx/icicle.msh
+sfx/missile.msh
+sfx/projectile.msh
+sfx/sonic.msh
+sfx/telesphere.msh
+pickups/pu-health.msh
+pickups/pu-crr.msh
+pickups/pu-crg.msh
+pickups/pu-crb.msh
+pickups/pu-cry.msh
+pickups/pu-crp.msh
+pickups/pu-invun.msh
+pickups/pu-life.msh
+pickups/pu-mosb.msh
+pickups/pu-mogo.msh
+pickups/pu-mosg.msh
+pickups/pu-mosr.msh
+pickups/pu-mogp.msh
+pickups/pu-card.msh
+pickups/pu-keyt.msh
+pickups/pu-sell.msh
+# pickups/pu-sward.msh
+pickups/pu-aura00.msh
+pickups/pu-aura10.msh
+pickups/pu-aura11.msh
+pickups/pu-aura20.msh
+pickups/pu-aura30.msh
+pickups/pu-aura31.msh
+pickups/pu-aura40.msh
+pickups/pu-aura00blue.msh
+
+# Level Data
+Levels/LEVEL8.lvl
+anims/Zord.Abk
+
+# Actors 
+actors/CAPTAIN.Act
+actors/FAIRWEATHER.Act
+actors/KID.Act
+queencocoon/queencocoon.msh
+actors/B01.Act
+actors/B02.Act
+actors/B04.Act
+actors/B06.Act
+
+actors/OMZORD.act
+actors/STRZORD.act
+
+# Sound & Music
+music/LEVEL8.PXM
+sounds/level8/level8.bof
+}
+actors/OMZORD.tex
+actors/STRZORD.tex
+sounds/level8/level8.bnk
+
+######################################
+### BACKEND ##########################
+######################################
+{ BACKEND_CACHE 4
+ui/hiscore.msh
+}
+
+######################################
+### SCREENS ##########################
+######################################
+screens/prlogo.gfx
+screens/thqlogo.gfx
+screens/foxkids.gfx
+screens/credits.gfx
+screens/loading.gfx
+
+backend/gover1.gfx
+backend/gover2.gfx
+backend/goverc.gfx
+
+loading/PinkRang.gfx
+loading/GreenRan.gfx
+loading/BlueRang.gfx
+loading/RedRange.gfx
+loading/TitRange.gfx
+loading/YellowRa.gfx
+loading/bots.gfx
+loading/2PinkRan.gfx
+loading/2GreenRa.gfx
+loading/2BlueRan.gfx
+loading/2RedRang.gfx
+loading/2TitRang.gfx
+loading/2YellowR.gfx
+
+gallery/comic/RedColor.gfx
+gallery/comic/BlueColo.gfx
+gallery/comic/GreenCol.gfx
+gallery/comic/YellowCo.gfx
+gallery/comic/PinkColo.gfx
+gallery/comic/Titanium.gfx
+gallery/comic/VypraCol.gfx
+gallery/comic/QueenFac.gfx
+gallery/maps/DamLv1st.gfx
+gallery/maps/DamLv2nd.gfx
+gallery/maps/DamLv3rd.gfx
+gallery/maps/CityS1st.gfx
+gallery/maps/CityS2nd.gfx
+gallery/maps/CityS3rd.gfx
+gallery/maps/Docks1st.gfx
+gallery/maps/Docks2nd.gfx
+gallery/models/Abominus.gfx
+gallery/models/Stingwin.gfx
+gallery/models/Cpfireor.gfx
+gallery/models/CpofLoki.gfx
+gallery/models/Salamand.gfx
+gallery/models/Shockatr.gfx
+gallery/models/smoggers.gfx
+gallery/models/Bansheer.gfx
+gallery/tvshow/abominus.gfx
+gallery/tvshow/firejump.gfx
+gallery/tvshow/fireor.gfx
+gallery/tvshow/jinxer.gfx
+gallery/tvshow/oldired.gfx
+gallery/tvshow/omegmega.gfx
+gallery/tvshow/poster03.gfx
+gallery/tvshow/queen.gfx
+gallery/tvshow/shockact.gfx
+gallery/tvshow/smogger.gfx
+gallery/tvshow/striknin.gfx
+gallery/tvshow/tranmega.gfx
+
+options/goload.gfx
+
+######################################
+### To Be Assigned ###################
+######################################
+
+music/LVLCOMP.PXM
+music/LVLCOMP.VH
+music/LVLCOMP.VB
+music/GAMECOMP.PXM
+music/GAMECOMP.VH
+music/GAMECOMP.VB
+music/GAMEOVER.PXM
+music/GAMEOVER.VH
+music/GAMEOVER.VB
+music/GALLERY.PXM
+music/GALLERY.VH
+music/GALLERY.VB
+
+
diff --git a/data/translations/dut.dat b/data/translations/dut.dat
new file mode 100644
index 000000000..707dabbc8
--- /dev/null
+++ b/data/translations/dut.dat
@@ -0,0 +1,9 @@
+;----------------------------------------
+; Please 
+; DO NOT edit this document with word
+; DO NOT add trailing spaces and tabs
+; DO NOT Omit text after identifier
+; DO NOT add spaces to identifier
+; DO NOT add duplicate identifiers
+;----------------------------------------
+
diff --git a/data/translations/ger.dat b/data/translations/ger.dat
new file mode 100644
index 000000000..707dabbc8
--- /dev/null
+++ b/data/translations/ger.dat
@@ -0,0 +1,9 @@
+;----------------------------------------
+; Please 
+; DO NOT edit this document with word
+; DO NOT add trailing spaces and tabs
+; DO NOT Omit text after identifier
+; DO NOT add spaces to identifier
+; DO NOT add duplicate identifiers
+;----------------------------------------
+
diff --git a/data/translations/ita.dat b/data/translations/ita.dat
new file mode 100644
index 000000000..707dabbc8
--- /dev/null
+++ b/data/translations/ita.dat
@@ -0,0 +1,9 @@
+;----------------------------------------
+; Please 
+; DO NOT edit this document with word
+; DO NOT add trailing spaces and tabs
+; DO NOT Omit text after identifier
+; DO NOT add spaces to identifier
+; DO NOT add duplicate identifiers
+;----------------------------------------
+
diff --git a/data/translations/swe.dat b/data/translations/swe.dat
new file mode 100644
index 000000000..707dabbc8
--- /dev/null
+++ b/data/translations/swe.dat
@@ -0,0 +1,9 @@
+;----------------------------------------
+; Please 
+; DO NOT edit this document with word
+; DO NOT add trailing spaces and tabs
+; DO NOT Omit text after identifier
+; DO NOT add spaces to identifier
+; DO NOT add duplicate identifiers
+;----------------------------------------
+
diff --git a/data/translations/text.dat b/data/translations/text.dat
new file mode 100644
index 000000000..c67090d65
--- /dev/null
+++ b/data/translations/text.dat
@@ -0,0 +1,1046 @@
+;----------------------------------------
+; Please 
+; DO NOT edit this document with Excel/Word
+; DO NOT add trailing spaces and tabs
+; DO NOT Omit text after identifier
+; DO NOT add spaces to identifier
+; DO NOT add duplicate identifiers
+; DO NOT put - or ; characters in text strings :(
+; DO NOT cut&paste from Excel/Word as it alters strings!!  ( eg: ... gets translated to … )
+;----------------------------------------
+
+
+
+; ---------------------------------------------------------------
+; Some generic strings..
+; ---------------------------------------------------------------
+
+[STR__YES]
+eng=Yes
+[STR__NO]
+eng=No
+[STR__ON]
+eng=ON
+[STR__OFF]
+eng=OFF
+[STR__DUMMY]
+eng=???
+[STR__NOW_LOADING]
+eng=NOW LOADING..
+
+; NOTE: This string just contains a single space
+[STR__BLANK]
+eng= 
+
+
+
+; ---------------------------------------------------------------
+; Front end
+; ---------------------------------------------------------------
+
+[STR__FRONT_END__PRESS_START]
+eng=PRESS START
+
+[STR__FRONT_END__HIGH_SCORES]
+eng=HIGH SCORES
+
+
+
+; ---------------------------------------------------------------
+; Game options
+; ---------------------------------------------------------------
+
+; Titles of the available menus
+[STR__GAME_OPTIONS_MENU__ONE_PLAYER]
+eng=ONE PLAYER
+[STR__GAME_OPTIONS_MENU__TWO_PLAYERS]
+eng=TWO PLAYERS
+[STR__GAME_OPTIONS_MENU__OPTIONS]
+eng=OPTIONS
+[STR__GAME_OPTIONS_MENU__CODES]
+eng=CODES
+[STR__GAME_OPTIONS_MENU__FILE]
+eng=LOAD
+[STR__GAME_OPTIONS_MENU__GALLERY]
+eng=GALLERY
+
+; Navigation text
+[STR__GAME_OPTIONS__SELECT]
+eng=SELECT
+[STR__GAME_OPTIONS__BACK]
+eng=BACK
+
+; One and two player selection
+[STR__GAME_OPTIONS__CHOOSE_RANGER]
+eng=CHOOSE RANGER
+[STR__GAME_OPTIONS__CHOOSE_RANGER_1]
+eng=CHOOSE RANGER 1
+[STR__GAME_OPTIONS__CHOOSE_RANGER_2]
+eng=CHOOSE RANGER 2
+[STR__GAME_OPTIONS__STRENGTH]
+eng=STRENGTH
+[STR__GAME_OPTIONS__SPEED]
+eng=SPEED
+[STR__GAME_OPTIONS__ENERGY]
+eng=ENERGY
+
+; Sound volumes
+[STR__GAME_OPTIONS__SOUND]
+eng=SOUND
+[STR__GAME_OPTIONS__MUSIC_VOLUME]
+eng=MUSIC VOLUME
+[STR__GAME_OPTIONS__SFX_VOLUME]
+eng=SFX VOLUME
+[STR__GAME_OPTIONS__SPEECH_VOLUME]
+eng=SPEECH VOLUME
+
+; Screen adjustment
+[STR__GAME_OPTIONS__SCREEN]
+eng=SCREEN
+
+; Controls
+[STR__GAME_OPTIONS__CONTROL_CONFIG1]
+eng=CONTROLLER CONFIG 1
+[STR__GAME_OPTIONS__CONTROL_CONFIG2]
+eng=CONTROLLER CONFIG 2
+[STR__GAME_OPTIONS__STEP_LEFT]
+eng=Roll left
+[STR__GAME_OPTIONS__RUN]
+eng=Run
+[STR__GAME_OPTIONS__STEP_RIGHT]
+eng=Roll right
+[STR__GAME_OPTIONS__SPECIAL]
+eng=Special
+[STR__GAME_OPTIONS__BLOCK]
+eng=Block
+[STR__GAME_OPTIONS__KICK]
+eng=Kick
+[STR__GAME_OPTIONS__PUNCH]
+eng=Punch
+[STR__GAME_OPTIONS__JUMP]
+eng=Jump
+[STR__GAME_OPTIONS__PAUSE]
+eng=Pause
+[STR__GAME_OPTIONS__MOVE]
+eng=Move
+[STR__GAME_OPTIONS__WALK_RUN]
+eng=Walk/Run
+
+; Control method
+[STR__GAME_OPTIONS__CONTROL_STYLE]
+eng=SELECT CONTROL STYLE
+[STR__GAME_OPTIONS__PLAYER_1]
+eng=PLAYER 1
+[STR__GAME_OPTIONS__PLAYER_2]
+eng=PLAYER 2
+[STR__GAME_OPTIONS__REALATIVE_MOVEMENT]
+eng=Relative movement
+[STR__GAME_OPTIONS__ABSOLUTE_MOVEMENT]
+eng=Absolute movement
+[STR__GAME_OPTIONS__RUN]
+eng=Default Walk
+[STR__GAME_OPTIONS__WALK]
+eng=Default Run
+[STR__GAME_OPTIONS__VIBRATION_ON]
+eng=Vibration On
+[STR__GAME_OPTIONS__VIBRATION_OFF]
+eng=Vibration Off
+[STR__GAME_OPTIONS__PAD_CONFIG_1]
+eng=Controller Config 1
+[STR__GAME_OPTIONS__PAD_CONFIG_2]
+eng=Controller Config 2
+
+
+; Difficulty level
+[STR__GAME_OPTIONS__DIFFICULTY]
+eng=CHOOSE DIFFICULTY
+[STR__GAME_OPTIONS__HARD]
+eng=Hard
+[STR__GAME_OPTIONS__NORMAL]
+eng=Normal
+[STR__GAME_OPTIONS__EASY]
+eng=Easy
+
+; Password entry
+[STR__GAME_OPTIONS__ENTER_PASSWORD]
+eng=ENTER CODE
+[STR__GAME_OPTIONS__NEW_CODE_ACTIVATED]
+eng=NEW CODE ACTIVATED
+[STR__GAME_OPTIONS__INCORRECT_PASSWORD]
+eng=INCORRECT CODE
+[STR__GAME_OPTIONS__ALREADY_ACTIVE_PASSWORD]
+eng=CODE ALREADY ACTIVE
+
+; Password activation
+[STR__GAME_OPTIONS__ACTIVATE_CODES]
+eng=ACTIVATE CODES
+
+; Memory card stuff
+[STR__GAME_OPTIONS__LOAD]
+eng=LOAD SAVED GAME DATA
+[STR__GAME_OPTIONS__CHECKMEMORYCARD]
+eng=Checking...\nPlease do not remove the MEMORY CARD
+[STR__GAME_OPTIONS__SELECTFILETOLOAD]
+eng=Select file to load from the MEMORY CARD in MEMORY CARD slot 1
+[STR__GAME_OPTIONS__UNFORMATTEDCARD]
+eng=MEMORY CARD in MEMORY CARD slot 1 is not formatted
+[STR__GAME_OPTIONS__NOFILESONCARD]
+eng=No Power Rangers data present
+[STR__GAME_OPTIONS__NOCARDINSLOT]
+eng=MEMORY CARD is not inserted into the MEMORY CARD slot
+[STR__GAME_OPTIONS__LOADINGPLEASEWIAT]
+eng=Loading... Do not remove the MEMORY CARD in MEMORY CARD slot 1
+[STR__GAME_OPTIONS__LOADOK]
+eng=Load complete!
+[STR__GAME_OPTIONS__LOADERROR]
+eng=Load Error!
+
+; Gallery stuff
+[STR__GAME_OPTIONS__GALLERY_NAME]
+eng=NAME
+[STR__GAME_OPTIONS__GALLERY_STATUS]
+eng=STATUS
+
+[STR__GAME_OPTIONS__GALLERY_NOT_AVAILABLE]
+eng=Inactive
+[STR__GAME_OPTIONS__GALLERY_AVAILABLE]
+eng=Active
+
+[STR__GAME_OPTIONS__GALLERY0]
+eng=T.V. Show
+[STR__GAME_OPTIONS__GALLERY1]
+eng=Models
+[STR__GAME_OPTIONS__GALLERY2]
+eng=Maps
+[STR__GAME_OPTIONS__GALLERY3]
+eng=Comic
+
+
+; ---------------------------------------------------------------
+; Password descriptions
+; These are the descriptions that appear in the code list so they need to be fairly short
+; ---------------------------------------------------------------
+
+[STR__PASSWORD_DESCRIPTION__INFHEALTH]
+eng=Infinite Health
+[STR__PASSWORD_DESCRIPTION__INFLIVES]
+eng=Infinite Lives
+[STR__PASSWORD_DESCRIPTION__LEVELSKIP]
+eng=Level Skip
+[STR__PASSWORD_DESCRIPTION__TITRANGER]
+eng=Titanium Ranger
+[STR__PASSWORD_DESCRIPTION__BLINDENEMIES]
+eng=Blind Enemies
+[STR__PASSWORD_DESCRIPTION__CONTINUES]
+eng=Continues
+[STR__PASSWORD_DESCRIPTION__RPE]
+eng=Infinite RPE
+[STR__PASSWORD_DESCRIPTION__GALLERY]
+eng=All galleries open
+
+
+
+; ---------------------------------------------------------------
+; Password values
+; These are the values that appear in the codelist
+; ---------------------------------------------------------------
+[STR__PASSWORD_VALUES__STAGE1_1]
+eng=L1
+[STR__PASSWORD_VALUES__STAGE2_1]
+eng=L2
+[STR__PASSWORD_VALUES__STAGE2_2]
+eng=B2
+[STR__PASSWORD_VALUES__STAGE3_1]
+eng=L3
+[STR__PASSWORD_VALUES__STAGE4_1]
+eng=L4
+[STR__PASSWORD_VALUES__STAGE4_2]
+eng=B4
+[STR__PASSWORD_VALUES__STAGE5_1]
+eng=L5
+[STR__PASSWORD_VALUES__STAGE5_2]
+eng=B5
+[STR__PASSWORD_VALUES__STAGE6_1]
+eng=L6
+[STR__PASSWORD_VALUES__STAGE7_1]
+eng=L7
+[STR__PASSWORD_VALUES__STAGE7_2]
+eng=B7
+
+[STR__PASSWORD_VALUES__CONTINUES_0]
+eng=0
+[STR__PASSWORD_VALUES__CONTINUES_5]
+eng=5
+[STR__PASSWORD_VALUES__CONTINUES_9]
+eng=9
+[STR__PASSWORD_VALUES__CONTINUES_99]
+eng=99
+
+
+
+; ---------------------------------------------------------------
+; Pause menu
+; ---------------------------------------------------------------
+
+; Texts at the bottom of the display, stating which buttons can be used
+[STR__PAUSE_BUTTONS__SELECT]
+eng=Select
+[STR__PAUSE_BUTTONS__BACK]
+eng=Back
+[STR__PAUSE_BUTTONS__CONTINUE]
+eng=Continue
+
+; Options on pause menu
+[STR__PAUSE_MENU_OPTION__CONTINUE]
+eng=Continue
+[STR__PAUSE_MENU_OPTION__MISSION]
+eng=Mission
+[STR__PAUSE_MENU_OPTION__OBJECTIVES]
+eng=Objectives
+[STR__PAUSE_MENU_OPTION__CONTROLS]
+eng=Controls
+[STR__PAUSE_MENU_OPTION__QUIT]
+eng=Quit
+[STR__PAUSE_MENU_OPTION__SAVE]
+eng=Save game
+
+
+; Titles of the different pages in the pause menu
+[STR__PAUSE_MENU_TITLE__OPTIONS]
+eng=OPTIONS
+[STR__PAUSE_MENU_TITLE__DEBUG]
+eng=DEBUG
+[STR__PAUSE_MENU_TITLE__MISSION]
+eng=MISSION
+[STR__PAUSE_MENU_TITLE__OBJECTIVES]
+eng=OBJECTIVES
+[STR__PAUSE_MENU_TITLE__CONTROLS]
+eng=CONTROLS
+[STR__PAUSE_MENU_TITLE__QUIT]
+eng=QUIT
+[STR__PAUSE_MENU_TITLE__END_OF_LEVEL]
+eng=END OF LEVEL
+[STR__PAUSE_BONUSES__TITLE]
+eng=BONUS
+
+
+
+
+; Move names as listed in the pause menu
+[STR__PAUSE_MENU_MOVE__POWER_LEVEL_1]
+eng=Power Level 1
+[STR__PAUSE_MENU_MOVE__POWER_LEVEL_2]
+eng=Power Level 2
+[STR__PAUSE_MENU_MOVE__POWER_LEVEL_3]
+eng=Power Level 3
+[STR__PAUSE_MENU_MOVE__WHILE_RISING]
+eng=While rising
+[STR__PAUSE_MENU_MOVE__WHILE_RUNNING]
+eng=When running
+
+[STR__PAUSE_MENU_MOVE__K1]
+eng=Straight kick
+[STR__PAUSE_MENU_MOVE__K2]
+eng=Left kick
+[STR__PAUSE_MENU_MOVE__K3]
+eng=Roundhouse kick
+[STR__PAUSE_MENU_MOVE__K4]
+eng=Cartwheel kick
+[STR__PAUSE_MENU_MOVE__K5]
+eng=Frontsweep kick
+[STR__PAUSE_MENU_MOVE__K6]
+eng=Jumpside kick
+
+[STR__PAUSE_MENU_MOVE__P1]
+eng=Jab
+[STR__PAUSE_MENU_MOVE__P2]
+eng=Cross
+[STR__PAUSE_MENU_MOVE__P3]
+eng=Uppercut
+[STR__PAUSE_MENU_MOVE__P4]
+eng=Straight punch
+[STR__PAUSE_MENU_MOVE__P5]
+eng=Quick jab
+[STR__PAUSE_MENU_MOVE__P6]
+eng=Low Punch
+[STR__PAUSE_MENU_MOVE__P7]
+eng=Spinning punch
+[STR__PAUSE_MENU_MOVE__P8]
+eng=Uppercut
+
+[STR__PAUSE_MENU_MOVE__B1]
+eng=Block
+[STR__PAUSE_MENU_MOVE__B2]
+eng=Backward jump
+[STR__PAUSE_MENU_MOVE__B3]
+eng=Sideroll
+
+[STR__PAUSE_MENU_MOVE__N1]
+eng=Special
+[STR__PAUSE_MENU_MOVE__N2]
+eng=Walk/Run
+[STR__PAUSE_MENU_MOVE__N3]
+eng=Sideroll
+
+[STR__PAUSE_MENU_MOVE__R1]
+eng=Getup attack
+
+
+; Quit page
+[STR__PAUSE_MENU_QUIT__REALLY_QUIT]
+eng=Really quit?
+
+
+; Story page
+[STR__PAUSE_MENU_STORY__PRESS_SELECT]
+eng=PRESS SELECT
+
+; Story page
+[STR__PAUSE_MENU_STORY__SECTOR_NOT_CLEARED]
+eng=SECTOR NOT CLEARED !
+
+
+; Save page
+[STR__PAUSE_MENU_SAVE__SAVE]
+eng=SAVE GAME
+[STR__PAUSE_MENU_SAVE__NOSPACEONCARD]
+eng=Insufficient free blocks
+[STR__PAUSE_MENU_SAVE__SELECTFILETOSAVE]
+eng=Select file to save to the MEMORY CARD in MEMORY CARD slot 1
+[STR__PAUSE_MENU_SAVE__NEWSAVE]
+eng=- NEW SAVE -
+[STR__PAUSE_MENU_SAVE__ENTERSAVENAME]
+eng=Enter filename to save
+[STR__PAUSE_MENU_SAVE__DUPLICATESAVENAME]
+eng=Are you sure you want to overwrite this file?
+[STR__PAUSE_MENU_SAVE__DOYOUWANTTOFORMATCARD]
+eng=MEMORY CARD in MEMORY CARD slot 1 is not formatted. Do you wish to format?
+[STR__PAUSE_MENU_SAVE__FORMATTINGPLEASEWIAT]
+eng=Formatting... Do not remove the MEMORY CARD in MEMORY CARD slot 1
+[STR__PAUSE_MENU_SAVE__FORMATTINGOK]
+eng=Format complete!\n\nPress X to continue
+[STR__PAUSE_MENU_SAVE__FORMATTINGERROR]
+eng=Format Error!\n\nPress X to continue
+[STR__PAUSE_MENU_SAVE__FORMATTINGINTERRUPTED]
+eng=Operation interrupted!\n\nPress X to continue
+[STR__PAUSE_MENU_SAVE__SAVEINGPLEASEWIAT]
+eng=Saving... Do not remove the MEMORY CARD in MEMORY CARD slot 1
+[STR__PAUSE_MENU_SAVE__SAVEOK]
+eng=Save complete!\n\nPress X to continue
+[STR__PAUSE_MENU_SAVE__SAVEERROR]
+eng=Save error!\n\nPress X to continue
+
+
+; End of level bonus stuff
+[STR__PAUSE_BONUSES__HOSTAGES_RESCUED]
+eng=Hostages Rescued
+[STR__PAUSE_BONUSES__MONSTERS_KILLED]
+eng=Monsters Defeated
+[STR__PAUSE_BONUSES__PICKUPS_COLLECTED]
+eng=Pickups Collected
+[STR__PAUSE_BONUSES__QUAKE_SPIKES_COLLECTED]
+eng=Quake Spikes Destroyed
+[STR__PAUSE_BONUSES__FUEL_CELLS_COLLECTED]
+eng=Fuel Cells Collected
+[STR__PAUSE_BONUSES__HAS_NOT_DIED]
+eng=Survival Bonus
+[STR__PAUSE_BONUSES__NOT_USED_SPECIAL]
+eng=Combat Bonus
+[STR__PAUSE_BONUSES__LIVES_REMAINING]
+eng=Lives Remaining
+[STR__PAUSE_BONUSES__PERFECT]
+eng=Skill Bonus
+
+
+; Controller removed stuff
+[STR__PAUSE__CONTROLLER_1_REMOVED]
+eng=NO CONTROLLER INSERTED IN CONTROLLER PORT 1
+[STR__PAUSE__CONTROLLER_2_REMOVED]
+eng=NO CONTROLLER INSERTED IN CONTROLLER PORT 2
+
+
+; Objectives
+[STR__PAUSE__OBJECTIVE_HOSTAGES_RESCUED]
+eng=Hostages Rescued
+[STR__PAUSE__OBJECTIVE_QUAKE_SPIKES_DESTROYED]
+eng=Quake Spikes Destroyed
+[STR__PAUSE__OBJECTIVE_KEY_PARTS_RECOVERED]
+eng=Key Parts Recovered
+[STR__PAUSE__OBJECTIVE_FUEL_CELLS_RECOVERED]
+eng=Fuel Cells Recovered
+[STR__PAUSE__OBJECTIVE_LIFE_FORCE_STONES_RECOVERED]
+eng=Life Force Stones Recovered
+
+
+; ---------------------------------------------------------------
+; Level intro
+; ---------------------------------------------------------------
+
+[STR__LEVEL_INTRO__ENTERING_LEVEL]
+eng=LEVEL %d
+
+[STR__LEVEL__OMEGA_MEGAZORD]
+eng=Omega Megazord
+[STR__LEVEL__SUPERTRAIN_MEGAZORD]
+eng=Supertrain Megazord
+[STR__LEVEL__LIGHTSPEED_RESCUE]
+eng=Lightspeed Rescue!
+
+[STR__LEVEL_INTRO__1]
+eng=Operation Lightspeed
+[STR__LEVEL_INTRO__2]
+eng=Lightspeed Teamwork
+[STR__LEVEL_INTRO__3]
+eng=Rail Rescue
+[STR__LEVEL_INTRO__4]
+eng=Go Volcanic
+[STR__LEVEL_INTRO__5]
+eng=Safety First
+[STR__LEVEL_INTRO__6]
+eng=Lightspeed Rescue
+[STR__LEVEL_INTRO__7]
+eng=The Road To Skull Cavern
+
+
+
+
+
+
+
+
+
+; ---------------------------------------------------------------
+; ---------------------------------------------------------------
+; Ingame Texts
+; These texts appear during each level
+; ---------------------------------------------------------------
+; ---------------------------------------------------------------
+
+
+; ---------------------------------------------------------------
+; Credits/Continues
+; ---------------------------------------------------------------
+[STR__INGAME__CREDITS]
+eng=CREDITS %d
+[STR__INGAME__CONTINUE]
+eng=CONTINUE %d?
+
+
+; ---------------------------------------------------------------
+; Character names
+; ---------------------------------------------------------------
+[STR__NAME__CAPT_MITCHELL]
+eng=Capt. Mitchell
+[STR__NAME__MISS_FAIRWEATHER]
+eng=Miss. Fairweather
+[STR__NAME__QUEEN_BANSHEERA]
+eng=Queen Bansheera
+[STR__NAME__RED_RANGER]
+eng=Red Ranger
+
+
+; ---------------------------------------------------------------
+; Level 1
+; ---------------------------------------------------------------
+
+[STR__VOSCRIPT_0001]
+eng=Alert status.\nThere are reports of a siege in downtown Mariner Bay. The monsters seem to be using magical powers to keep the city police away.  We suspect it's the work of Queen Bansheera.  Your mission Rangers, neutralize this evil so the police can enter the building.
+[STR__VOSCRIPT_0002]
+eng=Once you arrive at the building we will be able to track you via your Rescue Morphers. Find a way in and rescue any hostages you find on the office floors.  Meanwhile, my techs at the Aquabase lab will be locking on to them and teleporting them to safety.  It's my job to make sure you stay one step ahead of Queen Bansheera's monsters. 
+[STR__VOSCRIPT_0002a]
+eng=Find a way in and rescue all the hostages found on the office floors.
+[STR__VOSCRIPT_0003]
+eng=These items improve your special attack. The more you collect, the stronger you become.
+[STR__VOSCRIPT_0004]
+eng=Well-done Ranger! All the hostages have been rescued from the building. Have you found and destroyed the leader of the Battlings?\nOur sensors have picked up a strong magical source coming from under the building. It's unclear, but the cause of the trouble appears to be emanating from there.\nRanger, be careful...
+[STR__VOSCRIPT_0004a]
+eng=Ranger, destroy Vypra!
+
+
+; ---------------------------------------------------------------
+; Level 2
+; ---------------------------------------------------------------
+
+[STR__VOSCRIPT_0005]
+eng=We have completed our analysis of the crystal you received from defeating Vypra. It appears to be her 'Life-force' stone which, in the wrong hands, could restore her life energy. You must hold onto any crystals retrieved from Queen Bansheera's minions.
+[STR__VOSCRIPT_0006]
+eng=We have reports of a Code Red. Our seismological data confirms that someone or something is trying to damage the dam. If that happens, we will be facing a serious ecological disaster and Mariner Bay will be washed out to sea.\nGo Rangers!
+[STR__VOSCRIPT_0007]
+eng=Ranger, our satellite has pin-pointed the source of the seismological activity.\nYou need to destroy all the 'Quake Spikes'. Go to alert status.\nGood luck!
+[STR__VOSCRIPT_0007a]
+eng=Find and rescue the hostages.
+[STR__VOSCRIPT_0007b]
+eng=Find and destroy all Quake Spikes.
+[STR__VOSCRIPT_0008]
+eng=Well done, that's half of the Quake Spikes destroyed, but there's no time to relax: you still need to destroy the other half.
+[STR__VOSCRIPT_0009]
+eng=Hold on Ranger, that card looks like a trap. Use extreme caution!.
+[STR__VOSCRIPT_0010]
+eng=We have just finished developing the Supertrain Megazord! These massive machines have been programmed to automatically assist you in defeating any opposing threat.\nThis will be the Supertrain Megazord's first test drive.\nGood luck, Ranger!!
+[STR__VOSCRIPT_0010a]
+eng=Ranger, get Loki!
+[STR__VOSCRIPT_0011]
+eng=I am alive. I must be freed.\nThis world will be mine again!
+
+
+
+; ---------------------------------------------------------------
+; Level 3
+; ---------------------------------------------------------------
+[STR__VOSCRIPT_0012]
+eng=Ranger, we've got trouble.\nThe Supertrain has been hijacked! Our sensors show that it is being controlled by an enemy on board. Use Aero Rescue Three for drop off at the end of Rail Rescue Five and work your way to the front neutralizing all threats as you go.\nGO! GO! GO!
+[STR__VOSCRIPT_0012a]
+eng=You must regain control of the Supertrain.
+[STR__VOSCRIPT_0012b]
+eng=Ranger, you must defeat Jinxer!
+
+
+
+; ---------------------------------------------------------------
+; Level 4
+; ---------------------------------------------------------------
+[STR__VOSCRIPT_0013]
+eng=Rangers, listen up. All of your training up to now will be tested to its limits. An asteroid has just hit the city and created a volcanic mountain. With your help the city has a chance.\nLightspeed Rescue!
+[STR__VOSCRIPT_0014]
+eng=Right now our top priority is to rescue all the trapped civilians.
+[STR__VOSCRIPT_0014a]
+eng=Find and rescue all the hostages.
+[STR__VOSCRIPT_0015]
+eng=Well done Ranger: you're on target for saving all of the civilians. Our Lightspeed Rescue research team believes that the Asteroid is somehow alive. We need you now to focus your attention on the large rock itself and get closer to it.
+[STR__VOSCRIPT_0016]
+eng=This has all the hallmarks of Queen Bansheera. Yes I'm right, Battlings have started to swarm all over the place. Quick, no time to lose. Advance to the asteroid as quickly as possible.
+[STR__VOSCRIPT_0016a]
+eng=Destroy the evil Fireor.
+[STR__VOSCRIPT_0016b]
+eng=Ranger, Magmavore must be stopped.
+[STR__VOSCRIPT_0016c]
+eng=Ranger, you must obliterate Diabolico.
+
+
+
+; ---------------------------------------------------------------
+; Level 5
+; ---------------------------------------------------------------
+[STR__VOSCRIPT_0017]
+eng=These 'Fuel Cells' are extremely explosive. They must be delivered to Headquarters via the docks. Your assignment is to collect these precious items before marauding Battlings find them.
+[STR__VOSCRIPT_0018]
+eng=It is essential that you retrieve these dangerous items. In the wrong hands they could cause immense environmental damage. Make sure you keep them away from high temperatures. Return back safely.
+[STR__VOSCRIPT_0018a]
+eng=You must find and rescue all the civilians.
+[STR__VOSCRIPT_0018b]
+eng=Ranger, destroy Olympius!
+
+
+
+; ---------------------------------------------------------------
+; Level 6
+; ---------------------------------------------------------------
+[STR__VOSCRIPT_0019]
+eng=Ranger, the Battlings have entered.... TRANSMISSION INTERRUPTED
+[STR__VOSCRIPT_0020]
+eng=Ranger, we are under attack! I repeat, we are under attack! Our defenses have been breached. Captain Mitchell is missing. Somehow the Battlings have passed through our defenses undetected. Please help us quickly. You can gain access to the base via one of the submarine pools.\nOh no, too late!\nRanger help.
+[STR__VOSCRIPT_0021]
+eng=This time Lightspeed Power Rangers you are too late. I now control all of Aquabase and all of Lightspeed. I have taken your "palace" from you! Ha ha ha ha!
+[STR__VOSCRIPT_0021a]
+eng=You must rescue all hostages.
+[STR__VOSCRIPT_0021b]
+eng=Rescue Ms. Fairweather.
+[STR__VOSCRIPT_0022]
+eng=Thank you Ranger for rescuing me. Now it's time to rescue Dana's father. First, take me to security's main terminal.
+[STR__VOSCRIPT_0022a]
+eng=Find security's main terminal.
+[STR__VOSCRIPT_0023]
+eng=Well done! The security systems will be overridden in a few minutes.
+[STR__VOSCRIPT_0023a]
+eng=Ranger, you must hold off the Battlings 'til the power is restored.
+[STR__VOSCRIPT_0024]
+eng=Okay, that's it! Provisional control is now back online and in the hands of Lightspeed Rescue. The main computer has tracked Captain Mitchell to the main control room of Aquabase. Find the other main switches to gain access. I shall keep track of your progress from behind these locked doors. Now go!
+[STR__VOSCRIPT_0024a]
+eng=Find the other two main switches to gain access to the control room.
+[STR__VOSCRIPT_0025]
+eng=Well done Ranger, I knew we could trust you to save the day. This will be your final battle! Now step through that portal to Samai Road and defeat Queen Bansheera.
+[STR__VOSCRIPT_0025a]
+eng=Ranger, destroy the elusive Mermatron!
+
+
+
+; ---------------------------------------------------------------
+; Level 7
+; ---------------------------------------------------------------
+[STR__VOSCRIPT_0026]
+eng=Ranger, this portal is the entrance to the Queen's dimension. You must destroy her before the planetary alignment restores her strength. We will try to communicate with you once you step through the portal, but the connection might be unstable. Good luck!
+[STR__VOSCRIPT_0026a]
+eng=Unlock Demonite!!!
+[STR__VOSCRIPT_0026b]
+eng=Unlock the Titanium Ranger!
+[STR__VOSCRIPT_0026c]
+eng=This is the final battle, Ranger!!! Destroy Queen Bansheera!!!!
+[STR__VOSCRIPT_0027]
+eng=I summon the energy of my minions. They shall live on!
+[STR__VOSCRIPT_0028]
+eng=Pathetic humans. You are too late. The crossover is here. It is time...
+[STR__VOSCRIPT_0029]
+eng=Contact re-established.\nWe have completed work on our ultimate weapon. Use the Omega MegaZord, Ranger...
+
+
+
+; ---------------------------------------------------------------
+; End sequence
+; ---------------------------------------------------------------
+[STR__VOSCRIPT_0030]
+eng=Congratulations Ranger. Evil has been banished. Your training and skills have saved the day.
+[STR__VOSCRIPT_0031]
+eng=But we're going to keep Aquabase functional, for there will always be a successor ready to take Queen Bansheera's place.
+[STR__VOSCRIPT_0032]
+eng=We'll be ready!
+[STR__VOSCRIPT_0033]
+eng=LIGHTSPEED RESCUE!
+
+
+
+
+
+
+; ---------------------------------------------------------------
+; Back end
+; ---------------------------------------------------------------
+
+[STR__BACK_END__GAMEOVER]
+eng=GAME OVER
+
+[STR__BACK_END__CONGRATSPLAYER1]
+eng=Congratulations Player One!
+
+[STR__BACK_END__CONGRATSPLAYER2]
+eng=Congratulations Player Two!
+
+[STR__BACK_END__ENTERNAME]
+eng=Enter your name!
+
+[STR__BACK_END__POSITION]
+eng=You made position %d in the high score table!
+
+
+
+; ---------------------------------------------------------------
+; Monster names
+; ---------------------------------------------------------------
+
+[STR__MNAME__QUEEN]
+eng=Queen
+[STR__MNAME__DIABOLICO]
+eng=Diabolico
+[STR__MNAME__VYPRA]
+eng=Vypra
+[STR__MNAME__LOKI]
+eng=Loki
+[STR__MNAME__JINXER]
+eng=Jinxer
+[STR__MNAME__OLYMPUS]
+eng=Olympius
+
+[STR__MNAME__M01]
+eng=Battling
+[STR__MNAME__M02]
+eng=Fireor
+[STR__MNAME__M03]
+eng=Magmavore
+[STR__MNAME__M04]
+eng=Cog
+[STR__MNAME__M05]
+eng=Stingwinger
+[STR__MNAME__M06]
+eng=Abominus
+[STR__MNAME__M07]
+eng=Smogger
+[STR__MNAME__M08]
+eng=Strikning
+[STR__MNAME__M09]
+eng=Mermatron
+[STR__MNAME__M10]
+eng=Shockatron
+[STR__MNAME__M11]
+eng=Omega Megazord
+[STR__MNAME__M12]
+eng=Supertrain Megazord
+
+
+
+
+; ---------------------------------------------------------------
+; Credits
+; ---------------------------------------------------------------
+
+
+[STR__CREDITS__PRESIDENT]
+eng=President
+[STR__CREDITS__MANAGING_DIRECTOR]
+eng=Managing Director
+[STR__CREDITS__DEVELOPMENT_DIRECTOR]
+eng=Development Director
+[STR__CREDITS__CREATIVE_DIRECTOR]
+eng=Creative Director
+[STR__CREDITS__PRODUCER]
+eng=Producer
+[STR__CREDITS__LEAD_PROGRAMMER]
+eng=Lead Programmer
+[STR__CREDITS__LEAD_ARTIST]
+eng=Lead Artists
+[STR__CREDITS__LEAD_DESIGNER]
+eng=Lead Designer
+[STR__CREDITS__PROGRAMMERS]
+eng=Programmers
+[STR__CREDITS__ARTISTS]
+eng=Artists
+[STR__CREDITS__ANIMATION]
+eng=Animation
+[STR__CREDITS__ADDITIONAL_ART_AND_ANIMATION]
+eng=Additional Art and Animation
+[STR__CREDITS__SOUND_AND_AUDIO]
+eng=Sound and Audio
+[STR__CREDITS__QUALITY_ASSURANCE_MANAGER]
+eng=QA Manager
+[STR__CREDITS__QA_TESTERS]
+eng=QA Testers
+[STR__CREDITS__WITH_SPECIAL_THANKS_TO]
+eng=With Special Thanks to
+[STR__CREDITS__ASSOCIATE_PRODUCER]
+eng=Associate Producer
+[STR__CREDITS__ASSISTANT_PRODUCER]
+eng=Assistant Producer
+[STR__CREDITS__EXECUTIVE_PRODUCER]
+eng=Executive Producer
+[STR__CREDITS__VP_OF_PRODUCT_DEVELOPMENT]
+eng=VP of Product Development
+[STR__CREDITS__QA_MANAGERS]
+eng=QA Managers
+[STR__CREDITS__LEAD_TESTER]
+eng=Lead Tester 
+[STR__CREDITS__TESTERS]
+eng=Testers
+[STR__CREDITS__PRODUCT_MANAGER]
+eng=Product Manager
+[STR__CREDITS__ASSOCIATE_PRODUCT_MANAGER]
+eng=Associate Product Manager
+[STR__CREDITS__CREATIVE_SERVICES]
+eng=Creative Services
+[STR__CREDITS__VO_TALENT]
+eng=VO Talent
+[STR__CREDITS__LICENSING_AND_MERCHANDISING_DIRECTOR]
+eng=Licensing and Merchandising Director
+[STR__CREDITS__COORDINATOR]
+eng=Coordinator
+[STR__CREDITS__CREATIVE_RESOURCES]
+eng=Creative Resources
+
+
+
+; Saban
+
+[STR__CREDITS__SABAN_CREDITS]
+eng= Saban Credits
+
+[STR__CREDITS__CINDY_DAVIS]
+eng=Cindy Davis
+[STR__CREDITS__CHRISTIANE_TOWNSEND]
+eng=Christiane Townsend
+[STR__CREDITS__DONNY_SOEDER]
+eng=Donny Soeder
+
+
+
+; THQ
+
+[STR__CREDITS__THQ_CREDITS]
+eng=THQ Credits
+
+[STR__CREDITS__PETRO_PIASECKYJ]
+eng=Petro Piaseckyj
+[STR__CREDITS__ED_RAMIRO]
+eng=Ed Ramiro
+[STR__CREDITS__CAROLINA_BEROZA]
+eng=Carolina Beroza
+[STR__CREDITS__SCOTT_KRAGER]
+eng=Scott Krager
+[STR__CREDITS__MICHAEL_RUBINELLI]
+eng=Michael Rubinelli
+[STR__CREDITS__DONN_NAUERT]
+eng=Donn Nauert
+[STR__CREDITS__JEREMY_BARNES]
+eng=Jeremy Barnes
+[STR__CREDITS__RYAN_CAMU]
+eng=Ryan Camu
+[STR__CREDITS__JASON_DE_HERAS]
+eng=Jason de Heras
+[STR__CREDITS__MAURICIO_HERNANDEZ]
+eng=Mauricio Hernandez
+[STR__CREDITS__MIKE_KAFITY]
+eng=Mike Kafity
+[STR__CREDITS__STEFAN_MENDEZ]
+eng=Stefan Mendez
+[STR__CREDITS__MICHAEL_PARKER]
+eng=Michael Parker
+[STR__CREDITS__MIKE_TOPPER]
+eng=Mike Topper
+[STR__CREDITS__RACHEL_SILVERSTEIN]
+eng=Rachel Silverstein
+[STR__CREDITS__KEVIN_HOOPER]
+eng=Kevin Hooper
+[STR__CREDITS__KIRK_SOMDAL]
+eng=Kirk Somdal 
+[STR__CREDITS__BRIAN_FARRELL]
+eng=Brian Farrell
+[STR__CREDITS__JEFFREY_LAPIN]
+eng=Jeffrey Lapin
+[STR__CREDITS__ALISON_LOCKE]
+eng=Alison Locke
+[STR__CREDITS__GERMAINE_GIOIA]
+eng=Germaine Gioia
+[STR__CREDITS__LESLIE_BROWN]
+eng=Leslie Brown
+[STR__CREDITS__TIFFANY_TERNAN]
+eng=Tiffany Ternan
+[STR__CREDITS__PETER_DILLE]
+eng=Peter Dille
+[STR__CREDITS__JAMIE_BAFUS]
+eng=Jamie Bafus
+[STR__CREDITS__LALIE_FISHER]
+eng=Lalie Fisher
+[STR__CREDITS__CINDY_DAVIS]
+eng=Cindy Davis
+[STR__CREDITS__DEB_MCCOY_LARSON]
+eng=Deb McCoy Larson
+[STR__CREDITS__SEAN_CW_JOHNSON__RED_RANGER]
+eng=Sean Cw Johnson - Red Ranger
+[STR__CREDITS__MICHAEL_CHATURANTABUT__BLUE_RANGER]
+eng=Michael Chaturantabut - Blue Ranger
+[STR__CREDITS__KEITH_ROBINSON__GREEN_RANGER]
+eng=Keith Robinson - Green Ranger
+[STR__CREDITS__SASHA_WILLIAMS__YELLOW_RANGER]
+eng=Sasha Williams - Yellow Ranger
+[STR__CREDITS__ALISON_MACINNIS_PINK_RANGER]
+eng=Alison MacInnis - Pink Ranger
+[STR__CREDITS__RHETT_FISHER___TITANIUM_RANGER]
+eng=Rhett Fisher - Titanium Ranger
+[STR__CREDITS__RON_ROGGE____CAPTAIN__MITCHELL]
+eng=Ron Rogge' - Captain  Mitchell
+[STR__CREDITS__MONICA_LOUWERENS__MISS_FAIRWEATHER]
+eng=Monica Louwerens - Miss Fairweather
+[STR__CREDITS__DIANE_SALINGER___QUEEN_BANSHEERA]
+eng=Diane Salinger - Queen Bansheera
+[STR__CREDITS__JUSTINE_ARONOFF__GIRL]
+eng=Justine Aronoff - Girl
+[STR__CREDITS__LAURA_OROZCO__WOMAN]
+eng=Laura Orozco - Woman
+[STR__CREDITS__ZACH_PAGTER__BOY]
+eng=Zach Pagter - Boy
+[STR__CREDITS__SCOTT_PAGE_PAGTER__MAN]
+eng=Scott Page-Pagter - Man
+[STR__CREDITS__JUSTIN_GRUSH]
+eng=Justin Grush
+[STR__CREDITS__MORGAN_CLARK]
+eng=Morgan Clark
+
+[STR__CREDITS__THQ_AND_THE_THQ_LOGO_ARE_]
+eng=THQ and the THQ logo are trademarks and/or registered trademarks of THQ Inc.
+[STR__CREDITS___C__2000_THQ_INC_]
+eng=(c) 2000 THQ Inc.
+
+
+
+; Climax
+
+[STR__CREDITS__CLIMAX_GROUP_CREDITS]
+eng=Climax Group Credits
+
+[STR__CREDITS__KARL_JEFFERY]
+eng=Karl Jeffery
+[STR__CREDITS__GARY_LIDDON]
+eng=Gary Liddon
+[STR__CREDITS__CHRIS_HADLEY]
+eng=Chris Hadley
+[STR__CREDITS__JOSEPH_CAVALLA]
+eng=Joseph Cavalla
+[STR__CREDITS__JIM_GARDNER]
+eng=Jim Gardner
+[STR__CREDITS__DAVE_OWENS]
+eng=Dave Owens
+[STR__CREDITS__THOR_HAYTON]
+eng=Thor H Hayton
+[STR__CREDITS__NICK_DRY]
+eng=Nick Dry
+[STR__CREDITS__CHARLES_BLAIR]
+eng=Charlie Blair
+[STR__CREDITS__PAUL_GRENFELL]
+eng=Paul Grenfell
+[STR__CREDITS__TIM_SWANN]
+eng=Tim Swann
+[STR__CREDITS__JAMES_BRACE]
+eng=James Brace
+[STR__CREDITS__DAVID_PIMM]
+eng=David Pimm
+[STR__CREDITS__KEVIN_MARTIN]
+eng=Kevin Martin
+[STR__CREDITS__NICK_THOMAS]
+eng=Nick Thomas
+[STR__CREDITS__MATT_EVERITT]
+eng=Matt Everitt
+[STR__CREDITS__MATT_HUGHES]
+eng=Matt Hughes
+[STR__CREDITS__PETER_PANTON]
+eng=Peter Panton
+[STR__CREDITS__STEVE_SAMPSON]
+eng=Steve Sampson
+[STR__CREDITS__STEVE_CROCKER]
+eng=Steve Crocker
+[STR__CREDITS__MATT_SIMMONDS]
+eng=Matt Simmonds
+[STR__CREDITS__STUART_BAYLISS]
+eng=Stuart Bayliss
+[STR__CREDITS__BARRY_MARTIN]
+eng=Barry Martin
+[STR__CREDITS__KRAIG_MORGAN]
+eng=Kraig Morgan
+[STR__CREDITS__JAMES_NEILSON]
+eng=James Neilson
+[STR__CREDITS__CHRISS_JUBB]
+eng=Chris Jubb
+[STR__CREDITS__OLIVER_REED_SMITH]
+eng=Oliver Reid-Smith
+[STR__CREDITS__MATT_SAMSAM]
+eng=Matt Sansam
+[STR__CREDITS__MIKE_ARMSTRONG]
+eng=Mike Armstrong
+[STR__CREDITS__DAVE_FALLER]
+eng=Dave Faller
+[STR__CREDITS__JAMES_PARHAM]
+eng=James Parham
+
+[STR__CREDITS__CAROLINE_MILLER]
+eng=Caroline Miller
+[STR__CREDITS__CAL_BLAGBROUGH]
+eng=Cal Blagbrough
+
+[STR__CREDITS__HELLOS]
+eng=Very Special Thanks Indeed to
+
+[STR__CREDITS__HILARY_GARDNER]
+eng=Hilary Gardner
+[STR__CREDITS__TEREZA_PARSONS]
+eng=Tereza Parsons
+[STR__CREDITS__RACHEL_FORD]
+eng=Rachel Ford
+[STR__CREDITS__CATHERINE_ROCHATTE]
+eng=Catherine Rochatte
+[STR__CREDITS__BRASHLEY]
+eng=Ashley and Bradley Bricknell
+
+
+; ---------------------------------------------------------------
+; Debugging text
+; The following texts DO NOT require translation
+; ---------------------------------------------------------------
+
+[STR__ART_REMOVE_THIS_TRIGGER]
+eng=THIS TRIGGER SHOULD NOT BE HERE\nTO BE REMOVED BY ART..
+
diff --git a/tools/Banker.exe b/tools/Banker.exe
new file mode 100644
index 000000000..21c6d55d1
Binary files /dev/null and b/tools/Banker.exe differ
diff --git a/tools/MkData.exe b/tools/MkData.exe
new file mode 100644
index 000000000..d239369ea
Binary files /dev/null and b/tools/MkData.exe differ
diff --git a/tools/MkSpeech.exe b/tools/MkSpeech.exe
new file mode 100644
index 000000000..f9870a28e
Binary files /dev/null and b/tools/MkSpeech.exe differ
diff --git a/tools/Perl/bin/GET b/tools/Perl/bin/GET
new file mode 100644
index 000000000..1207cd7fe
--- /dev/null
+++ b/tools/Perl/bin/GET
@@ -0,0 +1,505 @@
+#!perl -w
+
+# $Id: lwp-request.PL,v 1.33 1998/08/04 09:18:11 aas Exp $
+#
+# Simple user agent using LWP library.
+
+=head1 NAME
+
+lwp-request, GET, HEAD, POST - Simple WWW user agent
+
+=head1 SYNOPSIS
+
+ lwp-request [-aeEdvhx] [-m method] [-b <base URL>] [-t <timeout>]
+             [-i <if-modified-since>] [-c <content-type>] [-C <credentials>]
+             [-p <proxy-url>] [-o <format>] <url>...
+
+=head1 DESCRIPTION
+
+This program can be used to send requests to WWW servers and your
+local file system. The request content for POST, PUT and CHECKIN
+methods is read from stdin.  The content of the response is printed on
+stdout.  Error messages are printed on stderr.  The program returns a
+status value indicating the number of URLs that failed.
+
+The options are:
+
+=over 4
+
+=item -m <method>
+
+Set which method to use for the request.  If this option is not used,
+then the method is derived from the name of the program.
+
+=item -f
+
+Force request through, even if the program believes that the method is
+illegal.  The server will probably reject the request.
+
+=item -b <url>
+
+This URL will be used as the base URL for the URLs that the method is
+applied to.  The base URL only takes effect for relative URLs.  If you
+do not provide this option and the URLs are relative, then they will
+be treated as files in the local file system.
+
+=item -t <timeout>
+
+Set the timeout value for the requests.  The timeout is the amount of
+time that the program will wait for a response from the remote server
+before it fails.  The default unit for the timeout value is seconds.
+You might append "m" or "h" to the timeout value to make it minutes or
+hours, respectively.  The default timeout is '3m', i.e. 3 minutes.
+
+=item -i <time>
+
+Set the If-Modified-Since header in the request. If I<time> it the
+name of a file, use the modification timestamp for this file. If
+I<time> is not a file, it is parsed as a literal date. Take a look at
+L<HTTP::Date> for recogniced formats.
+
+=item -c <content-type>
+
+Set the Content-Type for the request.  This option is only allowed for
+requests that take a content, i.e. POST, PUT and CHECKIN.  You can
+force methods to take content by using the C<-f> option together with
+C<-c>.  The default Content-Type for POST is
+C<application/x-www-form-urlencoded>.  The default Content-type for
+the others is C<text/plain>.
+
+=item -p <proxy-url>
+
+Set the proxy to be used for the requests.  The program also loads
+proxy settings from the environment.  You can disable this with the
+C<-P> option.
+
+=item -C <username>:<password>
+
+Provide credentials for documents that are protected by Basic
+Authentication.  If the document is protected and you did not specify
+the username and password with this option, then you will be prompted
+to provide these values.
+
+=back
+
+The following options controls what is displayed by the program:
+
+=over 4
+
+=item -u
+
+Print request method and absolute URL as requests are made.
+
+=item -U
+
+Print request headers in addition to request method and absolute URL.
+
+=item -s
+
+Print response status code.  This option is always on for HEAD requests.
+
+=item -S
+
+Print response status chain. This shows redirect and autorization
+requests that are handled by the library.
+
+=item -e
+
+Print response headers.  This option is always on for HEAD requests.
+
+=item -d
+
+Do B<not> print the content of the response.
+
+=item -o <format>
+
+Process HTML content in various ways before printing it.  If the
+content type of the response is not HTML, then this option has no
+effect.  The legal format values are; I<text>, I<ps>, I<links>,
+I<html> and I<dump>.
+
+If you specify the I<text> format then the HTML will be formatted as
+plain latin1 text.  If you specify the I<ps> format then it will be
+formatted as Postscript.
+
+The I<links> format will output all links found in the HTML document.
+Relative links will be expanded to absolute ones.
+
+The I<html> format will reformat the HTML code and the I<dump> format
+will just dump the HTML syntax tree.
+
+=item -v
+
+Print the version number of the program and quit.
+
+=item -h
+
+Print usage message and quit.
+
+=item -x
+
+Extra debugging output.
+
+=item -a
+
+Set text(ascii) mode for content input and output.  If this option is not 
+used, content input and output is done in binary mode.
+
+=back
+
+Because this program is implemented using the LWP library, it will
+only support the protocols that LWP supports.
+
+=head1 SEE ALSO
+
+L<lwp-mirror>, L<LWP>
+
+=head1 COPYRIGHT
+
+Copyright 1995-1997 Gisle Aas.
+
+This library is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+
+=head1 AUTHOR
+
+Gisle Aas <aas@sn.no>
+
+=cut
+
+$progname = $0;
+$progname =~ s,.*/,,;  # use basename only
+$progname =~ s/\.\w*$//; # strip extension, if any
+
+$VERSION = sprintf("%d.%02d", q$Revision: 1.33 $ =~ /(\d+)\.(\d+)/);
+
+
+require LWP;
+require LWP::Debug;
+require URI::URL;
+
+use URI::Heuristic qw(uf_url);
+
+use HTTP::Status qw(status_message);
+use HTTP::Date qw(time2str str2time);
+
+
+# This table lists the methods that are allowed.  It should really be
+# a superset for all methods supported for every scheme that may be
+# supported by the library.  Currently it might be a bit too HTTP
+# specific.  You might use the -f option to force a method through.
+#
+# "" = No content in request, "C" = Needs content in request
+#
+%allowed_methods = (
+    GET        => "",
+    HEAD       => "",
+    POST       => "C",
+    PUT        => "C",
+    DELETE     => "",
+    TRACE      => "",
+    OPTIONS    => "",
+);
+
+
+# We make our own specialization of LWP::UserAgent that asks for
+# user/password if document is protected.
+{
+    package RequestAgent;
+    @ISA = qw(LWP::UserAgent);
+
+    sub new
+    { 
+	my $self = LWP::UserAgent::new(@_);
+	$self->agent("lwp-request/$main::VERSION");
+	$self;
+    }
+
+    sub get_basic_credentials
+    {
+	my($self, $realm, $uri) = @_;
+	if ($main::opt_C) {
+	    return split(':', $main::opt_C, 2);
+	} elsif (-t) {
+	    my $netloc = $uri->netloc;
+	    print "Enter username for $realm at $netloc: ";
+	    my $user = <STDIN>;
+	    chomp($user);
+	    return (undef, undef) unless length $user;
+	    print "Password: ";
+	    system("stty -echo");
+	    my $password = <STDIN>;
+	    system("stty echo");
+	    print "\n";  # because we disabled echo
+	    chomp($password);
+	    return ($user, $password);
+	} else {
+	    return (undef, undef)
+	}
+    }
+}
+
+$method = uc(lc($progname) eq "lwp-request" ? "GET" : $progname);
+
+# Parse command line
+use Getopt::Std;
+
+$opt_a = undef;  # content i/o in text(ascii) mode
+$opt_m = undef;  # set method
+$opt_f = undef;  # make request even if method is not in %allowed_methods
+$opt_b = undef;  # base url
+$opt_t = undef;  # timeout
+$opt_i = undef;  # if-modified-since
+$opt_c = undef;  # content type for POST
+$opt_C = undef;  # credidentials for basic authorization
+
+$opt_u = undef;  # display method, URL and headers of request
+$opt_U = undef;  # display request headers also
+$opt_s = undef;  # display status code
+$opt_S = undef;  # display whole chain of status codes
+$opt_e = undef;  # display response headers (default for HEAD)
+$opt_d = undef;  # don't display content
+
+$opt_h = undef;  # print usage
+$opt_v = undef;  # print version
+
+$opt_x = undef;  # extra debugging info
+$opt_p = undef;  # proxy URL
+$opt_P = undef;  # don't load proxy setting from environment
+
+$opt_o = undef;  # output format
+
+unless (getopts("axhvuUsSedPp:b:t:i:c:C:m:fo:")) {
+    usage();
+}
+
+if ($opt_v) {
+    require LWP;
+    my $DISTNAME = 'libwww-perl-' . LWP::Version();
+    die <<"EOT";
+This is lwp-request version $VERSION ($DISTNAME)
+
+Copyright 1995-1997, Gisle Aas.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+EOT
+}
+
+usage() if $opt_h || !@ARGV;
+
+LWP::Debug::level('+') if $opt_x;
+
+# Create the user agent object
+$ua = new RequestAgent;
+
+# Load proxy settings from *_proxy environment variables.
+$ua->env_proxy unless $opt_P;
+
+$method = uc($opt_m) if defined $opt_m;
+
+if ($opt_f) {
+    if ($opt_c) {
+        $allowed_methods{$method} = "C";  # force content
+    } else {
+        $allowed_methods{$method} = "";
+    }
+} elsif (!defined $allowed_methods{$method}) {
+    die "$progname: $method is not an allowed method\n";
+}
+
+if ($method eq "HEAD") {
+    $opt_s = 1;
+    $opt_e = 1 unless $opt_d;
+    $opt_d = 1;
+}
+
+if (defined $opt_t) {
+    $opt_t =~ /^(\d+)([smh])?/;
+    die "$progname: Illegal timeout value!\n" unless defined $1;
+    $timeout = $1;
+    $timeout *= 60   if ($2 eq "m");
+    $timeout *= 3600 if ($2 eq "h");
+    $ua->timeout($timeout);
+}
+
+if (defined $opt_i) {
+    if (-e $opt_i) {
+        $time = (stat _)[9];
+    } else {
+        $time = str2time($opt_i);
+        die "$progname: Illegal time syntax for -i option\n"
+            unless defined $time;
+    }
+    $opt_i = time2str($time);
+}
+
+$content = undef;
+if ($allowed_methods{$method} eq "C") {
+    # This request needs some content
+    unless (defined $opt_c) {
+        # set default content type
+        $opt_c = ($method eq "POST") ?
+              "application/x-www-form-urlencoded"
+            : "text/plain";
+    } else {
+        die "$progname: Illegal Content-type format\n"
+            unless $opt_c =~ m,^[\w\-]+/[\w\-]+(?:\s*;.*)?$,
+    }
+    print "Please enter content ($opt_c) to be ${method}ed:\n"
+        if -t;
+    binmode STDIN unless -t or $opt_a;
+    $content = join("", <STDIN>);
+} else {
+    die "$progname: Can't set Content-type for $method requests\n"
+        if defined $opt_c;
+}
+
+# Set up a request.  We will use the same request object for all URLs.
+$request = new HTTP::Request $method;
+$request->header('If-Modified-Since', $opt_i) if defined $opt_i;
+#$request->header('Accept', '*/*');
+if ($opt_c) { # will always be set for request that wants content
+    $request->header('Content-Type', $opt_c);
+    $request->header('Content-Length', length $content);  # Not really needed
+    $request->content($content);
+}
+
+
+$errors = 0;
+
+# Ok, now we perform the requests, one URL at a time
+while ($url = shift) {
+    # Create the URL object, but protect us against bad URLs
+    eval {
+	if ($url =~ /^\w+:/ || $opt_b) {  # is there any scheme specification
+	    $url = URI::URL->new($url, $opt_b);
+	} else {
+	    $url = uf_url($url);
+        }
+    };
+    if ($@) {
+	$@ =~ s/at\s+\S+\s+line\s\d+//;
+	print STDERR $@;
+	$errors++;
+	next;
+    }
+
+    $ua->proxy($url->scheme, $opt_p) if $opt_p;
+
+    # Send the request and get a response back from the server
+    $request->url($url);
+    $response = $ua->request($request);
+
+    if ($opt_u || $opt_U) {
+        my $url = $response->request->url->as_string;
+        print "$method $url\n";
+        print $response->request->headers_as_string, "\n" if $opt_U;
+    }
+
+    if ($opt_S) {
+	printResponseChain($response);
+    } elsif ($opt_s) {
+        print $response->status_line, "\n";
+    }
+
+    if ($opt_e) {
+        # Display headers
+        print $response->headers_as_string;
+        print "\n";  # separate headers and content
+    }
+
+    if ($response->is_success) {
+	unless ($opt_d) {
+	    if ($opt_o &&
+		$response->content_type eq 'text/html') {
+		require HTML::Parse;
+		my $html = HTML::Parse::parse_html($response->content);
+		{
+		    $opt_o eq 'ps' && do {
+			require HTML::FormatPS;
+			my $f = new HTML::FormatPS;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'text' && do {
+			require HTML::FormatText;
+			my $f = new HTML::FormatText;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'html' && do {
+			print $html->as_HTML;
+			last;
+		    };
+		    $opt_o eq 'links' && do {
+			my $base = $response->base;
+			for ( @{ $html->extract_links } ) {
+			    my($link, $elem) = @$_;
+			    my $tag = uc $elem->tag;
+			    $link = new URI::URL $link, $base;
+			    print "$tag\t", $link->abs->as_string, "\n";
+			}
+			last;
+		    };
+		    $opt_o eq 'dump' && do {
+			$html->dump;
+			last;
+		    };
+		    # It is bad to not notice this before now :-(
+		    die "Illegal -o option value ($opt_o)\n";
+		}
+	    } else {
+                binmode STDOUT unless $opt_a;
+		print $response->content;
+	    }
+	}
+    } else {
+        print STDERR $response->error_as_HTML unless $opt_d;
+        $errors++;
+    }
+}
+
+exit $errors;
+
+
+sub printResponseChain
+{
+    my($response) = @_;
+    return unless defined $response;
+    printResponseChain($response->previous);
+    my $method = $response->request->method;
+    my $url = $response->request->url->as_string;
+    my $code = $response->code;
+    print "$method $url --> ", $response->status_line, "\n";
+}
+
+
+sub usage
+{
+    die <<"EOT";
+Usage: $progname [-options] <url>...
+    -m <method>   use method for the request (default is '$method')
+    -f            make request even if $progname believes method is illegal
+    -b <base>     Use the specified URL as base
+    -t <timeout>  Set timeout value
+    -i <time>     Set the If-Modified-Since header on the request
+    -c <conttype> use this content-type for POST, PUT, CHECKIN
+    -a            Use text mode for content I/O
+    -p <proxyurl> use this as a proxy
+    -P            don't load proxy settings from environment
+
+    -u            Display method and URL before any response
+    -U            Display request headers (implies -u)
+    -s            Display response status code
+    -S            Display response status chain
+    -e            Display response headers
+    -d            Do not display content
+    -o <format>   Process HTML content in various ways
+
+    -v            Show program version
+    -h            Print this message
+
+    -x            Extra debugging output
+EOT
+}
diff --git a/tools/Perl/bin/HEAD b/tools/Perl/bin/HEAD
new file mode 100644
index 000000000..1207cd7fe
--- /dev/null
+++ b/tools/Perl/bin/HEAD
@@ -0,0 +1,505 @@
+#!perl -w
+
+# $Id: lwp-request.PL,v 1.33 1998/08/04 09:18:11 aas Exp $
+#
+# Simple user agent using LWP library.
+
+=head1 NAME
+
+lwp-request, GET, HEAD, POST - Simple WWW user agent
+
+=head1 SYNOPSIS
+
+ lwp-request [-aeEdvhx] [-m method] [-b <base URL>] [-t <timeout>]
+             [-i <if-modified-since>] [-c <content-type>] [-C <credentials>]
+             [-p <proxy-url>] [-o <format>] <url>...
+
+=head1 DESCRIPTION
+
+This program can be used to send requests to WWW servers and your
+local file system. The request content for POST, PUT and CHECKIN
+methods is read from stdin.  The content of the response is printed on
+stdout.  Error messages are printed on stderr.  The program returns a
+status value indicating the number of URLs that failed.
+
+The options are:
+
+=over 4
+
+=item -m <method>
+
+Set which method to use for the request.  If this option is not used,
+then the method is derived from the name of the program.
+
+=item -f
+
+Force request through, even if the program believes that the method is
+illegal.  The server will probably reject the request.
+
+=item -b <url>
+
+This URL will be used as the base URL for the URLs that the method is
+applied to.  The base URL only takes effect for relative URLs.  If you
+do not provide this option and the URLs are relative, then they will
+be treated as files in the local file system.
+
+=item -t <timeout>
+
+Set the timeout value for the requests.  The timeout is the amount of
+time that the program will wait for a response from the remote server
+before it fails.  The default unit for the timeout value is seconds.
+You might append "m" or "h" to the timeout value to make it minutes or
+hours, respectively.  The default timeout is '3m', i.e. 3 minutes.
+
+=item -i <time>
+
+Set the If-Modified-Since header in the request. If I<time> it the
+name of a file, use the modification timestamp for this file. If
+I<time> is not a file, it is parsed as a literal date. Take a look at
+L<HTTP::Date> for recogniced formats.
+
+=item -c <content-type>
+
+Set the Content-Type for the request.  This option is only allowed for
+requests that take a content, i.e. POST, PUT and CHECKIN.  You can
+force methods to take content by using the C<-f> option together with
+C<-c>.  The default Content-Type for POST is
+C<application/x-www-form-urlencoded>.  The default Content-type for
+the others is C<text/plain>.
+
+=item -p <proxy-url>
+
+Set the proxy to be used for the requests.  The program also loads
+proxy settings from the environment.  You can disable this with the
+C<-P> option.
+
+=item -C <username>:<password>
+
+Provide credentials for documents that are protected by Basic
+Authentication.  If the document is protected and you did not specify
+the username and password with this option, then you will be prompted
+to provide these values.
+
+=back
+
+The following options controls what is displayed by the program:
+
+=over 4
+
+=item -u
+
+Print request method and absolute URL as requests are made.
+
+=item -U
+
+Print request headers in addition to request method and absolute URL.
+
+=item -s
+
+Print response status code.  This option is always on for HEAD requests.
+
+=item -S
+
+Print response status chain. This shows redirect and autorization
+requests that are handled by the library.
+
+=item -e
+
+Print response headers.  This option is always on for HEAD requests.
+
+=item -d
+
+Do B<not> print the content of the response.
+
+=item -o <format>
+
+Process HTML content in various ways before printing it.  If the
+content type of the response is not HTML, then this option has no
+effect.  The legal format values are; I<text>, I<ps>, I<links>,
+I<html> and I<dump>.
+
+If you specify the I<text> format then the HTML will be formatted as
+plain latin1 text.  If you specify the I<ps> format then it will be
+formatted as Postscript.
+
+The I<links> format will output all links found in the HTML document.
+Relative links will be expanded to absolute ones.
+
+The I<html> format will reformat the HTML code and the I<dump> format
+will just dump the HTML syntax tree.
+
+=item -v
+
+Print the version number of the program and quit.
+
+=item -h
+
+Print usage message and quit.
+
+=item -x
+
+Extra debugging output.
+
+=item -a
+
+Set text(ascii) mode for content input and output.  If this option is not 
+used, content input and output is done in binary mode.
+
+=back
+
+Because this program is implemented using the LWP library, it will
+only support the protocols that LWP supports.
+
+=head1 SEE ALSO
+
+L<lwp-mirror>, L<LWP>
+
+=head1 COPYRIGHT
+
+Copyright 1995-1997 Gisle Aas.
+
+This library is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+
+=head1 AUTHOR
+
+Gisle Aas <aas@sn.no>
+
+=cut
+
+$progname = $0;
+$progname =~ s,.*/,,;  # use basename only
+$progname =~ s/\.\w*$//; # strip extension, if any
+
+$VERSION = sprintf("%d.%02d", q$Revision: 1.33 $ =~ /(\d+)\.(\d+)/);
+
+
+require LWP;
+require LWP::Debug;
+require URI::URL;
+
+use URI::Heuristic qw(uf_url);
+
+use HTTP::Status qw(status_message);
+use HTTP::Date qw(time2str str2time);
+
+
+# This table lists the methods that are allowed.  It should really be
+# a superset for all methods supported for every scheme that may be
+# supported by the library.  Currently it might be a bit too HTTP
+# specific.  You might use the -f option to force a method through.
+#
+# "" = No content in request, "C" = Needs content in request
+#
+%allowed_methods = (
+    GET        => "",
+    HEAD       => "",
+    POST       => "C",
+    PUT        => "C",
+    DELETE     => "",
+    TRACE      => "",
+    OPTIONS    => "",
+);
+
+
+# We make our own specialization of LWP::UserAgent that asks for
+# user/password if document is protected.
+{
+    package RequestAgent;
+    @ISA = qw(LWP::UserAgent);
+
+    sub new
+    { 
+	my $self = LWP::UserAgent::new(@_);
+	$self->agent("lwp-request/$main::VERSION");
+	$self;
+    }
+
+    sub get_basic_credentials
+    {
+	my($self, $realm, $uri) = @_;
+	if ($main::opt_C) {
+	    return split(':', $main::opt_C, 2);
+	} elsif (-t) {
+	    my $netloc = $uri->netloc;
+	    print "Enter username for $realm at $netloc: ";
+	    my $user = <STDIN>;
+	    chomp($user);
+	    return (undef, undef) unless length $user;
+	    print "Password: ";
+	    system("stty -echo");
+	    my $password = <STDIN>;
+	    system("stty echo");
+	    print "\n";  # because we disabled echo
+	    chomp($password);
+	    return ($user, $password);
+	} else {
+	    return (undef, undef)
+	}
+    }
+}
+
+$method = uc(lc($progname) eq "lwp-request" ? "GET" : $progname);
+
+# Parse command line
+use Getopt::Std;
+
+$opt_a = undef;  # content i/o in text(ascii) mode
+$opt_m = undef;  # set method
+$opt_f = undef;  # make request even if method is not in %allowed_methods
+$opt_b = undef;  # base url
+$opt_t = undef;  # timeout
+$opt_i = undef;  # if-modified-since
+$opt_c = undef;  # content type for POST
+$opt_C = undef;  # credidentials for basic authorization
+
+$opt_u = undef;  # display method, URL and headers of request
+$opt_U = undef;  # display request headers also
+$opt_s = undef;  # display status code
+$opt_S = undef;  # display whole chain of status codes
+$opt_e = undef;  # display response headers (default for HEAD)
+$opt_d = undef;  # don't display content
+
+$opt_h = undef;  # print usage
+$opt_v = undef;  # print version
+
+$opt_x = undef;  # extra debugging info
+$opt_p = undef;  # proxy URL
+$opt_P = undef;  # don't load proxy setting from environment
+
+$opt_o = undef;  # output format
+
+unless (getopts("axhvuUsSedPp:b:t:i:c:C:m:fo:")) {
+    usage();
+}
+
+if ($opt_v) {
+    require LWP;
+    my $DISTNAME = 'libwww-perl-' . LWP::Version();
+    die <<"EOT";
+This is lwp-request version $VERSION ($DISTNAME)
+
+Copyright 1995-1997, Gisle Aas.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+EOT
+}
+
+usage() if $opt_h || !@ARGV;
+
+LWP::Debug::level('+') if $opt_x;
+
+# Create the user agent object
+$ua = new RequestAgent;
+
+# Load proxy settings from *_proxy environment variables.
+$ua->env_proxy unless $opt_P;
+
+$method = uc($opt_m) if defined $opt_m;
+
+if ($opt_f) {
+    if ($opt_c) {
+        $allowed_methods{$method} = "C";  # force content
+    } else {
+        $allowed_methods{$method} = "";
+    }
+} elsif (!defined $allowed_methods{$method}) {
+    die "$progname: $method is not an allowed method\n";
+}
+
+if ($method eq "HEAD") {
+    $opt_s = 1;
+    $opt_e = 1 unless $opt_d;
+    $opt_d = 1;
+}
+
+if (defined $opt_t) {
+    $opt_t =~ /^(\d+)([smh])?/;
+    die "$progname: Illegal timeout value!\n" unless defined $1;
+    $timeout = $1;
+    $timeout *= 60   if ($2 eq "m");
+    $timeout *= 3600 if ($2 eq "h");
+    $ua->timeout($timeout);
+}
+
+if (defined $opt_i) {
+    if (-e $opt_i) {
+        $time = (stat _)[9];
+    } else {
+        $time = str2time($opt_i);
+        die "$progname: Illegal time syntax for -i option\n"
+            unless defined $time;
+    }
+    $opt_i = time2str($time);
+}
+
+$content = undef;
+if ($allowed_methods{$method} eq "C") {
+    # This request needs some content
+    unless (defined $opt_c) {
+        # set default content type
+        $opt_c = ($method eq "POST") ?
+              "application/x-www-form-urlencoded"
+            : "text/plain";
+    } else {
+        die "$progname: Illegal Content-type format\n"
+            unless $opt_c =~ m,^[\w\-]+/[\w\-]+(?:\s*;.*)?$,
+    }
+    print "Please enter content ($opt_c) to be ${method}ed:\n"
+        if -t;
+    binmode STDIN unless -t or $opt_a;
+    $content = join("", <STDIN>);
+} else {
+    die "$progname: Can't set Content-type for $method requests\n"
+        if defined $opt_c;
+}
+
+# Set up a request.  We will use the same request object for all URLs.
+$request = new HTTP::Request $method;
+$request->header('If-Modified-Since', $opt_i) if defined $opt_i;
+#$request->header('Accept', '*/*');
+if ($opt_c) { # will always be set for request that wants content
+    $request->header('Content-Type', $opt_c);
+    $request->header('Content-Length', length $content);  # Not really needed
+    $request->content($content);
+}
+
+
+$errors = 0;
+
+# Ok, now we perform the requests, one URL at a time
+while ($url = shift) {
+    # Create the URL object, but protect us against bad URLs
+    eval {
+	if ($url =~ /^\w+:/ || $opt_b) {  # is there any scheme specification
+	    $url = URI::URL->new($url, $opt_b);
+	} else {
+	    $url = uf_url($url);
+        }
+    };
+    if ($@) {
+	$@ =~ s/at\s+\S+\s+line\s\d+//;
+	print STDERR $@;
+	$errors++;
+	next;
+    }
+
+    $ua->proxy($url->scheme, $opt_p) if $opt_p;
+
+    # Send the request and get a response back from the server
+    $request->url($url);
+    $response = $ua->request($request);
+
+    if ($opt_u || $opt_U) {
+        my $url = $response->request->url->as_string;
+        print "$method $url\n";
+        print $response->request->headers_as_string, "\n" if $opt_U;
+    }
+
+    if ($opt_S) {
+	printResponseChain($response);
+    } elsif ($opt_s) {
+        print $response->status_line, "\n";
+    }
+
+    if ($opt_e) {
+        # Display headers
+        print $response->headers_as_string;
+        print "\n";  # separate headers and content
+    }
+
+    if ($response->is_success) {
+	unless ($opt_d) {
+	    if ($opt_o &&
+		$response->content_type eq 'text/html') {
+		require HTML::Parse;
+		my $html = HTML::Parse::parse_html($response->content);
+		{
+		    $opt_o eq 'ps' && do {
+			require HTML::FormatPS;
+			my $f = new HTML::FormatPS;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'text' && do {
+			require HTML::FormatText;
+			my $f = new HTML::FormatText;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'html' && do {
+			print $html->as_HTML;
+			last;
+		    };
+		    $opt_o eq 'links' && do {
+			my $base = $response->base;
+			for ( @{ $html->extract_links } ) {
+			    my($link, $elem) = @$_;
+			    my $tag = uc $elem->tag;
+			    $link = new URI::URL $link, $base;
+			    print "$tag\t", $link->abs->as_string, "\n";
+			}
+			last;
+		    };
+		    $opt_o eq 'dump' && do {
+			$html->dump;
+			last;
+		    };
+		    # It is bad to not notice this before now :-(
+		    die "Illegal -o option value ($opt_o)\n";
+		}
+	    } else {
+                binmode STDOUT unless $opt_a;
+		print $response->content;
+	    }
+	}
+    } else {
+        print STDERR $response->error_as_HTML unless $opt_d;
+        $errors++;
+    }
+}
+
+exit $errors;
+
+
+sub printResponseChain
+{
+    my($response) = @_;
+    return unless defined $response;
+    printResponseChain($response->previous);
+    my $method = $response->request->method;
+    my $url = $response->request->url->as_string;
+    my $code = $response->code;
+    print "$method $url --> ", $response->status_line, "\n";
+}
+
+
+sub usage
+{
+    die <<"EOT";
+Usage: $progname [-options] <url>...
+    -m <method>   use method for the request (default is '$method')
+    -f            make request even if $progname believes method is illegal
+    -b <base>     Use the specified URL as base
+    -t <timeout>  Set timeout value
+    -i <time>     Set the If-Modified-Since header on the request
+    -c <conttype> use this content-type for POST, PUT, CHECKIN
+    -a            Use text mode for content I/O
+    -p <proxyurl> use this as a proxy
+    -P            don't load proxy settings from environment
+
+    -u            Display method and URL before any response
+    -U            Display request headers (implies -u)
+    -s            Display response status code
+    -S            Display response status chain
+    -e            Display response headers
+    -d            Do not display content
+    -o <format>   Process HTML content in various ways
+
+    -v            Show program version
+    -h            Print this message
+
+    -x            Extra debugging output
+EOT
+}
diff --git a/tools/Perl/bin/POST b/tools/Perl/bin/POST
new file mode 100644
index 000000000..1207cd7fe
--- /dev/null
+++ b/tools/Perl/bin/POST
@@ -0,0 +1,505 @@
+#!perl -w
+
+# $Id: lwp-request.PL,v 1.33 1998/08/04 09:18:11 aas Exp $
+#
+# Simple user agent using LWP library.
+
+=head1 NAME
+
+lwp-request, GET, HEAD, POST - Simple WWW user agent
+
+=head1 SYNOPSIS
+
+ lwp-request [-aeEdvhx] [-m method] [-b <base URL>] [-t <timeout>]
+             [-i <if-modified-since>] [-c <content-type>] [-C <credentials>]
+             [-p <proxy-url>] [-o <format>] <url>...
+
+=head1 DESCRIPTION
+
+This program can be used to send requests to WWW servers and your
+local file system. The request content for POST, PUT and CHECKIN
+methods is read from stdin.  The content of the response is printed on
+stdout.  Error messages are printed on stderr.  The program returns a
+status value indicating the number of URLs that failed.
+
+The options are:
+
+=over 4
+
+=item -m <method>
+
+Set which method to use for the request.  If this option is not used,
+then the method is derived from the name of the program.
+
+=item -f
+
+Force request through, even if the program believes that the method is
+illegal.  The server will probably reject the request.
+
+=item -b <url>
+
+This URL will be used as the base URL for the URLs that the method is
+applied to.  The base URL only takes effect for relative URLs.  If you
+do not provide this option and the URLs are relative, then they will
+be treated as files in the local file system.
+
+=item -t <timeout>
+
+Set the timeout value for the requests.  The timeout is the amount of
+time that the program will wait for a response from the remote server
+before it fails.  The default unit for the timeout value is seconds.
+You might append "m" or "h" to the timeout value to make it minutes or
+hours, respectively.  The default timeout is '3m', i.e. 3 minutes.
+
+=item -i <time>
+
+Set the If-Modified-Since header in the request. If I<time> it the
+name of a file, use the modification timestamp for this file. If
+I<time> is not a file, it is parsed as a literal date. Take a look at
+L<HTTP::Date> for recogniced formats.
+
+=item -c <content-type>
+
+Set the Content-Type for the request.  This option is only allowed for
+requests that take a content, i.e. POST, PUT and CHECKIN.  You can
+force methods to take content by using the C<-f> option together with
+C<-c>.  The default Content-Type for POST is
+C<application/x-www-form-urlencoded>.  The default Content-type for
+the others is C<text/plain>.
+
+=item -p <proxy-url>
+
+Set the proxy to be used for the requests.  The program also loads
+proxy settings from the environment.  You can disable this with the
+C<-P> option.
+
+=item -C <username>:<password>
+
+Provide credentials for documents that are protected by Basic
+Authentication.  If the document is protected and you did not specify
+the username and password with this option, then you will be prompted
+to provide these values.
+
+=back
+
+The following options controls what is displayed by the program:
+
+=over 4
+
+=item -u
+
+Print request method and absolute URL as requests are made.
+
+=item -U
+
+Print request headers in addition to request method and absolute URL.
+
+=item -s
+
+Print response status code.  This option is always on for HEAD requests.
+
+=item -S
+
+Print response status chain. This shows redirect and autorization
+requests that are handled by the library.
+
+=item -e
+
+Print response headers.  This option is always on for HEAD requests.
+
+=item -d
+
+Do B<not> print the content of the response.
+
+=item -o <format>
+
+Process HTML content in various ways before printing it.  If the
+content type of the response is not HTML, then this option has no
+effect.  The legal format values are; I<text>, I<ps>, I<links>,
+I<html> and I<dump>.
+
+If you specify the I<text> format then the HTML will be formatted as
+plain latin1 text.  If you specify the I<ps> format then it will be
+formatted as Postscript.
+
+The I<links> format will output all links found in the HTML document.
+Relative links will be expanded to absolute ones.
+
+The I<html> format will reformat the HTML code and the I<dump> format
+will just dump the HTML syntax tree.
+
+=item -v
+
+Print the version number of the program and quit.
+
+=item -h
+
+Print usage message and quit.
+
+=item -x
+
+Extra debugging output.
+
+=item -a
+
+Set text(ascii) mode for content input and output.  If this option is not 
+used, content input and output is done in binary mode.
+
+=back
+
+Because this program is implemented using the LWP library, it will
+only support the protocols that LWP supports.
+
+=head1 SEE ALSO
+
+L<lwp-mirror>, L<LWP>
+
+=head1 COPYRIGHT
+
+Copyright 1995-1997 Gisle Aas.
+
+This library is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+
+=head1 AUTHOR
+
+Gisle Aas <aas@sn.no>
+
+=cut
+
+$progname = $0;
+$progname =~ s,.*/,,;  # use basename only
+$progname =~ s/\.\w*$//; # strip extension, if any
+
+$VERSION = sprintf("%d.%02d", q$Revision: 1.33 $ =~ /(\d+)\.(\d+)/);
+
+
+require LWP;
+require LWP::Debug;
+require URI::URL;
+
+use URI::Heuristic qw(uf_url);
+
+use HTTP::Status qw(status_message);
+use HTTP::Date qw(time2str str2time);
+
+
+# This table lists the methods that are allowed.  It should really be
+# a superset for all methods supported for every scheme that may be
+# supported by the library.  Currently it might be a bit too HTTP
+# specific.  You might use the -f option to force a method through.
+#
+# "" = No content in request, "C" = Needs content in request
+#
+%allowed_methods = (
+    GET        => "",
+    HEAD       => "",
+    POST       => "C",
+    PUT        => "C",
+    DELETE     => "",
+    TRACE      => "",
+    OPTIONS    => "",
+);
+
+
+# We make our own specialization of LWP::UserAgent that asks for
+# user/password if document is protected.
+{
+    package RequestAgent;
+    @ISA = qw(LWP::UserAgent);
+
+    sub new
+    { 
+	my $self = LWP::UserAgent::new(@_);
+	$self->agent("lwp-request/$main::VERSION");
+	$self;
+    }
+
+    sub get_basic_credentials
+    {
+	my($self, $realm, $uri) = @_;
+	if ($main::opt_C) {
+	    return split(':', $main::opt_C, 2);
+	} elsif (-t) {
+	    my $netloc = $uri->netloc;
+	    print "Enter username for $realm at $netloc: ";
+	    my $user = <STDIN>;
+	    chomp($user);
+	    return (undef, undef) unless length $user;
+	    print "Password: ";
+	    system("stty -echo");
+	    my $password = <STDIN>;
+	    system("stty echo");
+	    print "\n";  # because we disabled echo
+	    chomp($password);
+	    return ($user, $password);
+	} else {
+	    return (undef, undef)
+	}
+    }
+}
+
+$method = uc(lc($progname) eq "lwp-request" ? "GET" : $progname);
+
+# Parse command line
+use Getopt::Std;
+
+$opt_a = undef;  # content i/o in text(ascii) mode
+$opt_m = undef;  # set method
+$opt_f = undef;  # make request even if method is not in %allowed_methods
+$opt_b = undef;  # base url
+$opt_t = undef;  # timeout
+$opt_i = undef;  # if-modified-since
+$opt_c = undef;  # content type for POST
+$opt_C = undef;  # credidentials for basic authorization
+
+$opt_u = undef;  # display method, URL and headers of request
+$opt_U = undef;  # display request headers also
+$opt_s = undef;  # display status code
+$opt_S = undef;  # display whole chain of status codes
+$opt_e = undef;  # display response headers (default for HEAD)
+$opt_d = undef;  # don't display content
+
+$opt_h = undef;  # print usage
+$opt_v = undef;  # print version
+
+$opt_x = undef;  # extra debugging info
+$opt_p = undef;  # proxy URL
+$opt_P = undef;  # don't load proxy setting from environment
+
+$opt_o = undef;  # output format
+
+unless (getopts("axhvuUsSedPp:b:t:i:c:C:m:fo:")) {
+    usage();
+}
+
+if ($opt_v) {
+    require LWP;
+    my $DISTNAME = 'libwww-perl-' . LWP::Version();
+    die <<"EOT";
+This is lwp-request version $VERSION ($DISTNAME)
+
+Copyright 1995-1997, Gisle Aas.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+EOT
+}
+
+usage() if $opt_h || !@ARGV;
+
+LWP::Debug::level('+') if $opt_x;
+
+# Create the user agent object
+$ua = new RequestAgent;
+
+# Load proxy settings from *_proxy environment variables.
+$ua->env_proxy unless $opt_P;
+
+$method = uc($opt_m) if defined $opt_m;
+
+if ($opt_f) {
+    if ($opt_c) {
+        $allowed_methods{$method} = "C";  # force content
+    } else {
+        $allowed_methods{$method} = "";
+    }
+} elsif (!defined $allowed_methods{$method}) {
+    die "$progname: $method is not an allowed method\n";
+}
+
+if ($method eq "HEAD") {
+    $opt_s = 1;
+    $opt_e = 1 unless $opt_d;
+    $opt_d = 1;
+}
+
+if (defined $opt_t) {
+    $opt_t =~ /^(\d+)([smh])?/;
+    die "$progname: Illegal timeout value!\n" unless defined $1;
+    $timeout = $1;
+    $timeout *= 60   if ($2 eq "m");
+    $timeout *= 3600 if ($2 eq "h");
+    $ua->timeout($timeout);
+}
+
+if (defined $opt_i) {
+    if (-e $opt_i) {
+        $time = (stat _)[9];
+    } else {
+        $time = str2time($opt_i);
+        die "$progname: Illegal time syntax for -i option\n"
+            unless defined $time;
+    }
+    $opt_i = time2str($time);
+}
+
+$content = undef;
+if ($allowed_methods{$method} eq "C") {
+    # This request needs some content
+    unless (defined $opt_c) {
+        # set default content type
+        $opt_c = ($method eq "POST") ?
+              "application/x-www-form-urlencoded"
+            : "text/plain";
+    } else {
+        die "$progname: Illegal Content-type format\n"
+            unless $opt_c =~ m,^[\w\-]+/[\w\-]+(?:\s*;.*)?$,
+    }
+    print "Please enter content ($opt_c) to be ${method}ed:\n"
+        if -t;
+    binmode STDIN unless -t or $opt_a;
+    $content = join("", <STDIN>);
+} else {
+    die "$progname: Can't set Content-type for $method requests\n"
+        if defined $opt_c;
+}
+
+# Set up a request.  We will use the same request object for all URLs.
+$request = new HTTP::Request $method;
+$request->header('If-Modified-Since', $opt_i) if defined $opt_i;
+#$request->header('Accept', '*/*');
+if ($opt_c) { # will always be set for request that wants content
+    $request->header('Content-Type', $opt_c);
+    $request->header('Content-Length', length $content);  # Not really needed
+    $request->content($content);
+}
+
+
+$errors = 0;
+
+# Ok, now we perform the requests, one URL at a time
+while ($url = shift) {
+    # Create the URL object, but protect us against bad URLs
+    eval {
+	if ($url =~ /^\w+:/ || $opt_b) {  # is there any scheme specification
+	    $url = URI::URL->new($url, $opt_b);
+	} else {
+	    $url = uf_url($url);
+        }
+    };
+    if ($@) {
+	$@ =~ s/at\s+\S+\s+line\s\d+//;
+	print STDERR $@;
+	$errors++;
+	next;
+    }
+
+    $ua->proxy($url->scheme, $opt_p) if $opt_p;
+
+    # Send the request and get a response back from the server
+    $request->url($url);
+    $response = $ua->request($request);
+
+    if ($opt_u || $opt_U) {
+        my $url = $response->request->url->as_string;
+        print "$method $url\n";
+        print $response->request->headers_as_string, "\n" if $opt_U;
+    }
+
+    if ($opt_S) {
+	printResponseChain($response);
+    } elsif ($opt_s) {
+        print $response->status_line, "\n";
+    }
+
+    if ($opt_e) {
+        # Display headers
+        print $response->headers_as_string;
+        print "\n";  # separate headers and content
+    }
+
+    if ($response->is_success) {
+	unless ($opt_d) {
+	    if ($opt_o &&
+		$response->content_type eq 'text/html') {
+		require HTML::Parse;
+		my $html = HTML::Parse::parse_html($response->content);
+		{
+		    $opt_o eq 'ps' && do {
+			require HTML::FormatPS;
+			my $f = new HTML::FormatPS;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'text' && do {
+			require HTML::FormatText;
+			my $f = new HTML::FormatText;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'html' && do {
+			print $html->as_HTML;
+			last;
+		    };
+		    $opt_o eq 'links' && do {
+			my $base = $response->base;
+			for ( @{ $html->extract_links } ) {
+			    my($link, $elem) = @$_;
+			    my $tag = uc $elem->tag;
+			    $link = new URI::URL $link, $base;
+			    print "$tag\t", $link->abs->as_string, "\n";
+			}
+			last;
+		    };
+		    $opt_o eq 'dump' && do {
+			$html->dump;
+			last;
+		    };
+		    # It is bad to not notice this before now :-(
+		    die "Illegal -o option value ($opt_o)\n";
+		}
+	    } else {
+                binmode STDOUT unless $opt_a;
+		print $response->content;
+	    }
+	}
+    } else {
+        print STDERR $response->error_as_HTML unless $opt_d;
+        $errors++;
+    }
+}
+
+exit $errors;
+
+
+sub printResponseChain
+{
+    my($response) = @_;
+    return unless defined $response;
+    printResponseChain($response->previous);
+    my $method = $response->request->method;
+    my $url = $response->request->url->as_string;
+    my $code = $response->code;
+    print "$method $url --> ", $response->status_line, "\n";
+}
+
+
+sub usage
+{
+    die <<"EOT";
+Usage: $progname [-options] <url>...
+    -m <method>   use method for the request (default is '$method')
+    -f            make request even if $progname believes method is illegal
+    -b <base>     Use the specified URL as base
+    -t <timeout>  Set timeout value
+    -i <time>     Set the If-Modified-Since header on the request
+    -c <conttype> use this content-type for POST, PUT, CHECKIN
+    -a            Use text mode for content I/O
+    -p <proxyurl> use this as a proxy
+    -P            don't load proxy settings from environment
+
+    -u            Display method and URL before any response
+    -U            Display request headers (implies -u)
+    -s            Display response status code
+    -S            Display response status chain
+    -e            Display response headers
+    -d            Do not display content
+    -o <format>   Process HTML content in various ways
+
+    -v            Show program version
+    -h            Print this message
+
+    -x            Extra debugging output
+EOT
+}
diff --git a/tools/Perl/bin/PerlCRT.dll b/tools/Perl/bin/PerlCRT.dll
new file mode 100644
index 000000000..4fecb3c0b
Binary files /dev/null and b/tools/Perl/bin/PerlCRT.dll differ
diff --git a/tools/Perl/bin/PerlEz.dll b/tools/Perl/bin/PerlEz.dll
new file mode 100644
index 000000000..f86d73360
Binary files /dev/null and b/tools/Perl/bin/PerlEz.dll differ
diff --git a/tools/Perl/bin/PerlMsg.dll b/tools/Perl/bin/PerlMsg.dll
new file mode 100644
index 000000000..5785e69bb
Binary files /dev/null and b/tools/Perl/bin/PerlMsg.dll differ
diff --git a/tools/Perl/bin/PerlSE.dll b/tools/Perl/bin/PerlSE.dll
new file mode 100644
index 000000000..c72f805c7
Binary files /dev/null and b/tools/Perl/bin/PerlSE.dll differ
diff --git a/tools/Perl/bin/PerlSE.pl b/tools/Perl/bin/PerlSE.pl
new file mode 100644
index 000000000..684b8e91f
Binary files /dev/null and b/tools/Perl/bin/PerlSE.pl differ
diff --git a/tools/Perl/bin/a2p.exe b/tools/Perl/bin/a2p.exe
new file mode 100644
index 000000000..85cc81226
Binary files /dev/null and b/tools/Perl/bin/a2p.exe differ
diff --git a/tools/Perl/bin/lwp-download b/tools/Perl/bin/lwp-download
new file mode 100644
index 000000000..a496980f7
--- /dev/null
+++ b/tools/Perl/bin/lwp-download
@@ -0,0 +1,232 @@
+#!perl -w
+
+# $Id: lwp-download.PL,v 1.7 1998/08/04 09:03:35 aas Exp $
+
+=head1 NAME
+
+lwp-download - fetch large files from the net
+
+=head1 SYNOPSIS
+
+ lwp-download [-a] <url> [<local file>]
+
+=head1 DESCRIPTION
+
+The I<lwp-download> program will down load the document specified by the URL
+given as the first command line argument to a local file.  The local
+filename used to save the document is guessed from the URL unless
+specified as the second command line argument.
+
+The I<lwp-download> program is implemented using the I<libwww-perl>
+library.  It is better suited to down load big files than the
+I<lwp-request> program because it does not store the file in memory.
+Another benefit is that it will keep you updated about its progress
+and that you don't have much options to worry about.
+
+Use the C<-a> option to save the file in text (ascii) mode.  Might make a
+difference on dosish systems.
+
+=head1 EXAMPLE
+
+Fetch the newest and greatest perl version:
+
+ $ lwp-download http://www.perl.com/CPAN/src/latest.tar.gz
+ Saving to 'latest.tar.gz'...
+ 1.47 MB received in 22 seconds (68.7 KB/sec)
+
+=head1 AUTHOR
+
+Gisle Aas <gisle@aas.no>
+
+=cut
+
+use LWP::UserAgent;
+use LWP::MediaTypes;
+use URI::URL;
+use strict;
+
+my $progname = $0;
+$progname =~ s,.*/,,;    # only basename left in progname
+$progname =~ s/\.\w*$//; # strip extension if any
+
+#parse option
+use Getopt::Std;
+my %opts;
+unless (getopts('a', \%opts)) {
+    usage();
+}
+my $opt_a = $opts{a}; # save in binary mode
+
+my $url = url(shift || usage());
+my $argfile = shift;
+
+my $ua = new LWP::UserAgent;
+
+$ua->agent("lwp-download/0.1 " . $ua->agent);
+$ua->env_proxy;
+
+my $req = new HTTP::Request GET => $url;
+
+my $file;      # name of file we download into
+my $length;    # total number of bytes to download
+my $flength;   # formatted length
+my $size = 0;  # number of bytes received
+my $start_t;   # start time of download
+my $last_dur;  # time of last callback
+
+my $shown = 0; # have we called the show() function yet
+
+$SIG{INT} = sub { die "Interrupted\n"; };
+
+$| = 1;  # autoflush
+
+my $res = $ua->request($req,
+  sub {
+      unless($file) {
+	  my $res = $_[1];
+	  unless ($argfile) {
+	      # must find a suitable name to use.  First thing
+	      # to do is to look for the "Content-Disposition"
+	      # header defined by RFC1806.  This is also supported
+	      # by Netscape
+	      my $cd = $res->header("Content-Disposition");
+	      if ($cd && $cd =~ /\bfilename\s*=\s*(\S+)/) {
+		  $file = $1;
+		  $file =~ s/;$//;
+		  $file =~ s/^([\"\'])(.*)\1$/$2/;
+	      }
+		
+	      # if this fails we try to make something from the URL
+	      unless ($file) {
+		  my $req = $res->request;  # now always there
+		  my $rurl = $req ? $req->url : $url;
+		  
+		  $file = ($rurl->path_components)[-1];
+		  unless (length $file) {
+		      $file = "index";
+		      my $suffix = media_suffix($res->content_type);
+		      $file .= ".$suffix" if $suffix;
+		  } elsif ($rurl->scheme eq 'ftp' ||
+			   $file =~ /\.tgz$/      ||
+			   $file =~ /\.tar(\.(Z|gz))?$/
+			  ) {
+		      # leave the filename as it was
+		  } else {
+		      my $ct = guess_media_type($file);
+		      unless ($ct eq $res->content_type) {
+			  # need a better suffix for this type
+			  my $suffix = media_suffix($res->content_type);
+			  $file .= ".$suffix" if $suffix;
+		      }
+		  }
+	      }
+
+	      # Check if the file is already present
+	      if (-f $file && -t) {
+		  print "Overwrite $file? [y] ";
+		  my $ans = <STDIN>;
+		  exit if !defined($ans) || !($ans =~ /^y?\n/);
+	      } else {
+		  print "Saving to '$file'...\n";
+	      }
+	  } else {
+	      $file = $argfile;
+	  }
+	  open(FILE, ">$file") || die "Can't open $file: $!";
+          binmode FILE unless $opt_a;
+	  $length = $res->content_length;
+	  $flength = fbytes($length) if defined $length;
+	  $start_t = time;
+	  $last_dur = 0;
+      }
+      $size += length($_[0]);
+      print FILE $_[0];
+      if (defined $length) {
+	  my $dur  = time - $start_t;
+	  if ($dur != $last_dur) {  # don't update too often
+	      $last_dur = $dur;
+	      my $perc = $size / $length;
+	      my $speed;
+	      $speed = fbytes($size/$dur) . "/sec" if $dur > 3;
+	      my $secs_left = fduration($dur/$perc - $dur);
+	      $perc = int($perc*100);
+	      my $show = "$perc% of $flength";
+	      $show .= " (at $speed, $secs_left remaining)" if $speed;
+	      show($show);
+	  }
+      } else {
+	  show( fbytes($size) . " received");
+      }
+  }
+);
+
+if ($res->is_success || $res->message =~ /^Interrupted/) {
+    show("");  # clear text
+    print "\r";
+    print fbytes($size);
+    print " of ", fbytes($length) if defined($length) && $length != $size;
+    print " received";
+    my $dur = time - $start_t;
+    if ($dur) {
+	my $speed = fbytes($size/$dur) . "/sec";
+	print " in ", fduration($dur), " ($speed)";
+    }
+    print "\n";
+    my $died = $res->header("X-Died");
+    if ($died || !$res->is_success) {
+	if (-t) {
+	    print "Transfer aborted.  Delete $file? [n] ";
+	    my $ans = <STDIN>;
+	    unlink($file) if defined($ans) && $ans =~ /^y\n/;
+	} else {
+	    print "Transfer aborted, $file kept\n";
+	}
+    }
+} else {
+    print "\n" if $shown;
+    print "$progname: Can't download: ", $res->code, " ", $res->message, "\n";
+    exit 1;
+}
+
+
+sub fbytes
+{
+    my $n = int(shift);
+    if ($n >= 1024 * 1024) {
+	return sprintf "%.3g MB", $n / (1024.0 * 1024);
+    } elsif ($n >= 1024) {
+	return sprintf "%.3g KB", $n / 1024.0;
+    } else {
+	return "$n bytes";
+    }
+}
+
+sub fduration
+{
+    use integer;
+    my $secs = int(shift);
+    my $hours = $secs / (60*60);
+    $secs -= $hours * 60*60;
+    my $mins = $secs / 60;
+    $secs %= 60;
+    if ($hours) {
+	return "$hours hours $mins minutes";
+    } elsif ($mins >= 2) {
+	return "$mins minutes";
+    } else {
+	$secs += $mins * 60;
+	return "$secs seconds";
+    }
+}
+
+sub show
+{
+    my $mess = shift;
+    print "\r$mess", (" " x (75 - length $mess));
+    $shown++;
+}
+
+sub usage
+{
+    die "Usage: $progname [-a] <url> [<lpath>]\n";
+}
diff --git a/tools/Perl/bin/lwp-mirror b/tools/Perl/bin/lwp-mirror
new file mode 100644
index 000000000..f6a72697c
--- /dev/null
+++ b/tools/Perl/bin/lwp-mirror
@@ -0,0 +1,104 @@
+#!perl -w
+
+# $Id: lwp-mirror.PL,v 1.18 1997/12/03 21:21:00 aas Exp $
+#
+# Simple mirror utility using LWP
+
+=head1 NAME
+
+lwp-mirror - Simple mirror utility for WWW
+
+=head1 SYNOPSIS
+
+ lwp-mirror [-v] [-t timeout] <url> <local file>
+
+=head1 DESCRIPTION
+
+This program can be used to mirror a document from a WWW server.  The
+document is only transfered if the remote copy is newer than the local
+copy.  If the local copy is newer nothing happens.
+
+Use the C<-v> option to print the version number of this program.
+
+The timeout value specified with the C<-t> option.  The timeout value
+is the time that the program will wait for response from the remote
+server before it fails.  The default unit for the timeout value is
+seconds.  You might append "m" or "h" to the timeout value to make it
+minutes or hours, repectively.
+
+Because this program is implemented using the LWP library, it only
+supports the protocols that LWP supports.
+
+=head1 SEE ALSO
+
+L<lwp-request>, L<LWP>
+
+=head1 AUTHOR
+
+Gisle Aas <aas@a.sn.no>
+
+=cut
+
+
+use LWP::Simple;
+use Getopt::Std;
+
+$progname = $0;
+$progname =~ s,.*/,,;  # use basename only
+$progname =~ s/\.\w*$//; #strip extension if any
+
+$VERSION = sprintf("%d.%02d", q$Revision: 1.18 $ =~ /(\d+)\.(\d+)/);
+
+$opt_h = undef;  # print usage
+$opt_v = undef;  # print version
+$opt_t = undef;  # timeout
+
+unless (getopts("hvt:")) {
+    usage();
+}
+
+if ($opt_v) {
+    require LWP;
+    my $DISTNAME = 'libwww-perl-' . LWP::Version();
+    die <<"EOT";
+This is lwp-mirror version $VERSION ($DISTNAME)
+
+Copyright 1995-1996, Gisle Aas.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+EOT
+}
+
+$url  = shift or usage();
+$file = shift or usage();
+usage() if $opt_h or @ARGV;
+
+if (defined $opt_t) {
+    $opt_t =~ /^(\d+)([smh])?/;
+    die "$progname: Illegal timeout value!\n" unless defined $1;
+    $timeout = $1;
+    $timeout *= 60   if ($2 eq "m");
+    $timeout *= 3600 if ($2 eq "h");
+    $LWP::Simple::ua->timeout($timeout);
+}
+
+$rc = mirror($url, $file);
+
+if ($rc == 304) {
+    print STDERR "$progname: $file is up to date\n"
+} elsif (!is_success($rc)) {
+    print STDERR "$progname: $rc ", status_message($rc), "   ($url)\n";
+    exit 1;
+}
+exit;
+
+
+sub usage
+{
+    die <<"EOT";
+Usage: $progname [-options] <url> <file>
+    -v           print version number of program
+    -t <timeout> Set timeout value
+EOT
+}
diff --git a/tools/Perl/bin/lwp-request b/tools/Perl/bin/lwp-request
new file mode 100644
index 000000000..1207cd7fe
--- /dev/null
+++ b/tools/Perl/bin/lwp-request
@@ -0,0 +1,505 @@
+#!perl -w
+
+# $Id: lwp-request.PL,v 1.33 1998/08/04 09:18:11 aas Exp $
+#
+# Simple user agent using LWP library.
+
+=head1 NAME
+
+lwp-request, GET, HEAD, POST - Simple WWW user agent
+
+=head1 SYNOPSIS
+
+ lwp-request [-aeEdvhx] [-m method] [-b <base URL>] [-t <timeout>]
+             [-i <if-modified-since>] [-c <content-type>] [-C <credentials>]
+             [-p <proxy-url>] [-o <format>] <url>...
+
+=head1 DESCRIPTION
+
+This program can be used to send requests to WWW servers and your
+local file system. The request content for POST, PUT and CHECKIN
+methods is read from stdin.  The content of the response is printed on
+stdout.  Error messages are printed on stderr.  The program returns a
+status value indicating the number of URLs that failed.
+
+The options are:
+
+=over 4
+
+=item -m <method>
+
+Set which method to use for the request.  If this option is not used,
+then the method is derived from the name of the program.
+
+=item -f
+
+Force request through, even if the program believes that the method is
+illegal.  The server will probably reject the request.
+
+=item -b <url>
+
+This URL will be used as the base URL for the URLs that the method is
+applied to.  The base URL only takes effect for relative URLs.  If you
+do not provide this option and the URLs are relative, then they will
+be treated as files in the local file system.
+
+=item -t <timeout>
+
+Set the timeout value for the requests.  The timeout is the amount of
+time that the program will wait for a response from the remote server
+before it fails.  The default unit for the timeout value is seconds.
+You might append "m" or "h" to the timeout value to make it minutes or
+hours, respectively.  The default timeout is '3m', i.e. 3 minutes.
+
+=item -i <time>
+
+Set the If-Modified-Since header in the request. If I<time> it the
+name of a file, use the modification timestamp for this file. If
+I<time> is not a file, it is parsed as a literal date. Take a look at
+L<HTTP::Date> for recogniced formats.
+
+=item -c <content-type>
+
+Set the Content-Type for the request.  This option is only allowed for
+requests that take a content, i.e. POST, PUT and CHECKIN.  You can
+force methods to take content by using the C<-f> option together with
+C<-c>.  The default Content-Type for POST is
+C<application/x-www-form-urlencoded>.  The default Content-type for
+the others is C<text/plain>.
+
+=item -p <proxy-url>
+
+Set the proxy to be used for the requests.  The program also loads
+proxy settings from the environment.  You can disable this with the
+C<-P> option.
+
+=item -C <username>:<password>
+
+Provide credentials for documents that are protected by Basic
+Authentication.  If the document is protected and you did not specify
+the username and password with this option, then you will be prompted
+to provide these values.
+
+=back
+
+The following options controls what is displayed by the program:
+
+=over 4
+
+=item -u
+
+Print request method and absolute URL as requests are made.
+
+=item -U
+
+Print request headers in addition to request method and absolute URL.
+
+=item -s
+
+Print response status code.  This option is always on for HEAD requests.
+
+=item -S
+
+Print response status chain. This shows redirect and autorization
+requests that are handled by the library.
+
+=item -e
+
+Print response headers.  This option is always on for HEAD requests.
+
+=item -d
+
+Do B<not> print the content of the response.
+
+=item -o <format>
+
+Process HTML content in various ways before printing it.  If the
+content type of the response is not HTML, then this option has no
+effect.  The legal format values are; I<text>, I<ps>, I<links>,
+I<html> and I<dump>.
+
+If you specify the I<text> format then the HTML will be formatted as
+plain latin1 text.  If you specify the I<ps> format then it will be
+formatted as Postscript.
+
+The I<links> format will output all links found in the HTML document.
+Relative links will be expanded to absolute ones.
+
+The I<html> format will reformat the HTML code and the I<dump> format
+will just dump the HTML syntax tree.
+
+=item -v
+
+Print the version number of the program and quit.
+
+=item -h
+
+Print usage message and quit.
+
+=item -x
+
+Extra debugging output.
+
+=item -a
+
+Set text(ascii) mode for content input and output.  If this option is not 
+used, content input and output is done in binary mode.
+
+=back
+
+Because this program is implemented using the LWP library, it will
+only support the protocols that LWP supports.
+
+=head1 SEE ALSO
+
+L<lwp-mirror>, L<LWP>
+
+=head1 COPYRIGHT
+
+Copyright 1995-1997 Gisle Aas.
+
+This library is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+
+=head1 AUTHOR
+
+Gisle Aas <aas@sn.no>
+
+=cut
+
+$progname = $0;
+$progname =~ s,.*/,,;  # use basename only
+$progname =~ s/\.\w*$//; # strip extension, if any
+
+$VERSION = sprintf("%d.%02d", q$Revision: 1.33 $ =~ /(\d+)\.(\d+)/);
+
+
+require LWP;
+require LWP::Debug;
+require URI::URL;
+
+use URI::Heuristic qw(uf_url);
+
+use HTTP::Status qw(status_message);
+use HTTP::Date qw(time2str str2time);
+
+
+# This table lists the methods that are allowed.  It should really be
+# a superset for all methods supported for every scheme that may be
+# supported by the library.  Currently it might be a bit too HTTP
+# specific.  You might use the -f option to force a method through.
+#
+# "" = No content in request, "C" = Needs content in request
+#
+%allowed_methods = (
+    GET        => "",
+    HEAD       => "",
+    POST       => "C",
+    PUT        => "C",
+    DELETE     => "",
+    TRACE      => "",
+    OPTIONS    => "",
+);
+
+
+# We make our own specialization of LWP::UserAgent that asks for
+# user/password if document is protected.
+{
+    package RequestAgent;
+    @ISA = qw(LWP::UserAgent);
+
+    sub new
+    { 
+	my $self = LWP::UserAgent::new(@_);
+	$self->agent("lwp-request/$main::VERSION");
+	$self;
+    }
+
+    sub get_basic_credentials
+    {
+	my($self, $realm, $uri) = @_;
+	if ($main::opt_C) {
+	    return split(':', $main::opt_C, 2);
+	} elsif (-t) {
+	    my $netloc = $uri->netloc;
+	    print "Enter username for $realm at $netloc: ";
+	    my $user = <STDIN>;
+	    chomp($user);
+	    return (undef, undef) unless length $user;
+	    print "Password: ";
+	    system("stty -echo");
+	    my $password = <STDIN>;
+	    system("stty echo");
+	    print "\n";  # because we disabled echo
+	    chomp($password);
+	    return ($user, $password);
+	} else {
+	    return (undef, undef)
+	}
+    }
+}
+
+$method = uc(lc($progname) eq "lwp-request" ? "GET" : $progname);
+
+# Parse command line
+use Getopt::Std;
+
+$opt_a = undef;  # content i/o in text(ascii) mode
+$opt_m = undef;  # set method
+$opt_f = undef;  # make request even if method is not in %allowed_methods
+$opt_b = undef;  # base url
+$opt_t = undef;  # timeout
+$opt_i = undef;  # if-modified-since
+$opt_c = undef;  # content type for POST
+$opt_C = undef;  # credidentials for basic authorization
+
+$opt_u = undef;  # display method, URL and headers of request
+$opt_U = undef;  # display request headers also
+$opt_s = undef;  # display status code
+$opt_S = undef;  # display whole chain of status codes
+$opt_e = undef;  # display response headers (default for HEAD)
+$opt_d = undef;  # don't display content
+
+$opt_h = undef;  # print usage
+$opt_v = undef;  # print version
+
+$opt_x = undef;  # extra debugging info
+$opt_p = undef;  # proxy URL
+$opt_P = undef;  # don't load proxy setting from environment
+
+$opt_o = undef;  # output format
+
+unless (getopts("axhvuUsSedPp:b:t:i:c:C:m:fo:")) {
+    usage();
+}
+
+if ($opt_v) {
+    require LWP;
+    my $DISTNAME = 'libwww-perl-' . LWP::Version();
+    die <<"EOT";
+This is lwp-request version $VERSION ($DISTNAME)
+
+Copyright 1995-1997, Gisle Aas.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+EOT
+}
+
+usage() if $opt_h || !@ARGV;
+
+LWP::Debug::level('+') if $opt_x;
+
+# Create the user agent object
+$ua = new RequestAgent;
+
+# Load proxy settings from *_proxy environment variables.
+$ua->env_proxy unless $opt_P;
+
+$method = uc($opt_m) if defined $opt_m;
+
+if ($opt_f) {
+    if ($opt_c) {
+        $allowed_methods{$method} = "C";  # force content
+    } else {
+        $allowed_methods{$method} = "";
+    }
+} elsif (!defined $allowed_methods{$method}) {
+    die "$progname: $method is not an allowed method\n";
+}
+
+if ($method eq "HEAD") {
+    $opt_s = 1;
+    $opt_e = 1 unless $opt_d;
+    $opt_d = 1;
+}
+
+if (defined $opt_t) {
+    $opt_t =~ /^(\d+)([smh])?/;
+    die "$progname: Illegal timeout value!\n" unless defined $1;
+    $timeout = $1;
+    $timeout *= 60   if ($2 eq "m");
+    $timeout *= 3600 if ($2 eq "h");
+    $ua->timeout($timeout);
+}
+
+if (defined $opt_i) {
+    if (-e $opt_i) {
+        $time = (stat _)[9];
+    } else {
+        $time = str2time($opt_i);
+        die "$progname: Illegal time syntax for -i option\n"
+            unless defined $time;
+    }
+    $opt_i = time2str($time);
+}
+
+$content = undef;
+if ($allowed_methods{$method} eq "C") {
+    # This request needs some content
+    unless (defined $opt_c) {
+        # set default content type
+        $opt_c = ($method eq "POST") ?
+              "application/x-www-form-urlencoded"
+            : "text/plain";
+    } else {
+        die "$progname: Illegal Content-type format\n"
+            unless $opt_c =~ m,^[\w\-]+/[\w\-]+(?:\s*;.*)?$,
+    }
+    print "Please enter content ($opt_c) to be ${method}ed:\n"
+        if -t;
+    binmode STDIN unless -t or $opt_a;
+    $content = join("", <STDIN>);
+} else {
+    die "$progname: Can't set Content-type for $method requests\n"
+        if defined $opt_c;
+}
+
+# Set up a request.  We will use the same request object for all URLs.
+$request = new HTTP::Request $method;
+$request->header('If-Modified-Since', $opt_i) if defined $opt_i;
+#$request->header('Accept', '*/*');
+if ($opt_c) { # will always be set for request that wants content
+    $request->header('Content-Type', $opt_c);
+    $request->header('Content-Length', length $content);  # Not really needed
+    $request->content($content);
+}
+
+
+$errors = 0;
+
+# Ok, now we perform the requests, one URL at a time
+while ($url = shift) {
+    # Create the URL object, but protect us against bad URLs
+    eval {
+	if ($url =~ /^\w+:/ || $opt_b) {  # is there any scheme specification
+	    $url = URI::URL->new($url, $opt_b);
+	} else {
+	    $url = uf_url($url);
+        }
+    };
+    if ($@) {
+	$@ =~ s/at\s+\S+\s+line\s\d+//;
+	print STDERR $@;
+	$errors++;
+	next;
+    }
+
+    $ua->proxy($url->scheme, $opt_p) if $opt_p;
+
+    # Send the request and get a response back from the server
+    $request->url($url);
+    $response = $ua->request($request);
+
+    if ($opt_u || $opt_U) {
+        my $url = $response->request->url->as_string;
+        print "$method $url\n";
+        print $response->request->headers_as_string, "\n" if $opt_U;
+    }
+
+    if ($opt_S) {
+	printResponseChain($response);
+    } elsif ($opt_s) {
+        print $response->status_line, "\n";
+    }
+
+    if ($opt_e) {
+        # Display headers
+        print $response->headers_as_string;
+        print "\n";  # separate headers and content
+    }
+
+    if ($response->is_success) {
+	unless ($opt_d) {
+	    if ($opt_o &&
+		$response->content_type eq 'text/html') {
+		require HTML::Parse;
+		my $html = HTML::Parse::parse_html($response->content);
+		{
+		    $opt_o eq 'ps' && do {
+			require HTML::FormatPS;
+			my $f = new HTML::FormatPS;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'text' && do {
+			require HTML::FormatText;
+			my $f = new HTML::FormatText;
+			print $f->format($html);
+			last;
+		    };
+		    $opt_o eq 'html' && do {
+			print $html->as_HTML;
+			last;
+		    };
+		    $opt_o eq 'links' && do {
+			my $base = $response->base;
+			for ( @{ $html->extract_links } ) {
+			    my($link, $elem) = @$_;
+			    my $tag = uc $elem->tag;
+			    $link = new URI::URL $link, $base;
+			    print "$tag\t", $link->abs->as_string, "\n";
+			}
+			last;
+		    };
+		    $opt_o eq 'dump' && do {
+			$html->dump;
+			last;
+		    };
+		    # It is bad to not notice this before now :-(
+		    die "Illegal -o option value ($opt_o)\n";
+		}
+	    } else {
+                binmode STDOUT unless $opt_a;
+		print $response->content;
+	    }
+	}
+    } else {
+        print STDERR $response->error_as_HTML unless $opt_d;
+        $errors++;
+    }
+}
+
+exit $errors;
+
+
+sub printResponseChain
+{
+    my($response) = @_;
+    return unless defined $response;
+    printResponseChain($response->previous);
+    my $method = $response->request->method;
+    my $url = $response->request->url->as_string;
+    my $code = $response->code;
+    print "$method $url --> ", $response->status_line, "\n";
+}
+
+
+sub usage
+{
+    die <<"EOT";
+Usage: $progname [-options] <url>...
+    -m <method>   use method for the request (default is '$method')
+    -f            make request even if $progname believes method is illegal
+    -b <base>     Use the specified URL as base
+    -t <timeout>  Set timeout value
+    -i <time>     Set the If-Modified-Since header on the request
+    -c <conttype> use this content-type for POST, PUT, CHECKIN
+    -a            Use text mode for content I/O
+    -p <proxyurl> use this as a proxy
+    -P            don't load proxy settings from environment
+
+    -u            Display method and URL before any response
+    -U            Display request headers (implies -u)
+    -s            Display response status code
+    -S            Display response status chain
+    -e            Display response headers
+    -d            Do not display content
+    -o <format>   Process HTML content in various ways
+
+    -v            Show program version
+    -h            Print this message
+
+    -x            Extra debugging output
+EOT
+}
diff --git a/tools/Perl/bin/lwp-rget b/tools/Perl/bin/lwp-rget
new file mode 100644
index 000000000..462c84ae8
--- /dev/null
+++ b/tools/Perl/bin/lwp-rget
@@ -0,0 +1,584 @@
+#!perl -w
+
+#line 18
+
+=head1 NAME
+
+lwp-rget - Retrieve WWW documents recursively
+
+=head1 SYNOPSIS
+
+ lwp-rget [--verbose] [--auth=USER:PASS] [--depth=N] [--hier] [--iis]
+	  [--keepext=mime/type[,mime/type]] [--limit=N] [--nospace]
+	  [--prefix=URL] [--sleep=N] [--tolower] <URL>
+ lwp-rget --version
+
+=head1 DESCRIPTION
+
+This program will retrieve a document and store it in a local file.  It
+will follow any links found in the document and store these documents
+as well, patching links so that they refer to these local copies.
+This process continues until there are no more unvisited links or the
+process is stopped by the one or more of the limits which can be
+controlled by the command line arguments.
+
+This program is useful if you want to make a local copy of a
+collection of documents or want to do web reading off-line.
+
+All documents are stored as plain files in the current directory. The
+file names chosen are derived from the last component of URL paths.
+
+The options are:
+
+=over 3
+
+=item --auth=USER:PASS<n>
+
+Set the authentication credentials to user "USER" and password "PASS" if
+any restricted parts of the web site are hit.  If there are restricted
+parts of the web site and authentication credentials are not available,
+those pages will not be downloaded.
+
+=item --depth=I<n>
+
+Limit the recursive level. Embedded images are always loaded, even if
+they fall outside the I<--depth>. This means that one can use
+I<--depth=0> in order to fetch a single document together with all
+inline graphics.
+
+The default depth is 5.
+
+=item --hier
+
+Download files into a hierarchy that mimics the web site structure.
+The default is to put all files in the current directory.
+
+=item --iis
+
+Sends an "Accept: */*" on all URL requests as a workaround for a bug in
+IIS 2.0.  If no Accept MIME header is present, IIS 2.0 returns with a
+"406 No acceptable objects were found" error.  Also converts any back
+slashes (\\) in URLs to forward slashes (/).
+
+=item --keepext=I<mime/type[,mime/type]>
+
+Keeps the current extension for the list MIME types.  Useful when
+downloading text/plain documents that shouldn't all be translated to
+*.txt files.
+
+=item --limit=I<n>
+
+Limit the number of documents to get.  The default limit is 50.
+
+=item --nospace
+
+Changes spaces in all URLs to underscore characters (_).  Useful when
+downloading files from sites serving URLs with spaces in them.	Does not
+remove spaces from fragments, e.g., "file.html#somewhere in here".
+
+=item --prefix=I<url_prefix>
+
+Limit the links to follow. Only URLs that start the prefix string are
+followed.
+
+The default prefix is set as the "directory" of the initial URL to
+follow.	 For instance if we start lwp-rget with the URL
+C<http://www.sn.no/foo/bar.html>, then prefix will be set to
+C<http://www.sn.no/foo/>.
+
+Use C<--prefix=''> if you don't want the fetching to be limited by any
+prefix.
+
+=item --sleep=I<n>
+
+Sleep I<n> seconds before retrieving each document. This options allows
+you to go slowly, not loading the server you visiting too much.
+
+=item --tolower
+
+Translates all links to lowercase.  Useful when downloading files from
+IIS since it does not serve files in a case sensitive manner.
+
+=item --verbose
+
+Make more noise while running.
+
+=item --quiet
+
+Don't make any noise.
+
+=item --version
+
+Print program version number and quit.
+
+=item --help
+
+Print the usage message and quit.
+
+=back
+
+Before the program exits the name of the file, where the initial URL
+is stored, is printed on stdout.  All used filenames are also printed
+on stderr as they are loaded.  This printing can be suppressed with
+the I<--quiet> option.
+
+=head1 SEE ALSO
+
+L<lwp-request>, L<LWP>
+
+=head1 AUTHOR
+
+Gisle Aas <aas@sn.no>
+
+=cut
+
+use strict;
+
+use Getopt::Long    qw(GetOptions);
+use URI::URL	    qw(url);
+use LWP::MediaTypes qw(media_suffix);
+
+use vars qw($VERSION);
+use vars qw($MAX_DEPTH $MAX_DOCS $PREFIX $VERBOSE $QUIET $SLEEP $HIER $AUTH $IIS $TOLOWER $NOSPACE %KEEPEXT);
+
+my $progname = $0;
+$progname =~ s|.*/||;  # only basename left
+$progname =~ s/\.\w*$//; #strip extension if any
+
+$VERSION = sprintf("%d.%02d", q$Revision: 1.16 $ =~ /(\d+)\.(\d+)/);
+
+#$Getopt::Long::debug = 1;
+#$Getopt::Long::ignorecase = 0;
+
+# Defaults
+$MAX_DEPTH = 5;
+$MAX_DOCS  = 50;
+
+GetOptions('version'  => \&print_version,
+	   'help'     => \&usage,
+	   'depth=i'  => \$MAX_DEPTH,
+	   'limit=i'  => \$MAX_DOCS,
+	   'verbose!' => \$VERBOSE,
+	   'quiet!'   => \$QUIET,
+	   'sleep=i'  => \$SLEEP,
+	   'prefix:s' => \$PREFIX,
+	   'hier'     => \$HIER,
+	   'auth=s'   => \$AUTH,
+	   'iis'      => \$IIS,
+	   'tolower'  => \$TOLOWER,
+	   'nospace'  => \$NOSPACE,
+	   'keepext=s' => \$KEEPEXT{'OPT'},
+	  ) || usage();
+
+sub print_version {
+    require LWP;
+    my $DISTNAME = 'libwww-perl-' . LWP::Version();
+    print <<"EOT";
+This is lwp-rget version $VERSION ($DISTNAME)
+
+Copyright 1996-1998, Gisle Aas.
+
+This program is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself.
+EOT
+    exit 0;
+}
+
+my $start_url = shift || usage();
+usage() if @ARGV;
+
+require LWP::UserAgent;
+my $ua = new LWP::UserAgent;
+$ua->agent("$progname/$VERSION " . $ua->agent);
+$ua->env_proxy;
+
+unless (defined $PREFIX) {
+    $PREFIX = url($start_url);	 # limit to URLs below this one
+    eval {
+	$PREFIX->eparams(undef);
+	$PREFIX->equery(undef);
+    };
+
+    $_ = $PREFIX->epath;
+    s|[^/]+$||;
+    $PREFIX->epath($_);
+    $PREFIX = $PREFIX->as_string;
+}
+
+%KEEPEXT = map { lc($_) => 1 } split(/\s*,\s*/, $KEEPEXT{'OPT'});
+
+print <<"" if $VERBOSE;
+START	  = $start_url
+MAX_DEPTH = $MAX_DEPTH
+MAX_DOCS  = $MAX_DOCS
+PREFIX	  = $PREFIX
+
+
+my $no_docs = 0;
+my %seen = ();	   # mapping from URL => local_file
+
+my $filename = fetch($start_url);
+print "$filename\n" unless $QUIET;
+
+sub fetch
+{
+    my($url, $type, $depth) = @_;
+
+    # Fix http://sitename.com/../blah/blah.html to
+    #	  http://sitename.com/blah/blah.html
+    $url = $url->as_string if (ref($url));
+    while ($url =~ s#(https?://[^/]+/)\.\.\/#$1#) {}
+
+    # Fix backslashes (\) in URL if $IIS defined
+    $url = fix_backslashes($url) if (defined $IIS);
+
+    $url = url($url) unless ref($url);
+    $type  ||= 'a';
+    # Might be the background attribute
+    $type = 'img' if ($type eq 'body' || $type eq 'td');
+    $depth ||= 0;
+
+    # Print the URL before we start checking...
+    my $out = (" " x $depth) . $url . " ";
+    $out .= "." x (60 - length($out));
+    print STDERR $out . " " if $VERBOSE;
+
+    # Can't get mailto things
+    if ($url->scheme eq 'mailto') {
+	print STDERR "*skipping mailto*\n" if $VERBOSE;
+	return $url->as_string;
+    }
+
+    # The $plain_url is a URL without the fragment part
+    my $plain_url = $url->clone;
+    $plain_url->frag(undef);
+
+    # Check PREFIX, but not for <IMG ...> links
+    if ($type ne 'img' and  $url->as_string !~ /^\Q$PREFIX/o) {
+	print STDERR "*outsider*\n" if $VERBOSE;
+	return $url->as_string;
+    }
+
+    # Translate URL to lowercase if $TOLOWER defined
+    $plain_url = to_lower($plain_url) if (defined $TOLOWER);
+
+    # If we already have it, then there is nothing to be done
+    my $seen = $seen{$plain_url->as_string};
+    if ($seen) {
+	my $frag = $url->frag;
+	$seen .= "#$frag" if defined($frag);
+	$seen = protect_frag_spaces($seen);
+	print STDERR "$seen (again)\n" if $VERBOSE;
+	return $seen;
+    }
+
+    # Too much or too deep
+    if ($depth > $MAX_DEPTH and $type ne 'img') {
+	print STDERR "*too deep*\n" if $VERBOSE;
+	return $url;
+    }
+    if ($no_docs > $MAX_DOCS) {
+	print STDERR "*too many*\n" if $VERBOSE;
+	return $url;
+    }
+
+    # Fetch document 
+    $no_docs++;
+    sleep($SLEEP) if $SLEEP;
+    my $req = HTTP::Request->new(GET => $url);
+    # See: http://ftp.sunet.se/pub/NT/mirror-microsoft/kb/Q163/7/74.TXT
+    $req->header ('Accept', '*/*') if (defined $IIS);  # GIF/JPG from IIS 2.0
+    $req->authorization_basic(split (/:/, $AUTH)) if (defined $AUTH);
+    my $res = $ua->request($req);
+
+    # Check outcome
+    if ($res->is_success) {
+	my $doc = $res->content;
+	my $ct = $res->content_type;
+	my $name = find_name($res->request->url, $ct);
+	print STDERR "$name\n" unless $QUIET;
+	$seen{$plain_url->as_string} = $name;
+
+	# If the file is HTML, then we look for internal links
+	if ($ct eq "text/html") {
+	    # Save an unprosessed version of the HTML document.	 This
+	    # both reserves the name used, and it also ensures that we
+	    # don't loose everything if this program is killed before
+	    # we finish.
+	    save($name, $doc);
+	    my $base = $res->base;
+
+	    # Follow and substitute links...
+	    $doc =~
+s/
+  (
+    <(img|a|body|area|frame|td)\b   # some interesting tag
+    [^>]+			    # still inside tag (not strictly correct)
+    \b(?:src|href|background)	    # some link attribute
+    \s*=\s*			    # =
+  )
+    (?:				    # scope of OR-ing
+	 (")([^"]*)"	|	    # value in double quotes  OR
+	 (')([^']*)'	|	    # value in single quotes  OR
+	    ([^\s>]+)		    # quoteless value
+    )
+/
+  new_link($1, lc($2), $3||$5, $4||$6||$7, $base, $name, $depth+1)
+/giex;
+	   # XXX
+	   # The regular expression above is not strictly correct.
+	   # It is not really possible to parse HTML with a single
+	   # regular expression, but it is faster.  Tags that might
+	   # confuse us include:
+	   #	<a alt="href" href=link.html>
+	   #	<a alt=">" href="link.html">
+	   #
+	}
+	save($name, $doc);
+	return $name;
+    } else {
+	print STDERR $res->code . " " . $res->message . "\n" if $VERBOSE;
+	$seen{$plain_url->as_string} = $url->as_string;
+	return $url->as_string;
+    }
+}
+
+sub new_link
+{
+    my($pre, $type, $quote, $url, $base, $localbase, $depth) = @_;
+
+    $url = protect_frag_spaces($url);
+
+    $url = fetch(url($url, $base)->abs, $type, $depth);
+    $url = url("file:$url", "file:$localbase")->rel
+	unless $url =~ /^[.+\-\w]+:/;
+
+    $url = unprotect_frag_spaces($url);
+
+    return $pre . $quote . $url . $quote;
+}
+
+
+sub protect_frag_spaces
+{
+    my ($url) = @_;
+
+    $url = $url->as_string if (ref($url));
+
+    if ($url =~ m/^([^#]*#)(.+)$/)
+    {
+      my ($base, $frag) = ($1, $2);
+      $frag =~ s/ /%20/g;
+      $url = $base . $frag;
+    }
+
+    return $url;
+}
+
+
+sub unprotect_frag_spaces
+{
+    my ($url) = @_;
+
+    $url = $url->as_string if (ref($url));
+
+    if ($url =~ m/^([^#]*#)(.+)$/)
+    {
+      my ($base, $frag) = ($1, $2);
+      $frag =~ s/%20/ /g;
+      $url = $base . $frag;
+    }
+
+    return $url;
+}
+
+
+sub fix_backslashes
+{
+    my ($url) = @_;
+    my ($base, $frag);
+
+    $url = $url->as_string if (ref($url));
+
+    if ($url =~ m/([^#]+)(#.*)/)
+    {
+      ($base, $frag) = ($1, $2);
+    }
+    else
+    {
+      $base = $url;
+      $frag = "";
+    }
+
+    $base =~ tr/\\/\//;
+    $base =~ s/%5[cC]/\//g;	# URL-encoded back slash is %5C
+
+    return $base . $frag;
+}
+
+
+sub to_lower
+{
+    my ($url) = @_;
+    my $was_object = 0;
+
+    if (ref($url))
+    {
+      $url = $url->as_string;
+      $was_object = 1;
+    }
+
+    if ($url =~ m/([^#]+)(#.*)/)
+    {
+      $url = lc($1) . $2;
+    }
+    else
+    {
+      $url = lc($url);
+    }
+
+    if ($was_object == 1)
+    {
+      return url($url);
+    }
+    else
+    {
+      return $url;
+    }
+}
+
+
+sub translate_spaces
+{
+    my ($url) = @_;
+    my ($base, $frag);
+
+    $url = $url->as_string if (ref($url));
+
+    if ($url =~ m/([^#]+)(#.*)/)
+    {
+      ($base, $frag) = ($1, $2);
+    }
+    else
+    {
+      $base = $url;
+      $frag = "";
+    }
+
+    $base =~ s/^ *//;	# Remove initial spaces from base
+    $base =~ s/ *$//;	# Remove trailing spaces from base
+
+    $base =~ tr/ /_/;
+    $base =~ s/%20/_/g; # URL-encoded space is %20
+
+    return $base . $frag;
+}
+
+
+sub mkdirp
+{
+    my($directory, $mode) = @_;
+    my @dirs = split(/\//, $directory);
+    my $path = shift(@dirs);   # build it as we go
+    my $result = 1;   # assume it will work
+
+    unless (-d $path) {
+	$result &&= mkdir($path, $mode);
+    }
+
+    foreach (@dirs) {
+	$path .= "/$_";
+	if ( ! -d $path) {
+	    $result &&= mkdir($path, $mode);
+	}
+    }
+
+    return $result;
+}
+
+
+sub find_name
+{
+    my($url, $type) = @_;
+    #print "find_name($url, $type)\n";
+
+    # Translate spaces in URL to underscores (_) if $NOSPACE defined
+    $url = translate_spaces($url) if (defined $NOSPACE);
+
+    # Translate URL to lowercase if $TOLOWER defined
+    $url = to_lower($url) if (defined $TOLOWER);
+
+    $url = url($url) unless ref($url);
+
+    my $path = $url->path;
+
+    # trim path until only the basename is left
+    $path =~ s|(.*/)||;
+    my $dirname = ".$1";
+    if (!$HIER) {
+	$dirname = "";
+    } elsif (! -d $dirname) {
+	mkdirp($dirname, 0775);
+    }
+
+    my $extra = "";  # something to make the name unique
+    my $suffix;
+
+    if ($KEEPEXT{lc($type)}) {
+        $suffix = ($path =~ m/\.(.*)/) ? $1 : "";
+    } else {
+        $suffix = media_suffix($type);
+    }
+
+    $path =~ s|\..*||;	# trim suffix
+    $path = "index" unless length $path;
+
+    while (1) {
+	# Construct a new file name
+	my $file = $dirname . $path . $extra;
+	$file .= ".$suffix" if $suffix;
+	# Check if it is unique
+	return $file unless -f $file;
+
+	# Try something extra
+	unless ($extra) {
+	    $extra = "001";
+	    next;
+	}
+	$extra++;
+    }
+}
+
+
+sub save
+{
+    my $name = shift;
+    #print "save($name,...)\n";
+    open(FILE, ">$name") || die "Can't save $name: $!";
+    binmode FILE;
+    print FILE $_[0];
+    close(FILE);
+}
+
+
+sub usage
+{
+    die <<"";
+Usage: $progname [options] <URL>
+Allowed options are:
+  --auth=USER:PASS  Set authentication credentials for web site
+  --depth=N	    Maximum depth to traverse (default is $MAX_DEPTH)
+  --hier	    Download into hierarchy (not all files into cwd)
+  --iis		    Workaround IIS 2.0 bug by sending "Accept: */*" MIME
+		    header; translates backslashes (\\) to forward slashes (/)
+  --keepext=type    Keep file extension for MIME types (comma-separated list)
+  --limit=N	    A limit on the number documents to get (default is $MAX_DOCS)
+  --nospace	    Translate spaces URLs (not #fragments) to underscores (_)
+  --version	    Print version number and quit
+  --verbose	    More output
+  --quiet	    No output
+  --sleep=SECS	    Sleep between gets, ie. go slowly
+  --prefix=PREFIX   Limit URLs to follow to those which begin with PREFIX
+  --tolower	    Translate all URLs to lowercase (useful with IIS servers)
+
+}
diff --git a/tools/Perl/bin/p_uninst.dat b/tools/Perl/bin/p_uninst.dat
new file mode 100644
index 000000000..df67d8a45
--- /dev/null
+++ b/tools/Perl/bin/p_uninst.dat
@@ -0,0 +1,17 @@
+$app_name = 'ActivePerl';
+$is_uninstall_string = 'C:\\WINNT\\uninst.exe -fC:\\Perl\\DeIsL1.isu';
+$path_info = [
+               'C:\\Perl\\bin'
+             ];
+$iis_virt_dir = [];
+$iis_script_map = {};
+$ns_config_dir = undef;
+$lines_in_file = {};
+$directory = [
+               'C:\\Perl\\html\\lib'
+             ];
+$file = [
+          'C:\\Perl\\bin\\ppm.bat',
+          'C:\\Perl\\bin\\perlse.pl',
+          'C:\\Perl\\bin/p_uninst.dat'
+        ];
diff --git a/tools/Perl/bin/perl.exe b/tools/Perl/bin/perl.exe
new file mode 100644
index 000000000..e464457be
Binary files /dev/null and b/tools/Perl/bin/perl.exe differ
diff --git a/tools/Perl/bin/perl5.00502.exe b/tools/Perl/bin/perl5.00502.exe
new file mode 100644
index 000000000..e464457be
Binary files /dev/null and b/tools/Perl/bin/perl5.00502.exe differ
diff --git a/tools/Perl/bin/perlcore.dll b/tools/Perl/bin/perlcore.dll
new file mode 100644
index 000000000..e1c160c48
Binary files /dev/null and b/tools/Perl/bin/perlcore.dll differ
diff --git a/tools/Perl/bin/perlglob.exe b/tools/Perl/bin/perlglob.exe
new file mode 100644
index 000000000..cc44749cb
Binary files /dev/null and b/tools/Perl/bin/perlglob.exe differ
diff --git a/tools/Perl/bin/ppm.pl b/tools/Perl/bin/ppm.pl
new file mode 100644
index 000000000..2dbf86c9d
--- /dev/null
+++ b/tools/Perl/bin/ppm.pl
@@ -0,0 +1,1108 @@
+#!/usr/bin/perl
+
+use Getopt::Long;
+use File::Basename;
+use strict;
+
+#use Win32::Shell;
+#my $hidden;
+#GetOptions('hide' => \$hidden);
+#Win32::Shell::SetWindow(SW_HIDE) if $hidden;
+
+use PPM;
+
+$PPM::VERSION = "0.9.5";
+
+my $usage = <<'EOT';
+    usage: ppm help [command]
+           ppm install [--location=location] package1 [... packageN]
+           ppm query [--case|nocase] [--searchtag=abstract|author|title] PATTERN
+           ppm remove package1 [... packageN]
+           ppm search [--case|nocase] [--location=location] [--searchtag=abstract|author|title] PATTERN
+           ppm set [option]
+           ppm verify [--location=location] [--upgrade] [package1 ... packageN]
+           ppm version
+           ppm [--location=location]
+
+EOT
+
+my %help;
+
+$help{'set'} = <<'EOT';
+    set
+        - Displays current settings.
+    set build DIRECTORY
+        - Changes the package build directory.
+    set case [Yes|No]
+        - Set case-sensitive searches.
+    set clean [Yes|No]
+        - Set removal of temporary files from package's build area
+          following successful installation.
+    set confirm [Yes|No]
+        - Sets confirmation of 'install', 'remove' and 'upgrade'.
+    set force_install [Yes|No]
+        - Continue installing a package if a dependency cannot be installed.
+    set more NUMBER
+        - Pause after displaying 'NUMBER' lines.  Specifying '0' turns
+          off paging capability.
+    set repository /remove NAME
+        - Removes the repository 'NAME' from the list of repositories.
+    set repository NAME LOCATION
+        - Adds a repository to the list of PPD repositories for this session.
+          'NAME' is the name by which this repository will be referred;
+          'LOCATION' is a URL or directory name.
+    set root DIRECTORY
+        - Changes install root directory for this session.
+    set save
+        - save current options as defaults.
+
+EOT
+
+
+my %options = PPM::GetPPMOptions();
+use vars qw ($location $Ignorecase $clean $confirm $force_install $root $build_dir $more);
+*Ignorecase = \$options{'IGNORECASE'};
+*clean = \$options{'CLEAN'};
+*confirm = \$options{'CONFIRM'};
+*force_install = \$options{'FORCE_INSTALL'};
+*root = \$options{'ROOT'};
+*build_dir = \$options{'BUILDDIR'};
+*more = \$options{'MORE'};
+
+my $moremsg = "[Press return to continue]";
+my $interactive = 0;
+
+my %repositories = PPM::ListOfRepositories();
+
+if ($#ARGV == -1 || ($#ARGV == 0 && $ARGV[0] =~ /^--location/)) {
+    my $prompt = 'PPM> ';
+	$interactive = 1;
+    GetOptions("location=s" => \$location);
+$help{'help'} = <<'EOT';
+Commands:
+    help [command]   - prints this screen, or help on 'command'.
+    install PACKAGES - installs specified PACKAGES.
+    quit             - leave the program.
+    query [options]  - query information about installed packages.
+    remove PACKAGES  - removes the specified PACKAGES from the system.
+    search [options] - search information about available packages.
+    set [options]    - set/display current options.
+    verify [options] - verifies current install is up to date.
+
+EOT
+
+$help{'search'} = <<'EOT';
+    search [PATTERN]
+    search /abstract [PATTERN]
+    search /author [PATTERN]
+    search /title [PATTERN]
+    search /location LOCATION [PATTERN]
+
+    Searches for available packages.  With no arguments, will display
+    a list of all available packages. If a regular expression 'PATTERN'
+    is supplied, only packages matching the pattern will be displayed.
+    If the '/abstract', '/author' or '/title' argument is specified,
+    the respective field of the package will be searched.  If the
+    '/location' option is specified, matching packages from that
+    URL or directory will be listed.
+
+EOT
+
+$help{'install'} = <<'EOT';
+    install PACKAGE
+    install /location LOCATION PACKAGE
+
+    Installs the specified 'PACKAGE' onto the system.  If the '/location'
+    option is specified, the package will be looked for at that URL
+    or directory.
+
+EOT
+
+$help{'remove'} = <<'EOT';
+    remove PACKAGE
+
+    Removes the specified 'PACKAGE' from the system.
+
+EOT
+
+$help{'query'} = <<'EOT';
+    query [PATTERN]
+    query /abstract [PATTERN]
+    query /author [PATTERN]
+    query /title [PATTERN]
+
+    Queries information about installed packages. With no arguments, will
+    display a list of all installed packages. If a regular expression
+    'PATTERN' is supplied, only packages matching the pattern will be
+    displayed.  If the '/abstract', '/author' or '/title' argument is
+    specified, the respective field of the package will be searched.
+
+EOT
+
+$help{'verify'} = <<'EOT';
+    verify [packages]
+    verify /upgrade [packages]
+    verify /location LOCATION [packages]
+
+    Verifies that the currently installed 'packages' are up to date.
+    If 'packages' is not specified, all installed packages are verified.
+    If the '/upgrade' option is specified, any packages for which an
+    upgrade is available will be upgraded.  If the '/location' option
+    is specified, upgrades will be looked for at the specified URL
+    or directory.
+
+EOT
+
+    print "PPM interactive shell ($PPM::VERSION) - type 'help' for available commands.\n";
+    $| = 1;
+    while () {
+        print $prompt;
+        last unless defined ($_ = <> );
+        chomp;
+        s/^\s+//;
+        my @line = split(/\s+/, $_);
+        my $cmd = shift @line;
+        next if /^$/;
+
+        if ($cmd  =~ /^quit/i) {
+            print "Quit!\n";
+            last;
+        }
+        elsif ($cmd =~ /^help$/i) {
+            if (defined $line[0] && $help{$line[0]}) {
+                print $help{$line[0]};
+            }
+            else {
+                print $help{'help'};
+            }
+        }
+        elsif ($cmd =~ /^install$/i) {
+            my $package;
+            local $location = $location;
+            if (defined $line[0]) {
+                if ($line[0] =~ /^\/location$/i) {
+                    shift @line;
+                    $location = shift @line;
+                }
+            }
+            if (!defined @line) {
+                print "Package not specified.\n";
+                next;
+            }
+            foreach $package (@line) {
+                if ($confirm eq "Yes") {
+                    print "Install package \'$package?\' (y/N): ";
+                    my $response = <>;
+                    if ($response ne "y\n") {
+                        next;
+                    }
+                }
+                if(!InstallPackage("package" => $package, "location" => $location)) {
+                    print "Error installing package '$package': $PPM::PPMERR\n";
+                }
+            }
+        }
+        elsif ($cmd =~ /^set$/i) {
+            set(@line);
+        }
+        elsif ($cmd =~ /^remove$/i) {
+            my $package;
+            if (!defined @line) {
+                print "Package not specified.\n";
+                next;
+            }
+            foreach $package (@line) {
+                if ($confirm eq "Yes") {
+                    print "Remove package \'$package?\' (y/N): ";
+                    my $response = <>;
+                    if ($response ne "y\n") {
+                        next;
+                    }
+                }
+                if (!RemovePackage("package" => $package)) {
+                    print "Error removing $package: $PPM::PPMERR\n";
+                }
+            }
+        }
+        elsif ($cmd =~ /^search$/i) {
+            my $searchtag;
+            local $location = $location;
+            while (defined $line[0]) {
+                if ($line[0] =~ /^\/abstract$/i) {
+                    shift @line;
+                    $searchtag = 'abstract';
+                }
+                elsif ($line[0] =~ /^\/author$/i) {
+                    shift @line;
+                    $searchtag = 'author';
+                }
+                elsif ($line[0] =~ /^\/title$/i) {
+                    shift @line;
+                    $searchtag = 'title';
+                }
+                elsif ($line[0] =~ /^\/location$/i) {
+                    shift @line;
+                    $location = shift @line;
+                }
+                else { last; }
+            }
+            my $searchRE = $line[0];
+            search_PPDs("location" => $location, "searchtag" => $searchtag, 
+                        "searchRE" => $searchRE, "ignorecase" => $Ignorecase);
+        }
+        elsif ($cmd =~ /^query$/i) {
+            my $searchtag;
+            if (defined $line[0] && ($line[0] =~ /^\/abstract$/i || 
+                     $line[0] =~ /^\/author$/i || $line[0] =~ /^\/title$/i)) {
+                 $searchtag = shift @line;
+                 $searchtag = substr($searchtag, 1);
+            }
+            my $RE = shift @line;
+            my %packages = QueryInstalledPackages("searchtag" => $searchtag, "searchRE" => $RE);
+            if (!%packages && defined $PPM::PPMERR) {
+                print "$PPM::PPMERR\n";
+                next;
+            }
+            my $package;
+            my $lines = 0;
+            foreach $package (sort keys %packages) {
+                print "\t$package" . (defined $searchtag ? ": $packages{$package}\n" : "\n");
+                if ($more && ++$lines == $more) {
+                    print $moremsg;
+                    $_ = <>;
+                    $lines = 0;
+                }
+            }
+        }
+        elsif ($cmd =~ /^verify$/i) {
+            my $upgrade;
+            local $location = $location;
+            while (defined $line[0]) {
+                if ($line[0] =~ /^\/upgrade$/i) {
+                    $upgrade = 1;
+                    shift @line;
+                    next;
+                }
+                if ($line[0] =~ /^\/location$/i) {
+                    shift @line;
+                    $location = shift @line;
+                    next;
+                }
+                last;
+            }
+            if ($upgrade && $confirm eq "Yes") {
+                if ($#line == 0) {
+                    print "Upgrade package $line[0]? (y/N): ";
+                }
+                else {
+                    print "Upgrade packages? (y/N): ";
+                }
+                my $response = <>;
+                if ($response ne "y\n") {
+                    next;
+                }
+            }
+            verify_packages("packages" => \@line, "location" => $location, "upgrade" => $upgrade);
+        }
+        else {
+            print "Unknown command '$cmd'; type 'help' for commands.\n";
+        }
+    }
+}
+elsif ($ARGV[0] eq 'help') {
+$help{'install'} = <<'EOT';
+    install [--location=location] PACKAGE
+
+    Installs the specified 'PACKAGE' onto the system.  If 'location' is
+    not specified, the default locations in the PPM data file will be
+    used to locate the package.
+
+EOT
+
+$help{'remove'} = <<'EOT';
+    remove PACKAGE
+
+    Removes the specified 'PACKAGE' from the system.
+
+EOT
+
+$help{'search'} = <<'EOT';
+    search [--case|nocase] [--location=location] [PATTERN]
+    search [--case|nocase] [--location=location] --searchtag=abstract [PATTERN]
+    search [--case|nocase] [--location=location] --searchtag=author [PATTERN]
+    search [--case|nocase] [--location=location] --searchtag=title [PATTERN]
+
+    Searches for available packages.  With no arguments, will display
+    a list of all available packages. If a regular expression 'PATTERN'
+    is supplied, only packages matching the pattern will be displayed.
+    If the 'abstract', 'author' or 'title' --searchtag argument is
+    specified, the respective field of the package will be searched.
+    If 'location' is not specified, the repository locations in the PPM
+    data file will be searched.  '--case' or '--nocase' may be used to
+    request case-sensitive or case-insensitive searches, respectively.
+
+EOT
+
+$help{'query'} = <<'EOT';
+    query [PATTERN]
+    query [--case|nocase] --searchtag=abstract [PATTERN]
+    query [--case|nocase] --searchtag=author [PATTERN]
+    query [--case|nocase] --searchtag=title [PATTERN]
+
+    Queries information about installed packages. With no arguments, will
+    display a list of all installed packages. If a regular expression
+    'PATTERN' is supplied, only packages matching the pattern will
+    be displayed.  If the 'abstract', 'author' or 'title' --searchtag
+    argument is specified, the respective field of the package will
+    be searched.  '--case' or '--nocase' may be used to request
+    case-sensitive or case-insensitive searches, respectively.
+
+EOT
+
+$help{'verify'} = <<'EOT';
+    verify [--location=location] [packages]
+    verify --upgrade [--location=location] [packages]
+
+    Verifies that the currently installed 'packages' are up to date.
+    If 'packages' is not specified, all installed packages are verified.
+    If the '--upgrade' option is specified, any packages for which
+    an upgrade is available will be upgraded.  If 'location' is not
+    specified, the repository locations in the PPM data file will be
+    searched.
+
+EOT
+    shift;
+    if (defined $ARGV[0] && $help{$ARGV[0]}) {
+        print $help{$ARGV[0]};
+    }
+    else {
+        print $usage;
+    }
+}
+elsif ($ARGV[0] eq 'version') {
+    print $PPM::VERSION;
+}
+elsif ($ARGV[0] eq 'set') {
+    shift;
+    if (set(@ARGV) == 0) {
+        PPM::SetPPMOptions("options" => \%options, "save" => 1);
+    }
+}
+elsif ($ARGV[0] eq 'install') {
+    my ($package);
+
+    shift;
+    GetOptions("location=s" => \$location);
+
+    $package = shift;
+
+    while ($package) {
+        if(!InstallPackage("package" => $package, "location" => $location)) {
+            print "Error installing package '$package': $PPM::PPMERR\n";
+        }
+        $package = shift;
+    }
+}
+elsif ($ARGV[0] eq 'remove') {
+    shift;
+
+    my $package = shift;
+
+    while ($package) {
+        if (!RemovePackage("package" => $package)) {
+            print "Error removing $package: $PPM::PPMERR\n";
+        }
+        $package = shift;
+    }
+}
+elsif ($ARGV[0] eq 'verify') {
+    my ($upgrade, $package, @packages);
+
+    shift;
+    GetOptions("location=s" => \$location, "upgrade" => \$upgrade);
+
+    verify_packages("packages" => \@ARGV, "location" => $location, "upgrade" => $upgrade);
+}
+elsif ($ARGV[0] eq 'query') {
+    my ($case, $nocase, $searchtag, $searchRE);
+    shift;
+    GetOptions("nocase" => \$nocase, "case" => \$case,
+                "searchtag=s" => \$searchtag );
+    $searchRE = shift;
+    if (!defined $nocase) {
+        if (!defined $case) {
+            $nocase = $Ignorecase;  # use the default setting
+        }
+    }
+    if (defined $searchtag) {
+        if (!$searchtag =~ /(abstract|author|title)/i) {
+            print $usage;
+            exit 1;
+        }
+    }
+    my %packages = QueryInstalledPackages("ignorecase" => $nocase,
+                         "searchtag" => $searchtag, "searchRE" => $searchRE);
+    if (!%packages && defined $PPM::PPMERR) {
+        print "$PPM::PPMERR\n";
+        exit 1;
+    }
+    my $package;
+    foreach $package (sort keys %packages) {
+        print "\t$package" . (defined $searchtag ? ": $packages{$package}\n" : "\n");
+    }
+}
+elsif ($ARGV[0] eq 'search') {
+    my ($case, $nocase, $searchtag, %ppds, $searchRE);
+    shift;
+    GetOptions("nocase" => \$nocase, "case" => \$case,
+                "location=s" => \$location, "searchtag=s" => \$searchtag );
+    $searchRE = shift;
+    if (defined $case) {
+        $nocase = "No";
+    }
+    elsif (defined $nocase) {
+        $nocase = "Yes";
+    }
+    else {
+        $nocase = $Ignorecase;
+    }
+    if (defined $searchtag && !($searchtag =~ /(abstract|author|title)/i)) {
+        print $usage;
+        exit 1;
+    }
+
+    search_PPDs("location" => $location, "searchtag" => $searchtag, 
+                "searchRE" => $searchRE, "ignorecase" => $nocase);
+}
+else {
+    print $usage;
+    exit 1;
+}
+
+exit 0;
+
+sub set
+{
+    my ($option) = shift @_;
+    my $rc = 0;
+    if (defined $option) {
+        my ($value) = shift @_;
+        if ($option =~ /^repository$/i) {
+            if ($value =~ /\/remove/i) {
+                $value = shift @_;
+                while (@_) {
+                    $value .= " " . shift @_;
+                }
+                if (!defined $value) {
+                    print "Location not specified.\n";
+                    $rc = 1;
+                }
+                else {
+                    PPM::RemoveRepository("repository" => $value);
+                    %repositories = PPM::ListOfRepositories();
+                }
+            }
+            else {
+                my $location = shift @_;
+                if (!defined $value || !defined $location) {
+                    print "Repository not specified.\n";
+                    $rc = 1;
+                }
+                else {
+                    PPM::AddRepository("repository" => $value,
+                                       "location" => $location);
+                    %repositories = PPM::ListOfRepositories();
+                }
+            }
+        }
+        else {
+            if ($option =~ /^confirm$/i) {
+                if (defined $value) {
+                    if ($value =~ /^Yes$/) { $confirm = $value; }
+                    elsif ($value =~ /^No$/) { $confirm = $value; }
+                    else {
+                        print "Value must be 'Yes' or 'No'.\n";
+                        $rc = 1;
+                        return $rc;
+                    }
+                }
+                else { $confirm = $confirm eq "Yes" ? "No" : "Yes"; }
+                print "Commands will " . ($confirm eq "Yes" ? "" : "not ") . "be confirmed.\n";
+            }
+            elsif ($option =~ /^save$/i) {
+                PPM::SetPPMOptions("options" => \%options, "save" => 1);
+                return $rc;
+            }
+            elsif ($option =~ /^case$/i) {
+                if (defined $value) {
+                    # N.B. These are reversed.
+                    if ($value =~ /^Yes$/) { $Ignorecase = "No"; }
+                    elsif ($value =~ /^No$/) { $Ignorecase = "Yes"; }
+                    else {
+                        print "Value must be 'Yes' or 'No'.\n";
+                        $rc = 1;
+                        return $rc;
+                    }
+                }
+                else { $Ignorecase = $Ignorecase eq "Yes" ? "No" : "Yes"; }
+                print "Case-" . ($Ignorecase eq "Yes" ? "in" : "") . "sensitive searches will be performed.\n";
+            }
+            elsif ($option =~ /^root$/i) {
+                my $old_root;
+                if (!defined $value) {
+                    print "Directory not specified.\n";
+                    $rc = 1;
+                }
+                elsif(!($old_root = PPM::chroot("location" => $value))) {
+                    print "$PPM::PPMERR";
+                    $rc = 1;
+                }
+                else {
+                    $root = $value;
+                    print "Root is now $value [was $old_root].\n";
+                }
+            }
+            elsif ($option =~ /^build$/i) {
+                if (!defined $value) {
+                    print "Directory not specified.\n";
+                    $rc = 1;
+                }
+                elsif (-d $value) {
+                    $build_dir = $value;
+                    print "Build directory is now $value.\n";
+                }
+                else {
+                    print "Directory '$value' does not exist.\n";
+                    $rc = 1;
+                }
+            }
+            elsif ($option =~ /^force_install$/i) {
+                if (defined $value) {
+                    if ($value =~ /^Yes$/) { $force_install = $value; }
+                    elsif ($value =~ /^No$/) { $force_install = $value; }
+                    else {
+                        print "Value must be 'Yes' or 'No'.\n";
+                        $rc = 1;
+                        return $rc;
+                    }
+                }
+                else { $force_install = $force_install eq "Yes" ? "No" : "Yes"; }
+                print "Package installations will " .
+                      ($force_install eq "Yes" ? "" : "not ") .
+                      "continue if a dependency cannot be installed.\n";
+            }
+            elsif ($option =~ /^clean$/i) {
+                if (defined $value) {
+                    if ($value =~ /^Yes$/) { $clean = $value; }
+                    elsif ($value =~ /^No$/) { $clean = $value; }
+                    else {
+                        print "Value must be 'Yes' or 'No'.\n";
+                        $rc = 1;
+                        return $rc;
+                    }
+                }
+                else { $clean = $clean eq "Yes" ? "No" : "Yes"; }
+                print "Temporary files will " . ($clean eq "Yes" ? "" : "not ") . "be deleted.\n";
+            }
+            elsif ($option =~ /^more$/i) {
+                if (defined $value && $value =~ /^\d+$/) {
+                    $more = $value;
+                }
+                else {
+                    print "Numeric value must be given.\n";
+                    $rc = 1;
+                    return $rc;
+                }
+                print "Screens will " . ($more > 0 ? "pause after $more lines.\n" : "not pause.\n");
+            }
+            else {
+                print "Unknown option '$option'; see 'help set' for available options.\n";
+                $rc = 1;
+            }
+            if (!$rc) {
+                PPM::SetPPMOptions("options" => \%options);
+            }
+        }
+    }
+    else {
+        print "Commands will " . ($confirm eq "Yes" ? "" : "not ") . "be confirmed.\n";
+        print "Temporary files will " . ($clean eq "Yes" ? "" : "not ") . "be deleted.\n";
+        print "Case-" . ($Ignorecase eq "Yes" ? "in" : "") . "sensitive searches will be performed.\n";
+        print "Package installations will " . ($force_install eq "Yes" ? "" : "not ") . "continue if a dependency cannot be installed.\n";
+        print "Screens will " . ($more > 0 ? "pause after $more lines.\n" : "not pause.\n");
+        if (defined $location) { print "Current PPD repository: $location\n"; }
+        else {
+            print "Current PPD repository paths:\n";
+            my $location;
+            foreach $_ (keys %repositories) {
+                print "\t$_: $repositories{$_}\n";
+            }
+        }
+        if (defined $root) { print "Packages will be installed under: $root\n"; }
+        if (defined $build_dir) { print "Packages will be built under: $build_dir\n"; }
+    }
+    return $rc;
+}
+
+sub search_PPDs
+{
+    my (%argv) = @_;
+    my ($arg, $ignorecase, $searchtag, $searchRE, $oldfh);
+    local $location = $location;
+    foreach $arg (keys %argv) {
+        if ($arg eq 'location') { $location = $argv{$arg}; }
+        if ($arg eq 'searchtag') { $searchtag = $argv{$arg}; }
+        if ($arg eq 'ignorecase') { $ignorecase = $argv{$arg}; }
+        if ($arg eq 'searchRE' && defined $argv{$arg}) {
+            $searchRE = $argv{$arg};
+            eval { $searchRE =~ /$searchRE/ };
+            if ($@) {
+                print "'$searchRE': invalid regular expression.\n";
+                return;
+            }
+        }
+    }
+    if (!defined $ignorecase) {
+        $ignorecase = $Ignorecase;
+    }
+    my (%ppds, $loc, $package);
+    %ppds = PPM::RepositoryPackages("location" => $location);
+    foreach $loc (keys %ppds) {
+        if (!defined $searchtag) {
+            print "Packages available from $loc:\n";
+            my $lines = 0;
+            foreach $package (@{$ppds{$loc}}) {
+                if (defined $searchRE) {
+                    if ($ignorecase eq "Yes" && $package =~ /$searchRE/i) {
+                        print "\t" . $package . "\n";
+                    }
+                    elsif ($package =~ /$searchRE/) {
+                        print "\t" . $package . "\n";
+                    }
+                }
+                else {
+                    print "\t" . $package . "\n";
+                }
+                if ($interactive && $more && ++$lines == $more) {
+                    print $moremsg;
+                    $_ = <>;
+                    $lines = 0;
+                }
+            }
+        }
+        else {
+            print "Matching packages found at $loc:\n";
+            my $lines = 0;
+            foreach $package (@{$ppds{$loc}}) {
+                my ($string);
+                if ($string = QueryPPD("package" => $package, "location" => $loc,
+                           "ignorecase" => $ignorecase, "searchtag" => $searchtag,
+                           "searchRE" => $searchRE)) {
+                    print "\t $package: $string\n";
+                    if ($interactive && $more && ++$lines == $more) {
+                        print $moremsg;
+                        $_ = <>;
+                        $lines = 0;
+                    }
+                }
+            }
+        }
+    }
+}
+
+sub verify_packages
+{
+    my (%argv) = @_;
+    my ($arg, @packages, $upgrade);
+    local $location = $location;
+    foreach $arg (keys %argv) {
+        if ($arg eq 'packages') { @packages = @{$argv{$arg}}; }
+        if ($arg eq 'location') { $location = $argv{$arg}; }
+        if ($arg eq 'upgrade') { $upgrade = $argv{$arg}; }
+    }
+    my ($package);
+
+    if (!defined $packages[0]) {
+        my ($i, %info);
+
+        @packages = ();
+        %info = QueryInstalledPackages();
+        foreach $i (keys %info) {
+            push @packages, $i;
+        }
+    }
+
+    $package = shift @packages;
+
+    # for each specified package
+    while ($package) {
+        my $status = VerifyPackage("package" => $package, "location" => $location, "upgrade" => $upgrade);
+        if (defined $status) {
+            if ($status eq "0") {
+                print "Package \'$package\' is up to date.\n";
+            }
+            elsif ($upgrade) {
+                print "Package $package upgraded to version $status\n";
+            }
+            else {
+                print "An upgrade to package \'$package\' is available.\n";
+            }
+        }
+        else {
+            print "Error verifying $package: $PPM::PPMERR\n";
+        }
+        $package = shift @packages;
+    }
+}
+
+__END__
+
+=head1 Name
+
+PPM - Perl Package Manager: locate, install, upgrade software packages.
+
+=head1 Synopsis
+
+ ppm help [command]
+ ppm install [--location=location] package1 [... packageN]
+ ppm query [--case|nocase] [--searchtag=abstract|author|title] PATTERN
+ ppm remove package1 [... packageN]
+ ppm search [--case|nocase] [--location=location] [--searchtag=abstract|author|title] PATTERN
+ ppm set [option]
+ ppm verify [--location=location] [--upgrade] [package1 ... packageN]
+ ppm version
+ ppm [--location=location]
+
+=head1 Description
+
+ppm is a utility intended to simplify the tasks of locating, installing,
+upgrading and removing software packages.  It is a front-end to the
+functionality provided in PPM.pm.  It can determine if the most recent
+version of a software package is installed on a system, and can install
+or upgrade that package from a local or remote host.
+
+ppm runs in one of two modes: an interactive shell from which commands
+may be entered; and command-line mode, in which one specific action is
+performed per invocation of the program.
+
+ppm uses files containing an extended form of the Open Software
+Description (OSD) specification for information about software packages.
+These description files, which are written in Extensible Markup
+Language (XML) code, are referred to as 'PPD' files.  Information about
+OSD can be found at the W3C web site (at the time of this writing,
+http://www.w3.org/TR/NOTE-OSD.html).  The extensions to OSD used by ppm
+are documented in PPM.ppd.
+
+=head1 Command-line mode
+
+=over 4
+
+=item Installing
+
+ppm install [--location=location] package1 [... packageN]
+
+Reads information from the PPD file (See the 'Files' section
+below) for the named software package and performs an
+installation.  The 'package' arguments may be either package
+names ('foo'), or pathnames (P:\PACKAGES\FOO.PPD) or URLs
+(HTTP://www.ActiveState.com/packages/foo.ppd) to specific PPD files.
+
+In the case where a package name is specified, and the '--location'
+option is not used, the function will refer to repository locations stored
+in the PPM data file (see 'Files' section below) to locate the PPD file
+for the requested package.
+
+=item Removing
+
+ppm remove package1 [... packageN]
+
+Reads information from the PPD file for the named software package and
+removes the package from the system.
+
+=item Verifying
+
+ppm verify [--location=location] [--upgrade] [package1 ... packageN]
+
+Reads a PPD file for the specified package and compares the currently
+installed version of the package to the version available according to
+the PPD.  The PPD file is expected to be on a local directory or remote
+site specified either in the PPM data file or on the command
+line using the '--location' option.  The --location' argument may be
+a directory location or an Internet address.  The '--upgrade' option
+forces an upgrade if the installed package is not up-to-date.
+
+If no packages are specified, all packages currently installed on the
+system will be verified (and updated if desired).  The PPD file for each
+package will initially be searched for at the location specified with the
+'--location' argument, and if not found will then be searched for using
+the location specified in the PPM data file.
+
+=item Querying
+
+ppm query [--case|nocase] PATTERN
+
+Reports currently installed packages matching 'PATTERN' or all installed
+packages if no 'PATTERN' is specified.
+
+ppm query [--case|nocase] [--searchtag=abstract|author|title] PATTERN
+
+Searches for 'PATTERN' (a regular expression) in the <ABSTRACT>, <AUTHOR>
+or <TITLE> tags of all installed packages, according to the value of
+the '--searchtag' option.  If a '--searchtag' value of 'abstract',
+'author' or 'title' is not provided, any occurence of 'PATTERN' in the
+package name will match successfully.  A case-sensitive search will be
+conducted by default, but this may be overridden by the options set in
+the PPM data file, which may in turn be overridden by the '--nocase' or
+'--case' option.  If a search is successful, the name of the package
+and the matching string are displayed.
+
+=item Searching
+
+ppm search [--case|nocase] [--location=location] PATTERN
+
+Displays a list of all packages matching 'PATTERN', with package
+description (PPD) files available at the specified location.  'location'
+may be either a remote address or a directory path.  If a location is
+not specified, the repository location as specified in the PPM data file
+will be used.
+
+ppm search [--case|nocase] [--location=location] [--searchtag=abstract|author|title] PATTERN
+
+Searches for 'PATTERN' (a regular expression) in the <ABSTRACT>, <AUTHOR>
+or <TITLE> tags of all PPD files at 'location', according to the value
+of the '--searchtag' option.  If a '--searchtag' value of 'abstract',
+'author' or 'title' is not provided, any occurence of 'PATTERN' in
+the package name will match successfully.  'location' may be either a
+remote address or a directory path, and if it is not provided, repository
+locations specified in the PPM data file will be used.  A case-sensitive
+search will be conducted by default, but this may be overridden by the
+options set in the PPM data file, which may in turn be overridden by the
+'--nocase' or '--case' option.  If a search is successful, the name of
+the package and the matching string are displayed.
+
+=back
+
+=head1 Interactive mode
+
+If ppm is invoked with no command specified, it is started in interactive
+mode.  If the '--location' argument is specified, it is used as the
+search location, otherwise the repositories specified in the PPM data file are 
+used. The available commands, which may be displayed at any time by entering
+'help', are:
+
+    help [command]
+        - Prints a screen of available commands, or help on a specific command.
+
+    install [/location LOCATION] PACKAGES
+        - Installs the specified software PACKAGES.  Attempts to install
+          from the URL or directory 'LOCATION' if the '/location' option
+          is specfied.  See 'Installing' in the 'Command-line mode' 
+          section for details.  See also: 'confirm' option.
+
+    query [options] PATTERN
+        - Queries information about currently installed packages.
+
+        Available options:
+        /abstract PATTERN
+            - Searches for the regular expression 'PATTERN' in the 'abstract' section
+              of all installed packages.  See also: 'case' option.
+        /author PATTERN
+            - Searches for the regular expression 'PATTERN' in the 'author' section
+              of all installed packages.  See also: 'case' option.
+        /title PATTERN
+            - Searches for the regular expression 'PATTERN' in the 'title' section
+              of all installed packages.  See also: 'case' option.
+
+    remove PACKAGES
+        - Removes the specified 'PACKAGES'.  See 'Removing' in the 'Command-line 
+          mode' section for details.  See also: 'confirm' option.
+
+    search [options] PATTERN
+        - Searches for information about available packages.
+
+        Available options:
+        /abstract PATTERN
+            - Searches for the regular expression 'PATTERN' in the 'abstract' section
+              of all available PPD files.  See also: 'case' option.
+        /author PATTERN
+            - Searches for the regular expression 'PATTERN' in the 'author' section
+              of all available PPD files.  See also: 'case' option.
+        /title PATTERN
+            - Searches for the regular expression 'PATTERN' in the 'title' section
+              of all available PPD files.  See also: 'case' option.
+        /location LOCATION
+            - Searches for packages available from the URL or directory
+              'LOCATION'.
+
+    set [option value]
+        - Sets or displays current options.  With no arguments, options are
+          displayed.
+
+          Available options:
+              build DIRECTORY
+                  - Changes the package build directory.
+              case [Yes|No]
+                  - Sets case-sensitive searches.  If one of 'Yes' or 'No is
+                    not specified, the current setting is toggled.
+              clean [Yes|No]
+                  - Sets removal of temporary files from package's build 
+                    area, on successful installation of a package.  If one of
+                    'Yes' or 'No is not specified, the current setting is
+                    toggled.
+              confirm [Yes|No]
+                  - Sets confirmation of 'install', 'remove' and 'upgrade'.
+                    If one of 'Yes' or 'No is not specified, the current
+                    setting is toggled.
+              force_install [Yes|No]
+                  - Continue installing a package even if a dependency cannot
+                    be installed.
+              more NUMBER
+                  - Causes output to pause after NUMBER lines have been
+                    displayed.  Specifying '0' turns off this capability.
+              set repository /remove NAME
+                  - Removes the repository 'NAME' from the list of repositories.
+              set repository NAME LOCATION
+                  - Adds a repository to the list of PPD repositories for this
+                    session.  'NAME' is the name by which this repository will
+                    be referred; 'LOCATION' is a URL or directory name.
+              root DIRECTORY
+                  - Changes the install root directory.  Packages will be
+                    installed under this new root.
+              save
+                  - Saves the current options as default options for future
+                    sessions.
+
+    quit
+        - Exits the program.
+
+    verify [/upgrade] [/location LOCATION] PACKAGE
+        - Verifies that currently installed 'PACKAGE' is up to date.  If
+          'PACKAGE' is not specified, all installed packages are verified.  If
+          the /upgrade option is specified, any out-dated packages will be
+          upgraded.  If the /location option is specified, upgrades will
+          be looked for at the URL or directory 'LOCATION'.  See also: 'confirm'
+          option.
+
+=over 4
+
+=item 
+
+=back
+
+=head1 Examples
+
+=over 4
+
+=item ppm
+
+Starts ppm in interactive mode, using the repository locations specified
+in the PPM data file.  A session might look like this:
+
+    [show all available packages]
+    PPM> search
+    Packages available from P:\PACKAGES:
+            bar
+            baz
+            foo
+    [list what has already been installed]
+    PPM> query
+            baz
+    [install a package]
+    PPM> install foo
+    Install package foo? (y/N): y
+    [...]
+    [toggle confirmations]
+    PPM> set confirm
+    Commands will not be confirmed.
+    [see if 'baz' is up-to-date]
+    PPM> verify baz
+    An upgrade to package 'baz' is available.
+    [upgrade 'baz']
+    PPM> verify /upgrade baz
+    [...]
+    [toggle case-sensitive searches]
+    PPM> set case
+    Case-sensitive searches will be performed.
+    [display the abstract for all available packages]
+    PPM> query /abstract
+            bar: Bars foos
+            baz: Tool for bazing and cleaning BAZs.
+            [...]
+    [search for packages containing a certain regex in the /ABSTRACT tag]
+    PPM> query /abstract clean.*baz
+    Matching packages found at P:\PACKAGES:
+             baz: Tool for bazing and cleaning BAZs.
+    PPM> quit
+
+=item ppm install http://www.ActiveState.com/packages/foo.ppd
+
+Installs the software package 'foo' based on the information in the PPD
+obtained from the specified URL.
+
+=item ppm verify --upgrade foo
+
+Compares the currently installed version of the software package 'foo'
+to the one available according to the PPD obtained from the location
+specified for this package in the PPM data file, and upgrades
+to a newer version if available.
+
+=item ppm verify --location=P:\PACKAGES --upgrade foo
+
+Compares the currently installed version of the software package 'foo'
+to the one available according to the PPD obtained from the specified
+directory, and upgrades to a newer version if available.
+
+=item ppm verify --upgrade
+
+Verifies and updates every installed package on the system, using upgrade
+locations specified in the PPM data file.
+
+=item ppm search --location=http://www.ActiveState.com/packages
+
+Displays the packages with PPD files available at the specified location.
+
+=item ppm search --location=P:\PACKAGES --searchtag=author ActiveState
+
+Searches the specified location for any package with an <AUTHOR> tag
+containing the string 'ActiveState'.  On a successful search, the package
+name and the matching string are displayed.
+
+=back
+
+=head1 Environment variables
+
+=over 4
+
+=item HTTP_proxy
+
+If the environment variable 'HTTP_proxy' is set, then it will
+be used as the address of a proxy server for accessing the Internet.
+
+=back
+
+=head1 Files
+
+These files are fully described in the 'Files' section of PPM:ppm.
+
+=over 4
+
+=item package.ppd
+
+A description of a software package, in extended Open Software Description
+(OSD) format.  More information on this file format can be found in
+PPM::ppd.
+
+=item ppm.xml - PPM data file.
+
+This file is specified using the environment variable 'PPM_DAT';  if this
+is not set, the file 'ppm.xml' is expected to be located in the same 
+directory as this script.
+
+An XML format file containing information about the local system,
+specifics regarding the locations from which PPM obtains PPD files, and
+the installation details for any package installed by ppm.
+
+=back
+
+=cut
+
diff --git a/tools/Perl/bin/uninstall.pl b/tools/Perl/bin/uninstall.pl
new file mode 100644
index 000000000..885df396b
--- /dev/null
+++ b/tools/Perl/bin/uninstall.pl
@@ -0,0 +1,211 @@
+#
+# Uninstall.pl
+#
+# Author: Michael Smith (mikes@ActiveState.com)
+#
+# Copyright © 1998 ActiveState Tool Corp., all rights reserved.
+#
+###########################################################
+
+use Win32::Registry;
+use File::Find;
+use MetabaseConfig;
+
+my $data_file = $ARGV[0];
+my $ENVIRONMENT_KEY = 'SYSTEM\CurrentControlSet\Control\Session Manager\Environment';
+
+ReadData();
+Warn();
+UninstallDependents();
+CleanPath();
+RemoveIISVirtDirs();
+RemoveIISScriptMaps();
+RemoveLinesFromFiles();
+RemoveDirectories();
+RemoveFiles();
+CallInstallShield();
+sleep(3);
+exit(0);
+
+sub ReadData {
+    print "Reading uninstall data...\n";
+    my $data = '';
+    $rv = open(DATA, "<$data_file");
+    if($rv) {
+        map($data .= $_, <DATA>);
+        close(DATA);
+        eval($data);
+    }else{
+        die "Error reading uninstallation data file. Aborting!!";
+    }
+}
+
+sub Warn {
+    print "This will uninstall $app_name. Do you wish to continue?\n";
+    print "[y|N] ==>";
+    my $response = '';
+    while(($response = <STDIN>) !~ /^[\nyn]/i){};
+    if($response !~ /^y/i) {
+        print "Aborting $app_name uninstallation!\n";
+        exit(0);
+    }
+}
+
+sub UninstallDependents {
+    my $RegObj = 0;
+    my $UninstallString = '';
+    my $type = 0;
+    my $rv = 0;
+    
+    foreach $dependent (@$dependents) {
+        print "$dependent is dependent on $app_name\n" .
+                "and will not function correctly without it.\n" .
+                "Would you like to uninstall $dependent?\n" .
+                "[y|n] ==>";
+        while(($response = <STDIN>) !~ /[yn]/i){};
+        
+        if($response =~ /y/i) {
+            $rv = $HKEY_LOCAL_MACHINE->Open("software\\microsoft\\windows\\currentversion\\uninstall\\$dependent", $RegObj);
+            if($rv) {
+                $rv = $RegObj->QueryValueEx("UninstallString", $type, $UninstallString);
+                if($rv) {
+                    $RegObj->Close();
+                    print $UninstallString;
+                    print "Uninstalling $dependent...\n";
+                    $rv = (system($UninstallString) ? 0 : 1);
+                }
+            }
+            
+            if(!$rv) {
+                print "Error uninstalling $dependent!\n\n";
+            }
+        }
+    }
+}
+
+sub CleanPath {
+    if(@$path_info) {
+        print "Cleaning PATH...\n";
+        my $path = '';
+        if(Win32::IsWinNT) {
+            my $Environment = 0;
+            if($HKEY_LOCAL_MACHINE->Open($ENVIRONMENT_KEY, $Environment)) {
+                if($Environment->QueryValueEx("PATH", $type, $path)) {
+                    for $dir (@$path_info) {
+                        $dir =~ s/\\/\\\\/g;
+                        $path =~ s/$dir;?//ig;
+                    }
+                    $Environment->SetValueEx("PATH", -1, $type, $path);
+                }
+            }
+        } else {
+            my $file = "$ENV{'SystemDrive'}/autoexec.bat";
+            if(open(FILE, "<$file")) {
+                my @statements = <FILE>;
+                close(FILE);
+                my $path = '';
+                for $statement (@statements) {
+                    if($statement =~ /\s+path\s?=/i) {
+                        $path = $statement;
+                        for $dir (@$path_info) {
+                            $dir =~ s/\\/\\\\/g;
+                            $path =~ s/$dir;?//ig;
+                        }
+                    }
+                }
+                if(open(FILE, ">$file")) {
+                    print FILE @statements;
+                    close(FILE);
+                }
+            }
+        }
+    }
+}
+
+sub RemoveIISVirtDirs {
+    if(@$iis_virt_dir) {
+        print "Removing IIS4 virtual directories...\n";
+        for $virt_dir (@$iis_virt_dir) {
+            $rv = MetabaseConfig::DeleteVirDir(1, $virt_dir);
+            if($rv =~ /^Error/i){
+                print "$rv\n";
+                system('pause');
+            }
+        }
+    }
+}
+
+sub RemoveIISScriptMaps {
+    if(keys %$iis_script_map) {
+        print "Removing IIS4 script maps...\n";
+        my $virt_dir = '';
+        for $key (keys %$iis_script_map) {
+            print "Virtual Directory ==> $key\n";
+            for $script_map (@{$iis_script_map->{$key}}) {
+                print "\t$key ==> $script_map\n";
+                $virt_dir = $key;
+                $virt_dir = ($virt_dir eq '.' ? '' : $virt_dir);
+                $rv = MetabaseConfig::RemoveFileExtMapping(1, $virt_dir, $script_map);
+                if($rv =~ /^Error/i){
+                    print "$rv\n";
+                    system('pause');
+                }
+            }
+        }
+    }
+}
+
+sub RemoveLinesFromFiles {
+    my $file;
+
+    foreach $file (keys %$lines_in_file) {
+        open(FILE, "<$file") or next;
+        my @lines = <FILE>;
+        close(FILE);
+        open(FILE, ">$file") or next;
+LINE:   foreach $line (@lines) {
+            chomp $line;
+            for ($offset = 0; $offset <= $#{$$lines_in_file{$file}}; $offset++) {
+                if ($line eq $$lines_in_file{$file}[$offset]) {
+                    splice(@{$$lines_in_file{$file}}, $offset, 1);
+                    next LINE;
+                }
+            }
+            print FILE "$line\n";
+        }
+        close(FILE);
+    }
+}
+
+sub RemoveDirectories {
+    if(@$directory) {
+        print "Removing directories...\n";
+        for $dir (@$directory) {
+            finddepth(\&DeleteFiles, $dir);
+            rmdir($dir);
+        }
+    }
+}
+
+sub RemoveFiles {
+    if(@$file) {
+        print "Removing files...\n";
+        for $file (@$file) {
+            unlink($file);
+        }
+    }
+}
+
+sub CallInstallShield {
+    print "Calling InstallShield...\n";
+    system("start $is_uninstall_string");
+}
+
+sub DeleteFiles {
+    if(-d $File::Find::name) {
+        rmdir("$File::Find::name");
+    } else {
+        unlink("$File::Find::name");
+    }
+}
+
diff --git a/tools/Perl/pl/REP.PL b/tools/Perl/pl/REP.PL
new file mode 100644
index 000000000..c467d033a
--- /dev/null
+++ b/tools/Perl/pl/REP.PL
@@ -0,0 +1,120 @@
+# main
+#{
+	($ReportFile,$OldFile)=@ARGV;
+
+	if ($OldFile ne "")
+		{
+		ReadOldFile($OldFile);
+		}
+
+	&FindStuff($ReportFile);
+#}
+
+sub ReadOldFile
+{
+	local ($INFILE)=@_;
+
+	open(INFILE) || die "Can't open in file $INFILE; $!";
+
+	while (<INFILE>)
+		{
+		chop $_;
+		next if ($_ eq "");
+
+		if (/^Reporting Section (\w+)\s/)
+			{
+			local($Section)=$1;
+
+			while (<INFILE>)
+				{
+				chop $_;
+				last if ($_ eq "");
+				if (/^(\w+)\s+(\d+)/)
+					{
+					local ($FileName)=$1;
+					local ($Size)=$2;
+					local ($SecFile)="$Section:$FileName";
+
+					$OldSecFileToSize{$SecFile}=$2;
+					}
+				}
+			}
+		else
+			{
+			die "Expection section got $_";
+			}
+		}
+}
+
+sub FindStuff
+{
+	local ($INFILE)=@_;
+
+	open(INFILE) || die "Can't open in file $INFILE; $!";
+
+	while (<INFILE>)
+		{
+		chop $_;
+		last if (/^Program/);
+
+		if (/^\s[A-Z0-9]+\s[A-Z0-9]+\s([A-Z0-9]+)\s[A-Z0-9]+\s(\w+)+\s+\.(\w+)_.*/)
+			{
+			$Size=$1;
+			$Section=$2;
+			$File=$3;
+
+			push (@AllSecs,$Section) if (!$SecSeen{$Section}++);
+
+			$SecToRec{$Section}.="!" if ($SecToRec{$Section} ne "");
+			$SecToRec{$Section}.="$File:$Size";
+			}
+		}
+
+	close(INFILE);
+
+	foreach $Sec (@AllSecs)
+		{
+		local(@Recs)=split(/!/,$SecToRec{$Sec});
+		local(%SizeToFile);
+
+		local ($SizeInAll)=0;
+
+		foreach $DatRec (@Recs)
+			{
+			($File,$Size)= split(/:/,$DatRec);
+			$Size=hex($Size);
+
+			$SizeInAll+=$Size;
+
+			$SizeToFile{$Size}.=":" if ($SizeToFile{$Size} ne "");
+			$SizeToFile{$Size}.=$File;
+			}
+
+		$SizeK=$SizeInAll/1024;
+
+		print "\nReporting Section $Sec ($SizeK $SizeInAll)\n";
+
+		foreach $Num (sort numerically keys(%SizeToFile))
+			{
+			local(@Files)=split(/:/,$SizeToFile{$Num});
+
+			foreach $LastFile (@Files)
+				{
+				print "$LastFile\t$Num";
+				local($SecFile)="$Sec:$LastFile";
+
+				if ($OldSecFileToSize{$SecFile})
+					{
+					local($Changed)=$Num-$OldSecFileToSize{$SecFile};
+					print"\t$Changed";
+		#			print"was $OldSecFileToSize{$SecFile}";
+					}
+
+				print "\n";
+				}
+
+			}
+		}
+}
+
+sub numerically { $b <=> $a;}
diff --git a/tools/Perl/pl/anim.pl b/tools/Perl/pl/anim.pl
new file mode 100644
index 000000000..8fdf85ce5
--- /dev/null
+++ b/tools/Perl/pl/anim.pl
@@ -0,0 +1,94 @@
+LettersAndNames=
+(
+	"A","ANGRY",
+	"B","BORED",
+	"C","CHEER",
+	"F","FIGHT",
+	"H","THROW",
+	"I","ITCH",
+	"K","CRY",
+	"L","LOOPLEASE",
+	"N","SLIDE",
+	"O","DEAD",
+	"R","RUN",
+	"S","STAND",
+	"T","TUMBLE",
+#	"U","WATING",
+	"V","VOMIT",
+	"W","WALK",
+	"Y","YARN",
+);
+
+foreach $Val (keys %LettersAndNames)
+	{
+	push (@Letters,$Val);
+	}
+
+while (<>)
+	{
+	foreach $Letter (@Letters)
+		{
+		if (/(FRM_CH\d$Letter\d+)/)
+			{
+			$AllFrames{$Letter}.=":$1";
+			}
+		}
+	}
+print ("/* Generated by anim.pl, so please don't go hand editing this file like some sort of cunt. xxxx gaz. */ \n");
+
+print ("#include \"data\\graf\\kid.h\"\n");
+print ("#include \"gfx\\anim.h\"\n\n");
+
+foreach $Letter (@Letters)
+	{
+	@ThisLettersFrames=split(/:/,$AllFrames{$Letter});
+
+	$LargestFrame=0;
+
+	foreach $Frame (@ThisLettersFrames)
+		{
+		$Frame=~/FRM_CH\d$Letter(\d+)/;
+		$LargestFrame=$1 if ($1 > $LargestFrame);
+		}
+
+		{
+
+		$LargestFrame=sprintf("%d",$LargestFrame);
+		$NumOfFrames=$LargestFrame+1;
+
+		for ($f=1;$f<6;$f++)
+			{
+			printf("static u16 const ANM_$LettersAndNames{$Letter}$f\[$NumOfFrames\]={",);
+
+			for ($i=0;$i<$NumOfFrames;$i++)
+			  {
+			  $Str=sprintf("FRM_CH$f$Letter%04d,",$i);
+			  print $Str;
+			  }
+
+			print "};\n";
+			}
+		print("\nstatic ANM const ANM_$LettersAndNames{$Letter}={");
+		print ("$NumOfFrames,");
+		print ("{");
+
+		for ($f=1;$f<6;$f++)
+			{
+			print "ANM_$LettersAndNames{$Letter}$f,";
+			}
+		print ("}};\n\n\n");
+		}
+	}
+
+print "ANM const * const AnimTab[]=\n{\n";
+
+foreach $Letter (@Letters)
+	{
+	print "\t&ANM_$LettersAndNames{$Letter},\n";
+
+	}
+
+print "};\n";
+
+
+
diff --git a/tools/Perl/pl/check.pl b/tools/Perl/pl/check.pl
new file mode 100644
index 000000000..d6fafc06d
--- /dev/null
+++ b/tools/Perl/pl/check.pl
@@ -0,0 +1,37 @@
+$HadOver=0;
+
+while (<>)
+	{
+	chop $_;
+	$File=$_;
+
+	if ($File ne "")
+		{
+		local($INFILE)=$File;
+		binmode($INFILE);
+
+		open(INFILE) || die "Can't open in file $INFILE; $!";
+		binmode INFILE;
+		$Size= -s INFILE;
+
+		$buf='';
+		read(INFILE,$buf,$Size);
+
+		if ($buf=~/_GLOBAL_\.[ID]/)
+			{
+			print "Construction code in $File\n";
+			$HadOver=1;
+			}
+
+		close(INFILE);
+		}
+	}
+
+if ($HadOver == 0)
+	{
+	print "No errors";
+	}
+else
+	{
+	print "Error: Constructors in overlay code";
+	}
diff --git a/tools/Perl/pl/checkdat.pl b/tools/Perl/pl/checkdat.pl
new file mode 100644
index 000000000..a9365dfa1
--- /dev/null
+++ b/tools/Perl/pl/checkdat.pl
@@ -0,0 +1,97 @@
+$Errors=0;
+
+while (<>)
+	{
+	/^\[(.*)\]/;
+
+	if ($1 ne "")
+		{
+		local (@Text);
+		local ($StrId)=($1);
+
+		$Text[0]=GetLang("Eng");
+		$Text[1]=GetLang("Fre");
+		$Text[2]=GetLang("Ger");
+		$Text[3]=GetLang("Swe");
+		$Text[5]=GetLang("Jap");
+
+		$Errors+=CheckPerc($StrId,@Text);
+		}
+	}
+
+if ($Errors != 0)
+	{
+	print "Some monkey's messed up the dbase with $Errors errors";
+	}
+
+sub GetLang
+{
+	local ($LangStr)=@_;
+
+	$_=<>;
+	die if (!(/($LangStr=\".*\")/));
+	("File $ARGV line $. : $1");
+}
+
+
+sub CheckPerc
+{
+	local ($StrId,@Text)=@_;
+	local ($f);
+	local ($Errors);
+
+	@Master=MakePercArray($Text[0]);
+
+	for ($f=1;$f<6;$f++)
+		{
+		local (@Local)=MakePercArray($Text[$f]);
+
+		if (!CheckPercArray(@Local))
+			{
+			print "Error with $StrId\n";
+			$Text[0]=~/^File .* line .* : (.*)/;
+			local ($ShouldBe)=$1;
+			print "Should be $ShouldBe\n";
+			print "$Text[$f]\n\n";
+			$Errors++;
+			}
+		}
+	return($Errors);
+}
+
+sub CheckPercArray
+{
+	local(@Local)=@_;
+	local ($f);
+
+	for ($f=0;$f<@Local;$f++)
+		{
+		return(0) if ($Local[$f] ne $Master[$f])
+		}
+
+	return(1);
+}
+
+sub MakePercArray
+{
+	local ($Str)=@_;
+	local (@Ret);
+
+	$Str=~s/%%/!!/g;
+
+	while (1)
+		{
+		if ($Str=~/%([A-Za-z0-9+-]*)/)
+			{
+			push (@Ret,$1);
+			$Str=$';
+			}
+		else
+			{
+			last;
+			}
+		}
+
+	return(@Ret);
+
+}
diff --git a/tools/Perl/pl/dep.pl b/tools/Perl/pl/dep.pl
new file mode 100644
index 000000000..0a7a9d44f
--- /dev/null
+++ b/tools/Perl/pl/dep.pl
@@ -0,0 +1,18 @@
+# main
+#{
+	($InFile,$OutFile,$ObjFile)=@ARGV;
+
+	$OutFile=">$OutFile";
+
+	open(InFile) || die "Can't open in file $InFile; $!";
+	open(OutFile) || die "Can't open in file $OutFile; $!";
+
+	while (<InFile>)
+		{
+		s/^.*\.obj.*:\w*.*\.cpp/$ObjFile:/g;
+		print (OutFile $_);
+		}
+
+	close(OutFile);
+	close(InFile);
+#}
diff --git a/tools/Perl/pl/features.pl b/tools/Perl/pl/features.pl
new file mode 100644
index 000000000..a0fa3603b
--- /dev/null
+++ b/tools/Perl/pl/features.pl
@@ -0,0 +1,60 @@
+$OutFile=shift(@ARGV);
+$World=shift(@ARGV);
+$Type=shift(@ARGV);
+$Command=shift(@ARGV);
+$DataOut=shift(@ARGV);
+$GrafDir=shift(@ARGV);
+
+$OutFile=">$OutFile";
+
+open(OutFile) || die "Can't open in file $OutFile; $!";
+
+printf(OutFile  ".PHONY : $World$Type clean$World$Type\n\n");
+
+foreach $Val (@ARGV)
+	{
+	@Stuff=split(/-/,$Val);
+	$ArsName=shift(@Stuff);
+
+	push(@ArsNames,$ArsName);
+	
+	$ArsNameToAnims{$ArsName}=join('!',@Stuff);
+	}
+
+printf(OutFile  "$World$Type");
+printf(OutFile  "_ARS_FILES := ");
+
+foreach $Ars (@ArsNames)
+	{printf(OutFile "$DataOut$Ars.ars ");}
+
+printf(OutFile "\n");
+
+foreach  $Ars (@ArsNames)
+	{
+	printf(OutFile "$DataOut$Ars.ars : ");
+
+	@Anims=split(/!/,$ArsNameToAnims{$Ars});
+
+	foreach $Anim (@Anims)
+		{printf(OutFile "$GrafDir$Ars/$Anim.gin ");}
+
+	printf(OutFile "\n\t$Command ");
+
+	foreach $Anim (@Anims)
+		{printf(OutFile "$GrafDir$Ars/$Anim.gin ");}
+
+	printf(OutFile "\n\n");
+	}
+	
+printf(OutFile "$World$Type :  \$($World$Type");
+printf(OutFile "_ARS_FILES)\n\n");
+
+printf(OutFile "clean$World$Type :\n");
+printf(OutFile "\t\@\$(RM) -f \$($World$Type");
+printf(OutFile "_ARS_FILES)\n");
+printf(OutFile "\t\@\$(ECHO) Cleaned $World $Type\n");
+
+close(OutFile);
+	
+
+
diff --git a/tools/Perl/pl/gfxmak.pl b/tools/Perl/pl/gfxmak.pl
new file mode 100644
index 000000000..ac4807da6
--- /dev/null
+++ b/tools/Perl/pl/gfxmak.pl
@@ -0,0 +1,204 @@
+
+$OutFile=shift(@ARGV);
+$World=shift(@ARGV);
+$DataOut=shift(@ARGV);
+$GrafDir=shift(@ARGV);
+
+if (0)
+	{
+	printf "OutFile :  $OutFile\n";
+	printf "World :    $World\n";
+	printf "DataOut :  $DataOut\n";
+	printf "GrafDir :  $GrafDir\n";
+	printf "\n";
+	}
+
+$OutFile=">$OutFile";
+
+open(OutFile) || die "Can't open in file $OutFile; $!";
+
+$RidesDir=$GrafDir;
+
+$RidesOutDir=$DataOut;
+
+foreach $Val (@ARGV)
+	{
+	@Stuff=split(/-/,$Val);
+
+	$RideBank=shift(@Stuff);
+
+	$RideName=shift(@Stuff);
+
+	if ($RideBank eq 1)
+		{
+		push(@RideNamesBank1,$RideName);
+		}
+
+	if ($RideBank eq 2)
+		{
+		push(@RideNamesBank2,$RideName);
+		}
+
+
+	push(@RideNames,$RideName);
+	
+	$RideNameToAnims{$RideName}=join('!',@Stuff);
+	$RideNameToRideBank{$RideName}=$RideBank;
+	}
+
+foreach $Ride (@RideNames)
+	{push (@AllArsFiles,"$RidesOutDir$Ride.ars");}
+
+$SharedOutWorld_1 ="shared_out_";
+$SharedOutWorld_1 .="$World";
+$SharedOutWorld_1 .="_1";
+
+
+$SharedOutWorld_2 ="shared_out_";
+$SharedOutWorld_2 .="$World";
+$SharedOutWorld_2 .="_2";
+
+print (OutFile ".PHONY : make$World clean$World shared$World shared$World");
+print (OutFile "1 shared$World");
+print (OutFile "2 cleanshared$World\n\n");
+
+printf(OutFile  "shared_out_$World := \$(REPORT_DIR)/$World.rep\n");
+
+printf (OutFile "$SharedOutWorld_1 := \$(REPORT_DIR)/$World");
+printf (OutFile "_1.rep\n");
+
+printf (OutFile "$SharedOutWorld_2 := \$(REPORT_DIR)/$World");
+printf (OutFile "_2.rep\n");
+
+printf (OutFile "\n\n");
+
+print (OutFile $World,"_ARS_FILES := ",join(' ',@AllArsFiles),"\n\n");
+
+
+printf (OutFile "BANK_1_GIN_$World := ");
+
+foreach $Ride (@RideNamesBank1)
+	{
+	@TheseGins=split(/!/,$RideNameToAnims{$Ride});
+	foreach $Gin (@TheseGins)
+		{
+		printf(OutFile "$GrafDir$Ride/$Gin.gin ");
+		}
+	}
+
+printf (OutFile "\n");
+
+
+printf (OutFile "BANK_2_GIN_$World := ");
+
+foreach $Ride (@RideNamesBank2)
+	{
+	@TheseGins=split(/!/,$RideNameToAnims{$Ride});
+	foreach $Gin (@TheseGins)
+		{
+		printf(OutFile "$GrafDir$Ride/$Gin.gin ");
+		}
+	}
+printf (OutFile "\n");
+
+printf (OutFile "\n\n");
+
+
+foreach $Ride (@RideNames)
+	{
+	@Anims=split(/!/,$RideNameToAnims{$Ride});
+
+	printf (OutFile "$RidesOutDir$Ride.ars : ");
+
+	foreach $RideAnim (@Anims)
+		{printf (OutFile "$RidesDir$Ride/$RideAnim.gin ");}
+
+	print (OutFile "\n\t@\$(ECHO) Creating $Ride.ars from ",join(" ",@Anims));
+	print (OutFile "\n\t\$(");
+	print (OutFile "$World");
+	print (OutFile "_MAKE_RIDE_");
+	print (OutFile "$RideNameToRideBank{$Ride}) ");
+
+	foreach $RideAnim (@Anims)
+		{printf (OutFile "$RidesDir$Ride/$RideAnim.gin ");}
+
+	print (OutFile "\n\n");
+	}
+
+
+printf(OutFile  "\nshared$World");
+printf(OutFile  "1 : \$($SharedOutWorld_1)\n\n");
+
+printf(OutFile  "\nshared$World");
+printf(OutFile  "2 : \$($SharedOutWorld_2)\n\n");
+
+printf(OutFile  "\ncleanshared$World");
+printf(OutFile  "1 :\n\t\$(RM) -f \$($SharedOutWorld_1)\n\n");
+
+printf(OutFile  "\ncleanshared$World");
+printf(OutFile  "2 :\n\t\$(RM) -f \$($SharedOutWorld_2)\n\n");
+
+printf(OutFile  "\nshared$World : \$(shared_out_$World)\n\n");
+
+printf(OutFile  "cleanshared$World : \n\t\$(RM) -f \$(shared_out_$World)\n\n");
+
+printf(OutFile  "\$(shared_out_$World) : \$($World");
+printf(OutFile  "_shared_tx_full)\n");
+printf(OutFile	"\t\$(MAKE_SHARED) \$($World");
+
+printf(OutFile	"_shared_tx_full) \$($World");
+printf(OutFile	"_anim_shared_tx_full)\n\n");
+
+printf(OutFile  "\$(");
+printf(OutFile  $World);
+printf(OutFile  "_ARS_FILES) : \$(shared_out_$World) \$($SharedOutWorld_1) \$($SharedOutWorld_2)\n\n");
+
+printf(OutFile  "\$($SharedOutWorld_1) : \$(BANK_1_GIN_$World)\n\t\$(MAKE_SHARED_1) \$(BANK_1_GIN_$World)\n\n");
+printf(OutFile  "\$($SharedOutWorld_2) : \$(BANK_1_GIN_$World)\n\t\$(MAKE_SHARED_2) \$(BANK_2_GIN_$World)\n\n");
+
+print (OutFile "make$World : shared$World shared$World");
+print (OutFile "1 shared$World");
+print (OutFile "2 \$(",$World,"_ARS_FILES)\n\n");
+
+print (OutFile "shared$World");
+print (OutFile "1 shared$World");
+print (OutFile "2 : shared$World\n");
+
+printf (OutFile "\n\n");
+
+print (OutFile "clean$World :\n\t@\$(RM) -f \$(",$World,"_ARS_FILES)\n\t@\$(ECHO) cleaned $World rides\n");
+
+printf (OutFile "\n");
+printf (OutFile "\n");
+
+printf (OutFile "\n\n");
+
+
+close(OutFile);
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/tools/Perl/pl/lang.pl b/tools/Perl/pl/lang.pl
new file mode 100644
index 000000000..dadce4a11
--- /dev/null
+++ b/tools/Perl/pl/lang.pl
@@ -0,0 +1,147 @@
+#=========================================================================
+#
+#	LANG.PL
+#
+#	Author:  Gary Liddon @ Climax
+#	Created: 
+#	Project: TPW PSX
+#	Purpose:
+#	Usage:
+#
+#	Copyright (c) 1999 Climax Development Ltd
+#
+#===========================================================================
+
+# PKG - Added check for invalid id tags
+
+
+#MAIN
+#{
+	local ($englishFile,$outFile,@langFiles)=@ARGV;
+
+	readTransFile($englishFile,"eng",\%english);
+
+	foreach $Id (keys(%english))
+		{
+		$idToTrans{$Id}="eng=$english{$Id}";
+		}
+
+
+	foreach $file (@langFiles)
+		{
+		local (%otherLang);
+		$otherLang={};
+
+		printf "trying $file\n";
+
+		if ($file=~/^.*\\(.*)\.dat/)
+			{
+			$prefix=$1;
+			}
+		else
+			{
+			if ($file=~/^.*\/(.*)\.dat/)
+				{
+				$prefix=$1;
+				}
+			}
+			
+
+		printf "reading $file\n";
+		readTransFile($file,$prefix,\%otherLang);
+		printf "read $file\n";
+
+		foreach $Id (keys(%english))
+			{
+			if ($otherLang{$Id} ne "")
+				{
+				local (@trans)=split(/arsebiscuits/,$idToTrans{$Id});
+				push(@trans,"$prefix=$otherLang{$Id}");
+				$idToTrans{$Id}=join('arsebiscuits',@trans);
+				}
+			}
+
+		}
+
+	if ($outFile ne "")
+		{
+		$OUTFILE= ">$outFile";
+
+		open(OUTFILE) || die "Can't open file $outFile; $!";
+
+		foreach $Id (keys(%idToTrans))
+			{
+			print (OUTFILE "[$Id]\n");
+
+			local (@trans)=split(/arsebiscuits/,$idToTrans{$Id});
+
+			foreach $text (@trans)
+				{
+				print (OUTFILE "$text\n");
+				}
+
+			print (OUTFILE "\n");
+			}
+
+		close(OUTFILE);
+		}
+	
+#}
+
+# Read a translation file into an associative array
+sub readTransFile
+{
+	local($inFile,$prefix,$destArray)=@_;
+
+	$INFILE = $inFile;
+
+	open(INFILE) || die "Can't open file $inFile; $!";
+
+	while (<INFILE>)
+		{
+		if (/^\[(.*)]\n/)
+			{
+			$id=$1;
+			if($id=~/[^a-zA-Z0-9_]/)
+			{
+				die("Invalid id tag [$id] in $inFile\nTag may only contain a-z, A-Z, 0-9 and _\n");
+			}
+
+			$Done = 0;
+
+			while (!$Done)
+				{
+				$_=<INFILE>;
+				chop $_;
+				s/;.*//g;
+
+				if ($_ ne "")
+					{
+					if (/^(.*)\=(.*)/)
+						{
+						if ($1 eq $prefix)
+							{
+							
+							$text=$2;
+							$Done=1;
+							}
+						}
+					else
+						{
+						print "!$_!";
+						die "incorrectly formatted file $inFile\nlooking for $prefix=<text> for id $id\n";
+						}
+					}
+				}
+
+			$$destArray{$id}="$text";
+			}
+		}
+
+	close(INFILE);
+}
+
+
+
+#===========================================================================
+#ends
diff --git a/tools/Perl/pl/makeconf.pl b/tools/Perl/pl/makeconf.pl
new file mode 100644
index 000000000..3b37e5cdd
--- /dev/null
+++ b/tools/Perl/pl/makeconf.pl
@@ -0,0 +1,25 @@
+	use	Win32;
+
+&WriteConf($ARGV[0],$ARGV[1]);
+
+sub WriteConf
+{
+	local ($INFILE,$OutName)=@_;
+	local ($OUTFILE);
+	$OUTFILE=">";
+	$OUTFILE.=$OutName;
+
+	$Name=Win32::LoginName;
+
+	open(INFILE) || die "Can't open in file $INFILE; $!";
+	open(OUTFILE) || die "Can't open output file $OutName; $!";
+
+	while (<INFILE>)
+		{
+		s/\!/$Name/g;
+		print (OUTFILE $_);
+		}
+
+	close($OUTFILE);
+	close(INFILE);
+}
diff --git a/tools/Perl/pl/mkbig.pl b/tools/Perl/pl/mkbig.pl
new file mode 100644
index 000000000..f955f40c2
--- /dev/null
+++ b/tools/Perl/pl/mkbig.pl
@@ -0,0 +1,42 @@
+#=========================================================================
+#
+#	MKSTR.PL
+#
+#	Author:  Gary Liddon @ Climax
+#	Created: 
+#	Project: Diablo PSX
+#	Purpose: Makes some bse files from a base file
+#	Usage:   pl mkstr.pl <base file> <data dir> <gfx dir> <music dir> <stream sfx dir> <sfx dir>
+#
+#	Copyright (c) 1997 Climax Development Ltd
+#
+#===========================================================================
+
+
+#MAIN
+#{
+
+	local ($BaseFile,$BinDir,$OutFile)=@ARGV;
+
+	$OUTFILE=">";
+	$OUTFILE.=$OutFile;
+
+	local ($INFILE)=$BaseFile;
+
+	open(OUTFILE) || die "Can't open output file $OutFile: $!";
+	open(INFILE) || die "Can't open monst inffile $InfFile; $!";
+
+	while (<INFILE>)
+		{
+		s/\[BINDIR\]/$BinDir/g;
+		s/\//\\/g;
+		print (OUTFILE $_);
+		}
+
+	print "written $OutFile\n";
+
+	close(INFILE);
+	close($OUTFILE);
+#}
+
+
diff --git a/tools/Perl/pl/mkstr.pl b/tools/Perl/pl/mkstr.pl
new file mode 100644
index 000000000..8dc1e0a88
--- /dev/null
+++ b/tools/Perl/pl/mkstr.pl
@@ -0,0 +1,48 @@
+#=========================================================================
+#
+#	MKSTR.PL
+#
+#	Author:  Gary Liddon @ Climax
+#	Created: 
+#	Project: Diablo PSX
+#	Purpose: Makes some bse files from a base file
+#	Usage:   pl mkstr.pl <base file> <data dir> <gfx dir> <music dir> <stream sfx dir> <sfx dir>
+#
+#	Copyright (c) 1997 Climax Development Ltd
+#
+#===========================================================================
+
+
+#MAIN
+#{
+
+	local ($BaseFile,$DataDir,$GfxDir,$VagDir,$SfxDir,$OutFile)=@ARGV;
+
+	#die if ($BaseFile eq "" or $DataDir  eq "" or $GfxDir eq "" or $MusicDir eq "" or $StreamSfxDir eq "" or  $SfxDir or $OutFile eq "");
+
+	$OUTFILE=">";
+	$OUTFILE.=$OutFile;
+
+	local ($INFILE)=$BaseFile;
+
+	open(OUTFILE) || die "Can't open output file $OutFile: $!";
+	open(INFILE) || die "Can't open monst inffile $InfFile; $!";
+
+	while (<INFILE>)
+		{
+		s/\[DATA\]/$DataDir/g;
+		s/\[GFX\]/$GfxDir/g;
+		s/\[VAG\]/$VagDir/g;
+		s/\[SFX\]/$SfxDir/g;
+		s/\//\\/g;
+		print (OUTFILE $_);
+		}
+
+	print "written $OutFile\n";
+
+	close(INFILE);
+	close($OUTFILE);
+
+#}
+
+
diff --git a/tools/Perl/pl/notused.pl b/tools/Perl/pl/notused.pl
new file mode 100644
index 000000000..04aa5c5bd
--- /dev/null
+++ b/tools/Perl/pl/notused.pl
@@ -0,0 +1,22 @@
+while (<>)
+	{
+	if (/^\s+.*\s+(\d+)\s+(\d+)\s+(\d+)/)
+		{
+		if ($1 eq "0")
+			{
+			if ($2 eq "0")
+				{
+				if ($3 eq "0")
+					{
+					print "$_";
+					}
+				}
+			
+			}
+		}
+	else
+		{
+		print $_;
+		
+		}
+	}
\ No newline at end of file
diff --git a/tools/Perl/pl/shops.pl b/tools/Perl/pl/shops.pl
new file mode 100644
index 000000000..ff1651b01
--- /dev/null
+++ b/tools/Perl/pl/shops.pl
@@ -0,0 +1,64 @@
+$OutFile=shift(@ARGV);
+$World=shift(@ARGV);
+$Type=shift(@ARGV);
+$Command=shift(@ARGV);
+$DataOut=shift(@ARGV);
+$GrafDir=shift(@ARGV);
+
+$OutFile=">$OutFile";
+
+open(OutFile) || die "Can't open in file $OutFile; $!";
+
+printf(OutFile "ifdef POO\n");
+
+printf(OutFile  ".PHONY : $World$Type clean$World$Type\n\n");
+
+foreach $Val (@ARGV)
+	{
+	@Stuff=split(/-/,$Val);
+	$ArsName=shift(@Stuff);
+
+	push(@ArsNames,$ArsName);
+	
+	$ArsNameToAnims{$ArsName}=join('!',@Stuff);
+	}
+
+printf(OutFile  "$World$Type");
+printf(OutFile  "_ARS_FILES := ");
+
+foreach $Ars (@ArsNames)
+	{printf(OutFile "$DataOut$Ars.ars ");}
+
+printf(OutFile "\n");
+
+foreach  $Ars (@ArsNames)
+	{
+	printf(OutFile "$DataOut$Ars.ars : ");
+
+	@Anims=split(/!/,$ArsNameToAnims{$Ars});
+
+	foreach $Anim (@Anims)
+		{printf(OutFile "$GrafDir$Ars/$Anim.gin ");}
+
+	printf(OutFile "\n\t$Command ");
+
+	foreach $Anim (@Anims)
+		{printf(OutFile "$GrafDir$Ars/$Anim.gin ");}
+
+	printf(OutFile "\n\n");
+	}
+	
+printf(OutFile "$World$Type :  \$($World$Type");
+printf(OutFile "_ARS_FILES)\n\n");
+
+printf(OutFile "clean$World$Type :\n");
+printf(OutFile "\t\@\$(RM) -f \$($World$Type");
+printf(OutFile "_ARS_FILES)\n");
+printf(OutFile "\t\@\$(ECHO) Cleaned $World $Type\n");
+
+printf(OutFile "\n\nendif");
+
+close(OutFile);
+	
+
+
diff --git a/tools/Perl/pl/size.pl b/tools/Perl/pl/size.pl
new file mode 100644
index 000000000..e15806006
--- /dev/null
+++ b/tools/Perl/pl/size.pl
@@ -0,0 +1,37 @@
+
+	&PrintSize($ARGV[0]);
+
+
+sub PrintSize
+{
+	local ($INFILE)=@_;
+
+	open(INFILE) || die "Can't open in file $INFILE; $!";
+	
+	while (<INFILE>)
+		{
+		chop $_;
+
+		if (/^\s[A-Z0-9]+\s([A-Z0-9]+)\s[A-Z0-9]+\s[A-Z0-9]+\s\w+\s+\.last/)
+			{
+			$Addr=$1;
+
+			$Addr=hex($Addr)-hex("80000000");
+			$Over=$Addr-(2*1024*1024);
+			if ($Over ge 0)
+				{
+				print "Size is $Addr ($Over over)\n";
+				}
+			else
+				{
+				$Over=0-$Over;
+				print "Size is $Addr ($Over to spare)\n";
+				}
+			last;
+			}
+			
+		}
+}
+
+
+
diff --git a/tools/Perl/pl/sizes.pl b/tools/Perl/pl/sizes.pl
new file mode 100644
index 000000000..8cca8641d
--- /dev/null
+++ b/tools/Perl/pl/sizes.pl
@@ -0,0 +1,51 @@
+	&GetSizes($ARGV[0]);
+
+
+
+sub GetSizes
+{
+	local ($INFILE)=@_;
+
+	open(INFILE) || die "Can't open in file $INFILE; $!";
+
+	while (<INFILE>)
+		{
+		last if (/.*Names in address order/);
+		}
+
+	while (<INFILE>)
+		{
+		chop $_;
+
+		if (/^\s([A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9][A-F0-9])\s(.*)/)
+			{
+			$Addr=$1;
+			$Label=$2;
+			$Addr=hex($Addr);
+
+			if ($Addr >= hex("80000000"))
+				{
+				if (!$Seen{$Label})
+					{
+					$Seen{$Label}++;
+					$Addr=$Addr-hex("80000000");
+
+					if ($LastLabel ne "")
+						{
+						print "$LastLabel\tsize\t",$Addr-$LastAddr,"\n";
+						}
+
+					$LastAddr=$Addr;
+					$LastLabel=$Label;
+					}
+				}
+			}
+		else
+			{
+			last;
+			}
+		}
+
+
+	close(INFILE);
+}
diff --git a/tools/Perl/pl/stats.pl b/tools/Perl/pl/stats.pl
new file mode 100644
index 000000000..bdbad8b00
--- /dev/null
+++ b/tools/Perl/pl/stats.pl
@@ -0,0 +1,96 @@
+
+	while (<>)
+		{
+		/^.*:\s+(.*)\n/;
+		$CodeFile=$1;
+
+		if ($CodeFile ne "")
+			{
+			$Code=<>;
+			$Data=<>;
+			$Bss=<>;
+			<>;
+
+			$Code=&GetNum($Code);
+			$Data=&GetNum($Data);
+			$Bss=&GetNum($Bss);;
+	
+			$CodeSizeToFile{$Code}.="!" if ($CodeSizeToFile{$Code} ne "");
+			$CodeSizeToFile{$Code}.=$CodeFile;
+
+			$DataSizeToFile{$Data}.="!" if ($DataSizeToFile{$Data} ne "");
+			$DataSizeToFile{$Data}.=$CodeFile;
+			
+			$BssSizeToFile{$Bss}.="!" if ($BssSizeToFile{$Bss} ne "");
+			$BssSizeToFile{$Bss}.=$CodeFile;
+			}
+		else
+			{
+			die "Strange line $_";
+			}
+		}
+
+print "Code Section\n";
+print "------------\n";
+
+foreach $Num (sort numerically keys(%CodeSizeToFile))
+	{
+	local(@Files)=split(/!/,$CodeSizeToFile{$Num});
+
+	foreach $File (@Files)
+		{
+		print "$File\t$Num\n";
+		}
+	}
+
+print "\n";
+
+
+print "Data Section\n";
+print "------------\n";
+
+foreach $Num (sort numerically keys(%DataSizeToFile))
+	{
+	local(@Files)=split(/!/,$DataSizeToFile{$Num});
+
+	foreach $File (@Files)
+		{
+		print "$File\t$Num\n";
+		}
+	}
+
+print "\n";
+
+print "Bss Section\n";
+print "-----------\n";
+
+foreach $Num (sort numerically keys(%BssSizeToFile))
+	{
+	local(@Files)=split(/!/,$BssSizeToFile{$Num});
+
+	foreach $File (@Files)
+		{
+		print "$File\t$Num\n";
+		}
+	}
+
+print "\n";
+
+sub GetNum
+{
+	local ($Line)=@_;
+
+	if ($Line=~/^\s+\w+\s+size:\s+(\d+)/)
+		{
+		($1);
+		}
+	else
+		{
+		die "Fuck";
+		}
+
+	($1);
+}
+
+
+sub numerically { $b <=> $a;}
diff --git a/tools/Perl/pl/user.pl b/tools/Perl/pl/user.pl
new file mode 100644
index 000000000..63119aa35
--- /dev/null
+++ b/tools/Perl/pl/user.pl
@@ -0,0 +1,21 @@
+	use	Win32;
+	
+if ($ARGV[0] ne "")
+	{
+	&WriteUserFile($ARGV[0]);
+	}
+
+sub WriteUserFile
+{
+	local ($OutName)=@_;
+	local ($OUTFILE);
+	$OUTFILE=">";
+	$OUTFILE.=$OutName;
+
+	open(OUTFILE) || die "Can't open output file $OutName; $!";
+
+	$Name=lc(Win32::LoginName);
+	print (OUTFILE "USER_NAME := $Name\n");
+	
+	close($OUTFILE);
+}
diff --git a/tools/chkshare.exe b/tools/chkshare.exe
new file mode 100644
index 000000000..7f5b3c633
Binary files /dev/null and b/tools/chkshare.exe differ
diff --git a/tools/cygwin/a.exe b/tools/cygwin/a.exe
new file mode 100644
index 000000000..636650509
Binary files /dev/null and b/tools/cygwin/a.exe differ
diff --git a/tools/cygwin/addr2line.exe b/tools/cygwin/addr2line.exe
new file mode 100644
index 000000000..93ef9d305
Binary files /dev/null and b/tools/cygwin/addr2line.exe differ
diff --git a/tools/cygwin/ar.exe b/tools/cygwin/ar.exe
new file mode 100644
index 000000000..ec63b38df
Binary files /dev/null and b/tools/cygwin/ar.exe differ
diff --git a/tools/cygwin/as.exe b/tools/cygwin/as.exe
new file mode 100644
index 000000000..1c2323d67
Binary files /dev/null and b/tools/cygwin/as.exe differ
diff --git a/tools/cygwin/awk.exe b/tools/cygwin/awk.exe
new file mode 100644
index 000000000..5d6f9356b
Binary files /dev/null and b/tools/cygwin/awk.exe differ
diff --git a/tools/cygwin/basename.exe b/tools/cygwin/basename.exe
new file mode 100644
index 000000000..11c07813f
Binary files /dev/null and b/tools/cygwin/basename.exe differ
diff --git a/tools/cygwin/bash.exe b/tools/cygwin/bash.exe
new file mode 100644
index 000000000..76bd346fd
Binary files /dev/null and b/tools/cygwin/bash.exe differ
diff --git a/tools/cygwin/bashbug b/tools/cygwin/bashbug
new file mode 100644
index 000000000..b3740d962
--- /dev/null
+++ b/tools/cygwin/bashbug
@@ -0,0 +1,143 @@
+#!/bin/sh -
+#
+# bashbug - create a bug report and mail it to the bug address
+#
+# The bug address depends on the release status of the shell.  Versions
+# with status `alpha' or `beta' mail bug reports to chet@po.cwru.edu.
+# Other versions send mail to bug-bash@gnu.org.
+#
+# configuration section:
+#	these variables are filled in by the make target in cpp-Makefile
+#
+MACHINE="i586"
+OS="cygwin32"
+CC="i586-cygwin32-gcc"
+CFLAGS=" -DPROGRAM='bash.exe' -DHOSTTYPE='i586' -DOSTYPE='cygwin32' -DMACHTYPE='i586-pc-cygwin32' -DCROSS_COMPILING -DSHELL -DHAVE_CONFIG_H   -I. -I/home/noer/src/b20/user-tools/devo/bash -I/home/noer/src/b20/user-tools/devo/bash/lib -O2"
+RELEASE="2.02"
+PATCHLEVEL="1"
+RELSTATUS="release"
+MACHTYPE="i586-pc-cygwin32"
+
+PATH=/bin:/usr/bin:/usr/local/bin:$PATH
+export PATH
+
+TEMP=/tmp/bbug.$$
+
+# Figure out how to echo a string without a trailing newline
+N=`echo 'hi there\c'`
+case "$N" in
+*c)	n=-n c= ;;
+*)	n= c='\c' ;;
+esac
+
+BASHTESTERS="bash-testers@po.cwru.edu"
+
+case "$RELSTATUS" in
+alpha*|beta*)	BUGBASH=chet@po.cwru.edu ;;
+*)		BUGBASH=bug-bash@gnu.org ;;
+esac
+
+case "$RELSTATUS" in
+alpha*|beta*)	echo "$0: This is a testing release.  Would you like your bug report"
+		echo "$0: to be sent to the bash-testers mailing list?"
+		echo $n "$0: Send to bash-testers? $c"
+		read ans
+		case "$ans" in
+		y*|Y*)	BUGBASH="${BUGBASH},${BASHTESTERS}" ;;
+		esac ;;
+esac
+
+BUGADDR="${1-$BUGBASH}"
+
+: ${EDITOR=emacs}
+
+: ${USER=${LOGNAME-`whoami`}}
+
+trap 'rm -f $TEMP $TEMP.x; exit 1' 1 2 3 13 15
+trap 'rm -f $TEMP $TEMP.x' 0
+
+UN=
+if (uname) >/dev/null 2>&1; then
+	UN=`uname -a`
+fi
+
+if [ -f /usr/lib/sendmail ] ; then
+	RMAIL="/usr/lib/sendmail"
+elif [ -f /usr/sbin/sendmail ] ; then
+	RMAIL="/usr/sbin/sendmail"
+else
+	RMAIL=rmail
+fi
+
+# this is raceable
+rm -f $TEMP
+
+cat > $TEMP <<EOF
+From: ${USER}
+To: ${BUGADDR}
+Subject: [50 character or so descriptive subject here (for reference)]
+
+Configuration Information [Automatically generated, do not change]:
+Machine: $MACHINE
+OS: $OS
+Compiler: $CC
+Compilation CFLAGS: $CFLAGS
+uname output: $UN
+Machine Type: $MACHTYPE
+
+Bash Version: $RELEASE
+Patch Level: $PATCHLEVEL
+Release Status: $RELSTATUS
+
+Description:
+	[Detailed description of the problem, suggestion, or complaint.]
+
+Repeat-By:
+	[Describe the sequence of events that causes the problem
+	to occur.]
+
+Fix:
+	[Description of how to fix the problem.  If you don't know a
+	fix for the problem, don't include this section.]
+EOF
+
+# this is still raceable
+rm -f $TEMP.x
+cp $TEMP $TEMP.x
+chmod u+w $TEMP
+
+trap '' 2		# ignore interrupts while in editor
+
+until $EDITOR $TEMP; do
+	echo "$0: editor \`$EDITOR' exited with nonzero status."
+	echo "$0: Perhaps it was interrupted."
+	echo "$0: Type \`y' to give up, and lose your bug report;"
+	echo "$0: type \`n' to re-enter the editor."
+	echo $n "$0: Do you want to give up? $c"
+
+	read ans
+	case "$ans" in
+	[Yy]*) exit 1 ;;
+	esac
+done
+
+trap 'rm -f $TEMP $TEMP.x; exit 1' 2	# restore trap on SIGINT
+
+if cmp -s $TEMP $TEMP.x
+then
+	echo "File not changed, no bug report submitted."
+	exit
+fi
+
+echo $n "Send bug report? [y/n] $c"
+read ans
+case "$ans" in
+[Nn]*)	exit 0 ;;
+esac
+
+${RMAIL} $BUGADDR < $TEMP || {
+	cat $TEMP >> $HOME/dead.bashbug
+	echo "$0: mail failed: report saved in $HOME/dead.bashbug" >&2
+}
+
+exit 0
diff --git a/tools/cygwin/bison.exe b/tools/cygwin/bison.exe
new file mode 100644
index 000000000..4f5f91fab
Binary files /dev/null and b/tools/cygwin/bison.exe differ
diff --git a/tools/cygwin/bunzip2.exe b/tools/cygwin/bunzip2.exe
new file mode 100644
index 000000000..02b2242d2
Binary files /dev/null and b/tools/cygwin/bunzip2.exe differ
diff --git a/tools/cygwin/byacc.exe b/tools/cygwin/byacc.exe
new file mode 100644
index 000000000..e3825646e
Binary files /dev/null and b/tools/cygwin/byacc.exe differ
diff --git a/tools/cygwin/bzcat.exe b/tools/cygwin/bzcat.exe
new file mode 100644
index 000000000..02b2242d2
Binary files /dev/null and b/tools/cygwin/bzcat.exe differ
diff --git a/tools/cygwin/bzip2.exe b/tools/cygwin/bzip2.exe
new file mode 100644
index 000000000..02b2242d2
Binary files /dev/null and b/tools/cygwin/bzip2.exe differ
diff --git a/tools/cygwin/bzip2recover.exe b/tools/cygwin/bzip2recover.exe
new file mode 100644
index 000000000..d1863b2e6
Binary files /dev/null and b/tools/cygwin/bzip2recover.exe differ
diff --git a/tools/cygwin/c++.exe b/tools/cygwin/c++.exe
new file mode 100644
index 000000000..37c6de757
Binary files /dev/null and b/tools/cygwin/c++.exe differ
diff --git a/tools/cygwin/c++filt.exe b/tools/cygwin/c++filt.exe
new file mode 100644
index 000000000..6f3a71a20
Binary files /dev/null and b/tools/cygwin/c++filt.exe differ
diff --git a/tools/cygwin/cat.exe b/tools/cygwin/cat.exe
new file mode 100644
index 000000000..08834e311
Binary files /dev/null and b/tools/cygwin/cat.exe differ
diff --git a/tools/cygwin/chgrp.exe b/tools/cygwin/chgrp.exe
new file mode 100644
index 000000000..195371ccd
Binary files /dev/null and b/tools/cygwin/chgrp.exe differ
diff --git a/tools/cygwin/chmod.exe b/tools/cygwin/chmod.exe
new file mode 100644
index 000000000..82d3b5a1e
Binary files /dev/null and b/tools/cygwin/chmod.exe differ
diff --git a/tools/cygwin/chown.exe b/tools/cygwin/chown.exe
new file mode 100644
index 000000000..27d045df4
Binary files /dev/null and b/tools/cygwin/chown.exe differ
diff --git a/tools/cygwin/chroot.exe b/tools/cygwin/chroot.exe
new file mode 100644
index 000000000..ed72518ce
Binary files /dev/null and b/tools/cygwin/chroot.exe differ
diff --git a/tools/cygwin/cksum.exe b/tools/cygwin/cksum.exe
new file mode 100644
index 000000000..69025f03d
Binary files /dev/null and b/tools/cygwin/cksum.exe differ
diff --git a/tools/cygwin/cmp.exe b/tools/cygwin/cmp.exe
new file mode 100644
index 000000000..36e8395d5
Binary files /dev/null and b/tools/cygwin/cmp.exe differ
diff --git a/tools/cygwin/comm.exe b/tools/cygwin/comm.exe
new file mode 100644
index 000000000..f20320878
Binary files /dev/null and b/tools/cygwin/comm.exe differ
diff --git a/tools/cygwin/cp.exe b/tools/cygwin/cp.exe
new file mode 100644
index 000000000..a53a8a0bc
Binary files /dev/null and b/tools/cygwin/cp.exe differ
diff --git a/tools/cygwin/csplit.exe b/tools/cygwin/csplit.exe
new file mode 100644
index 000000000..796d8c5a3
Binary files /dev/null and b/tools/cygwin/csplit.exe differ
diff --git a/tools/cygwin/cut.exe b/tools/cygwin/cut.exe
new file mode 100644
index 000000000..8d5f8bcdc
Binary files /dev/null and b/tools/cygwin/cut.exe differ
diff --git a/tools/cygwin/cygcheck.exe b/tools/cygwin/cygcheck.exe
new file mode 100644
index 000000000..b641eb1af
Binary files /dev/null and b/tools/cygwin/cygcheck.exe differ
diff --git a/tools/cygwin/cygpath.exe b/tools/cygwin/cygpath.exe
new file mode 100644
index 000000000..442c71dbb
Binary files /dev/null and b/tools/cygwin/cygpath.exe differ
diff --git a/tools/cygwin/cygtclsh80.exe b/tools/cygwin/cygtclsh80.exe
new file mode 100644
index 000000000..b91f20d91
Binary files /dev/null and b/tools/cygwin/cygtclsh80.exe differ
diff --git a/tools/cygwin/cygwish80.exe b/tools/cygwin/cygwish80.exe
new file mode 100644
index 000000000..77ab8b102
Binary files /dev/null and b/tools/cygwin/cygwish80.exe differ
diff --git a/tools/cygwin/date.exe b/tools/cygwin/date.exe
new file mode 100644
index 000000000..80002c60f
Binary files /dev/null and b/tools/cygwin/date.exe differ
diff --git a/tools/cygwin/dd.exe b/tools/cygwin/dd.exe
new file mode 100644
index 000000000..4ae675c56
Binary files /dev/null and b/tools/cygwin/dd.exe differ
diff --git a/tools/cygwin/df.exe b/tools/cygwin/df.exe
new file mode 100644
index 000000000..19ff3956e
Binary files /dev/null and b/tools/cygwin/df.exe differ
diff --git a/tools/cygwin/diff.exe b/tools/cygwin/diff.exe
new file mode 100644
index 000000000..49b22937b
Binary files /dev/null and b/tools/cygwin/diff.exe differ
diff --git a/tools/cygwin/diff3.exe b/tools/cygwin/diff3.exe
new file mode 100644
index 000000000..0a75389be
Binary files /dev/null and b/tools/cygwin/diff3.exe differ
diff --git a/tools/cygwin/dir.exe b/tools/cygwin/dir.exe
new file mode 100644
index 000000000..290e9e226
Binary files /dev/null and b/tools/cygwin/dir.exe differ
diff --git a/tools/cygwin/dircolors.exe b/tools/cygwin/dircolors.exe
new file mode 100644
index 000000000..52ac607b2
Binary files /dev/null and b/tools/cygwin/dircolors.exe differ
diff --git a/tools/cygwin/dirname.exe b/tools/cygwin/dirname.exe
new file mode 100644
index 000000000..996adf2a9
Binary files /dev/null and b/tools/cygwin/dirname.exe differ
diff --git a/tools/cygwin/dlltool.exe b/tools/cygwin/dlltool.exe
new file mode 100644
index 000000000..cc5f382b6
Binary files /dev/null and b/tools/cygwin/dlltool.exe differ
diff --git a/tools/cygwin/dllwrap.exe b/tools/cygwin/dllwrap.exe
new file mode 100644
index 000000000..c396f9ad3
Binary files /dev/null and b/tools/cygwin/dllwrap.exe differ
diff --git a/tools/cygwin/du.exe b/tools/cygwin/du.exe
new file mode 100644
index 000000000..afda18833
Binary files /dev/null and b/tools/cygwin/du.exe differ
diff --git a/tools/cygwin/echo.exe b/tools/cygwin/echo.exe
new file mode 100644
index 000000000..673dff10f
Binary files /dev/null and b/tools/cygwin/echo.exe differ
diff --git a/tools/cygwin/egrep.exe b/tools/cygwin/egrep.exe
new file mode 100644
index 000000000..c11b377a4
Binary files /dev/null and b/tools/cygwin/egrep.exe differ
diff --git a/tools/cygwin/env.exe b/tools/cygwin/env.exe
new file mode 100644
index 000000000..4003a4a04
Binary files /dev/null and b/tools/cygwin/env.exe differ
diff --git a/tools/cygwin/expand.exe b/tools/cygwin/expand.exe
new file mode 100644
index 000000000..51461cfd6
Binary files /dev/null and b/tools/cygwin/expand.exe differ
diff --git a/tools/cygwin/expect.exe b/tools/cygwin/expect.exe
new file mode 100644
index 000000000..a0901defa
Binary files /dev/null and b/tools/cygwin/expect.exe differ
diff --git a/tools/cygwin/expr.exe b/tools/cygwin/expr.exe
new file mode 100644
index 000000000..93412f934
Binary files /dev/null and b/tools/cygwin/expr.exe differ
diff --git a/tools/cygwin/factor.exe b/tools/cygwin/factor.exe
new file mode 100644
index 000000000..276c63f5f
Binary files /dev/null and b/tools/cygwin/factor.exe differ
diff --git a/tools/cygwin/false b/tools/cygwin/false
new file mode 100644
index 000000000..2e63f96af
--- /dev/null
+++ b/tools/cygwin/false
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+usage="Usage: $0 [OPTION]...
+Exit unsucessfully.
+
+  --help      display this help and exit
+  --version   output version information and exit
+
+Report bugs to sh-utils-bugs@gnu.ai.mit.edu"
+
+case $# in
+  1 )
+    case "z${1}" in
+      z--help )
+	 echo "$usage"; exit 0 ;;
+      z--version )
+	 echo "false (GNU sh-utils) 1.16"; exit 0 ;;
+      * ) ;;
+    esac
+    ;;
+  * ) ;;
+esac
+
+exit 1
diff --git a/tools/cygwin/fgrep.exe b/tools/cygwin/fgrep.exe
new file mode 100644
index 000000000..c11b377a4
Binary files /dev/null and b/tools/cygwin/fgrep.exe differ
diff --git a/tools/cygwin/find.exe b/tools/cygwin/find.exe
new file mode 100644
index 000000000..58f329259
Binary files /dev/null and b/tools/cygwin/find.exe differ
diff --git a/tools/cygwin/flex++.exe b/tools/cygwin/flex++.exe
new file mode 100644
index 000000000..a2953594f
Binary files /dev/null and b/tools/cygwin/flex++.exe differ
diff --git a/tools/cygwin/flex.exe b/tools/cygwin/flex.exe
new file mode 100644
index 000000000..a2953594f
Binary files /dev/null and b/tools/cygwin/flex.exe differ
diff --git a/tools/cygwin/fmt.exe b/tools/cygwin/fmt.exe
new file mode 100644
index 000000000..fb674649e
Binary files /dev/null and b/tools/cygwin/fmt.exe differ
diff --git a/tools/cygwin/fold.exe b/tools/cygwin/fold.exe
new file mode 100644
index 000000000..c3e051db3
Binary files /dev/null and b/tools/cygwin/fold.exe differ
diff --git a/tools/cygwin/g++.exe b/tools/cygwin/g++.exe
new file mode 100644
index 000000000..37c6de757
Binary files /dev/null and b/tools/cygwin/g++.exe differ
diff --git a/tools/cygwin/gasp.exe b/tools/cygwin/gasp.exe
new file mode 100644
index 000000000..85df2ee4b
Binary files /dev/null and b/tools/cygwin/gasp.exe differ
diff --git a/tools/cygwin/gawk.exe b/tools/cygwin/gawk.exe
new file mode 100644
index 000000000..5d6f9356b
Binary files /dev/null and b/tools/cygwin/gawk.exe differ
diff --git a/tools/cygwin/gcc.exe b/tools/cygwin/gcc.exe
new file mode 100644
index 000000000..294bde663
Binary files /dev/null and b/tools/cygwin/gcc.exe differ
diff --git a/tools/cygwin/gcov.exe b/tools/cygwin/gcov.exe
new file mode 100644
index 000000000..d5c85d751
Binary files /dev/null and b/tools/cygwin/gcov.exe differ
diff --git a/tools/cygwin/gdb.exe b/tools/cygwin/gdb.exe
new file mode 100644
index 000000000..afefaaa0b
Binary files /dev/null and b/tools/cygwin/gdb.exe differ
diff --git a/tools/cygwin/grep.exe b/tools/cygwin/grep.exe
new file mode 100644
index 000000000..c11b377a4
Binary files /dev/null and b/tools/cygwin/grep.exe differ
diff --git a/tools/cygwin/groups b/tools/cygwin/groups
new file mode 100644
index 000000000..42ac64350
--- /dev/null
+++ b/tools/cygwin/groups
@@ -0,0 +1,53 @@
+#!/bin/sh
+# groups -- print the groups a user is in
+# Copyright (C) 1991 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software Foundation,
+# Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+
+# Written by David MacKenzie <djm@gnu.ai.mit.edu>.
+
+# Make sure we get GNU id, if possible; also allow
+# it to be somewhere else in PATH if not installed yet.
+PATH=/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH
+
+usage="Usage: $0 [OPTION]... [USERNAME]...
+
+  --help      display this help and exit
+  --version   output version information and exit
+
+Same as id -Gn.  If no USERNAME, use current process.
+
+Report bugs to sh-utils-bugs@gnu.ai.mit.edu"
+
+case $# in
+  1 )
+    case "z${1}" in
+      z--help )
+	 echo "$usage"; exit 0 ;;
+      z--version )
+	 echo "groups (GNU sh-utils) 1.16"; exit 0 ;;
+      * ) ;;
+    esac
+    ;;
+  * ) ;;
+esac
+
+if [ $# -eq 0 ]; then
+  id -Gn
+else
+  for name in "$@"; do
+    echo $name : `id -Gn -- $name`
+  done
+fi
diff --git a/tools/cygwin/gunzip.exe b/tools/cygwin/gunzip.exe
new file mode 100644
index 000000000..631869989
Binary files /dev/null and b/tools/cygwin/gunzip.exe differ
diff --git a/tools/cygwin/gzexe b/tools/cygwin/gzexe
new file mode 100644
index 000000000..22f4bba8c
--- /dev/null
+++ b/tools/cygwin/gzexe
@@ -0,0 +1,151 @@
+:
+#!/bin/sh
+# gzexe: compressor for Unix executables.
+# Use this only for binaries that you do not use frequently.
+#
+# The compressed version is a shell script which decompresses itself after
+# skipping $skip lines of shell commands.  We try invoking the compressed
+# executable with the original name (for programs looking at their name).
+# We also try to retain the original file permissions on the compressed file.
+# For safety reasons, gzexe will not create setuid or setgid shell scripts.
+
+# WARNING: the first line of this file must be either : or #!/bin/sh
+# The : is required for some old versions of csh.
+# On Ultrix, /bin/sh is too buggy, change the first line to: #!/bin/sh5
+
+x=`basename $0`
+if test $# = 0; then
+  echo compress executables. original file foo is renamed to foo~
+  echo usage: ${x} [-d] files...
+  echo   "   -d  decompress the executables"
+  exit 1
+fi
+
+tmp=gz$$
+trap "rm -f $tmp; exit 1" 1 2 3 5 10 13 15
+
+decomp=0
+res=0
+test "$x" = "ungzexe" && decomp=1
+if test "x$1" = "x-d"; then
+  decomp=1
+  shift
+fi
+
+echo hi > zfoo1$$
+echo hi > zfoo2$$
+if test -z "`(${CPMOD-cpmod} zfoo1$$ zfoo2$$) 2>&1`"; then
+  cpmod=${CPMOD-cpmod}
+fi
+rm -f zfoo[12]$$
+
+tail=""
+IFS="${IFS= 	}"; saveifs="$IFS"; IFS="${IFS}:"
+for dir in $PATH; do
+  test -z "$dir" && dir=.
+  if test -f $dir/tail; then
+    tail="$dir/tail"
+    break
+  fi
+done
+IFS="$saveifs"
+if test -z "$tail"; then
+  echo cannot find tail
+  exit 1
+fi
+
+for i do
+  if test ! -f "$i" ; then
+    echo ${x}: $i not a file
+    res=1
+    continue
+  fi
+  if test $decomp -eq 0; then
+    if sed -e 1d -e 2q "$i" | grep "^skip=[0-9]*$" >/dev/null; then
+      echo "${x}: $i is already gzexe'd"
+      continue
+    fi
+  fi
+  if ls -l "$i" | grep '^...[sS]' > /dev/null; then
+    echo "${x}: $i has setuid permission, unchanged"
+    continue
+  fi
+  if ls -l "$i" | grep '^......[sS]' > /dev/null; then
+    echo "${x}: $i has setgid permission, unchanged"
+    continue
+  fi
+  case "`basename $i`" in
+  gzip | tail | chmod | ln | sleep | rm)
+	echo "${x}: $i would depend on itself"; continue ;;
+  esac
+  if test -z "$cpmod"; then
+    cp -p "$i" $tmp 2>/dev/null || cp "$i" $tmp
+    if test -w $tmp 2>/dev/null; then
+      writable=1
+    else
+      writable=0
+      chmod u+w $tmp 2>/dev/null
+    fi
+  fi
+  if test $decomp -eq 0; then
+    sed 1q $0 > $tmp
+    sed "s|^if tail|if $tail|" >> $tmp <<'EOF'
+skip=18
+if tail +$skip $0 | "/cygnus/cygwin-b20/H-i586-cygwin32/bin"/gzip -cd > /tmp/gztmp$$; then
+  /bin/chmod 700 /tmp/gztmp$$
+  prog="`echo $0 | /bin/sed 's|^.*/||'`"
+  if /bin/ln /tmp/gztmp$$ "/tmp/$prog" 2>/dev/null; then
+    trap '/bin/rm -f /tmp/gztmp$$ "/tmp/$prog"; exit $res' 0
+    (/bin/sleep 5; /bin/rm -f /tmp/gztmp$$ "/tmp/$prog") 2>/dev/null &
+    /tmp/"$prog" ${1+"$@"}; res=$?
+  else
+    trap '/bin/rm -f /tmp/gztmp$$; exit $res' 0
+    (/bin/sleep 5; /bin/rm -f /tmp/gztmp$$) 2>/dev/null &
+    /tmp/gztmp$$ ${1+"$@"}; res=$?
+  fi
+else
+  echo Cannot decompress $0; exit 1
+fi; exit $res
+EOF
+    "/cygnus/cygwin-b20/H-i586-cygwin32/bin"/gzip -cv9 "$i" >> $tmp || {
+      /bin/rm -f $tmp
+      echo ${x}: compression not possible for $i, file unchanged.
+      res=1
+      continue
+    }
+
+  else
+    # decompression
+    skip=18
+    if sed -e 1d -e 2q "$i" | grep "^skip=[0-9]*$" >/dev/null; then
+      eval `sed -e 1d -e 2q "$i"`
+    fi
+    if tail +$skip "$i" | "/cygnus/cygwin-b20/H-i586-cygwin32/bin"/gzip -cd > $tmp; then
+      :
+    else
+      echo ${x}: $i probably not in gzexe format, file unchanged.
+      res=1
+      continue
+    fi
+  fi
+  rm -f "$i~"
+  mv "$i" "$i~" || {
+    echo ${x}: cannot backup $i as $i~
+    rm -f $tmp
+    res=1
+    continue
+  }
+  mv $tmp "$i" || cp -p $tmp "$i" 2>/dev/null || cp $tmp "$i" || {
+    echo ${x}: cannot create $i
+    rm -f $tmp
+    res=1
+    continue
+  }
+  rm -f $tmp
+  if test -n "$cpmod"; then
+    $cpmod "$i~" "$i" 2>/dev/null
+  elif test $writable -eq 0; then
+    chmod u-w $i 2>/dev/null
+  fi
+done
+exit $res
diff --git a/tools/cygwin/gzip.exe b/tools/cygwin/gzip.exe
new file mode 100644
index 000000000..631869989
Binary files /dev/null and b/tools/cygwin/gzip.exe differ
diff --git a/tools/cygwin/head.exe b/tools/cygwin/head.exe
new file mode 100644
index 000000000..63022c558
Binary files /dev/null and b/tools/cygwin/head.exe differ
diff --git a/tools/cygwin/hostname.exe b/tools/cygwin/hostname.exe
new file mode 100644
index 000000000..3e291eecb
Binary files /dev/null and b/tools/cygwin/hostname.exe differ
diff --git a/tools/cygwin/i586-cygwin32-gcc.exe b/tools/cygwin/i586-cygwin32-gcc.exe
new file mode 100644
index 000000000..294bde663
Binary files /dev/null and b/tools/cygwin/i586-cygwin32-gcc.exe differ
diff --git a/tools/cygwin/id.exe b/tools/cygwin/id.exe
new file mode 100644
index 000000000..8846fd032
Binary files /dev/null and b/tools/cygwin/id.exe differ
diff --git a/tools/cygwin/igawk b/tools/cygwin/igawk
new file mode 100644
index 000000000..a9fff1800
--- /dev/null
+++ b/tools/cygwin/igawk
@@ -0,0 +1,130 @@
+#! /bin/sh
+
+# igawk --- like gawk but do @include processing
+# Arnold Robbins, arnold@gnu.ai.mit.edu, Public Domain
+# July 1993
+
+if [ "$1" = debug ]
+then
+    set -x
+    shift
+else
+    # cleanup on exit, hangup, interrupt, quit, termination
+    trap 'rm -f /tmp/ig.[se].$$' 0 1 2 3 15
+fi
+
+while [ $# -ne 0 ] # loop over arguments
+do
+    case $1 in
+    --)     shift; break;;
+
+    -W)     shift
+            set -- -W"$@"
+            continue;;
+
+    -[vF])  opts="$opts $1 '$2'"
+            shift;;
+
+    -[vF]*) opts="$opts '$1'" ;;
+
+    -f)     echo @include "$2" >> /tmp/ig.s.$$
+            shift;;
+
+    -f*)    f=`echo "$1" | sed 's/-f//'`
+            echo @include "$f" >> /tmp/ig.s.$$ ;;
+
+    -?file=*)    # -Wfile or --file
+            f=`echo "$1" | sed 's/-.file=//'`
+            echo @include "$f" >> /tmp/ig.s.$$ ;;
+
+    -?file)    # get arg, $2
+            echo @include "$2" >> /tmp/ig.s.$$
+            shift;;
+
+    -?source=*)    # -Wsource or --source
+            t=`echo "$1" | sed 's/-.source=//'`
+            echo "$t" >> /tmp/ig.s.$$ ;;
+
+    -?source)  # get arg, $2
+            echo "$2" >> /tmp/ig.s.$$
+            shift;;
+
+    -?version)
+            echo igawk: version 1.0 1>&2
+            gawk --version
+            exit 0 ;;
+
+    -[W-]*)    opts="$opts '$1'" ;;
+
+    *)      break;;
+    esac
+    shift
+done
+
+if [ ! -s /tmp/ig.s.$$ ]
+then
+    if [ -z "$1" ]
+    then
+         echo igawk: no program! 1>&2
+         exit 1
+    else
+        echo "$1" > /tmp/ig.s.$$
+        shift
+    fi
+fi
+
+# at this point, /tmp/ig.s.$$ has the program
+gawk -- '
+# process @include directives
+
+function pathto(file,    i, t, junk)
+{
+    if (index(file, "/") != 0)
+        return file
+
+    for (i = 1; i <= ndirs; i++) {
+        t = (pathlist[i] "/" file)
+        if ((getline junk < t) > 0) {
+            # found it
+            close(t)
+            return t
+        }
+    }
+    return ""
+}
+BEGIN {
+    path = ENVIRON["AWKPATH"]
+    ndirs = split(path, pathlist, ":")
+    for (i = 1; i <= ndirs; i++) {
+        if (pathlist[i] == "")
+            pathlist[i] = "."
+    }
+    stackptr = 0
+    input[stackptr] = ARGV[1] # ARGV[1] is first file
+
+    for (; stackptr >= 0; stackptr--) {
+        while ((getline < input[stackptr]) > 0) {
+            if (tolower($1) != "@include") {
+                print
+                continue
+            }
+            fpath = pathto($2)
+            if (fpath == "") {
+                printf("igawk:%s:%d: cannot find %s\n", \
+                    input[stackptr], FNR, $2) > "/dev/stderr"
+                continue
+            }
+            if (! (fpath in processed)) {
+                processed[fpath] = input[stackptr]
+                input[++stackptr] = fpath
+            } else
+                print $2, "included in", input[stackptr], \
+                    "already included in", \
+                    processed[fpath] > "/dev/stderr"
+        }
+        close(input[stackptr])
+    }
+}' /tmp/ig.s.$$ > /tmp/ig.e.$$
+eval gawk -f /tmp/ig.e.$$ $opts -- "$@"
+
+exit $?
diff --git a/tools/cygwin/install.exe b/tools/cygwin/install.exe
new file mode 100644
index 000000000..6580a2d9d
Binary files /dev/null and b/tools/cygwin/install.exe differ
diff --git a/tools/cygwin/itcl_sh.exe b/tools/cygwin/itcl_sh.exe
new file mode 100644
index 000000000..d6042e8cc
Binary files /dev/null and b/tools/cygwin/itcl_sh.exe differ
diff --git a/tools/cygwin/itcl_wish.exe b/tools/cygwin/itcl_wish.exe
new file mode 100644
index 000000000..07b5dd109
Binary files /dev/null and b/tools/cygwin/itcl_wish.exe differ
diff --git a/tools/cygwin/join.exe b/tools/cygwin/join.exe
new file mode 100644
index 000000000..400de97be
Binary files /dev/null and b/tools/cygwin/join.exe differ
diff --git a/tools/cygwin/kill.exe b/tools/cygwin/kill.exe
new file mode 100644
index 000000000..636c089dc
Binary files /dev/null and b/tools/cygwin/kill.exe differ
diff --git a/tools/cygwin/ld.exe b/tools/cygwin/ld.exe
new file mode 100644
index 000000000..43376a20c
Binary files /dev/null and b/tools/cygwin/ld.exe differ
diff --git a/tools/cygwin/less.exe b/tools/cygwin/less.exe
new file mode 100644
index 000000000..d7b564e7f
Binary files /dev/null and b/tools/cygwin/less.exe differ
diff --git a/tools/cygwin/lessecho.exe b/tools/cygwin/lessecho.exe
new file mode 100644
index 000000000..02eb3b29f
Binary files /dev/null and b/tools/cygwin/lessecho.exe differ
diff --git a/tools/cygwin/lesskey.exe b/tools/cygwin/lesskey.exe
new file mode 100644
index 000000000..fb8709e62
Binary files /dev/null and b/tools/cygwin/lesskey.exe differ
diff --git a/tools/cygwin/ln.exe b/tools/cygwin/ln.exe
new file mode 100644
index 000000000..3f9419fc6
Binary files /dev/null and b/tools/cygwin/ln.exe differ
diff --git a/tools/cygwin/locate.exe b/tools/cygwin/locate.exe
new file mode 100644
index 000000000..35a92bebf
Binary files /dev/null and b/tools/cygwin/locate.exe differ
diff --git a/tools/cygwin/logname.exe b/tools/cygwin/logname.exe
new file mode 100644
index 000000000..b0f2d8c43
Binary files /dev/null and b/tools/cygwin/logname.exe differ
diff --git a/tools/cygwin/ls.exe b/tools/cygwin/ls.exe
new file mode 100644
index 000000000..eac8f123b
Binary files /dev/null and b/tools/cygwin/ls.exe differ
diff --git a/tools/cygwin/m4.exe b/tools/cygwin/m4.exe
new file mode 100644
index 000000000..1f02070dc
Binary files /dev/null and b/tools/cygwin/m4.exe differ
diff --git a/tools/cygwin/make.exe b/tools/cygwin/make.exe
new file mode 100644
index 000000000..e063e88f4
Binary files /dev/null and b/tools/cygwin/make.exe differ
diff --git a/tools/cygwin/makeinfo b/tools/cygwin/makeinfo
new file mode 100644
index 000000000..67982d8d1
--- /dev/null
+++ b/tools/cygwin/makeinfo
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+usage="Usage: $0 [OPTION]...
+Exit successfully.
+
+   --help      display this help and exit
+   --version   output version information and exit
+
+Report bugs to sh-utils-bugs@gnu.ai.mit.edu"
+
+case $# in
+  1 )
+    case "z${1}" in
+      z--help )
+	 echo "$usage"; exit 0 ;;
+      z--version )
+	 echo "true (GNU sh-utils) 1.16"; exit 0 ;;
+      * ) ;;
+    esac
+    ;;
+  * ) ;;
+esac
+
+exit 0
diff --git a/tools/cygwin/md5sum.exe b/tools/cygwin/md5sum.exe
new file mode 100644
index 000000000..35c9ad97b
Binary files /dev/null and b/tools/cygwin/md5sum.exe differ
diff --git a/tools/cygwin/mkdir.exe b/tools/cygwin/mkdir.exe
new file mode 100644
index 000000000..be7adf202
Binary files /dev/null and b/tools/cygwin/mkdir.exe differ
diff --git a/tools/cygwin/mkfifo.exe b/tools/cygwin/mkfifo.exe
new file mode 100644
index 000000000..ed4cfade1
Binary files /dev/null and b/tools/cygwin/mkfifo.exe differ
diff --git a/tools/cygwin/mkgroup.exe b/tools/cygwin/mkgroup.exe
new file mode 100644
index 000000000..6bece9120
Binary files /dev/null and b/tools/cygwin/mkgroup.exe differ
diff --git a/tools/cygwin/mknod.exe b/tools/cygwin/mknod.exe
new file mode 100644
index 000000000..9a9954993
Binary files /dev/null and b/tools/cygwin/mknod.exe differ
diff --git a/tools/cygwin/mkpasswd.exe b/tools/cygwin/mkpasswd.exe
new file mode 100644
index 000000000..0feff8c1a
Binary files /dev/null and b/tools/cygwin/mkpasswd.exe differ
diff --git a/tools/cygwin/mount.exe b/tools/cygwin/mount.exe
new file mode 100644
index 000000000..93c5e2aaa
Binary files /dev/null and b/tools/cygwin/mount.exe differ
diff --git a/tools/cygwin/mv.exe b/tools/cygwin/mv.exe
new file mode 100644
index 000000000..7191f3588
Binary files /dev/null and b/tools/cygwin/mv.exe differ
diff --git a/tools/cygwin/nice.exe b/tools/cygwin/nice.exe
new file mode 100644
index 000000000..dba148253
Binary files /dev/null and b/tools/cygwin/nice.exe differ
diff --git a/tools/cygwin/nl.exe b/tools/cygwin/nl.exe
new file mode 100644
index 000000000..f957defad
Binary files /dev/null and b/tools/cygwin/nl.exe differ
diff --git a/tools/cygwin/nm.exe b/tools/cygwin/nm.exe
new file mode 100644
index 000000000..571ac53a5
Binary files /dev/null and b/tools/cygwin/nm.exe differ
diff --git a/tools/cygwin/nohup b/tools/cygwin/nohup
new file mode 100644
index 000000000..92c69dcd8
--- /dev/null
+++ b/tools/cygwin/nohup
@@ -0,0 +1,75 @@
+#!/bin/sh
+# nohup -- run a command immume to hangups, with output to a non-tty
+# Copyright (C) 1991 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software Foundation,
+# Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+
+# Written by David MacKenzie <djm@gnu.ai.mit.edu>.
+
+# Make sure we get GNU nice, if possible; also allow
+# it to be somewhere else in PATH if not installed yet.
+PATH=/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH
+
+usage="Usage: $0 COMMAND [ARG]...
+  or:  $0 OPTION"
+
+usage_try="
+Try \`$0 --help' for more information."
+
+usage_help="Run COMMAND, ignoring hangup signals.
+
+  --help      display this help and exit
+  --version   output version information and exit
+
+Report bugs to sh-utils-bugs@gnu.ai.mit.edu"
+
+if [ $# -eq 0 ]; then
+  echo >&2 "$usage"
+  echo >&2 "$usage_try"
+  exit 1
+fi
+
+case $# in
+  1 )
+    case "z${1}" in
+      z--help )
+	 echo "$usage"; echo "$usage_help"; exit 0 ;;
+      z--version )
+	 echo "nohup (GNU sh-utils) 1.16"; exit 0 ;;
+      * ) ;;
+    esac
+    ;;
+  * ) ;;
+esac
+
+trap "" 1
+oldmask=`umask`; umask 077
+# Only redirect the output if the user didn't already do it.
+if [ -t 1 ]; then
+  # If we cannot write to the current directory, use the home directory.
+  if cat /dev/null >> nohup.out; then
+    echo "nohup: appending output to \`nohup.out'" 2>&1
+    umask $oldmask
+    exec nice -5 -- "$@" >> nohup.out 2>&1
+  else
+    cat /dev/null >> $HOME/nohup.out
+    echo "nohup: appending output to \`$HOME/nohup.out'" 2>&1
+    umask $oldmask
+    exec nice -5 -- "$@" >> $HOME/nohup.out 2>&1
+  fi
+else
+  umask $oldmask
+  exec nice -5 -- "$@"
+fi
diff --git a/tools/cygwin/objcopy.exe b/tools/cygwin/objcopy.exe
new file mode 100644
index 000000000..b2cf8dbbc
Binary files /dev/null and b/tools/cygwin/objcopy.exe differ
diff --git a/tools/cygwin/objdump.exe b/tools/cygwin/objdump.exe
new file mode 100644
index 000000000..27f7956f1
Binary files /dev/null and b/tools/cygwin/objdump.exe differ
diff --git a/tools/cygwin/od.exe b/tools/cygwin/od.exe
new file mode 100644
index 000000000..dd13e1da5
Binary files /dev/null and b/tools/cygwin/od.exe differ
diff --git a/tools/cygwin/paste.exe b/tools/cygwin/paste.exe
new file mode 100644
index 000000000..f36c73758
Binary files /dev/null and b/tools/cygwin/paste.exe differ
diff --git a/tools/cygwin/patch.exe b/tools/cygwin/patch.exe
new file mode 100644
index 000000000..55df89551
Binary files /dev/null and b/tools/cygwin/patch.exe differ
diff --git a/tools/cygwin/pathchk.exe b/tools/cygwin/pathchk.exe
new file mode 100644
index 000000000..7c0c57885
Binary files /dev/null and b/tools/cygwin/pathchk.exe differ
diff --git a/tools/cygwin/pr.exe b/tools/cygwin/pr.exe
new file mode 100644
index 000000000..554888e08
Binary files /dev/null and b/tools/cygwin/pr.exe differ
diff --git a/tools/cygwin/printenv.exe b/tools/cygwin/printenv.exe
new file mode 100644
index 000000000..dfd6c2154
Binary files /dev/null and b/tools/cygwin/printenv.exe differ
diff --git a/tools/cygwin/printf.exe b/tools/cygwin/printf.exe
new file mode 100644
index 000000000..9845889a4
Binary files /dev/null and b/tools/cygwin/printf.exe differ
diff --git a/tools/cygwin/protoize.exe b/tools/cygwin/protoize.exe
new file mode 100644
index 000000000..75252aa87
Binary files /dev/null and b/tools/cygwin/protoize.exe differ
diff --git a/tools/cygwin/ps.exe b/tools/cygwin/ps.exe
new file mode 100644
index 000000000..f59fbd754
Binary files /dev/null and b/tools/cygwin/ps.exe differ
diff --git a/tools/cygwin/pwd.exe b/tools/cygwin/pwd.exe
new file mode 100644
index 000000000..bae1447be
Binary files /dev/null and b/tools/cygwin/pwd.exe differ
diff --git a/tools/cygwin/ranlib.exe b/tools/cygwin/ranlib.exe
new file mode 100644
index 000000000..b1789c464
Binary files /dev/null and b/tools/cygwin/ranlib.exe differ
diff --git a/tools/cygwin/readelf.exe b/tools/cygwin/readelf.exe
new file mode 100644
index 000000000..b408f4e01
Binary files /dev/null and b/tools/cygwin/readelf.exe differ
diff --git a/tools/cygwin/rm.exe b/tools/cygwin/rm.exe
new file mode 100644
index 000000000..4457a636c
Binary files /dev/null and b/tools/cygwin/rm.exe differ
diff --git a/tools/cygwin/rmdir.exe b/tools/cygwin/rmdir.exe
new file mode 100644
index 000000000..636650509
Binary files /dev/null and b/tools/cygwin/rmdir.exe differ
diff --git a/tools/cygwin/runtest b/tools/cygwin/runtest
new file mode 100644
index 000000000..47216f4de
--- /dev/null
+++ b/tools/cygwin/runtest
@@ -0,0 +1,117 @@
+#!/bin/sh
+#
+# runtest -- basically all this script does is find the proper expect
+#	     shell and then run DejaGnu.
+#
+# Written by Rob Savoye <rob@cygnus.com>
+#
+
+#
+# Get the execution path to this script and the current directory.
+#
+mypath=${0-.}
+if expr ${mypath} : '.*/.*' > /dev/null
+then
+    :
+else
+    IFS="${IFS= 	}"; save_ifs="$IFS"; IFS="${IFS}:"
+    for dir in $PATH
+    do
+	test -z "$dir" && dir=.
+	if test -x $dir/$mypath
+	then
+	    mypath=$dir/$mypath
+	    break
+	fi
+    done
+    IFS="$save_ifs"
+fi
+execpath=`echo ${mypath} | sed  -e 's@/[^/]*$@@'`
+# rootme=`pwd`
+
+#
+# get the name by which runtest was invoked and extract the config triplet
+#
+runtest=`echo ${mypath} | sed -e 's@^.*/@@'`
+target=`echo $runtest | sed -e 's/-runtest$//'`
+if [ "$target" != runtest ] ; then
+    target="--target ${target}"
+else
+    target=""
+fi
+
+#
+# Find the right expect binary to use. If a variable EXPECT exists,
+# it takes precedence over all other tests. Otherwise look for a freshly
+# built one, and then use one in the path.
+#
+if [ x"$EXPECT" != x ] ; then
+  expectbin=$EXPECT
+else
+  if [ -x "$execpath/expect" ] ; then
+    expectbin=$execpath/expect
+  else
+      expectbin=expect
+    fi
+fi
+
+# just to be safe...
+if [ -z "$expectbin" ]; then
+  echo "ERROR: No expect shell found"
+  exit 1
+fi
+
+#
+# Extract a few options from the option list.
+#
+verbose=0
+debug=""
+for a in "$@" ; do
+  case $a in	    
+      -v|--v|-verb*|--verb*)    verbose=`expr $verbose + 1`;;
+      -D0|--D0)       debug="-D 0" ;;
+      -D1|--D1)       debug="-D 1" ;;
+  esac
+done
+
+if expr $verbose \> 0 > /dev/null ; then
+  echo Expect binary is $expectbin
+fi
+
+#
+# find runtest.exp. First we look in it's installed location, otherwise
+# start if from the source tree.
+#
+# runtest.exp is found in (autoconf-configure-set) @datadir@, but
+# $execpath is @bindir@.  We're assuming that 
+#
+# @datadir@ == @bindir@/../share
+# or
+# @datadir@ == @bindir@/../../share
+#
+# which is a very weak assumption
+#
+for i in `echo ${execpath} | sed  -e 's@/[^/]*$@/share/dejagnu@'` `echo ${execpath} | sed  -e 's@/[^/]*/[^/]*$@/share/dejagnu@'` $execpath ; do
+    if expr $verbose \> 1 > /dev/null ; then
+	echo Looking for $i/runtest.exp.
+    fi  
+    if [ -f $i/runtest.exp ] ; then
+	runpath=$i
+	if expr $verbose \> 0 > /dev/null ; then
+	    echo Using $i/runtest.exp as main test driver
+	fi
+    fi
+done
+# check for an environment variable
+if [ x"$DEJAGNULIBS" != x ] ; then
+    runpath=$DEJAGNULIBS
+    if expr $verbose \> 0 > /dev/null ; then
+	echo Using $DEJAGNULIBS/runtest.exp as main test driver
+    fi
+fi
+if [ x"$runpath" = x ] ; then
+    echo "ERROR: runtest.exp does not exist."
+    exit 1
+fi
+
+exec $expectbin $debug -- $runpath/runtest.exp $target ${1+"$@"}
diff --git a/tools/cygwin/sdiff.exe b/tools/cygwin/sdiff.exe
new file mode 100644
index 000000000..adc4c9e68
Binary files /dev/null and b/tools/cygwin/sdiff.exe differ
diff --git a/tools/cygwin/sed.exe b/tools/cygwin/sed.exe
new file mode 100644
index 000000000..0b6e4cced
Binary files /dev/null and b/tools/cygwin/sed.exe differ
diff --git a/tools/cygwin/seq.exe b/tools/cygwin/seq.exe
new file mode 100644
index 000000000..6841ec15c
Binary files /dev/null and b/tools/cygwin/seq.exe differ
diff --git a/tools/cygwin/sh.exe b/tools/cygwin/sh.exe
new file mode 100644
index 000000000..2e725fb1c
Binary files /dev/null and b/tools/cygwin/sh.exe differ
diff --git a/tools/cygwin/size.exe b/tools/cygwin/size.exe
new file mode 100644
index 000000000..26766b6cc
Binary files /dev/null and b/tools/cygwin/size.exe differ
diff --git a/tools/cygwin/sleep.exe b/tools/cygwin/sleep.exe
new file mode 100644
index 000000000..3a02784c9
Binary files /dev/null and b/tools/cygwin/sleep.exe differ
diff --git a/tools/cygwin/sort.exe b/tools/cygwin/sort.exe
new file mode 100644
index 000000000..9ba29498c
Binary files /dev/null and b/tools/cygwin/sort.exe differ
diff --git a/tools/cygwin/split.exe b/tools/cygwin/split.exe
new file mode 100644
index 000000000..543c03f65
Binary files /dev/null and b/tools/cygwin/split.exe differ
diff --git a/tools/cygwin/strings.exe b/tools/cygwin/strings.exe
new file mode 100644
index 000000000..ad1c1dfa2
Binary files /dev/null and b/tools/cygwin/strings.exe differ
diff --git a/tools/cygwin/strip.exe b/tools/cygwin/strip.exe
new file mode 100644
index 000000000..4560ba40c
Binary files /dev/null and b/tools/cygwin/strip.exe differ
diff --git a/tools/cygwin/stty.exe b/tools/cygwin/stty.exe
new file mode 100644
index 000000000..4c4839a5e
Binary files /dev/null and b/tools/cygwin/stty.exe differ
diff --git a/tools/cygwin/su.exe b/tools/cygwin/su.exe
new file mode 100644
index 000000000..f0174175f
Binary files /dev/null and b/tools/cygwin/su.exe differ
diff --git a/tools/cygwin/sum.exe b/tools/cygwin/sum.exe
new file mode 100644
index 000000000..e2354ed37
Binary files /dev/null and b/tools/cygwin/sum.exe differ
diff --git a/tools/cygwin/sync.exe b/tools/cygwin/sync.exe
new file mode 100644
index 000000000..4aee59631
Binary files /dev/null and b/tools/cygwin/sync.exe differ
diff --git a/tools/cygwin/tac.exe b/tools/cygwin/tac.exe
new file mode 100644
index 000000000..47cb4c3d2
Binary files /dev/null and b/tools/cygwin/tac.exe differ
diff --git a/tools/cygwin/tail.exe b/tools/cygwin/tail.exe
new file mode 100644
index 000000000..d7741211c
Binary files /dev/null and b/tools/cygwin/tail.exe differ
diff --git a/tools/cygwin/tar.exe b/tools/cygwin/tar.exe
new file mode 100644
index 000000000..265b0bb92
Binary files /dev/null and b/tools/cygwin/tar.exe differ
diff --git a/tools/cygwin/tee.exe b/tools/cygwin/tee.exe
new file mode 100644
index 000000000..bbc1211e1
Binary files /dev/null and b/tools/cygwin/tee.exe differ
diff --git a/tools/cygwin/test.exe b/tools/cygwin/test.exe
new file mode 100644
index 000000000..6c19905c1
Binary files /dev/null and b/tools/cygwin/test.exe differ
diff --git a/tools/cygwin/time.exe b/tools/cygwin/time.exe
new file mode 100644
index 000000000..cb095b2c4
Binary files /dev/null and b/tools/cygwin/time.exe differ
diff --git a/tools/cygwin/tix4180.exe b/tools/cygwin/tix4180.exe
new file mode 100644
index 000000000..9c26bf5f1
Binary files /dev/null and b/tools/cygwin/tix4180.exe differ
diff --git a/tools/cygwin/tixindex b/tools/cygwin/tixindex
new file mode 100644
index 000000000..1122ab6d1
--- /dev/null
+++ b/tools/cygwin/tixindex
@@ -0,0 +1,66 @@
+#!/bin/sh
+# the next line restarts using tclsh \
+exec tclsh "$0" "$@"
+
+proc tixAutoMkIndex {dir args} {
+    global errorCode errorInfo
+    set oldDir [pwd]
+    cd $dir
+    set dir [pwd]
+    append index "# Tcl autoload index file, version 2.0\n"
+    append index "# This file is generated by the \"tixindex\" program,\n"
+    append index "# *NOT* by the \"auto_mkindex\" command,\n"
+    append index "# and sourced to set up indexing information for one or\n"
+    append index "# more commands.  Typically each line is a command that\n"
+    append index "# sets an element in the auto_index array, where the\n"
+    append index "# element name is the name of a command and the value is\n"
+    append index "# a script that loads the command.\n\n"
+    foreach file [eval glob $args] {
+	set f ""
+	set error [catch {
+	    set f [open $file]
+	    while {[gets $f line] >= 0} {
+		if [regexp {^tixClass[ 	]+([^ 	]*)} $line match className] {
+		    append index "set [list auto_index($className)]"
+		    append index " \"source {\$dir/$file}\"\n"
+		    append index "set [list auto_index($className:AutoLoad)]"
+		    append index " \"source {\$dir/$file}\"\n"
+		    set isClass($className) 1
+		}
+		if [regexp {^tixWidgetClass[ 	]+([^ 	]*)} $line match className] {
+		    append index "set [list auto_index($className)]"
+		    append index " \"source {\$dir/$file}\"\n"
+		    append index "set [list auto_index($className:AutoLoad)]"
+		    append index " \"source {\$dir/$file}\"\n"
+		    set isClass($className) 1
+		}
+
+		if [regexp {^proc[ 	]+([^ 	]*)} $line match procName] {
+		    set prefix [lindex [split $procName :] 0]
+		    if {![info exists isClass($prefix)]} {
+			append index "set [list auto_index($procName)]"
+			append index " \"source {\$dir/$file}\"\n"
+		    }
+		}
+	    }
+	    close $f
+	} msg]
+	if $error {
+	    set code $errorCode
+	    set info $errorInfo
+	    catch {close $f}
+	    cd $oldDir
+	    error $msg $info $code
+	}
+    }
+    set f [open tclIndex w]
+    puts $f $index nonewline
+    close $f
+    cd $oldDir
+}
+
+if {$argv == {}} {
+    eval tixAutoMkIndex . *.tcl
+} else {
+    eval tixAutoMkIndex . $argv
+}
diff --git a/tools/cygwin/touch.exe b/tools/cygwin/touch.exe
new file mode 100644
index 000000000..7808e5ba3
Binary files /dev/null and b/tools/cygwin/touch.exe differ
diff --git a/tools/cygwin/tr.exe b/tools/cygwin/tr.exe
new file mode 100644
index 000000000..e44730ad5
Binary files /dev/null and b/tools/cygwin/tr.exe differ
diff --git a/tools/cygwin/true b/tools/cygwin/true
new file mode 100644
index 000000000..67982d8d1
--- /dev/null
+++ b/tools/cygwin/true
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+usage="Usage: $0 [OPTION]...
+Exit successfully.
+
+   --help      display this help and exit
+   --version   output version information and exit
+
+Report bugs to sh-utils-bugs@gnu.ai.mit.edu"
+
+case $# in
+  1 )
+    case "z${1}" in
+      z--help )
+	 echo "$usage"; exit 0 ;;
+      z--version )
+	 echo "true (GNU sh-utils) 1.16"; exit 0 ;;
+      * ) ;;
+    esac
+    ;;
+  * ) ;;
+esac
+
+exit 0
diff --git a/tools/cygwin/tty.exe b/tools/cygwin/tty.exe
new file mode 100644
index 000000000..f8f7904e4
Binary files /dev/null and b/tools/cygwin/tty.exe differ
diff --git a/tools/cygwin/umount.exe b/tools/cygwin/umount.exe
new file mode 100644
index 000000000..4863d7306
Binary files /dev/null and b/tools/cygwin/umount.exe differ
diff --git a/tools/cygwin/uname.exe b/tools/cygwin/uname.exe
new file mode 100644
index 000000000..d69d0ab88
Binary files /dev/null and b/tools/cygwin/uname.exe differ
diff --git a/tools/cygwin/unexpand.exe b/tools/cygwin/unexpand.exe
new file mode 100644
index 000000000..fae2d9f0d
Binary files /dev/null and b/tools/cygwin/unexpand.exe differ
diff --git a/tools/cygwin/uniq.exe b/tools/cygwin/uniq.exe
new file mode 100644
index 000000000..6f4a81259
Binary files /dev/null and b/tools/cygwin/uniq.exe differ
diff --git a/tools/cygwin/unprotoize.exe b/tools/cygwin/unprotoize.exe
new file mode 100644
index 000000000..502b2e3aa
Binary files /dev/null and b/tools/cygwin/unprotoize.exe differ
diff --git a/tools/cygwin/updatedb b/tools/cygwin/updatedb
new file mode 100644
index 000000000..6269de9c1
--- /dev/null
+++ b/tools/cygwin/updatedb
@@ -0,0 +1,148 @@
+#!/bin/sh
+# updatedb -- build a locate pathname database
+# Copyright (C) 1994 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2, or (at your option)
+# any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+# csh original by James Woods; sh conversion by David MacKenzie.
+
+usage="\
+Usage: updatedb [--localpaths='dir1 dir2...'] [--netpaths='dir1 dir2...']
+       [--prunepaths='dir1 dir2...'] [--output=dbfile] [--netuser=user]
+       [--old-format] [--version] [--help]"
+
+old=no
+for arg
+do
+  opt=`echo $arg|sed 's/^\([^=]*\).*/\1/'`
+  val=`echo $arg|sed 's/^[^=]*=\(.*\)/\1/'`
+  case "$opt" in
+    --localpaths) SEARCHPATHS="$val" ;;
+    --netpaths) NETPATHS="$val" ;;
+    --prunepaths) PRUNEPATHS="$val" ;;
+    --output) LOCATE_DB="$val" ;;
+    --netuser) NETUSER="$val" ;;
+    --old-format) old=yes ;;
+    --version) echo "GNU updatedb version 4.1"; exit 0 ;;
+    --help) echo "$usage"; exit 0 ;;
+    *) echo "updatedb: invalid option $opt
+$usage" >&2
+       exit 1 ;;
+  esac
+done
+
+# You can set these in the environment, or use command-line options,
+# to override their defaults:
+
+# Non-network directories to put in the database.
+: ${SEARCHPATHS="/"}
+
+# Network (NFS, AFS, RFS, etc.) directories to put in the database.
+: ${NETPATHS=}
+
+# Directories to not put in the database, which would otherwise be.
+: ${PRUNEPATHS="/tmp /usr/tmp /var/tmp /afs"}
+
+# The same, in the form of a regex that find can use.
+test -z "$PRUNEREGEX" &&
+  PRUNEREGEX=`echo $PRUNEPATHS|sed -e 's,^,\\\(^,' -e 's, ,$\\\)\\\|\\\(^,g' -e 's,$,$\\\),'`
+
+# The database file to build.
+: ${LOCATE_DB=/cygnus/cygwin-b20/var/locatedb}
+
+# Directory to hold intermediate files.
+if test -d /var/tmp; then
+  : ${TMPDIR=/var/tmp}
+else
+  : ${TMPDIR=/usr/tmp}
+fi
+
+# The user to search network directories as.
+: ${NETUSER=daemon}
+
+# The directory containing the subprograms.
+: ${LIBEXECDIR=@libexecdir@}
+
+# The directory containing find.
+: ${BINDIR=@bindir@}
+
+# The names of the utilities to run to build the database.
+: ${find=find}
+: ${frcode=frcode}
+: ${bigram=bigram}
+: ${code=code}
+
+PATH=$LIBEXECDIR:$BINDIR:/usr/ucb:/bin:/usr/bin:$PATH export PATH
+
+# Make and code the file list.
+# Sort case insensitively for users' convenience.
+
+if test $old = no; then
+
+# FIXME figure out how to sort null-terminated strings, and use -print0.
+{
+if test -n "$SEARCHPATHS"; then
+  $find $SEARCHPATHS \
+  \( -fstype nfs -o -fstype NFS -o -type d -regex "$PRUNEREGEX" \) -prune -o -print
+fi
+
+if test -n "$NETPATHS"; then
+  su $NETUSER -c \
+  "$find $NETPATHS \\( -type d -regex \"$PRUNEREGEX\" -prune \\) -o -print"
+fi
+} | sort -f | $frcode > $LOCATE_DB.n
+
+# To avoid breaking locate while this script is running, put the
+# results in a temp file, then rename it atomically.
+if test -s $LOCATE_DB.n; then
+  rm -f $LOCATE_DB
+  mv $LOCATE_DB.n $LOCATE_DB
+  chmod 644 $LOCATE_DB
+else
+  echo "updatedb: new database would be empty" >&2
+  rm -f $LOCATE_DB.n
+fi
+
+else # old
+
+bigrams=$TMPDIR/f.bigrams$$
+filelist=$TMPDIR/f.list$$
+trap 'rm -f $bigrams $filelist; exit' 1 15
+
+# Alphabetize subdirectories before file entries using tr.  James says:
+# "to get everything in monotonic collating sequence, to avoid some
+# breakage i'll have to think about."
+{
+if test -n "$SEARCHPATHS"; then
+  $find $SEARCHPATHS \
+  \( -fstype nfs -o -fstype NFS -o -type d -regex "$PRUNEREGEX" \) -prune -o -print
+fi
+if test -n "$NETPATHS"; then
+  su $NETUSER -c \
+  "$find $NETPATHS \\( -type d -regex \"$PRUNEREGEX\" -prune \\) -o -print"
+fi
+} | tr / '\001' | sort -f | tr '\001' / > $filelist
+
+# Compute the (at most 128) most common bigrams in the file list.
+$bigram < $filelist | sort | uniq -c | sort -nr |
+  awk '{ if (NR <= 128) print $2 }' | tr -d '\012' > $bigrams
+
+# Code the file list.
+$code $bigrams < $filelist > $LOCATE_DB
+chmod 644 $LOCATE_DB
+
+rm -f $bigrams $filelist $errs
+
+fi
diff --git a/tools/cygwin/users.exe b/tools/cygwin/users.exe
new file mode 100644
index 000000000..0f90fd7fb
Binary files /dev/null and b/tools/cygwin/users.exe differ
diff --git a/tools/cygwin/vdir.exe b/tools/cygwin/vdir.exe
new file mode 100644
index 000000000..38f897972
Binary files /dev/null and b/tools/cygwin/vdir.exe differ
diff --git a/tools/cygwin/wc.exe b/tools/cygwin/wc.exe
new file mode 100644
index 000000000..cb248c5a9
Binary files /dev/null and b/tools/cygwin/wc.exe differ
diff --git a/tools/cygwin/who.exe b/tools/cygwin/who.exe
new file mode 100644
index 000000000..d20a1a8ef
Binary files /dev/null and b/tools/cygwin/who.exe differ
diff --git a/tools/cygwin/whoami.exe b/tools/cygwin/whoami.exe
new file mode 100644
index 000000000..3b42ac284
Binary files /dev/null and b/tools/cygwin/whoami.exe differ
diff --git a/tools/cygwin/windres.exe b/tools/cygwin/windres.exe
new file mode 100644
index 000000000..d01255c87
Binary files /dev/null and b/tools/cygwin/windres.exe differ
diff --git a/tools/cygwin/xargs.exe b/tools/cygwin/xargs.exe
new file mode 100644
index 000000000..21a4bc94e
Binary files /dev/null and b/tools/cygwin/xargs.exe differ
diff --git a/tools/cygwin/yes.exe b/tools/cygwin/yes.exe
new file mode 100644
index 000000000..b78c69397
Binary files /dev/null and b/tools/cygwin/yes.exe differ
diff --git a/tools/cygwin/zcat.exe b/tools/cygwin/zcat.exe
new file mode 100644
index 000000000..631869989
Binary files /dev/null and b/tools/cygwin/zcat.exe differ
diff --git a/tools/cygwin/zcmp b/tools/cygwin/zcmp
new file mode 100644
index 000000000..606c2fe97
--- /dev/null
+++ b/tools/cygwin/zcmp
@@ -0,0 +1,70 @@
+:
+#!/bin/sh
+# sh is buggy on RS/6000 AIX 3.2. Replace above line with #!/bin/ksh
+
+# Zcmp and zdiff are used to invoke the cmp or the  diff  pro-
+# gram  on compressed files.  All options specified are passed
+# directly to cmp or diff.  If only 1 file is specified,  then
+# the  files  compared  are file1 and an uncompressed file1.gz.
+# If two files are specified, then they are  uncompressed  (if
+# necessary) and fed to cmp or diff.  The exit status from cmp
+# or diff is preserved.
+
+PATH="/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH"; export PATH
+prog=`echo $0 | sed 's|.*/||'`
+case "$prog" in
+  *cmp) comp=${CMP-cmp}   ;;
+  *)    comp=${DIFF-diff} ;;
+esac
+
+OPTIONS=
+FILES=
+for ARG
+do
+    case "$ARG" in
+    -*)	OPTIONS="$OPTIONS $ARG";;
+     *)	if test -f "$ARG"; then
+            FILES="$FILES $ARG"
+        else
+            echo "${prog}: $ARG not found or not a regular file"
+	    exit 1
+        fi ;;
+    esac
+done
+if test -z "$FILES"; then
+	echo "Usage: $prog [${comp}_options] file [file]"
+	exit 1
+fi
+set $FILES
+if test $# -eq 1; then
+	FILE=`echo "$1" | sed 's/[-.][zZtga]*$//'`
+	gzip -cd "$1" | $comp $OPTIONS - "$FILE"
+	STAT="$?"
+
+elif test $# -eq 2; then
+	case "$1" in
+        *[-.]gz* | *[-.][zZ] | *.t[ga]z)
+                case "$2" in
+	        *[-.]gz* | *[-.][zZ] | *.t[ga]z)
+			F=`echo "$2" | sed 's|.*/||;s|[-.][zZtga]*||'`
+                        gzip -cdfq "$2" > /tmp/"$F".$$
+                        gzip -cdfq "$1" | $comp $OPTIONS - /tmp/"$F".$$
+                        STAT="$?"
+			/bin/rm -f /tmp/"$F".$$;;
+
+                *)      gzip -cdfq "$1" | $comp $OPTIONS - "$2"
+                        STAT="$?";;
+                esac;;
+        *)      case "$2" in
+	        *[-.]gz* | *[-.][zZ] | *.t[ga]z)
+                        gzip -cdfq "$2" | $comp $OPTIONS "$1" -
+                        STAT="$?";;
+                *)      $comp $OPTIONS "$1" "$2"
+                        STAT="$?";;
+                esac;;
+	esac
+        exit "$STAT"
+else
+	echo "Usage: $prog [${comp}_options] file [file]"
+	exit 1
+fi
diff --git a/tools/cygwin/zdiff b/tools/cygwin/zdiff
new file mode 100644
index 000000000..606c2fe97
--- /dev/null
+++ b/tools/cygwin/zdiff
@@ -0,0 +1,70 @@
+:
+#!/bin/sh
+# sh is buggy on RS/6000 AIX 3.2. Replace above line with #!/bin/ksh
+
+# Zcmp and zdiff are used to invoke the cmp or the  diff  pro-
+# gram  on compressed files.  All options specified are passed
+# directly to cmp or diff.  If only 1 file is specified,  then
+# the  files  compared  are file1 and an uncompressed file1.gz.
+# If two files are specified, then they are  uncompressed  (if
+# necessary) and fed to cmp or diff.  The exit status from cmp
+# or diff is preserved.
+
+PATH="/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH"; export PATH
+prog=`echo $0 | sed 's|.*/||'`
+case "$prog" in
+  *cmp) comp=${CMP-cmp}   ;;
+  *)    comp=${DIFF-diff} ;;
+esac
+
+OPTIONS=
+FILES=
+for ARG
+do
+    case "$ARG" in
+    -*)	OPTIONS="$OPTIONS $ARG";;
+     *)	if test -f "$ARG"; then
+            FILES="$FILES $ARG"
+        else
+            echo "${prog}: $ARG not found or not a regular file"
+	    exit 1
+        fi ;;
+    esac
+done
+if test -z "$FILES"; then
+	echo "Usage: $prog [${comp}_options] file [file]"
+	exit 1
+fi
+set $FILES
+if test $# -eq 1; then
+	FILE=`echo "$1" | sed 's/[-.][zZtga]*$//'`
+	gzip -cd "$1" | $comp $OPTIONS - "$FILE"
+	STAT="$?"
+
+elif test $# -eq 2; then
+	case "$1" in
+        *[-.]gz* | *[-.][zZ] | *.t[ga]z)
+                case "$2" in
+	        *[-.]gz* | *[-.][zZ] | *.t[ga]z)
+			F=`echo "$2" | sed 's|.*/||;s|[-.][zZtga]*||'`
+                        gzip -cdfq "$2" > /tmp/"$F".$$
+                        gzip -cdfq "$1" | $comp $OPTIONS - /tmp/"$F".$$
+                        STAT="$?"
+			/bin/rm -f /tmp/"$F".$$;;
+
+                *)      gzip -cdfq "$1" | $comp $OPTIONS - "$2"
+                        STAT="$?";;
+                esac;;
+        *)      case "$2" in
+	        *[-.]gz* | *[-.][zZ] | *.t[ga]z)
+                        gzip -cdfq "$2" | $comp $OPTIONS "$1" -
+                        STAT="$?";;
+                *)      $comp $OPTIONS "$1" "$2"
+                        STAT="$?";;
+                esac;;
+	esac
+        exit "$STAT"
+else
+	echo "Usage: $prog [${comp}_options] file [file]"
+	exit 1
+fi
diff --git a/tools/cygwin/zforce b/tools/cygwin/zforce
new file mode 100644
index 000000000..67096c5f9
--- /dev/null
+++ b/tools/cygwin/zforce
@@ -0,0 +1,42 @@
+:
+#!/bin/sh
+# zforce: force a gz extension on all gzip files so that gzip will not
+# compress them twice.
+#
+# This can be useful for files with names truncated after a file transfer.
+# 12345678901234 is renamed to 12345678901.gz
+
+PATH="/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH"; export PATH
+x=`basename $0`
+if test $# = 0; then
+  echo "force a '.gz' extension on all gzip files"
+  echo usage: $x files...
+  exit 1
+fi
+
+res=0
+for i do
+  if test ! -f "$i" ; then
+    echo ${x}: $i not a file
+    res=1
+    continue
+  fi
+  test `expr "$i" : '.*[.-]z$'` -eq 0 || continue
+  test `expr "$i" : '.*[.-]gz$'` -eq 0 || continue
+  test `expr "$i" : '.*[.]t[ag]z$'` -eq 0 || continue
+
+  if gzip -l < "$i" 2>/dev/null | grep '^defl' > /dev/null; then
+
+    if test `expr "$i" : '^............'` -eq 12; then
+      new=`expr "$i" : '\(.*\)...$`.gz
+    else
+      new="$i.gz"
+    fi
+    if mv "$i" "$new" 2>/dev/null; then
+      echo $i -- replaced with $new
+      continue
+    fi
+    res=1; echo ${x}: cannot rename $i to $new
+  fi
+done
+exit $res
diff --git a/tools/cygwin/zgrep b/tools/cygwin/zgrep
new file mode 100644
index 000000000..bab263ac1
--- /dev/null
+++ b/tools/cygwin/zgrep
@@ -0,0 +1,67 @@
+:
+#!/bin/sh
+
+# zgrep -- a wrapper around a grep program that decompresses files as needed
+# Adapted from a version sent by Charles Levert <charles@comm.polymtl.ca>
+
+PATH="/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH"; export PATH
+
+prog=`echo $0 | sed 's|.*/||'`
+case "$prog" in
+	*egrep)	grep=${EGREP-egrep}	;;
+	*fgrep)	grep=${FGREP-fgrep}	;;
+	*)	grep=${GREP-grep}	;;
+esac
+pat=""
+while test $# -ne 0; do
+  case "$1" in
+  -e | -f) opt="$opt $1"; shift; pat="$1"
+           if test "$grep" = grep; then  # grep is buggy with -e on SVR4
+             grep=egrep
+           fi;;
+  -*)	   opt="$opt $1";;
+   *)      if test -z "$pat"; then
+	     pat="$1"
+	   else
+	     break;
+           fi;;
+  esac
+  shift
+done
+
+if test -z "$pat"; then
+  echo "grep through gzip files"
+  echo "usage: $prog [grep_options] pattern [files]"
+  exit 1
+fi
+
+list=0
+silent=0
+op=`echo "$opt" | sed -e 's/ //g' -e 's/-//g'`
+case "$op" in
+  *l*) list=1
+esac
+case "$op" in
+  *h*) silent=1
+esac
+
+if test $# -eq 0; then
+  gzip -cdfq | $grep $opt "$pat"
+  exit $?
+fi
+
+res=0
+for i do
+  if test $list -eq 1; then
+    gzip -cdfq "$i" | $grep $opt "$pat" > /dev/null && echo $i
+    r=$?
+  elif test $# -eq 1 -o $silent -eq 1; then
+    gzip -cdfq "$i" | $grep $opt "$pat"
+    r=$?
+  else
+    gzip -cdfq "$i" | $grep $opt "$pat" | sed "s|^|${i}:|"
+    r=$?
+  fi
+  test "$r" -ne 0 && res="$r"
+done
+exit $res
diff --git a/tools/cygwin/zmore b/tools/cygwin/zmore
new file mode 100644
index 000000000..6b6379616
--- /dev/null
+++ b/tools/cygwin/zmore
@@ -0,0 +1,52 @@
+:
+#!/bin/sh
+
+PATH="/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH"; export PATH
+if test "`echo -n a`" = "-n a"; then
+  # looks like a SysV system:
+  n1=''; n2='\c'
+else
+  n1='-n'; n2=''
+fi
+oldtty=`stty -g 2>/dev/null`
+if stty -cbreak 2>/dev/null; then
+  cb='cbreak'; ncb='-cbreak'
+else
+  # 'stty min 1' resets eof to ^a on both SunOS and SysV!
+  cb='min 1 -icanon'; ncb='icanon eof ^d'
+fi
+if test $? -eq 0 -a -n "$oldtty"; then
+   trap 'stty $oldtty 2>/dev/null; exit' 0 2 3 5 10 13 15
+else
+   trap 'stty $ncb echo 2>/dev/null; exit' 0 2 3 5 10 13 15
+fi
+
+if test $# = 0; then
+    if test -t 0; then
+	echo usage: zmore files...
+    else
+	gzip -cdfq | eval ${PAGER-more}
+    fi
+else
+    FIRST=1
+    for FILE
+    do
+	if test $FIRST -eq 0; then
+		echo $n1 "--More--(Next file: $FILE)$n2"
+		stty $cb -echo 2>/dev/null
+		ANS=`dd bs=1 count=1 2>/dev/null` 
+		stty $ncb echo 2>/dev/null
+		echo " "
+		if test "$ANS" = 'e' -o "$ANS" = 'q'; then
+			exit
+		fi
+	fi
+	if test "$ANS" != 's'; then
+		echo "------> $FILE <------"
+		gzip -cdfq "$FILE" | eval ${PAGER-more}
+	fi
+	if test -t; then
+		FIRST=0
+	fi
+    done
+fi
diff --git a/tools/cygwin/znew b/tools/cygwin/znew
new file mode 100644
index 000000000..069f12f70
--- /dev/null
+++ b/tools/cygwin/znew
@@ -0,0 +1,146 @@
+:
+#!/bin/sh
+
+PATH="/cygnus/cygwin-b20/H-i586-cygwin32/bin:$PATH"; export PATH
+check=0
+pipe=0
+opt=
+files=
+keep=0
+res=0
+old=0
+new=0
+block=1024
+# block is the disk block size (best guess, need not be exact)
+
+warn="(does not preserve modes and timestamp)"
+tmp=/tmp/zfoo.$$
+echo hi > $tmp.1
+echo hi > $tmp.2
+if test -z "`(${CPMOD-cpmod} $tmp.1 $tmp.2) 2>&1`"; then
+  cpmod=${CPMOD-cpmod}
+  warn=""
+fi
+
+if test -z "$cpmod" && ${TOUCH-touch} -r $tmp.1 $tmp.2 2>/dev/null; then
+  cpmod="${TOUCH-touch}"
+  cpmodarg="-r"
+  warn="(does not preserve file modes)"
+fi
+
+# check if GZIP env. variable uses -S or --suffix
+gzip -q $tmp.1
+ext=`echo $tmp.1* | sed "s|$tmp.1||"`
+rm -f $tmp.[12]*
+if test -z "$ext"; then
+  echo znew: error determining gzip extension
+  exit 1
+fi
+if test "$ext" = ".Z"; then
+  echo znew: cannot use .Z as gzip extension.
+  exit 1
+fi
+
+for arg
+do
+  case "$arg" in
+  -*)     opt="$opt $arg"; shift;;
+   *)     break;;
+  esac
+done
+
+if test $# -eq 0; then
+  echo "recompress .Z files into $ext (gzip) files"
+  echo usage: `echo $0 | sed 's,^.*/,,'` "[-tv9KP]" file.Z...
+  echo "  -t tests the new files before deleting originals"
+  echo "  -v be verbose"
+  echo "  -9 use the slowest compression method (optimal compression)"
+  echo "  -K keep a .Z file when it is smaller than the $ext file"
+  echo "  -P use pipes for the conversion $warn"
+  exit 1
+fi
+
+opt=`echo "$opt" | sed -e 's/ //g' -e 's/-//g'`
+case "$opt" in
+  *t*) check=1; opt=`echo "$opt" | sed 's/t//g'`
+esac
+case "$opt" in
+  *K*) keep=1; opt=`echo "$opt" | sed 's/K//g'`
+esac
+case "$opt" in
+  *P*) pipe=1; opt=`echo "$opt" | sed 's/P//g'`
+esac
+if test -n "$opt"; then
+  opt="-$opt"
+fi
+
+for i do
+  n=`echo $i | sed 's/.Z$//'`
+  if test ! -f "$n.Z" ; then
+    echo $n.Z not found
+    res=1; continue
+  fi
+  test $keep -eq 1 && old=`wc -c < "$n.Z"`
+  if test $pipe -eq 1; then
+    if gzip -d < "$n.Z" | gzip $opt > "$n$ext"; then
+      # Copy file attributes from old file to new one, if possible.
+      test -n "$cpmod" && $cpmod $cpmodarg "$n.Z" "$n$ext" 2> /dev/null
+    else
+      echo error while recompressing $n.Z
+      res=1; continue
+    fi
+  else
+    if test $check -eq 1; then
+      if cp -p "$n.Z" "$n.$$" 2> /dev/null || cp "$n.Z" "$n.$$"; then
+	:
+      else
+	echo cannot backup "$n.Z"
+        res=1; continue
+      fi
+    fi
+    if gzip -d "$n.Z"; then
+      :
+    else
+      test $check -eq 1 && mv "$n.$$" "$n.Z"
+      echo error while uncompressing $n.Z
+      res=1; continue
+    fi
+    if gzip $opt "$n"; then
+      :
+    else
+      if test $check -eq 1; then
+	mv "$n.$$" "$n.Z" && rm -f "$n"
+        echo error while recompressing $n
+      else
+	# compress $n  (might be dangerous if disk full)
+        echo error while recompressing $n, left uncompressed
+      fi
+      res=1; continue
+    fi
+  fi
+  test $keep -eq 1 && new=`wc -c < "$n$ext"`
+  if test $keep -eq 1 -a `expr \( $old + $block - 1 \) / $block` -lt \
+                         `expr \( $new + $block - 1 \) / $block`; then
+    if test $pipe -eq 1; then
+      rm -f "$n$ext"
+    elif test $check -eq 1; then
+      mv "$n.$$" "$n.Z" && rm -f "$n$ext"
+    else
+      gzip -d "$n$ext" && compress "$n" && rm -f "$n$ext"
+    fi
+    echo "$n.Z smaller than $n$ext -- unchanged"
+
+  elif test $check -eq 1; then
+    if gzip -t "$n$ext" ; then
+      rm -f "$n.$$" "$n.Z"
+    else
+      test $pipe -eq 0 && mv "$n.$$" "$n.Z"
+      rm -f "$n$ext"
+      echo error while testing $n$ext, $n.Z unchanged
+      res=1; continue
+    fi
+  elif test $pipe -eq 1; then
+    rm -f "$n.Z"
+  fi
+done
+exit $res
diff --git a/tools/glecho.exe b/tools/glecho.exe
new file mode 100644
index 000000000..d98d178de
Binary files /dev/null and b/tools/glecho.exe differ
diff --git a/tools/make.exe b/tools/make.exe
new file mode 100644
index 000000000..1e50b71f8
Binary files /dev/null and b/tools/make.exe differ
diff --git a/tools/mod/bin/RAW2VAGD.DLL b/tools/mod/bin/RAW2VAGD.DLL
new file mode 100644
index 000000000..73ab4dfb9
Binary files /dev/null and b/tools/mod/bin/RAW2VAGD.DLL differ
diff --git a/tools/mod/bin/VABSPLIT.EXE b/tools/mod/bin/VABSPLIT.EXE
new file mode 100644
index 000000000..01f4b5bc5
Binary files /dev/null and b/tools/mod/bin/VABSPLIT.EXE differ
diff --git a/tools/mod/bin/XM2PSX.EXE b/tools/mod/bin/XM2PSX.EXE
new file mode 100644
index 000000000..3525892a8
Binary files /dev/null and b/tools/mod/bin/XM2PSX.EXE differ
diff --git a/tools/mod/include/XMPLAY.H b/tools/mod/include/XMPLAY.H
new file mode 100644
index 000000000..67b273179
--- /dev/null
+++ b/tools/mod/include/XMPLAY.H
@@ -0,0 +1,128 @@
+#ifndef XMPlayer
+#define XMPlayer
+
+extern int JPPer;
+
+extern int XMTime1;
+extern int XMTime2;
+extern int XMTime3;
+
+#define XM_PROCESSING 0
+#define XM_NOT_PROCESSED 1
+
+#define XM_NTSC 0				/* Machine type */
+#define XM_PAL 1
+
+#define XM_Loop 1				/* Looping song */
+#define XM_NoLoop 0			/* Once off song */
+
+#define XM_Music 0			/* Playback as music */
+#define XM_SFX 1				/* Playback as SFX */
+
+#define XM_UseXMPanning 0	/* S3M Panning switches */
+#define XM_UseS3MPanning 1
+
+#define XM_STOPPED 0			/* Song/SFX Status */
+#define XM_PLAYING 1
+#define XM_PAUSED  2
+
+extern int XM_SCAN;			/* Scan lines used */
+extern int JPError;			/* Test */
+
+
+typedef struct XM_HeaderInfo
+{
+		u_short	BPM;
+		u_short	Speed;
+} XM_HeaderInfo;
+
+typedef struct XM_VABInfo
+{
+		u_char*		Address;
+		u_long		Size;
+} XM_VABInfo;
+
+typedef struct XM_Feedback
+{
+		u_char	Volume;
+		short		Panning;
+		int		CurrentStart;
+		short		PlayNext;
+		u_short	SongLength;
+		u_char	Status;
+		u_short	PatternPos;
+		short		SongPos;
+		u_short	CurrentPattern;
+		u_short	SongSpeed;
+		u_short	SongBPM;
+		int		SongLoop;
+		int		ActiveVoices;
+} XM_Feedback;
+
+#ifdef __cplusplus			/* Added by MikeA */
+extern "C" {
+#endif
+
+void XM_Restart(int Song_ID);
+void XM_Pause(int Song_ID);
+void XM_Exit(void);
+void XM_Update(void);
+void XM_PlayStop(int Song_ID);
+void XM_PlayStart(int Song_ID,int PlayMask);
+void XM_SetSongPos(int Song_ID,u_short pos);
+int InitXMData(u_char *mpp,int XM_ID,int S3MPan);
+int XM_VABInit(u_char* VHData,u_char* VBData);
+void XM_OnceOffInit(int PAL);
+int XM_GetFeedback(int Song_ID,XM_Feedback* Feedback);
+void XM_GetHeaderInfo(int XM_ID,XM_HeaderInfo* HeaderInfo);
+int  XM_Init(int VabID,int XM_ID,int SongID, int FirstCh,
+				 int Loop,int PlayMask,int PlayType,int SFXNum);
+int XM_GetChVolume(int Song_ID,int Channel);
+void XM_SetChVolume(int Song_ID,int Channel,int Volume);
+void XM_PlayNext(int Song_ID,short SongPos);
+void XM_CPlayNext(int Song_ID,short SongPos);
+void XM_CloseVAB(int VabID);
+void XM_SetMasterPan(int Song_ID,short Pan);
+void XM_SetMasterVol(int Song_ID,u_char Vol);
+int XM_SendVAGToSRAM(u_char *addr,int size);
+int XM_SendVAGToSRAM_NoWait(u_char *addr,int size);
+void XM_FreeVAG(int addr);
+void UpdateWithTimer(int SC);
+void XM_DoFullUpdate(int SC);
+
+void XM_Quit(int SongID);
+int XM_SetSFXRange(int FirstCh,int Amount);
+void XM_ClearSFXRange(void);
+
+void XM_StopSample(int channel);
+void XM_PlaySample(int addr,int channel,int voll,int volr,int pitch);
+int XM_GetSampleAddress(int vabid,int samplenum);
+int XM_GetFreeVAB(void);
+void XM_SetVAGAddress(int VabID,int slot,int addr);
+int XM_GetVABSampleInfo(XM_VABInfo *VInfo,u_char *Header,u_char *Body,int slot);
+void XM_CloseVAB2(int VabID);
+void XM_PauseAll(void);
+void XM_RestartAll(void);
+
+void XM_SetSongAddress(u_char *Address);
+int XM_GetSongSize(void);
+void XM_FreeAllSongIDs(void);
+void XM_FreeSongID(void);
+void XM_SetSpeed(int Song_ID,u_short Speed);
+void XM_SetBPM(int Song_ID,u_short BPM);
+
+void XM_SetMono(void);
+void XM_SetStereo(void);
+void XM_FreeAllFileHeaderIDs(void);
+void XM_FreeFileHeaderID(void);
+void XM_SetFileHeaderAddress(u_char *Address);
+int XM_GetFileHeaderSize(void);
+void XM_Update2(int speed);
+
+
+void SetTranspose(int a);
+
+#ifdef __cplusplus			/* Added by MikeA */
+}
+#endif
+#endif
diff --git a/tools/mod/lib/XMPLAY.LIB b/tools/mod/lib/XMPLAY.LIB
new file mode 100644
index 000000000..0e868e6b8
Binary files /dev/null and b/tools/mod/lib/XMPLAY.LIB differ
diff --git a/tools/objbodge.exe b/tools/objbodge.exe
new file mode 100644
index 000000000..5d7bab62f
Binary files /dev/null and b/tools/objbodge.exe differ
diff --git a/tools/parkgrab.exe b/tools/parkgrab.exe
new file mode 100644
index 000000000..663c7f7fb
Binary files /dev/null and b/tools/parkgrab.exe differ
diff --git a/tools/pdatool/PDATOOL.EXE b/tools/pdatool/PDATOOL.EXE
new file mode 100644
index 000000000..47426aa20
Binary files /dev/null and b/tools/pdatool/PDATOOL.EXE differ
diff --git a/tools/psyq/bin/Blank.exe b/tools/psyq/bin/Blank.exe
new file mode 100644
index 000000000..24b32f7a6
Binary files /dev/null and b/tools/psyq/bin/Blank.exe differ
diff --git a/tools/psyq/bin/CDEXEC.CPE b/tools/psyq/bin/CDEXEC.CPE
new file mode 100644
index 000000000..5f21a8da2
Binary files /dev/null and b/tools/psyq/bin/CDEXEC.CPE differ
diff --git a/tools/psyq/bin/CPE2BIN.EXE b/tools/psyq/bin/CPE2BIN.EXE
new file mode 100644
index 000000000..6c92106de
Binary files /dev/null and b/tools/psyq/bin/CPE2BIN.EXE differ
diff --git a/tools/psyq/bin/DBUGPSX.EXE b/tools/psyq/bin/DBUGPSX.EXE
new file mode 100644
index 000000000..5e3b5bdef
Binary files /dev/null and b/tools/psyq/bin/DBUGPSX.EXE differ
diff --git a/tools/psyq/bin/DEXBIOS.COM b/tools/psyq/bin/DEXBIOS.COM
new file mode 100644
index 000000000..c6b2b231d
Binary files /dev/null and b/tools/psyq/bin/DEXBIOS.COM differ
diff --git a/tools/psyq/bin/DMPSX.EXE b/tools/psyq/bin/DMPSX.EXE
new file mode 100644
index 000000000..309e92398
Binary files /dev/null and b/tools/psyq/bin/DMPSX.EXE differ
diff --git a/tools/psyq/bin/H25BIOS.COM b/tools/psyq/bin/H25BIOS.COM
new file mode 100644
index 000000000..fe6ec7655
Binary files /dev/null and b/tools/psyq/bin/H25BIOS.COM differ
diff --git a/tools/psyq/bin/MESS1.COM b/tools/psyq/bin/MESS1.COM
new file mode 100644
index 000000000..e52184f6e
Binary files /dev/null and b/tools/psyq/bin/MESS1.COM differ
diff --git a/tools/psyq/bin/MFR.EXE b/tools/psyq/bin/MFR.EXE
new file mode 100644
index 000000000..c2e3c8784
Binary files /dev/null and b/tools/psyq/bin/MFR.EXE differ
diff --git a/tools/psyq/bin/Psylib2.exe b/tools/psyq/bin/Psylib2.exe
new file mode 100644
index 000000000..b5fe14cc8
Binary files /dev/null and b/tools/psyq/bin/Psylib2.exe differ
diff --git a/tools/psyq/bin/RESETPS.EXE b/tools/psyq/bin/RESETPS.EXE
new file mode 100644
index 000000000..379c5f443
Binary files /dev/null and b/tools/psyq/bin/RESETPS.EXE differ
diff --git a/tools/psyq/bin/RUN.EXE b/tools/psyq/bin/RUN.EXE
new file mode 100644
index 000000000..76655c884
Binary files /dev/null and b/tools/psyq/bin/RUN.EXE differ
diff --git a/tools/psyq/bin/SELCD.CPE b/tools/psyq/bin/SELCD.CPE
new file mode 100644
index 000000000..cdf4f494e
Binary files /dev/null and b/tools/psyq/bin/SELCD.CPE differ
diff --git a/tools/psyq/bin/SELEMU.CPE b/tools/psyq/bin/SELEMU.CPE
new file mode 100644
index 000000000..ba84edf93
Binary files /dev/null and b/tools/psyq/bin/SELEMU.CPE differ
diff --git a/tools/psyq/bin/SNPATCH.CPE b/tools/psyq/bin/SNPATCH.CPE
new file mode 100644
index 000000000..c7eff0ed6
Binary files /dev/null and b/tools/psyq/bin/SNPATCH.CPE differ
diff --git a/tools/psyq/bin/SNPATCHJ.CPE b/tools/psyq/bin/SNPATCHJ.CPE
new file mode 100644
index 000000000..e9a9bc934
Binary files /dev/null and b/tools/psyq/bin/SNPATCHJ.CPE differ
diff --git a/tools/psyq/bin/SNPATCHW.CPE b/tools/psyq/bin/SNPATCHW.CPE
new file mode 100644
index 000000000..947e65df1
Binary files /dev/null and b/tools/psyq/bin/SNPATCHW.CPE differ
diff --git a/tools/psyq/bin/TESTMESS.COM b/tools/psyq/bin/TESTMESS.COM
new file mode 100644
index 000000000..4a41cf230
Binary files /dev/null and b/tools/psyq/bin/TESTMESS.COM differ
diff --git a/tools/psyq/bin/asmpsx.exe b/tools/psyq/bin/asmpsx.exe
new file mode 100644
index 000000000..f7be39752
Binary files /dev/null and b/tools/psyq/bin/asmpsx.exe differ
diff --git a/tools/psyq/bin/aspsx.exe b/tools/psyq/bin/aspsx.exe
new file mode 100644
index 000000000..ec5e87da5
Binary files /dev/null and b/tools/psyq/bin/aspsx.exe differ
diff --git a/tools/psyq/bin/ccpsx.exe b/tools/psyq/bin/ccpsx.exe
new file mode 100644
index 000000000..64b89965b
Binary files /dev/null and b/tools/psyq/bin/ccpsx.exe differ
diff --git a/tools/psyq/bin/cpe2exe.exe b/tools/psyq/bin/cpe2exe.exe
new file mode 100644
index 000000000..19f402ec4
Binary files /dev/null and b/tools/psyq/bin/cpe2exe.exe differ
diff --git a/tools/psyq/bin/egcs/a.txt b/tools/psyq/bin/egcs/a.txt
new file mode 100644
index 000000000..c194d2c60
--- /dev/null
+++ b/tools/psyq/bin/egcs/a.txt
@@ -0,0 +1,341 @@
+Usage: CC1PLPSX.EXE input [switches]
+Switches:
+  -ffixed-<register>      Mark <register> as being unavailable to the compiler
+  -fcall-used-<register>  Mark <register> as being corrupted by function calls
+  -fcall-saved-<register> Mark <register> as being preserved across functions
+  -finline-limit-<number> Limits the size of inlined functions to <number>
+  -fident                 Process #ident directives
+  -fleading-underscore    External symbols have a leading underscore
+  -finstrument-functions  Instrument function entry/exit with profiling calls
+  -fdump-unnumbered       Suppress output of instruction numbers and line number notes in debugging dumps
+  -fprefix-function-name  Add a prefix to all function names
+  -fcheck-memory-usage    Generate code to check every memory access
+  -fstrict-aliasing       Assume strict aliasing rules apply
+  -fargument-noalias-global Assume arguments do not alias each other or globals
+  -fargument-noalias      Assume arguments may alias globals but not each other
+  -fargument-alias        Specify that arguments may alias each other & globals
+  -fstack-check           Insert stack checking code into the program
+  -fpack-struct           Pack structure members together without holes
+  -foptimize-register-move Do the full regmove optimization pass
+  -fregmove               Enables a register move optimisation
+  -fgnu-linker            Output GNU ld formatted global initialisers
+  -fverbose-asm           Add extra commentry to assembler output
+  -fdata-sections         place data items into their own section
+  -ffunction-sections     place each function into its own section
+  -finhibit-size-directive Do not generate .size directives
+  -fcommon                Do not put unitialised globals in the common section
+  -ffast-math             Improve FP speed by violating ANSI & IEEE rules
+  -fbranch-probabilities  Use profiling information for branch probabilities
+  -ftest-coverage         Create data files needed by gcov
+  -fprofile-arcs          Insert arc based program profiling code
+  -fasynchronous-exceptions Support asynchronous exceptions
+  -fsjlj-exceptions       Use setjmp/longjmp to handle exceptions
+  -fnew-exceptions        Use the new model for exception handling
+  -fexceptions            Enable exception handling
+  -fpic                   Generate position independent code, if possible
+  -fbranch-count-reg      Replace add,compare,branch with branch on count reg
+  -fschedule-insns2       Run two passes of the instruction scheduler
+  -fschedule-insns        Reschedule instructions to avoid pipeline stalls
+  -fpretend-float         Pretend that host and target use the same FP format
+  -frerun-loop-opt        Run the loop optimiser twice
+  -frerun-cse-after-loop  Run CSE pass after loop optimisations
+  -fgcse                  Perform the global common subexpression elimination
+  -fdelayed-branch        Attempt to fill delay slots of branch instructions
+  -freg-struct-return     Return 'short' aggregates in registers
+  -fpcc-struct-return     Return 'short' aggregates in memory, not registers
+  -fcaller-saves          Enable saving registers around function calls
+  -fshared-data           Mark data as shared rather than private
+  -fsyntax-only           Check for syntax errors, then stop
+  -fkeep-static-consts    Emit static const variables even if they are not used
+  -finline                Pay attention to the 'inline' keyword
+  -fkeep-inline-functions Generate code for funcs even if they are fully inlined
+  -finline-functions      Integrate simple functions into their callers
+  -ffunction-cse          Allow function addresses to be held in registers
+  -fforce-addr            Copy memory address constants into regs before using
+  -fforce-mem             Copy memory operands into registers before using
+  -fpeephole              Enable machine specific peephole optimisations
+  -fwritable-strings      Store strings in writable data section
+  -freduce-all-givs       Strength reduce all loop general induction variables
+  -fmove-all-movables     Force all loop invariant computations out of loops
+  -funroll-all-loops      Perform loop unrolling for all loops
+  -funroll-loops          Perform loop unrolling when iteration count is known
+  -fstrength-reduce       Perform strength reduction optimisations
+  -fthread-jumps          Perform jump threading optimisations
+  -fexpensive-optimizations Perform a number of minor, expensive optimisations
+  -fcse-skip-blocks       When running CSE, follow conditional jumps
+  -fcse-follow-jumps      When running CSE, follow jumps to their targets
+  -fomit-frame-pointer    When possible do not generate stack frames
+  -fdefer-pop             Defer popping functions args from stack until later
+  -fvolatile-static       Consider all mem refs to static data to be volatile
+  -fvolatile-global       Consider all mem refs to global data to be volatile
+  -fvolatile              Consider all mem refs through pointers as volatile
+  -ffloat-store           Do not store floats in registers
+  -O[number]              Set optimisation level to [number]
+  -Os                     Optimise for space rather than speed
+  -pedantic               Issue warnings needed by strict compliance to ANSI C
+  -pedantic-errors        Like -pedantic except that errors are produced
+  -w                      Suppress warnings
+  -W                      Enable extra warnings
+  -Winline                Warn when an inlined function cannot be inlined
+  -Wuninitialized         Warn about unitialized automatic variables
+  -Wcast-align            Warn about pointer casts which increase alignment
+  -Waggregate-return      Warn about returning structures, unions or arrays
+  -Wswitch                Warn about enumerated switches missing a specific case
+  -Wshadow                Warn when one local variable shadows another
+  -Wunused                Warn when a variable is unused
+  -Wid-clash-<num>        Warn if 2 identifiers have the same first <num> chars
+  -Wlarger-than-<number>  Warn if an object is larger than <number> bytes
+  -p                      Enable function profiling
+  -o <file>               Place output into <file> 
+  -G <number>             Put global and static data smaller than <number>
+                           bytes into a special section (on some targets)
+  -gcoff                  Generate COFF format debug output
+  -gstabs+                Generate extended STABS format debug output
+  -gstabs                 Generate STABS format debug output
+  -ggdb                   Generate default extended debug format output
+  -g                      Generate default debug format output
+  -aux-info <file>        Emit declaration info into <file>.X
+  -quiet                  Do not display functions compiled or elapsed time
+  -version                Display the compiler's version
+  -d[letters]             Enable dumps from specific passes of the compiler
+  -dumpbase <file>        Base name to be used for dumps from specific passes
+  -sched-verbose-<number> Set the verbosity level of the scheduler
+  --help                  Display this information
+
+Language specific options:
+  -ansi                   Compile just for ANSI C
+  -fallow-single-precisio Do not promote floats to double if using -traditional
+  -std=                   Determine language standard
+  -funsigned-bitfields    Make bitfields by unsigned by default
+  -fsigned-char           Make 'char' be signed by default
+  -funsigned-char         Make 'char' be unsigned by default
+  -traditional            Attempt to support traditional K&R style C
+  -fno-asm                Do not recognise the 'asm' keyword
+  -fno-builtin            Do not recognise any built in functions
+  -fhosted                Assume normal C execution environment
+  -ffreestanding          Assume that standard libraries & main might not exist
+  -fcond-mismatch         Allow different types as args of ? operator
+  -fdollars-in-identifier Allow the use of $ inside identifiers
+  -fshort-double          Use the same size for double as for float
+  -fshort-enums           Use the smallest fitting integer to hold enums
+  -Wall                   Enable most warning messages
+  -Wbad-function-cast     Warn about casting functions to incompatible types
+  -Wmissing-noreturn      Warn about functions which might be candidates for attribute noreturn
+  -Wcast-qual             Warn about casts which discard qualifiers
+  -Wchar-subscripts       Warn about subscripts whose type is 'char'
+  -Wcomment               Warn if nested comments are detected
+  -Wcomments              Warn if nested comments are detected
+  -Wconversion            Warn about possibly confusing type conversions
+  -Wformat                Warn about printf format anomalies
+  -Wimplicit-function-dec Warn about implicit function declarations
+  -Wimplicit-int          Warn when a declaration does not specify a type
+  -Wimport                Warn about the use of the #import directive
+  -Wno-long-long          Do not warn about using 'long long' when -pedantic
+  -Wmain                  Warn about suspicious declarations of main
+  -Wmissing-braces        Warn about possibly missing braces around initialisers
+  -Wmissing-declarations  Warn about global funcs without previous declarations
+  -Wmissing-prototypes    Warn about global funcs without prototypes
+  -Wmultichar             Warn about use of multicharacter literals
+  -Wnested-externs        Warn about externs not at file scope level
+  -Wparentheses           Warn about possible missing parentheses
+  -Wpointer-arith         Warn about function pointer arithmetic
+  -Wredundant-decls       Warn about multiple declarations of the same object
+  -Wsign-compare          Warn about signed/unsigned comparisons
+  -Wunknown-pragmas       Warn about unrecognised pragmas
+  -Wstrict-prototypes     Warn about non-prototyped function decls
+  -Wtraditional           Warn about constructs whose meaning change in ANSI C
+  -Wtrigraphs             Warn when trigraphs are encountered
+  -Wwrite-strings         Mark strings as 'const char *'
+
+ Options for Objective C:
+  -gen-decls              Dump decls to a .decl file
+  -fgnu-runtime           Generate code for GNU runtime environment
+  -fnext-runtime          Generate code for NeXT runtime environment
+  -Wselector              Warn if a selector has multiple methods
+  -Wno-protocol           Do not warn if inherited methods are unimplemented
+  -print-objc-runtime-inf Generate C header of platform specific features
+
+ Options for C++:
+  -fno-access-control     Do not obey access control semantics
+  -fall-virtual           Make all member functions virtual
+  -falt-external-template Change when template instances are emitted
+  -fcheck-new             Check the return value of new
+  -fconserve-space        Reduce size of object files
+  -fno-const-strings      Make string literals `char[]' instead of `const char[]'
+  -fno-default-inline     Do not inline member functions by default
+  -fno-rtti               Do not generate run time type descriptor information
+  -fno-for-scope          Scope of for-init-statement vars extends outside
+  -fguiding-decls         Implement guiding declarations
+  -fno-gnu-keywords       Do not recognise GNU defined keywords
+  -fhandle-signatures     Handle signature language constructs
+  -fhonor-std             Treat the namespace `std' as a normal namespace
+  -fhuge-objects          Enable support for huge objects
+  -fno-implement-inlines  Export functions even if they can be inlined
+  -fno-implicit-templates Only emit explicit template instatiations
+  -fno-implicit-inline-te Only emit explicit instatiations of inline templates
+  -finit-priority         Handle the init_priority attribute
+  -flabels-ok             Labels can be used as first class objects
+  -fnew-abi               Enable experimental ABI changes
+  -fno-nonnull-objects    Do not assume that a reference is always valid
+  -foperator-names        Recognise and/bitand/bitor/compl/not/or/xor
+  -fno-optional-diags     Disable optional diagnostics
+  -fpermissive            Downgrade conformance errors to warnings
+  -frepo                  Enable automatic template instantiation
+  -fsquangle              Enable squashed name mangling
+  -fstats                 Display statistics accumulated during compilation
+  -fno-strict-prototype   Do not assume that empty prototype means no args
+  -ftemplate-depth-       Specify maximum template instantiation depth
+  -fthis-is-variable      Make 'this' not be type '* const'
+  -fvtable-gc             Discard unused virtual functions
+  -fvtable-thunks         Implement vtables using thunks
+  -fweak                  Emit common-like symbols as weak symbols
+  -fxref                  Emit cross referencing information
+  -Wreturn-type           Warn about inconsistent return types
+  -Woverloaded-virtual    Warn about overloaded virtual function names
+  -Wno-ctor-dtor-privacy  Don't warn when all ctors/dtors are private
+  -Wnon-virtual-dtor      Warn about non virtual destructors
+  -Wextern-inline         Warn when a function is declared extern, then inline
+  -Wreorder               Warn when the compiler reorders code
+  -Wsynth                 Warn when synthesis behaviour differs from Cfront
+  -Wno-pmf-conversions    Don't warn when type converting pointers to member functions
+  -Weffc++                Warn about violations of Effective C++ style rules
+  -Wsign-promo            Warn when overload promotes from unsigned to signed
+  -Wold-style-cast        Warn if a C style cast is used in a program
+  -Wno-non-template-frien Don't warn when non-templatized friend functions are declared within a template
+  -Wno-deprecated         Don't announce deprecation of compiler features
+
+ Options for Fortran:
+  -fversion               Print g77-specific compiler version info, run internal tests
+  -ff66                   Program is written in typical FORTRAN 66 dialect
+  -ff77                   Program is written in typical Unix f77 dialect
+  -fno-f77                Program does not use Unix-f77 dialectal features
+  -ff90                   Program is written in Fortran-90-ish dialect
+  -fno-automatic          Treat local vars and COMMON blocks as if they were named in SAVE statements
+  -fdollar-ok             Allow $ in symbol names
+  -fno-f2c                f2c-compatible code need not be generated
+  -fno-f2c-library        Unsupported; do not generate libf2c-calling code
+  -fflatten-arrays        Unsupported; affects code-generation of arrays
+  -ffree-form             Program is written in Fortran-90-ish free form
+  -fpedantic              Warn about use of (only a few for now) Fortran extensions
+  -fvxt                   Program is written in VXT (Digital-like) FORTRAN
+  -fno-ugly               Disallow all ugly features
+  -fno-ugly-args          Hollerith and typeless constants not passed as arguments
+  -fugly-assign           Allow ordinary copying of ASSIGN'ed vars
+  -fugly-assumed          Dummy array dimensioned to (1) is assumed-size
+  -fugly-comma            Trailing comma in procedure call denotes null argument
+  -fugly-complex          Allow REAL(Z) and AIMAG(Z) given DOUBLE COMPLEX Z
+  -fno-ugly-init          Initialization via DATA and PARAMETER is type-compatible
+  -fugly-logint           Allow INTEGER and LOGICAL interchangeability
+  -fxyzzy                 Print internal debugging-related info
+  -finit-local-zero       Initialize local vars and arrays to zero
+  -fno-backslash          Backslashes in character/hollerith constants not special (C-style)
+  -femulate-complex       Have front end emulate COMPLEX arithmetic to avoid bugs
+  -fno-underscoring       Disable the appending of underscores to externals
+  -fno-second-underscore  Never append a second underscore to externals
+  -fintrin-case-initcap   Intrinsics spelled as e.g. SqRt
+  -fintrin-case-upper     Intrinsics in uppercase
+  -fintrin-case-any       Intrinsics letters in arbitrary cases
+  -fmatch-case-initcap    Language keywords spelled as e.g. IOStat
+  -fmatch-case-upper      Language keywords in uppercase
+  -fmatch-case-any        Language keyword letters in arbitrary cases
+  -fsource-case-upper     Internally convert most source to uppercase
+  -fsource-case-preserve  Internally preserve source case
+  -fsymbol-case-initcap   Symbol names spelled in mixed case
+  -fsymbol-case-upper     Symbol names in uppercase
+  -fsymbol-case-lower     Symbol names in lowercase
+  -fcase-strict-upper     Program written in uppercase
+  -fcase-strict-lower     Program written in lowercase
+  -fcase-initcap          Program written in strict mixed-case
+  -fcase-upper            Compile as if program written in uppercase
+  -fcase-lower            Compile as if program written in lowercase
+  -fcase-preserve         Preserve all spelling (case) used in program
+  -fbadu77-intrinsics-del Delete libU77 intrinsics with bad interfaces
+  -fbadu77-intrinsics-dis Disable libU77 intrinsics with bad interfaces
+  -fbadu77-intrinsics-hid Hide libU77 intrinsics with bad interfaces
+  -ff2c-intrinsics-delete Delete non-FORTRAN-77 intrinsics f2c supports
+  -ff2c-intrinsics-disabl Disable non-FORTRAN-77 intrinsics f2c supports
+  -ff2c-intrinsics-hide   Hide non-FORTRAN-77 intrinsics f2c supports
+  -ff90-intrinsics-delete Delete non-FORTRAN-77 intrinsics F90 supports
+  -ff90-intrinsics-disabl Disable non-FORTRAN-77 intrinsics F90 supports
+  -ff90-intrinsics-hide   Hide non-FORTRAN-77 intrinsics F90 supports
+  -fgnu-intrinsics-delete Delete non-FORTRAN-77 intrinsics g77 supports
+  -fgnu-intrinsics-disabl Disable non-FORTRAN 77 intrinsics F90 supports
+  -fgnu-intrinsics-hide   Hide non-FORTRAN 77 intrinsics F90 supports
+  -fmil-intrinsics-delete Delete MIL-STD 1753 intrinsics
+  -fmil-intrinsics-disabl Disable MIL-STD 1753 intrinsics
+  -fmil-intrinsics-hide   Hide MIL-STD 1753 intrinsics
+  -funix-intrinsics-delet Delete libU77 intrinsics
+  -funix-intrinsics-disab Disable libU77 intrinsics
+  -funix-intrinsics-hide  Hide libU77 intrinsics
+  -fvxt-intrinsics-delete Delete non-FORTRAN-77 intrinsics VXT FORTRAN supports
+  -fvxt-intrinsics-disabl Disable non-FORTRAN-77 intrinsics VXT FORTRAN supports
+  -fvxt-intrinsics-hide   Hide non-FORTRAN-77 intrinsics VXT FORTRAN supports
+  -fzeros                 Treat initial values of 0 like non-zero values
+  -fdebug-kludge          Emit special debugging information for COMMON and EQUIVALENCE
+  -fonetrip               Take at least one trip through each iterative DO loop
+  -fno-silent             Print names of program units as they are compiled
+  -fno-globals            Disable fatal diagnostics about inter-procedural problems
+  -ftypeless-boz          Make prefix-radix non-decimal constants be typeless
+  -fbounds-check          Generate code to check subscript and substring bounds
+  -ffortran-bounds-check  Fortran-specific form of -fbounds-check
+  -Wno-globals            Disable warnings about inter-procedural problems
+  -Wsurprising            Warn about constructs with surprising meanings
+  -I                      Add a directory for INCLUDE searching
+  -ffixed-line-length-    Set the maximum line length
+
+Target specific options:
+  -mno-check-range-divisi Don't trap on integer divide overflow
+  -mcheck-range-division  Trap on integer divide overflow
+  -mno-check-zero-divisio Don't trap on integer divide by zero
+  -mcheck-zero-division   Trap on integer divide by zero
+  -m3900                  Optimize for 3900
+  -m4650                  Optimize for 4650
+  -mno-fix4300            Don't work around early 4300 hardware bug
+  -mfix4300               Work around early 4300 hardware bug
+  -mno-mad                Don't use multiply accumulate
+  -mmad                   Use multiply accumulate
+  -mdouble-float          Don't use single (32-bit) FP only
+  -msingle-float          Use single (32-bit) FP only
+  -mel                    Use little-endian byte order
+  -meb                    Use big-endian byte order
+  -mno-embedded-data      Don't use ROM instead of RAM
+  -membedded-data         Use ROM instead of RAM
+  -mno-embedded-pic       Don't use embedded PIC
+  -membedded-pic          Use embedded PIC
+  -mno-long-calls         Don't use indirect calls
+  -mlong-calls            Use indirect calls
+  -mno-half-pic           Don't use OSF PIC
+  -mhalf-pic              Use OSF PIC
+  -mno-abicalls           Don't use Irix PIC
+  -mabicalls              Use Irix PIC
+  -mgp32                  Use 32-bit general registers
+  -mgp64                  Use 64-bit general registers
+  -mfp32                  Use 32-bit FP registers
+  -mfp64                  Use 64-bit FP registers
+  -mhard-float            Use hardware floating point
+  -msoft-float            Use software floating point
+  -mno-mips-tfile         Don't use mips-tfile asm postpass
+  -mmips-tfile            Use mips-tfile asm postpass
+  -mno-memcpy             Optimize block moves
+  -mmemcpy                Don't optimize block moves
+  -mno-stats              Don't output compiler statistics
+  -mstats                 Output compiler statistics
+  -mno-gpopt              Don't use GP relative sdata/sbss sections
+  -mno-gpOPT              Don't use GP relative sdata/sbss sections
+  -mgpopt                 Use GP relative sdata/sbss sections
+  -mgpOPT                 Use GP relative sdata/sbss sections
+  -mno-rnames             Don't use symbolic register names
+  -mrnames                Use symbolic register names
+  -mgas                   Use GNU as
+  -mmips-as               Use MIPS as
+  -mno-split-addresses    Don't optimize lui/addiu address loads
+  -msplit-addresses       Optimize lui/addiu address loads
+  -mlong32                Use 32-bit long type
+  -mlong64                Use 64-bit long type
+  -mint64                 Use 64-bit int type
+  -mno-mips16             Don't use MIPS16 instructions
+  -mentry                 Use mips16 entry/exit psuedo ops
+  -mips                   Specify MIPS ISA
+  -mcpu=                  Specify CPU for scheduling purposes
+
+There are undocumented target specific options as well.
diff --git a/tools/psyq/bin/egcs/cc1plpsx.exe b/tools/psyq/bin/egcs/cc1plpsx.exe
new file mode 100644
index 000000000..ce716ef22
Binary files /dev/null and b/tools/psyq/bin/egcs/cc1plpsx.exe differ
diff --git a/tools/psyq/bin/egcs/cc1psx.exe b/tools/psyq/bin/egcs/cc1psx.exe
new file mode 100644
index 000000000..e454ce9ee
Binary files /dev/null and b/tools/psyq/bin/egcs/cc1psx.exe differ
diff --git a/tools/psyq/bin/egcs/cpppsx.exe b/tools/psyq/bin/egcs/cpppsx.exe
new file mode 100644
index 000000000..972438e54
Binary files /dev/null and b/tools/psyq/bin/egcs/cpppsx.exe differ
diff --git a/tools/psyq/bin/egcs/sn.ini b/tools/psyq/bin/egcs/sn.ini
new file mode 100644
index 000000000..b54789f3f
--- /dev/null
+++ b/tools/psyq/bin/egcs/sn.ini
@@ -0,0 +1,4 @@
+[ccpsx]
+stdlib=
+compiler_path=tools/psyq/bin/egcs
+assembler_path=tools/psyq/bin
diff --git a/tools/psyq/bin/gnu/cc1plpsx.exe b/tools/psyq/bin/gnu/cc1plpsx.exe
new file mode 100644
index 000000000..36cdf35fd
Binary files /dev/null and b/tools/psyq/bin/gnu/cc1plpsx.exe differ
diff --git a/tools/psyq/bin/gnu/cc1psx.exe b/tools/psyq/bin/gnu/cc1psx.exe
new file mode 100644
index 000000000..41836df19
Binary files /dev/null and b/tools/psyq/bin/gnu/cc1psx.exe differ
diff --git a/tools/psyq/bin/gnu/cpppsx.exe b/tools/psyq/bin/gnu/cpppsx.exe
new file mode 100644
index 000000000..f577e9363
Binary files /dev/null and b/tools/psyq/bin/gnu/cpppsx.exe differ
diff --git a/tools/psyq/bin/gnu/sn.ini b/tools/psyq/bin/gnu/sn.ini
new file mode 100644
index 000000000..4d2e5f101
--- /dev/null
+++ b/tools/psyq/bin/gnu/sn.ini
@@ -0,0 +1,4 @@
+[ccpsx]
+stdlib=
+compiler_path=tools/psyq/bin/gnu
+assembler_path=tools/psyq/bin
diff --git a/tools/psyq/bin/psylib.exe b/tools/psyq/bin/psylib.exe
new file mode 100644
index 000000000..ee4e3108d
Binary files /dev/null and b/tools/psyq/bin/psylib.exe differ
diff --git a/tools/psyq/bin/slink.exe b/tools/psyq/bin/slink.exe
new file mode 100644
index 000000000..7fa7d1e3b
Binary files /dev/null and b/tools/psyq/bin/slink.exe differ
diff --git a/tools/psyq/bin/symmunge.exe b/tools/psyq/bin/symmunge.exe
new file mode 100644
index 000000000..ace9a2214
Binary files /dev/null and b/tools/psyq/bin/symmunge.exe differ
diff --git a/tools/psyq/include/ABS.H b/tools/psyq/include/ABS.H
new file mode 100644
index 000000000..417808152
--- /dev/null
+++ b/tools/psyq/include/ABS.H
@@ -0,0 +1,24 @@
+/*
+ * File:abs.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _ABS_H
+#define _ABS_H
+
+#ifndef ABS
+#define ABS(x) (((x)>=0)?(x):(-(x)))
+#endif /* abs */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern int abs(int);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _ABS_H */
+
diff --git a/tools/psyq/include/ASM.H b/tools/psyq/include/ASM.H
new file mode 100644
index 000000000..668511220
--- /dev/null
+++ b/tools/psyq/include/ASM.H
@@ -0,0 +1,156 @@
+/*
+ * File:asm.h
+*/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _ASM_H
+#define _ASM_H
+
+#define R0  $0
+#define R1  $1
+#define R2  $2
+#define R3  $3
+#define R4  $4
+#define R5  $5
+#define R6  $6
+#define R7  $7
+#define R8  $8
+#define R9  $9
+#define R10 $10
+#define R11 $11
+#define R12 $12
+#define R13 $13
+#define R14 $14
+#define R15 $15
+#define R16 $16
+#define R17 $17
+#define R18 $18
+#define R19 $19
+#define R20 $20
+#define R21 $21
+#define R22 $22
+#define R23 $23
+#define R24 $24
+#define R25 $25
+#define R26 $26
+#define R27 $27
+#define R28 $28
+#define R29 $29
+#define R30 $30
+#define R31 $31
+
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)||defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+#else
+#define zero	$0	/* wired zero */
+#define AT	$1	/* assembler temp */
+#define v0	$2	/* return value */
+#define v1	$3
+#define a0	$4	/* argument registers */
+#define a1	$5
+#define a2	$6
+#define a3	$7
+#define t0	$8	/* caller saved */
+#define t1	$9
+#define t2	$10
+#define t3	$11
+#define t4	$12
+#define t5	$13
+#define t6	$14
+#define t7	$15
+#define s0	$16	/* callee saved */
+#define s1	$17
+#define s2	$18
+#define s3	$19
+#define s4	$20
+#define s5	$21
+#define s6	$22
+#define s7	$23
+#define t8	$24	/* code generator */
+#define t9	$25
+#define k0	$26	/* kernel temporary */
+#define k1	$27
+#define gp	$28	/* global pointer */
+#define sp	$29	/* stack pointer */
+#define fp	$30	/* frame pointer */
+#define ra	$31	/* return address */
+#endif
+
+
+/* register offset */
+#define	R_R0		0
+#define	R_R1		1
+#define	R_R2		2
+#define	R_R3		3
+#define	R_R4		4
+#define	R_R5		5
+#define	R_R6		6
+#define	R_R7		7
+#define	R_R8		8
+#define	R_R9		9
+#define	R_R10		10
+#define	R_R11		11
+#define	R_R12		12
+#define	R_R13		13
+#define	R_R14		14
+#define	R_R15		15
+#define	R_R16		16
+#define	R_R17		17
+#define	R_R18		18
+#define	R_R19		19
+#define	R_R20		20
+#define	R_R21		21
+#define	R_R22		22
+#define	R_R23		23
+#define	R_R24		24
+#define	R_R25		25
+#define	R_R26		26
+#define	R_R27		27
+#define	R_R28		28
+#define	R_R29		29
+#define	R_R30		30
+#define	R_R31		31
+#define	R_EPC		32
+#define	R_MDHI		33
+#define	R_MDLO		34
+#define	R_SR		35
+#define	R_CAUSE		36
+#define	NREGS		40
+
+/*
+ * compiler defined bindings
+ */
+#define	R_ZERO		R_R0
+#define	R_AT		R_R1
+#define	R_V0		R_R2
+#define	R_V1		R_R3
+#define	R_A0		R_R4
+#define	R_A1		R_R5
+#define	R_A2		R_R6
+#define	R_A3		R_R7
+#define	R_T0		R_R8
+#define	R_T1		R_R9
+#define	R_T2		R_R10
+#define	R_T3		R_R11
+#define	R_T4		R_R12
+#define	R_T5		R_R13
+#define	R_T6		R_R14
+#define	R_T7		R_R15
+#define	R_S0		R_R16
+#define	R_S1		R_R17
+#define	R_S2		R_R18
+#define	R_S3		R_R19
+#define	R_S4		R_R20
+#define	R_S5		R_R21
+#define	R_S6		R_R22
+#define	R_S7		R_R23
+#define	R_T8		R_R24
+#define	R_T9		R_R25
+#define	R_K0		R_R26
+#define	R_K1		R_R27
+#define	R_GP		R_R28
+#define	R_SP		R_R29
+#define	R_FP		R_R30
+#define	R_RA		R_R31
+
+#endif
diff --git a/tools/psyq/include/ASSERT.H b/tools/psyq/include/ASSERT.H
new file mode 100644
index 000000000..f1f92f131
--- /dev/null
+++ b/tools/psyq/include/ASSERT.H
@@ -0,0 +1,23 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+/*
+ * File:assert.h
+ */
+
+#ifndef	_ASSERT_H
+#define	_ASSERT_H
+
+# ifdef NDEBUG
+
+# define _assert(x)
+# define assert(x)
+
+# else
+
+# define _assert(x)	{if (!(x)){printf("Assertion failed: file \"%s\", line %d\n", __FILE__, __LINE__);exit(1);}}
+# define assert(x)	_assert(x)
+
+# endif
+
+#endif	/* _ASSERT_H */
diff --git a/tools/psyq/include/CONVERT.H b/tools/psyq/include/CONVERT.H
new file mode 100644
index 000000000..77a4d5e60
--- /dev/null
+++ b/tools/psyq/include/CONVERT.H
@@ -0,0 +1,23 @@
+/*
+ * File:convert.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _CONVERT_H
+#define _CONVERT_H
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern int atoi(const char *);
+extern long atol(const char *);
+extern long strtol(const char *,char**, int);
+extern unsigned long strtoul(const char *, char **, int);
+extern long labs(long);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif
diff --git a/tools/psyq/include/CTYPE.H b/tools/psyq/include/CTYPE.H
new file mode 100644
index 000000000..ec4a8ec1b
--- /dev/null
+++ b/tools/psyq/include/CTYPE.H
@@ -0,0 +1,49 @@
+/*
+ * File:ctype.h
+ * character handling macro definitions
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef	_CTYPE_H
+#define	_CTYPE_H
+
+#define	_U	0x01	/* upper case letter */
+#define	_L	0x02	/* lower case letter */
+#define	_N	0x04	/* digit */
+#define	_S	0x08	/* space, tab, newline, vertical tab, formfeed, or
+				carriage return */
+#define _P	0x10	/* punctuation character */
+#define _C	0x20	/* control character or delete */
+#define _X	0x40	/* hexadecimal digit [0-9a-fA-F]*/
+#define	_B	0x80	/* blank (space) */
+
+extern	char	_ctype_[];
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern 	char	toupper(char);
+extern 	char	tolower(char);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#define	isalpha(c)	((_ctype_+1)[(unsigned char)(c)]&(_U|_L))
+#define	isupper(c)	((_ctype_+1)[(unsigned char)(c)]&_U)
+#define	islower(c)	((_ctype_+1)[(unsigned char)(c)]&_L)
+#define	isdigit(c)	((_ctype_+1)[(unsigned char)(c)]&_N)
+#define	isxdigit(c)	((_ctype_+1)[(unsigned char)(c)]&(_X|_N))
+#define	isspace(c)	((_ctype_+1)[(unsigned char)(c)]&_S)
+#define ispunct(c)	((_ctype_+1)[(unsigned char)(c)]&_P)
+#define isalnum(c)	((_ctype_+1)[(unsigned char)(c)]&(_U|_L|_N))
+#define isprint(c)	((_ctype_+1)[(unsigned char)(c)]&(_P|_U|_L|_N|_B))
+#define isgraph(c)	((_ctype_+1)[(unsigned char)(c)]&(_P|_U|_L|_N))
+#define iscntrl(c)	((_ctype_+1)[(unsigned char)(c)]&_C)
+#define isascii(c)	((unsigned)(c)<=0x7f)
+#define toascii(c)	((unsigned char)(c)&0x7f)
+#define _toupper(c)	((unsigned char)(c)-'a'+'A')
+#define _tolower(c)	((unsigned char)(c)-'A'+'a')
+
+#endif	/* _CTYPE_H */
+
diff --git a/tools/psyq/include/FS.H b/tools/psyq/include/FS.H
new file mode 100644
index 000000000..ff7e95324
--- /dev/null
+++ b/tools/psyq/include/FS.H
@@ -0,0 +1,103 @@
+/*
+ * File:fs.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _FS_H
+#define _FS_H
+
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)||defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+
+/* device table */
+struct device_table {
+	char *dt_string;	/* device name */
+	int dt_type;		/* device "type" */
+	int dt_bsize;		/* file system type */
+	char *dt_desc;		/* device description */
+	int (*dt_init)();	/* device init routine */
+	int (*dt_open)();	/* device open routine */
+	int (*dt_strategy)();	/* device strategy routine, returns cnt */
+	int (*dt_close)();	/* device close routine */
+	int (*dt_ioctl)();	/* device ioctl routine */
+	int (*dt_read)();	/* fs read routine, returns count */
+	int (*dt_write)();	/* fs write routine, return count */
+	int (*dt_delete)();	/* file delete routine */
+	int (*dt_undelete)();	/* file delete routine */
+	int (*dt_firstfile)();	/* directory serach routine */
+	int (*dt_nextfile)();	/* directory serach routine */
+	int (*dt_format)();
+	int (*dt_cd)();	
+	int (*dt_rename)();	
+	int (*dt_remove)();	
+	int (*dt_else)();	
+};
+#endif /* LANGUAGE_C */
+
+/* device types */
+#define	DTTYPE_CHAR	0x1	/* character device */
+#define	DTTYPE_CONS	0x2	/* can be console */
+#define	DTTYPE_BLOCK	0x4	/* block device */
+#define DTTYPE_RAW	0x8	/* raw device that uses fs switch */
+#define DTTYPE_FS	0x10
+
+
+/* character device flags */
+#define	DB_RAW		0x1	/* don't interpret special chars */
+#define	DB_STOPPED	0x2	/* stop output */
+#define	DB_BREAK	0x4	/* cntl-c raise console interrpt */
+
+/* character device buffer */
+#define	CBUFSIZE	256
+
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)||defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+struct device_buf {
+	int db_flags;		/* character device flags */
+	char *db_in;		/* pts at next free char */
+	char *db_out;		/* pts at next filled char */
+	char db_buf[CBUFSIZE];	/* circular buffer for input */
+};
+#endif /* LANGUAGE_C */
+
+/* circular buffer functions */
+#define	CIRC_EMPTY(x)	((x)->db_in == (x)->db_out)
+#define	CIRC_FLUSH(x)	((x)->db_in = (x)->db_out = (x)->db_buf)
+#define	CIRC_STOPPED(x)	((x)->db_flags & DB_STOPPED)
+
+
+/* io block */
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)||defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+struct	iob {
+	int	i_flgs;		
+	int	i_unit;		/* pseudo device unit */
+	char	*i_ma;		/* memory address of i/o buffer */
+	unsigned int	i_cc;		/* character count of transfer */
+	unsigned long	i_offset;	/* seek offset in file */
+	int	i_fstype;	/* file system type */
+	int	i_errno;	/* error # return */
+	struct device_table *i_dp;	/* pointer into device_table */
+        unsigned long    i_size;
+        long    i_head;
+        long    i_fd;		/* file descriptor */
+};
+#endif /* LANGUAGE_C */
+
+#ifndef NULL
+#define NULL 0
+#endif
+
+/* Request codes */
+#define	READ	1
+#define	WRITE	2
+
+#define NIOB	16	/* max number of open files */
+
+/*
+extern int _nulldev();
+extern int _nodev();
+*/
+
+#endif /* _FS_H */
+
+
diff --git a/tools/psyq/include/GTEMAC.H b/tools/psyq/include/GTEMAC.H
new file mode 100644
index 000000000..08a4fe2f3
--- /dev/null
+++ b/tools/psyq/include/GTEMAC.H
@@ -0,0 +1,358 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+/*
+ * GTE inline functions(Simple)
+ */
+#define gte_RotTransPers(r1,r2,r3,r4,r5)   			\
+				{	gte_ldv0(r1);   	\
+                                        gte_rtps();     	\
+                                        gte_stsxy(r2); 		\
+                                        gte_stdp(r3);   	\
+                                        gte_stflg(r4);		\
+					gte_stszotz(r5);	}
+
+#define gte_RotTransPers3(r1,r2,r3,r4,r5,r6,r7,r8,r9)		\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+					gte_stsxy3(r4,r5,r6);	\
+					gte_stdp(r7);		\
+					gte_stflg(r8);		\
+					gte_stszotz(r9);	}
+
+#define gte_RotTrans(r1,r2,r3)					\
+				{	gte_ldv0(r1);   	\
+					gte_rt();		\
+					gte_stlvnl(r2);		\
+					gte_stflg(r3);	}
+	
+#define gte_LocalLight(r1,r2)					\
+				{	gte_ldv0(r1); 		\
+					gte_ll();		\
+					gte_stlvl(r2);	}
+					
+#define gte_LightColor(r1,r2)					\
+				{	gte_ldlvl(r1);		\
+					gte_lc();		\
+					gte_stlvl(r2);	}
+
+#define gte_DpqColorLight(r1,r2,r3,r4)				\
+				{	gte_ldlvl(r1);		\
+					gte_ldrgb(r2);		\
+					gte_lddp(r3);		\
+					gte_dpcl();		\
+					gte_strgb(r4);	}
+
+#define gte_DpqColor(r1,r2,r3)					\
+				{	gte_ldrgb(r1);		\
+					gte_lddp(r2);		\
+					gte_dpcs();		\
+					gte_strgb(r3);	}
+
+#define gte_DpqColor3(r1,r2,r3,r4,r5,r6,r7)			\
+				{	gte_ldrgb3(r1,r2,r3);	\
+					gte_lddp(r4);		\
+					gte_dpct();		\
+					gte_strgb3(r5,r6,r7);	}
+					
+#define gte_Intpl(r1,r2,r3)					\
+				{	gte_ldlvl(r1);		\
+					gte_lddp(r2);		\
+					gte_intpl();		\
+					gte_strgb(r3);	}
+
+#define gte_Square12(r1,r2)					\
+				{	gte_ldlvl(r1);		\
+					gte_sqr12();		\
+					gte_stlvnl(r2);	}	
+
+#define gte_Square0(r1,r2)					\
+				{	gte_ldlvl(r1);		\
+					gte_sqr0();		\
+					gte_stlvnl(r2);	}	
+
+#define gte_NormalColor(r1,r2)					\
+				{	gte_ldv0(r1);		\
+					gte_ncs();		\
+					gte_strgb(r2);	}
+
+#define gte_NormalColor3(r1,r2,r3,r4,r5,r6)			\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_nct();		\
+					gte_strgb3(r4,r5,r6);	}
+
+#define gte_NormalColorDpq(r1,r2,r3,r4)				\
+				{	gte_ldv0(r1);		\
+					gte_ldrgb(r2);		\
+					gte_lddp(r3);		\
+					gte_ncds();		\
+					gte_strgb(r4);	}
+
+#define gte_NormalColorDpq3(r1,r2,r3,r4,r5,r6,r7,r8)		\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_ldrgb(r4);		\
+					gte_lddp(r5);		\
+					gte_ncdt();		\
+					gte_strgb3(r6,r7,r8);	}
+
+#define gte_NormalColorCol(r1,r2,r3) 				\
+				{	gte_ldv0(r1);		\
+					gte_ldrgb(r2);		\
+					gte_nccs();		\
+					gte_strgb(r3);	}
+
+#define gte_NormalColorCol3(r1,r2,r3,r4,r5,r6,r7)		\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_ldrgb(r4);		\
+					gte_ncct();		\
+					gte_strgb3(r5,r6,r7);	}
+
+#define gte_ColorDpq(r1,r2,r3,r4)				\
+				{	gte_ldlvl(r1);		\
+					gte_ldrgb(r2);		\
+					gte_lddp(r3);		\
+					gte_cdp();		\
+					gte_strgb(r4);	}
+
+#define gte_ColorCol(r1,r2,r3)					\
+				{	gte_ldlvl(r1);		\
+					gte_ldrgb(r2);		\
+					gte_cc();		\
+					gte_strgb(r3);	}
+
+#define gte_NormalClip(r1,r2,r3,r4)				\
+				{	gte_ldsxy3(r1,r2,r3);	\
+					gte_nclip();		\
+					gte_stopz(r4);	}
+
+#define gte_AverageZ3(r1,r2,r3,r4)				\
+				{	gte_ldsz3(r1,r2,r3);	\
+					gte_avsz3();		\
+					gte_stotz(r4);	}
+
+#define gte_AverageZ4(r1,r2,r3,r4,r5)				\
+				{	gte_ldsz4(r1,r2,r3,r4);	\
+					gte_avsz4();		\
+					gte_stotz(r5);	}
+
+#define gte_OuterProduct12(r1,r2,r3)				\
+				{	gte_ldopv1(r1);		\
+					gte_ldopv2(r2);		\
+					gte_op12();		\
+					gte_stlvnl(r3); }
+
+#define gte_OuterProduct0(r1,r2,r3)				\
+				{	gte_ldopv1(r1);		\
+					gte_ldopv2(r2);		\
+					gte_op0();		\
+					gte_stlvnl(r3); }
+
+#define gte_OuterProduct12SVL(r1,r2,r3)				\
+				{	gte_ldopv1SV(r1);	\
+					gte_ldopv2SV(r2);	\
+					gte_op12();		\
+					gte_stlvnl(r3); }
+
+#define gte_OuterProduct0SVL(r1,r2,r3)				\
+				{	gte_ldopv1SV(r1);	\
+					gte_ldopv2SV(r2);	\
+					gte_op0();		\
+					gte_stlvnl(r3); }
+
+#define gte_OuterProduct12SV(r1,r2,r3)				\
+				{	gte_ldopv1SV(r1);	\
+					gte_ldopv2SV(r2);	\
+					gte_op12();		\
+					gte_stsv(r3); }
+
+#define gte_OuterProduct0SV(r1,r2,r3)				\
+				{	gte_ldopv1SV(r1);	\
+					gte_ldopv2SV(r2);	\
+					gte_op0();		\
+					gte_stsv(r3); }
+
+#define gte_Lzc(r1,r2)						\
+				{	gte_ldlzc(r1);		\
+					gte_nop();		\
+					gte_nop();		\
+					gte_stlzc(r2);	}
+
+/*
+ * GTE inline functions(Combination)
+ *	4 vertices functions can't be replaced by equivalent macros
+ *	because they use OR of flags after rtpt & rtps
+ *	Please write directry in your program.
+ */ 
+#define gte_RotAverage3(r1,r2,r3,r4,r5,r6,r7,r8,r9)		\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+					gte_stsxy3(r4,r5,r6);	\
+                                        gte_stdp(r7);		\
+                                        gte_stflg(r8);		\
+					gte_avsz3();		\
+					gte_stotz(r9);	}
+
+#define gte_RotNclip3(r1,r2,r3,r4,r5,r6,r7,r8,r9,r10)		\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+                                        gte_stflg(r9);		\
+					gte_nclip();		\
+					gte_stopz(r10);		\
+					gte_stsxy3(r4,r5,r6);	\
+					gte_stdp(r7);		\
+					gte_stszotz(r8);	}
+			
+#define gte_RotAverageNclip3(r1,r2,r3,r4,r5,r6,r7,r8,r9,r10)	\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+                                        gte_stflg(r9);		\
+					gte_nclip();		\
+					gte_stopz(r10);		\
+					gte_stsxy3(r4,r5,r6);	\
+					gte_stdp(r7);		\
+					gte_avsz3();		\
+					gte_stotz(r8);	}
+
+#define gte_RotColorDpq(r1,r2,r3,r4,r5,r6,r7)			\
+				{	gte_ldv0(r1);		\
+					gte_rtps();		\
+					gte_stsxy(r4);		\
+					gte_stflg(r6);		\
+					gte_ldv0(r2);		\
+					gte_ldrgb(r3);		\
+					gte_ncds();		\
+					gte_strgb(r5);		\
+					gte_stszotz(r7);	}
+
+#define gte_RotColorDpq3(r1,r2,r3,r4,r5,r6,r7,r8,r9,r10,r11,r12,r13,r14,r15) \
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+					gte_stsxy3(r8,r9,r10);	\
+					gte_stflg(r14);		\
+					gte_ldv3(r4,r5,r6);	\
+					gte_ldrgb(r7);		\
+					gte_ncdt();		\
+					gte_strgb3(r11,r12,r13);\
+					gte_stszotz(r15);	}
+
+#define gte_RotAverageNclipColorDpq3(r1,r2,r3,r4,r5,r6,r7,r8,r9,r10,r11,r12,r13,r14,r15,r16)	\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+					gte_stflg(r15);		\
+					gte_nclip();		\
+					gte_stopz(r16);		\
+					gte_ldv3(r4,r5,r6);	\
+					gte_ldrgb(r7);		\
+					gte_ncdt();		\
+					gte_stsxy3(r8,r9,r10);	\
+					gte_strgb3(r11,r12,r13);\
+					gte_avsz3();		\
+					gte_stotz(r14);	}
+
+#define gte_RotAverageNclipColorCol3(r1,r2,r3,r4,r5,r6,r7,r8,r9,r10,r11,r12,r13,r14,r15,r16)	\
+				{	gte_ldv3(r1,r2,r3);	\
+					gte_rtpt();		\
+					gte_stflg(r15);		\
+					gte_nclip();		\
+					gte_stopz(r16);		\
+					gte_ldv3(r4,r5,r6);	\
+					gte_ldrgb(r7);		\
+					gte_ncct();		\
+					gte_stsxy3(r8,r9,r10);	\
+					gte_strgb3(r11,r12,r13);\
+					gte_avsz3();		\
+					gte_stotz(r14);	}
+
+#define gte_LoadAverage12(r1,r2,r3,r4,r5)			\
+				{	gte_lddp(r3);		\
+					gte_ldlvl(r1);		\
+					gte_gpf12();		\
+					gte_lddp(r4);		\
+					gte_ldlvl(r2);		\
+					gte_gpl12();		\
+					gte_stlvl(r5);	}
+
+#define gte_LoadAverage0(r1,r2,r3,r4,r5)			\
+				{	gte_lddp(r3);		\
+					gte_ldlvl(r1);		\
+					gte_gpf0();		\
+					gte_lddp(r4);		\
+					gte_ldlvl(r2);		\
+					gte_gpl0();		\
+					gte_stlvl(r5);	}
+
+#define gte_LoadAverageShort12(r1,r2,r3,r4,r5)			\
+				{	gte_lddp(r3);		\
+					gte_ldsv(r1);		\
+					gte_gpf12();		\
+					gte_lddp(r4);		\
+					gte_ldsv(r2);		\
+					gte_gpl12();		\
+					gte_stsv(r5);	}
+
+#define gte_LoadAverageShort0(r1,r2,r3,r4,r5)			\
+				{	gte_lddp(r3);		\
+					gte_ldsv(r1);		\
+					gte_gpf0();		\
+					gte_lddp(r4);		\
+					gte_ldsv(r2);		\
+					gte_gpl0();		\
+					gte_stsv(r5);	}
+
+#define gte_LoadAverageByte(r1,r2,r3,r4,r5)			\
+				{	gte_lddp(r3);		\
+					gte_ldbv(r1);		\
+					gte_gpf12();		\
+					gte_lddp(r4);		\
+					gte_ldbv(r2);		\
+					gte_gpl12();		\
+					gte_stbv(r5);	}
+
+#define gte_LoadAverageCol(r1,r2,r3,r4,r5)			\
+				{	gte_lddp(r3);		\
+					gte_ldcv(r1);		\
+					gte_gpf12();		\
+					gte_lddp(r4);		\
+					gte_ldcv(r2);		\
+					gte_gpl12();		\
+					gte_stcv(r5);	}
+
+/*
+ *
+ */
+#define gte_MulMatrix0(r1,r2,r3)				\
+				{	gte_SetRotMatrix(r1);	\
+					gte_ldclmv(r2);		\
+					gte_rtir();		\
+					gte_stclmv(r3);		\
+					gte_ldclmv((char*)r2+2);\
+					gte_rtir();		\
+					gte_stclmv((char*)r3+2);\
+					gte_ldclmv((char*)r2+4);\
+					gte_rtir();		\
+					gte_stclmv((char*)r3+4);	}
+
+#define gte_ApplyMatrix(r1,r2,r3)				\
+				{	gte_SetRotMatrix(r1);   \
+					gte_ldv0(r2);		\
+					gte_rtv0();		\
+					gte_stlvnl(r3);	}
+
+#define gte_ApplyMatrixSV(r1,r2,r3)				\
+				{	gte_SetRotMatrix(r1);   \
+					gte_ldv0(r2);		\
+					gte_rtv0();		\
+					gte_stsv(r3);	}
+
+#define gte_CompMatrix(r1,r2,r3)				\
+				{	gte_MulMatrix0(r1,r2,r3);\
+					gte_SetTransMatrix(r1);	\
+					gte_ldlv0((char*)r2+20);\
+					gte_rt();		\
+					gte_stlvnl((char*)r3+20);	}
+
+#define gte_ApplyRotMatrix(r1,r2)				\
+				{	gte_ldv0(r1);		\
+					gte_rtv0();		\
+					gte_stlvnl(r2);		}
+
diff --git a/tools/psyq/include/GTENOM.H b/tools/psyq/include/GTENOM.H
new file mode 100644
index 000000000..448003b68
--- /dev/null
+++ b/tools/psyq/include/GTENOM.H
@@ -0,0 +1,167 @@
+;
+; $PSLibId: Run-time Library Release 4.7$
+;
+
+;
+;	gtenom.h
+;	Copyright(C) 1995,1996,1997 Sony Computer Entertainment Inc.
+;	All rights reserved.
+;
+
+read_sz_fifo3			macro	reg1,reg2,reg3
+				mfc2	reg1,r17
+				mfc2	reg2,r18
+				mfc2	reg3,r19
+				nop
+				endm
+
+read_sz_fifo4			macro	reg1,reg2,reg3,reg4 	
+				mfc2	reg1,r16
+				mfc2	reg2,r17
+				mfc2	reg3,r18
+				mfc2	reg4,r19
+				nop
+				endm
+
+read_szx			macro	reg1
+				mfc2	reg1,r16
+				nop
+				endm
+			
+read_sz0			macro	reg1
+				mfc2	reg1,r17
+				nop
+				endm
+			
+read_sz1			macro	reg1				
+				mfc2	reg1,r18
+				nop
+				endm
+			
+read_sz2			macro	reg1
+				mfc2	reg1,r19
+				nop
+				endm
+			
+read_sxsy_fifo3			macro	reg1,reg2,reg3
+				mfc2	reg1,r12
+				mfc2	reg2,r13
+				mfc2	reg3,r14
+				nop
+				endm
+
+read_sxsy0			macro	reg1	
+				mfc2	reg1,r12
+				nop
+				endm
+
+read_sxsy1			macro	reg1
+				mfc2	reg1,r13
+				nop
+				endm
+
+read_sxsy2			macro	reg1
+				mfc2	reg1,r14
+				nop
+				endm
+
+read_rgb_fifo			macro	reg1,reg2,reg3
+				mfc2	reg1,r20
+				mfc2	reg2,r21
+				mfc2	reg3,r22
+				nop
+				endm
+
+read_rgb0			macro	reg1
+				mfc2	reg1,r20
+				nop
+				endm
+
+read_rgb1			macro	reg1	
+				mfc2	reg1,r21
+				nop
+				endm
+
+read_rgb2			macro	reg1
+				mfc2	reg1,r22
+				nop
+				endm
+
+read_flag			macro	reg1
+				cfc2	reg1,r31
+				nop
+				endm
+
+read_p				macro	reg1
+				mfc2	reg1,r8
+				nop
+				endm
+
+read_otz			macro	reg1
+				mfc2	reg1,r7
+				nop
+				endm
+
+read_opz			macro	reg1
+				mfc2	reg1,r24
+				nop
+				endm
+
+read_mt				macro	reg1,reg2,reg3
+				mfc2	reg1,r25
+				mfc2	reg2,r26
+				mfc2	reg3,r27
+				nop
+				endm
+
+store_sxsy_fifo3		macro	reg1,reg2,reg3
+				swc2	r12,(reg1)
+				swc2	r13,(reg2)
+				swc2	r14,(reg3)
+				nop
+				endm
+
+store_sxsy0			macro	reg1
+				swc2	r12,(reg1)
+				nop
+				endm
+
+store_sxsy1			macro	reg1
+				swc2	r13,(reg1)
+				nop
+				endm
+
+store_sxsy2			macro	reg1
+				swc2	r14,(reg1)
+				nop
+				endm
+
+store_rgb_fifo			macro	reg1,reg2,reg3
+				swc2	r20,(reg1)
+				swc2	r21,(reg2)
+				swc2	r22,(reg3)
+				nop
+				endm
+
+store_rgb0			macro	reg1
+				swc2	r20,(reg1)
+				nop
+				endm
+
+store_rgb1			macro	reg1
+				swc2	r21,(reg1)
+				nop
+				endm
+
+store_rgb2			macro	reg1
+				swc2	r22,(reg1)
+				nop
+				endm
+
+set_trans_matrix		macro	reg1,reg2,reg3
+				ctc2	reg1,r5
+				ctc2	reg2,r6
+				ctc2	reg3,r7
+				nop
+				endm
+
diff --git a/tools/psyq/include/GTEREG.H b/tools/psyq/include/GTEREG.H
new file mode 100644
index 000000000..196146009
--- /dev/null
+++ b/tools/psyq/include/GTEREG.H
@@ -0,0 +1,87 @@
+;
+; $PSLibId: Run-time Library Release 4.7$
+;
+
+;
+;	gtereg.h
+;	Copyright(C) 1995,1996,1997 Sony Computer Entertainment Inc.
+;	All rights reserved.
+;
+
+;
+; GTE data registers
+;
+C2_VXY0		equs	"r0"
+C2_VZ0		equs	"r1"
+C2_VXY1		equs	"r2"
+C2_VZ1		equs	"r3"
+C2_VXY2		equs	"r4"
+C2_VZ2		equs	"r5"
+C2_RGB		equs	"r6"
+C2_OTZ		equs	"r7"
+
+C2_IR0		equs	"r8"
+C2_IR1		equs	"r9"
+C2_IR2		equs	"r10"
+C2_IR3		equs	"r11"
+C2_SXY0		equs	"r12"
+C2_SXY1		equs	"r13"
+C2_SXY2		equs	"r14"
+C2_SXYP		equs	"r15"
+
+C2_SZ0		equs	"r16"
+C2_SZ1		equs	"r17"
+C2_SZ2		equs	"r18"
+C2_SZ3		equs	"r19"
+C2_RGB0		equs	"r20"
+C2_RGB1		equs	"r21"
+C2_RGB2		equs	"r22"
+
+
+C2_MAC0		equs	"r24"
+C2_MAC1		equs	"r25"
+C2_MAC2		equs	"r26"
+C2_MAC3		equs	"r27"
+C2_IRGB		equs	"r28"
+C2_ORGB		equs	"r29"
+C2_LZCS		equs	"r30"
+C2_LZCR		equs	"r31"
+
+;
+; GTE control registers
+;
+C2_R11R12	equs	"r0"
+C2_R13R21	equs	"r1"
+C2_R22R23	equs	"r2"
+C2_R31R32	equs	"r3"
+C2_R33		equs	"r4"
+C2_TRX		equs	"r5"
+C2_TRY		equs	"r6"
+C2_TRZ		equs	"r7"
+
+C2_L11L12	equs	"r8"
+C2_L13L21	equs	"r9"
+C2_L22L23	equs	"r10"
+C2_L31L32	equs	"r11"
+C2_L33		equs	"r12"
+C2_RBK		equs	"r13"
+C2_GBK		equs	"r14"
+C2_BBK		equs	"r15"
+
+C2_LR1LR2	equs	"r16"
+C2_LR3LG1	equs	"r17"
+C2_LG2LG3	equs	"r18"
+C2_LB1LB2	equs	"r19"
+C2_LB3		equs	"r20"
+C2_RFC		equs	"r21"
+C2_GFC		equs	"r22"
+C2_BFC		equs	"r23"
+
+C2_OFX		equs	"r24"
+C2_OFY		equs	"r25"
+C2_H		equs	"r26"
+C2_DQA		equs	"r27"
+C2_DQB		equs	"r28"
+C2_ZSF3		equs	"r29"
+C2_ZSF4		equs	"r30"
+C2_FLAG		equs	"r31"
diff --git a/tools/psyq/include/GTEREG_S.H b/tools/psyq/include/GTEREG_S.H
new file mode 100644
index 000000000..96f87b2d5
--- /dev/null
+++ b/tools/psyq/include/GTEREG_S.H
@@ -0,0 +1,87 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/*
+ *	gtereg_s.h
+ *	Copyright(C) 1998 Sony Computer Entertainment Inc.
+ *	All rights reserved.
+ */
+
+/*
+ * GTE data registers
+ */
+#define C2_VXY0		R0
+#define C2_VZ0		R1
+#define C2_VXY1		R2
+#define C2_VZ1		R3
+#define C2_VXY2		R4
+#define C2_VZ2		R5
+#define C2_RGB		R6
+#define C2_OTZ		R7
+
+#define C2_IR0		R8
+#define C2_IR1		R9
+#define C2_IR2		R10
+#define C2_IR3		R11
+#define C2_SXY0		R12
+#define C2_SXY1		R13
+#define C2_SXY2		R14
+#define C2_SXYP		R15
+
+#define C2_SZ0		R16
+#define C2_SZ1		R17
+#define C2_SZ2		R18
+#define C2_SZ3		R19
+#define C2_RGB0		R20
+#define C2_RGB1		R21
+#define C2_RGB2		R22
+
+
+#define C2_MAC0		R24
+#define C2_MAC1		R25
+#define C2_MAC2		R26
+#define C2_MAC3		R27
+#define C2_IRGB		R28
+#define C2_ORGB		R29
+#define C2_LZCS		R30
+#define C2_LZCR		R31
+
+/*
+ * GTE control Registers
+ */
+#define C2_R11R12	R0
+#define C2_R13R21	R1
+#define C2_R22R23	R2
+#define C2_R31R32	R3
+#define C2_R33		R4
+#define C2_TRX		R5
+#define C2_TRY		R6
+#define C2_TRZ		R7
+
+#define C2_L11L12	R8
+#define C2_L13L21	R9
+#define C2_L22L23	R10
+#define C2_L31L32	R11
+#define C2_L33		R12
+#define C2_RBK		R13
+#define C2_GBK		R14
+#define C2_BBK		R15
+
+#define C2_LR1LR2	R16
+#define C2_LR3LG1	R17
+#define C2_LG2LG3	R18
+#define C2_LB1LB2	R19
+#define C2_LB3		R20
+#define C2_RFC		R21
+#define C2_GFC		R22
+#define C2_BFC		R23
+
+#define C2_OFX		R24
+#define C2_OFY		R25
+#define C2_H		R26
+#define C2_DQA		R27
+#define C2_DQB		R28
+#define C2_ZSF3		R29
+#define C2_ZSF4		R30
+#define C2_FLAG		R31
diff --git a/tools/psyq/include/INLINE_A.H b/tools/psyq/include/INLINE_A.H
new file mode 100644
index 000000000..dd9129b05
--- /dev/null
+++ b/tools/psyq/include/INLINE_A.H
@@ -0,0 +1,233 @@
+; $PSLibId: Run-time Library Release 4.7$
+;
+;	Macro definitions of DMPSX version 3 for Assembler programs
+;	inline_a.h
+;	Copyright(C) 1996,  Sony Computer Entertainment Inc.
+;	All rights reserved.
+;
+
+;
+; GTE commands with 2 nops
+;
+nRTPS		macro
+		nop
+		nop
+		dw	$0000007f
+		endm
+
+nRTPT		macro
+		nop
+		nop
+		dw	$000000bf
+		endm
+
+nDCPL		macro
+		nop
+		nop
+		dw	$00000dff
+		endm
+
+nDPCS		macro
+		nop
+		nop
+		dw	$00000e3f
+		endm
+
+nDPCT		macro
+		nop
+		nop
+		dw	$00000e7f
+		endm
+
+nINTPL		macro
+		nop
+		nop
+		dw	$00000ebf
+		endm
+
+nNCS		macro
+		nop
+		nop
+		dw	$00000f7f
+		endm
+
+nNCT		macro
+		nop
+		nop
+		dw	$00000fbf
+		endm
+
+nNCDS		macro
+		nop
+		nop
+		dw	$00000fff
+		endm
+
+nNCDT		macro
+		nop
+		nop
+		dw	$0000103f
+		endm
+
+nNCCS		macro
+		nop
+		nop
+		dw	$0000107f
+		endm
+
+nNCCT		macro
+		nop
+		nop
+		dw	$000010bf
+		endm
+
+nCDP		macro
+		nop
+		nop
+		dw	$000010ff
+		endm
+
+nCC		macro
+		nop
+		nop
+		dw	$0000113f
+		endm
+
+nNCLIP		macro
+		nop
+		nop
+		dw	$0000117f
+		endm
+
+nAVSZ3		macro
+		nop
+		nop
+		dw	$000011bf
+		endm
+
+nAVSZ4		macro
+		nop
+		nop
+		dw	$000011ff
+		endm
+
+nMVMVA		macro	sf,mx,v,cv,lm
+		nop
+		nop
+		dw	$000013bf|sf<<25|mx<<23|v<<21|cv<<19|lm<<18
+		endm
+
+nSQR		macro	sf
+		nop
+		nop
+		dw	$000013ff|sf<<25
+		endm
+
+nOP		macro	sf
+		nop
+		nop
+		dw	$0000143f|sf<<25
+		endm
+
+nGPF		macro	sf
+		nop
+		nop
+		dw	$0000147f|sf<<25
+		endm
+
+nGPL		macro	sf
+		nop
+		nop
+		dw	$000014bf|sf<<25
+		endm
+
+;
+; GTE commands without nops
+;
+RTPS		macro
+		dw	$0000007f
+		endm
+
+RTPT		macro
+		dw	$000000bf
+		endm
+
+DCPL		macro
+		dw	$00000dff
+		endm
+
+DPCS		macro
+		dw	$00000e3f
+		endm
+
+DPCT		macro
+		dw	$00000e7f
+		endm
+
+INTPL		macro
+		dw	$00000ebf
+		endm
+
+NCS		macro
+		dw	$00000f7f
+		endm
+
+NCT		macro
+		dw	$00000fbf
+		endm
+
+NCDS		macro
+		dw	$00000fff
+		endm
+
+NCDT		macro
+		dw	$0000103f
+		endm
+
+NCCS		macro
+		dw	$0000107f
+		endm
+
+NCCT		macro
+		dw	$000010bf
+		endm
+
+CDP		macro
+		dw	$000010ff
+		endm
+
+CC		macro
+		dw	$0000113f
+		endm
+
+NCLIP		macro
+		dw	$0000117f
+		endm
+
+AVSZ3		macro
+		dw	$000011bf
+		endm
+
+AVSZ4		macro
+		dw	$000011ff
+		endm
+
+MVMVA		macro	sf,mx,v,cv,lm
+		dw	$000013bf|sf<<25|mx<<23|v<<21|cv<<19|lm<<18
+		endm
+
+SQR		macro	sf
+		dw	$000013ff|sf<<25
+		endm
+
+OP		macro	sf
+		dw	$0000143f|sf<<25
+		endm
+
+GPF		macro	sf
+		dw	$0000147f|sf<<25
+		endm
+
+GPL		macro	sf
+		dw	$000014bf|sf<<25
+		endm
diff --git a/tools/psyq/include/INLINE_C.H b/tools/psyq/include/INLINE_C.H
new file mode 100644
index 000000000..5ea0bd14f
--- /dev/null
+++ b/tools/psyq/include/INLINE_C.H
@@ -0,0 +1,1450 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/*
+ *	Macro definitions of DMPSX version 3
+ *	inline_c.h
+ *	Copyright(C) 1996, Sony Computer Entertainment Inc.
+ *	All rights reserved.
+ */
+
+/*
+ * Type 1 functions
+ */
+
+#define gte_ldv0( r0 ) __asm__  (			\
+	"lwc2	$0, 0( %0 );"					\
+	"lwc2	$1, 4( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldv1( r0 ) __asm__  (			\
+	"lwc2	$2, 0( %0 );"					\
+	"lwc2	$3, 4( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldv2( r0 ) __asm__  (			\
+	"lwc2	$4, 0( %0 );"					\
+	"lwc2	$5, 4( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldv3( r0, r1, r2 ) __asm__  (		\
+	"lwc2	$0, 0( %0 );"					\
+	"lwc2	$1, 4( %0 );"					\
+	"lwc2	$2, 0( %1 );"					\
+	"lwc2	$3, 4( %1 );"					\
+	"lwc2	$4, 0( %2 );"					\
+	"lwc2	$5, 4( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_ldv3c( r0 ) __asm__  (			\
+	"lwc2	$0, 0( %0 );"					\
+	"lwc2	$1, 4( %0 );"					\
+	"lwc2	$2, 8( %0 );"					\
+	"lwc2	$3, 12( %0 );"					\
+	"lwc2	$4, 16( %0 );"					\
+	"lwc2	$5, 20( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldv3c_vertc( r0 ) __asm__  (		\
+	"lwc2	$0, 0( %0 );"					\
+	"lwc2	$1, 4( %0 );"					\
+	"lwc2	$2, 12( %0 );"					\
+	"lwc2	$3, 16( %0 );"					\
+	"lwc2	$4, 24( %0 );"					\
+	"lwc2	$5, 28( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldv01( r0, r1 ) __asm__  (			\
+	"lwc2	$0, 0( %0 );"					\
+	"lwc2	$1, 4( %0 );"					\
+	"lwc2	$2, 0( %1 );"					\
+	"lwc2	$3, 4( %1 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ) )
+
+#define gte_ldv01c( r0 ) __asm__  (			\
+	"lwc2	$0, 0( %0 );"					\
+	"lwc2	$1, 4( %0 );"					\
+	"lwc2	$2, 8( %0 );"					\
+	"lwc2	$3, 12( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldrgb( r0 ) __asm__  (			\
+	"lwc2	$6, 0( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldrgb3( r0, r1, r2 ) __asm__  (		\
+	"lwc2	$20, 0( %0 );"					\
+	"lwc2	$21, 0( %1 );"					\
+	"lwc2	$22, 0( %2 );"					\
+	"lwc2	$6, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_ldrgb3c( r0 ) __asm__  (			\
+	"lwc2	$20, 0( %0 );"					\
+	"lwc2	$21, 4( %0 );"					\
+	"lwc2	$22, 8( %0 );"					\
+	"lwc2	$6, 8( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldlv0( r0 ) __asm__  (			\
+	"lhu	$13, 4( %0 );"					\
+	"lhu	$12, 0( %0 );"					\
+	"sll	$13, $13, 16;"					\
+	"or	$12, $12, $13;"					\
+	"mtc2	$12, $0;"					\
+	"lwc2	$1, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_ldlvl( r0 ) __asm__  (			\
+	"lwc2	$9, 0( %0 );"					\
+	"lwc2	$10, 4( %0 );"					\
+	"lwc2	$11, 8( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsv( r0 ) __asm__  (			\
+	"lhu	$12, 0( %0 );"					\
+	"lhu	$13, 2( %0 );"					\
+	"lhu	$14, 4( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"mtc2	$14, $11"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldbv( r0 ) __asm__  (			\
+	"lbu	$12, 0( %0 );"					\
+	"lbu	$13, 1( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_ldcv( r0 ) __asm__  (			\
+	"lbu	$12, 0( %0 );"					\
+	"lbu	$13, 1( %0 );"					\
+	"lbu	$14, 2( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"mtc2	$14, $11"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldclmv( r0 ) __asm__  (			\
+	"lhu	$12, 0( %0 );"					\
+	"lhu	$13, 6( %0 );"					\
+	"lhu	$14, 12( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"mtc2	$14, $11"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_lddp( r0 ) __asm__  (			\
+	"mtc2	%0, $8"						\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsxy0( r0 ) __asm__  (			\
+	"mtc2	%0, $12"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsxy1( r0 ) __asm__  (			\
+	"mtc2	%0, $13"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsxy2( r0 ) __asm__  (			\
+	"mtc2	%0, $14"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsxy3( r0, r1, r2 ) __asm__  (		\
+	"mtc2	%0, $12;"					\
+	"mtc2	%2, $14;"					\
+	"mtc2	%1, $13"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_ldsxy3c( r0 ) __asm__  (			\
+	"lwc2	$12, 0( %0 );"					\
+	"lwc2	$13, 4( %0 );"					\
+	"lwc2	$14, 8( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsz3( r0, r1, r2 ) __asm__  (		\
+	"mtc2	%0, $17;"					\
+	"mtc2	%1, $18;"					\
+	"mtc2	%2, $19"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_ldsz4( r0, r1, r2, r3 ) __asm__  (	\
+	"mtc2	%0, $16;"					\
+	"mtc2	%1, $17;"					\
+	"mtc2	%2, $18;"					\
+	"mtc2	%3, $19"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ), "r"( r3 ) )
+
+#define gte_ldopv1( r0 ) __asm__  (			\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $0;"					\
+	"lw	$14, 8( %0 );"					\
+	"ctc2	$13, $2;"					\
+	"ctc2	$14, $4"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldopv2( r0 ) __asm__  (			\
+	"lwc2	$11, 8( %0 );"					\
+	"lwc2	$9, 0( %0 );"					\
+	"lwc2	$10, 4( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldlzc( r0 ) __asm__  (			\
+	"mtc2	%0, $30"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_SetRGBcd( r0 ) __asm__  (			\
+	"lwc2	$6, 0( %0 )"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldbkdir( r0, r1, r2 ) __asm__  (		\
+	"ctc2	%0, $13;"					\
+	"ctc2	%1, $14;"					\
+	"ctc2	%2, $15"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_SetBackColor( r0, r1, r2 ) __asm__  (	\
+	"sll	$12, %0, 4;"					\
+	"sll	$13, %1, 4;"					\
+	"sll	$14, %2, 4;"					\
+	"ctc2	$12, $13;"					\
+	"ctc2	$13, $14;"					\
+	"ctc2	$14, $15"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "$12", "$13", "$14" )
+
+#define gte_ldfcdir( r0, r1, r2 ) __asm__  (		\
+	"ctc2	%0, $21;"					\
+	"ctc2	%1, $22;"					\
+	"ctc2	%2, $23"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_SetFarColor( r0, r1, r2 ) __asm__  (	\
+	"sll	$12, %0, 4;"					\
+	"sll	$13, %1, 4;"					\
+	"sll	$14, %2, 4;"					\
+	"ctc2	$12, $21;"					\
+	"ctc2	$13, $22;"					\
+	"ctc2	$14, $23"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "$12", "$13", "$14" )
+
+#define gte_SetGeomOffset( r0, r1 ) __asm__  (	\
+	"sll	$12, %0, 16;"					\
+	"sll	$13, %1, 16;"					\
+	"ctc2	$12, $24;"					\
+	"ctc2	$13, $25"					\
+	:							\
+	: "r"( r0 ), "r"( r1 )					\
+	: "$12", "$13" )
+
+#define gte_SetGeomScreen( r0 ) __asm__  (		\
+	"ctc2	%0, $26"					\
+	:							\
+	: "r"( r0 ) )
+
+#define gte_ldsvrtrow0( r0 ) __asm__  (			\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $0;"					\
+	"ctc2	$13, $1"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_SetRotMatrix( r0 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $0;"					\
+	"ctc2	$13, $1;"					\
+	"lw	$12, 8( %0 );"					\
+	"lw	$13, 12( %0 );"					\
+	"lw	$14, 16( %0 );"					\
+	"ctc2	$12, $2;"					\
+	"ctc2	$13, $3;"					\
+	"ctc2	$14, $4"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldsvllrow0( r0 ) __asm__  (			\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $8;"					\
+	"ctc2	$13, $9"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_SetLightMatrix( r0 ) __asm__  ( 		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $8;"					\
+	"ctc2	$13, $9;"					\
+	"lw	$12, 8( %0 );"					\
+	"lw	$13, 12( %0 );"					\
+	"lw	$14, 16( %0 );"					\
+	"ctc2	$12, $10;"					\
+	"ctc2	$13, $11;"					\
+	"ctc2	$14, $12"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldsvlcrow0( r0 ) __asm__  (			\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $16;"					\
+	"ctc2	$13, $17"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_SetColorMatrix( r0 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"ctc2	$12, $16;"					\
+	"ctc2	$13, $17;"					\
+	"lw	$12, 8( %0 );"					\
+	"lw	$13, 12( %0 );"					\
+	"lw	$14, 16( %0 );"					\
+	"ctc2	$12, $18;"					\
+	"ctc2	$13, $19;"					\
+	"ctc2	$14, $20"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_SetTransMatrix( r0 ) __asm__  (		\
+	"lw	$12, 20( %0 );"					\
+	"lw	$13, 24( %0 );"					\
+	"ctc2	$12, $5;"					\
+	"lw	$14, 28( %0 );"					\
+	"ctc2	$13, $6;"					\
+	"ctc2	$14, $7"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldtr( r0, r1, r2 ) __asm__  (		\
+	"ctc2	%0, $5;"					\
+	"ctc2	%1, $6;"					\
+	"ctc2	%2, $7"						\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ) )
+
+#define gte_SetTransVector( r0 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"lw	$14, 8( %0 );"					\
+	"ctc2	$12, $5;"					\
+	"ctc2	$13, $6;"					\
+	"ctc2	$14, $7"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ld_intpol_uv0( r0 ) __asm__  (		\
+	"lbu	$12, 0( %0 );"					\
+	"lbu	$13, 1( %0 );"					\
+	"ctc2	$12, $21;"					\
+	"ctc2	$13, $22"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_ld_intpol_uv1( r0 ) __asm__  (		\
+	"lbu	$12, 0( %0 );"					\
+	"lbu	$13, 1( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_ld_intpol_bv0( r0 ) __asm__  (		\
+	"lbu	$12, 0( %0 );"					\
+	"lbu	$13, 1( %0 );"					\
+	"ctc2	$12, $21;"					\
+	"ctc2	$13, $22"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_ld_intpol_bv1( r0 ) __asm__  (		\
+	"lbu	$12, 0( %0 );"					\
+	"lbu	$13, 1( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13" )
+
+#define gte_ld_intpol_sv0( r0 ) __asm__  (		\
+	"lh	$12, 0( %0 );"					\
+	"lh	$13, 2( %0 );"					\
+	"lh	$14, 4( %0 );"					\
+	"ctc2	$12, $21;"					\
+	"ctc2	$13, $22;"					\
+	"ctc2	$14, $23"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ld_intpol_sv1( r0 ) __asm__  (		\
+	"lh	$12, 0( %0 );"					\
+	"lh	$13, 2( %0 );"					\
+	"lh	$14, 4( %0 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"mtc2	$14, $11"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldfc( r0 ) __asm__  (			\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 4( %0 );"					\
+	"lw	$14, 8( %0 );"					\
+	"ctc2	$12, $21;"					\
+	"ctc2	$13, $22;"					\
+	"ctc2	$14, $23"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14" )
+
+#define gte_ldopv2SV( r0 ) __asm__  (			\
+ 	"lh	$12, 0( %0 );"					\
+ 	"lh	$13, 2( %0 );"					\
+ 	"lh	$14, 4( %0 );"					\
+ 	"mtc2	$12, $9;"					\
+ 	"mtc2	$13, $10;"					\
+ 	"mtc2	$14, $11"					\
+ 	:							\
+ 	: "r"( r0 )						\
+ 	: "$12", "$13", "$14" )
+
+#define gte_ldopv1SV( r0 ) __asm__  (			\
+ 	"lh	$12, 0( %0 );"					\
+ 	"lh	$13, 2( %0 );"					\
+ 	"ctc2	$12, $0;"					\
+ 	"lh	$14, 4( %0 );"					\
+ 	"ctc2	$13, $2;"					\
+ 	"ctc2	$14, $4"					\
+ 	:							\
+ 	: "r"( r0 )						\
+ 	: "$12", "$13", "$14" )
+
+/*
+ * Type 2 functions
+ */
+
+#define gte_rtps() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000007f" )
+
+#define gte_rtpt() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000000bf" )
+
+#define gte_rt() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000000ff" )
+
+#define gte_rtv0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000013f" )
+
+#define gte_rtv1() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000017f" )
+
+#define gte_rtv2() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000001bf" )
+
+#define gte_rtir() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000001ff" )
+
+#define gte_rtir_sf0() __asm__  (			\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000023f" )
+
+#define gte_rtv0tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000027f" )
+
+#define gte_rtv1tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000002bf" )
+
+#define gte_rtv2tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000002ff" )
+
+#define gte_rtirtr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000033f" )
+
+#define gte_rtv0bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000037f" )
+
+#define gte_rtv1bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000003bf" )
+
+#define gte_rtv2bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000003ff" )
+
+#define gte_rtirbk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000043f" )
+
+#define gte_ll() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000057f" )
+
+#define gte_llv0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000005bf" )
+
+#define gte_llv1() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000005ff" )
+
+#define gte_llv2() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000063f" )
+
+#define gte_llir() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000067f" )
+
+#define gte_llv0tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000006bf" )
+
+#define gte_llv1tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000006ff" )
+
+#define gte_llv2tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000073f" )
+
+#define gte_llirtr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000077f" )
+
+#define gte_llv0bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000007bf" )
+
+#define gte_llv1bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000007ff" )
+
+#define gte_llv2bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000083f" )
+
+#define gte_llirbk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000087f" )
+
+#define gte_lc() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000009bf" )
+
+#define gte_lcv0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000009ff" )
+
+#define gte_lcv1() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000a3f" )
+
+#define gte_lcv2() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000a7f" )
+
+#define gte_lcir() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000abf" )
+
+#define gte_lcv0tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000aff" )
+
+#define gte_lcv1tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000b3f" )
+
+#define gte_lcv2tr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000b7f" )
+
+#define gte_lcirtr() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000bbf" )
+
+#define gte_lcv0bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000bff" )
+
+#define gte_lcv1bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000c3f" )
+
+#define gte_lcv2bk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000c7f" )
+
+#define gte_lcirbk() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000cbf" )
+
+#define gte_dpcl() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000dff" )
+
+#define gte_dpcs() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000e3f" )
+
+#define gte_dpct() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000e7f" )
+
+#define gte_intpl() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000ebf" )
+
+#define gte_sqr12() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000eff" )
+
+#define gte_sqr0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000f3f" )
+
+#define gte_ncs() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000f7f" )
+
+#define gte_nct() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000fbf" )
+
+#define gte_ncds() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x00000fff" )
+
+#define gte_ncdt() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000103f" )
+
+#define gte_nccs() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000107f" )
+
+#define gte_ncct() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000010bf" )
+
+#define gte_cdp() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000010ff" )
+
+#define gte_cc() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000113f" )
+
+#define gte_nclip() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000117f" )
+
+#define gte_avsz3() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000011bf" )
+
+#define gte_avsz4() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000011ff" )
+
+#define gte_op12() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000123f" )
+
+#define gte_op0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000127f" )
+
+#define gte_gpf12() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000012bf" )
+
+#define gte_gpf0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x000012ff" )
+
+#define gte_gpl12() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000133f" )
+
+#define gte_gpl0() __asm__  (				\
+	"nop;"							\
+	"nop;"							\
+	".word 0x0000137f" )
+
+#define gte_mvmva_core( r0 ) __asm__  (			\
+	"nop;"							\
+	"nop;"							\
+	".word %0"						\
+	:							\
+	: "g"( r0 ) )
+
+#define gte_mvmva(sf,mx,v,cv,lm) gte_mvmva_core( 0x000013bf |	\
+	((sf)<<25) | ((mx)<<23) | ((v)<<21) | ((cv)<<19) | ((lm)<<18))
+
+
+/*
+ * Type 2 functions without nop
+ */
+
+#define gte_rtps_b()		__asm__  ( ".word 0x0000007f" )
+#define gte_rtpt_b()		__asm__  ( ".word 0x000000bf" )
+#define gte_rt_b()		__asm__  ( ".word 0x000000ff" )
+#define gte_rtv0_b()		__asm__  ( ".word 0x0000013f" )
+#define gte_rtv1_b()		__asm__  ( ".word 0x0000017f" )
+#define gte_rtv2_b()		__asm__  ( ".word 0x000001bf" )
+#define gte_rtir_b()		__asm__  ( ".word 0x000001ff" )
+#define gte_rtir_sf0_b()	__asm__  ( ".word 0x0000023f" )
+#define gte_rtv0tr_b()		__asm__  ( ".word 0x0000027f" )
+#define gte_rtv1tr_b()		__asm__  ( ".word 0x000002bf" )
+#define gte_rtv2tr_b()		__asm__  ( ".word 0x000002ff" )
+#define gte_rtirtr_b()		__asm__  ( ".word 0x0000033f" )
+#define gte_rtv0bk_b()		__asm__  ( ".word 0x0000037f" )
+#define gte_rtv1bk_b()		__asm__  ( ".word 0x000003bf" )
+#define gte_rtv2bk_b()		__asm__  ( ".word 0x000003ff" )
+#define gte_rtirbk_b()		__asm__  ( ".word 0x0000043f" )
+#define gte_ll_b()		__asm__  ( ".word 0x0000057f" )
+#define gte_llv0_b()		__asm__  ( ".word 0x000005bf" )
+#define gte_llv1_b()		__asm__  ( ".word 0x000005ff" )
+#define gte_llv2_b()		__asm__  ( ".word 0x0000063f" )
+#define gte_llir_b()		__asm__  ( ".word 0x0000067f" )
+#define gte_llv0tr_b()		__asm__  ( ".word 0x000006bf" )
+#define gte_llv1tr_b()		__asm__  ( ".word 0x000006ff" )
+#define gte_llv2tr_b()		__asm__  ( ".word 0x0000073f" )
+#define gte_llirtr_b()		__asm__  ( ".word 0x0000077f" )
+#define gte_llv0bk_b()		__asm__  ( ".word 0x000007bf" )
+#define gte_llv1bk_b()		__asm__  ( ".word 0x000007ff" )
+#define gte_llv2bk_b()		__asm__  ( ".word 0x0000083f" )
+#define gte_llirbk_b()		__asm__  ( ".word 0x0000087f" )
+#define gte_lc_b()		__asm__  ( ".word 0x000009bf" )
+#define gte_lcv0_b()		__asm__  ( ".word 0x000009ff" )
+#define gte_lcv1_b()		__asm__  ( ".word 0x00000a3f" )
+#define gte_lcv2_b()		__asm__  ( ".word 0x00000a7f" )
+#define gte_lcir_b()		__asm__  ( ".word 0x00000abf" )
+#define gte_lcv0tr_b()		__asm__  ( ".word 0x00000aff" )
+#define gte_lcv1tr_b()		__asm__  ( ".word 0x00000b3f" )
+#define gte_lcv2tr_b()		__asm__  ( ".word 0x00000b7f" )
+#define gte_lcirtr_b()		__asm__  ( ".word 0x00000bbf" )
+#define gte_lcv0bk_b()		__asm__  ( ".word 0x00000bff" )
+#define gte_lcv1bk_b()		__asm__  ( ".word 0x00000c3f" )
+#define gte_lcv2bk_b()		__asm__  ( ".word 0x00000c7f" )
+#define gte_lcirbk_b()		__asm__  ( ".word 0x00000cbf" )
+#define gte_dpcl_b()		__asm__  ( ".word 0x00000dff" )
+#define gte_dpcs_b()		__asm__  ( ".word 0x00000e3f" )
+#define gte_dpct_b()		__asm__  ( ".word 0x00000e7f" )
+#define gte_intpl_b()		__asm__  ( ".word 0x00000ebf" )
+#define gte_sqr12_b()		__asm__  ( ".word 0x00000eff" )
+#define gte_sqr0_b()		__asm__  ( ".word 0x00000f3f" )
+#define gte_ncs_b()		__asm__  ( ".word 0x00000f7f" )
+#define gte_nct_b()		__asm__  ( ".word 0x00000fbf" )
+#define gte_ncds_b()		__asm__  ( ".word 0x00000fff" )
+#define gte_ncdt_b()		__asm__  ( ".word 0x0000103f" )
+#define gte_nccs_b()		__asm__  ( ".word 0x0000107f" )
+#define gte_ncct_b()		__asm__  ( ".word 0x000010bf" )
+#define gte_cdp_b()		__asm__  ( ".word 0x000010ff" )
+#define gte_cc_b()		__asm__  ( ".word 0x0000113f" )
+#define gte_nclip_b()		__asm__  ( ".word 0x0000117f" )
+#define gte_avsz3_b()		__asm__  ( ".word 0x000011bf" )
+#define gte_avsz4_b()		__asm__  ( ".word 0x000011ff" )
+#define gte_op12_b()		__asm__  ( ".word 0x0000123f" )
+#define gte_op0_b()		__asm__  ( ".word 0x0000127f" )
+#define gte_gpf12_b()		__asm__  ( ".word 0x000012bf" )
+#define gte_gpf0_b()		__asm__  ( ".word 0x000012ff" )
+#define gte_gpl12_b()		__asm__  ( ".word 0x0000133f" )
+#define gte_gpl0_b()		__asm__  ( ".word 0x0000137f" )
+#define gte_mvmva_core_b( r0 )	__asm__  (		\
+	".word %0"						\
+	:							\
+	: "g"( r0 ) )
+#define gte_mvmva_b(sf,mx,v,cv,lm) gte_mvmva_core_b( 0x000013bf |\
+	((sf)<<25) | ((mx)<<23) | ((v)<<21) | ((cv)<<19) | ((lm)<<18))
+
+/*
+ * Type 3 functions
+ */
+
+#define gte_stsxy( r0 ) __asm__  (			\
+	"swc2	$14, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3( r0, r1, r2 ) __asm__  (		\
+	"swc2	$12, 0( %0 );"					\
+	"swc2	$13, 0( %1 );"					\
+	"swc2	$14, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "memory" )
+
+#define gte_stsxy3c( r0 ) __asm__  (			\
+	"swc2	$12, 0( %0 );"					\
+	"swc2	$13, 4( %0 );"					\
+	"swc2	$14, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy2( r0 ) __asm__  (			\
+	"swc2	$14, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy1( r0 ) __asm__  (			\
+	"swc2	$13, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy0( r0 ) __asm__  (			\
+	"swc2	$12, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy01( r0, r1 ) __asm__  (		\
+	"swc2	$12, 0( %0 );"					\
+	"swc2	$13, 0( %1 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 )					\
+	: "memory" )
+
+#define gte_stsxy01c( r0 ) __asm__  (			\
+	"swc2	$12, 0( %0 );"					\
+	"swc2	$13, 4( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_f3( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 12( %0 );"					\
+	"swc2	$14, 16( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_g3( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 16( %0 );"					\
+	"swc2	$14, 24( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_ft3( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 16( %0 );"					\
+	"swc2	$14, 24( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_gt3( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 20( %0 );"					\
+	"swc2	$14, 32( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_f4( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 12( %0 );"					\
+	"swc2	$14, 16( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_g4( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 16( %0 );"					\
+	"swc2	$14, 24( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_ft4( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 16( %0 );"					\
+	"swc2	$14, 24( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsxy3_gt4( r0 ) __asm__  (			\
+	"swc2	$12, 8( %0 );"					\
+	"swc2	$13, 20( %0 );"					\
+	"swc2	$14, 32( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stdp( r0 ) __asm__  (			\
+	"swc2	$8, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stflg( r0 ) __asm__  (			\
+	"cfc2	$12, $31;"					\
+	"nop;"							\
+	"sw	$12, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "memory" )
+
+#define gte_stflg_4( r0 ) __asm__  (			\
+	"cfc2	$12, $31;"					\
+	"addi	$13, $0, 4;"					\
+	"sll	$13, $13, 16;"					\
+	"and	$12, $12, $13;"					\
+	"sw	$12, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "memory" )
+
+#define gte_stsz( r0 ) __asm__  (			\
+	"swc2	$19, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsz3( r0, r1, r2 ) __asm__  (		\
+	"swc2	$17, 0( %0 );"					\
+	"swc2	$18, 0( %1 );"					\
+	"swc2	$19, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "memory" )
+
+#define gte_stsz4( r0, r1, r2, r3 ) __asm__  (		\
+	"swc2	$16, 0( %0 );"					\
+	"swc2	$17, 0( %1 );"					\
+	"swc2	$18, 0( %2 );"					\
+	"swc2	$19, 0( %3 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 ), "r"( r3 )		\
+	: "memory" )
+
+#define gte_stsz3c( r0 ) __asm__  (			\
+	"swc2	$17, 0( %0 );"					\
+	"swc2	$18, 4( %0 );"					\
+	"swc2	$19, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsz4c( r0 ) __asm__  (			\
+	"swc2	$16, 0( %0 );"					\
+	"swc2	$17, 4( %0 );"					\
+	"swc2	$18, 8( %0 );"					\
+	"swc2	$19, 12( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stszotz( r0 ) __asm__  (			\
+	"mfc2	$12, $19;"					\
+	"nop;"							\
+	"sra	$12, $12, 2;"					\
+	"sw	$12, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "memory" )
+
+#define gte_stotz( r0 ) __asm__  (			\
+	"swc2	$7, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stopz( r0 ) __asm__  (			\
+	"swc2	$24, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stlvl( r0 ) __asm__  (			\
+	"swc2	$9, 0( %0 );"					\
+	"swc2	$10, 4( %0 );"					\
+	"swc2	$11, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stlvnl( r0 ) __asm__  (			\
+	"swc2	$25, 0( %0 );"					\
+	"swc2	$26, 4( %0 );"					\
+	"swc2	$27, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stlvnl0( r0 ) __asm__  (			\
+	"swc2	$25, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stlvnl1( r0 ) __asm__  (			\
+	"swc2	$26, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stlvnl2( r0 ) __asm__  (			\
+	"swc2	$27, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stsv( r0 ) __asm__  (			\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"mfc2	$14, $11;"					\
+	"sh	$12, 0( %0 );"					\
+	"sh	$13, 2( %0 );"					\
+	"sh	$14, 4( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_stclmv( r0 ) __asm__  (			\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"mfc2	$14, $11;"					\
+	"sh	$12, 0( %0 );"					\
+	"sh	$13, 6( %0 );"					\
+	"sh	$14, 12( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_stbv( r0 ) __asm__  (			\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"sb	$12, 0( %0 );"					\
+	"sb	$13, 1( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "memory" )
+
+#define gte_stcv( r0 ) __asm__  (			\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"mfc2	$14, $11;"					\
+	"sb	$12, 0( %0 );"					\
+	"sb	$13, 1( %0 );"					\
+	"sb	$14, 2( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_strgb( r0 ) __asm__  (			\
+	"swc2	$22, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_strgb3( r0, r1, r2 ) __asm__  (		\
+	"swc2	$20, 0( %0 );"					\
+	"swc2	$21, 0( %1 );"					\
+	"swc2	$22, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "memory" )
+
+#define gte_strgb3_g3( r0 ) __asm__  (			\
+	"swc2	$20, 4( %0 );"					\
+	"swc2	$21, 12( %0 );"					\
+	"swc2	$22, 20( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_strgb3_gt3( r0 ) __asm__  (			\
+	"swc2	$20, 4( %0 );"					\
+	"swc2	$21, 16( %0 );"					\
+	"swc2	$22, 28( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_strgb3_g4( r0 ) __asm__  (			\
+	"swc2	$20, 4( %0 );"					\
+	"swc2	$21, 12( %0 );"					\
+	"swc2	$22, 20( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_strgb3_gt4( r0 ) __asm__  (			\
+	"swc2	$20, 4( %0 );"					\
+	"swc2	$21, 16( %0 );"					\
+	"swc2	$22, 28( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_ReadGeomOffset( r0, r1 ) __asm__  (		\
+	"cfc2	$12, $24;"					\
+	"cfc2	$13, $25;"					\
+	"sra	$12, $12, 16;"					\
+	"sra	$13, $13, 16;"					\
+	"sw	$12, 0( %0 );"					\
+	"sw	$13, 0( %1 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 )					\
+	: "$12", "$13", "memory" )
+
+#define gte_ReadGeomScreen( r0 ) __asm__  (		\
+	"cfc2	$12, $26;"					\
+	"nop;"							\
+	"sw	$12, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "memory" )
+
+#define gte_ReadRotMatrix( r0 ) __asm__  (		\
+	"cfc2	$12, $0;"					\
+	"cfc2	$13, $1;"					\
+	"sw	$12, 0( %0 );"					\
+	"sw	$13, 4( %0 );"					\
+	"cfc2	$12, $2;"					\
+	"cfc2	$13, $3;"					\
+	"cfc2	$14, $4;"					\
+	"sw	$12, 8( %0 );"					\
+	"sw	$13, 12( %0 );"					\
+	"sw	$14, 16( %0 );"					\
+	"cfc2	$12, $5;"					\
+	"cfc2	$13, $6;"					\
+	"cfc2	$14, $7;"					\
+	"sw	$12, 20( %0 );"					\
+	"sw	$13, 24( %0 );"					\
+	"sw	$14, 28( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_sttr( r0 ) __asm__  (			\
+	"cfc2	$12, $5;"					\
+	"cfc2	$13, $6;"					\
+	"cfc2	$14, $7;"					\
+	"sw	$12, 0( %0 );"					\
+	"sw	$13, 4( %0 );"					\
+	"sw	$14, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_ReadLightMatrix( r0 ) __asm__  (		\
+	"cfc2	$12, $8;"					\
+	"cfc2	$13, $9;"					\
+	"sw	$12, 0( %0 );"					\
+	"sw	$13, 4( %0 );"					\
+	"cfc2	$12, $10;"					\
+	"cfc2	$13, $11;"					\
+	"cfc2	$14, $12;"					\
+	"sw	$12, 8( %0 );"					\
+	"sw	$13, 12( %0 );"					\
+	"sw	$14, 16( %0 );"					\
+	"cfc2	$12, $13;"					\
+	"cfc2	$13, $14;"					\
+	"cfc2	$14, $15;"					\
+	"sw	$12, 20( %0 );"					\
+	"sw	$13, 24( %0 );"					\
+	"sw	$14, 28( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_ReadColorMatrix( r0 ) __asm__  (		\
+	"cfc2	$12, $16;"					\
+	"cfc2	$13, $17;"					\
+	"sw	$12, 0( %0 );"					\
+	"sw	$13, 4( %0 );"					\
+	"cfc2	$12, $18;"					\
+	"cfc2	$13, $19;"					\
+	"cfc2	$14, $20;"					\
+	"sw	$12, 8( %0 );"					\
+	"sw	$13, 12( %0 );"					\
+	"sw	$14, 16( %0 );"					\
+	"cfc2	$12, $21;"					\
+	"cfc2	$13, $22;"					\
+	"cfc2	$14, $23;"					\
+	"sw	$12, 20( %0 );"					\
+	"sw	$13, 24( %0 );"					\
+	"sw	$14, 28( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_stlzc( r0 ) __asm__  (			\
+	"swc2	$31, 0( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "memory" )
+
+#define gte_stfc( r0 ) __asm__  (			\
+	"cfc2	$12, $21;"					\
+	"cfc2	$13, $22;"					\
+	"cfc2	$14, $23;"					\
+	"sw	$12, 0( %0 );"					\
+	"sw	$13, 4( %0 );"					\
+	"sw	$14, 8( %0 )"					\
+	:							\
+	: "r"( r0 )						\
+	: "$12", "$13", "$14", "memory" )
+
+#define gte_mvlvtr() __asm__  (				\
+	"mfc2	$12, $25;"					\
+	"mfc2	$13, $26;"					\
+	"mfc2	$14, $27;"					\
+	"ctc2	$12, $5;"					\
+	"ctc2	$13, $6;"					\
+	"ctc2	$14, $7"					\
+	:							\
+	:							\
+	: "$12", "$13", "$14" )
+
+#define gte_nop() __asm__  (				\
+	"nop" )
+
+#define gte_subdvl( r0, r1, r2 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 0( %1 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"sra	$12, $12, 16;"					\
+	"sra	$13, $13, 16;"					\
+	"subu	$15, $12, $13;"					\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"sw	$15, 4( %2 );"					\
+	"subu	$12, $12, $13;"					\
+	"sw	$12, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "$12", "$13", "$14", "$15", "memory" )
+
+#define gte_subdvd( r0, r1, r2 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 0( %1 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"sra	$12, $12, 16;"					\
+	"sra	$13, $13, 16;"					\
+	"subu	$15, $12, $13;"					\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"sh	$15, 2( %2 );"					\
+	"subu	$12, $12, $13;"					\
+	"sh	$12, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "$12", "$13", "$14", "$15", "memory" )
+
+#define gte_adddvl( r0, r1, r2 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 0( %1 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"sra	$12, $12, 16;"					\
+	"sra	$13, $13, 16;"					\
+	"addu	$15, $12, $13;"					\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"sw	$15, 4( %2 );"					\
+	"addu	$12, $12, $13;"					\
+	"sw	$12, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "$12", "$13", "$14", "$15", "memory" )
+
+#define gte_adddvd( r0, r1, r2 ) __asm__  (		\
+	"lw	$12, 0( %0 );"					\
+	"lw	$13, 0( %1 );"					\
+	"mtc2	$12, $9;"					\
+	"mtc2	$13, $10;"					\
+	"sra	$12, $12, 16;"					\
+	"sra	$13, $13, 16;"					\
+	"addu	$15, $12, $13;"					\
+	"mfc2	$12, $9;"					\
+	"mfc2	$13, $10;"					\
+	"sh	$15, 2( %2 );"					\
+	"addu	$12, $12, $13;"					\
+	"sh	$12, 0( %2 )"					\
+	:							\
+	: "r"( r0 ), "r"( r1 ), "r"( r2 )			\
+	: "$12", "$13", "$14", "$15", "memory" )
+
+#define gte_FlipRotMatrixX() __asm__  (			\
+	"cfc2	$12, $0;"					\
+	"cfc2	$13, $1;"					\
+	"sll	$14, $12, 16;"					\
+	"sra	$14, $14, 16;"					\
+	"subu	$14, $0, $14;"					\
+	"sra	$15, $12, 16;"					\
+	"subu	$15, $0, $15;"					\
+	"sll	$15, $15, 16;"					\
+	"sll	$14, $14, 16;"					\
+	"srl	$14, $14, 16;"					\
+	"or	$14, $14, $15;"					\
+	"ctc2	$14, $0;"					\
+	"sll	$14, $13, 16;"					\
+	"sra	$14, $14, 16;"					\
+	"subu	$14, $0, $14;"					\
+	"sra	$15, $13, 16;"					\
+	"sll	$15, $15, 16;"					\
+	"sll	$14, $14, 16;"					\
+	"srl	$14, $14, 16;"					\
+	"or	$14, $14, $15;"					\
+	"ctc2	$14, $1"					\
+	:							\
+	:							\
+	: "$12", "$13", "$14", "$15" )
+
+#define gte_FlipTRX() __asm__  (			\
+	"cfc2	$12, $5;"					\
+	"nop;"							\
+	"subu	$12, $0, $12;"					\
+	"ctc2	$12, $5"					\
+	:							\
+	:							\
+	: "$12" )
diff --git a/tools/psyq/include/INLINE_O.H b/tools/psyq/include/INLINE_O.H
new file mode 100644
index 000000000..1af597ff3
--- /dev/null
+++ b/tools/psyq/include/INLINE_O.H
@@ -0,0 +1,1194 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/*
+ *	Macro definitions of DMPSX version 3
+ *	inline_o.h
+ *	Copyright(C) 1996, Sony Computer Entertainment Inc.
+ *	All rights reserved.
+ */
+
+/*
+ * Type 1 functions
+ */
+
+#define gte_ldv0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $0,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,4($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $2,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $3,4($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv2(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $4,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $5,4($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $0,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $2,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $3,4($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $4,($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $5,4($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv3c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $0,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $2,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $3,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $4,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $5,20($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv3c_vertc(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $0,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $2,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $3,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $4,24($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $5,28($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv01(r1,r2) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $0,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $2,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $3,4($13)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldv01c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $0,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $2,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $3,12($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldrgb(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $6,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldrgb3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $20,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $21,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $22,($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $6,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldrgb3c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $20,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $21,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $22,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $6,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldlv0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("or    $13,$13,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $1,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldlvl(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $9,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $10,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $11,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $14,2($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $15,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldbv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldcv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $15,2($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldclmv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $14,6($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lhu   $15,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lddp(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$8": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsxy0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$12": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsxy1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$13": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsxy2(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$14": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsxy3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$12": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$13": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsxy3c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $13,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $14,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsz3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$17": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$18": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$19": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsz4(r1,r2,r3,r4) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $15,%0": :"r"(r4):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$17": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$18": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $15,$19": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldopv1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$2": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$4": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldopv2(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $11,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $9,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $10,4($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldlzc(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$30": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetRGBcd(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lwc2  $6,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldbkdir(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$15": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetBackColor(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $12,$12,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $13,$13,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$14,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$15": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldfcdir(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$22": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$23": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetFarColor(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $12,$12,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $13,$13,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$14,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$22": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$23": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetGeomOffset(r1,r2) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $12,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $13,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$24": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$25": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetGeomScreen(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$26": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsvrtrow0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$1": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetRotMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$1": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$2": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$3": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$4": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsvllrow0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$8": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$9": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetLightMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$8": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$11": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$12": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldsvlcrow0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$17": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetColorMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$17": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$18": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$19": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$20": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetTransMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,20($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,28($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$6": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$7": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldtr(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$6": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$7": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_SetTransVector(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$6": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$7": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ld_intpol_uv0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$22": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ld_intpol_uv1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ld_intpol_bv0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$22": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ld_intpol_bv1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lbu   $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ld_intpol_sv0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lh    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lh    $14,2($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lh    $15,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$22": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$23": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ld_intpol_sv1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lh    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lh    $14,2($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lh    $15,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ldfc(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $15,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$22": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $15,$23": : :"$12","$13","$14","$15","memory"); \
+}
+
+/*
+ * Type 2 functions
+ */
+
+#define gte_rtps() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000007f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtpt() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000000bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rt() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000000ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000013f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv1() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000017f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv2() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000001bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtir() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000001ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtir_sf0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000023f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv0tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000027f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv1tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000002bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv2tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000002ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtirtr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000033f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv0bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000037f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv1bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000003bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtv2bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000003ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_rtirbk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000043f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ll() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000057f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000005bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv1() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000005ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv2() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000063f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llir() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000067f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv0tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000006bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv1tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000006ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv2tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000073f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llirtr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000077f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv0bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000007bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv1bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000007ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llv2bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000083f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_llirbk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000087f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lc() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000009bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000009ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv1() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000a3f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv2() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000a7f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcir() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000abf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv0tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000aff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv1tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000b3f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv2tr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000b7f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcirtr() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000bbf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv0bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000bff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv1bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000c3f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcv2bk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000c7f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_lcirbk() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000cbf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_dpcl() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000dff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_dpcs() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000e3f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_dpct() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000e7f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_intpl() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000ebf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_sqr12() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000eff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_sqr0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000f3f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ncs() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000f7f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_nct() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000fbf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ncds() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x00000fff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ncdt() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000103f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_nccs() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000107f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ncct() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000010bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_cdp() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000010ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_cc() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000113f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_nclip() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000117f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_avsz3() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000011bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_avsz4() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000011ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_op12() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000123f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_op0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000127f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_gpf12() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000012bf": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_gpf0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x000012ff": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_gpl12() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000133f": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_gpl0() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile (".word 0x0000137f": : :"$12","$13","$14","$15","memory"); \
+}
+
+/*
+ * Type 3 functions
+ */
+
+#define gte_stsxy(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy2(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy01(r1,r2) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,($13)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy01c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,4($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_f3(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,16($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_g3(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_ft3(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_gt3(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,20($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,32($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_f4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,16($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_g4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_ft4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsxy3_gt4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $12,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $13,20($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $14,32($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stdp(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $8,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stflg(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$31": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stflg_4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$31": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("addi  $14,$0,4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("and   $13,$13,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsz(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $19,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsz3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $17,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $18,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $19,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsz4(r1,r2,r3,r4) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $15,%0": :"r"(r4):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $16,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $17,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $18,($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $19,($15)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsz3c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $17,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $18,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $19,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsz4c(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $16,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $17,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $18,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $19,12($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stszotz(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$19": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $13,$13,2": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stotz(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $7,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stopz(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $24,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stlvl(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $9,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $10,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $11,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stlvnl(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $25,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $26,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $27,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stlvnl0(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $25,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stlvnl1(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $26,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stlvnl2(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $27,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stsv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $14,2($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $15,4($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stclmv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $14,6($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $15,12($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stbv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sb    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sb    $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stcv(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $14,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $15,$11": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sb    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sb    $14,1($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sb    $15,2($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_strgb(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $22,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_strgb3(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $20,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $21,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $22,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_strgb3_g3(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $20,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $21,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $22,20($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_strgb3_gt3(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $20,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $21,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $22,28($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_strgb3_g4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $20,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $21,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $22,20($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_strgb3_gt4(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $20,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $21,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $22,28($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ReadGeomOffset(r1,r2) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$24": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$25": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $15,$15,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,($13)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ReadGeomScreen(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$26": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ReadRotMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$1": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$2": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$3": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$4": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$6": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$7": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,20($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,28($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_sttr(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$6": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$7": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ReadLightMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$8": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$11": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$12": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$15": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,20($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,28($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_ReadColorMatrix(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$17": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$18": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$19": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$20": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,8($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,12($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,16($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$22": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$23": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,20($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,24($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,28($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stlzc(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("swc2  $31,($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_stfc(r1) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$21": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $14,$22": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $15,$23": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $13,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $14,4($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,8($12)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_mvlvtr() { \
+  __asm__ volatile ("mfc2  $12,$25": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$26": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $14,$27": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $13,$6": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$7": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_nop() { \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_subdvl(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $12,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $13,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $15,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,4($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $12,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $12,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_subdvd(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $12,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $13,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $15,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $15,2($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $12,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $12,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_adddvl(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $12,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $13,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("addu  $15,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $15,4($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("addu  $12,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sw    $12,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_adddvd(r1,r2,r3) { \
+  __asm__ volatile ("move  $12,%0": :"r"(r1):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $13,%0": :"r"(r2):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("move  $14,%0": :"r"(r3):"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $12,($12)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("lw    $13,($13)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mtc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $12,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $13,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("addu  $15,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $12,$9": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("mfc2  $13,$10": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $15,2($14)": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("addu  $12,$12,$13": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sh    $12,($14)": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_FlipRotMatrixX() { \
+  __asm__ volatile ("cfc2  $12,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("cfc2  $13,$1": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $14,$0,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $15,$12,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $15,$0,$15": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $15,$15,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("srl   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("or    $14,$14,$15": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$0": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $14,$0,$14": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sra   $15,$13,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $15,$15,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("sll   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("srl   $14,$14,16": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("or    $14,$14,$15": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $14,$1": : :"$12","$13","$14","$15","memory"); \
+}
+#define gte_FlipTRX() { \
+  __asm__ volatile ("cfc2  $12,$5": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("nop   ": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("subu  $12,$0,$12": : :"$12","$13","$14","$15","memory"); \
+  __asm__ volatile ("ctc2  $12,$5": : :"$12","$13","$14","$15","memory"); \
+}
diff --git a/tools/psyq/include/INLINE_S.H b/tools/psyq/include/INLINE_S.H
new file mode 100644
index 000000000..f85769981
--- /dev/null
+++ b/tools/psyq/include/INLINE_S.H
@@ -0,0 +1,194 @@
+/* $PSLibId: Run-time Library Release 4.7$
+ *
+ *	Macro definitions of DMPSX version 3 for Assembler(aspsx) programs
+ *	inline_s.h
+ *	Copyright(C) 1998  Sony Computer Entertainment Inc.
+ *	All rights reserved.
+ */
+
+/*
+ * GTE commands with 2 nops
+ */
+#define nRTPS	\
+		nop; \
+		nop; \
+		.word	0x0000007f
+
+#define nRTPT	\
+		nop; \
+		nop; \
+		.word	0x000000bf
+		
+#define nDCPL	\
+		nop; \
+		nop; \
+		.word	0x00000dff
+
+#define nDPCS	\
+		nop; \
+		nop; \
+		.word	0x00000e3f
+
+#define nDPCT	\
+		nop; \
+		nop; \
+		.word	0x00000e7f
+
+#define nINTPL	\
+		nop; \
+		nop; \
+		.word	0x00000ebf
+
+#define nNCS	\
+		nop; \
+		nop; \
+		.word	0x00000f7f
+
+#define nNCT	\
+		nop; \
+		nop; \
+		.word	0x00000fbf
+
+#define nNCDS	\
+		nop; \
+		nop; \
+		.word	0x00000fff
+
+#define nNCDT	\
+		nop; \
+		nop; \
+		.word	0x0000103f
+
+#define nNCCS	\
+		nop; \
+		nop; \
+		.word	0x0000107f
+
+#define nNCCT	\
+		nop; \
+		nop; \
+		.word	0x000010bf
+
+#define nCDP	\
+		nop; \
+		nop; \
+		.word	0x000010ff
+
+#define nCC	\
+		nop; \
+		nop; \
+		.word	0x0000113f
+
+#define nNCLIP	\
+		nop; \
+		nop; \
+		.word	0x0000117f
+
+#define nAVSZ3	\
+		nop; \
+		nop; \
+		.word	0x000011bf
+
+#define nAVSZ4	\
+		nop; \
+		nop; \
+		.word	0x000011ff
+
+#define nMVMVA(sf,mx,v,cv,lm)	\
+		nop; \
+		nop; \
+		.word	0x000013bf|sf<<25|mx<<23|v<<21|cv<<19|lm<<18
+		
+#define nSQR(sf)	\
+		nop; \
+		nop; \
+		.word	0x000013ff|sf<<25
+		
+#define nOP(sf)	\
+		nop; \
+		nop; \
+		.word	0x0000143f|sf<<25
+		
+#define nGPF(sf)	\
+		nop; \
+		nop; \
+		.word	0x0000147f|sf<<25
+		
+#define nGPL(sf)	\
+		nop; \
+		nop; \
+		.word	0x000014bf|sf<<25
+		
+/*
+ * GTE commands without nops
+ */
+#define RTPS	\
+		.word	0x0000007f
+		
+#define RTPT	\
+		.word	0x000000bf
+		
+#define DCPL	\
+		.word	0x00000dff
+		
+#define DPCS	\
+		.word	0x00000e3f
+		
+#define DPCT	\
+		.word	0x00000e7f
+		
+#define INTPL	\
+		.word	0x00000ebf
+		
+#define NCS	\
+		.word	0x00000f7f
+		
+#define NCT	\
+		.word	0x00000fbf
+		
+#define NCDS	\
+		.word	0x00000fff
+		
+#define NCDT	\
+		.word	0x0000103f
+		
+#define NCCS	\
+		.word	0x0000107f
+		
+#define NCCT	\
+		.word	0x000010bf
+		
+#define CDP	\
+		.word	0x000010ff
+		
+#define CC	\
+		.word	0x0000113f
+		
+#define NCLIP	\
+		.word	0x0000117f
+		
+#define AVSZ3	\
+		.word	0x000011bf
+		
+#define AVSZ4	\
+		.word	0x000011ff
+		
+#define MVMVA(sf,mx,v,cv,lm)	\
+		.word	0x000013bf|sf<<25|mx<<23|v<<21|cv<<19|lm<<18
+		
+
+#define SQR(sf)	\
+		.word	0x000013ff|sf<<25
+		
+
+#define OP(sf)	\
+		.word	0x0000143f|sf<<25
+		
+
+#define GPF(sf)	\
+		.word	0x0000147f|sf<<25
+		
+
+#define GPL(sf)	\
+		.word	0x000014bf|sf<<25
+		
diff --git a/tools/psyq/include/KERNEL.H b/tools/psyq/include/KERNEL.H
new file mode 100644
index 000000000..1ed7aba8d
--- /dev/null
+++ b/tools/psyq/include/KERNEL.H
@@ -0,0 +1,171 @@
+#ifndef _KERNEL_H
+#define _KERNEL_H
+
+/*
+ * File:kernel.h 	Rev. 3
+*/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _R3000_H
+#include <r3000.h>
+#endif
+
+#ifndef _ASM_H
+#include <asm.h>
+#endif
+
+/* don't change these macros and structures which is refereced in kernel code */ 
+
+#define DescMask 	0xff000000
+#define DescTH 		DescMask
+#define DescHW   	0xf0000000
+#define DescEV   	0xf1000000
+#define DescRC   	0xf2000000
+#define DescUEV   	0xf3000000	/* User event */
+#define DescSW   	0xf4000000	/* BIOS */
+
+#define HwVBLANK	(DescHW|0x01)	/* VBLANK */
+#define HwGPU		(DescHW|0x02)	/* GPU */
+#define HwCdRom		(DescHW|0x03)	/* CDROM Decorder */
+#define HwDMAC		(DescHW|0x04)	/* DMA controller */
+#define HwRTC0		(DescHW|0x05)	/* RTC0 */
+#define HwRTC1		(DescHW|0x06)	/* RTC1 */
+#define HwRTC2		(DescHW|0x07)	/* RTC2 */
+#define HwCNTL		(DescHW|0x08)	/* Controller */
+#define HwSPU		(DescHW|0x09)	/* SPU */
+#define HwPIO		(DescHW|0x0a)	/* PIO */
+#define HwSIO		(DescHW|0x0b)	/* SIO */
+
+#define HwCPU		(DescHW|0x10)	/* Exception */
+#define HwCARD		(DescHW|0x11)	/* memory card */
+#define HwCARD_0	(DescHW|0x12)	/* memory card */
+#define HwCARD_1	(DescHW|0x13)	/* memory card */
+#define SwCARD		(DescSW|0x01)	/* memory card */
+#define SwMATH          (DescSW|0x02)	/* libmath */
+
+#define RCntCNT0     	(DescRC|0x00)  	/* display pixel */
+#define RCntCNT1  	(DescRC|0x01)  	/* horizontal sync */
+#define RCntCNT2  	(DescRC|0x02)  	/* one-eighth of system clock */
+#define RCntCNT3  	(DescRC|0x03)  	/* vertical sync target value fixed to 1 */
+
+#define RCntMdINTR	0x1000
+#define RCntMdNOINTR	0x2000
+#define RCntMdSC	0x0001
+#define RCntMdSP	0x0000
+#define RCntMdFR	0x0000
+#define RCntMdGATE	0x0010
+
+#define EvSpCZ		0x0001		/* counter becomes zero */
+#define EvSpINT		0x0002		/* interrupted */
+#define EvSpIOE		0x0004		/* end of i/o */
+#define EvSpCLOSE	0x0008		/* file was closed */
+#define EvSpACK		0x0010		/* command acknowledged */
+#define EvSpCOMP	0x0020		/* command completed */
+#define EvSpDR		0x0040		/* data ready */
+#define EvSpDE		0x0080		/* data end */
+#define EvSpTIMOUT      0x0100          /* time out */
+#define EvSpUNKNOWN     0x0200          /* unknown command */
+#define EvSpIOER	0x0400		/* end of read buffer */
+#define EvSpIOEW	0x0800		/* end of write buffer */
+#define EvSpTRAP       	0x1000          /* general interrupt */
+#define EvSpNEW		0x2000		/* new device */
+#define EvSpSYSCALL	0x4000		/* system call instruction */
+#define EvSpERROR	0x8000		/* error happned */
+#define EvSpPERROR	0x8001		/* previous write error happned */
+#define EvSpEDOM        0x0301		/* domain error in libmath */
+#define EvSpERANGE      0x0302		/* range error in libmath */
+
+#define EvMdINTR	0x1000
+#define EvMdNOINTR	0x2000
+
+#define EvStUNUSED    	0x0000
+#define EvStWAIT    	0x1000
+#define EvStACTIVE    	0x2000
+#define EvStALREADY   	0x4000
+
+#define TcbMdRT		0x1000		/* reserved by system */
+#define TcbMdPRI	0x2000		/* reserved by system */
+
+#define TcbStUNUSED	0x1000
+#define	TcbStACTIVE	0x4000
+
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)||defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+struct ToT {
+	unsigned long *head;
+	long size;
+};
+
+struct TCBH {
+	struct TCB *entry;	/* NULL */
+	long flag;
+};
+
+struct TCB {
+	long status;
+	long mode;
+	unsigned long reg[NREGS];	/* never change the offset of this */
+	long system[6];			/* reserved by system */
+};
+
+struct EvCB {
+	unsigned long desc;	
+	long status;
+	long spec;
+	long mode;
+	long (*FHandler)();
+	long system[2];			/* reserved by system */
+};
+
+
+struct EXEC {                   
+        unsigned long pc0;      
+        unsigned long gp0;      
+        unsigned long t_addr;   
+        unsigned long t_size;   
+        unsigned long d_addr;   
+        unsigned long d_size;   
+        unsigned long b_addr;   
+        unsigned long b_size;   
+	unsigned long s_addr;
+	unsigned long s_size;
+	unsigned long sp,fp,gp,ret,base;
+};
+
+
+struct XF_HDR {
+	char key[8];
+	unsigned long text;
+	unsigned long data;
+	struct EXEC exec;
+	char title[60];		/* "PlayStation(tm) Executable A1" */
+};
+
+
+struct DIRENTRY {
+	char name[20];
+	long attr;
+	long size;
+	struct DIRENTRY *next;
+	long head;
+	char system[4];
+};
+
+
+extern struct ToT SysToT[32];
+
+extern long SysClearRCnt[];
+
+#ifndef NULL
+#define NULL (0)
+#endif
+
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)
+#define delete  erase
+#endif /* LANGUAGE_C */
+
+#endif /* LANGUAGE_C||_LANGUAGE_C_PLUS_PLUS||__cplusplus||c_plusplus */
+
+#endif /* _KERNEL_H */
+
+
diff --git a/tools/psyq/include/LIBAPI.H b/tools/psyq/include/LIBAPI.H
new file mode 100644
index 000000000..628cc3cc1
--- /dev/null
+++ b/tools/psyq/include/LIBAPI.H
@@ -0,0 +1,134 @@
+#ifndef _LIBAPI_H_
+#define _LIBAPI_H_
+
+/*
+ *	File:libapi.h
+ *	Copyright (C) 1997 by Sony Computer Entertainment Inc.
+ *			All rights Reserved
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _KERNEL_H
+#include "kernel.h"
+#endif
+
+/* don't change these macros and structures which is referred in controler code */
+
+/*
+ * Prototypes
+ */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+/* prototypes added by suzu 96/03/01 and changed by hakama 96/06/06*/
+
+extern long SetRCnt(unsigned long, unsigned short, long);
+extern long GetRCnt(unsigned long);
+extern long ResetRCnt(unsigned long);
+extern long StartRCnt(unsigned long);
+extern long StopRCnt(unsigned long);
+
+extern long OpenEvent(unsigned long,long,long,long (*func)());
+extern long CloseEvent(long);
+extern long WaitEvent(long);
+extern long TestEvent(long);
+extern long EnableEvent(long);
+extern long DisableEvent(long);
+extern void DeliverEvent(unsigned long, unsigned long);
+extern void UnDeliverEvent(unsigned long, unsigned long);
+
+extern long OpenTh(long (*func)(), unsigned long , unsigned long);
+extern int CloseTh(long);
+extern int ChangeTh(long);
+
+extern long open(char *, unsigned long);
+extern long close(long);
+extern long lseek(long, long, long);
+extern long read(long, void *, long);
+extern long write(long, void *, long);
+extern long ioctl(long, long, long);
+extern struct DIRENTRY * firstfile(char *, struct DIRENTRY *);
+extern struct DIRENTRY * nextfile(struct DIRENTRY *);
+extern long erase(char *);
+
+
+extern long undelete(char *);
+extern long format(char *);
+extern long rename(char *, char *);
+extern long cd(char *);
+
+extern long LoadTest(char *, struct EXEC *);
+extern long Load(char *, struct EXEC *);
+extern long Exec(struct EXEC *, long, char **);
+extern long LoadExec(char *, unsigned long, unsigned long);
+
+extern long InitPAD(char *,long ,char *,long);
+extern long StartPAD(void);
+extern void StopPAD(void);
+extern void EnablePAD(void);
+extern void DisablePAD(void);
+
+extern void FlushCache(void);
+extern void ReturnFromException(void);
+extern int  EnterCriticalSection(void);
+extern void ExitCriticalSection(void);
+extern void Exception(void);
+extern void SwEnterCriticalSection(void);
+extern void SwExitCriticalSection(void);
+
+extern unsigned long SetSp(unsigned long);
+extern unsigned long GetSp( void );
+extern unsigned long GetGp( void );
+extern unsigned long GetCr( void );
+extern unsigned long GetSr( void );
+extern unsigned long GetSysSp(void);
+
+extern long SetConf(unsigned long,unsigned long,unsigned long);
+extern void GetConf(unsigned long *,unsigned long *,unsigned long *);
+
+extern long _get_errno(void);
+extern long _get_error(long);
+
+extern void SystemError( char, long);
+extern void SetMem(long);
+
+extern long Krom2RawAdd( unsigned long );
+extern long Krom2RawAdd2(unsigned short);
+
+extern void _96_init(void);
+extern void _96_remove(void);
+extern void _boot(void);
+
+extern void ChangeClearPAD( long );
+
+/* prototypes added by shino 96/05/22 */
+extern void InitCARD(long val);
+extern long StartCARD(void);
+extern long StopCARD(void);
+extern void _bu_init(void);
+extern long _card_info(long chan);
+extern long _card_clear(long chan);
+extern long _card_load(long chan);
+extern long _card_auto(long val);
+extern void _new_card(void);
+extern long _card_status(long drv);
+extern long _card_wait(long drv);
+extern unsigned long _card_chan(void);
+extern long _card_write(long chan, long block, unsigned char *buf);
+extern long _card_read(long chan, long block, unsigned char *buf);
+extern long _card_format(long chan);	/* added by iwano 98/03/24 */
+
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _LIBAPI_H_ */
+
+/* don't add stuff after this */
+
diff --git a/tools/psyq/include/LIBCD.H b/tools/psyq/include/LIBCD.H
new file mode 100644
index 000000000..57d4f460b
--- /dev/null
+++ b/tools/psyq/include/LIBCD.H
@@ -0,0 +1,326 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBCD_H_
+#define _LIBCD_H_
+/*
+ *  (C) Copyright 1993/1994 Sony Computer Entertainment ,Tokyo,Japan.
+ *                      All Rights Reserved
+ *
+ *              libcd.h: CD-ROM sub system hendler
+ *
+ * CD-ROM Primitive Command list:
+ *
+ *	Symbol		type	Contents			
+ *	------------------------------------------------------
+ *	CdlNop		B	NOP		
+ *	CdlSetloc	B	Set position	
+ *	CdlPlay		B	CD-DA Play
+ *	CdlForward	B	Forward
+ *	CdlBackward	B	Backward
+ *	CdlReadN	B	Read with retry
+ *	CdlStanby	N	Standby
+ *	CdlStop		N	Stop
+ *	CdlPause	N	Pause
+ *	CdlMute		B	Mute on
+ *	CdlDemute	B	Mute off
+ *	CdlSetfilter	B	Set SubHeader filter
+ *	CdlSetmode	B	Set mode
+ *	CdlGetlocL	B	Get logical position
+ *	CdlGetlocP	B	Get phisycal position
+ *	CdlSeekL	N	Logical Seek
+ *	CdlSeekP	N	Phisical Seek
+ *	CdlReadS	B	Read without retry
+ *	------------------------------------------------------
+ *			B: Blocking, N: Non-Blocking operation
+ *		
+ *	
+ *	Symbol		arg		result
+ *	--------------------------------------------------------------
+ *	CdlNop		-		status
+ *	CdlSetloc	min,sec,sector	status
+ *	CdlPlay       	-		status
+ *	CdlForward	-		status
+ *	CdlBackward	-		status
+ *	CdlReadN	-		status
+ *	CdlStanby	-		status
+ *	CdlStop		-		status
+ *	CdlPause	-		status
+ *	CdlMute		-		status
+ *	CdlDemute	-		status
+ *	CdlSetfilter	file,chan	status
+ *	CdlSetmode	mode		status
+ *	CdlGetlocL	-		min,sec,sector,mode,file, chan
+ *	CdlGetlocP	-		track,index,min,sec,frame,
+ *							amin,asec,aframe
+ *	CdlSeekL	-		status
+ *	CdlSeekP	-		status
+ *	CdlReadS	-		status
+ *	--------------------------------------------------------------
+ */
+/*
+ * CD-ROM Basic System
+ */
+
+/*
+ * CD-ROM Mode (used int CdlSetmode)
+ */
+#define CdlModeStream  0x100    /* Normal Streaming                     */
+#define CdlModeStream2 0x120    /* SUB HEADER information includes      */
+#define CdlModeSpeed	0x80	/* 0: normal speed	1: double speed	*/
+#define CdlModeRT	0x40	/* 0: ADPCM off		1: ADPCM on	*/
+#define CdlModeSize1	0x20	/* 0: 2048 byte		1: 2340byte	*/
+#define CdlModeSize0	0x10	/* 0: -			1: 2328byte	*/
+#define CdlModeSF	0x08	/* 0: Channel off	1: Channel on	*/
+#define CdlModeRept  	0x04	/* 0: Report off	1: Report on	*/
+#define CdlModeAP	0x02	/* 0: AutoPause off	1: AutoPause on */
+#define CdlModeDA	0x01	/* 0: CD-DA off		1: CD-DA on	*/
+
+/*
+ * Status Contents
+ */
+#define CdlStatPlay		0x80	/* playing CD-DA */
+#define CdlStatSeek		0x40	/* seeking */
+#define CdlStatRead		0x20	/* reading data sectors */
+#define CdlStatShellOpen	0x10	/* once shell open */
+#define CdlStatSeekError	0x04	/* seek error detected */
+#define CdlStatStandby		0x02	/* spindle motor rotating */
+#define CdlStatError		0x01	/* command error detected */
+
+/*
+ * Macros for CdGetDiskType()
+ */
+#define CdlStatNoDisk	0
+#define CdlOtherFormat	1
+#define CdlCdromFormat	2
+
+/*
+ * CD-ROM Primitive Commands
+ */
+#define CdlNop		0x01
+#define CdlSetloc	0x02
+#define CdlPlay		0x03
+#define CdlForward	0x04
+#define CdlBackward	0x05
+#define CdlReadN	0x06
+#define CdlStandby	0x07
+#define CdlStop		0x08
+#define CdlPause	0x09
+#define CdlMute		0x0b
+#define CdlDemute	0x0c
+#define CdlSetfilter	0x0d
+#define CdlSetmode	0x0e
+#define CdlGetparam	0x0f
+#define CdlGetlocL	0x10
+#define CdlGetlocP	0x11
+#define CdlGetTN	0x13
+#define CdlGetTD	0x14
+#define CdlSeekL	0x15
+#define CdlSeekP	0x16
+#define CdlReadS	0x1B
+
+/*
+ * Interrupts
+ */
+#define CdlNoIntr	0x00	/* No interrupt */
+#define CdlDataReady	0x01	/* Data Ready */
+#define CdlComplete	0x02	/* Command Complete */
+#define CdlAcknowledge	0x03	/* Acknowledge (reserved) */
+#define CdlDataEnd	0x04	/* End of Data Detected */
+#define CdlDiskError	0x05	/* Error Detected */
+
+/*
+ * Library Macros
+ */
+#ifndef btoi
+#define btoi(b)		((b)/16*10 + (b)%16)		/* BCD to u_char */
+#endif
+#ifndef itob
+#define itob(i)		((i)/10*16 + (i)%10)		/* u_char to BCD */
+#endif
+
+#define CdSeekL(p)	CdControl(CdlSeekL, (u_char *)p, 0)
+#define CdSeekP(p)	CdControl(CdlSeekP, (u_char *)p, 0)
+#define CdStandby()	CdControl(CdlStandby,  0, 0)
+#define CdPause()	CdControl(CdlPause,    0, 0)
+#define CdStop()	CdControl(CdlStop,     0, 0)
+#define CdMute()	CdControl(CdlMute,     0, 0)
+#define CdDeMute()	CdControl(CdlDemute,   0, 0)
+#define CdForward()	CdControl(CdlForward,  0, 0)
+#define CdBackward()	CdControl(CdlBackward, 0, 0)
+
+/*
+ *	Position
+ */
+#define CdlMAXTOC	100
+
+/*
+ *	Callback
+ */
+
+typedef void (*CdlCB)(u_char,u_char *);
+
+/*
+ *	Location
+ */
+typedef struct {
+	u_char minute;		/* minute (BCD) */
+	u_char second;		/* second (BCD) */
+	u_char sector;		/* sector (BCD) */
+	u_char track;		/* track (void) */
+} CdlLOC;
+
+/*
+ *	ADPCM Filter
+ */
+typedef struct {
+	u_char	file;		/* file ID (always 1) */
+	u_char	chan;		/* channel ID */
+	u_short	pad;
+} CdlFILTER;
+
+/*
+ *	Attenuator
+ */
+typedef struct {
+	u_char	val0;		/* volume for CD(L) -> SPU (L) */
+	u_char	val1;		/* volume for CD(L) -> SPU (R) */
+	u_char	val2;		/* volume for CD(R) -> SPU (L) */
+	u_char	val3;		/* volume for CD(R) -> SPU (R) */
+} CdlATV;	
+
+/*
+ *	Low Level File System for CdSearchFile() 
+ */
+#define CdlMAXFILE	64	/* max number of files in a directory */
+#define CdlMAXDIR	128	/* max number of total directories */
+#define CdlMAXLEVEL	8	/* max levels of directories */
+
+typedef struct {
+	CdlLOC	pos;		/* file location */
+	u_long	size;		/* file size */
+	char	name[16];	/* file name (body) */
+} CdlFILE;
+
+
+/*#define MULTI_INTERRUPT */
+#ifndef MULTI_INTERRUPT
+#define pauseMULI()
+#define restartMULI()
+#endif
+
+#ifndef _LIBDS_H_
+/*
+ *	Streaming Structures
+ */
+typedef struct {
+    u_short id;
+    u_short type;
+    u_short secCount;
+    u_short nSectors;
+    u_long  frameCount;
+    u_long  frameSize;
+
+    u_short width;
+    u_short height;
+    u_long  dummy1;
+    u_long  dummy2;
+    CdlLOC  loc;
+} StHEADER;             /* CD-ROM STR structure */
+
+#define  StFREE       0x0000
+#define  StREWIND     0x0001
+#define  StCOMPLETE   0x0002
+#define  StBUSY       0x0003
+#define  StLOCK       0x0004
+
+#define  EDC 0
+#define  SECTOR_SIZE (512)	/* Sector Size (word) */
+#define  HEADER_SIZE (8)	/* Header Size (word) */
+
+#define  StSTATUS         0x00
+#define  StVER            0x00
+#define  StTYPE           0x01
+#define  StSECTOR_OFFSET  0x02
+#define  StSECTOR_SIZE    0x03
+#define  StFRAME_NO       0x04
+#define  StFRAME_SIZE     0x06
+
+#define  StMOVIE_WIDTH    0x08
+#define  StMOVIE_HEIGHT   0x09
+
+
+/*
+ *	Prototypes for Streaming
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+void	StSetRing(u_long *ring_addr,u_long ring_size);
+void	StClearRing(void);
+void	StUnSetRing(void);
+void	StSetStream(u_long mode,u_long start_frame,u_long end_frame,
+		    void (*func1)(),void (*func2)());
+void	StSetEmulate(u_long *addr,u_long mode,u_long start_frame,
+		     u_long end_frame,void (*func1)(),void (*func2)());
+u_long	StFreeRing(u_long *base);
+u_long	StGetNext(u_long **addr,u_long **header);
+u_long	StGetNextS(u_long **addr,u_long **header);
+u_short	StNextStatus(u_long **addr,u_long **header);
+void    StRingStatus(short *free_sectors,short *over_sectors);
+void	StSetMask(u_long mask,u_long start,u_long end);
+void	StCdInterrupt(void);
+int     StGetBackloc(CdlLOC *loc);
+int     StSetChannel(u_long channel);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif	/* ifndef _LIBDS_H_ */
+
+
+/*
+ *	Prototypes
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+void CdFlush(void);
+CdlFILE *CdSearchFile(CdlFILE *fp, char *name);
+CdlLOC *CdIntToPos(int i, CdlLOC *p) ;
+char *CdComstr(u_char com);
+char *CdIntstr(u_char intr);
+int CdControl(u_char com, u_char *param, u_char *result);
+int CdControlB(u_char com, u_char *param, u_char *result);
+int CdControlF(u_char com, u_char *param);
+int CdGetSector(void *madr, int size);
+int CdGetSector2( void* madr, int size );
+int CdDataSync(int mode);
+int CdGetToc(CdlLOC *loc) ;
+int CdPlay(int mode, int *track, int offset);
+int CdMix(CdlATV *vol);
+int CdPosToInt(CdlLOC *p);
+int CdRead(int sectors, u_long *buf, int mode);
+int CdRead2(long mode);
+int CdReadFile(char *file, u_long *addr, int nbyte);
+int CdReadSync(int mode, u_char *result);
+int CdReady(int mode, u_char *result) ;
+int CdSetDebug(int level);
+int CdSync(int mode, u_char *result) ;
+void (*CdDataCallback(void (*func)()));
+CdlCB CdReadCallback(CdlCB func);
+CdlCB CdReadyCallback(CdlCB func);
+CdlCB CdSyncCallback(CdlCB func);
+int CdInit(void);
+int CdReset(int mode);
+int CdStatus(void);
+int CdLastCom(void);
+CdlLOC *CdLastPos(void);
+int CdMode(void);
+int CdDiskReady( int mode );
+int CdGetDiskType( void );
+struct EXEC *CdReadExec(char *file);
+void CdReadBreak( void );
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBCD_H_ */
diff --git a/tools/psyq/include/LIBCOMB.H b/tools/psyq/include/LIBCOMB.H
new file mode 100644
index 000000000..b309aa758
--- /dev/null
+++ b/tools/psyq/include/LIBCOMB.H
@@ -0,0 +1,67 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+/*
+ * File:libcomb.h
+*/
+#ifndef _LIBCOMB_H_
+#define _LIBCOMB_H_
+
+/* Status bits */
+#define COMB_CTS		0x100
+#define COMB_DSR		0x80
+#define COMB_FE			0x20
+#define COMB_OE			0x10
+#define COMB_PERROR		0x8
+#define COMB_TXU		0x4
+#define COMB_RXRDY		0x2
+#define COMB_TXRDY		0x1
+
+
+/* Control bits */
+#define COMB_BIT_DTR	0x1
+#define COMB_BIT_RTS	0x2
+
+/* Macros */
+#define CombSioStatus()		_comb_control(0,0,0)	/* Return serial controller status */
+#define CombControlStatus()	_comb_control(0,1,0)	/* Return control line status */
+#define CombGetMode()		_comb_control(0,2,0)	/* Return communication mode */
+#define CombGetBPS()		_comb_control(0,3,0)	/* Return transfer rate */
+#define CombGetPacketSize()	_comb_control(0,4,0)	/* Return current packet size */
+#define CombBytesToWrite()	_comb_control(0,5,0)	/* Return # bytes remaining in write buffer */
+#define CombBytesToRead()	_comb_control(0,5,1)	/* Return # bytes remaining to be read */
+#define CombBytesRemaining(a)	_comb_control(0,5,a)	/* Return # bytes remaining to read or write */
+#define CombAsyncRequest(a)	_comb_control(0,6,a)	/* Return async read/write request */
+
+#define CombSetControl(a)	_comb_control(1,1,a)	/* Set the control line status */
+#define CombSetMode(a)		_comb_control(1,2,a)	/* Sets communications mode */
+#define CombSetBPS(a)		_comb_control(1,3,a)	/* Sets the transfer rate */
+#define CombSetPacketSize(a)	_comb_control(1,4,a)	/* Sets the packet size */
+
+#define	CombReset()		_comb_control(2,0,0)	/* Reset serial controller */
+#define	CombResetError()	_comb_control(2,1,0)	/* Reset error bits */
+#define	CombCancelWrite()	_comb_control(2,2,0)	/* Cancel async write request */
+#define CombCancelRead()	_comb_control(2,3,0)	/* Cancel async read request */
+
+#define CombSetRTS(a)		_comb_control(3,0,a)	/* Set RTS to 'a' */
+#define CombCTS()		_comb_control(3,1,0)	/* Return status of CTS */
+
+#define CombWaitCallback(a)	_comb_control(4,0,a)	/* Install wait callback function */
+
+#define CombResetVBLANK()	_comb_control(5,0,0)	/* Restart VBLANK signal */
+
+/* Prototypes */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+extern void AddCOMB(void);
+extern void DelCOMB(void);
+extern void ChangeClearSIO(long);
+extern long _comb_control(unsigned long,unsigned long,unsigned long);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /*_LIBCOMB_H_*/
+
diff --git a/tools/psyq/include/LIBDS.H b/tools/psyq/include/LIBDS.H
new file mode 100644
index 000000000..30072f5b1
--- /dev/null
+++ b/tools/psyq/include/LIBDS.H
@@ -0,0 +1,286 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+/*
+ * libds.h
+ *	Copyright(C) 1996 1997, Sony Computer Entertainment Inc.
+ *	All Rights Reserved.
+ */
+
+#ifndef _LIBDS_H_
+#define _LIBDS_H_
+
+#include <kernel.h>
+
+/*
+ * CD-ROM Mode (used int CdlSetmode)
+ */
+#define DslModeStream	0x100	/* Normal Streaming                     */
+#define DslModeStream2	0x120	/* SUB HEADER information includes      */
+#define DslModeSpeed	0x80	/* 0: normal speed	1: double speed	*/
+#define DslModeRT	0x40	/* 0: ADPCM off		1: ADPCM on	*/
+#define DslModeSize1	0x20	/* 0: 2048 byte		1: 2340byte	*/
+#define DslModeSize0	0x10	/* 0: -			1: 2328byte	*/
+#define DslModeSF	0x08	/* 0: Channel off	1: Channel on	*/
+#define DslModeRept	0x04	/* 0: Report off	1: Report on	*/
+#define DslModeAP	0x02	/* 0: AutoPause off	1: AutoPause on */
+#define DslModeDA	0x01	/* 0: CD-DA off		1: CD-DA on	*/
+
+/*
+ * Status contents
+ */
+#define DslStatPlay		0x80	/* playing CD-DA */
+#define DslStatSeek		0x40	/* seeking */
+#define DslStatRead		0x20	/* reading data sectors */
+#define DslStatShellOpen	0x10	/* once shell open */
+#define DslStatSeekError	0x04	/* seek error detected */
+#define DslStatStandby		0x02	/* spindle motor rotating */
+#define DslStatError		0x01	/* command error detected */
+
+/*
+ * Macros for DsGetDiskType()
+ */
+#define DslStatNoDisk		0x01
+#define DslOtherFormat		0x02
+#define DslCdromFormat		0x04
+
+/*
+ * CD-ROM Primitive Commands
+ */
+#define DslNop			0x01	/* no operation */
+#define DslSetloc		0x02	/* set head position */
+#define DslPlay			0x03	/* play CD-DA */
+#define DslForward		0x04	/* forward DA play */
+#define DslBackward		0x05	/* backward DA play */
+#define	DslReadN		0x06	/* read data with retry */
+#define DslStandby		0x07	/* start spindle motor */
+#define DslStop			0x08	/* stop spindle motor */
+#define DslPause		0x09	/* pause */
+#define DslMute			0x0b	/* mute on */
+#define DslDemute		0x0c	/* mute off */
+#define DslSetfilter		0x0d	/* set subheader filter */
+#define DslSetmode		0x0e	/* set mode */
+#define DslGetparam		0x0f	/* get mode */
+#define DslGetlocL		0x10	/* get head position (data sector) */
+#define DslGetlocP		0x11	/* get head position (DA sector) */
+#define DslGetTN		0x13	/* get number of TOC */
+#define DslGetTD		0x14	/* get TOC data */
+#define DslSeekL		0x15	/* logical seek */
+#define DslSeekP		0x16	/* phisical seek */
+#define DslReadS		0x1B	/* read data without retry */
+
+/*
+ * Interrupts
+ */
+#define DslNoIntr		0x00	/* No interrupt */
+#define DslDataReady		0x01	/* Data Ready */
+#define DslComplete		0x02	/* Command Complete */
+#define DslAcknowledge		0x03	/* Acknowledge (reserved) */
+#define DslDataEnd		0x04	/* End of Data Detected */
+#define DslDiskError		0x05	/* Error Detected */
+
+#define DslNoResult		0x06
+#define DslFinished		0x07
+
+#ifndef btoi
+#define btoi( b )	( ( b ) / 16 * 10 + ( b ) % 16 )
+#endif
+#ifndef itob
+#define itob( i )	( ( i ) / 10 * 16 + ( i ) % 10 )
+#endif
+
+/*
+ * Position
+ */
+#define DslMAXTOC	100
+
+/*
+ * Callback
+ */
+typedef void ( *DslCB )( u_char, u_char* );
+typedef void ( *DslRCB )( u_char, u_char*, u_long* );
+
+/*
+ * Location
+ */
+typedef struct {
+	u_char minute;		/* minute (BCD) */
+	u_char second;		/* second (BCD) */
+	u_char sector;		/* sector (BCD) */
+	u_char track;		/* track (void) */
+} DslLOC;
+
+/*
+ * ADPCM Filter
+ */
+typedef struct {
+	u_char file;		/* file ID (always 1) */
+	u_char chan;		/* channel ID */
+	u_short pad;
+} DslFILTER;
+
+/*
+ * Attenuator
+ */
+typedef struct {
+	u_char val0;		/* volume for CD(L) -> SPU (L) */
+	u_char val1;		/* volume for CD(L) -> SPU (R) */
+	u_char val2;		/* volume for CD(R) -> SPU (L) */
+	u_char val3;		/* volume for CD(R) -> SPU (R) */
+} DslATV;
+
+/*
+ * Low Level File System for DsSearchFile() 
+ */
+#define DslMAXFILE	64	/* max number of files in a directory */
+#define DslMAXDIR	128	/* max number of total directories */
+#define DslMAXLEVEL	8	/* max levels of directories */
+
+typedef struct {
+	DslLOC pos;		/* file location */
+	u_long size;		/* file size */
+	char name[ 16 ];	/* file name (body) */
+} DslFILE;
+
+#ifndef _LIBCD_H_
+/*
+ * Streaming Structures
+ */
+typedef struct {
+	u_short id;
+	u_short type;
+	u_short secCount;
+	u_short nSectors;
+	u_long frameCount;
+	u_long frameSize;
+
+	u_short width;
+	u_short height;
+	u_long dummy1;
+	u_long dummy2;
+	DslLOC loc;
+} StHEADER;		/* CD-ROM STR structure */
+
+#define StFREE		0x0000
+#define StREWIND	0x0001
+#define StCOMPLETE	0x0002
+#define StBUSY		0x0003
+#define StLOCK		0x0004
+
+#define EDC		0
+#define SECTOR_SIZE	( 512 )	/* Sector Size (word) */
+#define HEADER_SIZE	( 8 )	/* Header Size (word) */
+
+#define StSTATUS	0x00
+#define StVER		0x00
+#define StTYPE		0x01
+#define StSECTOR_OFFSET	0x02
+#define StSECTOR_SIZE	0x03
+#define StFRAME_NO	0x04
+#define StFRAME_SIZE	0x06
+
+#define StMOVIE_WIDTH	0x08
+#define StMOVIE_HEIGHT	0x09
+
+/*
+ * streaming library prototype declarations */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+void StSetRing( u_long* ring_addr, u_long ring_size );
+void StClearRing( void );
+void StUnSetRing( void );
+void StSetStream( u_long mode, u_long start_frame, u_long end_frame,
+  void ( *func1 )(), void ( *func2 )() );
+void StSetEmulate( u_long* addr, u_long mode, u_long start_frame,
+  u_long end_frame, void ( *func1 )(), void ( *func2 )() );
+u_long StFreeRing( u_long* base );
+u_long StGetNext( u_long** addr, u_long** header );
+u_long StGetNextS( u_long** addr, u_long** header );
+u_short StNextStatus( u_long** addr, u_long** header );
+void StRingStatus( short* free_sectors, short* over_sectors );
+void StSetMask( u_long mask, u_long start, u_long end );
+void StCdInterrupt( void );
+int StGetBackloc( DslLOC* loc );
+int StSetChannel( u_long channel );
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif	/* _LIBCD_H_ */
+
+/* **** system status **** */
+
+#define DslReady	1
+#define DslBusy		2
+#define DslNoCD		3
+
+/* **** maximum number of commands that can be added to the queue **** */
+#define DslMaxCOMMANDS	8
+
+/***** maximum number of command execution results **** */
+#define DslMaxRESULTS	8
+
+/***** DS function prototype **** */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+int DsInit( void );
+int DsReset( void );
+void DsClose( void );
+int DsCommand( u_char com, u_char* param, DslCB cbsync, int count );
+int DsPacket( u_char mode, DslLOC* pos, u_char com, DslCB func, int count );
+DslCB DsSyncCallback( DslCB func );
+DslCB DsReadyCallback( DslCB func );
+int DsSync( int id, u_char* result );
+int DsReady( u_char* result );
+void DsFlush( void );
+int DsSystemStatus( void );
+int DsQueueLen( void );
+u_char DsStatus( void );
+int DsShellOpen( void );
+
+int DsMix( DslATV* vol );
+int DsGetSector( void* madr, int size );
+int DsGetSector2( void* madr, int size );
+int DsGetToc( DslLOC* loc );
+void ( *DsDataCallback( void ( *func )() ) );
+int DsDataSync( int mode );
+DslLOC* DsIntToPos( int i, DslLOC* p );
+int DsPosToInt( DslLOC* p );
+int DsSetDebug( int level );
+DslLOC* DsLastPos( DslLOC* p );
+u_char DsLastCom( void );
+
+char* DsComstr( u_char com );
+char* DsIntstr( u_char intr );
+
+int DsStartReadySystem( DslRCB func, int count );
+void DsEndReadySystem( void );
+int DsReadySystemMode( int mode );
+
+int DsControlF( u_char com, u_char* param );
+int DsControl( u_char com, u_char* param, u_char* result );
+int DsControlB( u_char com, u_char* param, u_char* result );
+
+int DsRead( DslLOC* pos, int sectors, u_long* buf, int mode );
+int DsReadSync( u_char* result );
+DslCB DsReadCallback( DslCB func );
+void DsReadBreak( void );
+int DsRead2( DslLOC* pos, int mode );
+
+DslFILE* DsSearchFile( DslFILE* fp, char* name );
+int DsReadFile( char* file, u_long* addr, int nbyte );
+struct EXEC* DsReadExec( char* file );
+int DsPlay( int mode, int* tracks, int offset );
+
+int DsGetDiskType( void );
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif	/* _LIBDS_H_ */
diff --git a/tools/psyq/include/LIBETC.H b/tools/psyq/include/LIBETC.H
new file mode 100644
index 000000000..8a524df8c
--- /dev/null
+++ b/tools/psyq/include/LIBETC.H
@@ -0,0 +1,81 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBETC_H_
+#define _LIBETC_H_
+
+/*
+ *  (C) Copyright 1993/1994 Sony Corporation,Tokyo,Japan. All Rights Reserved
+ *
+ * 			libetc.h: Pad Interface
+ */
+extern int PadIdentifier;
+/*
+ * PAD I/O (SIO Pad)
+ */
+#define PADLup     (1<<12)
+#define PADLdown   (1<<14)
+#define PADLleft   (1<<15)
+#define PADLright  (1<<13)
+#define PADRup     (1<< 4)
+#define PADRdown   (1<< 6)
+#define PADRleft   (1<< 7)
+#define PADRright  (1<< 5)
+#define PADi       (1<< 9)
+#define PADj       (1<<10)
+#define PADk       (1<< 8)
+#define PADl       (1<< 3)
+#define PADm       (1<< 1)
+#define PADn       (1<< 2)
+#define PADo       (1<< 0)
+#define PADh       (1<<11)
+#define PADL1      PADn
+#define PADL2      PADo
+#define PADR1      PADl
+#define PADR2      PADm
+#define PADstart   PADh
+#define PADselect  PADk
+		    
+#define MOUSEleft  (1<<3)
+#define MOUSEright (1<<2)
+
+/*
+ * PAD utility macro: _PAD(x,y)
+ *   x: controller ID (0 or 1)
+ *   y: PAD assign macro
+ *
+ * Example: _PAD(0,PADstart) ... PADstart of controller 1
+ *          _PAD(1,PADLup)   ... PADLup of controller 2
+ */
+#define _PAD(x,y) ((y)<<((x)<<4))
+
+/* scratch pad address 0x1f800000 - 0x1f800400 */
+#define getScratchAddr(offset)  ((u_long *)(0x1f800000+(offset)*4))
+
+/*
+ * Video Mode:	NTSC/PAL
+ */
+#define MODE_NTSC 0
+#define MODE_PAL 1 
+
+/*
+ * Prototypes
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+int CheckCallback(void) ;
+void PadInit(int mode);
+int ResetCallback(void) ;
+int RestartCallback(void) ;
+int StopCallback(void) ;
+int VSync(int mode);
+int VSyncCallback(void (*f)(void)) ;
+long GetVideoMode (void);
+long SetVideoMode (long mode);
+u_long PadRead(int id);
+void PadStop(void);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBETC_H_ */
+
+
diff --git a/tools/psyq/include/LIBGPU.H b/tools/psyq/include/LIBGPU.H
new file mode 100644
index 000000000..5bf853621
--- /dev/null
+++ b/tools/psyq/include/LIBGPU.H
@@ -0,0 +1,824 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBGPU_H_
+#define _LIBGPU_H_
+/*
+ *  (C) Copyright 1993-1995 Sony Corporation,Tokyo,Japan. All Rights Reserved
+ *
+ * 		libgpu.h: Graphic Primitive Structures Database
+ *
+ * Primitive list:
+ *
+ *      Name     |Size*1|Shade  |Vertex |Texture| Function
+ *      ---------+------+-------+-------+-------+------------------------
+ *      POLY_F3  | 5	|Flat   |   3   |OFF    | Flat Triangle
+ *      POLY_FT3 | 8	|Flat   |   3   |ON     | Flat Textured Triangle
+ *      POLY_G3  | 7	|Gouraud|   3   |OFF    | Gouraud Triangle
+ *      POLY_GT3 |10	|Gouraud|   3   |ON     | Gouraud Textured Triangle
+ *      POLY_F4  | 6	|Flat   |   4   |OFF    | Flat Quadrangle
+ *      POLY_FT4 |10	|Flat   |   4   |ON     | Flat Textured Quadrangle
+ *      POLY_G4  | 9	|Gouraud|   4   |OFF    | Gouraud Quadrangle
+ *      POLY_GT4 |13	|Gouraud|   4   |ON     | Gouraud Textured Quadrangle
+ *      ---------+------+-------+-------+-------+------------------------
+ *      LINE_F2  | 4	|Flat   |   2   | -     | unconnected Flat Line 
+ *      LINE_G2  | 5	|Gouraud|   2   | -     | unconnected Gouraud Line 
+ *      LINE_F3  | 6	|Flat	|   3	| -     | 3-connected Flat Line
+ *      LINE_G3  | 8	|Gouraud|   3	| -     | 3-connected Gouraud Line
+ *      LINE_F4  | 7	|Flat	|   4	| -    	| 4-connected Flat Line
+ *      LINE_G4  |10	|Gouraud|   4	| -    	| 4-connected Gouraud Line
+ *      ---------+------+-------+-------+-------+------------------------
+ *      SPRT	 | 5	|Flat	|   1   |ON     | free size Sprite
+ *      SPRT_16	 | 4	|Flat	|   1   |ON     | 16x16 Sprite
+ *      SPRT_8	 | 4	|Flat	|   1   |ON     | 8x8 Sprite
+ *      ---------+------+-------+-------+-------+------------------------
+ *      TILE	 | 4	|Flat	|   1   |OFF    | free size Sprite
+ *      TILE_16	 | 3	|Flat	|   1   |OFF    | 16x16 Sprite
+ *      TILE_8	 | 3	|Flat	|   1   |OFF    | 8x8 Sprite
+ *      TILE_1	 | 3	|Flat	|   1   |OFF    | 1x1 Sprite
+ *      ---------+------+-------+-------+-------+------------------------
+ *      DR_TWIN	 | 3	|   -	|   -   | -     | Texture Window
+ *      DR_AREA	 | 3	|   -	|   -   | -     | Drawing Area
+ *      DR_OFFSET| 3	|   -	|   -   | -     | Drawing Offset
+ *      DR_MODE  | 3	|   -	|   -   | -     | Drawing Mode
+ *      DR_ENV   |16	|   -	|   -	| -     | Drawing Environment
+ *      DR_MOVE  | 6	|   -	|   -	| -     | MoveImage
+ *      DR_LOAD  |17	|   -	|   -	| -     | LoadImage
+ *      DR_TPAGE | 2    |   -   |   -   | -     | Drawing TPage
+ *      DR_STP   | 3    |   -   |   -   | -     | Drawing STP
+ *
+ *	*1: in long-word
+ *
+ * Texture Attributes:
+ *	abr: ambient rate
+ *		abr	0	1	2	3
+ *		-------------------------------------
+ *		Front	0.5	1.0	0.5	-1.0
+ *		Back	0.5	1.0	1.0	 1.0
+ *
+ *	tp: texture mode
+ *		 tp	0	1	2	
+ *		 -----------------------------
+ *		 depth	4bit	8bit	16bit
+ *		 color	CLUT	CLUT	DIRECT
+ */
+
+/*
+ *	Externals
+ */
+extern	int (*GPU_printf)(char *fmt, ...);	/* printf() object */
+
+/*
+ *	Time-out Cycle
+ */
+#define WAIT_TIME	0x800000
+
+/*
+ *	General Macros
+ */
+#define limitRange(x, l, h)	((x)=((x)<(l)?(l):(x)>(h)?(h):(x)))
+
+/*
+ *	Set/Add Vector/Rectangle Attributes
+ */
+#define setVector(v, _x, _y, _z) \
+	(v)->vx = _x, (v)->vy = _y, (v)->vz = _z	
+
+#define applyVector(v, _x, _y, _z, op) \
+	(v)->vx op _x, (v)->vy op _y, (v)->vz op _z	
+
+#define copyVector(v0, v1) \
+	(v0)->vx = (v1)->vx, (v0)->vy = (v1)->vy, (v0)->vz = (v1)->vz 
+
+#define addVector(v0, v1) \
+	(v0)->vx += (v1)->vx,	\
+	(v0)->vy += (v1)->vy,	\
+	(v0)->vz += (v1)->vz	
+	
+#define dumpVector(str, v)	\
+	GPU_printf("%s=(%d,%d,%d)\n", str, (v)->vx, (v)->vy, (v)->vz)
+
+#define dumpMatrix(x)	\
+	GPU_printf("\t%5d,%5d,%5d\n",(x)->m[0][0],(x)->m[0][1],(x)->m[0][2]),\
+	GPU_printf("\t%5d,%5d,%5d\n",(x)->m[1][0],(x)->m[1][1],(x)->m[1][2]),\
+	GPU_printf("\t%5d,%5d,%5d\n",(x)->m[2][0],(x)->m[2][1],(x)->m[2][2])
+
+#define setRECT(r, _x, _y, _w, _h) \
+	(r)->x = (_x),(r)->y = (_y),(r)->w = (_w),(r)->h = (_h)
+
+/*
+ *	Set Primitive Attributes
+ */
+#define setTPage(p,tp,abr,x,y) \
+	((p)->tpage = getTPage(tp,abr,x,y))
+
+#define setClut(p,x,y) \
+	((p)->clut = getClut(x,y))
+					   
+/*
+ * Set Primitive Colors
+ */
+#define setRGB0(p,_r0,_g0,_b0)						\
+	(p)->r0 = _r0,(p)->g0 = _g0,(p)->b0 = _b0
+	
+#define setRGB1(p,_r1,_g1,_b1)						\
+	(p)->r1 = _r1,(p)->g1 = _g1,(p)->b1 = _b1
+
+#define setRGB2(p,_r2,_g2,_b2)						\
+	(p)->r2 = _r2,(p)->g2 = _g2,(p)->b2 = _b2
+	
+#define setRGB3(p,_r3,_g3,_b3)						\
+	(p)->r3 = _r3,(p)->g3 = _g3,(p)->b3 = _b3
+	
+/*
+ * Set Primitive Screen Points
+ */
+#define setXY0(p,_x0,_y0)						\
+	(p)->x0 = (_x0), (p)->y0 = (_y0)				\
+
+#define setXY2(p,_x0,_y0,_x1,_y1)					\
+	(p)->x0 = (_x0), (p)->y0 = (_y0),				\
+	(p)->x1 = (_x1), (p)->y1 = (_y1)
+
+#define setXY3(p,_x0,_y0,_x1,_y1,_x2,_y2)				\
+	(p)->x0 = (_x0), (p)->y0 = (_y0),				\
+	(p)->x1 = (_x1), (p)->y1 = (_y1),				\
+	(p)->x2 = (_x2), (p)->y2 = (_y2)
+
+#define setXY4(p,_x0,_y0,_x1,_y1,_x2,_y2,_x3,_y3) 			\
+	(p)->x0 = (_x0), (p)->y0 = (_y0),				\
+	(p)->x1 = (_x1), (p)->y1 = (_y1),				\
+	(p)->x2 = (_x2), (p)->y2 = (_y2),				\
+	(p)->x3 = (_x3), (p)->y3 = (_y3)
+
+#define setXYWH(p,_x0,_y0,_w,_h)					\
+	(p)->x0 = (_x0),      (p)->y0 = (_y0),				\
+	(p)->x1 = (_x0)+(_w), (p)->y1 = (_y0),				\
+	(p)->x2 = (_x0),      (p)->y2 = (_y0)+(_h),			\
+	(p)->x3 = (_x0)+(_w), (p)->y3 = (_y0)+(_h)
+
+/*
+ * Set Primitive Width/Height
+ */
+#define setWH(p,_w,_h)	(p)->w = _w, (p)->h = _h
+
+/*
+ * Set Primitive Texture Points
+ */
+#define setUV0(p,_u0,_v0)						\
+	(p)->u0 = (_u0), (p)->v0 = (_v0)				\
+	
+#define setUV3(p,_u0,_v0,_u1,_v1,_u2,_v2)				\
+	(p)->u0 = (_u0), (p)->v0 = (_v0),				\
+	(p)->u1 = (_u1), (p)->v1 = (_v1),				\
+	(p)->u2 = (_u2), (p)->v2 = (_v2)
+	
+#define setUV4(p,_u0,_v0,_u1,_v1,_u2,_v2,_u3,_v3) 			\
+	(p)->u0 = (_u0), (p)->v0 = (_v0),				\
+	(p)->u1 = (_u1), (p)->v1 = (_v1),				\
+	(p)->u2 = (_u2), (p)->v2 = (_v2),				\
+	(p)->u3 = (_u3), (p)->v3 = (_v3)
+
+#define setUVWH(p,_u0,_v0,_w,_h)					\
+	(p)->u0 = (_u0),      (p)->v0 = (_v0),				\
+	(p)->u1 = (_u0)+(_w), (p)->v1 = (_v0),				\
+	(p)->u2 = (_u0),      (p)->v2 = (_v0)+(_h),			\
+	(p)->u3 = (_u0)+(_w), (p)->v3 = (_v0)+(_h)
+
+	
+/*
+ * Dump Primivie Parameters
+ */
+#define dumpRECT(r)	\
+	GPU_printf("(%d,%d)-(%d,%d)\n", (r)->x,(r)->y,(r)->w,(r)->h)
+
+#define dumpWH(p)	GPU_printf("(%d,%d)\n", (p)->w,  (p)->h ) 
+#define dumpXY0(p)	GPU_printf("(%d,%d)\n", (p)->x0, (p)->y0) 
+#define dumpUV0(p)	GPU_printf("(%d,%d)\n", (p)->u0, (p)->v0) 
+
+#define dumpXY2(p)							\
+	GPU_printf("(%d,%d)-(%d,%d)\n",					\
+	(p)->x0, (p)->y0, (p)->x1, (p)->y1)
+
+#define dumpXY3(p)							\
+	GPU_printf("(%d,%d)-(%d,%d)-(%d,%d)\n",				\
+	(p)->x0, (p)->y0, (p)->x1, (p)->y1,				\
+	(p)->x2, (p)->y2)
+
+#define dumpUV3(p)							\
+	GPU_printf("(%d,%d)-(%d,%d)-(%d,%d)\n",				\
+	(p)->u0, (p)->v0, (p)->u1, (p)->v1,				\
+	(p)->u2, (p)->v2)
+
+#define dumpXY4(p)							\
+	GPU_printf("(%d,%d)-(%d,%d)-(%d,%d)-(%d,%d)\n",			\
+	(p)->x0, (p)->y0, (p)->x1, (p)->y1,				\
+	(p)->x2, (p)->y2, (p)->x3, (p)->y3)
+
+#define dumpUV4(p)							\
+	GPU_printf("(%d,%d)-(%d,%d)-(%d,%d)-(%d,%d)\n",			\
+	(p)->u0, (p)->v0, (p)->u1, (p)->v1,				\
+	(p)->u2, (p)->v2, (p)->u3, (p)->v3)			
+
+#define dumpRGB0(p)							\
+	GPU_printf("(%3d,%3d,%3d)\n", (p)->r0, (p)->g0, (p)->b0) 	
+		   
+#define dumpRGB1(p)							\
+	GPU_printf("(%3d,%3d,%3d)\n", (p)->r1, (p)->g1, (p)->b1)	
+		   
+#define dumpRGB2(p)							\
+	GPU_printf("(%3d,%3d,%3d)\n", (p)->r2, (p)->g2, (p)->b2) 
+		   
+#define dumpRGB3(p)							\
+	GPU_printf("(%3d,%3d,%3d)\n", (p)->r3, (p)->g3, (p)->b3) 	
+
+/*
+ * Primitive Handling Macros
+ */
+#define setlen( p, _len) 	(((P_TAG *)(p))->len  = (u_char)(_len))
+#define setaddr(p, _addr)	(((P_TAG *)(p))->addr = (u_long)(_addr))
+#define setcode(p, _code)	(((P_TAG *)(p))->code = (u_char)(_code))
+
+#define getlen(p)    		(u_char)(((P_TAG *)(p))->len)
+#define getcode(p)   		(u_char)(((P_TAG *)(p))->code)
+#define getaddr(p)   		(u_long)(((P_TAG *)(p))->addr)
+
+#define nextPrim(p)  		(void *)((((P_TAG *)(p))->addr)|0x80000000)
+#define isendprim(p) 		((((P_TAG *)(p))->addr)==0xffffff)
+
+#define addPrim(ot, p)		setaddr(p, getaddr(ot)), setaddr(ot, p)
+#define addPrims(ot, p0, p1)	setaddr(p1, getaddr(ot)),setaddr(ot, p0)
+
+#define catPrim(p0, p1)		setaddr(p0, p1)
+#define termPrim(p)		setaddr(p, 0xffffffff)
+
+#define setSemiTrans(p, abe) \
+	((abe)?setcode(p, getcode(p)|0x02):setcode(p, getcode(p)&~0x02))
+
+#define setShadeTex(p, tge) \
+	((tge)?setcode(p, getcode(p)|0x01):setcode(p, getcode(p)&~0x01))
+
+#define getTPage(tp, abr, x, y) 					\
+	 ((((tp)&0x3)<<7)|(((abr)&0x3)<<5)|(((y)&0x100)>>4)|(((x)&0x3ff)>>6)| \
+	 (((y)&0x200)<<2))
+
+#define getClut(x, y) \
+	(((y)<<6)|(((x)>>4)&0x3f))
+
+#define dumpTPage(tpage)						\
+	GPU_printf("tpage: (%d,%d,%d,%d)\n",				\
+			   ((tpage)>>7)&0x003,((tpage)>>5)&0x003,	\
+			   ((tpage)<<6)&0x7c0,				\
+			   (((tpage)<<4)&0x100)+(((tpage)>>2)&0x200))
+
+#define dumpClut(clut) \
+	GPU_printf("clut: (%d,%d)\n", (clut&0x3f)<<4, (clut>>6))
+
+#define _get_mode(dfe, dtd, tpage)	\
+		((0xe1000000)|((dtd)?0x0200:0)| \
+		((dfe)?0x0400:0)|((tpage)&0x9ff))
+
+#define setDrawTPage(p, dfe, dtd, tpage)	\
+	setlen(p, 1),	\
+	((u_long *)(p))[1] = _get_mode(dfe, dtd, tpage)
+
+#define _get_tw(tw)	\
+		(tw ? ((0xe2000000)|((((tw)->y&0xff)>>3)<<15)| \
+		((((tw)->x&0xff)>>3)<<10)|(((~((tw)->h-1)&0xff)>>3)<<5)| \
+		(((~((tw)->w-1)&0xff)>>3))) : 0)
+
+#define setTexWindow(p, tw)			\
+	setlen(p, 2),				\
+	((u_long *)(p))[1] = _get_tw(tw),	\
+	((u_long *)(p))[2] = 0
+
+#define _get_len(rect)	\
+		(((rect)->w*(rect)->h+1)/2+4)
+
+#define setDrawLoad(pt, rect)					\
+	(_get_len(rect) <= 16) ? (				\
+		(setlen(pt, _get_len(rect))),			\
+		((pt)->code[0] = 0xa0000000),			\
+		((pt)->code[1] = *((u_long *)&(rect)->x)),	\
+		((pt)->code[2] = *((u_long *)&(rect)->w)),	\
+		((pt)->p[_get_len(rect)-4] = 0x01000000)	\
+	) : ( \
+		(setlen(pt,0)) \
+	)
+
+#define setDrawStp(p, pbw) 				\
+        setlen(p, 2),					\
+        ((u_long *)p)[1] = 0xe6000000|(pbw?0x01:0),	\
+        ((u_long *)p)[2] = 0
+
+#define setDrawMode(p, dfe, dtd, tpage, tw) 		\
+        setlen(p, 2),					\
+        ((u_long *)p)[1] = _get_mode(dfe, dtd, tpage),	\
+        ((u_long *)p)[2] = _get_tw((RECT *)tw)
+
+	
+/*	Primitive 	Lentgh		Code				*/
+/*--------------------------------------------------------------------	*/
+/*									*/
+#define setPolyF3(p)	setlen(p, 4),  setcode(p, 0x20)
+#define setPolyFT3(p)	setlen(p, 7),  setcode(p, 0x24)
+#define setPolyG3(p)	setlen(p, 6),  setcode(p, 0x30)
+#define setPolyGT3(p)	setlen(p, 9),  setcode(p, 0x34)
+#define setPolyF4(p)	setlen(p, 5),  setcode(p, 0x28)
+#define setPolyFT4(p)	setlen(p, 9),  setcode(p, 0x2c)
+#define setPolyG4(p)	setlen(p, 8),  setcode(p, 0x38)
+#define setPolyGT4(p)	setlen(p, 12), setcode(p, 0x3c)
+
+#define setSprt8(p)	setlen(p, 3),  setcode(p, 0x74)
+#define setSprt16(p)	setlen(p, 3),  setcode(p, 0x7c)
+#define setSprt(p)	setlen(p, 4),  setcode(p, 0x64)
+
+#define setTile1(p)	setlen(p, 2),  setcode(p, 0x68)
+#define setTile8(p)	setlen(p, 2),  setcode(p, 0x70)
+#define setTile16(p)	setlen(p, 2),  setcode(p, 0x78)
+#define setTile(p)	setlen(p, 3),  setcode(p, 0x60)
+#define setLineF2(p)	setlen(p, 3),  setcode(p, 0x40)
+#define setLineG2(p)	setlen(p, 4),  setcode(p, 0x50)
+#define setLineF3(p)	setlen(p, 5),  setcode(p, 0x48),(p)->pad = 0x55555555
+#define setLineG3(p)	setlen(p, 7),  setcode(p, 0x58),(p)->pad = 0x55555555, \
+			(p)->p2 = 0
+#define setLineF4(p)	setlen(p, 6),  setcode(p, 0x4c),(p)->pad = 0x55555555
+#define setLineG4(p)	setlen(p, 9),  setcode(p, 0x5c),(p)->pad = 0x55555555, \
+			(p)->p2 = 0, (p)->p3 = 0
+	
+/*
+ * Rectangle:
+ */
+typedef struct {
+	short x, y;		/* offset point on VRAM */
+	short w, h;		/* width and height */
+} RECT;
+
+typedef struct {
+	int x, y;		/* offset point on VRAM */
+	int w, h;		/* width and height */
+} RECT32;
+
+/*
+ * Environment 
+ */
+typedef struct {
+	u_long	tag;
+	u_long	code[15];
+} DR_ENV;				/* Packed Drawing Environment */
+	       
+typedef struct {
+	RECT	clip;		/* clip area */
+	short	ofs[2];		/* drawing offset */
+	RECT	tw;		/* texture window */
+	u_short tpage;		/* texture page */	
+	u_char	dtd;		/* dither flag (0:off, 1:on) */
+	u_char	dfe;		/* flag to draw on display area (0:off 1:on) */
+	u_char	isbg;		/* enable to auto-clear */
+	u_char	r0, g0, b0;	/* initital background color */
+	DR_ENV	dr_env;		/* reserved */
+} DRAWENV;
+	       
+typedef struct {
+	RECT	disp;		/* display area */
+	RECT	screen;		/* display start point */
+	u_char	isinter;	/* interlace 0: off 1: on */
+	u_char	isrgb24;	/* RGB24 bit mode */
+	u_char	pad0, pad1;	/* reserved */
+} DISPENV;
+
+/*
+ * Polygon Primitive Definitions
+ */
+typedef struct {
+	unsigned	addr: 24;
+	unsigned 	len:   8;
+	u_char		r0, g0, b0, code;
+} P_TAG;
+	
+typedef struct {
+	u_char	r0, g0, b0, code;
+} P_CODE;
+	
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	short	x1,	y1;
+	short	x2,	y2;
+} POLY_F3;				/* Flat Triangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	short	x1,	y1;
+	short	x2,	y2;
+	short	x3,	y3;
+} POLY_F4;				/* Flat Quadrangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+	short	x1,	y1;
+	u_char	u1, v1;	u_short	tpage;
+	short	x2,	y2;
+	u_char	u2, v2;	u_short	pad1;
+} POLY_FT3;				/* Flat Textured Triangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+	short	x1,	y1;
+	u_char	u1, v1;	u_short	tpage;
+	short	x2,	y2;
+	u_char	u2, v2;	u_short	pad1;
+	short	x3,	y3;
+	u_char	u3, v3;	u_short	pad2;
+} POLY_FT4;				/* Flat Textured Quadrangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	r1, g1, b1, pad1;
+	short	x1,	y1;
+	u_char	r2, g2, b2, pad2;
+	short	x2,	y2;
+} POLY_G3;				/* Gouraud Triangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	r1, g1, b1, pad1;
+	short	x1,	y1;
+	u_char	r2, g2, b2, pad2;
+	short	x2,	y2;
+	u_char	r3, g3, b3, pad3;
+	short	x3,	y3;
+} POLY_G4;				/* Gouraud Quadrangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+	u_char	r1, g1, b1, p1;
+	short	x1,	y1;
+	u_char	u1, v1;	u_short	tpage;
+	u_char	r2, g2, b2, p2;
+	short	x2,	y2;
+	u_char	u2, v2;	u_short	pad2;
+} POLY_GT3;				/* Gouraud Textured Triangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+	u_char	r1, g1, b1, p1;
+	short	x1,	y1;
+	u_char	u1, v1;	u_short	tpage;
+	u_char	r2, g2, b2, p2;
+	short	x2,	y2;
+	u_char	u2, v2;	u_short	pad2;
+	u_char	r3, g3, b3, p3;
+	short	x3,	y3;
+	u_char	u3, v3;	u_short	pad3;
+} POLY_GT4;				/* Gouraud Textured Quadrangle */
+
+/*
+ * Line Primitive Definitions
+ */
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	short	x1,	y1;
+} LINE_F2;				/* Unconnected Flat Line */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	r1, g1, b1, p1;
+	short	x1,	y1;
+} LINE_G2;				/* Unconnected Gouraud Line */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	short	x1,	y1;
+	short	x2,	y2;
+	u_long	pad;
+} LINE_F3;				/* 2 connected Flat Line */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	r1, g1, b1, p1;
+	short	x1,	y1;
+	u_char	r2, g2, b2, p2;
+	short	x2,	y2;
+	u_long	pad;
+} LINE_G3;				/* 2 connected Gouraud Line */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	short	x1,	y1;
+	short	x2,	y2;
+	short	x3,	y3;
+	u_long	pad;
+} LINE_F4;				/* 3 connected Flat Line Quadrangle */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	r1, g1, b1, p1;
+	short	x1,	y1;
+	u_char	r2, g2, b2, p2;
+	short	x2,	y2;
+	u_char	r3, g3, b3, p3;
+	short	x3,	y3;
+	u_long	pad;
+} LINE_G4;				/* 3 connected Gouraud Line */
+
+/*
+ * Sprite Primitive Definitions
+ */
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+	short	w,	h;
+} SPRT;					/* free size Sprite */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+} SPRT_16;				/* 16x16 Sprite */
+	       
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	u_char	u0, v0;	u_short	clut;
+} SPRT_8;				/* 8x8 Sprite */
+	       
+/*
+ * Tile Primitive Definitions
+ */
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+	short	w,	h;
+} TILE;					/* free size Tile */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+} TILE_16;				/* 16x16 Tile */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+} TILE_8;				/* 8x8 Tile */
+
+typedef struct {
+	u_long	tag;
+	u_char	r0, g0, b0, code;
+	short	x0, 	y0;
+} TILE_1;				/* 1x1 Tile */
+
+/*
+ *  Special Primitive Definitions
+ */
+typedef struct {
+	u_long	tag;
+	u_long	code[2];
+} DR_MODE;				/* Drawing Mode */
+
+typedef struct {
+	u_long	tag;
+	u_long	code[2];
+} DR_TWIN;				/* Texture Window */
+	       
+typedef struct {
+	u_long	tag;
+	u_long	code[2];
+} DR_AREA;				/* Drawing Area */
+	       
+typedef struct {
+	u_long	tag;
+	u_long	code[2];
+} DR_OFFSET;				/* Drawing Offset */
+	       
+typedef struct {			/* MoveImage */
+	u_long	tag;
+	u_long	code[5];
+} DR_MOVE;
+
+typedef struct {			/* LoadImage */
+	u_long	tag;
+	u_long	code[3];
+	u_long	p[13];
+} DR_LOAD;
+
+typedef	struct {
+	u_long	tag;
+	u_long	code[1];
+} DR_TPAGE;				/* Drawing TPage */
+
+typedef struct {
+        u_long  tag;
+        u_long  code[2];
+} DR_STP;                               /* Drawing STP */
+
+/*
+ *	Font Stream Parameters
+ */
+#define FNT_MAX_ID	8	/* max number of stream ID */
+#define FNT_MAX_SPRT	1024	/* max number of sprites in all streams */
+
+/*
+ *	Multi-purpose Sony-TMD primitive
+ */
+typedef struct {
+	u_long	id;	
+	u_char	r0, g0, b0, p0;		/* Color of vertex 0 */
+	u_char	r1, g1, b1, p1;		/* Color of vertex 1 */
+	u_char	r2, g2, b2, p2;		/* Color of vertex 2 */
+	u_char	r3, g3, b3, p3;		/* Color of vertex 3 */
+	u_short	tpage, clut;		/* texture page ID, clut ID */
+	u_char	u0, v0, u1, v1;		/* texture corner point */
+	u_char	u2, v2, u3, v3;
+	
+	/* independent vertex model */
+	SVECTOR	x0, x1, x2, x3;		/* 3D corner point */
+	SVECTOR	n0, n1, n2, n3;		/* 3D corner normal vector */
+	
+	/* Common vertex model */
+	SVECTOR	*v_ofs;			/* offset to vertex database */
+	SVECTOR	*n_ofs;			/* offset to normal database */
+	
+	u_short	vert0, vert1; 		/* index of vertex */
+	u_short	vert2, vert3;		
+	u_short	norm0, norm1; 		/* index of normal */
+	u_short	norm2, norm3;
+
+	
+} TMD_PRIM;
+
+/*
+ *	Multi-purpose TIM image
+ */
+typedef struct {
+	u_long  mode;		/* pixel mode */
+	RECT	*crect;		/* CLUT rectangle on frame buffer */
+	u_long	*caddr;		/* CLUT address on main memory */
+	RECT	*prect;		/* texture image rectangle on frame buffer */
+	u_long	*paddr;		/* texture image address on main memory */
+} TIM_IMAGE;
+	       
+/*
+ * Prototypes
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#ifndef _FNTPRINT_
+#define _FNTPRINT_
+extern int FntPrint(...);
+#endif /* _FNTPRINT_ */
+#ifndef _KANJIFNTPRINT_
+#define _KANJIFNTPRINT_
+extern int KanjiFntPrint(...);
+#endif /* _KANJIFNTPRINT_ */
+#else
+#ifndef _FNTPRINT_
+#define _FNTPRINT_
+extern int FntPrint();
+#endif /* _FNTPRINT_ */
+#ifndef _KANJIFNTPRINT_
+#define _KANJIFNTPRINT_
+extern int KanjiFntPrint();
+#endif /* _KANJIFNTPRINT_ */
+#endif
+	
+extern DISPENV *GetDispEnv(DISPENV *env);
+extern DISPENV *PutDispEnv(DISPENV *env);
+extern DISPENV *SetDefDispEnv(DISPENV *env, int x, int y, int w, int h);
+extern DRAWENV *GetDrawEnv(DRAWENV *env);
+extern DRAWENV *PutDrawEnv(DRAWENV *env);
+extern DRAWENV *SetDefDrawEnv(DRAWENV *env, int x, int y, int w, int h);
+extern TIM_IMAGE *ReadTIM(TIM_IMAGE *timimg);
+extern TMD_PRIM *ReadTMD(TMD_PRIM *tmdprim);
+extern int CheckPrim(char *s, u_long *p);
+extern int ClearImage(RECT *rect, u_char r, u_char g, u_char b);
+extern int ClearImage2(RECT *rect, u_char r, u_char g, u_char b);
+extern int DrawSync(int mode);
+extern int FntOpen(int x, int y, int w, int h, int isbg, int n);
+extern int GetGraphDebug(void) ;
+extern int GetTimSize(u_char *sjis);
+extern int IsEndPrim(void *p) ;
+extern int KanjiFntOpen(int x, int y, int w, int h, int dx, int dy, int cx, int cy, int isbg, int n);
+extern void KanjiFntClose(void);
+extern int Krom2Tim(u_char *sjis, u_long *taddr, int dx, int dy, int cdx, int cdy, u_int fg, u_int bg);
+extern int LoadImage(RECT *rect, u_long *p);
+extern int MargePrim(void *p0, void *p1);
+extern int MoveImage(RECT *rect, int x, int y);
+extern int OpenTIM(u_long *addr);
+extern int OpenTMD(u_long *tmd, int obj_no);
+extern int ResetGraph(int mode);
+extern int SetGraphDebug(int level);
+extern int StoreImage(RECT *rect, u_long *p);
+extern u_long *ClearOTag(u_long *ot, int n);
+extern u_long *ClearOTagR(u_long *ot, int n);
+extern u_long *FntFlush(int id);
+extern u_long *KanjiFntFlush(int id);
+extern u_long DrawSyncCallback(void (*func)(void));
+extern u_short GetClut(int x, int y) ;
+extern u_short GetTPage(int tp, int abr, int x, int y) ;
+extern u_short LoadClut(u_long *clut, int x, int y);
+extern u_short LoadClut2(u_long *clut, int x, int y);
+extern u_short LoadTPage(u_long *pix, int tp, int abr, int x, int y, int w, int h);
+extern void *NextPrim(void *p) ;
+extern void AddPrim(void *ot, void *p) ;
+extern void AddPrims(void *ot, void *p0, void *p1) ;
+extern void CatPrim(void *p0, void *p1) ;
+extern void DrawOTag(u_long *p);
+extern void DrawOTagIO(u_long *p);
+extern void DrawOTagEnv(u_long *p, DRAWENV *env);
+extern void DrawPrim(void *p);
+extern void DumpClut(u_short clut) ;
+extern void DumpDispEnv(DISPENV *env);
+extern void DumpDrawEnv(DRAWENV *env);
+extern void DumpOTag(u_long *p);
+extern void DumpTPage(u_short tpage) ;
+extern void FntLoad(int tx, int ty);
+extern void SetDispMask(int mask);
+extern void SetDrawArea(DR_AREA *p, RECT *r);
+extern void SetDrawEnv(DR_ENV *dr_env, DRAWENV *env);
+extern void SetDrawLoad(DR_LOAD *p, RECT *rect);
+extern void SetDrawMode(DR_MODE *p, int dfe, int dtd, int tpage, RECT *tw);
+extern void SetDrawTPage(DR_TPAGE *p, int dfe, int dtd, int tpage);
+extern void SetDrawMove(DR_MOVE *p, RECT *rect, int x, int y) ;
+extern void SetDrawOffset(DR_OFFSET *p, u_short *ofs);
+extern void SetDrawStp(DR_STP *p, int pbw);
+extern void SetDumpFnt(int id);
+extern void SetLineF2(LINE_F2 *p) ;
+extern void SetLineF3(LINE_F3 *p) ;
+extern void SetLineF4(LINE_F4 *p) ;
+extern void SetLineG2(LINE_G2 *p) ;
+extern void SetLineG3(LINE_G3 *p) ;
+extern void SetLineG4(LINE_G4 *p) ;
+extern void SetPolyF3(POLY_F3 *p) ;
+extern void SetPolyF4(POLY_F4 *p) ;
+extern void SetPolyFT3(POLY_FT3 *p) ;
+extern void SetPolyFT4(POLY_FT4 *p) ;
+extern void SetPolyG3(POLY_G3 *p) ;
+extern void SetPolyG4(POLY_G4 *p) ;
+extern void SetPolyGT3(POLY_GT3 *p) ;
+extern void SetPolyGT4(POLY_GT4 *p) ;
+extern void SetSemiTrans(void *p, int abe) ;
+extern void SetShadeTex(void *p, int tge) ;
+extern void SetSprt(SPRT *p) ;
+extern void SetSprt16(SPRT_16 *p) ;
+extern void SetSprt8(SPRT_8 *p) ;
+extern void SetTexWindow(DR_TWIN *p, RECT *tw);
+extern void SetTile(TILE *p) ;
+extern void SetTile1(TILE_1 *p) ;
+extern void SetTile16(TILE_16 *p) ;
+extern void SetTile8(TILE_8 *p) ;
+extern void TermPrim(void *p) ;
+extern u_long *BreakDraw(void);
+extern void ContinueDraw(u_long *insaddr, u_long *contaddr);
+extern int IsIdleGPU(int max_count);
+extern int GetODE(void);
+extern int LoadImage2(RECT *rect, u_long *p);
+extern int StoreImage2(RECT *rect, u_long *p);
+extern int MoveImage2(RECT *rect, int x, int y);
+extern int DrawOTag2(u_long *p);
+extern void GetDrawMode(DR_MODE *p);
+extern void GetTexWindow(DR_TWIN *p);
+extern void GetDrawArea(DR_AREA *p);
+extern void GetDrawOffset(DR_OFFSET *p);
+extern void GetDrawEnv2(DR_ENV *p);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBGPU_H_ */
diff --git a/tools/psyq/include/LIBGS.H b/tools/psyq/include/LIBGS.H
new file mode 100644
index 000000000..e40510f50
--- /dev/null
+++ b/tools/psyq/include/LIBGS.H
@@ -0,0 +1,1467 @@
+#ifndef _LIBGS_H_
+#define _LIBGS_H_
+
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/*
+ * libgs.h: Graphic Library Header 
+ *
+ *
+ * Version 1.**	Apr,  8, 1994 
+ *
+ * Copyright (C) 1993 by Sony Corporation All rights Reserved 
+ */
+
+#ifndef NULL
+#define NULL 0
+#endif
+
+/*** packet peripheral pointer ***/
+typedef unsigned char PACKET;
+
+#define PSBANK 0x80000000
+/*** --- Zsort resolution --- ***/
+#define ZRESOLUTION     0x3fff
+
+/*** --- coordinate keyword - ***/
+#define WORLD NULL
+#define SCREEN ((GsCOORDINATE2 *)0x0001)
+
+
+typedef struct {
+	VECTOR  scale;
+	SVECTOR rotate;
+	VECTOR  trans;
+}       GsCOORD2PARAM;
+
+typedef struct _GsCOORDINATE2 {
+	unsigned long flg;
+	MATRIX  coord;
+	MATRIX  workm;
+	GsCOORD2PARAM *param;
+	struct _GsCOORDINATE2 *super;
+	struct _GsCOORDINATE2 *sub;
+}       GsCOORDINATE2;
+
+typedef struct {
+	MATRIX  view;
+	GsCOORDINATE2 *super;
+}       GsVIEW2;
+
+typedef struct {
+	long    vpx, vpy, vpz;
+	long    vrx, vry, vrz;
+	long    rz;
+	GsCOORDINATE2 *super;
+}       GsRVIEW2;
+
+typedef struct {
+	int     vx, vy, vz;
+	unsigned char r, g, b;
+}       GsF_LIGHT;
+
+
+typedef struct {
+	unsigned p:24;
+	unsigned char num:8;
+}       GsOT_TAG;
+
+
+typedef struct {
+	unsigned long length;
+	GsOT_TAG *org;
+	unsigned long offset;
+	unsigned long point;
+	GsOT_TAG *tag;
+}       GsOT;
+
+typedef struct {
+	unsigned long attribute;/* pers,trans,rotate,disp */
+	GsCOORDINATE2 *coord2;	/* local dmatrix */
+	unsigned long *tmd;
+	unsigned long id;
+}       GsDOBJ2;
+
+typedef struct {
+	unsigned long attribute;/* pers,trans,rotate,disp */
+	GsCOORDINATE2 *coord2;	/* local dmatrix */
+	unsigned long *pmd;	/* pmd top address */
+	unsigned long *base;	/* object base address */
+	unsigned long *sv;	/* shared vertex base */
+	unsigned long id;
+}       GsDOBJ3;
+
+typedef struct {
+	unsigned long attribute;/* pers,trans,rotate,disp */
+	GsCOORDINATE2 *coord2;	/* local dmatrix */
+	unsigned long *tmd;
+	unsigned long id;
+}       GsDOBJ4;
+
+typedef struct {
+	unsigned long attribute;
+	GsCOORDINATE2 *coord2;
+	unsigned long *tmd;
+	unsigned long *packet;
+	unsigned long id;
+}       GsDOBJ5;
+
+typedef struct {
+	unsigned long attribute;
+	short   x, y;
+	unsigned short w, h;
+	unsigned short tpage;
+	unsigned char u, v;
+	short   cx, cy;
+	unsigned char r, g, b;
+	short   mx, my;
+	short   scalex, scaley;
+	long    rotate;
+}       GsSPRITE;
+
+typedef struct {
+	unsigned char u, v;
+	unsigned short cba;
+	unsigned short flag;
+	unsigned short tpage;
+}       GsCELL;
+
+typedef struct {
+	unsigned char cellw, cellh;
+	unsigned short ncellw, ncellh;
+	GsCELL *base;
+	unsigned short *index;
+}       GsMAP;
+
+typedef struct {
+	unsigned long attribute;
+	short   x, y;
+	short   w, h;
+	short   scrollx, scrolly;
+	unsigned char r, g, b;
+	GsMAP  *map;
+	short   mx, my;
+	short   scalex, scaley;
+	long    rotate;
+}       GsBG;
+
+typedef struct {
+	unsigned long attribute;
+	short   x0, y0;
+	short   x1, y1;
+	unsigned char r, g, b;
+}       GsLINE;
+
+typedef struct {
+	unsigned long attribute;
+	short   x0, y0;
+	short   x1, y1;
+	unsigned char r0, g0, b0;
+	unsigned char r1, g1, b1;
+}       GsGLINE;
+
+typedef struct {
+	unsigned long attribute;
+	short   x, y;
+	unsigned short w, h;
+	unsigned char r, g, b;
+}       GsBOXF;
+
+typedef struct {
+	short   dqa;
+	long    dqb;
+	unsigned char rfc, gfc, bfc;
+}       GsFOGPARAM;
+
+
+typedef struct {
+	unsigned long pmode;
+	short   px, py;
+	unsigned short pw, ph;
+	unsigned long *pixel;
+	short   cx, cy;
+	unsigned short cw, ch;
+	unsigned long *clut;
+}       GsIMAGE;
+
+typedef struct {
+	short   offx, offy;
+}       _GsPOSITION;
+
+typedef struct {
+	GsDOBJ2 *top;
+	int     nobj;
+	int     maxobj;
+}       GsOBJTABLE2;
+
+typedef struct {
+	PACKET
+	* (*f3[2][3]) ();
+	PACKET
+	* (*nf3[2]) ();
+	PACKET
+	* (*g3[2][3]) ();
+	PACKET
+	* (*ng3[2]) ();
+	PACKET
+	* (*tf3[2][3]) ();
+	PACKET
+	* (*ntf3[2]) ();
+	PACKET
+	* (*tg3[2][3]) ();
+	PACKET
+	* (*ntg3[2]) ();
+	PACKET
+	* (*f4[2][3]) ();
+	PACKET
+	* (*nf4[2]) ();
+	PACKET
+	* (*g4[2][3]) ();
+	PACKET
+	* (*ng4[2]) ();
+	PACKET
+	* (*tf4[2][3]) ();
+	PACKET
+	* (*ntf4[2]) ();
+	PACKET
+	* (*tg4[2][3]) ();
+	PACKET
+	* (*ntg4[2]) ();
+	PACKET
+	* (*f3g[3])();
+	PACKET
+	* (*g3g[3])();
+	PACKET
+	* (*f4g[3])();
+	PACKET
+	* (*g4g[3])();
+}       _GsFCALL;
+
+
+#define GsDivMODE_NDIV 0
+#define GsDivMODE_DIV  1
+#define GsLMODE_NORMAL 0
+#define GsLMODE_FOG    1
+#define GsLMODE_LOFF   2
+
+/*
+ * libgs macro 
+ */
+#define GsOFSGTE 0
+#define GsOFSGPU 4
+#define GsINTER  1
+#define GsNONINTER 0
+#define GsRESET0 0
+#define GsRESET3 (3<<4)
+
+/*
+ * object attribute set macro 
+ */
+#define GsLDIM0 0
+#define GsLDIM1 1
+#define GsLDIM2 2
+#define GsLDIM3 3
+#define GsLDIM4 4
+#define GsLDIM5 5
+#define GsLDIM6 6
+#define GsLDIM7 7
+#define GsFOG   (1<<3)
+#define GsMATE  (1<<4)
+#define GsLLMOD (1<<5)
+#define GsLOFF  (1<<6)
+#define GsZIGNR (1<<7)
+#define GsNBACKC (1<<8)
+#define GsDIV1   (1<<9)
+#define GsDIV2   (2<<9)
+#define GsDIV3   (3<<9)
+#define GsDIV4	 (4<<9)
+#define GsDIV5	 (5<<9)
+#define GsAZERO  (0<<28)
+#define GsAONE   (1<<28)
+#define GsATWO   (2<<28)
+#define GsATHREE (3<<28)
+#define GsALON   (1<<30)
+#define GsDOFF   (1<<31)
+/*
+ * BG/sprite attribute set macro 
+ */
+#define GsPERS   (1<<26)
+#define GsROTOFF (1<<27)
+
+#define GsIncFrame()  (PSDCNT++, PSDCNT= PSDCNT?PSDCNT:1, \
+                      (PSDIDX= (PSDIDX==0?1:0)))
+
+#define GsUpdateCoord()  (PSDCNT++, PSDCNT= PSDCNT?PSDCNT:1)
+
+#define GsSetAzwh(z,w,h)    GsADIVZ = (z),GsADIVW = (w),GsADIVH = (h);
+
+#define GsTMDFlagGRD	0x04
+
+/*
+ * FLIP macro for GsSort[Fast]SpriteB
+ */
+#define GsHFLIP		0x01
+#define GsVFLIP		0x02
+
+/*
+ * TMD structure 
+ */
+/*** GTE PACKET to-GPU command '<packet-name>.code' ***/
+#define GPU_COM_F3    0x20
+#define GPU_COM_TF3   0x24
+#define GPU_COM_G3    0x30
+#define GPU_COM_TG3   0x34
+
+#define GPU_COM_F4    0x28
+#define GPU_COM_TF4   0x2c
+#define GPU_COM_G4    0x38
+#define GPU_COM_TG4   0x3c
+
+#define GPU_COM_NF3   0x21
+#define GPU_COM_NTF3  0x25
+#define GPU_COM_NG3   0x31
+#define GPU_COM_NTG3  0x35
+
+#define GPU_COM_NF4   0x29
+#define GPU_COM_NTF4  0x2d
+#define GPU_COM_NG4   0x39
+#define GPU_COM_NTG4  0x3d
+
+
+/*** TMD structure ****/
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_short n0, v0;
+	u_short v1, v2;
+}       TMD_P_F3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_short n0, v0;
+	u_short n1, v1;
+	u_short n2, v2;
+}       TMD_P_G3;
+
+typedef struct {
+	u_char	out, in, dummy, cd;
+	u_char	r0, g0, b0, code;
+	u_char	r1, g1, b1, dummy1;
+	u_char	r2, g2, b2, dummy2;
+	u_short n0, v0;
+	u_short v1, v2;
+}       TMD_P_F3G;
+
+typedef struct {
+	u_char	out, in, dummy, cd;
+	u_char	r0, g0, b0, code;
+	u_char	r1, g1, b1, dummy1;
+	u_char	r2, g2, b2, dummy2;
+	u_short n0, v0;
+	u_short n1, v1;
+	u_short n2, v2;
+}       TMD_P_G3G;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_short v0, v1;
+	u_short v2, p;
+}       TMD_P_NF3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_char  r1, g1, b1, p1;
+	u_char  r2, g2, b2, p2;
+	u_short v0, v1;
+	u_short v2, p;
+}       TMD_P_NG3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_short n0, v0;
+	u_short v1, v2;
+	u_short v3, p;
+}       TMD_P_F4;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_short n0, v0;
+	u_short n1, v1;
+	u_short n2, v2;
+	u_short n3, v3;
+}       TMD_P_G4;
+
+typedef struct {
+	u_char	out, in, dummy, cd;
+	u_char	r0, g0, b0, code;
+	u_char	r1, g1, b1, dummy1;
+	u_char	r2, g2, b2, dummy2;
+	u_char	r3, g3, b3, dummy3;
+	u_short n0, v0;
+	u_short v1, v2;
+	u_short v3, dummy4;
+}       TMD_P_F4G;
+
+typedef struct {
+	u_char	out, in, dummy, cd;
+	u_char	r0, g0, b0, code;
+	u_char	r1, g1, b1, dummy1;
+	u_char	r2, g2, b2, dummy2;
+	u_char	r3, g3, b3, dummy3;
+	u_short n0, v0;
+	u_short n1, v1;
+	u_short n2, v2;
+	u_short n3, v3;
+}       TMD_P_G4G;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_short v0, v1;
+	u_short v2, v3;
+}       TMD_P_NF4;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  r0, g0, b0, code;
+	u_char  r1, g1, b1, p1;
+	u_char  r2, g2, b2, p2;
+	u_char  r3, g3, b3, p3;
+	u_short v0, v1;
+	u_short v2, v3;
+}       TMD_P_NG4;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p;
+	u_short n0, v0;
+	u_short v1, v2;
+}       TMD_P_TF3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p;
+	u_short n0, v0;
+	u_short n1, v1;
+	u_short n2, v2;
+}       TMD_P_TG3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p0;
+	u_char  r0, g0, b0, p1;
+	u_short v0, v1;
+	u_short v2, p2;
+}       TMD_P_TNF3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p0;
+	u_char  r0, g0, b0, p1;
+	u_char  r1, g1, b1, p2;
+	u_char  r2, g2, b2, p3;
+	u_short v0, v1;
+	u_short v2, p4;
+}       TMD_P_TNG3;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p0;
+	u_char  tu3, tv3;
+	u_short p1;
+	u_short n0, v0;
+	u_short v1, v2;
+	u_short v3, p2;
+}       TMD_P_TF4;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p0;
+	u_char  tu3, tv3;
+	u_short p1;
+	u_short n0, v0;
+	u_short n1, v1;
+	u_short n2, v2;
+	u_short n3, v3;
+}       TMD_P_TG4;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p0;
+	u_char  tu3, tv3;
+	u_short p1;
+	u_char  r0, g0, b0, p2;
+	u_short v0, v1;
+	u_short v2, v3;
+}       TMD_P_TNF4;
+
+typedef struct {
+	u_char  out, in, dummy, cd;
+	u_char  tu0, tv0;
+	u_short clut;
+	u_char  tu1, tv1;
+	u_short tpage;
+	u_char  tu2, tv2;
+	u_short p0;
+	u_char  tu3, tv3;
+	u_short p1;
+	u_char  r0, g0, b0, p2;
+	u_char  r1, g1, b1, p3;
+	u_char  r2, g2, b2, p4;
+	u_char  r3, g3, b3, p5;
+	u_short v0, v1;
+	u_short v2, v3;
+}       TMD_P_TNG4;
+
+struct TMD_STRUCT {
+	u_long *vertop;         /* vertex top address of TMD format */
+	u_long  vern;           /* the number of vertex of TMD format */
+	u_long *nortop;         /* normal top address of TMD format */
+	u_long  norn;           /* the number of normal of TMD format */
+	u_long *primtop;        /* primitive top address of TMD format */
+	u_long  primn;          /* the number of primitives of TMD format */
+	u_long  scale;          /* the scale factor of TMD format */
+};
+
+/*
+ * active sub divide structure 
+ *
+ */
+
+#define minmax4(x1,x2,x3,x4,x5,x6) x1>x2?(x6=x1,x5=x2):(x5=x1,x6=x2),\
+                                   x3>x6?x6=x3:x3<x5?x5=x3:0,\
+                                   x4>x6?x6=x4:x4<x5?x5=x4:0
+
+#define minmax3(x1,x2,x3,x4,x5)    x1>x2?(x5=x1,x4=x2):(x4=x1,x5=x2),\
+                                   x3>x5?x5=x3:x3<x4?x4=x3:0
+
+
+typedef struct {
+	short   vx, vy, vz;
+	u_char  tu, tv;
+}       VERT;
+
+typedef struct {
+	short   vx, vy, vz;
+	u_char  tu, tv;
+	CVECTOR col;
+}       VERTC;
+
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg0;		/* gte flag */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_FT4 si;		/* work packet */
+}       GsADIV_FT4;
+
+typedef struct {
+	VERT    vt[4];
+}       GsADIV_P_FT4;
+
+
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg0;		/* gte flag */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_GT4 si;		/* work packet */
+}       GsADIV_GT4;
+
+typedef struct {
+	VERTC   vt[4];
+}       GsADIV_P_GT4;
+
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg0;		/* gte flag */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_G4 si;		/* work packet */
+}       GsADIV_G4;
+
+typedef struct {
+	VERTC   vt[4];
+}       GsADIV_P_G4;
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg0;		/* gte flag */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_F4 si;		/* work packet */
+}       GsADIV_F4;
+
+typedef struct {
+	VERT    vt[4];
+}       GsADIV_P_F4;
+
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_FT3 si;		/* work packet */
+}       GsADIV_FT3;
+
+typedef struct {
+	VERT    vt[3];
+}       GsADIV_P_FT3;
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_GT3 si;		/* work packet */
+}       GsADIV_GT3;
+
+typedef struct {
+	VERTC   vt[3];
+}       GsADIV_P_GT3;
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_G3 si;		/* work packet */
+}       GsADIV_G3;
+
+typedef struct {
+	VERTC   vt[3];
+}       GsADIV_P_G3;
+
+typedef struct {
+	u_long  limit;		/* divide limit */
+	long    hwd, vwd;	/* dummy */
+	int     shift;		/* OT shift */
+	u_long *org;		/* OT org */
+	u_long *pk;		/* packet base */
+	long    otz;		/* gte otz */
+	long    adivz;		/* active divide codition z */
+	short   adivw, adivh;	/* active divide condition w,h */
+	long    flg;		/* gte flag */
+	short   minx, miny, maxx, maxy;	/* polygon min-max */
+	short   hwd0, vwd0;	/* resolution of screen */
+	u_long *tag;		/* work temprly for addPrim */
+	POLY_F3 si;		/* work packet */
+}       GsADIV_F3;
+
+typedef struct {
+	VERT    vt[3];
+}       GsADIV_P_F3;
+
+/*
+ * PROTOTYPE DIFINITIONS 
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern  "C" {
+#endif
+
+	void    GsInitGraph(unsigned short x, unsigned short y, unsigned short intmode,
+		              unsigned short dith, unsigned short varmmode);
+	void    GsInit3D(void);
+	void    GsMapModelingData(unsigned long *p);
+
+	void    GsSetProjection(long h);
+	int     GsSetFlatLight(int id, GsF_LIGHT * lt);
+	void    GsSetLightMode(int mode);
+	void    GsSetFogParam(GsFOGPARAM * fogparm);
+	void    GsSetAmbient(long r, long g, long b);
+	void    GsDrawOt(GsOT * ot);
+	void    GsSetWorkBase(PACKET * outpacketp);
+
+	void    GsSortObject3(GsDOBJ3 * objp, GsOT * ot, int shift);
+	void    GsSortObject4(GsDOBJ2 * objp, GsOT * ot, int shift, u_long * scratch);
+	void    GsSortObject5(GsDOBJ5 * objp, GsOT * ot, int shift, u_long * scratch);
+	void    GsSortObject5J(GsDOBJ5 * objp, GsOT * ot, int shift, u_long * scratch);
+
+	void    GsSortSprite(GsSPRITE * sp, GsOT * ot, unsigned short pri);
+	void    GsSortSpriteB(GsSPRITE * sp, GsOT * ot, unsigned short pri,
+				unsigned short flip);
+	void    GsSortFastSprite(GsSPRITE * sp, GsOT * ot, unsigned short pri);
+	void    GsSortFastSpriteB(GsSPRITE * sp, GsOT * ot, unsigned short pri,
+				unsigned short flip);
+	void    GsSortFlipSprite(GsSPRITE * sp, GsOT * ot, unsigned short pri);
+	void    GsSortBg(GsBG * bg, GsOT * ot, unsigned short pri);
+	void    GsSortFastBg(GsBG * bg, GsOT * ot, unsigned short pri);
+	void    GsInitFixBg16(GsBG * bg, u_long * work);
+	void    GsSortFixBg16(GsBG * bg, u_long * work, GsOT * otp, unsigned short pri);
+	void    GsInitFixBg32(GsBG * bg, u_long * work);
+	void    GsSortFixBg32(GsBG * bg, u_long * work, GsOT * otp, unsigned short pri);
+	void    GsSortLine(GsLINE * lp, GsOT * ot, unsigned short pri);
+	void    GsSortGLine(GsGLINE * lp, GsOT * ot, unsigned short pri);
+	void    GsSortBoxFill(GsBOXF * bp, GsOT * ot, unsigned short pri);
+	void    GsSortPoly(void *pp, GsOT * ot, unsigned short pri);
+
+	void    GsClearOt(unsigned short offset, unsigned short point, GsOT * otp);
+	GsOT   *GsSortOt(GsOT * ot_src, GsOT * ot_dest);
+	GsOT   *GsCutOt(GsOT * ot_src, GsOT * ot_dest);
+	void    GsDefDispBuff(unsigned short x0, unsigned short y0, unsigned short x1, unsigned short y1);
+	void    GsSortClear(unsigned char, unsigned char, unsigned char, GsOT *);
+	void    GsGetTimInfo(unsigned long *im, GsIMAGE * tim);
+	void    GsSwapDispBuff(void);
+	int     GsGetActiveBuff(void);
+	void    GsSetDrawBuffClip(void);
+	void    GsSetDrawBuffOffset(void);
+	void    GsSetClip(RECT * clip);
+	DRAWENV *GsSetClip2(RECT * clip);
+	void    GsSetOffset(long x, long y);
+	void    GsSetOrign(long x, long y);
+
+	void    GsInitCoordinate2(GsCOORDINATE2 * super, GsCOORDINATE2 * base);
+	void    GsMulCoord0(MATRIX * m1, MATRIX * m2, MATRIX * m3);
+	void    GsMulCoord2(MATRIX * m1, MATRIX * m2);
+	void    GsMulCoord3(MATRIX * m1, MATRIX * m2);
+	void    GsGetLw(GsCOORDINATE2 * m, MATRIX * out);
+	void    GsGetLs(GsCOORDINATE2 * m, MATRIX * out);
+	void    GsGetLws(GsCOORDINATE2 * m, MATRIX * outw, MATRIX * outs);
+
+	u_long  GsLinkObject3(unsigned long pmd_base, GsDOBJ3 * objp);
+	void    GsLinkObject4(unsigned long tmd_base, GsDOBJ2 * objp, int n);
+	void    GsLinkObject5(unsigned long tmd_base, GsDOBJ5 * objp, int n);
+
+	void    GsSetLightMatrix(MATRIX * mp);
+	void    GsSetLightMatrix2(MATRIX * mp);
+	int     GsSetRefView2(GsRVIEW2 * pv);
+	int     GsSetRefView2L(GsRVIEW2 * pv);
+	int     GsSetView2(GsVIEW2 * pv);
+	void    GsSetLsMatrix(MATRIX * mp);
+	void    GsSetClip2D(RECT * rectp);
+	void    GsInitVcount();
+	long    GsGetVcount();
+	void    GsClearVcount();
+	void	GsDefDispBuff2(u_short x0, u_short y0, u_short x1, u_short y1);
+	void	GsDrawOtIO(GsOT *ot);
+	PACKET *GsGetWorkBase();
+	void	GsInitGraph2( u_short x, u_short y, u_short intmode, u_short dith, u_short vrammode);
+	void	GsSortObject4J(GsDOBJ2 *objp, GsOT *otp, int shift, u_long *scratch);
+	void    GsClearDispArea(unsigned char r, unsigned char g, unsigned char b);
+
+	u_long *GsPresetObject(GsDOBJ5 * objp, u_long * base_addr);
+	void    GsScaleScreen(SVECTOR * scale);
+
+	PACKET *GsA4divF3L(TMD_P_F3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divF3LFG(TMD_P_F3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divF3NL(TMD_P_F3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divNF3(TMD_P_NF3 * op, VERT * vp, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divF4L(TMD_P_F4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divF4LFG(TMD_P_F4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divF4NL(TMD_P_F4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divNF4(TMD_P_NF4 * op, VERT * vp, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divG3L(TMD_P_G3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divG3LFG(TMD_P_G3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divG3NL(TMD_P_G3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divNG3(TMD_P_NG3 * op, VERT * vp, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divG4L(TMD_P_G4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divG4LFG(TMD_P_G4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divG4NL(TMD_P_G4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divNG4(TMD_P_NG4 * op, VERT * vp, PACKET * pk, int n,
+			           int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF3L(TMD_P_TF3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF3LFG(TMD_P_TF3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF3NL(TMD_P_TF3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTNF3(TMD_P_TNF3 * op, VERT * vp, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF4L(TMD_P_TF4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF4LFG(TMD_P_TF4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF4NL(TMD_P_TF4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTNF4(TMD_P_TNF4 * op, VERT * vp, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF4LM(TMD_P_TF4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF4LFGM(TMD_P_TF4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTF4NLM(TMD_P_TF4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTNF4M(TMD_P_TNF4 * op, VERT * vp, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG3L(TMD_P_TG3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG3LFG(TMD_P_TG3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG3NL(TMD_P_TG3 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTNG3(TMD_P_TNG3 * op, VERT * vp, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG4L(TMD_P_TG4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG4LFG(TMD_P_TG4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG4NL(TMD_P_TG4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTNG4(TMD_P_TNG4 * op, VERT * vp, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG4LM(TMD_P_TG4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG4LFGM(TMD_P_TG4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTG4NLM(TMD_P_TG4 * op, VERT * vp, VERT * np, PACKET * pk, int n,
+			             int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsA4divTNG4M(TMD_P_TNG4 * op, VERT * vp, PACKET * pk, int n,
+			            int shift, GsOT * ot, u_long * scratch);
+	PACKET *GsTMDfastF3GL(TMD_P_F3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF3GLFG(TMD_P_F3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF3GNL(TMD_P_F3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG3GL(TMD_P_G3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG3GLFG(TMD_P_G3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG3GNL(TMD_P_G3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsPrstF3GL(TMD_P_F3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsPrstF3GLFG(TMD_P_F3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsPrstF3GNL(TMD_P_F3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsPrstG3GL(TMD_P_G3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsPrstG3GLFG(TMD_P_G3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsPrstG3GNL(TMD_P_G3G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG3M(TMD_P_G3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG3MFG(TMD_P_G3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTG3M(TMD_P_TG3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTG3MFG(TMD_P_TG3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF4GL(TMD_P_F4G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF4GLFG(TMD_P_F4G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF4GNL(TMD_P_F4G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG4GL(TMD_P_G4G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG4GLFG(TMD_P_G4G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG4GNL(TMD_P_G4G *op, VERT *vp, VERT *np, PACKET *pk,
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG4M(TMD_P_G4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastG4MFG(TMD_P_G4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTG4M(TMD_P_TG4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTG4MFG(TMD_P_TG4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF3M(TMD_P_F3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF3MFG(TMD_P_F3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTF3M(TMD_P_TF3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTF3MFG(TMD_P_TF3 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF4M(TMD_P_F4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastF4MFG(TMD_P_F4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTF4M(TMD_P_TF4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+	PACKET *GsTMDfastTF4MFG(TMD_P_TF4 *op, VERT *vp, VERT *np, PACKET *pk, 
+						int n, int shift, GsOT *ot, u_long *scratch);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+
+
+/* EXTERN */
+extern RECT CLIP2;		/* clipping area */
+extern short PSDBASEX[2], PSDBASEY[2];	/* double buffer base */
+extern short PSDIDX;		/* double buffer index */
+extern u_long PSDCNT;		/* frame counter for using matrix cache */
+extern _GsPOSITION POSITION;	/* 2d offset */
+extern DRAWENV GsDRAWENV;	/* DRAWENV of Gs */
+extern DISPENV GsDISPENV;	/* DISPENV of Gs */
+extern MATRIX GsWSMATRIX;	/* Current World-Screen Matrix of Gs */
+extern MATRIX GsWSMATRIX_ORG;	/* Original World-Screen Matrix of Gs */
+extern long HWD0, VWD0;		/* rezolution of Holyzontal and Vertical */
+extern MATRIX GsLIGHTWSMATRIX;	/* World-Screen Light Matrix of Gs */
+extern MATRIX GsIDMATRIX;	/* Unit Matrix */
+extern MATRIX GsIDMATRIX2;	/* Unit Matrix including Aspect retio */
+extern PACKET *GsOUT_PACKET_P;	/* Work Base pointer */
+extern long GsADIVZ;		/* Active sub divide condition (z) */
+extern short GsADIVW, GsADIVH;	/* Active sub divide condition (w,h) */
+extern int GsLIGHT_MODE;	/* lighting mode global */
+extern u_long GsMATE_C, GsLMODE, GsLIGNR, GsLIOFF, GsZOVER, GsBACKC, GsNDIV;
+extern u_long GsTRATE, GsTON, GsDISPON;
+
+
+#if 0
+extern _GsFCALL GsFCALL5;	/* GsSortObject5J Func Table */
+/* hook only functions to use */
+jt_init5()
+{				/* GsSortObject5J Hook Func */
+	PACKET *GsPrstF3NL(), *GsPrstF3LFG(), *GsPrstF3L(), *GsPrstNF3();
+	PACKET *GsTMDdivF3NL(), *GsTMDdivF3LFG(), *GsTMDdivF3L(), *GsTMDdivNF3();
+	PACKET *GsPrstG3NL(), *GsPrstG3LFG(), *GsPrstG3L(), *GsPrstNG3();
+	PACKET *GsTMDdivG3NL(), *GsTMDdivG3LFG(), *GsTMDdivG3L(), *GsTMDdivNG3();
+	PACKET *GsPrstTF3NL(), *GsPrstTF3LFG(), *GsPrstTF3L(), *GsPrstTNF3();
+	PACKET *GsTMDdivTF3NL(), *GsTMDdivTF3LFG(), *GsTMDdivTF3L(),*GsTMDdivTNF3();
+	PACKET *GsPrstTG3NL(), *GsPrstTG3LFG(), *GsPrstTG3L(), *GsPrstTNG3();
+	PACKET *GsTMDdivTG3NL(), *GsTMDdivTG3LFG(), *GsTMDdivTG3L(),*GsTMDdivTNG3();
+	PACKET *GsPrstF4NL(), *GsPrstF4LFG(), *GsPrstF4L(), *GsPrstNF4();
+	PACKET *GsTMDdivF4NL(), *GsTMDdivF4LFG(), *GsTMDdivF4L(), *GsTMDdivNF4();
+	PACKET *GsPrstG4NL(), *GsPrstG4LFG(), *GsPrstG4L(), *GsPrstNG4();
+	PACKET *GsTMDdivG4NL(), *GsTMDdivG4LFG(), *GsTMDdivG4L(), *GsTMDdivNG4();
+	PACKET *GsPrstTF4NL(), *GsPrstTF4LFG(), *GsPrstTF4L(), *GsPrstTNF4();
+	PACKET *GsTMDdivTF4NL(), *GsTMDdivTF4LFG(), *GsTMDdivTF4L(),*GsTMDdivTNF4();
+	PACKET *GsPrstTG4NL(), *GsPrstTG4LFG(), *GsPrstTG4L(), *GsPrstTNG4();
+	PACKET *GsTMDdivTG4NL(), *GsTMDdivTG4LFG(), *GsTMDdivTG4L(),*GsTMDdivTNG4();
+	PACKET *GsPrstF3GNL(), *GsPrstF3GLFG(), *GsPrstF3GL();
+	PACKET *GsPrstG3GNL(), *GsPrstG3GLFG(), *GsPrstG3GL();
+
+	/* flat triangle */
+	GsFCALL5.f3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstF3L;
+	GsFCALL5.f3[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstF3LFG;
+	GsFCALL5.f3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstF3NL;
+	GsFCALL5.f3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivF3L;
+	GsFCALL5.f3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivF3LFG;
+	GsFCALL5.f3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivF3NL;
+	GsFCALL5.nf3[GsDivMODE_NDIV] = GsPrstNF3;
+	GsFCALL5.nf3[GsDivMODE_DIV] = GsTMDdivNF3;
+	/* gour triangle */
+	GsFCALL5.g3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstG3L;
+	GsFCALL5.g3[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstG3LFG;
+	GsFCALL5.g3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstG3NL;
+	GsFCALL5.g3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivG3L;
+	GsFCALL5.g3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivG3LFG;
+	GsFCALL5.g3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivG3NL;
+	GsFCALL5.ng3[GsDivMODE_NDIV] = GsPrstNG3;
+	GsFCALL5.ng3[GsDivMODE_DIV] = GsTMDdivNG3;
+	/* texture flat triangle */
+	GsFCALL5.tf3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstTF3L;
+	GsFCALL5.tf3[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstTF3LFG;
+	GsFCALL5.tf3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstTF3NL;
+	GsFCALL5.tf3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTF3L;
+	GsFCALL5.tf3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTF3LFG;
+	GsFCALL5.tf3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTF3NL;
+	GsFCALL5.ntf3[GsDivMODE_NDIV] = GsPrstTNF3;
+	GsFCALL5.ntf3[GsDivMODE_DIV] = GsTMDdivTNF3;
+	/* texture gour triangle */
+	GsFCALL5.tg3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstTG3L;
+	GsFCALL5.tg3[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstTG3LFG;
+	GsFCALL5.tg3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstTG3NL;
+	GsFCALL5.tg3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTG3L;
+	GsFCALL5.tg3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTG3LFG;
+	GsFCALL5.tg3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTG3NL;
+	GsFCALL5.ntg3[GsDivMODE_NDIV] = GsPrstTNG3;
+	GsFCALL5.ntg3[GsDivMODE_DIV] = GsTMDdivTNG3;
+	/* flat quad */
+	GsFCALL5.f4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstF4L;
+	GsFCALL5.f4[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstF4LFG;
+	GsFCALL5.f4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstF4NL;
+	GsFCALL5.f4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivF4L;
+	GsFCALL5.f4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivF4LFG;
+	GsFCALL5.f4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivF4NL;
+	GsFCALL5.nf4[GsDivMODE_NDIV] = GsPrstNF4;
+	GsFCALL5.nf4[GsDivMODE_DIV] = GsTMDdivNF4;
+	/* gour quad */
+	GsFCALL5.g4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstG4L;
+	GsFCALL5.g4[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstG4LFG;
+	GsFCALL5.g4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstG4NL;
+	GsFCALL5.g4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivG4L;
+	GsFCALL5.g4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivG4LFG;
+	GsFCALL5.g4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivG4NL;
+	GsFCALL5.ng4[GsDivMODE_NDIV] = GsPrstNG4;
+	GsFCALL5.ng4[GsDivMODE_DIV] = GsTMDdivNG4;
+	/* texture flat quad */
+	GsFCALL5.tf4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstTF4L;
+	GsFCALL5.tf4[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstTF4LFG;
+	GsFCALL5.tf4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstTF4NL;
+	GsFCALL5.tf4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTF4L;
+	GsFCALL5.tf4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTF4LFG;
+	GsFCALL5.tf4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTF4NL;
+	GsFCALL5.ntf4[GsDivMODE_NDIV] = GsPrstTNF4;
+	GsFCALL5.ntf4[GsDivMODE_DIV] = GsTMDdivTNF4;
+	/* texture gour quad */
+	GsFCALL5.tg4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsPrstTG4L;
+	GsFCALL5.tg4[GsDivMODE_NDIV][GsLMODE_FOG] = GsPrstTG4LFG;
+	GsFCALL5.tg4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsPrstTG4NL;
+	GsFCALL5.tg4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTG4L;
+	GsFCALL5.tg4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTG4LFG;
+	GsFCALL5.tg4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTG4NL;
+	GsFCALL5.ntg4[GsDivMODE_NDIV] = GsPrstTNG4;
+	GsFCALL5.ntg4[GsDivMODE_DIV] = GsTMDdivTNG4;
+	/* gradation triangle */
+	GsFCALL5.f3g[GsLMODE_NORMAL] = GsPrstF3GL;
+	GsFCALL5.f3g[GsLMODE_FOG] = GsPrstF3GLFG;
+	GsFCALL5.f3g[GsLMODE_LOFF] = GsPrstF3GNL;
+	GsFCALL5.g3g[GsLMODE_NORMAL] = GsPrstG3GL;
+	GsFCALL5.g3g[GsLMODE_FOG] = GsPrstG3GLFG;
+	GsFCALL5.g3g[GsLMODE_LOFF] = GsPrstG3GNL;
+}
+#endif
+
+#if 0
+extern _GsFCALL GsFCALL4;	/* GsSortObject4J Func Table */
+/* hook only functions to use*/
+jt_init4()
+{				/* GsSortObject4J Hook Func */
+	PACKET *GsTMDfastF3NL(), *GsTMDfastF3LFG(), *GsTMDfastF3L(),*GsTMDfastNF3();
+	PACKET *GsTMDdivF3NL(), *GsTMDdivF3LFG(), *GsTMDdivF3L(), *GsTMDdivNF3();
+	PACKET *GsTMDfastG3NL(), *GsTMDfastG3LFG(), *GsTMDfastG3L(),*GsTMDfastNG3();
+	PACKET *GsTMDdivG3NL(), *GsTMDdivG3LFG(), *GsTMDdivG3L(), *GsTMDdivNG3();
+	PACKET *GsTMDfastTF3NL(), *GsTMDfastTF3LFG(), *GsTMDfastTF3L(), *GsTMDfastTNF3();
+	PACKET *GsTMDdivTF3NL(), *GsTMDdivTF3LFG(), *GsTMDdivTF3L(), *GsTMDdivTNF3();
+	PACKET *GsTMDfastTG3NL(), *GsTMDfastTG3LFG(), *GsTMDfastTG3L(), *GsTMDfastTNG3();
+	PACKET *GsTMDdivTG3NL(), *GsTMDdivTG3LFG(), *GsTMDdivTG3L(), *GsTMDdivTNG3();
+	PACKET *GsTMDfastF4NL(), *GsTMDfastF4LFG(), *GsTMDfastF4L(), *GsTMDfastNF4();
+	PACKET *GsTMDdivF4NL(), *GsTMDdivF4LFG(), *GsTMDdivF4L(), *GsTMDdivNF4();
+	PACKET *GsTMDfastG4NL(), *GsTMDfastG4LFG(), *GsTMDfastG4L(), *GsTMDfastNG4();
+	PACKET *GsTMDdivG4NL(), *GsTMDdivG4LFG(), *GsTMDdivG4L(), *GsTMDdivNG4();
+	PACKET *GsTMDfastTF4NL(), *GsTMDfastTF4LFG(), *GsTMDfastTF4L(), *GsTMDfastTNF4();
+	PACKET *GsTMDdivTF4NL(), *GsTMDdivTF4LFG(), *GsTMDdivTF4L(), *GsTMDdivTNF4();
+	PACKET *GsTMDfastTG4NL(), *GsTMDfastTG4LFG(), *GsTMDfastTG4L(), *GsTMDfastTNG4();
+	PACKET *GsTMDdivTG4NL(), *GsTMDdivTG4LFG(), *GsTMDdivTG4L(), *GsTMDdivTNG4();
+
+	/* flat triangle */
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastF3L;
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastF3LFG;
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastF3NL;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivF3L;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivF3LFG;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivF3NL;
+	GsFCALL4.nf3[GsDivMODE_NDIV] = GsTMDfastNF3;
+	GsFCALL4.nf3[GsDivMODE_DIV] = GsTMDdivNF3;
+	/* gour triangle */
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastG3L;
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastG3LFG;
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastG3NL;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivG3L;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivG3LFG;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivG3NL;
+	GsFCALL4.ng3[GsDivMODE_NDIV] = GsTMDfastNG3;
+	GsFCALL4.ng3[GsDivMODE_DIV] = GsTMDdivNG3;
+	/* texture flat triangle */
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTF3L;
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTF3LFG;
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTF3NL;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTF3L;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTF3LFG;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTF3NL;
+	GsFCALL4.ntf3[GsDivMODE_NDIV] = GsTMDfastTNF3;
+	GsFCALL4.ntf3[GsDivMODE_DIV] = GsTMDdivTNF3;
+	/* texture gour triangle */
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTG3L;
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTG3LFG;
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTG3NL;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTG3L;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTG3LFG;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTG3NL;
+	GsFCALL4.ntg3[GsDivMODE_NDIV] = GsTMDfastTNG3;
+	GsFCALL4.ntg3[GsDivMODE_DIV] = GsTMDdivTNG3;
+	/* flat quad */
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastF4L;
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastF4LFG;
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastF4NL;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivF4L;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivF4LFG;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivF4NL;
+	GsFCALL4.nf4[GsDivMODE_NDIV] = GsTMDfastNF4;
+	GsFCALL4.nf4[GsDivMODE_DIV] = GsTMDdivNF4;
+	/* gour quad */
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastG4L;
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastG4LFG;
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastG4NL;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivG4L;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivG4LFG;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivG4NL;
+	GsFCALL4.ng4[GsDivMODE_NDIV] = GsTMDfastNG4;
+	GsFCALL4.ng4[GsDivMODE_DIV] = GsTMDdivNG4;
+	/* texture flat quad */
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTF4L;
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTF4LFG;
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTF4NL;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTF4L;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTF4LFG;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTF4NL;
+	GsFCALL4.ntf4[GsDivMODE_NDIV] = GsTMDfastTNF4;
+	GsFCALL4.ntf4[GsDivMODE_DIV] = GsTMDdivTNF4;
+	/* texture gour quad */
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTG4L;
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTG4LFG;
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTG4NL;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTG4L;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTG4LFG;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTG4NL;
+	GsFCALL4.ntg4[GsDivMODE_NDIV] = GsTMDfastTNG4;
+	GsFCALL4.ntg4[GsDivMODE_DIV] = GsTMDdivTNG4;
+	/* gradation  triangle */
+	GsFCALL4.f3g[GsLMODE_NORMAL] = GsTMDfastF3GL;
+	GsFCALL4.f3g[GsLMODE_FOG] = GsTMDfastF3GLFG;
+	GsFCALL4.f3g[GsLMODE_LOFF] = GsTMDfastF3GNL;
+	GsFCALL4.g3g[GsLMODE_NORMAL] = GsTMDfastG3GL;
+	GsFCALL4.g3g[GsLMODE_FOG] = GsTMDfastG3GLFG;
+	GsFCALL4.g3g[GsLMODE_LOFF] = GsTMDfastG3GNL;
+	/* gradation  quad */
+	GsFCALL4.f4g[GsLMODE_NORMAL] = GsTMDfastF4GL;
+	GsFCALL4.f4g[GsLMODE_FOG] = GsTMDfastF4GLFG;
+	GsFCALL4.f4g[GsLMODE_LOFF] = GsTMDfastF4GNL;
+	GsFCALL4.g4g[GsLMODE_NORMAL] = GsTMDfastG4GL;
+	GsFCALL4.g4g[GsLMODE_FOG] = GsTMDfastG4GLFG;
+	GsFCALL4.g4g[GsLMODE_LOFF] = GsTMDfastG4GNL;
+}
+#endif
+
+#if 0
+extern _GsFCALL GsFCALL4;	/* GsSortObject4J Func Table */
+jt_init4()
+{				/* Gs SortObject4J Active sub divide Func */
+	PACKET *GsTMDfastF3NL(), *GsTMDfastF3LFG(), *GsTMDfastF3L(), *GsTMDfastNF3();
+	PACKET *GsA4divF3NL(), *GsA4divF3LFG(), *GsA4divF3L(), *GsA4divNF3();
+	PACKET *GsTMDfastG3NL(), *GsTMDfastG3LFG(), *GsTMDfastG3L(), *GsTMDfastNG3();
+	PACKET *GsA4divG3NL(), *GsA4divG3LFG(), *GsA4divG3L(), *GsA4divNG3();
+	PACKET *GsTMDfastTF3NL(), *GsTMDfastTF3LFG(), *GsTMDfastTF3L(), *GsTMDfastTNF3();
+	PACKET *GsA4divTF3NL(), *GsA4divTF3LFG(), *GsA4divTF3L(), *GsA4divTNF3();
+	PACKET *GsTMDfastTG3NL(), *GsTMDfastTG3LFG(), *GsTMDfastTG3L(), *GsTMDfastTNG3();
+	PACKET *GsA4divTG3NL(), *GsA4divTG3LFG(), *GsA4divTG3L(), *GsA4divTNG3();
+	PACKET *GsTMDfastF4NL(), *GsTMDfastF4LFG(), *GsTMDfastF4L(), *GsTMDfastNF4();
+	PACKET *GsA4divF4NL(), *GsA4divF4LFG(), *GsA4divF4L(), *GsA4divNF4();
+	PACKET *GsTMDfastG4NL(), *GsTMDfastG4LFG(), *GsTMDfastG4L(), *GsTMDfastNG4();
+	PACKET *GsA4divG4NL(), *GsA4divG4LFG(), *GsA4divG4L(), *GsA4divNG4();
+	PACKET *GsTMDfastTF4NL(), *GsTMDfastTF4LFG(), *GsTMDfastTF4L(), *GsTMDfastTNF4();
+	PACKET *GsA4divTF4NL(), *GsA4divTF4LFG(), *GsA4divTF4L(), *GsA4divTNF4();
+	PACKET *GsTMDfastTG4NL(), *GsTMDfastTG4LFG(), *GsTMDfastTG4L(), *GsTMDfastTNG4();
+	PACKET *GsA4divTG4NL(), *GsA4divTG4LFG(), *GsA4divTG4L(), *GsA4divTNG4();
+	PACKET *GsA4divTF4L();
+
+	/* flat triangle */
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastF3L;
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastF3LFG;
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastF3NL;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divF3L;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divF3LFG;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divF3NL;
+	GsFCALL4.nf3[GsDivMODE_NDIV] = GsTMDfastNF3;
+	GsFCALL4.nf3[GsDivMODE_DIV] = GsA4divNF3;
+	/* gour triangle */
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastG3L;
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastG3LFG;
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastG3NL;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divG3L;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divG3LFG;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divG3NL;
+	GsFCALL4.ng3[GsDivMODE_NDIV] = GsTMDfastNG3;
+	GsFCALL4.ng3[GsDivMODE_DIV] = GsA4divNG3;
+	/* texture flat triangle */
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTF3L;
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTF3LFG;
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTF3NL;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divTF3L;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divTF3LFG;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divTF3NL;
+	GsFCALL4.ntf3[GsDivMODE_NDIV] = GsTMDfastTNF3;
+	GsFCALL4.ntf3[GsDivMODE_DIV] = GsA4divTNF3;
+	/* texture gour triangle */
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTG3L;
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTG3LFG;
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTG3NL;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divTG3L;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divTG3LFG;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divTG3NL;
+	GsFCALL4.ntg3[GsDivMODE_NDIV] = GsTMDfastTNG3;
+	GsFCALL4.ntg3[GsDivMODE_DIV] = GsA4divTNG3;
+	/* flat quad */
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastF4L;
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastF4LFG;
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastF4NL;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divF4L;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divF4LFG;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divF4NL;
+	GsFCALL4.nf4[GsDivMODE_NDIV] = GsTMDfastNF4;
+	GsFCALL4.nf4[GsDivMODE_DIV] = GsA4divNF4;
+	/* gour quad */
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastG4L;
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastG4LFG;
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastG4NL;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divG4L;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divG4LFG;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divG4NL;
+	GsFCALL4.ng4[GsDivMODE_NDIV] = GsTMDfastNG4;
+	GsFCALL4.ng4[GsDivMODE_DIV] = GsA4divNG4;
+	/* texture flat quad */
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTF4L;
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTF4LFG;
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTF4NL;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divTF4L;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divTF4LFG;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divTF4NL;
+	GsFCALL4.ntf4[GsDivMODE_NDIV] = GsTMDfastTNF4;
+	GsFCALL4.ntf4[GsDivMODE_DIV] = GsA4divTNF4;
+	/* texture gour quad */
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTG4L;
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTG4LFG;
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTG4NL;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsA4divTG4L;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_FOG] = GsA4divTG4LFG;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_LOFF] = GsA4divTG4NL;
+	GsFCALL4.ntg4[GsDivMODE_NDIV] = GsTMDfastTNG4;
+	GsFCALL4.ntg4[GsDivMODE_DIV] = GsA4divTNG4;
+	/* gradation triangle */
+	GsFCALL4.f3g[GsLMODE_NORMAL] = GsTMDfastF3GL;
+	GsFCALL4.f3g[GsLMODE_FOG] = GsTMDfastF3GLFG;
+	GsFCALL4.f3g[GsLMODE_LOFF] = GsTMDfastF3GNL;
+	GsFCALL4.g3g[GsLMODE_NORMAL] = GsTMDfastG3GL;
+	GsFCALL4.g3g[GsLMODE_FOG] = GsTMDfastG3GLFG;
+	GsFCALL4.g3g[GsLMODE_LOFF] = GsTMDfastG3GNL;
+	/* gradation  quad */
+	GsFCALL4.f4g[GsLMODE_NORMAL] = GsTMDfastF4GL;
+	GsFCALL4.f4g[GsLMODE_FOG] = GsTMDfastF4GLFG;
+	GsFCALL4.f4g[GsLMODE_LOFF] = GsTMDfastF4GNL;
+	GsFCALL4.g4g[GsLMODE_NORMAL] = GsTMDfastG4GL;
+	GsFCALL4.g4g[GsLMODE_FOG] = GsTMDfastG4GLFG;
+	GsFCALL4.g4g[GsLMODE_LOFF] = GsTMDfastG4GNL;
+}
+#endif
+
+#if 0
+extern _GsFCALL GsFCALL4;	/* GsSortObject4J Func Table */
+/* hook only functions to use */
+jt_init4()
+{				/* GsSortObject4J Hook Func (for material attenuation)*/
+	PACKET *GsTMDfastF3NL(), *GsTMDfastF3MFG(), *GsTMDfastF3M(),*GsTMDfastNF3();
+	PACKET *GsTMDdivF3NL(), *GsTMDdivF3LFG(), *GsTMDdivF3L(), *GsTMDdivNF3();
+	PACKET *GsTMDfastG3NL(), *GsTMDfastG3MFG(), *GsTMDfastG3M(),*GsTMDfastNG3();
+	PACKET *GsTMDdivG3NL(), *GsTMDdivG3LFG(), *GsTMDdivG3L(), *GsTMDdivNG3();
+	PACKET *GsTMDfastTF3NL(), *GsTMDfastTF3MFG(), *GsTMDfastTF3M(), *GsTMDfastTNF3();
+	PACKET *GsTMDdivTF3NL(), *GsTMDdivTF3LFG(), *GsTMDdivTF3L(), *GsTMDdivTNF3();
+	PACKET *GsTMDfastTG3NL(), *GsTMDfastTG3MFG(), *GsTMDfastTG3M(), *GsTMDfastTNG3();
+	PACKET *GsTMDdivTG3NL(), *GsTMDdivTG3LFG(), *GsTMDdivTG3L(), *GsTMDdivTNG3();
+	PACKET *GsTMDfastF4NL(), *GsTMDfastF4MFG(), *GsTMDfastF4M(), *GsTMDfastNF4();
+	PACKET *GsTMDdivF4NL(), *GsTMDdivF4LFG(), *GsTMDdivF4L(), *GsTMDdivNF4();
+	PACKET *GsTMDfastG4NL(), *GsTMDfastG4MFG(), *GsTMDfastG4M(), *GsTMDfastNG4();
+	PACKET *GsTMDdivG4NL(), *GsTMDdivG4LFG(), *GsTMDdivG4L(), *GsTMDdivNG4();
+	PACKET *GsTMDfastTF4NL(), *GsTMDfastTF4MFG(), *GsTMDfastTF4M(), *GsTMDfastTNF4();
+	PACKET *GsTMDdivTF4NL(), *GsTMDdivTF4LFG(), *GsTMDdivTF4L(), *GsTMDdivTNF4();
+	PACKET *GsTMDfastTG4NL(), *GsTMDfastTG4MFG(), *GsTMDfastTG4M(), *GsTMDfastTNG4();
+	PACKET *GsTMDdivTG4NL(), *GsTMDdivTG4LFG(), *GsTMDdivTG4L(), *GsTMDdivTNG4();
+
+	/* flat triangle */
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastF3M;
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastF3MFG;
+	GsFCALL4.f3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastF3NL;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivF3L;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivF3LFG;
+	GsFCALL4.f3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivF3NL;
+	GsFCALL4.nf3[GsDivMODE_NDIV] = GsTMDfastNF3;
+	GsFCALL4.nf3[GsDivMODE_DIV] = GsTMDdivNF3;
+	/* gour triangle */
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastG3M;
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastG3MFG;
+	GsFCALL4.g3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastG3NL;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivG3L;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivG3LFG;
+	GsFCALL4.g3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivG3NL;
+	GsFCALL4.ng3[GsDivMODE_NDIV] = GsTMDfastNG3;
+	GsFCALL4.ng3[GsDivMODE_DIV] = GsTMDdivNG3;
+	/* texture flat triangle */
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTF3M;
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTF3MFG;
+	GsFCALL4.tf3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTF3NL;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTF3L;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTF3LFG;
+	GsFCALL4.tf3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTF3NL;
+	GsFCALL4.ntf3[GsDivMODE_NDIV] = GsTMDfastTNF3;
+	GsFCALL4.ntf3[GsDivMODE_DIV] = GsTMDdivTNF3;
+	/* texture gour triangle */
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTG3M;
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTG3MFG;
+	GsFCALL4.tg3[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTG3NL;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTG3L;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTG3LFG;
+	GsFCALL4.tg3[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTG3NL;
+	GsFCALL4.ntg3[GsDivMODE_NDIV] = GsTMDfastTNG3;
+	GsFCALL4.ntg3[GsDivMODE_DIV] = GsTMDdivTNG3;
+	/* flat quad */
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastF4M;
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastF4MFG;
+	GsFCALL4.f4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastF4NL;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivF4L;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivF4LFG;
+	GsFCALL4.f4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivF4NL;
+	GsFCALL4.nf4[GsDivMODE_NDIV] = GsTMDfastNF4;
+	GsFCALL4.nf4[GsDivMODE_DIV] = GsTMDdivNF4;
+	/* gour quad */
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastG4M;
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastG4MFG;
+	GsFCALL4.g4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastG4NL;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivG4L;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivG4LFG;
+	GsFCALL4.g4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivG4NL;
+	GsFCALL4.ng4[GsDivMODE_NDIV] = GsTMDfastNG4;
+	GsFCALL4.ng4[GsDivMODE_DIV] = GsTMDdivNG4;
+	/* texture flat quad */
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTF4M;
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTF4MFG;
+	GsFCALL4.tf4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTF4NL;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTF4L;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTF4LFG;
+	GsFCALL4.tf4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTF4NL;
+	GsFCALL4.ntf4[GsDivMODE_NDIV] = GsTMDfastTNF4;
+	GsFCALL4.ntf4[GsDivMODE_DIV] = GsTMDdivTNF4;
+	/* texture gour quad */
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_NORMAL] = GsTMDfastTG4M;
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_FOG] = GsTMDfastTG4MFG;
+	GsFCALL4.tg4[GsDivMODE_NDIV][GsLMODE_LOFF] = GsTMDfastTG4NL;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_NORMAL] = GsTMDdivTG4L;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_FOG] = GsTMDdivTG4LFG;
+	GsFCALL4.tg4[GsDivMODE_DIV][GsLMODE_LOFF] = GsTMDdivTG4NL;
+	GsFCALL4.ntg4[GsDivMODE_NDIV] = GsTMDfastTNG4;
+	GsFCALL4.ntg4[GsDivMODE_DIV] = GsTMDdivTNG4;
+	/* gradation  triangle */
+	GsFCALL4.f3g[GsLMODE_NORMAL] = GsTMDfastF3GL;
+	GsFCALL4.f3g[GsLMODE_FOG] = GsTMDfastF3GLFG;
+	GsFCALL4.f3g[GsLMODE_LOFF] = GsTMDfastF3GNL;
+	GsFCALL4.g3g[GsLMODE_NORMAL] = GsTMDfastG3GL;
+	GsFCALL4.g3g[GsLMODE_FOG] = GsTMDfastG3GLFG;
+	GsFCALL4.g3g[GsLMODE_LOFF] = GsTMDfastG3GNL;
+	/* gradation  quad */
+	GsFCALL4.f4g[GsLMODE_NORMAL] = GsTMDfastF4GL;
+	GsFCALL4.f4g[GsLMODE_FOG] = GsTMDfastF4GLFG;
+	GsFCALL4.f4g[GsLMODE_LOFF] = GsTMDfastF4GNL;
+	GsFCALL4.g4g[GsLMODE_NORMAL] = GsTMDfastG4GL;
+	GsFCALL4.g4g[GsLMODE_FOG] = GsTMDfastG4GLFG;
+	GsFCALL4.g4g[GsLMODE_LOFF] = GsTMDfastG4GNL;
+}
+#endif
+
+#endif				/* _LIBGS_H_ */
diff --git a/tools/psyq/include/LIBGTE.H b/tools/psyq/include/LIBGTE.H
new file mode 100644
index 000000000..a3c3b3365
--- /dev/null
+++ b/tools/psyq/include/LIBGTE.H
@@ -0,0 +1,766 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$ 
+ */
+
+#ifndef _LIBGTE_H_
+#define _LIBGTE_H_
+
+/*
+ *  (C) Copyright 1993/1994/1995 Sony Computer Entertainment ,Tokyo,Japan.
+ *				All Rights Reserved
+ *
+ * 		libgte.h: Geometry Basic Structures Database
+ *
+ *$Id: libgte.h,v 1.35 1998/03/10 03:52:35 noda Exp $
+ */
+
+
+
+/*
+ * Geometry Structures:
+ */
+#define	ONE		4096	/* GTE regards 4096 as 1.0 */
+#define TMPVTXNUM	16	/* Clip Function Header */
+#define OUTVTXNUM	10
+
+#ifdef ASSEMBLER
+/*
+* GTE read macros
+*/
+#define	read_sz_fifo3(r1,r2,r3)		mfc2	r1,$17; \
+					mfc2	r2,$18; \
+					mfc2	r3,$19; \
+					nop
+
+#define	read_sz_fifo4(r1,r2,r3,r4) 	mfc2	r1,$16; \
+					mfc2	r2,$17; \
+					mfc2	r3,$18; \
+					mfc2	r4,$19;	\
+					nop
+
+#define	read_szx(r1) 			mfc2	r1,$16;	\
+					nop
+			
+#define	read_sz0(r1)			mfc2	r1,$17;	\
+					nop
+			
+#define	read_sz1(r1)			mfc2	r1,$18;	\
+					nop
+			
+#define	read_sz2(r1)			mfc2	r1,$19;	\
+					nop
+			
+#define	read_sxsy_fifo3(r1,r2,r3) 	mfc2	r1,$12; \
+					mfc2	r2,$13; \
+					mfc2	r3,$14;	\
+					nop
+
+#define	read_sxsy0(r1)			mfc2	r1,$12;	\
+					nop
+
+#define	read_sxsy1(r1)			mfc2	r1,$13;	\
+					nop
+
+#define	read_sxsy2(r1)			mfc2	r1,$14;	\
+					nop
+
+#define	read_rgb_fifo(r1,r2,r3)		mfc2	r1,$20; \
+					mfc2	r2,$21; \
+					mfc2	r3,$22;	\
+					nop
+
+#define	read_rgb0(r1)			mfc2	r1,$20; \
+					nop
+
+#define	read_rgb1(r1)			mfc2	r1,$21; \
+					nop
+
+#define	read_rgb2(r1)			mfc2	r1,$22; \
+					nop
+
+#define	read_flag(r1)			cfc2	r1,$31;	\
+					nop
+
+#define	read_p(r1)			mfc2	r1,$8;	\
+					nop
+
+#define	read_otz(r1)			mfc2	r1,$7;	\
+					nop
+
+#define	read_opz(r1)			mfc2	r1,$24;	\
+					nop
+
+#define read_mt(r1,r2,r3)		mfc2	r1,$25; \
+					mfc2	r2,$26; \
+					mfc2	r3,$27; \
+					nop
+/*
+* GTE store macros
+*/
+#define store_sxsy_fifo3(r1,r2,r3)	swc2	$12,(r1); \
+					swc2	$13,(r2); \
+					swc2	$14,(r3); \
+					nop
+
+#define store_sxsy0(r1)			swc2	$12,(r1); \
+					nop
+
+#define store_sxsy1(r1)			swc2	$13,(r1); \
+					nop
+
+#define store_sxsy2(r1)			swc2	$14,(r1); \
+					nop
+
+#define	store_rgb_fifo(r1,r2,r3)	swc2	$20,(r1); \
+					swc2	$21,(r2); \
+					swc2	$22,(r3); \
+					nop
+
+#define store_rgb0(r1)			swc2	$20,(r1); \
+					nop
+
+#define store_rgb1(r1)			swc2	$21,(r1); \
+					nop
+
+#define store_rgb2(r1)			swc2	$22,(r1); \
+					nop
+
+/*
+* GTE set macros
+*/
+#define set_trans_matrix(r1,r2,r3)	ctc2	r1,$5;	\
+					ctc2	r2,$6;	\
+					ctc2	r3,$7;	\
+					nop
+#endif
+
+#ifndef ASSEMBLER
+typedef struct  {
+	short	m[3][3];	/* 3x3 rotation matrix */
+        long    t[3];		/* transfer vector */
+} MATRIX;
+
+typedef struct {		/* long word type 3D vector */
+	long	vx, vy;
+	long	vz, pad;
+} VECTOR;
+	
+typedef struct {		/* short word type 3D vector */	
+	short	vx, vy;
+	short	vz, pad;
+} SVECTOR;
+	       
+typedef struct {		/* color type vector */	
+	u_char	r, g, b, cd;
+} CVECTOR;
+	       
+typedef struct {		/* 2D short vector */
+	short vx, vy;
+} DVECTOR;
+
+
+typedef struct {		
+	SVECTOR v;		/* Object(Local) 3D Vertex 	*/
+	VECTOR sxyz;		/* Screen 3D Vertex		*/
+	DVECTOR sxy;		/* Screen 2D Vertex		*/
+	CVECTOR rgb;		/* Vertex Color Data	 	*/
+	short txuv,pad;		/* Texture Mapping Data 	*/
+	long chx,chy;		/* Clip Window Data 		*/
+} EVECTOR;
+
+typedef struct {
+	SVECTOR v;
+	u_char uv[2]; u_short pad;	/*  */  
+	CVECTOR c;
+	DVECTOR sxy;		
+	u_long  sz;		/* clip z-data */		
+} RVECTOR;			/* division vertex data vector */
+
+
+typedef struct {
+	RVECTOR r01,r12,r20;
+	RVECTOR	*r0,*r1,*r2;
+	u_long *rtn;
+} CRVECTOR3;			/* recursive vector for triangles */
+
+typedef struct {
+	u_long 	ndiv;		/* number of divisions */
+	u_long 	pih,piv;	/* clipping area */
+	u_short clut,tpage;
+	CVECTOR	rgbc;
+	u_long	*ot;
+	RVECTOR r0,r1,r2;
+	CRVECTOR3 cr[5];	
+} DIVPOLYGON3;			/* division buffer for triangles */
+
+typedef struct {
+	RVECTOR r01,r02,r31,r32,rc;
+	RVECTOR	*r0,*r1,*r2,*r3;
+	u_long *rtn;
+} CRVECTOR4;			/* recursive vector for four-sided polygons */
+
+typedef struct {
+	u_long 	ndiv;		/* number of divisions */
+	u_long 	pih,piv;	/* clipping area */
+	u_short clut,tpage;
+	CVECTOR	rgbc;
+	u_long	*ot;
+	RVECTOR r0,r1,r2,r3;
+	CRVECTOR4 cr[5];	
+} DIVPOLYGON4;			/* division buffer for four-sided polygons */
+
+typedef struct {
+        short   xy[3];
+        short   uv[2];
+        short   rgb[3];
+} SPOL;
+
+                                        /*polygon: 41 bytes/1 polygon*/
+typedef struct {
+        short   sxy[4][2];              /*0..7*/
+        short   sz[4][2];               /*8..15sz[][1] is dummy*/
+        short   uv[4][2];               /*16..23*/
+        short   rgb[4][3];              /*23..34*/
+        short   code;                   /*35...  F4:5,TF4:6,G4:7,TG4:8*/
+} POL4;
+
+typedef struct {
+        short   sxy[3][2];
+        short   sz[3][2];               /*sz[][1] is dummy*/
+        short   uv[3][2];
+        short   rgb[3][3];
+        short   code;                   /*F3:1,TF3:2,G3:3,TG3:4*/
+} POL3;
+
+typedef struct {
+        SVECTOR         *v;                     /*shared vertices*/
+        SVECTOR         *n;                     /*shared normals*/
+        SVECTOR         *u;                     /*shared texture addresses*/
+        CVECTOR         *c;                     /*shared colors*/
+        u_long          len;                    /*mesh length(=#vertex)*/
+} TMESH;
+
+typedef struct {
+        SVECTOR         *v;                     /*shared vertices*/
+        SVECTOR         *n;                     /*shared normals*/
+        SVECTOR         *u;                     /*shared texture addresses*/
+        CVECTOR         *c;                     /*shared colors*/
+        u_long          lenv;                   /*mesh length_V(=#vertex_V)*/
+        u_long          lenh;                   /*mesh length_H(=#vertex_H)*/
+} QMESH;
+
+
+/*
+ *      ProtoTypes
+ */
+#ifndef NO_PROTOTYPE
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+extern void InitGeom();
+
+extern void EigenMatrix(MATRIX *m, MATRIX *t);
+extern int  IsIdMatrix(MATRIX *m);
+extern MATRIX *MulMatrix0(MATRIX *m0,MATRIX *m1,MATRIX *m2);
+extern MATRIX *MulRotMatrix0(MATRIX *m0,MATRIX *m1);
+extern MATRIX *MulMatrix(MATRIX *m0,MATRIX *m1);
+extern MATRIX *MulMatrix2(MATRIX *m0,MATRIX *m1);
+extern MATRIX *MulRotMatrix(MATRIX *m0);
+extern MATRIX *SetMulMatrix(MATRIX *m0,MATRIX *m1);
+extern MATRIX *SetMulRotMatrix(MATRIX *m0);
+extern VECTOR *ApplyMatrix(MATRIX *m,SVECTOR *v0,VECTOR *v1);
+extern VECTOR *ApplyRotMatrix(SVECTOR *v0,VECTOR *v1);
+extern VECTOR *ApplyRotMatrixLV(VECTOR *v0,VECTOR *v1);
+extern VECTOR *ApplyMatrixLV(MATRIX *m,VECTOR *v0,VECTOR *v1);
+extern SVECTOR *ApplyMatrixSV(MATRIX *m,SVECTOR *v0,SVECTOR *v1);
+extern VECTOR *ApplyTransposeMatrixLV(MATRIX *m,VECTOR *v0,VECTOR *v1);
+extern MATRIX *RotMatrix(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixXZY(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixYXZ(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixYZX(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixZXY(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixZYX(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrix_gte(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixYXZ_gte(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixZYX_gte(SVECTOR *r,MATRIX *m);
+extern MATRIX *RotMatrixX(long r,MATRIX *m);
+extern MATRIX *RotMatrixY(long r,MATRIX *m);
+extern MATRIX *RotMatrixZ(long r,MATRIX *m);
+extern MATRIX *RotMatrixC(SVECTOR *r,MATRIX *m);
+extern MATRIX *TransMatrix(MATRIX *m,VECTOR *v);
+extern MATRIX *ScaleMatrix(MATRIX *m,VECTOR *v);
+extern MATRIX *ScaleMatrixL(MATRIX *m,VECTOR *v);
+extern MATRIX *TransposeMatrix(MATRIX *m0,MATRIX *m1);
+extern MATRIX *CompMatrix(MATRIX *m0,MATRIX *m1,MATRIX *m2);
+extern MATRIX *CompMatrixLV(MATRIX *m0,MATRIX *m1,MATRIX *m2);
+
+extern void MatrixNormal(MATRIX *m, MATRIX *n); 
+extern void MatrixNormal_0(MATRIX *m, MATRIX *n);
+extern void MatrixNormal_1(MATRIX *m, MATRIX *n);
+extern void MatrixNormal_2(MATRIX *m, MATRIX *n);
+
+extern void SetRotMatrix(MATRIX *m); 
+extern void SetLightMatrix(MATRIX *m);
+extern void SetColorMatrix(MATRIX *m);
+extern void SetTransMatrix(MATRIX *m);
+extern void PushMatrix();
+extern void PopMatrix();
+extern void ReadRotMatrix(MATRIX *m);
+extern void ReadLightMatrix(MATRIX *m);
+extern void ReadColorMatrix(MATRIX *m);
+extern void SetRGBcd(CVECTOR *v);
+extern void SetBackColor(long rbk,long gbk,long bbk);
+extern void SetFarColor(long rfc,long gfc,long bfc);
+extern void SetGeomOffset(long ofx,long ofy);
+extern void SetGeomScreen(long h);
+extern void ReadSZfifo3(long *sz0,long *sz1,long *sz2);
+extern void ReadSZfifo4(long *szx,long *sz0,long *sz1,long *sz2);
+extern void ReadSXSYfifo(long *sxy0,long *sxy1,long *sxy2);
+extern void ReadRGBfifo(CVECTOR *v0,CVECTOR *v1,CVECTOR *v2);
+extern void ReadGeomOffset(long *ofx,long *ofy);
+extern long ReadGeomScreen();
+
+extern void TransRot_32(VECTOR *v0, VECTOR *v1, long *flag);
+extern long TransRotPers(SVECTOR *v0, long *sxy, long *p, long *flag);
+extern long TransRotPers3(SVECTOR *v0, SVECTOR *v1, SVECTOR *v2, long *sxy0, 
+		long *sxy1, long *sxy2, long *p, long *flag);
+
+extern void pers_map(int abuf, SVECTOR **vertex, int tex[4][2], u_short *dtext);
+extern void PhongLine(int istart_x, int iend_x, int p, int q, u_short **pixx,
+		int fs, int ft, int i4, int det);
+
+extern long RotTransPers(SVECTOR *v0,long *sxy,long *p,long *flag);
+extern long RotTransPers3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			long *sxy0,long *sxy1,long *sxy2,long *p,long *flag);
+extern void RotTrans(SVECTOR *v0,VECTOR *v1,long *flag);
+extern void RotTransSV(SVECTOR *v0,SVECTOR *v1,long *flag);
+extern void LocalLight(SVECTOR *v0,VECTOR *v1);
+extern void LightColor(VECTOR *v0,VECTOR *v1);
+extern void DpqColorLight(VECTOR *v0,CVECTOR *v1,long p,CVECTOR *v2);
+extern void DpqColor(CVECTOR *v0,long p,CVECTOR *v1);
+extern void DpqColor3(CVECTOR *v0,CVECTOR *v1,CVECTOR *v2,
+			long p,CVECTOR *v3,CVECTOR *v4,CVECTOR *v5);
+extern void Intpl(VECTOR *v0,long p,CVECTOR *v1);
+extern VECTOR *Square12(VECTOR *v0,VECTOR *v1);
+extern VECTOR *Square0(VECTOR *v0,VECTOR *v1);
+extern VECTOR *SquareSL12(SVECTOR *v0,VECTOR *v1);
+extern VECTOR *SquareSL0(SVECTOR *v0,VECTOR *v1);
+extern SVECTOR *SquareSS12(SVECTOR *v0,SVECTOR *v1);
+extern SVECTOR *SquareSS0(SVECTOR *v0,SVECTOR *v1);
+extern void NormalColor(SVECTOR *v0,CVECTOR *v1);
+extern void NormalColor3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			CVECTOR *v3,CVECTOR *v4,CVECTOR *v5);
+extern void NormalColorDpq(SVECTOR *v0,CVECTOR *v1,long p,CVECTOR *v2);
+extern void NormalColorDpq3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,CVECTOR *v3,
+			long p,CVECTOR *v4,CVECTOR *v5,CVECTOR *v6);
+extern void NormalColorCol(SVECTOR *v0,CVECTOR *v1,CVECTOR *v2);
+extern void NormalColorCol3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,CVECTOR *v3,
+			CVECTOR *v4,CVECTOR *v5,CVECTOR *v6);
+extern void ColorDpq(VECTOR *v0,CVECTOR *v1,long p,CVECTOR *v2);
+extern void ColorCol(VECTOR *v0,CVECTOR *v1,CVECTOR *v2);
+extern long NormalClip(long sxy0,long sxy1,long sxy2);
+extern long AverageZ3(long sz0,long sz1,long sz2);
+extern long AverageZ4(long sz0,long sz1,long sz2,long sz3);
+extern void OuterProduct12(VECTOR *v0,VECTOR *v1,VECTOR *v2);
+extern void OuterProduct0(VECTOR *v0,VECTOR *v1,VECTOR *v2);
+extern long Lzc(long data);
+
+
+extern long RotTransPers4(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+			long *sxy0,long *sxy1,long *sxy2,long *sxy3,
+			long *p,long *flag);
+extern void RotTransPersN(SVECTOR *v0,DVECTOR *v1,u_short *sz,u_short *p,
+			u_short *flag,long n);
+extern void RotTransPers3N(SVECTOR *v0,DVECTOR *v1,u_short *sz,u_short *flag,
+			long n);
+extern void RotMeshH(short *Yheight,DVECTOR *Vo,u_short *sz,u_short *flag,
+			short Xoffset,short Zoffset,short m,short n,
+			DVECTOR *base);
+extern long RotAverage3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			long *sxy0,long *sxy1,long *sxy2,long *p,long *flag);
+extern long RotAverage4(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+			long *sxy0,long *sxy1,long *sxy2,long *sxy3,
+			long *p,long *flag);
+extern long RotNclip3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			long *sxy0,long *sxy1,long *sxy2,long *p,long *otz,
+			long *flag);
+extern long RotNclip4(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+			long *sxy0,long *sxy1,long *sxy2,long *sxy3,
+			long *p,long *otz,long *flag);
+extern long RotAverageNclip3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			long *sxy0,long *sxy1,long *sxy2,
+			long *p,long *otz,long *flag);
+extern long RotAverageNclip4(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+			long *sxy0,long *sxy1,long *sxy2,long *sxy3,
+			long *p,long *otz,long *flag);
+extern long RotColorDpq(SVECTOR *v0,SVECTOR *v1,CVECTOR *v2,
+			long *sxy,CVECTOR *v3,long *flag);
+extern long RotColorDpq3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			SVECTOR *v3,SVECTOR *v4,SVECTOR *v5,CVECTOR *v6,
+			long *sxy0,long *sxy1,long *sxy2,
+			CVECTOR *v7,CVECTOR *v8,CVECTOR *v9,long *flag);
+extern long RotAverageNclipColorDpq3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			SVECTOR *v3,SVECTOR *v4,SVECTOR *v5,CVECTOR *v6,
+			long *sxy0,long *sxy1,long *sxy2,
+			CVECTOR *v7,CVECTOR *v8,CVECTOR *v9,
+			long *otz,long *flag);	 		   	      
+extern long RotAverageNclipColorCol3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			SVECTOR *v3,SVECTOR *v4,SVECTOR *v5,CVECTOR *v6,
+			long *sxy0,long *sxy1,long *sxy2,
+			CVECTOR *v7,CVECTOR *v8,CVECTOR *v9,
+			long *otz,long *flag);	 		   	      
+extern long RotColorMatDpq(SVECTOR *v0,SVECTOR *v1,CVECTOR *v2,long *sxy,
+			CVECTOR *v3,long matc,long flag);
+extern void ColorMatDpq(SVECTOR *v0,CVECTOR *v1,long p,CVECTOR *v2,long matc);
+extern void ColorMatCol(SVECTOR *v0,CVECTOR *v1,CVECTOR *v2,long matc);
+extern void LoadAverage12(VECTOR *v0,VECTOR *v1,long p0,long p1,VECTOR *v2);
+extern void LoadAverageShort12(SVECTOR *v0,SVECTOR *v1,long p0,long p1,
+			SVECTOR *v2);
+extern void LoadAverage0(VECTOR *v0,VECTOR *v1,long p0,long p1,VECTOR *v2);
+extern void LoadAverageShort0(SVECTOR *v0,SVECTOR *v1,long p0,long p1,
+			SVECTOR *v2);
+extern void LoadAverageByte(u_char *v0,u_char *v1,long p0,long p1,u_char *v2);
+extern void LoadAverageCol(u_char *v0,u_char *v1,long p0,long p1,u_char *v2);
+extern long VectorNormal(VECTOR *v0, VECTOR *v1);
+extern long VectorNormalS(VECTOR *v0, SVECTOR *v1);
+extern long VectorNormalSS(SVECTOR *v0, SVECTOR *v1);
+extern long SquareRoot0(long a);
+extern long SquareRoot12(long a);
+extern void InvSquareRoot(long a, long *b, long *c);
+extern void gteMIMefunc(SVECTOR *otp, SVECTOR *dfp, long n, long p);
+extern void SetFogFar(long a,long h);
+extern void SetFogNear(long a,long h);
+extern void SetFogNearFar(long a,long b,long h);
+extern void SubPol4(POL4 *p, SPOL *sp, int ndiv);
+extern void SubPol3(POL3 *p, SPOL *sp, int ndiv);
+
+extern int rcos(int a);
+extern int rsin(int a);
+extern int ccos(int a);
+extern int csin(int a);
+extern int cln(int a);
+extern int csqrt(int a);
+extern int catan(int a);
+extern long ratan2(long y, long x);
+
+
+extern void RotPMD_F3(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_G3(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_FT3(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_GT3(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_F4(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_G4(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_FT4(long *pa,u_long *ot,int otlen,int id,int backc);
+extern void RotPMD_GT4(long *pa,u_long *ot,int otlen,int id,int backc);
+
+extern void RotPMD_SV_F3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_G3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_FT3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_GT3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_F4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_G4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_FT4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+extern void RotPMD_SV_GT4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int backc);
+
+
+extern void InitClip(EVECTOR *evbfad,long hw,long vw,long h,long near,long far);
+extern long Clip3F(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,EVECTOR **evmx);
+extern long Clip3FP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,EVECTOR **evmx);
+extern long Clip4F(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+			EVECTOR **evmx);
+extern long Clip4FP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+			EVECTOR **evmx);
+extern long Clip3FT(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+		short *uv0,short *uv1,short *uv2,EVECTOR **evmx);
+extern long Clip3FTP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+		short *uv0,short *uv1,short *uv2,EVECTOR **evmx);
+extern long Clip4FT(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+		short *uv0,short *uv1,short *uv2,short *uv3,EVECTOR **evmx);
+extern long Clip4FTP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+		short *uv0,short *uv1,short *uv2,short *uv3,EVECTOR **evmx);
+extern long Clip3G(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,EVECTOR **evmx);
+extern long Clip3GP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,EVECTOR **evmx);
+extern long Clip4G(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,CVECTOR *rgb3,
+		EVECTOR **evmx);
+extern long Clip4GP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,CVECTOR *rgb3,
+		EVECTOR **evmx);
+extern long Clip3GT(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+		short *uv0,short *uv1,short *uv2,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,
+		EVECTOR **evmx);
+extern long Clip3GTP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+		short *uv0,short *uv1,short *uv2,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,
+		EVECTOR **evmx);
+extern long Clip4GT(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+		short *uv0,short *uv1,short *uv2,short *uv3,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,CVECTOR *rgb3,
+		EVECTOR **evmx);
+extern long Clip4GTP(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3,
+		short *uv0,short *uv1,short *uv2,short *uv3,
+		CVECTOR *rgb0,CVECTOR *rgb1,CVECTOR *rgb2,CVECTOR *rgb3,
+		EVECTOR **evmx);
+
+extern void RotTransPers_nom(SVECTOR *v0);
+extern void RotTransPers3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2);
+extern void RotTransPers4_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,SVECTOR *v3);
+extern void RotTrans_nom(SVECTOR *v0);
+extern void RotAverage3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2);
+extern void RotNclip3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2);
+extern void RotAverageNclip3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2);
+extern void RotAverageNclipColorDpq3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			SVECTOR *v3,SVECTOR *v4,SVECTOR *v5,CVECTOR *v6);
+extern void RotAverageNclipColorCol3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			SVECTOR *v3,SVECTOR *v4,SVECTOR *v5,CVECTOR *v6);
+extern void RotColorDpq_nom(SVECTOR *v0,SVECTOR *v1,CVECTOR *v2);
+extern long RotColorDpq3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			SVECTOR *v3,SVECTOR *v4,SVECTOR *v5,CVECTOR *v6);
+extern void NormalColor_nom(SVECTOR *v0);
+extern void NormalColor3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2);
+extern void NormalColorDpq_nom(SVECTOR *v0,CVECTOR *v1,long p);
+extern void NormalColorDpq3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			CVECTOR *v3,long p);
+extern void NormalColorCol_nom(SVECTOR *v0,CVECTOR *v1);
+extern void NormalColorCol3_nom(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,
+			CVECTOR *v3);
+
+/*
+
+extern u_long *DivideF3(SVECTOR *v0,SVECTOR *v1,SVECTOR *v2,CVECTOR *rgbc,
+		POLY *otp);
+extern u_long *GsPrng n,u_long shift,GsOT *otp);
+
+extern u_long *GsTMDfastTG3LB(TMD_P_TG3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_GT3 *s,u_long n,u_long shift,GsOT *otp);
+extern u_long *GsTMDfastTG3LFGB(TMD_P_TG3 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_GT3 *s,u_long n,u_long shift,GsOT *otp);
+extern u_long *GsTMDfastTG3NLB(TMD_P_TG3 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_GT3 *s,u_long n,u_long shift,GsOT *otp);
+extern u_long *GsTMDfastTNG3B(TMD_P_TNG3 *primtop,SVECTOR *vertop,
+		POLY_GT3 *s,u_long n,u_long shift,GsOT *otp);
+
+extern u_long *GsTMDfastTG4LB(TMD_P_TG4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_GT4 *s,u_long n,u_long shift,GsOT *otp);
+extern u_long *GsTMDfastTG4LFGB(TMD_P_TG4 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_GT4 *s,u_long n,u_long shift,GsOT *otp);
+extern u_long *GsTMDfastTG4NLB(TMD_P_TG4 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_GT4 *s,u_long n,u_long shift,GsOT *otp);
+extern u_long *GsTMDfastTNG4B(TMD_P_TNG4 *primtop,SVECTOR *vertop,
+		POLY_GT4 *s,u_long n,u_long shift,GsOT *otp);
+
+extern u_long *GsTMDdivF3LB(TMD_P_F3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_F3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivF3LFGB(TMD_P_F3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_F3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivF3NLB(TMD_P_F3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_F3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivNF3B(TMD_P_NF3 *primtop,SVECTOR *vertop,
+		POLY_F3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+
+extern u_long *GsTMDdivF4LB(TMD_P_F4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_F4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivF4LFGB(TMD_P_F4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_F4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivF4NLB(TMD_P_F4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_F4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivNF4B(TMD_P_NF4 *primtop,SVECTOR *vertop,
+		POLY_F4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+
+extern u_long *GsTMDdivTF3LB(TMD_P_TF3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_FT3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivTF3LFGB(TMD_P_TF3 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_FT3 *s,u_long n,u_long shift,
+		GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivTF3NLB(TMD_P_TF3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_FT3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivTNF3B(TMD_P_TNF3 *primtop,SVECTOR *vertop,
+		POLY_FT3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+
+extern u_long *GsTMDdivTF4LB(TMD_P_TF4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_FT4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivTF4LFGB(TMD_P_TF4 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_FT4 *s,u_long n,u_long shift,
+		GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivTF4NLB(TMD_P_TF4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_FT4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivTNF4B(TMD_P_TNF4 *primtop,SVECTOR *vertop,
+		POLY_FT4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+
+extern u_long *GsTMDdivG3LB(TMD_P_G3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_G3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivG3LFGB(TMD_P_G3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_G3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivG3NLB(TMD_P_G3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_G3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivNG3B(TMD_P_NG3 *primtop,SVECTOR *vertop,
+		POLY_G3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+
+extern u_long *GsTMDdivG4LB(TMD_P_G4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_G4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivG4LFGB(TMD_P_G4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_G4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivG4NLB(TMD_P_G4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_G4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivNG4B(TMD_P_NG4 *primtop,SVECTOR *vertop,
+		POLY_G4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+
+extern u_long *GsTMDdivTG3LB(TMD_P_TG3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_GT3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivTG3LFGB(TMD_P_TG3 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_GT3 *s,u_long n,u_long shift,
+		GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivTG3NLB(TMD_P_TG3 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_GT3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+extern u_long *GsTMDdivTNG3B(TMD_P_TNG3 *primtop,SVECTOR *vertop,
+		POLY_GT3 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON3 *divp);
+
+extern u_long *GsTMDdivTG4LB(TMD_P_TG4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_GT4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivTG4LFGB(TMD_P_TG4 *primtop,SVECTOR *vertop,
+		SVECTOR *nortop,POLY_GT4 *s,u_long n,u_long shift,
+		GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivTG4NLB(TMD_P_TG4 *primtop,SVECTOR *vertop,SVECTOR *nortop,
+		POLY_GT4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+extern u_long *GsTMDdivTNG4B(TMD_P_TNG4 *primtop,SVECTOR *vertop,
+		POLY_GT4 *s,u_long n,u_long shift,GsOT *otp,DIVPOLYGON4 *divp);
+
+*/
+
+extern void RotSMD_F3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_G3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_FT3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_GT3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_F4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_G4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_FT4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_GT4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+
+extern void RotSMD_SV_F3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_G3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_FT3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_GT3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_F4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_G4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_FT4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotSMD_SV_GT4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+
+
+
+extern void RotRMD_F3(long *pa,u_long *ot,int otlen,int id,		
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_G3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_FT3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_GT3(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_F4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_G4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_FT4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_GT4(long *pa,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+
+extern void RotRMD_SV_F3(long *pa,long *va,u_long *ot,int otlen,int id,	
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_G3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_FT3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_GT3(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_F4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_G4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_FT4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+extern void RotRMD_SV_GT4(long *pa,long *va,u_long *ot,int otlen,int id,
+			int sclip, int hclip, int vclip, int nclipmode);		
+
+extern long p2otz(long p, long projection);
+extern long otz2p(long otz, long projection);
+
+/*
+extern void RotMeshPrimS_F3(TMESH *msh,POLY_F3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_G3(TMESH *msh,POLY_G3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_FC3(TMESH *msh,POLY_F3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_GC3(TMESH *msh,POLY_G3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_FT3(TMESH *msh,POLY_FT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_GT3(TMESH *msh,POLY_GT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_FCT3(TMESH *msh,POLY_FT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_GCT3(TMESH *msh,POLY_GT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimS_T3(TMESH *msh,POLY_FT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+
+extern void RotMeshPrimR_F3(TMESH *msh,POLY_F3 *prim,u_long *ot,
+			u_long otlen,long dpq,u _long backc);
+extern void RotMeshPrimR_G3(TMESH *msh,POLY_G3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_FC3(TMESH *msh,POLY_F3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_GC3(TMESH *msh,POLY_G3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_FT3(TMESH *msh,POLY_FT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_GT3(TMESH *msh,POLY_GT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_FCT3(TMESH *msh,POLY_FT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_GCT3(TMESH *msh,POLY_GT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+extern void RotMeshPrimR_T3(TMESH *msh,POLY_FT3 *prim,u_long *ot,
+			u_long otlen,long dpq,u_long backc);
+
+extern void RotMeshPrimQ_T(QMESH *msh,POLY_FT4 *prim,u_long *ot,
+			u_long otlen,long dpq,long backc);                            
+*/
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif
+#endif
+
+#endif /* _LIBGTE_H_ */
diff --git a/tools/psyq/include/LIBGUN.H b/tools/psyq/include/LIBGUN.H
new file mode 100644
index 000000000..f77f8b47e
--- /dev/null
+++ b/tools/psyq/include/LIBGUN.H
@@ -0,0 +1,25 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBGUN_H_
+#define _LIBGUN_H_
+
+/*
+ *  Copyright (C) 1996 Sony Computer Entertainment America. All Rights Reserved
+ *  libetc.h: Light Gun Interface
+ */
+
+/*
+ * Prototypes
+ */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+void InitGUN(char *bufA, long lenA, char *bufB, long lenB, char *buf1, char *buf2, long len);
+void RemoveGUN(void);
+void SelectGUN(int ch, unsigned char mask);
+long StartGUN(void);
+void StopGUN(void);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBGUN_H_ */
diff --git a/tools/psyq/include/LIBHMD.H b/tools/psyq/include/LIBHMD.H
new file mode 100644
index 000000000..45e631f64
--- /dev/null
+++ b/tools/psyq/include/LIBHMD.H
@@ -0,0 +1,1121 @@
+#ifndef _LIBHMD_H_
+#define _LIBHMD_H_
+
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/*
+ * libhmd.h: Hierarchical Modeling Data Library
+ *
+ * 	Copyright(C) 1998 Sony Computer Entertainment Inc.
+ *	All rights reserved.
+ */
+
+#define GsUNIT_TERM	0xffffffff	/* Primitive terminater */
+
+#define GsUNIT_DIV1	(1<<24)		/*  2 x  2 divide */
+#define GsUNIT_DIV2	(2<<24)		/*  4 x  4 divide */
+#define GsUNIT_DIV3	(3<<24)		/*  8 x  8 divide */
+#define GsUNIT_DIV4	(4<<24)		/* 16 x 16 divide */
+#define GsUNIT_DIV5	(5<<24)		/* 32 x 32 divide */
+
+typedef struct _GsCOORDUNIT {
+	unsigned long		flg;
+	MATRIX			matrix;
+	MATRIX			workm;
+	SVECTOR			rot;
+	struct _GsCOORDUNIT	*super;
+}	GsCOORDUNIT;
+
+typedef struct {
+	MATRIX  	view;
+	GsCOORDUNIT	*super;
+}       GsVIEWUNIT;
+
+typedef struct {
+	long    	vpx, vpy, vpz;
+	long    	vrx, vry, vrz;
+	long    	rz;
+	GsCOORDUNIT 	*super;
+}       GsRVIEWUNIT;
+
+typedef struct {
+	GsCOORDUNIT	*coord;	/* local dmatrix */
+	unsigned long	*primtop;
+}       GsUNIT;
+
+typedef struct {
+	unsigned long	type;
+	unsigned long	*ptr;
+}	GsTYPEUNIT;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT 		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+}	GsARGUNIT;
+
+typedef struct {
+	DVECTOR		vec;
+	short		otz;
+	short		p;
+}       GsWORKUNIT;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*primtop;
+	SVECTOR		*vertop;
+	SVECTOR		*nortop;
+}	GsARGUNIT_NORMAL;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*primtop;
+	SVECTOR		*vertop;
+	GsWORKUNIT	*vertop2;
+	SVECTOR		*nortop;
+	SVECTOR		*nortop2;
+}	GsARGUNIT_SHARED;
+	
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*imagetop;
+	unsigned long	*cluttop;
+}	GsARGUNIT_IMAGE;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*polytop;
+	unsigned long	*boxtop;
+	unsigned long	*pointtop;
+	SVECTOR		*nortop;
+}	GsARGUNIT_GND;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*polytop;
+	unsigned long	*boxtop;
+	unsigned long	*pointtop;
+	SVECTOR		*nortop;
+	unsigned long	*uvtop;
+}	GsARGUNIT_GNDT;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*cparam;
+	GsCOORDUNIT	*coord;
+	GsCOORDUNIT	*rcoord;
+}	GsARGUNIT_CAMERA;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	unsigned long	*lparam;
+	GsCOORDUNIT	*coord;
+	GsCOORDUNIT	*rcoord;
+}	GsARGUNIT_LIGHT;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	u_long		*coord_sect;
+	long		*mimepr;
+	u_long		mimenum;
+	u_short		mimeid, reserved;
+	u_long		*mime_diff_sect;
+}	GsARGUNIT_JntMIMe;
+
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	u_long		*coord_sect;
+	u_short		mimeid, reserved;
+	u_long		*mime_diff_sect;
+}	GsARGUNIT_RstJntMIMe;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	long		*mimepr;
+	u_long		mimenum;
+	u_short		mimeid, reserved;
+	u_long		*mime_diff_sect;
+	SVECTOR		*orgs_vn_sect;
+	SVECTOR		*vert_sect;
+	SVECTOR		*norm_sect;
+}	GsARGUNIT_VNMIMe;
+
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	u_short		mimeid, reserved;
+	u_long		*mime_diff_sect;
+	SVECTOR		*orgs_vn_sect;
+	SVECTOR		*vert_sect;
+	SVECTOR		*norm_sect;
+}	GsARGUNIT_RstVNMIMe;
+  
+typedef struct {
+	unsigned long	*primp;
+	GsOT		*tagp;
+	int		shift;
+	int		offset;
+	PACKET		*out_packetp;
+	long		header_size;
+	unsigned long	*htop;
+	unsigned long	*ctop;
+	unsigned long	*ptop;
+} GsARGUNIT_ANIM;
+
+typedef struct {
+	short		idx;
+	u_char		sid;
+	u_char		pad;
+} GsSEH;
+
+typedef struct {
+	u_long		rewrite_idx;
+	u_short		size, num;
+	u_short		ii;
+	u_short		aframe;
+	u_char		sid;
+	signed char	speed;
+	u_short		srcii;
+	short		rframe;
+	u_short		tframe;
+	u_short		ci, ti;
+	u_short		start;
+	u_char		start_sid;
+	u_char		traveling;
+} GsSEQ;
+
+
+/*
+ * GsTYPEUNIT code macro
+ */
+
+#define	GsUF3		0x00000008	/* flat triangle */
+#define	GsUFT3		0x00000009	/* texture flat triangle */
+#define	GsUG3		0x0000000c	/* gour triangle */
+#define	GsUGT3		0x0000000d	/* texture gour triangle */
+#define	GsUF4		0x00000010	/* flat quad */
+#define	GsUFT4		0x00000011	/* texture flat quad */
+#define	GsUG4		0x00000014	/* gour quad */
+#define	GsUGT4		0x00000015	/* texture gour quad */
+
+#define	GsUFF3		0x00020008	/* fog flat triangle */
+#define	GsUFFT3		0x00020009	/* fog texture flat triangle */
+#define	GsUFG3		0x0002000c	/* fog gour triangle */
+#define	GsUFGT3		0x0002000d	/* fog texture gour triangle */
+#define	GsUFF4		0x00020010	/* fog flat quad */
+#define	GsUFFT4		0x00020011	/* fog texture flat quad */
+#define	GsUFG4		0x00020014	/* fog gour quad */
+#define	GsUFGT4		0x00020015	/* fog texture gour quad */
+
+#define GsUCF3		0x0000000a	/* colored flat triangle */
+#define GsUCFT3		0x0000000b	/* colored texture flat triangle */
+#define GsUCG3		0x0000000e	/* colored gour triangle */
+#define GsUCGT3		0x0000000f	/* colored texture gour triangle */
+#define GsUCF4		0x00000012	/* colored flat quad */
+#define GsUCFT4		0x00000013	/* colored texture flat quad */
+#define GsUCG4		0x00000016	/* colored gour quad */
+#define GsUCGT4		0x00000017	/* colored texture gour quad */
+
+#define	GsUNF3		0x00040048	/* nonLight flat triangle */
+#define	GsUNFT3		0x00040049	/* nonLight texture flat triangle */
+#define	GsUNG3		0x0004004c	/* nonLight gouraud triangle */
+#define	GsUNGT3		0x0004004d	/* nonLight texture gouraud triangle */
+#define	GsUNF4		0x00040050	/* nonLight flat quad */
+#define	GsUNFT4		0x00040051	/* nonLight texture flat quad */
+#define	GsUNG4		0x00040054	/* nonLight gouraud quad */
+#define	GsUNGT4		0x00040055	/* nonLight texture gouraud quad */
+
+#define	GsUDF3		0x00010008	/* div flat triangle */
+#define	GsUDFT3		0x00010009	/* div texture flat triangle */
+#define	GsUDG3		0x0001000c	/* div gour triangle */
+#define	GsUDGT3		0x0001000d	/* div texture gour triangle */
+#define	GsUDF4		0x00010010	/* div flat quad */
+#define	GsUDFT4		0x00010011	/* div texture flat quad */
+#define	GsUDG4		0x00010014	/* div gour quad */
+#define	GsUDGT4		0x00010015	/* div texture gour quad */
+
+#define	GsUDFF3		0x00030008	/* div fog flat triangle */
+#define	GsUDFFT3	0x00030009	/* div fog texture flat triangle */
+#define	GsUDFG3		0x0003000c	/* div fog gour triangle */
+#define	GsUDFGT3	0x0003000d	/* div fog texture gour triangle */
+#define	GsUDFF4		0x00030010	/* div fog flat quad */
+#define	GsUDFFT4	0x00030011	/* div fog texture flat quad */
+#define	GsUDFG4		0x00030014	/* div fog gour quad */
+#define	GsUDFGT4	0x00030015	/* div fog texture gour quad */
+
+#define	GsUDNF3		0x00050048	/* div nonLight flat triangle */
+#define	GsUDNFT3	0x00050049	/* div nonLight texture flat triangle */
+#define	GsUDNG3		0x0005004c	/* div nonLight gouraud triangle */
+#define	GsUDNGT3	0x0005004d	/* div nonLight tex gouraud triangle */
+#define	GsUDNF4		0x00050050	/* div nonLight flat quad */
+#define	GsUDNFT4	0x00050051	/* div nonLight texture flat quad */
+#define	GsUDNG4		0x00050054	/* div nonLight gouraud quad */
+#define	GsUDNGT4	0x00050055	/* div nonLight tex gouraud quad */
+
+#define	GsUSCAL		0x01000000	/* shared calculate vertex and normal */
+#define	GsUSG3		0x0100000c	/* shared gour triangle */
+#define	GsUSGT3		0x0100000d	/* shared texture gour triangle */
+#define	GsUSG4		0x01000014	/* shared gour quad */
+#define	GsUSGT4		0x01000015	/* shared texture gour quad */
+
+#define	GsUSTGT3	0x0100020d	/* shared tile texture gour triangle */
+#define	GsUSTGT4	0x01000215	/* shared tile texture gour quad */
+
+#define	GsUSFG3		0x0102000c	/* shared fog gour triangle */
+#define	GsUSFGT3	0x0102000d	/* shared fog texture gour triangle */
+#define	GsUSFG4		0x01020014	/* shared fog gour quad */
+#define	GsUSFGT4	0x01020015	/* shared fog texture gour quad */
+
+#define	GsUSNF3		0x01040048	/* shared nonLight flat tri */
+#define	GsUSNFT3	0x01040049	/* shared nonLight texture flat tri */
+#define	GsUSNG3		0x0104004c	/* shared nonLight gour tri */
+#define	GsUSNGT3	0x0104004d	/* shared nonLight texture gour tri */
+#define	GsUSNF4		0x01040050	/* shared nonLight flat quad */
+#define	GsUSNFT4	0x01040051	/* shared nonLight texture flat quad */
+#define	GsUSNG4		0x01040054	/* shared nonLight gour quad */
+#define	GsUSNGT4	0x01040055	/* shared nonLight texture gour quad */
+
+#define	GsUMF3		0x00000018	/* mesh flat tri */
+#define	GsUMFT3		0x00000019	/* mesh texture flat tri */
+#define	GsUMG3		0x0000001c	/* mesh gour triangle */
+#define	GsUMGT3		0x0000001d	/* mesh texture gour triangle */
+#define	GsUMNF3		0x00040058	/* mesh nonLight flat tri */
+#define	GsUMNFT3	0x00040059	/* mesh nonLight tex flat tri */
+#define	GsUMNG3		0x0004005c	/* mesh nonLight gour triangle */
+#define	GsUMNGT3	0x0004005d	/* mesh nonLight tex gour tri */
+
+#define	GsUTFT3		0x00000209	/* tile texture flat triangle */
+#define	GsUTGT3		0x0000020d	/* tile texture gour triangle */
+#define	GsUTFT4		0x00000211	/* tile texture flat quad */
+#define	GsUTGT4		0x00000215	/* tile texture gour quad */
+
+#define	GsUPNF3		0x00040148	/* preset nonLight flat triangle */
+#define	GsUPNFT3	0x00040149	/* preset nonLight tex flat triangle */
+#define	GsUPNG3		0x0004014c	/* preset nonLight gouraud triangle */
+#define	GsUPNGT3	0x0004014d	/* preset nonLight tex gour triangle */
+#define	GsUPNF4		0x00040150	/* preset nonLight flat quad */
+#define	GsUPNFT4	0x00040151	/* preset nonLight tex flat quad */
+#define	GsUPNG4		0x00040154	/* preset nonLight gouraud quad */
+#define	GsUPNGT4	0x00040155	/* preset nonLight tex gour quad */
+
+#define	GsUSTPF3	0x00200008	/* semi-trans flat triangle */
+#define	GsUSTPFT3	0x00200009	/* semi-trans texture flat triangle */
+#define	GsUSTPG3	0x0020000c	/* semi-trans gour triangle */
+#define	GsUSTPGT3	0x0020000d	/* semi-trans texture gour triangle */
+#define	GsUSTPF4	0x00200010	/* semi-trans flat quad */
+#define	GsUSTPFT4	0x00200011	/* semi-trans texture flat quad */
+#define	GsUSTPG4	0x00200014	/* semi-trans gour quad */
+#define	GsUSTPGT4	0x00200015	/* semi-trans texture gour quad */
+#define	GsUSTPSG3	0x0120000c	/* semi-trans shared gour tri */
+#define	GsUSTPSGT3	0x0120000d	/* semi-trans shared tex gour tri */
+#define	GsUSTPSG4	0x01200014	/* semi-trans shared gour quad */
+#define	GsUSTPSGT4	0x01200015	/* semi-trans shared tex gour quad */
+
+#define	GsUSTPNF3	0x00240048	/* semi-trans nonLight flat tri */
+#define	GsUSTPNFT3	0x00240049	/* semi-trans nonLight tex flat tri */
+#define	GsUSTPNG3	0x0024004c	/* semi-trans nonLight gour tri */
+#define	GsUSTPNGT3	0x0024004d	/* semi-trans nonLight tex gour tri */
+#define	GsUSTPNF4	0x00240050	/* semi-trans nonLight flat quad */
+#define	GsUSTPNFT4	0x00240051	/* semi-trans nonLight tex flat quad */
+#define	GsUSTPNG4	0x00240054	/* semi-trans nonLight gour quad */
+#define	GsUSTPNGT4	0x00240055	/* semi-trans nonLight tex gour quad */
+
+#define	GsUSTPSNF3	0x01240048	/* stp shared nonLight flat tri */
+#define	GsUSTPSNFT3	0x01240049	/* stp shared nonLight tex flat tri */
+#define	GsUSTPSNG3	0x0124004c	/* stp shared nonLight gour tri */
+#define	GsUSTPSNGT3	0x0124004d	/* stp shared nonLight tex gour tri */
+#define	GsUSTPSNF4	0x01240050	/* stp shared nonLight flat quad */
+#define	GsUSTPSNFT4	0x01240051	/* stp shared nonLight tex flat quad */
+#define	GsUSTPSNG4	0x01240054	/* stp shared nonLight gour quad */
+#define	GsUSTPSNGT4	0x01240055	/* stp shared nonLight tex gour quad */
+
+#define	GsUADF3		0x00080008	/* active-div flat triangle */
+#define	GsUADFT3	0x00080009	/* active-div texture flat triangle */
+#define	GsUADG3		0x0008000c	/* active-div gour triangle */
+#define	GsUADGT3	0x0008000d	/* active-div texture gour triangle */
+#define	GsUADF4		0x00080010	/* active-div flat quad */
+#define	GsUADFT4	0x00080011	/* active-div texture flat quad */
+#define	GsUADG4		0x00080014	/* active-div gour quad */
+#define	GsUADGT4	0x00080015	/* active-div texture gour quad */
+
+#define	GsUADFF3	0x000a0008	/* active-div fog flat tri */
+#define	GsUADFFT3	0x000a0009	/* active-div fog texture flat tri */
+#define	GsUADFG3	0x000a000c	/* active-div fog gour tri */
+#define	GsUADFGT3	0x000a000d	/* active-div fog texture gour tri */
+#define	GsUADFF4	0x000a0010	/* active-div fog flat quad */
+#define	GsUADFFT4	0x000a0011	/* active-div fog texture flat quad */
+#define	GsUADFG4	0x000a0014	/* active-div fog gour quad */
+#define	GsUADFGT4	0x000a0015	/* active-div fog texture gour quad */
+
+#define	GsUADNF3	0x000c0048	/* active-div nonLight flat tri */
+#define	GsUADNFT3	0x000c0049	/* active-div nonLight tex flat tri */
+#define	GsUADNG3	0x000c004c	/* active-div nonLight gour tri */
+#define	GsUADNGT3	0x000c004d	/* active-div nonLight tex gour tri */
+#define	GsUADNF4	0x000c0050	/* active-div nonLight flat quad */
+#define	GsUADNFT4	0x000c0051	/* active-div nonLight tex flat quad */
+#define	GsUADNG4	0x000c0054	/* active-div nonLight gour quad */
+#define	GsUADNGT4	0x000c0055	/* active-div nonLight tex gour quad */
+
+#define	GsUBF3		0x00100008	/* back-f flat tri */
+#define	GsUBFT3		0x00100009	/* back-f tex flat tri */
+#define	GsUBG3		0x0010000c	/* back-f gour tri */
+#define	GsUBGT3		0x0010000d	/* back-f tex gour tri */
+#define	GsUBF4		0x00100010	/* back-f flat quad */
+#define	GsUBFT4		0x00100011	/* back-f tex flat quad */
+#define	GsUBG4		0x00100014	/* back-f gour quad */
+#define	GsUBGT4		0x00100015	/* back-f tex gour quad */
+
+#define GsUBCF3		0x0010000a	/* back-f colored flat tri */
+#define GsUBCFT3	0x0010000b	/* back-f colored tex flat tri */
+#define GsUBCG3		0x0010000e	/* back-f colored gour tri */
+#define GsUBCGT3	0x0010000f	/* back-f colored tex gour tri */
+#define GsUBCF4		0x00100012	/* back-f colored flat quad */
+#define GsUBCFT4	0x00100013	/* back-f colored tex flat quad */
+#define GsUBCG4		0x00100016	/* back-f colored gour quad */
+#define GsUBCGT4	0x00100017	/* back-f colored tex gour quad */
+
+#define	GsUBSTPF3	0x00300008	/* back-f semi-trans flat tri */
+#define	GsUBSTPFT3	0x00300009	/* back-f semi-trans tex flat tri */
+#define	GsUBSTPG3	0x0030000c	/* back-f semi-trans gour tri */
+#define	GsUBSTPGT3	0x0030000d	/* back-f semi-trans tex gour tri */
+#define	GsUBSTPF4	0x00300010	/* back-f semi-trans flat quad */
+#define	GsUBSTPFT4	0x00300011	/* back-f semi-trans tex flat quad */
+#define	GsUBSTPG4	0x00300014	/* back-f semi-trans gour quad */
+#define	GsUBSTPGT4	0x00300015	/* back-f semi-trans tex gour quad */
+
+#define	GsUBNF3		0x00140048	/* back-f noLgt flat tri */
+#define	GsUBNFT3	0x00140049	/* back-f noLgt tex flat tri */
+#define	GsUBNG3		0x0014004c	/* back-f noLgt gouraud tri */
+#define	GsUBNGT3	0x0014004d	/* back-f noLgt tex gouraud tri */
+#define	GsUBNF4		0x00140050	/* back-f noLgt flat quad */
+#define	GsUBNFT4	0x00140051	/* back-f noLgt tex flat quad */
+#define	GsUBNG4		0x00140054	/* back-f noLgt gouraud quad */
+#define	GsUBNGT4	0x00140055	/* back-f noLgt tex gouraud quad */
+
+#define	GsUBSTPNF3	0x00340048	/* back-f stp noLgt flat tri */
+#define	GsUBSTPNFT3	0x00340049	/* back-f stp noLgt tex flat tri */
+#define	GsUBSTPNG3	0x0034004c	/* back-f stp noLgt gour tri */
+#define	GsUBSTPNGT3	0x0034004d	/* back-f stp noLgt tex gour tri */
+#define	GsUBSTPNF4	0x00340050	/* back-f stp noLgt flat quad */
+#define	GsUBSTPNFT4	0x00340051	/* back-f stp noLgt tex flat quad */
+#define	GsUBSTPNG4	0x00340054	/* back-f stp noLgt gour quad */
+#define	GsUBSTPNGT4	0x00340055	/* back-f stp noLgt tex gour quad */
+
+#define	GsUBSNF3	0x01140048	/* back-f shrd noLgt flat tri */
+#define	GsUBSNFT3	0x01140049	/* back-f shrd noLgt tex flat tri */
+#define	GsUBSNG3	0x0114004c	/* back-f shrd noLgt gour tri */
+#define	GsUBSNGT3	0x0114004d	/* back-f shrd noLgt tex gour tri */
+#define	GsUBSNF4	0x01140050	/* back-f shrd noLgt flat quad */
+#define	GsUBSNFT4	0x01140051	/* back-f shrd noLgt tex flat quad */
+#define	GsUBSNG4	0x01140054	/* back-f shrd noLgt gour quad */
+#define	GsUBSNGT4	0x01140055	/* back-f shrd noLgt tex gour quad */
+
+#define	GsUBSTPSNF3	0x01340048	/* back-f stp shrd noLgt flat tri */
+#define	GsUBSTPSNFT3	0x01340049	/* back-f stp shrd noLgt tex flat tri */
+#define	GsUBSTPSNG3	0x0134004c	/* back-f stp shrd noLgt gour tri */
+#define	GsUBSTPSNGT3	0x0134004d	/* back-f stp shrd noLgt tex gour tri */
+#define	GsUBSTPSNF4	0x01340050	/* back-f stp shrd noLgt flat quad */
+#define	GsUBSTPSNFT4	0x01340051	/* back-f stp shrd noLgt tex flat quad*/
+#define	GsUBSTPSNG4	0x01340054	/* back-f stp shrd noLgt gour quad */
+#define	GsUBSTPSNGT4	0x01340055	/* back-f stp shrd noLgt tex gour quad*/
+
+#define GsUIMG0		0x02000000	/* image data with no-clut */
+#define GsUIMG1		0x02000001	/* image data with clut */
+
+#define GsUGNDF		0x05000000	/* ground flat */
+#define GsUGNDFT	0x05000001	/* ground flat texture */
+
+#define GsUSCAL2	0x06000100	/* envmap shared calculate */
+#define GsUE1G3		0x0600100c	/* envmap 1D gour tri */
+#define GsUE1G4		0x06001014	/* envmap 1D gour quad */
+#define GsUE1SG3	0x0600110c	/* envmap 1D shared gour tri */
+#define GsUE1SG4	0x06001114	/* envmap 1D shared gour quad */
+#define GsUE2LG3	0x0600200c	/* envmap 2D reflect gour tri */
+#define GsUE2LG4	0x06002014	/* envmap 2D reflect gour quad */
+#define GsUE2RG3	0x0600300c	/* envmap 2D refract gour tri */
+#define GsUE2RG4	0x06003014	/* envmap 2D refract gour quad */
+#define GsUE2RLG3	0x0600400c	/* envmap 2D both gour tri */
+#define GsUE2RLG4	0x06004014	/* envmap 2D both gour quad */
+#define GsUE2OLG3	0x0600500c	/* envmap 2D org+reflect gour tri */
+#define GsUE2OLG4	0x06005014	/* envmap 2D org+reflect gour quad */
+
+#define GsVtxMIMe	0x04010020	/* Vertex-MIMe */
+#define GsNrmMIMe	0x04010021	/* Normal-MIMe */
+#define GsRstVtxMIMe	0x04010028	/* Reset-Vertex-MIMe */
+#define GsRstNrmMIMe	0x04010029	/* Reset-Normal-MIMe */
+#define GsJntAxesMIMe	0x04010010	/* Joint-Axes-MIMe */
+#define GsRstJntAxesMIMe \
+			0x04010018	/* Reset-Joint-Axes-MIMe */
+#define GsJntRPYMIMe	0x04010011	/* Joint-RPY-MIMe */
+#define GsRstJntRPYMIMe	0x04010019	/* Reset-Joint-RPY-MIMe */
+
+/*
+ * PROTOTYPE DIFINITIONS 
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern  "C" {
+#endif
+	extern u_long *GsU_00000008(GsARGUNIT *);
+	extern u_long *GsU_00000009(GsARGUNIT *);
+	extern u_long *GsU_0000000c(GsARGUNIT *);
+	extern u_long *GsU_0000000d(GsARGUNIT *);
+	extern u_long *GsU_00000010(GsARGUNIT *);
+	extern u_long *GsU_00000020(GsARGUNIT *);
+	extern u_long *GsU_00000011(GsARGUNIT *);
+	extern u_long *GsU_00000014(GsARGUNIT *);
+	extern u_long *GsU_00000015(GsARGUNIT *);
+	extern u_long *GsU_00020008(GsARGUNIT *);
+	extern u_long *GsU_00020009(GsARGUNIT *);
+	extern u_long *GsU_0002000c(GsARGUNIT *);
+	extern u_long *GsU_0002000d(GsARGUNIT *);
+	extern u_long *GsU_00020010(GsARGUNIT *);
+	extern u_long *GsU_00020011(GsARGUNIT *);
+	extern u_long *GsU_00020014(GsARGUNIT *);
+	extern u_long *GsU_00020015(GsARGUNIT *);
+	extern u_long *GsU_0000000a(GsARGUNIT *);
+	extern u_long *GsU_0000000b(GsARGUNIT *);
+	extern u_long *GsU_0000000e(GsARGUNIT *);
+	extern u_long *GsU_0000000f(GsARGUNIT *);
+	extern u_long *GsU_00000012(GsARGUNIT *);
+	extern u_long *GsU_00000013(GsARGUNIT *);
+	extern u_long *GsU_00000016(GsARGUNIT *);
+	extern u_long *GsU_00000017(GsARGUNIT *);
+	extern u_long *GsU_00030008(GsARGUNIT *);
+	extern u_long *GsU_00030009(GsARGUNIT *);
+	extern u_long *GsU_0003000c(GsARGUNIT *);
+	extern u_long *GsU_0003000d(GsARGUNIT *);
+	extern u_long *GsU_00030010(GsARGUNIT *);
+	extern u_long *GsU_00030011(GsARGUNIT *);
+	extern u_long *GsU_00030014(GsARGUNIT *);
+	extern u_long *GsU_00030015(GsARGUNIT *);
+	extern u_long *GsU_00040048(GsARGUNIT *);
+	extern u_long *GsU_00040049(GsARGUNIT *);
+	extern u_long *GsU_0004004c(GsARGUNIT *);
+	extern u_long *GsU_0004004d(GsARGUNIT *);
+	extern u_long *GsU_00040050(GsARGUNIT *);
+	extern u_long *GsU_00040051(GsARGUNIT *);
+	extern u_long *GsU_00040054(GsARGUNIT *);
+	extern u_long *GsU_00040055(GsARGUNIT *);
+	extern u_long *GsU_00010008(GsARGUNIT *);
+	extern u_long *GsU_00010009(GsARGUNIT *);
+	extern u_long *GsU_0001000c(GsARGUNIT *);
+	extern u_long *GsU_0001000d(GsARGUNIT *);
+	extern u_long *GsU_00010010(GsARGUNIT *);
+	extern u_long *GsU_00010011(GsARGUNIT *);
+	extern u_long *GsU_00010014(GsARGUNIT *);
+	extern u_long *GsU_00010015(GsARGUNIT *);
+	extern u_long *GsU_00050048(GsARGUNIT *);
+	extern u_long *GsU_00050049(GsARGUNIT *);
+	extern u_long *GsU_0005004c(GsARGUNIT *);
+	extern u_long *GsU_0005004d(GsARGUNIT *);
+	extern u_long *GsU_00050050(GsARGUNIT *);
+	extern u_long *GsU_00050051(GsARGUNIT *);
+	extern u_long *GsU_00050054(GsARGUNIT *);
+	extern u_long *GsU_00050055(GsARGUNIT *);
+	extern u_long *GsU_00040058(GsARGUNIT *);
+	extern u_long *GsU_00040059(GsARGUNIT *);
+	extern u_long *GsU_0004005c(GsARGUNIT *);
+	extern u_long *GsU_0004005d(GsARGUNIT *);
+	extern u_long *GsU_01000000(GsARGUNIT *);
+	extern u_long *GsU_0100000c(GsARGUNIT *);
+	extern u_long *GsU_0100000d(GsARGUNIT *);
+	extern u_long *GsU_01000014(GsARGUNIT *);
+	extern u_long *GsU_01000015(GsARGUNIT *);
+	extern u_long *GsU_0102000c(GsARGUNIT *);
+	extern u_long *GsU_0102000d(GsARGUNIT *);
+	extern u_long *GsU_01020014(GsARGUNIT *);
+	extern u_long *GsU_01020015(GsARGUNIT *);
+	extern u_long *GsU_01040048(GsARGUNIT *);
+	extern u_long *GsU_01040049(GsARGUNIT *);
+	extern u_long *GsU_0104004c(GsARGUNIT *);
+	extern u_long *GsU_0104004d(GsARGUNIT *);
+	extern u_long *GsU_01040050(GsARGUNIT *);
+	extern u_long *GsU_01040051(GsARGUNIT *);
+	extern u_long *GsU_01040054(GsARGUNIT *);
+	extern u_long *GsU_01040055(GsARGUNIT *);
+	extern u_long *GsU_00000018(GsARGUNIT *);
+	extern u_long *GsU_00000019(GsARGUNIT *);
+	extern u_long *GsU_0000001c(GsARGUNIT *);
+	extern u_long *GsU_0000001d(GsARGUNIT *);
+	extern u_long *GsU_00000209(GsARGUNIT *);
+	extern u_long *GsU_0000020d(GsARGUNIT *);
+	extern u_long *GsU_00000211(GsARGUNIT *);
+	extern u_long *GsU_00000215(GsARGUNIT *);
+	extern u_long *GsU_02000000(GsARGUNIT *);
+	extern u_long *GsU_02000001(GsARGUNIT *);
+	extern u_long *GsU_00040148(GsARGUNIT *);
+	extern u_long *GsU_00040149(GsARGUNIT *);
+	extern u_long *GsU_0004014c(GsARGUNIT *);
+	extern u_long *GsU_0004014d(GsARGUNIT *);
+	extern u_long *GsU_00040150(GsARGUNIT *);
+	extern u_long *GsU_00040151(GsARGUNIT *);
+	extern u_long *GsU_00040154(GsARGUNIT *);
+	extern u_long *GsU_00040155(GsARGUNIT *);
+	extern u_long *GsU_00200008(GsARGUNIT *);
+	extern u_long *GsU_00200009(GsARGUNIT *);
+	extern u_long *GsU_0020000c(GsARGUNIT *);
+	extern u_long *GsU_0020000d(GsARGUNIT *);
+	extern u_long *GsU_00200010(GsARGUNIT *);
+	extern u_long *GsU_00200011(GsARGUNIT *);
+	extern u_long *GsU_00200014(GsARGUNIT *);
+	extern u_long *GsU_00200015(GsARGUNIT *);
+	extern u_long *GsU_0120000c(GsARGUNIT *);
+	extern u_long *GsU_0120000d(GsARGUNIT *);
+	extern u_long *GsU_01200014(GsARGUNIT *);
+	extern u_long *GsU_01200015(GsARGUNIT *);
+	extern u_long *GsU_00240048(GsARGUNIT *);
+	extern u_long *GsU_00240049(GsARGUNIT *);
+	extern u_long *GsU_0024004c(GsARGUNIT *);
+	extern u_long *GsU_0024004d(GsARGUNIT *);
+	extern u_long *GsU_00240050(GsARGUNIT *);
+	extern u_long *GsU_00240051(GsARGUNIT *);
+	extern u_long *GsU_00240054(GsARGUNIT *);
+	extern u_long *GsU_00240055(GsARGUNIT *);
+	extern u_long *GsU_01240048(GsARGUNIT *);
+	extern u_long *GsU_01240049(GsARGUNIT *);
+	extern u_long *GsU_0124004c(GsARGUNIT *);
+	extern u_long *GsU_0124004d(GsARGUNIT *);
+	extern u_long *GsU_01240050(GsARGUNIT *);
+	extern u_long *GsU_01240051(GsARGUNIT *);
+	extern u_long *GsU_01240054(GsARGUNIT *);
+	extern u_long *GsU_01240055(GsARGUNIT *);
+	extern u_long *GsU_00080008(GsARGUNIT *);
+	extern u_long *GsU_00080009(GsARGUNIT *);
+	extern u_long *GsU_0008000c(GsARGUNIT *);
+	extern u_long *GsU_0008000d(GsARGUNIT *);
+	extern u_long *GsU_00080010(GsARGUNIT *);
+	extern u_long *GsU_00080011(GsARGUNIT *);
+	extern u_long *GsU_00080014(GsARGUNIT *);
+	extern u_long *GsU_00080015(GsARGUNIT *);
+	extern u_long *GsU_000a0008(GsARGUNIT *);
+	extern u_long *GsU_000a0009(GsARGUNIT *);
+	extern u_long *GsU_000a000c(GsARGUNIT *);
+	extern u_long *GsU_000a000d(GsARGUNIT *);
+	extern u_long *GsU_000a0010(GsARGUNIT *);
+	extern u_long *GsU_000a0011(GsARGUNIT *);
+	extern u_long *GsU_000a0014(GsARGUNIT *);
+	extern u_long *GsU_000a0015(GsARGUNIT *);
+	extern u_long *GsU_000c0048(GsARGUNIT *);
+	extern u_long *GsU_000c0049(GsARGUNIT *);
+	extern u_long *GsU_000c004c(GsARGUNIT *);
+	extern u_long *GsU_000c004d(GsARGUNIT *);
+	extern u_long *GsU_000c0050(GsARGUNIT *);
+	extern u_long *GsU_000c0051(GsARGUNIT *);
+	extern u_long *GsU_000c0054(GsARGUNIT *);
+	extern u_long *GsU_000c0055(GsARGUNIT *);
+	extern u_long *GsU_0100020d(GsARGUNIT *);
+	extern u_long *GsU_01000215(GsARGUNIT *);
+
+	extern u_long *GsU_00100008(GsARGUNIT *);
+	extern u_long *GsU_00100009(GsARGUNIT *);
+	extern u_long *GsU_0010000a(GsARGUNIT *);
+	extern u_long *GsU_0010000b(GsARGUNIT *);
+	extern u_long *GsU_0010000c(GsARGUNIT *);
+	extern u_long *GsU_0010000d(GsARGUNIT *);
+	extern u_long *GsU_0010000e(GsARGUNIT *);
+	extern u_long *GsU_0010000f(GsARGUNIT *);
+	extern u_long *GsU_00100010(GsARGUNIT *);
+	extern u_long *GsU_00100011(GsARGUNIT *);
+	extern u_long *GsU_00100012(GsARGUNIT *);
+	extern u_long *GsU_00100013(GsARGUNIT *);
+	extern u_long *GsU_00100014(GsARGUNIT *);
+	extern u_long *GsU_00100015(GsARGUNIT *);
+	extern u_long *GsU_00100016(GsARGUNIT *);
+	extern u_long *GsU_00100017(GsARGUNIT *);
+	extern u_long *GsU_00300008(GsARGUNIT *);
+	extern u_long *GsU_00300009(GsARGUNIT *);
+	extern u_long *GsU_0030000c(GsARGUNIT *);
+	extern u_long *GsU_0030000d(GsARGUNIT *);
+	extern u_long *GsU_00300010(GsARGUNIT *);
+	extern u_long *GsU_00300011(GsARGUNIT *);
+	extern u_long *GsU_00300014(GsARGUNIT *);
+	extern u_long *GsU_00300015(GsARGUNIT *);
+	extern u_long *GsU_00140048(GsARGUNIT *);
+	extern u_long *GsU_00140049(GsARGUNIT *);
+	extern u_long *GsU_0014004c(GsARGUNIT *);
+	extern u_long *GsU_0014004d(GsARGUNIT *);
+	extern u_long *GsU_00140050(GsARGUNIT *);
+	extern u_long *GsU_00140051(GsARGUNIT *);
+	extern u_long *GsU_00140054(GsARGUNIT *);
+	extern u_long *GsU_00140055(GsARGUNIT *);
+	extern u_long *GsU_00340048(GsARGUNIT *);
+	extern u_long *GsU_00340049(GsARGUNIT *);
+	extern u_long *GsU_0034004c(GsARGUNIT *);
+	extern u_long *GsU_0034004d(GsARGUNIT *);
+	extern u_long *GsU_00340050(GsARGUNIT *);
+	extern u_long *GsU_00340051(GsARGUNIT *);
+	extern u_long *GsU_00340054(GsARGUNIT *);
+	extern u_long *GsU_00340055(GsARGUNIT *);
+	extern u_long *GsU_01140048(GsARGUNIT *);
+	extern u_long *GsU_01140049(GsARGUNIT *);
+	extern u_long *GsU_0114004c(GsARGUNIT *);
+	extern u_long *GsU_0114004d(GsARGUNIT *);
+	extern u_long *GsU_01140050(GsARGUNIT *);
+	extern u_long *GsU_01140051(GsARGUNIT *);
+	extern u_long *GsU_01140054(GsARGUNIT *);
+	extern u_long *GsU_01140055(GsARGUNIT *);
+	extern u_long *GsU_01340048(GsARGUNIT *);
+	extern u_long *GsU_01340049(GsARGUNIT *);
+	extern u_long *GsU_0134004c(GsARGUNIT *);
+	extern u_long *GsU_0134004d(GsARGUNIT *);
+	extern u_long *GsU_01340050(GsARGUNIT *);
+	extern u_long *GsU_01340051(GsARGUNIT *);
+	extern u_long *GsU_01340054(GsARGUNIT *);
+	extern u_long *GsU_01340055(GsARGUNIT *);
+
+	extern u_long *GsU_0020000a(GsARGUNIT *);
+	extern u_long *GsU_0020000b(GsARGUNIT *);
+	extern u_long *GsU_0020000e(GsARGUNIT *);
+	extern u_long *GsU_0020000f(GsARGUNIT *);
+	extern u_long *GsU_00200012(GsARGUNIT *);
+	extern u_long *GsU_00200013(GsARGUNIT *);
+	extern u_long *GsU_00200016(GsARGUNIT *);
+	extern u_long *GsU_00200017(GsARGUNIT *);
+	extern u_long *GsU_0030000a(GsARGUNIT *);
+	extern u_long *GsU_0030000b(GsARGUNIT *);
+	extern u_long *GsU_0030000e(GsARGUNIT *);
+	extern u_long *GsU_0030000f(GsARGUNIT *);
+	extern u_long *GsU_00300012(GsARGUNIT *);
+	extern u_long *GsU_00300013(GsARGUNIT *);
+	extern u_long *GsU_00300016(GsARGUNIT *);
+	extern u_long *GsU_00300017(GsARGUNIT *);
+
+	extern u_long *GsU_0100000e(GsARGUNIT *);
+	extern u_long *GsU_0100000f(GsARGUNIT *);
+	extern u_long *GsU_01000016(GsARGUNIT *);
+	extern u_long *GsU_01000017(GsARGUNIT *);
+	extern u_long *GsU_0120000e(GsARGUNIT *);
+	extern u_long *GsU_0120000f(GsARGUNIT *);
+	extern u_long *GsU_01200016(GsARGUNIT *);
+	extern u_long *GsU_01200017(GsARGUNIT *);
+
+	extern u_long *GsU_0002000a(GsARGUNIT *);
+	extern u_long *GsU_0002000b(GsARGUNIT *);
+	extern u_long *GsU_0002000e(GsARGUNIT *);
+	extern u_long *GsU_0002000f(GsARGUNIT *);
+	extern u_long *GsU_00020012(GsARGUNIT *);
+	extern u_long *GsU_00020013(GsARGUNIT *);
+	extern u_long *GsU_00020016(GsARGUNIT *);
+	extern u_long *GsU_00020017(GsARGUNIT *);
+	extern u_long *GsU_0102000e(GsARGUNIT *);
+	extern u_long *GsU_0102000f(GsARGUNIT *);
+	extern u_long *GsU_01020016(GsARGUNIT *);
+	extern u_long *GsU_01020017(GsARGUNIT *);
+
+	/* tiled texture */
+	extern u_long *GsU_0000020b(GsARGUNIT *);
+	extern u_long *GsU_0000020f(GsARGUNIT *);
+	extern u_long *GsU_00000213(GsARGUNIT *);
+	extern u_long *GsU_00000217(GsARGUNIT *);
+	extern u_long *GsU_00020209(GsARGUNIT *);
+	extern u_long *GsU_0002020b(GsARGUNIT *);
+	extern u_long *GsU_0002020d(GsARGUNIT *);
+	extern u_long *GsU_0002020f(GsARGUNIT *);
+	extern u_long *GsU_00020211(GsARGUNIT *);
+	extern u_long *GsU_00020213(GsARGUNIT *);
+	extern u_long *GsU_00020215(GsARGUNIT *);
+	extern u_long *GsU_00020217(GsARGUNIT *);
+	extern u_long *GsU_00040249(GsARGUNIT *);
+	extern u_long *GsU_0004024d(GsARGUNIT *);
+	extern u_long *GsU_00040251(GsARGUNIT *);
+	extern u_long *GsU_00040255(GsARGUNIT *);
+	extern u_long *GsU_00100209(GsARGUNIT *);
+	extern u_long *GsU_0010020b(GsARGUNIT *);
+	extern u_long *GsU_0010020d(GsARGUNIT *);
+	extern u_long *GsU_0010020f(GsARGUNIT *);
+	extern u_long *GsU_00100211(GsARGUNIT *);
+	extern u_long *GsU_00100213(GsARGUNIT *);
+	extern u_long *GsU_00100215(GsARGUNIT *);
+	extern u_long *GsU_00100217(GsARGUNIT *);
+	extern u_long *GsU_00200209(GsARGUNIT *);
+	extern u_long *GsU_0020020d(GsARGUNIT *);
+	extern u_long *GsU_00200211(GsARGUNIT *);
+	extern u_long *GsU_00200215(GsARGUNIT *);
+	extern u_long *GsU_00240249(GsARGUNIT *);
+	extern u_long *GsU_0024024d(GsARGUNIT *);
+	extern u_long *GsU_00240251(GsARGUNIT *);
+	extern u_long *GsU_00240255(GsARGUNIT *);
+	extern u_long *GsU_00300209(GsARGUNIT *);
+	extern u_long *GsU_0030020d(GsARGUNIT *);
+	extern u_long *GsU_00300211(GsARGUNIT *);
+	extern u_long *GsU_00300215(GsARGUNIT *);
+	extern u_long *GsU_0100020f(GsARGUNIT *);
+	extern u_long *GsU_01000217(GsARGUNIT *);
+	extern u_long *GsU_0102020d(GsARGUNIT *);
+	extern u_long *GsU_0102020f(GsARGUNIT *);
+	extern u_long *GsU_01020215(GsARGUNIT *);
+	extern u_long *GsU_01020217(GsARGUNIT *);
+	extern u_long *GsU_01040249(GsARGUNIT *);
+	extern u_long *GsU_0104024d(GsARGUNIT *);
+	extern u_long *GsU_01040251(GsARGUNIT *);
+	extern u_long *GsU_01040255(GsARGUNIT *);
+	extern u_long *GsU_0120020d(GsARGUNIT *);
+	extern u_long *GsU_01200215(GsARGUNIT *);
+	extern u_long *GsU_01240249(GsARGUNIT *);
+	extern u_long *GsU_0124024d(GsARGUNIT *);
+	extern u_long *GsU_01240251(GsARGUNIT *);
+	extern u_long *GsU_01240255(GsARGUNIT *);
+	extern u_long *GsU_00140249(GsARGUNIT *);
+	extern u_long *GsU_0014024d(GsARGUNIT *);
+	extern u_long *GsU_00140251(GsARGUNIT *);
+	extern u_long *GsU_00140255(GsARGUNIT *);
+	extern u_long *GsU_00340249(GsARGUNIT *);
+	extern u_long *GsU_0034024d(GsARGUNIT *);
+	extern u_long *GsU_00340251(GsARGUNIT *);
+	extern u_long *GsU_00340255(GsARGUNIT *);
+	extern u_long *GsU_01140249(GsARGUNIT *);
+	extern u_long *GsU_0114024d(GsARGUNIT *);
+	extern u_long *GsU_01140251(GsARGUNIT *);
+	extern u_long *GsU_01140255(GsARGUNIT *);
+	extern u_long *GsU_01340249(GsARGUNIT *);
+	extern u_long *GsU_0134024d(GsARGUNIT *);
+	extern u_long *GsU_01340251(GsARGUNIT *);
+	extern u_long *GsU_01340255(GsARGUNIT *);
+	extern u_long *GsU_0020020b(GsARGUNIT *);
+	extern u_long *GsU_0020020f(GsARGUNIT *);
+	extern u_long *GsU_00200213(GsARGUNIT *);
+	extern u_long *GsU_00200217(GsARGUNIT *);
+	extern u_long *GsU_0030020b(GsARGUNIT *);
+	extern u_long *GsU_0030020f(GsARGUNIT *);
+	extern u_long *GsU_00300213(GsARGUNIT *);
+	extern u_long *GsU_00300217(GsARGUNIT *);
+	extern u_long *GsU_0120020f(GsARGUNIT *);
+	extern u_long *GsU_01200217(GsARGUNIT *);
+
+	extern u_long *GsU_00000000(GsARGUNIT *);
+
+	extern u_long *GsU_05000000(GsARGUNIT *);
+	extern u_long *GsU_05000001(GsARGUNIT *);
+
+	/* camera */
+	extern u_long *GsU_07000100(GsARGUNIT *);
+	extern u_long *GsU_07010100(GsARGUNIT *);
+	extern u_long *GsU_07020100(GsARGUNIT *);
+	extern u_long *GsU_07030100(GsARGUNIT *);
+
+	/* light */
+	extern u_long *GsU_07000200(GsARGUNIT *);
+	extern u_long *GsU_07010200(GsARGUNIT *);
+	extern u_long *GsU_07020200(GsARGUNIT *);
+	extern u_long *GsU_07030200(GsARGUNIT *);
+	
+	/* update driver */
+	extern u_long *GsU_03000000(GsARGUNIT_ANIM *);
+	
+	/* interpolation driver */
+	extern int	GsU_03000001(GsARGUNIT_ANIM *);
+	extern int	GsU_03000002(GsARGUNIT_ANIM *);
+	extern int	GsU_03000003(GsARGUNIT_ANIM *);
+	extern int	GsU_03000009(GsARGUNIT_ANIM *);
+	extern int	GsU_0300000a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300000b(GsARGUNIT_ANIM *);
+	extern int	GsU_03000010(GsARGUNIT_ANIM *);
+	extern int	GsU_03000011(GsARGUNIT_ANIM *);
+	extern int	GsU_03000012(GsARGUNIT_ANIM *);
+	extern int	GsU_03000013(GsARGUNIT_ANIM *);
+	extern int	GsU_03000019(GsARGUNIT_ANIM *);
+	extern int	GsU_0300001a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300001b(GsARGUNIT_ANIM *);
+	extern int	GsU_03000020(GsARGUNIT_ANIM *);
+	extern int	GsU_03000021(GsARGUNIT_ANIM *);
+	extern int	GsU_03000022(GsARGUNIT_ANIM *);
+	extern int	GsU_03000023(GsARGUNIT_ANIM *);
+	extern int	GsU_03000029(GsARGUNIT_ANIM *);
+	extern int	GsU_0300002a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300002b(GsARGUNIT_ANIM *);
+	extern int	GsU_03000030(GsARGUNIT_ANIM *);
+	extern int	GsU_03000031(GsARGUNIT_ANIM *);
+	extern int	GsU_03000032(GsARGUNIT_ANIM *);
+	extern int	GsU_03000033(GsARGUNIT_ANIM *);
+	extern int	GsU_03000039(GsARGUNIT_ANIM *);
+	extern int	GsU_0300003a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300003b(GsARGUNIT_ANIM *);
+	extern int	GsU_03000100(GsARGUNIT_ANIM *);
+	extern int	GsU_03000111(GsARGUNIT_ANIM *);
+	extern int	GsU_03000112(GsARGUNIT_ANIM *);
+	extern int	GsU_03000119(GsARGUNIT_ANIM *);
+	extern int	GsU_0300011a(GsARGUNIT_ANIM *);
+	extern int	GsU_03000901(GsARGUNIT_ANIM *);
+	extern int	GsU_03000902(GsARGUNIT_ANIM *);
+	extern int	GsU_03000909(GsARGUNIT_ANIM *);
+	extern int	GsU_0300090a(GsARGUNIT_ANIM *);
+	extern int	GsU_03000910(GsARGUNIT_ANIM *);
+	extern int	GsU_03000911(GsARGUNIT_ANIM *);
+	extern int	GsU_03000912(GsARGUNIT_ANIM *);
+	extern int	GsU_03000919(GsARGUNIT_ANIM *);
+	extern int	GsU_0300091a(GsARGUNIT_ANIM *);
+	extern int	GsU_03001010(GsARGUNIT_ANIM *);
+	extern int	GsU_03001011(GsARGUNIT_ANIM *);
+	extern int	GsU_03001012(GsARGUNIT_ANIM *);
+	extern int	GsU_03001013(GsARGUNIT_ANIM *);
+	extern int	GsU_03001019(GsARGUNIT_ANIM *);
+	extern int	GsU_0300101a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300101b(GsARGUNIT_ANIM *);
+	extern int	GsU_03001020(GsARGUNIT_ANIM *);
+	extern int	GsU_03001021(GsARGUNIT_ANIM *);
+	extern int	GsU_03001022(GsARGUNIT_ANIM *);
+	extern int	GsU_03001023(GsARGUNIT_ANIM *);
+	extern int	GsU_03001029(GsARGUNIT_ANIM *);
+	extern int	GsU_0300102a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300102b(GsARGUNIT_ANIM *);
+	extern int	GsU_03001030(GsARGUNIT_ANIM *);
+	extern int	GsU_03001031(GsARGUNIT_ANIM *);
+	extern int	GsU_03001032(GsARGUNIT_ANIM *);
+	extern int	GsU_03001033(GsARGUNIT_ANIM *);
+	extern int	GsU_03001039(GsARGUNIT_ANIM *);
+	extern int	GsU_0300103a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300103b(GsARGUNIT_ANIM *);
+	extern int	GsU_03001111(GsARGUNIT_ANIM *);
+	extern int	GsU_03001112(GsARGUNIT_ANIM *);
+	extern int	GsU_03001119(GsARGUNIT_ANIM *);
+	extern int	GsU_0300111a(GsARGUNIT_ANIM *);
+	extern int	GsU_03001910(GsARGUNIT_ANIM *);
+	extern int	GsU_03001911(GsARGUNIT_ANIM *);
+	extern int	GsU_03001912(GsARGUNIT_ANIM *);
+	extern int	GsU_03001919(GsARGUNIT_ANIM *);
+	extern int	GsU_0300191a(GsARGUNIT_ANIM *);
+	extern int	GsU_03002010(GsARGUNIT_ANIM *);
+	extern int	GsU_03002011(GsARGUNIT_ANIM *);
+	extern int	GsU_03002012(GsARGUNIT_ANIM *);
+	extern int	GsU_03002013(GsARGUNIT_ANIM *);
+	extern int	GsU_03002019(GsARGUNIT_ANIM *);
+	extern int	GsU_0300201a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300201b(GsARGUNIT_ANIM *);
+	extern int	GsU_03002020(GsARGUNIT_ANIM *);
+	extern int	GsU_03002021(GsARGUNIT_ANIM *);
+	extern int	GsU_03002022(GsARGUNIT_ANIM *);
+	extern int	GsU_03002023(GsARGUNIT_ANIM *);
+	extern int	GsU_03002029(GsARGUNIT_ANIM *);
+	extern int	GsU_0300202a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300202b(GsARGUNIT_ANIM *);
+	extern int	GsU_03002030(GsARGUNIT_ANIM *);
+	extern int	GsU_03002031(GsARGUNIT_ANIM *);
+	extern int	GsU_03002032(GsARGUNIT_ANIM *);
+	extern int	GsU_03002033(GsARGUNIT_ANIM *);
+	extern int	GsU_03002039(GsARGUNIT_ANIM *);
+	extern int	GsU_0300203a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300203b(GsARGUNIT_ANIM *);
+	extern int	GsU_03002111(GsARGUNIT_ANIM *);
+	extern int	GsU_03002112(GsARGUNIT_ANIM *);
+	extern int	GsU_03002119(GsARGUNIT_ANIM *);
+	extern int	GsU_0300211a(GsARGUNIT_ANIM *);
+	extern int	GsU_03002910(GsARGUNIT_ANIM *);
+	extern int	GsU_03002911(GsARGUNIT_ANIM *);
+	extern int	GsU_03002912(GsARGUNIT_ANIM *);
+	extern int	GsU_03002919(GsARGUNIT_ANIM *);
+	extern int	GsU_0300291a(GsARGUNIT_ANIM *);
+	extern int	GsU_03003010(GsARGUNIT_ANIM *);
+	extern int	GsU_03003011(GsARGUNIT_ANIM *);
+	extern int	GsU_03003012(GsARGUNIT_ANIM *);
+	extern int	GsU_03003013(GsARGUNIT_ANIM *);
+	extern int	GsU_03003019(GsARGUNIT_ANIM *);
+	extern int	GsU_0300301a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300301b(GsARGUNIT_ANIM *);
+	extern int	GsU_03003020(GsARGUNIT_ANIM *);
+	extern int	GsU_03003021(GsARGUNIT_ANIM *);
+	extern int	GsU_03003022(GsARGUNIT_ANIM *);
+	extern int	GsU_03003023(GsARGUNIT_ANIM *);
+	extern int	GsU_03003029(GsARGUNIT_ANIM *);
+	extern int	GsU_0300302a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300302b(GsARGUNIT_ANIM *);
+	extern int	GsU_03003030(GsARGUNIT_ANIM *);
+	extern int	GsU_03003031(GsARGUNIT_ANIM *);
+	extern int	GsU_03003032(GsARGUNIT_ANIM *);
+	extern int	GsU_03003033(GsARGUNIT_ANIM *);
+	extern int	GsU_03003039(GsARGUNIT_ANIM *);
+	extern int	GsU_0300303a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300303b(GsARGUNIT_ANIM *);
+	extern int	GsU_03003111(GsARGUNIT_ANIM *);
+	extern int	GsU_03003112(GsARGUNIT_ANIM *);
+	extern int	GsU_03003119(GsARGUNIT_ANIM *);
+	extern int	GsU_0300311a(GsARGUNIT_ANIM *);
+	extern int	GsU_03003910(GsARGUNIT_ANIM *);
+	extern int	GsU_03003911(GsARGUNIT_ANIM *);
+	extern int	GsU_03003912(GsARGUNIT_ANIM *);
+	extern int	GsU_03003919(GsARGUNIT_ANIM *);
+	extern int	GsU_0300391a(GsARGUNIT_ANIM *);
+	extern int	GsU_03004010(GsARGUNIT_ANIM *);
+	extern int	GsU_03004011(GsARGUNIT_ANIM *);
+	extern int	GsU_03004012(GsARGUNIT_ANIM *);
+	extern int	GsU_03004013(GsARGUNIT_ANIM *);
+	extern int	GsU_03004019(GsARGUNIT_ANIM *);
+	extern int	GsU_0300401a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300401b(GsARGUNIT_ANIM *);
+	extern int	GsU_03004020(GsARGUNIT_ANIM *);
+	extern int	GsU_03004021(GsARGUNIT_ANIM *);
+	extern int	GsU_03004022(GsARGUNIT_ANIM *);
+	extern int	GsU_03004023(GsARGUNIT_ANIM *);
+	extern int	GsU_03004029(GsARGUNIT_ANIM *);
+	extern int	GsU_0300402a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300402b(GsARGUNIT_ANIM *);
+	extern int	GsU_03004030(GsARGUNIT_ANIM *);
+	extern int	GsU_03004031(GsARGUNIT_ANIM *);
+	extern int	GsU_03004032(GsARGUNIT_ANIM *);
+	extern int	GsU_03004033(GsARGUNIT_ANIM *);
+	extern int	GsU_03004039(GsARGUNIT_ANIM *);
+	extern int	GsU_0300403a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300403b(GsARGUNIT_ANIM *);
+	extern int	GsU_03004111(GsARGUNIT_ANIM *);
+	extern int	GsU_03004112(GsARGUNIT_ANIM *);
+	extern int	GsU_03004119(GsARGUNIT_ANIM *);
+	extern int	GsU_0300411a(GsARGUNIT_ANIM *);
+	extern int	GsU_03004910(GsARGUNIT_ANIM *);
+	extern int	GsU_03004911(GsARGUNIT_ANIM *);
+	extern int	GsU_03004912(GsARGUNIT_ANIM *);
+	extern int	GsU_03004919(GsARGUNIT_ANIM *);
+	extern int	GsU_0300491a(GsARGUNIT_ANIM *);
+	extern int	GsU_03005010(GsARGUNIT_ANIM *);
+	extern int	GsU_03005011(GsARGUNIT_ANIM *);
+	extern int	GsU_03005012(GsARGUNIT_ANIM *);
+	extern int	GsU_03005013(GsARGUNIT_ANIM *);
+	extern int	GsU_03005019(GsARGUNIT_ANIM *);
+	extern int	GsU_0300501a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300501b(GsARGUNIT_ANIM *);
+	extern int	GsU_03005020(GsARGUNIT_ANIM *);
+	extern int	GsU_03005021(GsARGUNIT_ANIM *);
+	extern int	GsU_03005022(GsARGUNIT_ANIM *);
+	extern int	GsU_03005023(GsARGUNIT_ANIM *);
+	extern int	GsU_03005029(GsARGUNIT_ANIM *);
+	extern int	GsU_0300502a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300502b(GsARGUNIT_ANIM *);
+	extern int	GsU_03005030(GsARGUNIT_ANIM *);
+	extern int	GsU_03005031(GsARGUNIT_ANIM *);
+	extern int	GsU_03005032(GsARGUNIT_ANIM *);
+	extern int	GsU_03005033(GsARGUNIT_ANIM *);
+	extern int	GsU_03005039(GsARGUNIT_ANIM *);
+	extern int	GsU_0300503a(GsARGUNIT_ANIM *);
+	extern int	GsU_0300503b(GsARGUNIT_ANIM *);
+	extern int	GsU_03005111(GsARGUNIT_ANIM *);
+	extern int	GsU_03005112(GsARGUNIT_ANIM *);
+	extern int	GsU_03005119(GsARGUNIT_ANIM *);
+	extern int	GsU_0300511a(GsARGUNIT_ANIM *);
+	extern int	GsU_03005910(GsARGUNIT_ANIM *);
+	extern int	GsU_03005911(GsARGUNIT_ANIM *);
+	extern int	GsU_03005912(GsARGUNIT_ANIM *);
+	extern int	GsU_03005919(GsARGUNIT_ANIM *);
+	extern int	GsU_0300591a(GsARGUNIT_ANIM *);
+	extern int	GsU_03010110(GsARGUNIT_ANIM *);
+	extern int	GsU_03010111(GsARGUNIT_ANIM *);
+	extern int	GsU_03010112(GsARGUNIT_ANIM *);
+	extern int	GsU_03010121(GsARGUNIT_ANIM *);
+	extern int	GsU_03010122(GsARGUNIT_ANIM *);
+	extern int	GsU_03010141(GsARGUNIT_ANIM *);
+	extern int	GsU_03010142(GsARGUNIT_ANIM *);
+	extern int	GsU_03010171(GsARGUNIT_ANIM *);
+	extern int	GsU_03010172(GsARGUNIT_ANIM *);
+	extern int	GsU_03010182(GsARGUNIT_ANIM *);
+	extern int	GsU_03010210(GsARGUNIT_ANIM *);
+	extern int	GsU_03010211(GsARGUNIT_ANIM *);
+	extern int	GsU_03010212(GsARGUNIT_ANIM *);
+	extern int	GsU_03010221(GsARGUNIT_ANIM *);
+	extern int	GsU_03010222(GsARGUNIT_ANIM *);
+	extern int	GsU_03010241(GsARGUNIT_ANIM *);
+	extern int	GsU_03010242(GsARGUNIT_ANIM *);
+	extern int	GsU_03010271(GsARGUNIT_ANIM *);
+	extern int	GsU_03010272(GsARGUNIT_ANIM *);
+	extern int	GsU_03010310(GsARGUNIT_ANIM *);
+	extern int	GsU_03010311(GsARGUNIT_ANIM *);
+	extern int	GsU_03010312(GsARGUNIT_ANIM *);
+	extern int	GsU_03010321(GsARGUNIT_ANIM *);
+	extern int	GsU_03010322(GsARGUNIT_ANIM *);
+	extern int	GsU_03010341(GsARGUNIT_ANIM *);
+	extern int	GsU_03010342(GsARGUNIT_ANIM *);
+	extern int	GsU_03010371(GsARGUNIT_ANIM *);
+	extern int	GsU_03010372(GsARGUNIT_ANIM *);
+
+	/* envmap driver */
+	extern u_long *GsU_06000100(GsARGUNIT *sp);
+	extern u_long *GsU_0600100c(GsARGUNIT *sp);
+	extern u_long *GsU_06001014(GsARGUNIT *sp);
+	extern u_long *GsU_0600110c(GsARGUNIT *sp);
+	extern u_long *GsU_06001114(GsARGUNIT *sp);
+	extern u_long *GsU_0600200c(GsARGUNIT *sp);
+	extern u_long *GsU_06002014(GsARGUNIT *sp);
+	extern u_long *GsU_0600300c(GsARGUNIT *sp);
+	extern u_long *GsU_06003014(GsARGUNIT *sp);
+	extern u_long *GsU_0600400c(GsARGUNIT *sp);
+	extern u_long *GsU_06004014(GsARGUNIT *sp);
+	extern u_long *GsU_0600500c(GsARGUNIT *sp);
+	extern u_long *GsU_06005014(GsARGUNIT *sp);
+
+	/* MIMe driver */
+	extern u_long *GsU_04010020(GsARGUNIT *);
+	extern u_long *GsU_04010021(GsARGUNIT *);
+	extern u_long *GsU_04010028(GsARGUNIT *);
+	extern u_long *GsU_04010029(GsARGUNIT *);
+	extern u_long *GsU_04010010(GsARGUNIT *);
+	extern u_long *GsU_04010018(GsARGUNIT *);
+	extern u_long *GsU_04010011(GsARGUNIT *);
+	extern u_long *GsU_04010019(GsARGUNIT *);
+
+	extern GsCOORDUNIT *GsMapCoordUnit(u_long *, u_long *);
+	extern u_long *GsGetHeadpUnit(void);
+	extern int GsScanUnit(u_long *, GsTYPEUNIT *, GsOT *, u_long *);
+	extern void GsMapUnit(u_long *);
+	extern void GsSortUnit(GsUNIT *, GsOT *, u_long *);
+	extern void GsGetLwUnit(GsCOORDUNIT *, MATRIX *);
+	extern void GsGetLsUnit(GsCOORDUNIT *, MATRIX *);
+	extern void GsGetLwsUnit(GsCOORDUNIT *, MATRIX *, MATRIX *);
+	extern int GsSetViewUnit(GsVIEWUNIT *);
+	extern int GsSetRefViewUnit(GsRVIEWUNIT *);
+	extern int GsSetRefViewLUnit(GsRVIEWUNIT *);
+	extern u_long *GsScanAnim(u_long *,GsTYPEUNIT *);
+	extern long GsLinkAnim(GsSEQ **,u_long *);
+
+	/* for MIMe */
+	extern void	GsInitRstVtxMIMe(u_long *primtop, u_long *hp);
+	extern void	GsInitRstNrmMIMe(u_long *primtop, u_long *hp);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif	/* _LIBHMD_H_ */
diff --git a/tools/psyq/include/LIBMATH.H b/tools/psyq/include/LIBMATH.H
new file mode 100644
index 000000000..b137c35ec
--- /dev/null
+++ b/tools/psyq/include/LIBMATH.H
@@ -0,0 +1,44 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _LIBMATH_H_
+#define _LIBMATH_H_
+
+/* 
+  libmath.h
+*/
+#define _ABS(x)		((x) < 0 ? -(x) : (x))
+#define fabs(x)		_ABS(x)
+
+extern int math_errno;
+extern int math_err_point;
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+double pow(double, double),exp(double);
+double log(double), log10(double);
+double floor(double), ceil(double);
+double fmod(double,double),modf(double,double *);
+double sin(double), cos(double), tan(double);
+double asin(double), acos(double);
+double atan(double), atan2(double, double);
+double sinh(double), cosh(double), tanh(double);
+double sqrt(double);
+double hypot(double, double);
+double ldexp(double, int), frexp(double, int *);
+
+double atof(char *);
+double strtod(char *, char **);
+int printf2(char *, ...);
+int sprintf2(char *, char *, ...);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _LIBMATH_H_ */
+
diff --git a/tools/psyq/include/LIBMCRD.H b/tools/psyq/include/LIBMCRD.H
new file mode 100644
index 000000000..3efba2778
--- /dev/null
+++ b/tools/psyq/include/LIBMCRD.H
@@ -0,0 +1,59 @@
+#ifndef _MEMCARD_H_
+#define _MEMCARD_H_
+/*
+ * File:libmcrd.h	Rev. 4.2
+*/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#include <kernel.h>
+
+typedef void (*MemCB)( long cmds, long rslt );
+
+#define McFuncExist		(1)
+#define McFuncAccept		(2)
+#define McFuncReadFile		(3)
+#define McFuncWriteFile		(4)
+#define McFuncReadData		(5)
+#define McFuncWriteData		(6)
+
+#define	McErrNone		(0)
+#define	McErrCardNotExist	(1)
+#define	McErrCardInvalid	(2)
+#define	McErrNewCard		(3)
+#define	McErrNotFormat		(4)
+#define	McErrFileNotExist	(5)
+#define	McErrAlreadyExist	(6)
+#define	McErrBlockFull		(7)
+#define	McErrExtend		(0x8000)
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+void MemCardInit( long val );
+void MemCardEnd( void );
+void MemCardStart(void);
+void MemCardStop(void);
+long MemCardExist( long chan );
+long MemCardAccept( long chan );
+long MemCardOpen( long chan, char* file, long flag );
+void MemCardClose(void);
+long MemCardReadData( unsigned long* adrs, long ofs, long bytes );
+long MemCardReadFile( long chan, char* file, unsigned long* adrs, long ofs, long bytes );
+long MemCardWriteData( unsigned long* adrs, long ofs, long bytes );
+long MemCardWriteFile( long chan, char* file, unsigned long* adrs, long ofs ,long bytes );
+long MemCardCreateFile( long chan, char* file, long blocks );
+long MemCardDeleteFile( long chan, char* file );
+long MemCardFormat( long chan );
+long MemCardUnformat(long chan);
+long MemCardSync( long mode, long* cmds, long* rslt );
+MemCB MemCardCallback( MemCB func );
+long MemCardGetDirentry( long chan, char* name, struct DIRENTRY* dir, long* files, long ofs, long max );
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+
+#endif /* _MEMCARD_H_ */
diff --git a/tools/psyq/include/LIBMCX.H b/tools/psyq/include/LIBMCX.H
new file mode 100644
index 000000000..c70bf41d0
--- /dev/null
+++ b/tools/psyq/include/LIBMCX.H
@@ -0,0 +1,101 @@
+#ifndef _LIBMCX_H_
+#define _LIBMCX_H_
+
+/*
+ *	File:libmcx.h
+ *	Copyright (C) 1998 by Sony Computer Entertainment Inc.
+ *			All rights Reserved
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/* don't change these macros and structures which is referred in mcx code */ 
+
+#ifndef TRUE
+#define TRUE		1
+#endif
+#ifndef FALSE
+#define FALSE		0
+#endif
+#ifndef NULL
+#define NULL		0
+#endif
+#ifndef ERROR
+#define ERROR		(-1)
+#endif
+
+
+#define McxFuncGetApl		1
+#define McxFuncExecApl		2
+#define McxFuncGetTime		3
+#define McxFuncGetMem		4
+#define McxFuncSetMem		5
+#define McxFuncShowTrans	6
+#define McxFuncHideTrans	7
+#define McxFuncCurrCtrl		8
+#define McxFuncSetLED		9
+#define McxFuncGetSerial	10
+#define McxFuncExecFlag		11
+#define McxFuncAllInfo		12
+#define McxFuncFlashAcs		13
+#define McxFuncReadDev		14
+#define McxFuncWriteDev		15
+#define McxFuncGetUIFS		16
+#define McxFuncSetUIFS		17
+#define McxFuncSetTime		18
+#define McxFuncCardType		19
+
+
+#define McxSyncRun	0
+#define McxSyncNone	(-1)
+#define McxSyncFin	1
+
+#define McxErrSuccess	0
+#define McxErrNoCard	1
+#define McxErrInvalid	2
+#define McxErrNewCard	3
+
+
+
+/*
+ * Prototypes
+ */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+void McxStartCom(void);
+void McxStopCom(void);
+int McxSync(int, long *, long *);
+
+int McxGetApl(int , long *);
+int McxExecApl(int, int, long);
+int McxGetTime(int, unsigned char *);
+int McxGetMem(int, unsigned char *, unsigned, unsigned);
+int McxSetMem(int, unsigned char *, unsigned, unsigned);
+int McxShowTrans(int, int, int);
+int McxHideTrans(int);
+int McxCurrCtrl(int, int, int, int);
+int McxFlashAcs(int, int);
+int McxGetSerial(int, unsigned long *);
+int McxSetLED(int, int);
+int McxAllInfo(int,  unsigned char *);
+int McxExecFlag(int, int, int);
+int McxReadDev(int, int, unsigned char *, unsigned char *);
+int McxWriteDev(int, int, unsigned char *, unsigned char *);
+int McxSetTime(int, unsigned char *);
+int McxGetUIFS(int, unsigned char *);
+int McxSetUIFS(int, unsigned char *);
+int McxCardType(int);
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _LIBMCX_H_ */
+
+/* don't add stuff after this */
+
diff --git a/tools/psyq/include/LIBPAD.H b/tools/psyq/include/LIBPAD.H
new file mode 100644
index 000000000..b26a243da
--- /dev/null
+++ b/tools/psyq/include/LIBPAD.H
@@ -0,0 +1,82 @@
+#ifndef _LIBPAD_H_
+#define _LIBPAD_H_
+
+/*
+ *	File:libpad.h
+ *	Copyright (C) 1997 by Sony Computer Entertainment Inc.
+ *			All rights Reserved
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/* don't change these macros and structures which is referred in controler code */ 
+
+#ifndef TRUE
+#define TRUE		1
+#endif
+#ifndef FALSE
+#define FALSE		0
+#endif
+#ifndef NULL
+#define NULL		0
+#endif
+
+
+#define PadStateDiscon		0
+#define PadStateFindPad		1
+#define PadStateFindCTP1	2
+#define PadStateFindCTP2	3
+#define PadStateReqInfo		4
+#define PadStateExecCmd		5
+#define PadStateStable		6
+
+#define InfoModeCurID		1
+#define InfoModeCurExID		2
+#define InfoModeCurExOffs	3
+#define InfoModeIdTable		4
+
+#define InfoActFunc		1
+#define InfoActSub		2
+#define InfoActSize		3
+#define InfoActCurr		4
+#define InfoActSign		5
+
+#define PadMaxCurr		60	/* PS maximum current supply */
+#define PadCurrCTP1		10	/* SCPH-1150 biblator current */
+
+
+/*
+ * Prototypes
+ */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+void PadInitDirect(unsigned char *, unsigned char *);
+void PadInitMtap(unsigned char *, unsigned char *);
+void PadInitGun(unsigned char *, int);
+int PadChkVsync(void);
+void PadStartCom(void);
+void PadStopCom(void);
+unsigned PadEnableCom(unsigned);
+void PadEnableGun(unsigned char);
+void PadRemoveGun(void);
+int PadGetState(int);
+int PadInfoMode(int, int, int);
+int PadInfoAct(int, int, int);
+int PadInfoComb(int, int, int);
+int PadSetActAlign(int, unsigned char *);
+int PadSetMainMode(int socket, int offs, int lock);
+void PadSetAct(int, unsigned char *, int);
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _LIBPAD_H_ */
+
+/* don't add stuff after this */
+
diff --git a/tools/psyq/include/LIBPRESS.H b/tools/psyq/include/LIBPRESS.H
new file mode 100644
index 000000000..11f8ce4de
--- /dev/null
+++ b/tools/psyq/include/LIBPRESS.H
@@ -0,0 +1,73 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBPRESS_H_
+#define _LIBPRESS_H_
+/*
+ *  (C) Copyright 1995 Sony Corporation,Tokyo,Japan. All Rights Reserved
+ *
+ * 		libpress.h: Prototypes for libpress
+ *
+ */
+/* DecDCTvlc Table */
+typedef	u_short DECDCTTAB[34816];
+
+/* DecDCTEnv */	
+typedef struct {
+	u_char	iq_y[64];	/* IQ (Y): zig-zag order */
+	u_char	iq_c[64];	/* IQ (Cb,Cr): zig-zag order */
+	short	dct[64];	/* IDCT coef (reserved) */
+} DECDCTENV;
+
+typedef struct {
+    short *src;			/* 16-bit strait PCM */
+    short *dest;		/* PlayStation original waveform data */
+    short *work;		/* scratch pad or NULL */
+    long   size;		/* size (unit: byte) of source data */
+    long   loop_start;		/* loop start point (unit: byte) of source data */
+    char   loop;		/* whether loop or not */
+    char   byte_swap;		/* source data is 16-bit big endian (1) / little endian (0) */
+    char   proceed;		/* proceeding ? whole (0) / start (1) / cont. (2) / end (4) */
+    char   quality;		/* quality ? middle (0) / high (1) */ 
+} ENCSPUENV;
+
+
+#define ENCSPU_ENCODE_ERROR    (-1)
+#define ENCSPU_ENCODE_WHOLE     0
+#define ENCSPU_ENCODE_START    (1<<0)
+#define ENCSPU_ENCODE_CONTINUE (1<<1)
+#define ENCSPU_ENCODE_END      (1<<2)
+
+#define ENCSPU_ENCODE_LOOP    1
+#define ENCSPU_ENCODE_NO_LOOP 0
+
+#define ENCSPU_ENCODE_ENDIAN_LITTLE 0
+#define ENCSPU_ENCODE_ENDIAN_BIG    1
+
+#define ENCSPU_ENCODE_MIDDLE_QULITY 0
+#define ENCSPU_ENCODE_HIGH_QULITY   1
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern void DecDCTReset(int mode);
+extern DECDCTENV *DecDCTGetEnv(DECDCTENV *env);
+extern DECDCTENV *DecDCTPutEnv(DECDCTENV *env);
+extern int DecDCTBufSize(u_long *bs);
+extern int DecDCTvlc(u_long *bs, u_long *buf);
+extern int DecDCTvlc2(u_long *bs, u_long *buf, DECDCTTAB table);
+extern int DecDCTvlcSize(int size);
+extern int DecDCTvlcSize2(int size);
+extern void DecDCTvlcBuild(u_short *table);
+extern void DecDCTin(u_long *buf, int mode);
+extern void DecDCTout(u_long *buf, int size);
+extern int DecDCTinSync( int mode) ;
+extern int DecDCToutSync( int mode) ;
+extern int DecDCTinCallback(void (*func)());
+extern int DecDCToutCallback(void (*func)());
+
+extern long EncSPU (ENCSPUENV *env);
+extern long EncSPU2(ENCSPUENV *env);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBPRESS_H_ */
diff --git a/tools/psyq/include/LIBSIO.H b/tools/psyq/include/LIBSIO.H
new file mode 100644
index 000000000..b45adc800
--- /dev/null
+++ b/tools/psyq/include/LIBSIO.H
@@ -0,0 +1,79 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBSIO_H_
+#define _LIBSIO_H_
+
+/*
+ *  Copyright (C) 1996,1997 Sony Computer Entertainment Inc. All Rights Reserved
+ *  libsio.h: Sio Interface
+ */
+
+/* status bits */
+#define SR_IRQ		0x200
+#define SR_CTS		0x100
+#define SR_DSR		0x80
+#define SR_FE		0x20
+#define SR_OE		0x10
+#define SR_PERROR	0x8
+#define SR_TXU		0x4
+#define SR_RXRDY	0x2
+#define SR_TXRDY	0x1
+
+#define SIO_CTS		0x100
+#define SIO_DSR		0x80
+#define SIO_FE		0x20
+#define SIO_OE		0x10
+#define SIO_PERROR	0x8
+#define SIO_TXU		0x4
+#define SIO_RXRDY	0x2
+#define SIO_TXRDY	0x1
+
+
+/* control bits */
+#define CR_DSRIEN	0x1000
+#define CR_RXIEN	0x800
+#define CR_TXIEN	0x400
+#define CR_BUFSZ_1	0x0
+#define CR_BUFSZ_2	0x100
+#define CR_BUFSZ_4	0x200
+#define CR_BUFSZ_8	0x300
+#define CR_INTRST	0x40
+#define CR_RTS		0x20
+#define CR_ERRRST	0x10
+#define CR_BRK		0x8
+#define CR_RXEN		0x4
+#define CR_DTR		0x2
+#define CR_TXEN		0x1
+
+#define SIO_BIT_DTR	CR_DTR
+#define SIO_BIT_RTS	CR_RTS
+
+/* mode bits */
+#define	MR_SB_00	0x0
+#define	MR_SB_01	0x40
+#define	MR_SB_10	0x80
+#define	MR_SB_11	0xC0
+#define MR_P_EVEN	0x20
+#define MR_PEN		0x10
+#define MR_CHLEN_5	0x0
+#define MR_CHLEN_6	0x4
+#define MR_CHLEN_7	0x8
+#define MR_CHLEN_8	0xC
+#define MR_BR_1		0x1
+#define MR_BR_16	0x2
+#define MR_BR_64	0x3
+
+/*
+ * Prototypes
+ */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern long AddSIO(int baud);
+extern long DelSIO(void);
+extern long _sio_control(unsigned long cmd, unsigned long arg, unsigned long param);
+extern int Sio1Callback (void (*func)());
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBSIO_H_ */
diff --git a/tools/psyq/include/LIBSN.H b/tools/psyq/include/LIBSN.H
new file mode 100644
index 000000000..c4c512e64
--- /dev/null
+++ b/tools/psyq/include/LIBSN.H
@@ -0,0 +1,158 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _LIBSN_H_
+#define _LIBSN_H_
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+
+/*
+** LIBSN.H	declare libary functions provided by LIBSN.LIB
+**
+** 05/02/94 ADB
+** 21/03/94 ADB added user notes as comments
+** 18/09/94 ADB	added PCcreat() - it was missing before
+** 31/05/95 ADB	added PSYQpause() for new debug stub 4.04
+** 20/09/95 ADB added SNFlushCache - but removed after email from Tom Boyd
+** 27/03/97 GJ  v2.00
+                C++ linkage
+                Call to global destructors in snmain.s        
+** 12.2.98  GJ  v2.01
+                C++ structor functions added in ctors.c
+                snmain.s shuffled - __do_global_dtors removed
+                Compiler support functions moved to libsngcc.lib
+** 18.2.98	GJ  v2.02
+                C++ structor functions trimmed down because of assumptions about group names
+** 24.3.98      GJ v2.03
+                Initialise GP from __SN_GP_BASE linker symbol
+*/
+
+#define	pollhost()	__asm__ ("break 1024")	/* inline to keep variable scope */
+#define	PSYQpause()	__asm__  ("break 1031")	/* inline to keep variable scope */
+
+/*
+** C++ static class object functions
+** These are here for when you can't use __SN_ENTRY_POINT (eg a final build)
+** or when you need to instantiate static class objects from an overlay.
+** Static class objects are those declared with non-function scope which
+** have constructors. How do these get called? In the startup code, normally!
+** But in final builds you can't link with our startup code, and the Sony
+** startup objects don't have hooks for C++ initialisation. So:
+** Call __sn_cpp_structors to initialise your standard static class
+** objects, or to destroy them. Memory has already
+** been allocated for these objects in the image; these functions just call
+** the constructors to populate that memory appropriately.
+** Call __sn_cpp_structors(section_obj, section_objend),
+** supplying the obj and objend variables for a ctors section, to initialise
+** the class objects referenced in that section. Or supply the obj and
+** objend variables for a dtors section to call the corresponding
+** destructors.
+*/
+
+extern void __sn_cpp_structors (long, long);
+
+
+/*
+** FILESERVER FUNCTIONS:
+**
+** NOTE: For PCread and PCwrite do not load files by passing extreme
+** values for count as you might on UNIX as this will cause the full
+** amount specified to be transferred - the file will be padded to
+** that length with zeroes which may over-write memory beyond the
+** end of the file.
+**
+** If you are unsure of the length of a file which you are about
+** to read into memory then perform a
+** 	len = PClseek( fd, 0, 2);
+** This will set len to the length of the file which you can then
+** pass to a PCread() function call.
+**
+*/
+
+/*
+** re-initialise PC filing system, close open files etc
+**
+** passed: void
+**
+** return: error code (0 if no error)
+*/
+int	PCinit (void);
+
+/*
+** open a file on PC host
+**
+** passed:	PC file pathname, open mode, permission flags
+**
+** return:	file-handle or -1 if error
+**
+** note: perms should be zero (it is ignored)
+**
+** open mode:	0 => read only
+** 				1 => write only
+**					2 => read/write
+*/
+int	PCopen (char *name, int flags, int perms);
+
+/*
+** create (and open) a file on PC host
+**
+** passed:	PC file pathname, open mode, permission flags
+**
+** return:	file-handle or -1 if error
+**
+** note: perms should be zero (it is ignored)
+*/
+int	PCcreat (char *name, int perms);
+
+/*
+** seek file pointer to new position in file
+**
+** passed: file-handle, seek offset, seek mode
+**
+** return: absolute value of new file pointer position
+**
+** (mode 0 = rel to start, mode 1 = rel to current fp, mode 2 = rel to end)
+*/
+int	PClseek (int fd, int offset, int mode);
+
+/*
+** read bytes from file on PC
+**
+** passed: file-handle, buffer address, count
+**
+** return: count of number of bytes actually read
+**
+** note: unlike assembler function this provides for full 32 bit count
+*/
+int	PCread (int fd, char *buff, int len);
+
+/*
+** write bytes to file on PC
+**
+** passed: file-handle, buffer address, count
+**
+** return: count of number of bytes actually written
+**
+** note: unlike assembler function this provides for full 32 bit count
+*/
+int	PCwrite (int fd, char *buff, int len);
+
+/*
+** close an open file on PC
+**
+** passed: file-handle
+**
+** return: negative if error
+**
+*/
+int	PCclose (int fd);
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _LIBSN_H_ */
diff --git a/tools/psyq/include/LIBSND.H b/tools/psyq/include/LIBSND.H
new file mode 100644
index 000000000..4afb5dfd0
--- /dev/null
+++ b/tools/psyq/include/LIBSND.H
@@ -0,0 +1,508 @@
+#ifndef _LIBSND_H_
+#define _LIBSND_H_
+
+/*****************************************************************
+ *
+ * $RCSfile: libsnd.h,v $
+ *
+ * 	Copyright (C) 1994 by Sony Computer Entertainment Inc.
+ *				          All Rights Reserved.
+ *
+ *	Sony Computer Entertainment Inc. Development Department
+ *
+ *****************************************************************/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#include <sys/types.h>
+
+/*
+ * Macro 
+ */
+#define SSPLAY_INFINITY  0 
+#define SS_NOTICK	 0x1000
+#define SS_NOTICK0	 0
+#define SS_TICK60	 1
+#define SS_TICK240	 2
+#define SS_TICK120	 3
+#define SS_TICK50	 4
+#define SS_TICKVSYNC	 5
+#define SS_TICKMODE_MAX  6
+#define SSPLAY_PAUSE     0
+#define SSPLAY_PLAY      1
+#define SS_SOFF          0      
+#define SS_SON           1     
+#define SS_MIX           0    
+#define SS_REV           1   
+#define SS_SERIAL_A      0 
+#define SS_SERIAL_B      1     
+#define SS_MUTE_OFF      0     
+#define SS_MUTE_ON       1     
+
+#define SS_IMEDIATE 	    0
+#define SS_IMMEDIATE        0
+#define SS_WAIT_COMPLETED   1
+
+#define SS_REV_TYPE_OFF        0
+#define SS_REV_TYPE_ROOM       1
+#define SS_REV_TYPE_STUDIO_A   2
+#define SS_REV_TYPE_STUDIO_B   3
+#define SS_REV_TYPE_STUDIO_C   4
+#define SS_REV_TYPE_HALL       5
+#define SS_REV_TYPE_SPACE      6
+#define SS_REV_TYPE_ECHO       7
+#define SS_REV_TYPE_DELAY      8
+#define SS_REV_TYPE_PIPE       9
+#define SSSKIP_TICK    0  
+#define SSSKIP_NOTE4   1  
+#define SSSKIP_NOTE8   2  
+#define SSSKIP_BAR     3 
+
+#define SS_SEQ_TABSIZ     176
+
+#define SND_VOLL  1
+#define SND_VOLR  2
+#define SND_ADSR1 4
+#define SND_ADSR2 8
+#define SND_ADDR  16
+#define SND_PITCH 32
+
+#ifndef NULL
+#define NULL 0
+#endif
+
+
+/*
+ * Vag & Vab Structure 
+ */ 
+typedef struct VabHdr {         /* VAB Bank Headdings */
+
+	long           form;          /* always 'VABp' */
+	long           ver;           /* VAB file version number */
+	long           id;            /* VAB id */
+	unsigned long  fsize;         /* VAB file size */
+	unsigned short reserved0;     /* system reserved */
+	unsigned short ps;            /* # of the programs in this bank */
+	unsigned short ts;            /* # of the tones in this bank */
+	unsigned short vs;            /* # of the vags in this bank */
+	unsigned char  mvol;          /* master volume for this bank */
+	unsigned char  pan;           /* master panning for this bank */
+	unsigned char  attr1;         /* bank attributes1 */
+	unsigned char  attr2;         /* bank attributes2 */
+	unsigned long  reserved1;     /* system reserved */
+
+} VabHdr;			/* 32 byte */
+
+
+typedef struct ProgAtr {        /* Program Headdings */
+
+	unsigned char tones;          /* # of tones */
+	unsigned char mvol;           /* program volume */
+	unsigned char prior;          /* program priority */
+	unsigned char mode;           /* program mode */
+	unsigned char mpan;           /* program pan */
+	char          reserved0;      /* system reserved */
+	short         attr;           /* program attribute */
+	unsigned long reserved1;      /* system reserved */
+	unsigned long reserved2;      /* system reserved */
+
+} ProgAtr;			/* 16 byte */
+
+
+typedef struct VagAtr {         /* VAG Tone Headdings */
+
+	unsigned char  prior;         /* tone priority */
+	unsigned char  mode;          /* play mode */
+	unsigned char  vol;           /* tone volume*/
+	unsigned char  pan;           /* tone panning */
+	unsigned char  center;        /* center note */
+	unsigned char  shift;         /* center note fine tune */
+	unsigned char  min;           /* minimam note limit */
+	unsigned char  max;           /* maximam note limit */
+	unsigned char  vibW;          /* vibrate depth */
+	unsigned char  vibT;          /* vibrate duration */
+	unsigned char  porW;          /* portamento depth */
+	unsigned char  porT;          /* portamento duration */
+	unsigned char  pbmin;         /* under pitch bend max */
+	unsigned char  pbmax;         /* upper pitch bend max */
+	unsigned char  reserved1;     /* system reserved */
+	unsigned char  reserved2;     /* system reserved */
+	unsigned short adsr1;         /* adsr1 */
+	unsigned short adsr2;         /* adsr2 */
+	short          prog;          /* parent program*/
+	short          vag;           /* vag reference */
+	short          reserved[4];   /* system reserved */
+
+} VagAtr;			/* 32 byte */
+
+
+/*
+ * Volume Structure
+ */
+typedef struct {
+        unsigned short left;    /* L Channel */
+        unsigned short right;   /* R Channel */
+} SndVolume;
+
+typedef struct SndVolume2 {
+	short       left;
+	short       right;
+} SndVolume2;
+
+typedef struct SndRegisterAttr {
+	SndVolume2       volume;
+	short            pitch;
+	short            mask;
+	short            addr;
+	short            adsr1;
+	short            adsr2;
+} SndRegisterAttr;
+
+typedef struct SndVoiceStats {
+	short            vagId;
+	short            vabId;
+	unsigned short   pitch;
+	short            note;
+	short            tone;
+	short            prog_num;
+	short            prog_actual;
+	short 		 vol;
+	short 		 pan;
+} SndVoiceStats;
+
+/*
+ * CallBack
+ */
+typedef void (*SsMarkCallbackProc)(short, short, short);
+
+
+/*  
+ * Prototype 
+ */
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+extern "C" {
+#endif
+extern short SsVabOpenHead(unsigned char*, short);
+extern short SsVabOpenHeadSticky(unsigned char*, short, unsigned long);
+extern short SsVabTransBody(unsigned char*, short);
+extern short SsVabTransBodyPartly(unsigned char*, unsigned long, short);
+extern short SsVabTransfer(unsigned char *, unsigned char *, short, short);
+extern short SsVabTransCompleted(short);
+extern void  SsVabClose(short);          
+
+extern void  SsInit(void);
+extern void  SsInitHot(void);
+extern void  SsSetTableSize(char*, short, short);
+extern void  SsSetTickMode(long);
+extern int   SsSetTickCallback(void (*cb)());
+extern void  SsStart(void);
+extern void  SsStart2(void);
+extern void  SsEnd(void);
+extern void  SsQuit(void);
+
+extern void  SsSeqCalledTbyT(void);           
+
+extern short SsSeqOpen(unsigned long*, short); 
+extern void  SsSeqPlay(short, char, short);    
+extern void  SsSeqPlayPtoP(short, short, unsigned char *, unsigned char *, char, short);
+extern void  SsSeqPause(short);                    
+extern void  SsSeqReplay(short);                  
+extern int   SsSeqSkip(short, short, char, short);
+extern void  SsSeqStop(short);                   
+extern void  SsSeqSetVol(short, short, short);  
+extern void  SsSeqSetNext(short, short);             
+extern void  SsSeqSetCrescendo(short, short, long); 
+extern void  SsSeqSetDecrescendo(short, short, long); 
+extern void  SsSeqSetAccelerando(short, long, long);  
+extern void  SsSeqSetRitardando(short, long, long);   
+extern void  SsSeqClose(short);                       
+
+extern short SsSepOpen(unsigned long*, short, short);
+extern void  SsSepPlay(short, short, char, short);
+extern void  SsSepPause(short, short);
+extern void  SsSepReplay(short, short);
+extern void  SsSepStop(short, short);
+extern void  SsSepSetVol(short, short, short, short);
+extern void  SsSepSetCrescendo(short, short, short, long);
+extern void  SsSepSetDecrescendo(short, short, short, long);
+extern void  SsSepSetAccelerando(short, short, long, long); 
+extern void  SsSepSetRitardando(short, short, long, long);   
+extern void  SsSepClose(short);
+
+extern long  SsVoKeyOn(long, long, unsigned short, unsigned short);
+extern long  SsVoKeyOff(long, long);                
+
+extern void  SsSetMVol(short, short);              
+extern void  SsGetMVol(SndVolume*);             
+extern void  SsSetRVol(short, short);             
+extern void  SsGetRVol(SndVolume*);              
+extern void  SsSetMute(char);                        
+extern char  SsGetMute(void);                        
+extern void  SsSetSerialAttr(char, char, char);     
+extern char  SsGetSerialAttr(char, char);           
+extern void  SsSetSerialVol(char, short, short);    
+extern void  SsGetSerialVol(char, SndVolume*); 
+extern void  SsSetNck(short);                         
+extern short SsGetNck(void);                          
+extern void  SsSetNoiseOn(short, short);    
+extern void  SsSetNoiseOff(void);                     
+extern void  SsSetMono(void);                         
+extern void  SsSetStereo(void);                       
+extern void  SsSetTempo(short, short, short);
+extern void  SsSetLoop(short, short, short);
+extern short SsIsEos(short, short);
+extern void  SsPlayBack(short, short, short);
+extern void  SsSetMarkCallback(short, short, SsMarkCallbackProc);
+extern char  SsSetReservedVoice(char);
+
+extern short SsUtKeyOn(short, short, short, short, short, short, short);
+extern short SsUtKeyOff(short, short, short, short, short);
+extern short SsUtKeyOnV(short voice, short vabId, short prog, short tone, 
+                        short note, short fine, short voll, short volr);
+extern short SsUtKeyOffV(short voice);
+extern short SsUtPitchBend(short, short, short, short, short);
+extern short SsUtChangePitch(short, short, short, short, short,
+                              short, short);
+extern short SsUtChangeADSR(short, short, short, short, 
+                             unsigned short, unsigned short);
+extern short SsUtSetVabHdr(short, VabHdr*);
+extern short SsUtGetVabHdr(short, VabHdr*);
+extern short SsUtSetProgAtr(short, short, ProgAtr*);
+extern short SsUtGetProgAtr(short, short, ProgAtr*);
+extern short SsUtSetVagAtr(short, short, short, VagAtr*);
+extern short SsUtGetVagAtr(short, short, short, VagAtr*);
+extern short SsUtSetDetVVol(short, short, short);
+extern short SsUtGetDetVVol(short, short*, short*);
+extern short SsUtSetVVol(short, short, short);
+extern short SsUtGetVVol(short, short*, short*);
+extern short SsUtAutoVol(short, short, short, short);
+extern short SsUtAutoPan(short, short, short, short);
+extern void  SsUtReverbOn(void);
+extern void  SsUtReverbOff(void);
+extern short SsUtSetReverbType(short);
+extern short SsUtGetReverbType(void);
+extern void  SsUtSetReverbDepth(short, short);
+extern void  SsUtSetReverbFeedback(short);
+extern void  SsUtSetReverbDelay(short);
+extern void  SsUtAllKeyOff(short);
+extern void  SsSetAutoKeyOffMode (short mode);
+extern void  SsUtFlush(void);
+extern short SsVabFakeHead(unsigned char*, short, unsigned long);
+extern short SsVabFakeBody(short);
+extern unsigned long SsUtGetVBaddrInSB(short);
+extern long SsUtGetVagAddr(short vabId, short vagId);
+extern unsigned long SsUtGetVagAddrFromTone(short vabId, short progId, 
+						short toneId);
+extern void SsSetNext(short, short, short, short);             
+extern void SsSeqGetVol(short, short, short*, short*);
+extern void SsChannelMute(short, short, long); 
+extern short SsSeqOpenJ(unsigned long*, short);
+extern short SsSepOpenJ(unsigned long*, short, short);
+extern unsigned char*  SsGetCurrentPoint(short, short);
+extern int SsSetCurrentPoint(short, short, unsigned char *);
+extern long SsGetChannelMute(short, short);
+extern void SsSetVoiceMask(unsigned long);
+extern unsigned long SsGetVoiceMask(void);
+extern void SsQueueRegisters(long, SndRegisterAttr*);
+extern void SsQueueKeyOn(long);
+extern void SsQueueReverb(long, long);
+extern short SsGetActualProgFromProg(short, short);
+extern void SsSetVoiceSettings(long, SndVoiceStats*);
+extern unsigned short SsPitchFromNote(short, short, unsigned char, 
+            unsigned char);
+extern short SsVoiceCheck(long, long, short);
+extern char SsBlockVoiceAllocation(void);
+extern char SsUnBlockVoiceAllocation(void);
+extern long SsAllocateVoices(unsigned char, unsigned char);
+
+
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+}
+#endif
+
+/*
+ * for function table
+ */
+
+#define CC_NUMBER     0
+#define CC_BANKCHANGE 1
+#define CC_DATAENTRY  2
+#define CC_MAINVOL    3
+#define CC_PANPOT     4
+#define CC_EXPRESSION 5
+#define CC_DAMPER     6
+#define CC_NRPN1      7
+#define CC_NRPN2      8
+#define CC_RPN1       9
+#define CC_RPN2       10
+#define CC_EXTERNAL   11
+#define CC_RESETALL   12
+
+#define DE_PRIORITY	0	 
+#define DE_MODE  	1 
+#define DE_LIMITL	2
+#define DE_LIMITH	3 
+#define DE_ADSR_AR_L	4 
+#define DE_ADSR_AR_E	5
+#define DE_ADSR_DR  	6 
+#define DE_ADSR_SL  	7 
+#define DE_ADSR_SR_L  	8 
+#define DE_ADSR_SR_E 	9 
+#define DE_ADSR_RR_L	10 
+#define DE_ADSR_RR_E	11
+#define DE_ADSR_SR  	12 
+#define DE_VIB_TIME 	13 
+#define DE_PORTA_DEPTH	14 
+#define DE_REV_TYPE  	15 
+#define DE_REV_DEPTH 	16 
+#define DE_ECHO_FB  	17 
+#define DE_ECHO_DELAY	18 
+#define DE_DELAY  	19 
+
+typedef struct {
+	void (*noteon) ();
+	void (*programchange) ();
+	void (*pitchbend) ();
+	void (*metaevent) ();
+	void (*control[13]) ();
+	void (*ccentry[20]) ();
+} _SsFCALL;
+
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+extern "C" {
+#endif
+
+extern void _SsNoteOn (short, short, unsigned char, unsigned char);
+extern void _SsSetProgramChange(short, short, unsigned char); 
+extern void _SsGetMetaEvent(short, short, unsigned char); 
+extern void _SsSetPitchBend(short, short);
+extern void _SsSetControlChange(short, short, unsigned char); 
+extern void _SsContBankChange(short, short); 
+extern void _SsContDataEntry(short, short, unsigned char);
+extern void _SsContMainVol(short, short, unsigned char);  
+extern void _SsContPanpot(short, short, unsigned char);
+extern void _SsContExpression(short, short, unsigned char); 
+extern void _SsContDamper(short, short, unsigned char); 
+extern void _SsContExternal(short, short, unsigned char); 
+extern void _SsContNrpn1(short, short, unsigned char); 
+extern void _SsContNrpn2(short, short, unsigned char); 
+extern void _SsContRpn1(short, short, unsigned char); 
+extern void _SsContRpn2(short, short, unsigned char); 
+extern void _SsContResetAll(short, short);
+
+extern void _SsSetNrpnVabAttr0(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr1(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr2(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr3(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr4(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr5(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr6(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr7(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr8(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr9(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr10(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr11(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr12(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr13(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr14(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr15(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr16(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr17(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr18(short, short, short, VagAtr, short, unsigned char);
+extern void _SsSetNrpnVabAttr19(short, short, short, VagAtr, short, unsigned char);
+
+extern void dmy_nothing1(short, short, unsigned char, unsigned char);
+extern void dmy_SsNoteOn (short, short, unsigned char, unsigned char);
+extern void dmy_SsSetProgramChange(short, short, unsigned char); 
+extern void dmy_SsGetMetaEvent(short, short, unsigned char); 
+extern void dmy_SsSetPitchBend(short, short);
+extern void dmy_SsSetControlChange(short, short, unsigned char); 
+extern void dmy_SsContBankChange(short, short); 
+extern void dmy_SsContDataEntry(short, short, unsigned char);
+extern void dmy_SsContMainVol(short, short, unsigned char);  
+extern void dmy_SsContPanpot(short, short, unsigned char);
+extern void dmy_SsContExpression(short, short, unsigned char); 
+extern void dmy_SsContDamper(short, short, unsigned char); 
+extern void dmy_SsContExternal(short, short, unsigned char); 
+extern void dmy_SsContNrpn1(short, short, unsigned char); 
+extern void dmy_SsContNrpn2(short, short, unsigned char); 
+extern void dmy_SsContRpn1(short, short, unsigned char); 
+extern void dmy_SsContRpn2(short, short, unsigned char); 
+extern void dmy_SsContResetAll(short, short);
+extern void dmy_SsSetNrpnVabAttr0(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr1(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr2(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr3(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr4(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr5(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr6(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr7(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr8(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr9(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr10(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr11(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr12(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr13(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr14(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr15(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr16(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr17(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr18(short, short, short, VagAtr, short, unsigned char);
+extern void dmy_SsSetNrpnVabAttr19(short, short, short, VagAtr, short, unsigned char);
+
+extern _SsFCALL SsFCALL;
+
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+}
+#endif
+
+
+#if 0
+jt_SsInit ()
+{
+	SsFCALL.noteon                   = (void (*)())_SsNoteOn;
+	SsFCALL.programchange            = (void (*)())_SsSetProgramChange;
+	SsFCALL.metaevent                = (void (*)())_SsGetMetaEvent;
+	SsFCALL.pitchbend                = (void (*)())_SsSetPitchBend; 
+        SsFCALL.control [CC_NUMBER]      = (void (*)())_SsSetControlChange;
+	SsFCALL.control [CC_BANKCHANGE]  = (void (*)())_SsContBankChange;
+	SsFCALL.control [CC_MAINVOL]     = (void (*)())_SsContMainVol;
+	SsFCALL.control [CC_PANPOT]      = (void (*)())_SsContPanpot;
+	SsFCALL.control [CC_EXPRESSION]  = (void (*)())_SsContExpression;
+	SsFCALL.control [CC_DAMPER]      = (void (*)())_SsContDamper;
+	SsFCALL.control [CC_NRPN1]       = (void (*)())_SsContNrpn1;
+	SsFCALL.control [CC_NRPN2]       = (void (*)())_SsContNrpn2;
+	SsFCALL.control [CC_RPN1]        = (void (*)())_SsContRpn1;
+	SsFCALL.control [CC_RPN2]        = (void (*)())_SsContRpn2;
+	SsFCALL.control [CC_EXTERNAL]    = (void (*)())_SsContExternal;
+	SsFCALL.control [CC_RESETALL]    = (void (*)())_SsContResetAll;
+	SsFCALL.control [CC_DATAENTRY]   = (void (*)())_SsContDataEntry;
+	SsFCALL.ccentry [DE_PRIORITY]	 = (void (*)())_SsSetNrpnVabAttr0;   
+	SsFCALL.ccentry [DE_MODE]        = (void (*)())_SsSetNrpnVabAttr1; 
+	SsFCALL.ccentry [DE_LIMITL]      = (void (*)())_SsSetNrpnVabAttr2; 
+	SsFCALL.ccentry [DE_LIMITH]      = (void (*)())_SsSetNrpnVabAttr3; 
+	SsFCALL.ccentry [DE_ADSR_AR_L]   = (void (*)())_SsSetNrpnVabAttr4; 
+	SsFCALL.ccentry [DE_ADSR_AR_E]   = (void (*)())_SsSetNrpnVabAttr5; 
+	SsFCALL.ccentry [DE_ADSR_DR]     = (void (*)())_SsSetNrpnVabAttr6; 
+	SsFCALL.ccentry [DE_ADSR_SL]     = (void (*)())_SsSetNrpnVabAttr7; 
+	SsFCALL.ccentry [DE_ADSR_SR_L]   = (void (*)())_SsSetNrpnVabAttr8; 
+	SsFCALL.ccentry [DE_ADSR_SR_E]   = (void (*)())_SsSetNrpnVabAttr9; 
+	SsFCALL.ccentry [DE_ADSR_RR_L]   = (void (*)())_SsSetNrpnVabAttr10; 
+	SsFCALL.ccentry [DE_ADSR_RR_E]   = (void (*)())_SsSetNrpnVabAttr11; 
+	SsFCALL.ccentry [DE_ADSR_SR]     = (void (*)())_SsSetNrpnVabAttr12; 
+	SsFCALL.ccentry [DE_VIB_TIME]    = (void (*)())_SsSetNrpnVabAttr13; 
+	SsFCALL.ccentry [DE_PORTA_DEPTH] = (void (*)())_SsSetNrpnVabAttr14; 
+	SsFCALL.ccentry [DE_REV_TYPE]    = (void (*)())_SsSetNrpnVabAttr15; 
+	SsFCALL.ccentry [DE_REV_DEPTH]   = (void (*)())_SsSetNrpnVabAttr16; 
+	SsFCALL.ccentry [DE_ECHO_FB]     = (void (*)())_SsSetNrpnVabAttr17; 
+	SsFCALL.ccentry [DE_ECHO_DELAY]  = (void (*)())_SsSetNrpnVabAttr18; 
+	SsFCALL.ccentry [DE_DELAY]       = (void (*)())_SsSetNrpnVabAttr19; 
+}
+#endif
+
+/* ----------------------------------------------------------------
+ *	End on File
+ * ---------------------------------------------------------------- */
+#endif /* _LIBSND_H_ */
+/* DON'T ADD STUFF AFTER THIS */
diff --git a/tools/psyq/include/LIBSPU.H b/tools/psyq/include/LIBSPU.H
new file mode 100644
index 000000000..bc141373d
--- /dev/null
+++ b/tools/psyq/include/LIBSPU.H
@@ -0,0 +1,552 @@
+#ifndef _LIBSPU_H_
+#define _LIBSPU_H_
+
+/*****************************************************************
+ * -*- c -*-
+ * $RCSfile: libspu.h,v $
+ *
+ * Copyright (c) 1993, 1994, 1995, 1996 Sony Computer Entertainment Inc.
+ * All Rights Reserved.
+ *
+ * This file is part of ``PlayStation(R)'' Programmer Tool /
+ * Runtime Library.
+ *
+ * R & D Division, Sony Computer Entertainment Inc.
+ *
+ * $Id: libspu.h,v 1.80 1997/06/24 11:14:04 kaol Exp $
+ *
+ *****************************************************************/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+/* ----------------------------------------------------------------
+ *	CONSTANT 
+ * ---------------------------------------------------------------- */
+
+#define SPU_SUCCESS	0
+#define SPU_INVALID_ARGS (-3)
+#define SPU_DIAG	(-2)
+#define SPU_CHECK	(-1)
+#define SPU_OFF		0
+#define SPU_ON		1
+#define SPU_CLEAR	2
+#define SPU_RESET	3
+#define SPU_DONT_CARE	4
+#define SPU_ALL		0
+#define SPU_CDONLY	5
+#define SPU_VOICEONLY	6
+#define SPU_CONT	7
+#define SPU_BIT		8
+#define SPU_NULL	0
+/* Macros below will be obsoleted. */
+#define SpuDiag		SPU_DIAG
+#define SpuCheck	SPU_CHECK
+#define SpuOff		SPU_OFF
+#define SpuOn		SPU_ON
+#define SpuClear	SPU_CLEAR
+#define SpuReset	SPU_RESET
+#define SpuDontCare	SPU_DONT_CARE
+#define SpuALL		SPU_ALL
+#define SpuCDOnly	SPU_CDONLY
+#define SpuVoiceOnly	SPU_VOICEONLY
+#define SpuCont		SPU_CONT
+#define SpuNull		SPU_NULL
+
+#define SPU_OFF_ENV_ON	2
+#define SPU_ON_ENV_OFF	3
+/* Macros below will be obsoleted. */
+#define SpuOffEnvOn	SPU_OFF_ENV_ON
+#define SpuOnEnvOff	SPU_ON_ENV_OFF
+
+#define SPU_ERROR	(-1)
+/* Macros below will be obsoleted. */
+#define SpuError	SPU_ERROR
+
+#define SPU_TRANSFER_BY_DMA 0L
+#define SPU_TRANSFER_BY_IO 1L
+/* Macros below will be obsoleted. */
+#define SpuTransferByDMA SPU_TRANSFER_BY_DMA
+#define SpuTransferByIO  SPU_TRANSFER_BY_IO
+#define SpuTransByDMA SpuTransferByDMA
+#define SpuTransByIO SpuTransferByIO
+
+#define SPU_TRANSFER_WAIT 1
+#define SPU_TRANSFER_PEEK 0
+#define SPU_TRANSFER_GLANCE SPU_TRANSFER_PEEK
+
+/*
+ * Voice designate
+ */
+
+#ifndef __SPU_VOICE
+#define __SPU_VOICE
+
+#define SPU_00CH (0x1L<< 0)
+#define SPU_01CH (0x1L<< 1)
+#define SPU_02CH (0x1L<< 2)
+#define SPU_03CH (0x1L<< 3)
+#define SPU_04CH (0x1L<< 4)
+#define SPU_05CH (0x1L<< 5)
+#define SPU_06CH (0x1L<< 6)
+#define SPU_07CH (0x1L<< 7)
+#define SPU_08CH (0x1L<< 8)
+#define SPU_09CH (0x1L<< 9)
+#define SPU_10CH (0x1L<<10)
+#define SPU_11CH (0x1L<<11)
+#define SPU_12CH (0x1L<<12)
+#define SPU_13CH (0x1L<<13)
+#define SPU_14CH (0x1L<<14)
+#define SPU_15CH (0x1L<<15)
+#define SPU_16CH (0x1L<<16)
+#define SPU_17CH (0x1L<<17)
+#define SPU_18CH (0x1L<<18)
+#define SPU_19CH (0x1L<<19)
+
+#define SPU_20CH (0x1L<<20)
+#define SPU_21CH (0x1L<<21)
+#define SPU_22CH (0x1L<<22)
+#define SPU_23CH (0x1L<<23)
+
+#define SPU_0CH SPU_00CH
+#define SPU_1CH SPU_01CH
+#define SPU_2CH SPU_02CH
+#define SPU_3CH SPU_03CH
+#define SPU_4CH SPU_04CH
+#define SPU_5CH SPU_05CH
+#define SPU_6CH SPU_06CH
+#define SPU_7CH SPU_07CH
+#define SPU_8CH SPU_08CH
+#define SPU_9CH SPU_09CH
+
+#define SPU_ALLCH (SPU_00CH | SPU_01CH | SPU_02CH | SPU_03CH | SPU_04CH | \
+		   SPU_05CH | SPU_06CH | SPU_07CH | SPU_08CH | SPU_09CH | \
+		   SPU_10CH | SPU_11CH | SPU_12CH | SPU_13CH | SPU_14CH | \
+		   SPU_15CH | SPU_16CH | SPU_17CH | SPU_18CH | SPU_19CH | \
+		   SPU_20CH | SPU_21CH | SPU_22CH | SPU_23CH)
+
+#define SPU_KEYCH(x) (0x1L<<(x))
+#define SPU_VOICECH(x) SPU_KEYCH(x)
+
+#endif /* __SPU_VOICE */
+
+/* for Voice setting */
+
+#define	SPU_VOICE_VOLL		(0x01 <<  0) /* volume (left) */
+#define	SPU_VOICE_VOLR		(0x01 <<  1) /* volume (right) */
+#define	SPU_VOICE_VOLMODEL	(0x01 <<  2) /* volume mode (left) */
+#define	SPU_VOICE_VOLMODER	(0x01 <<  3) /* volume mode (right) */
+#define	SPU_VOICE_PITCH		(0x01 <<  4) /* tone (pitch setting) */
+#define	SPU_VOICE_NOTE		(0x01 <<  5) /* tone (note setting)  */
+#define	SPU_VOICE_SAMPLE_NOTE	(0x01 <<  6) /* waveform data sample note */
+#define	SPU_VOICE_WDSA		(0x01 <<  7) /* waveform data start address */
+#define	SPU_VOICE_ADSR_AMODE	(0x01 <<  8) /* ADSR Attack rate mode */
+#define	SPU_VOICE_ADSR_SMODE	(0x01 <<  9) /* ADSR Sustain rate mode */
+#define	SPU_VOICE_ADSR_RMODE	(0x01 << 10) /* ADSR Release rate mode */
+#define	SPU_VOICE_ADSR_AR	(0x01 << 11) /* ADSR Attack rate         */
+#define	SPU_VOICE_ADSR_DR	(0x01 << 12) /* ADSR Decay rate          */
+#define	SPU_VOICE_ADSR_SR	(0x01 << 13) /* ADSR Sustain rate        */
+#define	SPU_VOICE_ADSR_RR	(0x01 << 14) /* ADSR Release rate        */
+#define	SPU_VOICE_ADSR_SL	(0x01 << 15) /* ADSR Sustain level       */
+#define	SPU_VOICE_LSAX		(0x01 << 16) /* start address for loop */
+#define	SPU_VOICE_ADSR_ADSR1	(0x01 << 17) /* ADSR adsr1 for `VagAtr'  */
+#define	SPU_VOICE_ADSR_ADSR2	(0x01 << 18) /* ADSR adsr2 for `VagAtr'  */
+
+#define	SPU_VOICE_DIRECT	0
+#define	SPU_VOICE_LINEARIncN	1
+#define	SPU_VOICE_LINEARIncR	2
+#define	SPU_VOICE_LINEARDecN	3
+#define	SPU_VOICE_LINEARDecR	4
+#define	SPU_VOICE_EXPIncN	5
+#define	SPU_VOICE_EXPIncR	6
+#define	SPU_VOICE_EXPDec	7
+#define	SPU_VOICE_EXPDecN	SPU_VOICE_EXPDec
+#define	SPU_VOICE_EXPDecR	SPU_VOICE_EXPDec
+
+#define	SPU_DECODED_FIRSTHALF	0
+#define	SPU_DECODED_SECONDHALF	1
+#define	SPU_DECODE_FIRSTHALF	SPU_DECODED_FIRSTHALF
+#define	SPU_DECODE_SECONDHALF	SPU_DECODED_SECONDHALF
+
+
+#define	SPU_COMMON_MVOLL		(0x01 <<  0) /* master volume (left) */
+#define	SPU_COMMON_MVOLR		(0x01 <<  1) /* master volume (right) */
+#define	SPU_COMMON_MVOLMODEL		(0x01 <<  2) /* master volume mode (left) */
+#define	SPU_COMMON_MVOLMODER		(0x01 <<  3) /* master volume mode (right) */
+#define	SPU_COMMON_RVOLL		(0x01 <<  4) /* reverb volume (left) */
+#define	SPU_COMMON_RVOLR		(0x01 <<  5) /* reverb volume (right) */
+#define	SPU_COMMON_CDVOLL		(0x01 <<  6) /* CD input volume (left) */
+#define	SPU_COMMON_CDVOLR		(0x01 <<  7) /* CD input volume (right) */
+#define	SPU_COMMON_CDREV		(0x01 <<  8) /* CD input reverb on/off */
+#define	SPU_COMMON_CDMIX		(0x01 <<  9) /* CD input on/off */
+#define	SPU_COMMON_EXTVOLL		(0x01 << 10) /* external digital input volume (left) */
+#define	SPU_COMMON_EXTVOLR		(0x01 << 11) /* external digital input volume (right) */
+#define	SPU_COMMON_EXTREV		(0x01 << 12) /* external digital input reverb on/off */
+#define	SPU_COMMON_EXTMIX		(0x01 << 13) /* external digital input on/off */
+
+/* for Reverb setting */
+
+#define	SPU_REV_MODE		(0x01 <<  0) /* mode setting */
+#define	SPU_REV_DEPTHL		(0x01 <<  1) /* reverb depth (left) */
+#define	SPU_REV_DEPTHR		(0x01 <<  2) /* reverb depth (right) */
+#define	SPU_REV_DELAYTIME	(0x01 <<  3) /* Delay Time  (ECHO, DELAY only) */
+#define	SPU_REV_FEEDBACK	(0x01 <<  4) /* Feedback    (ECHO only) */
+
+#define SPU_REV_MODE_CHECK	(-1)
+#define SPU_REV_MODE_OFF	0
+#define SPU_REV_MODE_ROOM	1
+#define SPU_REV_MODE_STUDIO_A	2
+#define SPU_REV_MODE_STUDIO_B	3
+#define SPU_REV_MODE_STUDIO_C	4
+#define SPU_REV_MODE_HALL	5
+#define SPU_REV_MODE_SPACE	6
+#define SPU_REV_MODE_ECHO	7
+#define SPU_REV_MODE_DELAY	8
+#define SPU_REV_MODE_PIPE	9
+#define SPU_REV_MODE_MAX	10
+
+#define SPU_REV_MODE_CLEAR_WA	0x100
+
+/* ----------------------------------------------------------------
+ *	Event flushing
+ * ---------------------------------------------------------------- */
+
+#define SPU_EVENT_KEY      (0x01 << 0)
+#define SPU_EVENT_PITCHLFO (0x01 << 1)
+#define SPU_EVENT_NOISE    (0x01 << 2)
+#define SPU_EVENT_REVERB   (0x01 << 3)
+
+#define SPU_EVENT_ALL 0
+
+/* ----------------------------------------------------------------
+ *	Structure
+ * ---------------------------------------------------------------- */
+
+typedef struct {
+    short left;	       /* Lch */
+    short right;       /* Rch */
+} SpuVolume;
+
+typedef struct {
+    unsigned long	voice;		/* set voice:
+                            SpuSetVoiceAttr: each voice is a bit array
+                            SpuGetVoiceAttr: voice is a bit value */
+    unsigned long	mask;		/* settings attribute bit (invalid with Get) */
+    SpuVolume		volume;		/* volume                         */
+    SpuVolume		volmode;	/* volume mode                    */
+    SpuVolume		volumex;	/* current volume (invalid with Set) */
+    unsigned short	pitch;		/* tone (pitch setting) */
+    unsigned short	note;		/* tone (note setting) */
+    unsigned short	sample_note;	/* tone (note setting) */
+    short		envx;		/* current envelope value (invalid with Set) */
+    unsigned long	addr;		/* waveform data start address */
+    unsigned long	loop_addr;	/* loop start address */
+    long		a_mode;		/* Attack rate mode			*/
+    long		s_mode;		/* Sustain rate mode			*/
+    long		r_mode;		/* Release rate mode			*/
+    unsigned short	ar;		/* Attack rate				*/
+    unsigned short	dr;		/* Decay rate				*/
+    unsigned short	sr;		/* Sustain rate				*/
+    unsigned short	rr;		/* Release rate				*/
+    unsigned short	sl;		/* Sustain level			*/
+    unsigned short	adsr1;		/* adsr1 for `VagAtr' */
+    unsigned short	adsr2;		/* adsr2 for `VagAtr' */
+} SpuVoiceAttr;
+
+typedef struct {
+    short	voiceNum;		/* voice number */
+    short	pad;			/* padding */
+    SpuVoiceAttr	attr;		/* voice attribute */
+} SpuLVoiceAttr;
+
+typedef struct {
+    unsigned long	mask;	  /* settings mask */
+    
+    long		mode;	  /* reverb mode */
+    SpuVolume		depth;	  /* reverb depth */
+    long                delay;	  /* Delay Time  (ECHO, DELAY only)   */
+    long                feedback; /* Feedback    (ECHO only)          */
+} SpuReverbAttr;
+
+#define SPU_DECODEDDATA_SIZE 0x200
+#define SPU_DECODEDATA_SIZE SPU_DECODEDDATA_SIZE
+typedef struct {
+    short cd_left  [SPU_DECODEDDATA_SIZE];
+    short cd_right [SPU_DECODEDDATA_SIZE];
+    short voice1   [SPU_DECODEDDATA_SIZE];
+    short voice3   [SPU_DECODEDDATA_SIZE];
+} SpuDecodedData;
+typedef SpuDecodedData SpuDecodeData;
+
+typedef struct {
+    SpuVolume	volume;		  /* volume       */
+    long	reverb;		  /* reverb on/off */
+    long	mix;		  /* mixing on/off */
+} SpuExtAttr;
+
+typedef struct {
+    unsigned long	mask;	  /* settings mask */
+    
+    SpuVolume		mvol;	  /* master volume */
+    SpuVolume		mvolmode; /* master volume mode */
+    SpuVolume		mvolx;	  /* current master volume */
+    SpuExtAttr		cd;	  /* CD input attributes */
+    SpuExtAttr		ext;	  /* external digital input attributes */
+} SpuCommonAttr;
+
+#ifndef __SPU_IRQCALLBACK_PROC
+#define __SPU_IRQCALLBACK_PROC
+typedef void (*SpuIRQCallbackProc)(void);
+#endif /* __SPU_IRQCALLBACK_PROC */
+#ifndef __SPU_TRANSFERCALLBACK_PROC
+#define __SPU_TRANSFERCALLBACK_PROC
+typedef void (*SpuTransferCallbackProc)(void);
+#endif /* __SPU_TRANSFERCALLBACK_PROC */
+
+/* ----------------------------------------------------------------
+ *	for SPU Malloc (used in SpuInitMalloc())
+ * ---------------------------------------------------------------- */
+
+#define SPU_MALLOC_RECSIZ 8
+
+/* ----------------------------------------------------------------
+ *	User specifiable global environment
+ * ---------------------------------------------------------------- */
+
+typedef struct {
+    unsigned long mask;
+    unsigned long queueing;
+} SpuEnv;
+
+#define SPU_ENV_EVENT_QUEUEING			(0x01 << 0)
+
+/* ----------------------------------------------------------------
+ *	prototype declaration
+ * ---------------------------------------------------------------- */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+extern "C" {
+#endif
+extern void SpuInit (void);
+extern void SpuInitHot (void);
+extern void SpuStart (void);
+extern void SpuQuit (void);
+extern long SpuSetMute (long on_off);
+extern long SpuGetMute (void);
+extern void SpuSetEnv (SpuEnv *env);
+
+extern long SpuSetNoiseClock (long n_clock);
+extern long SpuGetNoiseClock (void);
+extern unsigned long SpuSetNoiseVoice (long on_off, unsigned long voice_bit);
+extern unsigned long SpuGetNoiseVoice (void);
+
+extern long SpuSetReverb (long on_off);
+extern long SpuGetReverb (void);
+extern long SpuSetReverbModeParam (SpuReverbAttr *attr);
+extern void SpuGetReverbModeParam (SpuReverbAttr *attr);
+extern long SpuSetReverbDepth (SpuReverbAttr *attr);
+extern long SpuReserveReverbWorkArea (long on_off);
+extern long SpuIsReverbWorkAreaReserved (long on_off);
+extern unsigned long SpuSetReverbVoice (long on_off, unsigned long voice_bit);
+extern unsigned long SpuGetReverbVoice (void);
+extern long SpuClearReverbWorkArea (long mode);
+
+extern unsigned long SpuWrite (unsigned char *addr, unsigned long size);
+extern unsigned long SpuWrite0 (unsigned long size);
+extern unsigned long SpuRead (unsigned char *addr, unsigned long size);
+extern long SpuSetTransferMode (long mode);
+#define SpuSetTransMode(mode) SpuSetTransferMode((mode))
+extern long SpuGetTransferMode (void);
+#define SpuGetTransMode() SpuGetTransferMode()
+extern unsigned long SpuSetTransferStartAddr (unsigned long addr);
+#define SpuSetTransStartAddr(addr) SpuSetTransferStartAddr((addr))
+extern unsigned long SpuGetTransferStartAddr (void);
+#define SpuGetTransStartAddr() SpuGetTransferStartAddr()
+extern unsigned long SpuWritePartly (unsigned char *addr, unsigned long size);
+
+extern long SpuIsTransferCompleted (long flag);
+extern SpuTransferCallbackProc SpuSetTransferCallback (SpuTransferCallbackProc func);
+extern long SpuReadDecodedData (SpuDecodedData *d_data, long flag);
+#define SpuReadDecodeData(d_data,flag) SpuReadDecodedData((d_data), (flag))
+
+extern long SpuSetIRQ (long on_off);
+extern long SpuGetIRQ (void);
+extern unsigned long SpuSetIRQAddr (unsigned long);
+extern unsigned long SpuGetIRQAddr (void);
+extern SpuIRQCallbackProc SpuSetIRQCallback (SpuIRQCallbackProc);
+
+extern void SpuSetVoiceAttr (SpuVoiceAttr *arg);
+extern void SpuGetVoiceAttr (SpuVoiceAttr *arg);
+extern void SpuSetKey (long on_off, unsigned long voice_bit);
+extern void SpuSetKeyOnWithAttr (SpuVoiceAttr *attr);
+extern long SpuGetKeyStatus (unsigned long voice_bit);
+extern void SpuGetAllKeysStatus (char *status);
+extern unsigned long SpuFlush (unsigned long ev);
+
+extern unsigned long SpuSetPitchLFOVoice (long on_off, unsigned long voice_bit);
+extern unsigned long SpuGetPitchLFOVoice (void);
+
+extern void SpuSetCommonAttr (SpuCommonAttr *attr);
+extern void SpuGetCommonAttr (SpuCommonAttr *attr);
+
+extern long SpuInitMalloc (long num, char *top);
+extern long SpuMalloc (long size);
+extern long SpuMallocWithStartAddr (unsigned long addr, long size);
+extern void SpuFree (unsigned long addr);
+
+extern long SpuRGetAllKeysStatus (long min_, long max_, char *status);
+extern long SpuRSetVoiceAttr (long min_, long max_, SpuVoiceAttr *arg);
+
+extern void SpuNSetVoiceAttr (int vNum, SpuVoiceAttr *arg);
+extern void SpuNGetVoiceAttr (int vNum, SpuVoiceAttr *arg);
+
+extern void SpuLSetVoiceAttr (int num, SpuLVoiceAttr *argList);
+
+extern void SpuSetVoiceVolume (int vNum, short volL, short volR);
+extern void SpuSetVoiceVolumeAttr (int vNum, short volL, short volR,
+				   short volModeL, short volModeR);
+extern void SpuSetVoicePitch (int vNum, unsigned short pitch);
+extern void SpuSetVoiceNote (int vNum, unsigned short note);
+extern void SpuSetVoiceSampleNote (int vNum, unsigned short sampleNote);
+extern void SpuSetVoiceStartAddr (int vNum, unsigned long startAddr);
+extern void SpuSetVoiceLoopStartAddr (int vNum, unsigned long lsa);
+extern void SpuSetVoiceAR (int vNum, unsigned short AR);
+extern void SpuSetVoiceDR (int vNum, unsigned short DR);
+extern void SpuSetVoiceSR (int vNum, unsigned short SR);
+extern void SpuSetVoiceRR (int vNum, unsigned short RR);
+extern void SpuSetVoiceSL (int vNum, unsigned short SL);
+extern void SpuSetVoiceARAttr (int vNum, unsigned short AR, long ARmode);
+extern void SpuSetVoiceSRAttr (int vNum, unsigned short SR, long SRmode);
+extern void SpuSetVoiceRRAttr (int vNum, unsigned short RR, long RRmode);
+extern void SpuSetVoiceADSR (int vNum, unsigned short AR, unsigned short DR,
+			     unsigned short SR, unsigned short RR,
+			     unsigned short SL);
+extern void SpuSetVoiceADSRAttr (int vNum,
+				 unsigned short AR, unsigned short DR,
+				 unsigned short SR, unsigned short RR,
+				 unsigned short SL,
+				 long ARmode, long SRmode, long RRmode);
+
+extern void SpuGetVoiceVolume (int vNum, short *volL, short *volR);
+extern void SpuGetVoiceVolumeAttr (int vNum, short *volL, short *volR,
+				   short *volModeL, short *volModeR);
+extern void SpuGetVoiceVolumeX (int vNum, short *volXL, short *volXR);
+extern void SpuGetVoicePitch (int vNum, unsigned short *pitch);
+extern void SpuGetVoiceNote (int vNum, unsigned short *note);
+extern void SpuGetVoiceSampleNote (int vNum, unsigned short *sampleNote);
+extern void SpuGetVoiceEnvelope (int vNum, short *envx);
+extern void SpuGetVoiceStartAddr (int vNum, unsigned long *startAddr);
+extern void SpuGetVoiceLoopStartAddr (int vNum, unsigned long *loopStartAddr);
+extern void SpuGetVoiceAR (int vNum, unsigned short *AR);
+extern void SpuGetVoiceDR (int vNum, unsigned short *DR);
+extern void SpuGetVoiceSR (int vNum, unsigned short *SR);
+extern void SpuGetVoiceRR (int vNum, unsigned short *RR);
+extern void SpuGetVoiceSL (int vNum, unsigned short *SL);
+extern void SpuGetVoiceARAttr (int vNum, unsigned short *AR, long *ARmode);
+extern void SpuGetVoiceSRAttr (int vNum, unsigned short *SR, long *SRmode);
+extern void SpuGetVoiceRRAttr (int vNum, unsigned short *RR, long *RRmode);
+extern void SpuGetVoiceADSR (int vNum,
+			     unsigned short *AR, unsigned short *DR,
+			     unsigned short *SR, unsigned short *RR,
+			     unsigned short *SL);
+extern void SpuGetVoiceADSRAttr (int vNum,
+				 unsigned short *AR, unsigned short *DR,
+				 unsigned short *SR, unsigned short *RR,
+				 unsigned short *SL,
+				 long *ARmode, long *SRmode, long *RRmode);
+extern void SpuGetVoiceEnvelopeAttr (int vNum, long *keyStat, short *envx );
+
+extern void SpuSetCommonMasterVolume (short mvol_left, short mvol_right);
+extern void SpuSetCommonMasterVolumeAttr (short mvol_left, short mvol_right,
+					  short mvolmode_left,
+					  short mvolmode_right);
+extern void SpuSetCommonCDMix (long cd_mix);
+extern void SpuSetCommonCDVolume (short cd_left, short cd_right);
+extern void SpuSetCommonCDReverb (long cd_reverb);
+
+extern void SpuGetCommonMasterVolume (short *mvol_left, short *mvol_right);
+extern void SpuGetCommonMasterVolumeX (short *mvolx_left, short *mvolx_right);
+extern void SpuGetCommonMasterVolumeAttr (short *mvol_left, short *mvol_right,
+					  short *mvolmode_left,
+					  short *mvolmode_right);
+extern void SpuGetCommonCDMix (long *cd_mix);
+extern void SpuGetCommonCDVolume (short *cd_left, short *cd_right);
+extern void SpuGetCommonCDReverb (long *cd_reverb);
+
+extern long SpuSetReverbModeType (long mode);
+extern void SpuSetReverbModeDepth (short depth_left, short depth_right);
+extern void SpuSetReverbModeDelayTime (long delay);
+extern void SpuSetReverbModeFeedback (long feedback);
+extern void SpuGetReverbModeType (long *mode);
+extern void SpuGetReverbModeDepth (short *depth_left, short *depth_right);
+extern void SpuGetReverbModeDelayTime (long *delay);
+extern void SpuGetReverbModeFeedback (long *feedback);
+extern void SpuSetESA( long revAddr );
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+}
+#endif
+
+/* ---------------------------------------------------------------- */
+
+#define SPU_ST_NOT_AVAILABLE 0
+#define SPU_ST_ACCEPT  1
+
+#define SPU_ST_ERROR (-1)
+#define SPU_ST_INVALID_ARGUMENT (-2)
+#define SPU_ST_WRONG_STATUS (-3)
+
+#define SPU_ST_STOP     2
+#define SPU_ST_IDLE     3
+#define SPU_ST_PREPARE  4
+#define SPU_ST_START    5
+#define SPU_ST_PLAY     6
+#define SPU_ST_TRANSFER 7
+#define SPU_ST_FINAL    8
+
+
+/* VAG's header size */
+#define SPU_ST_VAG_HEADER_SIZE 0x30
+
+typedef struct {
+    char status;		/* stream status */
+    char pad1;			/* padding */
+    char pad2;			/* padding */
+    char pad3;			/* padding */
+    long last_size;		/* the size of last transferring
+				   (last_size <= (size / 2)) */
+    unsigned long buf_addr;	/* The start address of stream buffer */
+    unsigned long data_addr;	/* The start address of SPU streaming
+				   data in main memory */
+} SpuStVoiceAttr;
+
+typedef struct {
+    long size;			/* The size of stream buffer */
+    long low_priority;		/* transfer priority */
+    SpuStVoiceAttr voice [24];
+} SpuStEnv;
+
+#ifndef __SPU_ST_TRANSFERCALLBACK_PROC
+#define __SPU_ST_TRANSFERCALLBACK_PROC
+typedef void (*SpuStCallbackProc)(unsigned long, long);
+#endif /* __SPU_TRANSFERCALLBACK_PROC */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+extern "C" {
+#endif
+extern SpuStEnv *SpuStInit (long);
+extern long SpuStQuit (void);
+extern long SpuStGetStatus (void);
+extern unsigned long SpuStGetVoiceStatus (void);
+extern long SpuStTransfer (long flag, unsigned long voice_bit);
+extern SpuStCallbackProc SpuStSetPreparationFinishedCallback (SpuStCallbackProc func);
+extern SpuStCallbackProc SpuStSetTransferFinishedCallback (SpuStCallbackProc func);
+extern SpuStCallbackProc SpuStSetStreamFinishedCallback (SpuStCallbackProc func);
+#if defined(_LANGUAGE_C_PLUS_PLUS) || defined(__cplusplus) || defined(c_plusplus)
+}
+#endif
+
+/* ----------------------------------------------------------------
+ *	End on File
+ * ---------------------------------------------------------------- */
+#endif /* _LIBSPU_H_ */
+/* DON'T ADD STUFF AFTER THIS */
diff --git a/tools/psyq/include/LIBTAP.H b/tools/psyq/include/LIBTAP.H
new file mode 100644
index 000000000..d76754301
--- /dev/null
+++ b/tools/psyq/include/LIBTAP.H
@@ -0,0 +1,25 @@
+/* $PSLibId: Run-time Library Release 4.7$ */
+#ifndef _LIBTAP_H_
+#define _LIBTAP_H_
+
+/*
+ *  Copyright (C) 1996 Sony Computer Entertainment Inc. All Rights Reserved
+ *  libtap.h: Multi Tap Interface
+ */
+
+/*
+ * Prototypes
+ */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern void InitTAP(char *, long, char *, long);
+extern void StartTAP(void);
+extern void StopTAP(void);
+extern void EnableTAP(void);
+extern void DisableTAP(void);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif /* _LIBTAP_H_ */
diff --git a/tools/psyq/include/LIMITS.H b/tools/psyq/include/LIMITS.H
new file mode 100644
index 000000000..cf4716347
--- /dev/null
+++ b/tools/psyq/include/LIMITS.H
@@ -0,0 +1,38 @@
+/*
+ * File:limits.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _LIMITS_H
+#define _LIMITS_H
+/*
+ * This file specifies the sizes of intergral types as required by the
+ * proposed ANSI C standard.
+ */
+
+#define CHAR_BIT	8
+#define SCHAR_MIN	(-128)
+#define SCHAR_MAX	127
+#define UCHAR_MAX	255
+#define CHAR_MIN	SCHAR_MIN
+#define CHAR_MAX	SCHAR_MAX
+#define SHRT_MIN	(-32768)
+#define SHRT_MAX	32767
+#define USHRT_MAX	65535
+#define INT_MIN		(-2147483647-1)
+#define INT_MAX		2147483647
+#define UINT_MAX	4294967295U
+#define LONG_MIN	(-2147483647-1)
+#define LONG_MAX	2147483647
+#define ULONG_MAX	4294967295UL
+
+#define	USI_MAX		4294967295	/* max decimal value of an "unsigned" */
+#define	WORD_BIT	32		/* # of bits in a "word" or "int" */
+
+#ifndef MB_LEN_MAX
+#define MB_LEN_MAX	4
+#endif
+
+#endif /* _LIMITS_H */
diff --git a/tools/psyq/include/MALLOC.H b/tools/psyq/include/MALLOC.H
new file mode 100644
index 000000000..4cb73a7b2
--- /dev/null
+++ b/tools/psyq/include/MALLOC.H
@@ -0,0 +1,41 @@
+/*
+ * File:malloc.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _MALLOC_H
+#define _MALLOC_H
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned int size_t;  /* result type of the sizeof operator (ANSI) */
+#endif
+#ifndef NULL
+#define NULL 0		       /* null pointer constant */
+#endif
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern void InitHeap (unsigned long *, unsigned long);
+extern void free(void *);
+extern void *malloc(size_t);
+extern void *calloc(size_t, size_t);
+extern void *realloc(void *, size_t);
+extern void InitHeap2 (unsigned long *, unsigned long);
+extern void free2(void *);
+extern void *malloc2(size_t);
+extern void *calloc2(size_t, size_t);
+extern void *realloc2(void *, size_t);
+extern void InitHeap3(unsigned long *, unsigned long);
+extern void free3(void *);
+extern void *malloc3(size_t);
+extern void *calloc3(size_t, size_t);
+extern void *realloc3(void *, size_t);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _MALLOC_H */
+
diff --git a/tools/psyq/include/MCGUI.H b/tools/psyq/include/MCGUI.H
new file mode 100644
index 000000000..656d1ecba
--- /dev/null
+++ b/tools/psyq/include/MCGUI.H
@@ -0,0 +1,132 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _MCGUI_H_
+#define _MCGUI_H_
+
+
+#define NEGICON_A	(0x20)
+#define NEGICON_B	(0x10)
+
+#define MOUSE_LBUTTON	(0x08)
+#define MOUSE_RBUTTON	(0x04)
+
+#define MCGUI_INTERNAL_FONT	(0)
+#define MCGUI_EXTERNAL_FONT	(1)
+
+/* Texture Information Structure */
+
+typedef struct {
+	unsigned long* addr;
+} sMcGuiTexture;
+
+
+/* Memory Card Information Structure */
+
+typedef struct {
+	char file[21];
+	char title[65];
+	char frame;
+	char block;
+	long dataBytes;
+	unsigned long* iconAddr;
+	unsigned long* dataAddr;
+} sMcGuiCards;
+
+/* BG Information Structure */
+
+typedef struct {
+	short mode;
+	signed char scrollDirect;	/* 0:Up 1:Up&Left 2:Left 3:Down&left 4:Down ...*/
+	signed char scrollSpeed;	/* 0:no scroll 1:1/60 2:1/30 3:1/20 */
+	unsigned long* timadr;
+} sMcGuiBg;
+
+/* Cursor Information Structure */
+
+typedef struct {
+	char type;
+	unsigned char r;
+	unsigned char g;
+	unsigned char b;
+} sMcGuiCursor;
+
+/* BGM,Sound Effects Information Structure */
+
+typedef struct {
+	int MVOL;
+	struct {
+		int isbgm;
+		unsigned long* seq;
+		unsigned long* vh;
+		unsigned long* vb;
+		int SVOL;
+		int isReverb;
+		int reverbType;
+		int reverbDepth;
+	} bgm;
+	struct {
+		int isse;
+		unsigned long* vh;
+		unsigned long* vb;
+		int vol;
+		int prog;
+		int TONE_OK;
+		int TONE_CANCEL;
+		int TONE_CURSOR;
+		int TONE_ERROR;
+	} se;
+} sMcGuiSnd;
+
+/* Controller Related Information Structure */
+
+typedef struct {
+	volatile unsigned char* buf[2];
+	struct {
+		int flag;
+		unsigned long BUTTON_OK;
+		unsigned long BUTTON_CANCEL;
+	} type1;
+	struct {
+		int flag;
+		unsigned long BUTTON_OK;
+		unsigned long BUTTON_CANCEL;
+	} type2;
+	struct {
+		int flag;
+		unsigned long BUTTON_OK;
+		unsigned long BUTTON_CANCEL;
+	} type3;
+	struct {
+		int flag;
+		unsigned long BUTTON_OK;
+		unsigned long BUTTON_CANCEL;
+	} type4;
+} sMcGuiController;
+
+
+/* Memory Card Screen Configuration Structure */
+
+typedef struct {
+	sMcGuiCards cards;		/* Memory Card Information */
+	sMcGuiBg bg;			/* BG Information */
+	sMcGuiController controller;	/* Controller Related Information */
+	sMcGuiSnd sound;		/* BGM Sound Effects Information */
+	sMcGuiTexture texture;		/* Texture Information */
+	sMcGuiCursor cursor;		/* Cursor Information */
+} McGuiEnv;
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+extern int McGuiSave(McGuiEnv* env);
+extern int McGuiLoad(McGuiEnv* env);
+
+int McGuiSetExternalFont(McGuiEnv* env, int mode);
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _MCGUI_H_ */
diff --git a/tools/psyq/include/MEMORY.H b/tools/psyq/include/MEMORY.H
new file mode 100644
index 000000000..ff5894678
--- /dev/null
+++ b/tools/psyq/include/MEMORY.H
@@ -0,0 +1,44 @@
+/*
+ * File:memory.h
+ * memory functions pseudo definition header
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _MEMORY_H
+#define _MEMORY_H
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned int size_t;  /* result type of the sizeof operator (ANSI) */
+#endif
+
+#ifndef NULL
+#define NULL 0		       /* null pointer constant */
+#endif
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+/* To avoid conflicting */
+extern void *memcpy (/*  unsigned char *, unsigned char *, int  */); 
+extern void *memmove(unsigned char *, const unsigned char *, int);
+/* To avoid conflicting */
+extern int   memcmp (/*  unsigned char *, unsigned char *, int  */);
+extern void *memchr (const unsigned char *, unsigned char, int);
+extern void *memset (/* unsigned char *, unsigned char, int */);
+
+extern void *bcopy(const unsigned char *, unsigned char *, int); /* src,dest */
+extern void *bzero(unsigned char *, int);
+extern int   bcmp (const unsigned char *, const unsigned char *, int);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif  /* _MEMORY_H */
+
+
+
+
+
diff --git a/tools/psyq/include/PROFILE.H b/tools/psyq/include/PROFILE.H
new file mode 100644
index 000000000..858486003
--- /dev/null
+++ b/tools/psyq/include/PROFILE.H
@@ -0,0 +1,30 @@
+#define	PROFMASK	unsigned int
+
+typedef struct _profentry
+{
+	void* address;
+	unsigned int flags;
+} profentry;
+
+typedef struct _profhdr
+{
+	void*			start;
+	void*			end;
+	profentry*	buffptr;
+	profentry*	buffend;
+	unsigned int			flags;
+	unsigned int			mask;
+	profentry*	ptr;
+} profhdr;
+
+
+/*************************************************/
+/*             Profiler functions                */
+/*************************************************/
+
+extern void INITprofile(void* ptr, unsigned int length);
+extern void SETprofrange(PROFMASK mask, void* startpc, void* endpc);
+extern PROFMASK SETprofileflags(PROFMASK flags);
+extern PROFMASK CLRprofileflags(PROFMASK flags);
+extern void SNprofile();
+
diff --git a/tools/psyq/include/QSORT.H b/tools/psyq/include/QSORT.H
new file mode 100644
index 000000000..58d4eab89
--- /dev/null
+++ b/tools/psyq/include/QSORT.H
@@ -0,0 +1,30 @@
+/*
+ * File:qsort.h
+ * memory functions pseudo definition header
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _QSORT_H
+#define _QSORT_H
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned int size_t;  /* result type of the sizeof operator (ANSI) */
+#endif
+
+#ifndef NULL
+#define NULL 0		       /* null pointer constant */
+#endif
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern void qsort(void *, size_t, size_t, int (*)());
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif  /* _QSORT_H */
+
diff --git a/tools/psyq/include/R3000.H b/tools/psyq/include/R3000.H
new file mode 100644
index 000000000..2dbf13d21
--- /dev/null
+++ b/tools/psyq/include/R3000.H
@@ -0,0 +1,244 @@
+/*
+ * File:r3000.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+#ifndef _R3000_H
+#define _R3000_H
+/*
+ * Segment base addresses and sizes
+ */
+#define	K0BASE		0x80000000
+#define	K0SIZE		0x20000000
+#define	K1BASE		0xA0000000
+#define	K1SIZE		0x20000000
+#define	K2BASE		0xC0000000
+#define	K2SIZE		0x20000000
+
+/*
+ * Exception vectors
+ */
+#define	UT_VEC		K0BASE			/* utlbmiss vector */
+#define	E_VEC		(K0BASE+0x80)		/* exception vector */
+#define	R_VEC		(K1BASE+0x1fc00000)	/* reset vector */
+
+/*
+ * Address conversion macros
+ */
+#define	K0_TO_K1(x)	((unsigned)(x)|0xA0000000)	/* kseg0 to kseg1 */
+#define	K1_TO_K0(x)	((unsigned)(x)&0x9FFFFFFF)	/* kseg1 to kseg0 */
+#define	K0_TO_PHYS(x)	((unsigned)(x)&0x1FFFFFFF)	/* kseg0 to physical */
+#define	K1_TO_PHYS(x)	((unsigned)(x)&0x1FFFFFFF)	/* kseg1 to physical */
+#define	PHYS_TO_K0(x)	((unsigned)(x)|0x80000000)	/* physical to kseg0 */
+#define	PHYS_TO_K1(x)	((unsigned)(x)|0xA0000000)	/* physical to kseg1 */
+
+/*
+ * Address predicates
+ */
+#define	IS_KSEG0(x)	((unsigned)(x) >= K0BASE && (unsigned)(x) < K1BASE)
+#define	IS_KSEG1(x)	((unsigned)(x) >= K1BASE && (unsigned)(x) < K2BASE)
+#define	IS_KSEG2(x)	((unsigned)(x) >= K2BASE && (unsigned)(x) < KPTEBASE)
+#define	IS_KPTESEG(x)	((unsigned)(x) >= KPTEBASE)
+#define	IS_KUSEG(x)	((unsigned)(x) < K0BASE)
+
+/*
+ * Cache size constants
+ */
+#define	MINCACHE	+(4*1024)	/* leading plus for mas's benefit */
+#define	MAXCACHE	+(64*1024)	/* leading plus for mas's benefit */
+
+
+/*
+ * Status register
+ */
+#define	SR_CUMASK	0xf0000000	/* coproc usable bits */
+
+#define	SR_CU3		0x80000000	/* Coprocessor 3 usable */
+#define	SR_CU2		0x40000000	/* Coprocessor 2 usable */
+#define	SR_CU1		0x20000000	/* Coprocessor 1 usable */
+#define	SR_CU0		0x10000000	/* Coprocessor 0 usable */
+
+#define	SR_BEV		0x00400000	/* use boot exception vectors */
+
+/* Cache control bits */
+#define	SR_TS		0x00200000	/* TLB shutdown */
+#define	SR_PE		0x00100000	/* cache parity error */
+#define	SR_CM		0x00080000	/* cache miss */
+#define	SR_PZ		0x00040000	/* cache parity zero */
+#define	SR_SWC		0x00020000	/* swap cache */
+#define	SR_ISC		0x00010000	/* Isolate data cache */
+
+#define SR_MM_MODE	0x00010000	/* lwl/swl/etc become scache/etc */
+#define lcache		lwl
+#define scache		swl
+#define flush		lwr $0,
+#define inval		swr $0,
+
+/*
+ * Interrupt enable bits
+ * (NOTE: bits set to 1 enable the corresponding level interrupt)
+ */
+#define	SR_IMASK	0x0000ff00	/* Interrupt mask */
+#define	SR_IMASK8	0x00000000	/* mask level 8 */
+#define	SR_IMASK7	0x00008000	/* mask level 7 */
+#define	SR_IMASK6	0x0000c000	/* mask level 6 */
+#define	SR_IMASK5	0x0000e000	/* mask level 5 */
+#define	SR_IMASK4	0x0000f000	/* mask level 4 */
+#define	SR_IMASK3	0x0000f800	/* mask level 3 */
+#define	SR_IMASK2	0x0000fc00	/* mask level 2 */
+#define	SR_IMASK1	0x0000fe00	/* mask level 1 */
+#define	SR_IMASK0	0x0000ff00	/* mask level 0 */
+
+#define	SR_IBIT8	0x00008000	/* bit level 8 */
+#define	SR_IBIT7	0x00004000	/* bit level 7 */
+#define	SR_IBIT6	0x00002000	/* bit level 6 */
+#define	SR_IBIT5	0x00001000	/* bit level 5 */
+#define	SR_IBIT4	0x00000800	/* bit level 4 */
+#define	SR_IBIT3	0x00000400	/* bit level 3 */
+#define	SR_IBIT2	0x00000200	/* bit level 2 */
+#define	SR_IBIT1	0x00000100	/* bit level 1 */
+
+#define	SR_KUO		0x00000020	/* old kernel/user, 0 => k, 1 => u */
+#define	SR_IEO		0x00000010	/* old interrupt enable, 1 => enable */
+#define	SR_KUP		0x00000008	/* prev kernel/user, 0 => k, 1 => u */
+#define	SR_IEP		0x00000004	/* prev interrupt enable, 1 => enable */
+#define	SR_KUC		0x00000002	/* cur kernel/user, 0 => k, 1 => u */
+#define	SR_IEC		0x00000001	/* cur interrupt enable, 1 => enable */
+
+#define	SR_IMASKSHIFT	8
+
+#define	SR_FMT		"\20\40BD\26TS\25PE\24CM\23PZ\22SwC\21IsC\20IM7\17IM6\16IM5\15IM4\14IM3\13IM2\12IM1\11IM0\6KUo\5IEo\4KUp\3IEp\2KUc\1IEc"
+
+/*
+ * Cause Register
+ */
+#define	CAUSE_BD	0x80000000	/* Branch delay slot */
+#define	CAUSE_CEMASK	0x30000000	/* coprocessor error */
+#define	CAUSE_CESHIFT	28
+
+/* Interrupt pending bits */
+#define	CAUSE_IP8	0x00008000	/* External level 8 pending */
+#define	CAUSE_IP7	0x00004000	/* External level 7 pending */
+#define	CAUSE_IP6	0x00002000	/* External level 6 pending */
+#define	CAUSE_IP5	0x00001000	/* External level 5 pending */
+#define	CAUSE_IP4	0x00000800	/* External level 4 pending */
+#define	CAUSE_IP3	0x00000400	/* External level 3 pending */
+#define	CAUSE_SW2	0x00000200	/* Software level 2 pending */
+#define	CAUSE_SW1	0x00000100	/* Software level 1 pending */
+
+#define	CAUSE_IPMASK	0x0000FF00	/* Pending interrupt mask */
+#define	CAUSE_IPSHIFT	8
+
+#define	CAUSE_EXCMASK	0x0000003C	/* Cause code bits */
+#define	CAUSE_EXCSHIFT	2
+
+#define	CAUSE_FMT	"\20\40BD\36CE1\35CE0\20IP8\17IP7\16IP6\15IP5\14IP4\13IP3\12SW2\11SW1\1INT"
+
+/* Cause register exception codes */
+
+#define	EXC_CODE(x)	((x)<<2)
+
+/* Hardware exception codes */
+#define	EXC_INT		EXC_CODE(0)	/* interrupt */
+#define	EXC_MOD		EXC_CODE(1)	/* TLB mod */
+#define	EXC_RMISS	EXC_CODE(2)	/* Read TLB Miss */
+#define	EXC_WMISS	EXC_CODE(3)	/* Write TLB Miss */
+#define	EXC_RADE	EXC_CODE(4)	/* Read Address Error */
+#define	EXC_WADE	EXC_CODE(5)	/* Write Address Error */
+#define	EXC_IBE		EXC_CODE(6)	/* Instruction Bus Error */
+#define	EXC_DBE		EXC_CODE(7)	/* Data Bus Error */
+#define	EXC_SYSCALL	EXC_CODE(8)	/* SYSCALL */
+#define	EXC_BREAK	EXC_CODE(9)	/* BREAKpoint */
+#define	EXC_II		EXC_CODE(10)	/* Illegal Instruction */
+#define	EXC_CPU		EXC_CODE(11)	/* CoProcessor Unusable */
+#define	EXC_OV		EXC_CODE(12)	/* OVerflow */
+
+/* software exception codes */
+#define	SEXC_SEGV	EXC_CODE(16)	/* Software detected seg viol */
+#define	SEXC_RESCHED	EXC_CODE(17)	/* resched request */
+#define	SEXC_PAGEIN	EXC_CODE(18)	/* page-in request */
+#define	SEXC_CPU	EXC_CODE(19)	/* coprocessor unusable */
+
+
+/*
+ * Coprocessor 0 registers
+ */
+#define	C0_INX		$0		/* tlb index */
+#define	C0_RAND		$1		/* tlb random */
+#define	C0_TLBLO	$2		/* tlb entry low */
+
+#define	C0_CTXT		$4		/* tlb context */
+
+#define C0_PIDMASK	$6		/* Mips2 */
+
+#define	C0_BADVADDR	$8		/* bad virtual address */
+
+#define	C0_TLBHI	$10		/* tlb entry hi */
+#define C0_PID		$10		/* Mips2 */
+
+#define	C0_SR		$12		/* status register */
+#define	C0_CAUSE	$13		/* exception cause */
+#define	C0_EPC		$14		/* exception pc */
+#define	C0_PRID		$15		/* revision identifier */
+#define C0_ERREG	$16		/* Mips2 */
+
+/*
+ * Coprocessor 0 operations
+ */
+#define	C0_READI  0x1		/* read ITLB entry addressed by C0_INDEX */
+#define	C0_WRITEI 0x2		/* write ITLB entry addressed by C0_INDEX */
+#define	C0_WRITER 0x6		/* write ITLB entry addressed by C0_RAND */
+#define	C0_PROBE  0x8		/* probe for ITLB entry addressed by TLBHI */
+#define	C0_RFE	  0x10		/* restore for exception */
+
+/*
+ * Flags for the nofault handler. 0 means no fault is expected.
+ */
+#define	NF_BADADDR	1	/* badaddr, wbadaddr */
+#define	NF_COPYIO	2	/* copyin, copyout */
+#define	NF_ADDUPC	3	/* addupc */
+#define	NF_FSUMEM	4	/* fubyte, subyte, fuword, suword */
+#define	NF_USERACC	5	/* useracc */
+#define	NF_SOFTFP	6	/* softfp */
+#define	NF_REVID	7	/* revision ids */
+#define	NF_NENTRIES	8
+
+/*
+ * TLB size constants
+ */
+#define TLBWIREDBASE    0               /* WAG for now */
+#define NWIREDENTRIES   8               /* WAG for now */
+#define TLBRANDOMBASE   NWIREDENTRIES
+#define NRANDOMENTRIES  (NTLBENTRIES-NWIREDENTRIES)
+#define NTLBENTRIES     64              /* WAG for now */
+
+#define TLBRAND_RANDMASK        0x00003f00
+#define TLBRAND_RANDSHIFT       8
+
+
+/*
+ * Chip interrupt vector
+ */
+#define	NC0VECS		8
+#ifndef LOCORE
+#ifdef KERNEL
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern int (*c0vec_tbl[])();
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif
+#endif /* !LOCORE */
+
+#define BRK_KERNEL 	0xf1
+#define EXCEPT_NORM     1
+#define EXCEPT_UTLB     2
+#define EXCEPT_BRKPT   	3
+#define EXCEPT_DB    	4
+#define EXCEPT_GDB    	4
+#define EXCEPT_INT    	9
+#define EXCEPT_ELSE    	0xff
+#endif /* _R3000_H */
diff --git a/tools/psyq/include/RAND.H b/tools/psyq/include/RAND.H
new file mode 100644
index 000000000..8002ac64b
--- /dev/null
+++ b/tools/psyq/include/RAND.H
@@ -0,0 +1,22 @@
+/*
+ * File:rand.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _RAND_H
+#define _RAND_H
+
+#define RAND_MAX	32767
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern int  rand(void);
+extern void srand(unsigned int);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _RAND_H */
diff --git a/tools/psyq/include/ROMIO.H b/tools/psyq/include/ROMIO.H
new file mode 100644
index 000000000..1a7430e34
--- /dev/null
+++ b/tools/psyq/include/ROMIO.H
@@ -0,0 +1,15 @@
+/*
+ * romio.h
+ *
+ * rom monitor i/o
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _ROMIO_H
+#define _ROMIO_H
+
+#include <sys/file.h>
+
+#endif /* _ROMIO_H */
diff --git a/tools/psyq/include/SETJMP.H b/tools/psyq/include/SETJMP.H
new file mode 100644
index 000000000..24002d9b4
--- /dev/null
+++ b/tools/psyq/include/SETJMP.H
@@ -0,0 +1,40 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+/*
+ * File:setjmp.h
+ * simple non-local-jump for single task environment
+ */
+
+#ifndef _SETJMP_H
+#define _SETJMP_H
+
+/* jmp_buf indices */
+#define	JB_PC		0
+#define	JB_SP		1
+#define	JB_FP		2
+#define	JB_S0		3
+#define	JB_S1		4
+#define	JB_S2		5
+#define	JB_S3		6
+#define	JB_S4		7
+#define	JB_S5		8
+#define	JB_S6		9
+#define	JB_S7		10
+#define	JB_GP		11
+
+#define	JB_SIZE		12
+
+#if defined(_LANGUAGE_C)||defined(LANGUAGE_C)||defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+typedef int jmp_buf[JB_SIZE];
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern int setjmp(jmp_buf);
+extern void longjmp(jmp_buf, int);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+#endif
+
+#endif /* _SETJMP_H */
diff --git a/tools/psyq/include/STDARG.H b/tools/psyq/include/STDARG.H
new file mode 100644
index 000000000..6d2338857
--- /dev/null
+++ b/tools/psyq/include/STDARG.H
@@ -0,0 +1,27 @@
+/*
+ * File:stdarg.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _STDARG_H
+#define _STDARG_H
+
+
+#define __va_rounded_size(TYPE)  \
+  (((sizeof (TYPE) + sizeof (int) - 1) / sizeof (int)) * sizeof (int))
+
+#define va_start(AP, LASTARG) 						\
+ (AP = ((char *)&(LASTARG) + __va_rounded_size(LASTARG))) 
+
+#define va_end(AP) AP = (char *)NULL
+
+#define va_arg(AP, TYPE)						\
+ (AP = ((char *) (AP)) += __va_rounded_size (TYPE),			\
+  *((TYPE *) ((char *) (AP) - __va_rounded_size (TYPE))))
+
+
+typedef void *va_list;
+
+#endif /* _STDARG_H */
diff --git a/tools/psyq/include/STDDEF.H b/tools/psyq/include/STDDEF.H
new file mode 100644
index 000000000..61932d1f2
--- /dev/null
+++ b/tools/psyq/include/STDDEF.H
@@ -0,0 +1,50 @@
+/*
+ * File:stddef.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _STDDEF_H
+#define _STDDEF_H
+
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned int size_t;  /* result type of the sizeof operator (ANSI) */
+#endif
+
+#ifndef _WCHAR_T
+#define _WCHAR_T
+typedef unsigned long wchar_t;		 /* type of a wide character */
+#endif
+
+#ifndef _UCHAR_T
+#define _UCHAR_T
+typedef unsigned char u_char;
+#endif
+
+#ifndef _USHORT_T
+#define _USHORT_T
+typedef unsigned short u_short;
+#endif
+
+#ifndef _UINT_T
+#define _UINT_T
+typedef	unsigned int u_int;
+#endif
+
+#ifndef _ULONG_T
+#define _ULONG_T
+typedef unsigned long u_long;
+#endif
+
+#ifndef WEOF
+#define WEOF    0xffffffff
+#endif
+
+#ifndef NULL
+#define NULL 0		       /* null pointer constant */
+#endif
+
+#endif /* _STDDEF_H */
diff --git a/tools/psyq/include/STDIO.H b/tools/psyq/include/STDIO.H
new file mode 100644
index 000000000..41c008505
--- /dev/null
+++ b/tools/psyq/include/STDIO.H
@@ -0,0 +1,47 @@
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+/*
+ * File:stdio.h
+*/
+
+#ifndef _STDIO_H
+#define _STDIO_H
+
+#define	BUFSIZ 1024
+#define EOF (-1)
+
+#ifndef SEEK_SET
+#define SEEK_SET 0
+#endif
+#ifndef SEEK_CUR
+#define SEEK_CUR 1
+#endif
+#ifndef SEEK_END
+#define SEEK_END 2
+#endif
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned int size_t;  /* result type of the sizeof operator (ANSI) */
+#endif
+
+/* under constraction now */
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern int printf(const char *fmt, ...); /**/
+extern int sprintf(char *buffer, const char *fmt, ...);
+
+extern char getc(int);		/**/
+extern char getchar(void);
+extern char *gets(char *);
+extern void putc(char, int);	/**/
+extern void putchar(char);
+extern void puts(const char *);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _STDIO_H */
diff --git a/tools/psyq/include/STDLIB.H b/tools/psyq/include/STDLIB.H
new file mode 100644
index 000000000..6bcf4932c
--- /dev/null
+++ b/tools/psyq/include/STDLIB.H
@@ -0,0 +1,30 @@
+/*
+ * File:stdlib.h
+*/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _STDLIB_H
+#define _STDLIB_H
+
+#include <stddef.h>
+#include <abs.h>
+#include <convert.h>
+#include <malloc.h>
+#include <qsort.h>
+#include <rand.h>
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+
+extern void *bsearch(const unsigned char *, const unsigned char *,
+				 size_t, size_t, int (*)());
+extern void exit();
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#endif /* _STDLIB_H */
diff --git a/tools/psyq/include/STRING.H b/tools/psyq/include/STRING.H
new file mode 100644
index 000000000..73d8fea74
--- /dev/null
+++ b/tools/psyq/include/STRING.H
@@ -0,0 +1,26 @@
+#ifndef _STRING_H
+#define _STRING_H
+
+/*****************************************************************
+ * -*- c -*-
+ * $RCSfile$
+ *
+ * Copyright (C) 1994, 1995 by Sony Computer Entertainment Inc.
+ * All Rights Reserved.
+ *
+ * Sony Computer Entertainment Inc. R & D Division
+ *
+ * $Id$
+ *
+ *****************************************************************/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#include <strings.h>
+
+/* ----------------------------------------------------------------
+ *	End on File
+ * ---------------------------------------------------------------- */
+#endif /* _STRING_H_ */
+/* DON'T ADD STUFF AFTER THIS */
diff --git a/tools/psyq/include/STRINGS.H b/tools/psyq/include/STRINGS.H
new file mode 100644
index 000000000..8f17f6a22
--- /dev/null
+++ b/tools/psyq/include/STRINGS.H
@@ -0,0 +1,52 @@
+/*
+ * File:strings.h
+ * string functions pseudo definition header 
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef	_STRINGS_H
+#define	_STRINGS_H
+
+#define LMAX 256
+
+#ifndef NULL
+#define NULL 0		       /* null pointer constant */
+#endif
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned int size_t;  /* result type of the sizeof operator (ANSI) */
+#endif
+
+#include <memory.h>
+
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+extern "C" {
+#endif
+extern char *strcat (char *, const char *);
+extern char *strncat(char *, const char *, int);
+extern int   strcmp (/* char *, char * */);	/* To avoid conflicting */
+extern int   strncmp(const char *,const char *, int);
+extern char *strcpy (/* char *, char * */);	/* To avoid conflicting */
+extern char *strncpy(char *, const char *, int);
+extern int   strlen (/* char * */);		/* To avoid conflicting */
+extern char *index  (const char *, char);
+extern char *rindex (const char *, char);
+
+extern char *strchr (const char *, char);
+extern char *strrchr(const char *, char);
+extern char *strpbrk(const char *, const char *);
+extern int   strspn (const char *, const char *);
+extern int   strcspn(const char *, const char *);
+extern char *strtok (char *, const char *);
+extern char *strstr (const char *, const char *);
+#if defined(_LANGUAGE_C_PLUS_PLUS)||defined(__cplusplus)||defined(c_plusplus)
+}
+#endif
+
+#define strdup(p)	( strcpy(malloc(strlen(p)+1),p); )
+
+#endif	/* _STRINGS_H */
+
diff --git a/tools/psyq/include/SYS/ERRNO.H b/tools/psyq/include/SYS/ERRNO.H
new file mode 100644
index 000000000..be0c7511a
--- /dev/null
+++ b/tools/psyq/include/SYS/ERRNO.H
@@ -0,0 +1,59 @@
+/*
+ * Error codes
+ * $RCSfile: errno.h,v $
+ * $Id: errno.h,v 1.3 1995/02/28 10:02:53 yoshi Exp $
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef	_ERRNO_H
+#define	_ERRNO_H
+
+/* Error codes */
+
+#define	EPERM		1		/* Not owner */
+#define	ENOENT		2		/* No such file or directory */
+#define	ESRCH		3		/* No such process */
+#define	EINTR		4		/* Interrupted system call */
+#define	EIO		5		/* I/O error */
+#define	ENXIO		6		/* No such device or address */
+#define	E2BIG		7		/* Arg list too long */
+#define	ENOEXEC		8		/* Exec format error */
+#define	EBADF		9		/* Bad file number */
+#define	ECHILD		10		/* No children */
+#define	EAGAIN		11		/* No more processes */
+#define	ENOMEM		12		/* Not enough core */
+#define	EACCES		13		/* Permission denied */
+#define	EFAULT		14		/* Bad address */
+#define	ENOTBLK		15		/* Block device required */
+#define	EBUSY		16		/* Mount device busy */
+#define	EEXIST		17		/* File exists */
+#define	EXDEV		18		/* Cross-device link */
+#define	ENODEV		19		/* No such device */
+#define	ENOTDIR		20		/* Not a directory*/
+#define	EISDIR		21		/* Is a directory */
+#define	EINVAL		22		/* Invalid argument */
+#define	ENFILE		23		/* File table overflow */
+#define	EMFILE		24		/* Too many open files */
+#define	ENOTTY		25		/* Not a typewriter */
+#define	ETXTBSY		26		/* Text file busy */
+#define	EFBIG		27		/* File too large */
+#define	ENOSPC		28		/* No space left on device */
+#define	ESPIPE		29		/* Illegal seek */
+#define	EROFS		30		/* Read-only file system */
+#define	EFORMAT		31		/* Bad file format */
+#define	EPIPE		32		/* Broken pipe */
+
+/* math software */
+#define	EDOM		33		/* Argument too large */
+#define	ERANGE		34		/* Result too large */
+
+/* non-blocking and interrupt i/o */
+#define	EWOULDBLOCK	35		/* Operation would block */
+#define	EINPROGRESS	36		/* Operation now in progress */
+#define	EALREADY	37		/* Operation already in progress */
+
+extern int errno;
+
+#endif	/* _ERRNO_H */
diff --git a/tools/psyq/include/SYS/FCNTL.H b/tools/psyq/include/SYS/FCNTL.H
new file mode 100644
index 000000000..b963ce344
--- /dev/null
+++ b/tools/psyq/include/SYS/FCNTL.H
@@ -0,0 +1,25 @@
+/*
+ * File:fcntl.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef	_SYS_FCNTL_H
+#define	_SYS_FCNTL_H
+
+/* flags */
+#define	FREAD		0x0001		/* readable */
+#define	FWRITE		0x0002		/* writable */
+#define	FNBLOCK		0x0004		/* non-blocking reads */
+#define	FRLOCK		0x0010		/* read locked (non-shared) */
+#define	FWLOCK		0x0020		/* write locked (non-shared) */
+#define	FAPPEND		0x0100		/* append on each write */
+#define	FCREAT		0x0200		/* create if nonexistant */
+#define	FTRUNC		0x0400		/* truncate to zero length */
+#define	FSCAN		0x1000		/* scan type */
+#define	FRCOM		0x2000		/* remote command entry */
+#define	FNBUF		0x4000		/* no ring buf. and console interrupt */
+#define	FASYNC		0x8000		/* asyncronous i/o */
+
+#endif	/* _SYS_FCNTL_H */
diff --git a/tools/psyq/include/SYS/FILE.H b/tools/psyq/include/SYS/FILE.H
new file mode 100644
index 000000000..0db9e0881
--- /dev/null
+++ b/tools/psyq/include/SYS/FILE.H
@@ -0,0 +1,33 @@
+/*
+ * File:file.h
+*/
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _SYS_FILE_H
+#define _SYS_FILE_H
+
+#include <sys/fcntl.h>
+
+/* Flag for open() */
+#define O_RDONLY        FREAD
+#define O_WRONLY        FWRITE
+#define O_RDWR          FREAD|FWRITE
+#define O_CREAT         FCREAT  /* open with file create */
+#define O_NOBUF         FNBUF	/* no device buffer and console interrupt */
+#define O_NBLOCK        FNBLOCK	/* non blocking mode */
+#define O_NOWAIT        FASYNC	/* asyncronous i/o */
+
+#ifndef SEEK_SET
+#define SEEK_SET 0
+#endif
+#ifndef SEEK_CUR
+#define SEEK_CUR 1
+#endif
+#ifndef SEEK_END
+#define SEEK_END 2
+#endif
+
+#endif /* _SYS_FILE_H */
+
diff --git a/tools/psyq/include/SYS/IOCTL.H b/tools/psyq/include/SYS/IOCTL.H
new file mode 100644
index 000000000..bcec33502
--- /dev/null
+++ b/tools/psyq/include/SYS/IOCTL.H
@@ -0,0 +1,44 @@
+/*
+ * File:ioctl.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef _SYS_IOCTL_H
+#define _SYS_IOCTL_H
+
+
+#ifndef NULL
+#define NULL 0
+#endif
+
+#ifndef EOF
+#define	EOF	(-1)			/* EOF from getc() */
+#endif
+
+/* general */
+#define	FIOCNBLOCK	(('f'<<8)|1)	/* set non-blocking io */
+#define	FIOCSCAN	(('f'<<8)|2)	/* scan for input */
+
+/* tty and sio */
+#define	TIOCRAW		(('t'<<8)|1)	/* disable xon/xoff control */
+#define	TIOCFLUSH	(('t'<<8)|2)	/* flush input buffer */
+#define	TIOCREOPEN	(('t'<<8)|3)	/* reopen */
+#define	TIOCBAUD	(('t'<<8)|4)	/* set baud rate */
+#define	TIOCEXIT	(('t'<<8)|5)	/* console interrup */
+#define	TIOCDTR		(('t'<<8)|6)	/* control DTR line */
+#define	TIOCRTS		(('t'<<8)|7)	/* control RTS line */
+#define	TIOCLEN		(('t'<<8)|8)	/* stop<<16 | char */
+					/* stop 0:none 1:1 2:1.5 3:2bit */
+					/* char 0:5 1:6 2:7 3:8bit */
+#define	TIOCPARITY	(('t'<<8)|9)	/* parity 0:none 1:e 3:o */
+#define	TIOSTATUS	(('t'<<8)|10)	/* return status */
+#define	TIOERRRST	(('t'<<8)|11)	/* error reset */
+#define	TIOEXIST	(('t'<<8)|12)	/* exist test with DTR/CTS */
+#define	TIORLEN		(('t'<<8)|13)	/* receive buffer length */
+
+/* disk */
+#define	DIOFORMAT	(('d'<<8)|1)	/* format */
+
+#endif /* _SYS_IOCTL_H */
diff --git a/tools/psyq/include/SYS/TYPES.H b/tools/psyq/include/SYS/TYPES.H
new file mode 100644
index 000000000..5fe5a8343
--- /dev/null
+++ b/tools/psyq/include/SYS/TYPES.H
@@ -0,0 +1,80 @@
+/* 
+ * File:types.h
+ */
+/*
+ * $PSLibId: Run-time Library Release 4.7$
+ */
+
+#ifndef	_SYS_TYPES_H
+#define	_SYS_TYPES_H
+
+/*
+ * Basic system types and major/minor device constructing/busting macros.
+ */
+
+/* major part of a device */
+#define	major(x)	((int)(((unsigned)(x)>>8)&0377))
+
+/* minor part of a device */
+#define	minor(x)	((int)((x)&0377))
+
+/* make a device number */
+#define	makedev(x,y)	((dev_t)(((x)<<8) | (y)))
+
+#ifndef _UCHAR_T
+#define _UCHAR_T
+typedef	unsigned char	u_char;
+#endif
+#ifndef _USHORT_T
+#define _USHORT_T
+typedef	unsigned short	u_short;
+#endif
+#ifndef _UINT_T
+#define _UINT_T
+typedef	unsigned int	u_int;
+#endif
+#ifndef _ULONG_T
+#define _ULONG_T
+typedef	unsigned long	u_long;
+#endif
+#ifndef _SYSIII_USHORT
+#define _SYSIII_USHORT
+typedef	unsigned short	ushort;		/* sys III compat */
+#endif
+#ifndef __psx__
+#ifndef _SYSV_UINT
+#define _SYSV_UINT
+typedef	unsigned int	uint;		/* sys V compat */
+#endif
+#ifndef _SYSV_ULONG
+#define _SYSV_ULONG
+typedef	unsigned long	ulong;		/* sys V compat */
+#endif
+#endif /* ! __psx__ */
+
+typedef	struct	_physadr { int r[1]; } *physadr;
+typedef	struct	label_t	{
+	int	val[12];
+} label_t;
+
+typedef	struct	_quad { long val[2]; } quad;
+typedef	long	daddr_t;
+typedef	char *	caddr_t;
+typedef	long *	qaddr_t;	/* should be typedef quad * qaddr_t; */
+typedef	u_long	ino_t;
+typedef	long	swblk_t;
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef	unsigned int size_t;
+#endif
+
+typedef	long	time_t;
+typedef	short	dev_t;
+typedef	long	off_t;
+typedef	u_short	uid_t;
+typedef	u_short	gid_t;
+
+#define	NBBY	8		/* number of bits in a byte */
+
+#endif	/* _SYS_TYPES_H */
diff --git a/tools/psyq/lib/2MBYTE.OBJ b/tools/psyq/lib/2MBYTE.OBJ
new file mode 100644
index 000000000..4922d63ff
Binary files /dev/null and b/tools/psyq/lib/2MBYTE.OBJ differ
diff --git a/tools/psyq/lib/8MBYTE.OBJ b/tools/psyq/lib/8MBYTE.OBJ
new file mode 100644
index 000000000..d9c027eb0
Binary files /dev/null and b/tools/psyq/lib/8MBYTE.OBJ differ
diff --git a/tools/psyq/lib/BootObj/MakeLib.bat b/tools/psyq/lib/BootObj/MakeLib.bat
new file mode 100644
index 000000000..44b1dab78
--- /dev/null
+++ b/tools/psyq/lib/BootObj/MakeLib.bat
@@ -0,0 +1,2 @@
+psylib2 /a ..\CMXboot.lib pure.obj snctors.obj SNDEF.OBJ
+
diff --git a/tools/psyq/lib/BootObj/Psylib2.exe b/tools/psyq/lib/BootObj/Psylib2.exe
new file mode 100644
index 000000000..b5fe14cc8
Binary files /dev/null and b/tools/psyq/lib/BootObj/Psylib2.exe differ
diff --git a/tools/psyq/lib/BootObj/SNDEF.OBJ b/tools/psyq/lib/BootObj/SNDEF.OBJ
new file mode 100644
index 000000000..00da32d71
Binary files /dev/null and b/tools/psyq/lib/BootObj/SNDEF.OBJ differ
diff --git a/tools/psyq/lib/BootObj/SNMAIN.OBJ b/tools/psyq/lib/BootObj/SNMAIN.OBJ
new file mode 100644
index 000000000..336d47f3f
Binary files /dev/null and b/tools/psyq/lib/BootObj/SNMAIN.OBJ differ
diff --git a/tools/psyq/lib/BootObj/pure.obj b/tools/psyq/lib/BootObj/pure.obj
new file mode 100644
index 000000000..f058b6ce6
Binary files /dev/null and b/tools/psyq/lib/BootObj/pure.obj differ
diff --git a/tools/psyq/lib/BootObj/snctors.obj b/tools/psyq/lib/BootObj/snctors.obj
new file mode 100644
index 000000000..4bc718a9f
Binary files /dev/null and b/tools/psyq/lib/BootObj/snctors.obj differ
diff --git a/tools/psyq/lib/CMXboot.lib b/tools/psyq/lib/CMXboot.lib
new file mode 100644
index 000000000..ec6251f57
Binary files /dev/null and b/tools/psyq/lib/CMXboot.lib differ
diff --git a/tools/psyq/lib/LIBAPI.LIB b/tools/psyq/lib/LIBAPI.LIB
new file mode 100644
index 000000000..37a545eaf
Binary files /dev/null and b/tools/psyq/lib/LIBAPI.LIB differ
diff --git a/tools/psyq/lib/LIBC.LIB b/tools/psyq/lib/LIBC.LIB
new file mode 100644
index 000000000..238bf0b68
Binary files /dev/null and b/tools/psyq/lib/LIBC.LIB differ
diff --git a/tools/psyq/lib/LIBC2.LIB b/tools/psyq/lib/LIBC2.LIB
new file mode 100644
index 000000000..73c064322
Binary files /dev/null and b/tools/psyq/lib/LIBC2.LIB differ
diff --git a/tools/psyq/lib/LIBCARD.LIB b/tools/psyq/lib/LIBCARD.LIB
new file mode 100644
index 000000000..16f942848
Binary files /dev/null and b/tools/psyq/lib/LIBCARD.LIB differ
diff --git a/tools/psyq/lib/LIBCD.LIB b/tools/psyq/lib/LIBCD.LIB
new file mode 100644
index 000000000..547379731
Binary files /dev/null and b/tools/psyq/lib/LIBCD.LIB differ
diff --git a/tools/psyq/lib/LIBCHG_E.TXT b/tools/psyq/lib/LIBCHG_E.TXT
new file mode 100644
index 000000000..cb017a702
--- /dev/null
+++ b/tools/psyq/lib/LIBCHG_E.TXT
@@ -0,0 +1,141 @@
+$PSDocId: Document Release 1.0 for Run-time Library Release 4.6$
+                                                            July, 1999
+
+                                        PlayStation(R) Programmer Tool
+                                           Runtime Library Release 4.6
+
+                             Library Changes, New Additions, and Known
+                                                      from Release 4.5
+----------------------------------------------------------------------
+               Copyright(C) 1997-1999 Sony Computer Entertainment Inc.
+                                                  All Rights Reserved.
+----------------------------------------------------------------------
+
+Known Bugs and Cautions
+----------------------------------------------------------------------
+< Addition of noprint Module >
+- A module to controll the library debug message display, noprint.obj,
+  has been added.  With this module, all the printf()/puts() output
+  used with the library and the program can be controlled.
+
+< Limitations on the HMD Library > 
+- The environment map is provided as a Beta version, because the 
+  format may change in future release without keeping compatibility.
+
+  The Beta-version primitives are not officially supported by SCE at
+  the moment. If you wish to use them for creating titles, please do
+  so on your own responsibility.
+
+< Limitations on Memory Card GUI Module >
+- At the moment, the latest module cannot be utilized for the
+  "CodeWarrior for PlayStation" of Metrowerks Inc. The module for the
+  "CodeWarrior for PlayStation" is planned to be downloaded from the
+  SCE-NET when it is available.
+
+< Limitations on Extended Sound Library >
+- In the Extended Sound Library, noise is not produced properly.
+  Thererfore, when using noise, please use the Basic Sound Libraby
+  (libspu).
+
+All products and company names mentioned herein are the registered 
+trademarks or trademarks of their respective owners.
+
+
+SDevTC Tools
+----------------------------------------------------------------------
+< Files Changed >
+pssn\readme_j.txt             Updated
+pssn\bin\asmpsx.exe           Updated
+pssn\bin\cpppsx.exe           Updated
+pssn\bin\dos\cpppsx.exe       Updated
+pssn\bin\dbugpsx.exe          Updated
+pssn\windbg\dset95_j.txt      Updated
+pssn\windbg\dsetNT_j.txt      Updated
+pssn\windbg\dbgman_j.txt      Updated
+
+< Files Added >
+pssn\windbg\sndbg251.exe      SN Debugger for Windows Ver.2.5 package
+
+
+< Files Deleted >
+pssn\windbg\psx1604.exe       SN Debugger for Windows Ver.2.4 package
+
+
+Standard C Library (libc/libc2)
+----------------------------------------------------------------------
+< Function Specification Changes >
+- A type qualifier, const, has been added to the following prototype 
+  statements:  stdio.h, stdlib.h, convert.h, memory.h, strings.h.
+
+
+Memory Card Library (libcard)
+----------------------------------------------------------------------
+< Library Bug Fix >
+- _card_format() was not able to return the correct value.
+  This problem has been fixed.
+
+
+Basic Graphics Library (libgpu)
+----------------------------------------------------------------------
+< Functions Added >
+- setDrawMode(), the macro version of SetDrawMode(), has been added.
+
+< Library Bug Fix >
+- With GetDrawEnv2() which gets the current drawing environment, it
+  was unable to get the value set in DR_STP.  This problem has been
+  fixed.
+
+
+Extended Graphics Library (libgs)
+----------------------------------------------------------------------
+< Library Bug Fix >
+- Using automatic division in TMD resulted in the specified
+  Semi-transparent flag within the TMD data be invalid.  This problem has
+  been fixed.
+
+
+Extended Memory Card Library (libmcrd)
+----------------------------------------------------------------------
+< Library Bug Fix >
+- An Error Retry malfunction of MemCardReadData() and
+  MemCardWriteData() has been fixed.
+
+
+PDA Library (libmcx)
+----------------------------------------------------------------------
+< Library Bug Fix >
+- When the second argument of McxSync() was zero, the memory address
+  0 was rewritten unintentionally.  This problem has been fixed.
+
+
+Data Compression Library  (libpress)
+----------------------------------------------------------------------
+< Functions Added >
+- SPU ADPCM Encorder EncSPU2(), the better sound quality version of
+  EncSPU(), has been added.
+
+
+Extended Sound Library (libsnd)
+----------------------------------------------------------------------
+< Library Bug Fix >
+- Allowing sound effects volume be changed automatically resulted in
+  the incorrect change during SEQ/SEP data playback.  This problem has
+  been fixed.
+
+- Specifying 0 to delta_time, the argument of SsUtAutoVol(), resulted
+  in a zero divide error.  This problem has been fixed.
+
+- If SsUtAutoVol() and SsUtAutoPan() were concurrently used for sound
+  effects, volume and panning were not correctly changed.  This
+  problem has been fixed. 
+
+
+MEMORY CARD GUI module (mcgui)
+----------------------------------------------------------------------
+< Function Specification Changes >
+- MEMORY CARD GUI module (mcgui) has been changed to be a PAL-compatible.
+
+< Library Bug Fix >
+- Despite a flag was set not to use a mouse, if the mouse was inserted
+  into the console, the cursor appeared on the screen.  This problem
+  has been fixed.
diff --git a/tools/psyq/lib/LIBCOMB.LIB b/tools/psyq/lib/LIBCOMB.LIB
new file mode 100644
index 000000000..3ad26fd0d
Binary files /dev/null and b/tools/psyq/lib/LIBCOMB.LIB differ
diff --git a/tools/psyq/lib/LIBDS.LIB b/tools/psyq/lib/LIBDS.LIB
new file mode 100644
index 000000000..a178de56a
Binary files /dev/null and b/tools/psyq/lib/LIBDS.LIB differ
diff --git a/tools/psyq/lib/LIBETC.LIB b/tools/psyq/lib/LIBETC.LIB
new file mode 100644
index 000000000..b04b682b0
Binary files /dev/null and b/tools/psyq/lib/LIBETC.LIB differ
diff --git a/tools/psyq/lib/LIBGPU.LIB b/tools/psyq/lib/LIBGPU.LIB
new file mode 100644
index 000000000..faea5d767
Binary files /dev/null and b/tools/psyq/lib/LIBGPU.LIB differ
diff --git a/tools/psyq/lib/LIBGS.LIB b/tools/psyq/lib/LIBGS.LIB
new file mode 100644
index 000000000..d2b220ba8
Binary files /dev/null and b/tools/psyq/lib/LIBGS.LIB differ
diff --git a/tools/psyq/lib/LIBGTE.LIB b/tools/psyq/lib/LIBGTE.LIB
new file mode 100644
index 000000000..8d3c97abc
Binary files /dev/null and b/tools/psyq/lib/LIBGTE.LIB differ
diff --git a/tools/psyq/lib/LIBGUN.LIB b/tools/psyq/lib/LIBGUN.LIB
new file mode 100644
index 000000000..37c2e13e2
Binary files /dev/null and b/tools/psyq/lib/LIBGUN.LIB differ
diff --git a/tools/psyq/lib/LIBHMD.LIB b/tools/psyq/lib/LIBHMD.LIB
new file mode 100644
index 000000000..2b5b9ffc8
Binary files /dev/null and b/tools/psyq/lib/LIBHMD.LIB differ
diff --git a/tools/psyq/lib/LIBMATH.LIB b/tools/psyq/lib/LIBMATH.LIB
new file mode 100644
index 000000000..68eed0496
Binary files /dev/null and b/tools/psyq/lib/LIBMATH.LIB differ
diff --git a/tools/psyq/lib/LIBMCRD.LIB b/tools/psyq/lib/LIBMCRD.LIB
new file mode 100644
index 000000000..c0362d01b
Binary files /dev/null and b/tools/psyq/lib/LIBMCRD.LIB differ
diff --git a/tools/psyq/lib/LIBMCX.LIB b/tools/psyq/lib/LIBMCX.LIB
new file mode 100644
index 000000000..84f9f9dcc
Binary files /dev/null and b/tools/psyq/lib/LIBMCX.LIB differ
diff --git a/tools/psyq/lib/LIBPAD.LIB b/tools/psyq/lib/LIBPAD.LIB
new file mode 100644
index 000000000..83d4563df
Binary files /dev/null and b/tools/psyq/lib/LIBPAD.LIB differ
diff --git a/tools/psyq/lib/LIBPRESS.LIB b/tools/psyq/lib/LIBPRESS.LIB
new file mode 100644
index 000000000..5de8ae770
Binary files /dev/null and b/tools/psyq/lib/LIBPRESS.LIB differ
diff --git a/tools/psyq/lib/LIBSIO.LIB b/tools/psyq/lib/LIBSIO.LIB
new file mode 100644
index 000000000..c6c2617cf
Binary files /dev/null and b/tools/psyq/lib/LIBSIO.LIB differ
diff --git a/tools/psyq/lib/LIBSN.LIB b/tools/psyq/lib/LIBSN.LIB
new file mode 100644
index 000000000..07495521c
Binary files /dev/null and b/tools/psyq/lib/LIBSN.LIB differ
diff --git a/tools/psyq/lib/LIBSND.LIB b/tools/psyq/lib/LIBSND.LIB
new file mode 100644
index 000000000..97ac0d786
Binary files /dev/null and b/tools/psyq/lib/LIBSND.LIB differ
diff --git a/tools/psyq/lib/LIBSPU.LIB b/tools/psyq/lib/LIBSPU.LIB
new file mode 100644
index 000000000..cd3b1f8e3
Binary files /dev/null and b/tools/psyq/lib/LIBSPU.LIB differ
diff --git a/tools/psyq/lib/LIBTAP.LIB b/tools/psyq/lib/LIBTAP.LIB
new file mode 100644
index 000000000..534156239
Binary files /dev/null and b/tools/psyq/lib/LIBTAP.LIB differ
diff --git a/tools/psyq/lib/MCGUI.OBJ b/tools/psyq/lib/MCGUI.OBJ
new file mode 100644
index 000000000..b584ec5b9
Binary files /dev/null and b/tools/psyq/lib/MCGUI.OBJ differ
diff --git a/tools/psyq/lib/MCGUI_E.OBJ b/tools/psyq/lib/MCGUI_E.OBJ
new file mode 100644
index 000000000..f885fd919
Binary files /dev/null and b/tools/psyq/lib/MCGUI_E.OBJ differ
diff --git a/tools/psyq/lib/NOHEAP.OBJ b/tools/psyq/lib/NOHEAP.OBJ
new file mode 100644
index 000000000..df3a5478c
Binary files /dev/null and b/tools/psyq/lib/NOHEAP.OBJ differ
diff --git a/tools/psyq/lib/NONE3.OBJ b/tools/psyq/lib/NONE3.OBJ
new file mode 100644
index 000000000..c5acc3d3d
Binary files /dev/null and b/tools/psyq/lib/NONE3.OBJ differ
diff --git a/tools/psyq/lib/NOPRINT.OBJ b/tools/psyq/lib/NOPRINT.OBJ
new file mode 100644
index 000000000..b7f6061f3
Binary files /dev/null and b/tools/psyq/lib/NOPRINT.OBJ differ
diff --git a/tools/speakeasy.exe b/tools/speakeasy.exe
new file mode 100644
index 000000000..ca6e84b8c
Binary files /dev/null and b/tools/speakeasy.exe differ
diff --git a/tools/transtext.exe b/tools/transtext.exe
new file mode 100644
index 000000000..d5f31785d
Binary files /dev/null and b/tools/transtext.exe differ
diff --git a/tools/uname.exe b/tools/uname.exe
new file mode 100644
index 000000000..10b65422d
Binary files /dev/null and b/tools/uname.exe differ
diff --git a/tools/vagedit/ENCVAG.DLL b/tools/vagedit/ENCVAG.DLL
new file mode 100644
index 000000000..34ee78b80
Binary files /dev/null and b/tools/vagedit/ENCVAG.DLL differ
diff --git a/tools/vagedit/README.TXT b/tools/vagedit/README.TXT
new file mode 100644
index 000000000..5e91fdb43
--- /dev/null
+++ b/tools/vagedit/README.TXT
@@ -0,0 +1,12 @@
+VAG Editor 1.0  ( 7 October 1998 )
+
+This is a new tool for converting WAV, RAW and VAG files
+and accurately adjusting sample data to change loop points.
+
+Basic features:
+
+1) Edit loop points.
+2) Visual display of samples and 28 sample boundaries.
+3) Conversion between RAW, WAV and VAG
+4) Preview of sound on SoundBlaster card.
+5) Cut and Paste samples over clipboard.
diff --git a/tools/vagedit/VAGEDIT.EXE b/tools/vagedit/VAGEDIT.EXE
new file mode 100644
index 000000000..e4f1b456d
Binary files /dev/null and b/tools/vagedit/VAGEDIT.EXE differ
diff --git a/tools/vlc/include/VLC_BIT.H b/tools/vlc/include/VLC_BIT.H
new file mode 100644
index 000000000..95900bd54
--- /dev/null
+++ b/tools/vlc/include/VLC_BIT.H
@@ -0,0 +1,23 @@
+/*
+	Improved VLC coding functions
+
+	NOTE: This VLC decode function requires the GTE, so InitGeom must be called prior to use
+	Also this function uses a table held in scratchpad ram ( taking approx 512 bytes )
+*/
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+// Setup function, this builds the bit decode table in scratchpad ram
+void DecDCTvlcBuild3();
+
+// Break size function, set 0 for no partial decode
+int DecDCTvlcSize3( int breaksize );
+
+// VLC decode function, returns 0 if successful, 1 if partially complete
+int DecDCTvlc3( unsigned long *bs, unsigned long *buf );
+
+#ifdef __cplusplus
+}
+#endif
diff --git a/tools/vlc/lib/VLC_BIT.O b/tools/vlc/lib/VLC_BIT.O
new file mode 100644
index 000000000..a7a49b826
Binary files /dev/null and b/tools/vlc/lib/VLC_BIT.O differ
diff --git a/users/daveo/makefile b/users/daveo/makefile
new file mode 100644
index 000000000..b7d6fd42e
--- /dev/null
+++ b/users/daveo/makefile
@@ -0,0 +1,15 @@
+#----------------------------------------------------------------------------
+#       USER SPECEFIC MAKEFILE FOR Dave
+#
+#	Copyright (C) 1997 G R Liddon
+#----------------------------------------------------------------------------
+
+
+DEV_KIT :=              SONY_PCI
+FILE_SYSTEM :=        PC
+RAM_SIZE :=				2
+FINAL_OVERLAYS	:=		1
+
+# SLUS-01114
+#----------------------------------------------------------------------------
+#ends