opcodes.h

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

	static void PrintLong(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PrintFloat(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PrintString(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LPrintInt(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LPrintLong(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LPrintFloat(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LPrintString(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 90h
	static void PrintSpace(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LPrintSpace(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PrintCarriageReturn(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LPrintCarriageReturn(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void InputInt(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void InputLong(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void InputFloat(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void InputString(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PokeW(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		// POKEW
	static void PokeL(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		// POKEL
	static void PokeD(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		// POKED
	static void PokeStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);	// POKE$
	static void PokeB(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		// POKEB
	static void Append(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		// APPEND
	static void At(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);	// AT
	static void Back(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		// BACK
	// a0h
	static void Beep(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Close(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Cls(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
//	static void Compress(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Copy(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Create(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Cursor(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Delete(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Erase(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Escape(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void First(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Vector(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Last(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LClose(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LoadM(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void LOpen(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// B0h
	static void Next(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void OnErr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Off(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void OffFor(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Open(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Pause(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Position(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoSignal(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr); 	
	static void Raise(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Randomize(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Rename(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Stop(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Trap(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Update(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Use(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GoTo(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// C0h
	static void Return(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void UnLoadM(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Edit(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Screen2(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void OpenR(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gSaveBit(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gClose(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gUse(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gSetWin(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gVisible(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gFont(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gUnloadFont(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gGMode(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gTMode(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gStyle(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gOrder(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// D0h
	//static void gInfo(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gCls(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gAt(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gMove(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintWord(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintLong(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintDbl(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintStr(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintSpace(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPrintBoxText(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gLineBy(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gBox(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gCircle(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gEllipse(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPoly(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gFill(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// E0h
	static void gPatt(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gCopy(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gScroll(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gUpdate(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GetEvent(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gLineTo(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gPeekLine(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Screen4(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoWaitStat(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoYield(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void mInit(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void mCard(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void dInit(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void dItem(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SetName(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// F0h
	static void Busy(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Lock(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gInvert(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gXPrint(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gBorder(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gClock(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void MkDir(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void RmDir(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SetPath(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SecsToDate(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gIPrint(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// FDh
	static void gGrey(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void NextOpcodeTable(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 100h
	static void DefaultWin(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Font(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Style(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void FreeAlloc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gButton(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gXBorder(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 110h
	//static void gDrawObject(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ScreenInfo(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);		
	//static void dInitS(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void CallOpxFunc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Statement32(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Modify(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Insert(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Cancel(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Put(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void DeleteTable(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GotoMark(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 120h
	static void KillMark(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ReturnFromEval(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GetEvent32(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void GetEventA32(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gColor(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SetFlags(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void SetDoc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void DaysToDate(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void gInfo32(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void IoWaitStat32(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Compact(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void BeginTrans(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void CommitTrans(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void Rollback(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void ClearFlags(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void PointerFilter(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	// 130h
	static void mCasc(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void EvalExternalRightSideRef(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);
	static void EvalExternalLeftSideRef(CStack& aStack, COplRuntime& aRuntime, CFrame* aFramePtr);