//[c]
public
//[c]
//[of]:	constants
//[c]
equ MAX_PATH = 260
equ NULL = 0
equ FALSE = 0
equ TRUE = 1
//[cf]
//[of]:	basic types
//[c]
typedef WINBOOL = int
typedef PWINBOOL = [] int
typedef LPWINBOOL = [] int
typedef BOOL = WINBOOL
typedef PBOOL = [] BOOL
typedef LPBOOL = [] BOOL

typedef BYTE = byte
typedef WORD = word
typedef DWORD = dword

//typedef FLOAT = float
//typedef PFLOAT = [] FLOAT

typedef PBYTE = [] BYTE
typedef LPBYTE = [] BYTE

typedef PINT = [] int
typedef LPINT = [] int

typedef PWORD = [] WORD
typedef LPWORD = [] WORD
typedef LPLONG = [] int
typedef PDWORD = [] DWORD
typedef LPDWORD = [] DWORD
typedef PCVOID = -> void
typedef LPCVOID= -> void
typedef INT = int
typedef UINT = dword
typedef PUINT = [] dword
typedef LPUINT = [] dword
//[cf]
//[of]:	winnt
//[c]
typedef VOID = void

typedef TCHAR = char

typedef CHAR = char
typedef SHORT = short
typedef LONG = int
typedef CCHAR = char
typedef PCCHAR = [] char
typedef UCHAR = byte
typedef PUCHAR = [] byte
typedef USHORT = word
typedef PUSHORT = [] word
typedef ULONG = dword
typedef PULONG = [] dword
typedef PSZ = [] char
typedef PVOID = -> void
typedef LPVOID = -> void

typedef wchar_t = short
typedef WCHAR = wchar_t

typedef PWCHAR = [] WCHAR
typedef LPWCH = [] WCHAR
typedef PWCH = [] WCHAR
typedef NWPSTR = [] WCHAR
typedef LPWSTR = [] WCHAR
typedef PWSTR = [] WCHAR

typedef LPCWCH = [] WCHAR
typedef PCWCH = [] WCHAR
typedef LPCWSTR = [] WCHAR
typedef PCWSTR = [] WCHAR

typedef LPCH = [] char
typedef PCH = [] char
typedef NPSTR = [] char
typedef LPSTR = [] char
typedef PSTR = [] char

typedef LPCCH = [] char
typedef PCSTR = [] char
typedef LPCSTR = [] char

typedef LPCTSTR = [] char

typedef PSHORT = [] SHORT
typedef PLONG = [] LONG

typedef HANDLE= [] void
typedef PHANDLE= [] HANDLE
typedef LPHANDLE= [] HANDLE

typedef LCID = DWORD
typedef PLCID = [] DWORD
typedef LANGID = WORD

equ ANSI_NULL = \0
equ UNICODE_NULL = 0:short
typedef BOOLEAN = BYTE
typedef PBOOLEAN = [] BYTE

typedef FCHAR = BYTE 
typedef FSHORT = WORD 
typedef FLONG = DWORD

struct LPGUID
    Data1 : DWORD
    Data2 : WORD
    Data3 : WORD
    Data4 : [8] BYTE
end
typedef GUID = local LPGUID
//[cf]
//[of]:	more types and macros
//[c]
typedef WPARAM = UINT
typedef LPARAM = LONG
typedef LRESULT = LONG
typedef HRESULT = LONG
typedef ATOM = WORD
//[c]
equ MAKEWORD (a:int,b:int) = (a:BYTE:WORD) | (b:BYTE:WORD << 8)
equ MAKELONG (a:int, b:int) = ( (a:WORD:DWORD) | (b:WORD:DWORD) << 16) : LONG
equ LOWORD (l:DWORD) = l:WORD
equ HIWORD (l:DWORD) = ((l >> 16) & 0xFFFF:DWORD):WORD
equ LOBYTE (l:DWORD) = l:BYTE
equ LOBYTE (w:WORD) = w:BYTE
equ HIBYTE (w:WORD) = (w:WORD >> 8) : BYTE & 0xFF:byte
//[cf]
//[of]:	handles
//[c]
typedef HGLOBAL = HANDLE
typedef HLOCAL = HANDLE
typedef GLOBALHANDLE = HANDLE 
typedef LOCALHANDLE = HANDLE
typedef HGDIOBJ = HANDLE

typedef HACCEL = HANDLE
typedef HBITMAP = HANDLE
typedef HBRUSH = HANDLE
typedef HCOLORSPACE = HANDLE
typedef HDC = HANDLE
typedef HGLRC = HANDLE
typedef HDESK = HANDLE
typedef HENHMETAFILE = HANDLE
typedef HFONT = HANDLE
typedef HICON = HANDLE
typedef HKEY = HANDLE

typedef HMONITOR = HANDLE
typedef HTERMINAL = HANDLE
typedef HWINEVENTHOOK = HANDLE

typedef PHKEY = [] HKEY
typedef HMENU = HANDLE
typedef HMETAFILE = HANDLE
typedef HINSTANCE = HANDLE
typedef HMODULE = HANDLE
typedef HPALETTE = HANDLE
typedef HPEN = HANDLE
typedef HRGN = HANDLE
typedef HRSRC = HANDLE
typedef HSTR = HANDLE
typedef HTASK = HANDLE
typedef HWND = HANDLE
typedef HWINSTA = HANDLE
typedef HKL = HANDLE
typedef HFILE = int
typedef HCURSOR = HANDLE

typedef COLORREF = DWORD
//[cf]
//[c]
//[of]:	struct LPRECT
//[c]
struct LPRECT
	left: int
	top: int
	right: int
	bottom: int
end
typedef RECT = local LPRECT
typedef PRECT = LPRECT
typedef LPCRECT = LPRECT
//[cf]
//[of]:	struct LPPOINT
//[c]
struct LPPOINT
	x: LONG
	y: LONG
end
typedef POINT = local LPPOINT
typedef POINTL = local LPPOINT
typedef LPOINTL = LPPOINT
typedef PPOINTL = LPPOINT
//[cf]
//[of]:	struct LPSIZE
//[c]
struct LPSIZE
	cx: LONG
	cy: LONG
end
typedef SIZE = local LPSIZE
typedef SIZEL = local LPSIZE
typedef PSIZEL = LPSIZE
typedef LPSIZEL = LPSIZE
//[cf]
//[of]:	struct LPPOINTS
//[c]
struct LPPOINTS
	x : SHORT
	y : SHORT
end
typedef POINTS = local LPPOINTS
typedef PPOINTS = LPPOINTS
//[cf]
//[c]
end