added sleep() implementation

git-svn-id: svn://svn.cc65.org/cc65/trunk@2324 b7a2c559-68d2-44c3-8de9-860c34a00d81
2003-08-15 19:24:20 +00:00
parent b499757ee4
commit bc6dadb3db
2 changed files with 24 additions and 1 deletions
--- a/libsrc/geos/common/sleep.c
+++ b/libsrc/geos/common/sleep.c
@@ -0,0 +1,23 @@
+/*
+ * sleep.c
+ *
+ * Maciej 'YTM/Elysium' Witkowiak, 15.08.2003
+ *
+ */
+
+#include <geos.h>
+
+unsigned __fastcall__ sleep (unsigned wait)
+{
+    char typ;
+
+    if ( (get_tv()) & TV_NTSC ) {
+	typ = 60;
+    } else {
+	typ = 50;
+    }
+
+    Sleep(wait*typ);
+
+    return 0;
+}