bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Add system variable stubs

Browse Source
This commit is contained in:
otya128
2017-07-09 23:39:07 +09:00
parent be5424a203
commit 98aed4f3dc
2 changed files with 13 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
SMILEBASIC/compiler.d
View File

@@ -258,6 +258,11 @@ class Compiler
addSystemVariable("MILLISEC", new MilliSecond()); addSystemVariable("MILLISEC", new MilliSecond());
addSystemVariable("PRGSLOT", new ProgramSlot()); addSystemVariable("PRGSLOT", new ProgramSlot());
addSystemVariable("CALLIDX", new CallIndex()); addSystemVariable("CALLIDX", new CallIndex());
addSystemVariable("MPCOUNT", new Zero());
addSystemVariable("MPHOST", new Zero());
addSystemVariable("MPLOCAL", new Zero());
addSystemVariable("MICPOS", new Zero());
addSystemVariable("MICSIIZE", new Zero());
} }
void addSystemVariable(wstring name, SystemVariable var) void addSystemVariable(wstring name, SystemVariable var)
{ {

8
SMILEBASIC/systemvariable.d
View File

@@ -149,3 +149,11 @@ class CallIndex : SystemVariable
return Value(vm.petitcomputer.callidx); return Value(vm.petitcomputer.callidx);
} }
} }
class Zero : SystemVariable
{
@property override Value value()
{
return Value(0);
}
}