2024-03-19 22:22:29 +01:00
|
|
|
/*
|
|
|
|
* kml.h
|
|
|
|
*
|
|
|
|
* This file is part of Emu48
|
|
|
|
*
|
|
|
|
* Copyright (C) 1995 Sebastien Carlier
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
#define LEX_BLOCK 1
|
|
|
|
#define LEX_COMMAND 2
|
|
|
|
#define LEX_PARAM 3
|
|
|
|
|
|
|
|
typedef enum eTokenId
|
|
|
|
{
|
|
|
|
TOK_NONE, //0
|
|
|
|
TOK_ANNUNCIATOR, //1
|
|
|
|
TOK_BACKGROUND, //2
|
|
|
|
TOK_IFPRESSED, //3
|
|
|
|
TOK_RESETFLAG, //4
|
|
|
|
TOK_SCANCODE, //5
|
2024-03-19 22:38:33 +01:00
|
|
|
TOK_HARDWARE, //6
|
|
|
|
TOK_MENUITEM, //7
|
|
|
|
TOK_INTEGER, //8
|
|
|
|
TOK_SETFLAG, //9
|
|
|
|
TOK_RELEASE, //10
|
|
|
|
TOK_VIRTUAL, //11
|
|
|
|
TOK_INCLUDE, //12
|
|
|
|
TOK_STRING, //13
|
|
|
|
TOK_GLOBAL, //14
|
|
|
|
TOK_AUTHOR, //15
|
|
|
|
TOK_BITMAP, //16
|
|
|
|
TOK_OFFSET, //17
|
|
|
|
TOK_BUTTON, //18
|
|
|
|
TOK_IFFLAG, //19
|
|
|
|
TOK_ONDOWN, //20
|
|
|
|
TOK_NOHOLD, //21
|
2024-03-19 23:35:29 +01:00
|
|
|
TOK_TOPBAR, //22
|
|
|
|
TOK_TITLE, //23
|
|
|
|
TOK_OUTIN, //24
|
|
|
|
TOK_PATCH, //25
|
|
|
|
TOK_PRINT, //26
|
|
|
|
TOK_DEBUG, //27
|
|
|
|
TOK_COLOR, //28
|
|
|
|
TOK_MODEL, //29
|
|
|
|
TOK_CLASS, //30
|
|
|
|
TOK_PRESS, //31
|
|
|
|
TOK_TYPE, //32
|
|
|
|
TOK_SIZE, //33
|
|
|
|
TOK_DOWN, //34
|
|
|
|
TOK_ZOOM, //35
|
|
|
|
TOK_ELSE, //36
|
|
|
|
TOK_ONUP, //37
|
|
|
|
TOK_EOL, //38
|
|
|
|
TOK_MAP, //39
|
|
|
|
TOK_ROM, //40
|
|
|
|
TOK_VGA, //41
|
|
|
|
TOK_LCD, //42
|
|
|
|
TOK_NOTFLAG, //43
|
|
|
|
TOK_END //44
|
2024-03-19 22:22:29 +01:00
|
|
|
} TokenId;
|
|
|
|
|
|
|
|
#define TYPE_NONE 00
|
|
|
|
#define TYPE_INTEGER 01
|
|
|
|
#define TYPE_STRING 02
|
|
|
|
|
2024-03-19 22:37:54 +01:00
|
|
|
typedef struct KmlToken
|
2024-03-19 22:22:29 +01:00
|
|
|
{
|
|
|
|
TokenId eId;
|
|
|
|
DWORD nParams;
|
|
|
|
DWORD nLen;
|
2024-03-19 22:37:03 +01:00
|
|
|
TCHAR szName[20];
|
2024-03-19 22:37:54 +01:00
|
|
|
} KmlToken;
|
2024-03-19 22:22:29 +01:00
|
|
|
|
2024-03-19 22:37:54 +01:00
|
|
|
typedef struct KmlLine
|
2024-03-19 22:22:29 +01:00
|
|
|
{
|
2024-03-19 22:37:54 +01:00
|
|
|
struct KmlLine* pNext;
|
2024-03-19 22:22:29 +01:00
|
|
|
TokenId eCommand;
|
|
|
|
DWORD nParam[6];
|
2024-03-19 22:37:54 +01:00
|
|
|
} KmlLine;
|
2024-03-19 22:22:29 +01:00
|
|
|
|
2024-03-19 22:37:54 +01:00
|
|
|
typedef struct KmlBlock
|
2024-03-19 22:22:29 +01:00
|
|
|
{
|
|
|
|
TokenId eType;
|
|
|
|
DWORD nId;
|
2024-03-19 22:37:54 +01:00
|
|
|
struct KmlLine* pFirstLine;
|
|
|
|
struct KmlBlock* pNext;
|
|
|
|
} KmlBlock;
|
2024-03-19 22:22:29 +01:00
|
|
|
|
|
|
|
#define BUTTON_NOHOLD 0x0001
|
|
|
|
#define BUTTON_VIRTUAL 0x0002
|
2024-03-19 22:37:54 +01:00
|
|
|
typedef struct KmlButton
|
2024-03-19 22:22:29 +01:00
|
|
|
{
|
|
|
|
UINT nId;
|
|
|
|
BOOL bDown;
|
|
|
|
UINT nType;
|
|
|
|
DWORD dwFlags;
|
|
|
|
UINT nOx, nOy;
|
|
|
|
UINT nDx, nDy;
|
|
|
|
UINT nCx, nCy;
|
|
|
|
UINT nOut, nIn;
|
2024-03-19 22:37:54 +01:00
|
|
|
KmlLine* pOnDown;
|
|
|
|
KmlLine* pOnUp;
|
|
|
|
} KmlButton;
|
2024-03-19 22:22:29 +01:00
|
|
|
|
2024-03-19 22:37:54 +01:00
|
|
|
typedef struct KmlAnnunciator
|
2024-03-19 22:22:29 +01:00
|
|
|
{
|
|
|
|
UINT nOx, nOy;
|
|
|
|
UINT nDx, nDy;
|
|
|
|
UINT nCx, nCy;
|
2024-03-19 22:37:54 +01:00
|
|
|
} KmlAnnunciator;
|
2024-03-19 22:22:29 +01:00
|
|
|
|
2024-03-19 22:37:54 +01:00
|
|
|
extern KmlBlock* pKml;
|
2024-03-19 22:22:29 +01:00
|
|
|
extern BOOL DisplayChooseKml(CHAR cType);
|
2024-03-19 22:37:54 +01:00
|
|
|
extern VOID FreeBlocks(KmlBlock* pBlock);
|
2024-03-19 22:22:29 +01:00
|
|
|
extern VOID DrawAnnunciator(UINT nId, BOOL bOn);
|
2024-03-19 23:33:35 +01:00
|
|
|
extern VOID ReloadButtons(BYTE *Keyboard_Row, UINT nSize);
|
2024-03-19 22:37:03 +01:00
|
|
|
extern VOID RefreshButtons(RECT *rc);
|
2024-03-19 22:22:29 +01:00
|
|
|
extern VOID MouseButtonDownAt(UINT nFlags, DWORD x, DWORD y);
|
|
|
|
extern VOID MouseButtonUpAt(UINT nFlags, DWORD x, DWORD y);
|
|
|
|
extern VOID MouseMovesTo(UINT nFlags, DWORD x, DWORD y);
|
|
|
|
extern VOID RunKey(BYTE nId, BOOL bPressed);
|
2024-03-19 23:33:35 +01:00
|
|
|
extern VOID PlayKey(UINT nOut, UINT nIn, BOOL bPressed);
|
2024-03-19 22:37:03 +01:00
|
|
|
extern BOOL InitKML(LPCTSTR szFilename, BOOL bNoLog);
|
|
|
|
extern VOID KillKML(VOID);
|