From e4d172001b4de72737ae828b4c031d98b63b18c3 Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Sun, 18 Dec 2016 16:09:25 +0900
Subject: [PATCH] Implement GPUTCHR (2)

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

diff --git a/SMILEBASIC/graphic.d b/SMILEBASIC/graphic.d
index 97159e3..5d2d2e1 100644
--- a/SMILEBASIC/graphic.d
+++ b/SMILEBASIC/graphic.d
@@ -986,6 +986,8 @@ class Graphic2 : Graphic
 
     override void gputchr(int page, int x, int y, int text, int scalex, int scaley, uint color)
     {
+        drawCharacter(x, y, scalex, scaley, color, cast(wchar)text);
+        df = true;
     }
 
     int mulColor(int color, int color2)