From 80bc64ee9c6c6c4d5daf39685f5e9d43602f725c Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Mon, 26 Dec 2016 22:02:23 +0900
Subject: [PATCH] Implement DIALOG timeout

---
 SMILEBASIC/dialog.d | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/SMILEBASIC/dialog.d b/SMILEBASIC/dialog.d
index d6c3aa0..6894626 100644
--- a/SMILEBASIC/dialog.d
+++ b/SMILEBASIC/dialog.d
@@ -270,8 +270,23 @@ class Dialog : DialogBase
         scope (exit)
             petitcom.dialog = null;
         bool isPressed;
+        int timeoutframe;
+        if (timeout > 0)
+        {
+            timeoutframe = timeout * 60;
+        }
+        else if (timeout < 0)
+        {
+            timeoutframe = -timeout;
+        }
+        auto startmaincnt = petitcom.maincnt;
         while (!isPressed)
         {
+            petitcom.maincnt++;
+            if (petitcom.maincnt - startmaincnt == timeoutframe)
+            {
+                break;
+            }
             auto to = petitcom.touchPosition();
             auto x = to.display1X;
             auto y = to.display1Y;