Implement MILLISEC system variable

2016-12-16 23:14:35 +09:00
parent e106374bb6
commit b4d283daad
2 changed files with 10 additions and 0 deletions
--- a/SMILEBASIC/systemvariable.d
+++ b/SMILEBASIC/systemvariable.d
@@ -124,3 +124,12 @@ class Hardware : SystemVariable
            return Value(cast(int)vm.petitcomputer.hardware);
        }
 }
+class MilliSecond : SystemVariable
+{
+    @property
+        override Value value()
+        {
+            import derelict.sdl2.sdl;
+            return Value(cast(int)SDL_GetTicks());
+        }
+}