From e9292ee853b6f2bb94d745ad88aaf59d72aa22e5 Mon Sep 17 00:00:00 2001
From: Raymond <Raymond@3f818213-9676-44b0-a9b4-5e4c4e03d09d>
Date: Sat, 3 Oct 2009 22:22:28 +0000
Subject: [PATCH] git-svn-id:
 http://www.villavu.com/repositories/merlijn/mufasa@101
 3f818213-9676-44b0-a9b4-5e4c4e03d09d

---
 Tests/PS/dmtest.txt | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 Tests/PS/dmtest.txt

diff --git a/Tests/PS/dmtest.txt b/Tests/PS/dmtest.txt
new file mode 100644
index 0000000..8384e2b
--- /dev/null
+++ b/Tests/PS/dmtest.txt
@@ -0,0 +1,18 @@
+program new;
+var
+  dtm,x,y, w, h:integer;
+begin
+  getclientdimensions(w,h);
+  writeln(inttostr(w) + ',' + inttostr(h));
+  dtm := DTMFromString('78DA63F4606460F0634001E181810C46401A2' +
+          '8C3F01F0818AD31D54064612490B601B28209A87105B2A209A8F1' +
+          '23424D38901540841A2FFC6A00C8100982');
+
+  if finddtm(dtm, x,y, 0, 0, w-1,h-1) then
+  begin
+    writeln('found');
+    movemouse(x,y);
+  end else
+    writeln('not found');
+  freedtm(dtm);
+end.
\ No newline at end of file