From c1497252aa16f17aaaf16c4c4c7d66f0de1c5d66 Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Sat, 17 Dec 2016 16:52:09 +0900
Subject: [PATCH] Fix TOUCH

---
 SMILEBASIC/petitcomputer.d | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/SMILEBASIC/petitcomputer.d b/SMILEBASIC/petitcomputer.d
index fa97f00..47b7fc3 100644
--- a/SMILEBASIC/petitcomputer.d
+++ b/SMILEBASIC/petitcomputer.d
@@ -800,7 +800,9 @@ class PetitComputer
                     {
                         if (touchPosition.tm)
                         {
-                            touchPosition = Touch(0, mousex, mousey);
+                            auto old = touchPosition;
+                            old.tm = 0;
+                            touchPosition = old;
                         }
                     }
                 }