ot_resrv.cpp

来自「在手机操作系统symbina上使用的一个脚本扩展语言的代码实现,可以参考用于自己」· C++ 代码 · 共 797 行 · 第 1/4 页

	{_S("IAMINIT"),KOplOpl1993Only,TUint8(TOplKeyword::EDiaminit),EFalse,0},
	{_S("IAMPOS"),KOplOpl1993Only,TUint8(TOplKeyword::EDiampos),EFalse,0},
	{_S("INIT"),KOplAllTargets,TUint8(TOplKeyword::EDinit),EFalse,0},
	{_S("INITS"),KOplOpl1993Only,TUint8(TOplKeyword::EDinits),EFalse,0}, // ONLY ON OPL1994
	{_S("LONG"),KOplAllTargets,TUint8(TOplKeyword::EDlong),EFalse,0},
	{_S("POSITION"),KOplAllTargets,TUint8(TOplKeyword::EDposition),EFalse,0},
	{_S("RAWSPRITE"),KOplOpl1993Only,TUint8(TOplKeyword::EDrawsprite),EFalse,0},
	{_S("TEXT"),KOplAllTargets,TUint8(TOplKeyword::EDtext),EFalse,0},
	{_S("TIME"),KOplAllTargets,TUint8(TOplKeyword::EDtime),EFalse,0},
	{_S("XINPUT"),KOplAllTargets,TUint8(TOplKeyword::EDxinput),EFalse,0}
	};

static const TKeywordLookup keywordETable[]=
	{
	{_S("DIT"),KOplAllTargets,TUint8(TOplKeyword::EEdit),ETrue,0},
	{_S("RASE"),KOplAllTargets,TUint8(TOplKeyword::EErase),ETrue,0},
	{_S("SCAPE"),KOplAllTargets,TUint8(TOplKeyword::EEscape),EFalse,0}
	};
static const TKeywordLookup keywordFTable[]=
	{
	{_S("IRST"),KOplAllTargets,TUint8(TOplKeyword::EFirst),ETrue,0},
	{_S("ONT"),KOplAllTargets,TUint8(TOplKeyword::EFont),EFalse,0},
	{_S("REEALLOC"),KOplAllTargets,TUint8(TOplKeyword::EFreealloc),EFalse,0}
	};
