diff --git a/SMILEBASIC/compiler.d b/SMILEBASIC/compiler.d index 634375d..4b6b59c 100644 --- a/SMILEBASIC/compiler.d +++ b/SMILEBASIC/compiler.d @@ -258,6 +258,11 @@ class Compiler addSystemVariable("MILLISEC", new MilliSecond()); addSystemVariable("PRGSLOT", new ProgramSlot()); 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) { diff --git a/SMILEBASIC/systemvariable.d b/SMILEBASIC/systemvariable.d index 2064771..6f4643c 100644 --- a/SMILEBASIC/systemvariable.d +++ b/SMILEBASIC/systemvariable.d @@ -149,3 +149,11 @@ class CallIndex : SystemVariable return Value(vm.petitcomputer.callidx); } } +class Zero : SystemVariable +{ + @property override Value value() + { + return Value(0); + } +} +