opcodes.h

在手机操作系统symbina上使用的一个脚本扩展语言的代码实现,可以参考用于自己的开发

//	static void dCheckBox(CStack& aStack,COplRuntime& aRuntime,CFrame* aFramePtr);
	static void gSetPenWidth(CStack& aStack,COplRuntime& aRuntime,CFrame* aFramePtr);
	static void dEditMulti(CStack& aStack,COplRuntime& aRuntime,CFrame* aFramePtr);
	static void gColorInfo(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gColorBackground(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void mCardX(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SetHelp(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ShowHelp(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SetHelpUid(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);

#if defined(INTERNAL_RELEASE)
	static void __Dummy(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
#endif
	static void DoCallProcByStringExpr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr,TUint8 aType);
	static TAny* GetElementL(TAny* aArray,TInt aIndex,TInt aElementSize);
	static TAny* JumpToIndex(TAny* aArray,TInt aIndex,TInt aElementSize);
private:
	static void RemoveFrame(CStack& aStack, CFrame* aFramePtr);
	static void CheckExitL(COplRuntime& aRuntime);
	};


class FuncOpCode
	{
public :
	friend /*static*/ void OpCode::CallFunction(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Addr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Asc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Call(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Count(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Day(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Dow(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Eof(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Err(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Exist(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Find(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Get(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Ioa(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Iow(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoOpen(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoWrite(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoRead(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 10h
	static void IoClose(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoWait(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Hour(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Key(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Len(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Loc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Minute(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Month(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PeekB(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PeekW(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Pos(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
//	static void RecSize(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Second(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Usr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Year(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SAddr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 20h
	static void Week(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoSeek(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Kmod(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void KeyA(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void KeyC(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoOpenUnique(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gCreate(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gCreateBit(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gLoadBit(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gLoadFont(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gRank(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gIdentity(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gX(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gY(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gWidth(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gHeight(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gOriginX(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gOriginY(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gTWidth(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintClip(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void TestEvent(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IllegalFuncOpCode(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Menu(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Dialog(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Alert(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gCreateEnhanced(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void MenuWithMemory(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Days(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IAbs(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IntLong(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PeekL(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Space(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void DateToSecs(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Alloc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ReAlloc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void AdjustAlloc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LenAlloc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Ioc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Uadd(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Usub(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoCancel(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void FindField(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Bookmark(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GetEventC(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void InTrans(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void mPopup(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
//	static void ModInt32(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Abs(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ACos(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ASin(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ATan(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Cos(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Deg(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Exp(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Flt(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Intf(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Ln(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Log(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PeekF(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Pi(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Rad(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Rnd(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Sin(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Sqr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Tan(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Val(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Max(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Mean(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Min(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Std(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Sum(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Var(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Eval(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ChrStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void DatimStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void DayNameStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void DirStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ErrStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void FixStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GenStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GetStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void HexStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void KeyStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LeftStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LowerStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void MidStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void MonthStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void NumStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PeekStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ReptStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void RightStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SciStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void UpperStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void WCmd(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void CmdStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ParseStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ErrxStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GetDocStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Size(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
private:
	static const OPCODEFUNC FuncOpCodeTable[];
	};