static const TKeywordLookup keywordGTable[]=
	{
	{_S("AT"),KOplAllTargets,TUint8(TOplKeyword::EGat),EFalse,0},
	{_S("BORDER"),KOplAllTargets,TUint8(TOplKeyword::EGborder),EFalse,0},
	{_S("BOX"),KOplAllTargets,TUint8(TOplKeyword::EGbox),EFalse,0},
	{_S("BUTTON"),KOplAllTargets,TUint8(TOplKeyword::EGbutton),EFalse,0},
	{_S("CIRCLE"),KOplNotOpl1993,TUint8(TOplKeyword::EGcircle),EFalse,0},
	{_S("CLOCK"),KOplAllTargets,TUint8(TOplKeyword::EGclock),EFalse,0},
	{_S("CLOSE"),KOplAllTargets,TUint8(TOplKeyword::EGclose),ETrue,0},
	{_S("CLS"),KOplAllTargets,TUint8(TOplKeyword::EGcls),EFalse,0},
	{_S("COLOR"),KOplNotOpl1993,TUint8(TOplKeyword::EGcolor),EFalse,0},
	{_S("COLORBACKGROUND"),KOplNotOpl1993,TUint8(TOplKeyword::EGcolorbackground),EFalse,0},
	{_S("COLORINFO"),KOplNotOpl1993,TUint8(TOplKeyword::EGcolorinfo),EFalse,0},
	{_S("COPY"),KOplAllTargets,TUint8(TOplKeyword::EGcopy),ETrue,0},
	{_S("DRAWOBJECT"),KOplOpl1993Only,TUint8(TOplKeyword::EGdrawobject),EFalse,0},
	{_S("ELLIPSE"),KOplNotOpl1993,TUint8(TOplKeyword::EGellipse),EFalse,0},
	{_S("ETEVENT"),KOplAllTargets,TUint8(TOplKeyword::EGetevent),EFalse,0},
	{_S("ETEVENT32"),KOplNotOpl1993,TUint8(TOplKeyword::EGetevent32),EFalse,0},
	{_S("ETEVENTA32"),KOplNotOpl1993,TUint8(TOplKeyword::EGeteventa32),EFalse,0},
	{_S("FILL"),KOplAllTargets,TUint8(TOplKeyword::EGfill),EFalse,0},
	{_S("FONT"),KOplAllTargets,TUint8(TOplKeyword::EGfont),ETrue,0},
	{_S("GMODE"),KOplAllTargets,TUint8(TOplKeyword::EGgmode),EFalse,0},
	{_S("GREY"),KOplAllTargets,TUint8(TOplKeyword::EGgrey),EFalse,0},
	{_S("INFO"),KOplOpl1993Only,TUint8(TOplKeyword::EGinfo),EFalse,0},
	{_S("INFO32"),KOplNotOpl1993,TUint8(TOplKeyword::EGinfo32),EFalse,0},
	{_S("INVERT"),KOplAllTargets,TUint8(TOplKeyword::EGinvert),EFalse,0},
	{_S("IPRINT"),KOplAllTargets,TUint8(TOplKeyword::EGiprint),EFalse,0},
	{_S("LINEBY"),KOplAllTargets,TUint8(TOplKeyword::EGlineby),EFalse,0},
	{_S("LINETO"),KOplAllTargets,TUint8(TOplKeyword::EGlineto),EFalse,0},
	{_S("MOVE"),KOplAllTargets,TUint8(TOplKeyword::EGmove),EFalse,0},
	{_S("ORDER"),KOplAllTargets,TUint8(TOplKeyword::EGorder),EFalse,0},
	{_S("OTO"),KOplAllTargets,TUint8(TOplKeyword::EGoto),EFalse,0},
	{_S("OTOMARK"),KOplNotOpl1993,TUint8(TOplKeyword::EGotoMark),EFalse,0},
	{_S("PATT"),KOplAllTargets,TUint8(TOplKeyword::EGpatt),ETrue,0},
	{_S("PEEKLINE"),KOplAllTargets,TUint8(TOplKeyword::EGpeekline),EFalse,0},
	{_S("POLY"),KOplAllTargets,TUint8(TOplKeyword::EGpoly),EFalse,0},
	{_S("PRINT"),KOplAllTargets,TUint8(TOplKeyword::EGprint),EFalse,0},
	{_S("PRINTB"),KOplAllTargets,TUint8(TOplKeyword::EGprintb),EFalse,0},
	{_S("SAVEBIT"),KOplAllTargets,TUint8(TOplKeyword::EGsavebit),ETrue,0},
	{_S("SCROLL"),KOplAllTargets,TUint8(TOplKeyword::EGscroll),EFalse,0},
	{_S("SETPENWIDTH"),KOplNotOpl1993,TUint8(TOplKeyword::EgSetPenWidth),EFalse,0},
	{_S("SETWIN"),KOplAllTargets,TUint8(TOplKeyword::EGsetwin),EFalse,0},
	{_S("STYLE"),KOplAllTargets,TUint8(TOplKeyword::EGstyle),EFalse,0},
	{_S("TMODE"),KOplAllTargets,TUint8(TOplKeyword::EGtmode),EFalse,0},
	{_S("UNLOADFONT"),KOplAllTargets,TUint8(TOplKeyword::EGunloadfont),ETrue,0},
	{_S("UPDATE"),KOplAllTargets,TUint8(TOplKeyword::EGupdate),EFalse,0},
	{_S("USE"),KOplAllTargets,TUint8(TOplKeyword::EGuse),ETrue,0},
	{_S("VISIBLE"),KOplAllTargets,TUint8(TOplKeyword::EGvisible),EFalse,0},
	{_S("XBORDER"),KOplAllTargets,TUint8(TOplKeyword::EGxborder),EFalse,0},
	{_S("XPRINT"),KOplAllTargets,TUint8(TOplKeyword::EGxprint),EFalse,0},
	};
static const TKeywordLookup keywordITable[]=
	{
	{_S("NPUT"),KOplAllTargets,TUint8(TOplKeyword::EInput),ETrue,0},
	{_S("NSERT"),KOplNotOpl1993,TUint8(TOplKeyword::EInsert),ETrue,0},
	{_S("OSIGNAL"),KOplAllTargets,TUint8(TOplKeyword::EIosignal),ETrue,0},
	{_S("OWAITSTAT"),KOplAllTargets,TUint8(TOplKeyword::EIowaitstat),EFalse,0},
	{_S("OWAITSTAT32"),KOplNotOpl1993,TUint8(TOplKeyword::EIowaitstat32),EFalse,0},
	{_S("OYIELD"),KOplAllTargets,TUint8(TOplKeyword::EIoyield),EFalse,0}
	};
static const TKeywordLookup keywordKTable[]=
	{
	{_S("ILLMARK"),KOplNotOpl1993,TUint8(TOplKeyword::EKillMark),EFalse,0}
	};
