From c58ce1f34e00b2dc5cc604954152fbeb56029f8160eebbfa55705bc32699e95e Mon Sep 17 00:00:00 2001
From: Gabriel Lorenzo <ermakina@gmail.com>
Date: Mon, 7 Oct 2002 16:12:38 +0000
Subject: [PATCH] test_mouse

---
 ediv/bin/test/test_mouse.prg | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/ediv/bin/test/test_mouse.prg b/ediv/bin/test/test_mouse.prg
index f3a8ac6..ca0d96b 100644
--- a/ediv/bin/test/test_mouse.prg
+++ b/ediv/bin/test/test_mouse.prg
@@ -3,6 +3,21 @@ private
     mi_mapa;
 
 begin
+    load_fnt("system.fnt");
+    write(1,0,0,0,"X:");
+    write(1,0,10,0,"Y:");
+    write(1,0,20,0,"Left:");
+    write(1,0,30,0,"Middle:");
+    write(1,0,40,0,"Right:");
+    write(1,0,50,0,"WheelUp:");
+    write(1,0,60,0,"WheelDown:");
+    write_int(1,80,0,0,&mouse.x);
+    write_int(1,80,10,0,&mouse.y);
+    write_int(1,80,20,0,&mouse.left);
+    write_int(1,80,30,0,&mouse.middle);
+    write_int(1,80,40,0,&mouse.right);
+    write_int(1,80,50,0,&mouse.wheelup);
+    write_int(1,80,60,0,&mouse.wheeldown);
     mi_mapa=load_bmp("hola.bmp");
     mouse.graph=mi_mapa;
     loop