From fb093b69399e5f757476ed0f2fea8f19d3eb09f4 Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Sun, 22 Jan 2017 00:00:11 +0900
Subject: [PATCH] Fix GPUTCHR

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

diff --git a/SMILEBASIC/graphic.d b/SMILEBASIC/graphic.d
index 30a7cc0..12635e7 100644
--- a/SMILEBASIC/graphic.d
+++ b/SMILEBASIC/graphic.d
@@ -1183,7 +1183,7 @@ class Graphic2 : Graphic
             {
                 if (font[iy / scaley * 8 + ix / scalex] >> 24/*is trans*/)
                 {
-                    (buffer + (y + iy) * width + x + ix)[0] = font[iy / scaley * 8 + ix / scaley];
+                    (buffer + (y + iy) * width + x + ix)[0] = font[iy / scaley * 8 + ix / scalex];
                 }
             }
         }