static const TKeywordLookup keywordLTable[]=
	{
	{_S("AST"),KOplAllTargets,TUint8(TOplKeyword::ELast),ETrue,0},
	{_S("CLOSE"),KOplAllTargets,TUint8(TOplKeyword::ELclose),ETrue,0},
	{_S("INKLIB"),KOplOpl1993Only,TUint8(TOplKeyword::ELinklib),EFalse,0},
	{_S("OADM"),KOplAllTargets,TUint8(TOplKeyword::ELoadm),ETrue,0},
	{_S("OCK"),KOplAllTargets,TUint8(TOplKeyword::ELock),EFalse,0},
	{_S("OPEN"),KOplAllTargets,TUint8(TOplKeyword::ELopen),ETrue,0},
	{_S("PRINT"),KOplAllTargets,TUint8(TOplKeyword::ELprint),EFalse,0}
	};
static const TKeywordLookup keywordMTable[]=
	{
	{_S("CARD"),KOplAllTargets,TUint8(TOplKeyword::EMcard),EFalse,0},
	{_S("CARDX"),KOplNotOpl1993,TUint8(TOplKeyword::EMcardX),EFalse,0},
	{_S("CASC"),KOplNotOpl1993,TUint8(TOplKeyword::EMcasc),EFalse,0},
	{_S("INIT"),KOplAllTargets,TUint8(TOplKeyword::EMinit),EFalse,0},
	{_S("KDIR"),KOplAllTargets,TUint8(TOplKeyword::EMkdir),ETrue,0},
	{_S("ODIFY"),KOplNotOpl1993,TUint8(TOplKeyword::EModify),ETrue,0}
	};
static const TKeywordLookup keywordNTable[]=
	{
	{_S("EXT"),KOplAllTargets,TUint8(TOplKeyword::ENext),ETrue,0}
	};
static const TKeywordLookup keywordOTable[]=
	{
	{_S("DBINFO"),KOplOpl1993Only,TUint8(TOplKeyword::EOdbinfo),EFalse,0},
	{_S("FF"),KOplAllTargets,TUint8(TOplKeyword::EOff),EFalse,0},
	{_S("NERR"),KOplAllTargets,TUint8(TOplKeyword::EOnerr),EFalse,0},
	{_S("PEN"),KOplAllTargets,TUint8(TOplKeyword::EOpen),ETrue,0},
	{_S("PENR"),KOplAllTargets,TUint8(TOplKeyword::EOpenr),ETrue,0},
	};
static const TKeywordLookup keywordPTable[]=
	{
	{_S("AUSE"),KOplAllTargets,TUint8(TOplKeyword::EPause),EFalse,0},
	{_S("OKE$"),KOplAllTargets,TUint8(TOplKeyword::EPokes),EFalse,0},
	{_S("OKEB"),KOplAllTargets,TUint8(TOplKeyword::EPokeb),EFalse,0},
	{_S("OKEF"),KOplAllTargets,TUint8(TOplKeyword::EPokef),EFalse,0},
	{_S("OKEL"),KOplAllTargets,TUint8(TOplKeyword::EPokel),EFalse,0},
	{_S("OKEW"),KOplAllTargets,TUint8(TOplKeyword::EPokew),EFalse,0},
	{_S("OINTERFILTER"),KOplNotOpl1993,TUint8(TOplKeyword::EPointerFilter),EFalse,0},
	{_S("OSITION"),KOplAllTargets,TUint8(TOplKeyword::EPosition),ETrue,0},
	{_S("OSSPRITE"),KOplOpl1993Only,TUint8(TOplKeyword::EPossprite),EFalse,0},
	{_S("RINT"),KOplAllTargets,TUint8(TOplKeyword::EPrint),EFalse,0},
	{_S("UT"),KOplNotOpl1993,TUint8(TOplKeyword::EPut),ETrue,0}
	};
static const TKeywordLookup keywordRTable[]=
	{
	{_S("AISE"),KOplAllTargets,TUint8(TOplKeyword::ERaise),ETrue,0},	// TRAP RAISE err% allowed
	{_S("ANDOMIZE"),KOplAllTargets,TUint8(TOplKeyword::ERandomize),EFalse,0},
	{_S("ENAME"),KOplAllTargets,TUint8(TOplKeyword::ERename),ETrue,0},
	{_S("ETURN"),KOplAllTargets,TUint8(TOplKeyword::EReturnValue),EFalse,0},
	{_S("MDIR"),KOplAllTargets,TUint8(TOplKeyword::ERmdir),ETrue,0},
	{_S("OLLBACK"),KOplNotOpl1993,TUint8(TOplKeyword::ERollBack),EFalse,0}		// hp:
	};
