From 197fdeb33de94e4da66a958eae7151544b766d97 Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Sat, 24 Dec 2016 16:35:38 +0900
Subject: [PATCH] Fix INKEY$() buffer

---
 SMILEBASIC/petitcomputer.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SMILEBASIC/petitcomputer.d b/SMILEBASIC/petitcomputer.d
index aa7754d..49559fb 100644
--- a/SMILEBASIC/petitcomputer.d
+++ b/SMILEBASIC/petitcomputer.d
@@ -1531,7 +1531,7 @@ class PetitComputer
         {
             return "";
         }
-        auto result = keybuffer[(keybufferpos - keybufferlen)];
+        auto result = keybuffer[(keybufferpos - keybufferlen) % keybuffer.length];
         keybufferlen--;
         return result.key.to!wstring;
     }