static const TKeywordLookup keywordSTable[]=
	{
	{_S("CREEN"),KOplAllTargets,TUint8(TOplKeyword::EScreen),EFalse,0},
	{_S("CREENINFO"),KOplAllTargets,TUint8(TOplKeyword::EScreeninfo),EFalse,0},
	{_S("ECSTODATE"),KOplAllTargets,TUint8(TOplKeyword::ESecstodate),EFalse,0},
	{_S("ETDOC"),KOplNotOpl1993,TUint8(TOplKeyword::ESetdoc),EFalse,0},
	{_S("ETFLAGS"),KOplNotOpl1993,TUint8(TOplKeyword::ESetflags),EFalse,0},
	{_S("ETHELP"),KOplNotOpl1993,TUint8(TOplKeyword::ESetHelp),EFalse,0},
	{_S("ETHELPUID"),KOplNotOpl1993,TUint8(TOplKeyword::ESetHelpUid),EFalse,0},
	{_S("ETNAME"),KOplOpl1993Only,TUint8(TOplKeyword::ESetname),EFalse,0},
	{_S("ETPATH"),KOplAllTargets,TUint8(TOplKeyword::ESetpath),EFalse,0},
	{_S("HOWHELP"),KOplNotOpl1993,TUint8(TOplKeyword::EShowHelp),EFalse,0},
	{_S("TATUSWIN"),KOplOpl1993Only,TUint8(TOplKeyword::EStatuswin),EFalse,0},
	{_S("TOP"),KOplAllTargets,TUint8(TOplKeyword::EStop),EFalse,0},
	{_S("TYLE"),KOplAllTargets,TUint8(TOplKeyword::EStyle),EFalse,0}
	};
static const TKeywordLookup keywordTTable[]=
	{
	{_S("RAP"),KOplAllTargets,TUint8(TOplKeyword::ETrap),EFalse,0}
	};
static const TKeywordLookup keywordUTable[]=
	{
	{_S("NLOADM"),KOplAllTargets,TUint8(TOplKeyword::EUnloadm),ETrue,0},
	{_S("PDATE"),KOplAllTargets,TUint8(TOplKeyword::EUpdate),ETrue,0},
	{_S("SE"),KOplAllTargets,TUint8(TOplKeyword::EUse),ETrue,0},
	{_S("SESPRITE"),KOplOpl1993Only,TUint8(TOplKeyword::EUsesprite),EFalse,0}
	};

////////////////////////////////////////////////////////////////////////
//
// Reserved word lookup tables
//
////////////////////////////////////////////////////////////////////////
static const TReservedLookup reservedATable[]=
	{
	{_S("LIAS"),KOplNotOpl1993,TUint8(TOplToken::EAlias&0xff),TUint8(TOplToken::EAlias>>8),0},
	{_S("ND"),KOplAllTargets,TUint8(TOplToken::EAnd&0xff),TUint8(TOplToken::EAnd>>8),0},
	{_S("PP"),KOplAllTargets,TUint8(TOplToken::EApp&0xff),TUint8(TOplToken::EApp>>8),0}
	};
static const TReservedLookup reservedBTable[]=
	{
	{_S("YREF"),KOplNotOpl1993,TUint8(TOplToken::EByRef&0xff),TUint8(TOplToken::EByRef>>8),0}
	};
static const TReservedLookup reservedCTable[]=
	{
	{_S("APTION"),KOplNotOpl1993,TUint8(TOplToken::ECaption&0xff),TUint8(TOplToken::ECaption>>8),0},
	{_S("ONST"),KOplNotOpl1993,TUint8(TOplToken::EConst&0xff),TUint8(TOplToken::EConst>>8),0}
	};
static const TReservedLookup reservedDTable[]=
	{
	{_S("O"),KOplAllTargets,TUint8(TOplToken::EDo&0xff),TUint8(TOplToken::EDo>>8),0},
	{_S("ECLARE"),KOplNotOpl1993,TUint8(TOplToken::EDeclare&0xff),TUint8(TOplToken::EDeclare>>8),0}
	};
static const TReservedLookup reservedETable[]=
	{
	{_S("ND"),KOplNotOpl1993,TUint8(TOplToken::EEnd&0xff),TUint8(TOplToken::EEnd>>8),0},
	{_S("LSE"),KOplAllTargets,TUint8(TOplToken::EElse&0xff),TUint8(TOplToken::EElse>>8),0},
	{_S("LSEIF"),KOplAllTargets,TUint8(TOplToken::EElseIf&0xff),TUint8(TOplToken::EElseIf>>8),0},