From d0fbd0050d9085f815b642d138c3ef571b64b76a Mon Sep 17 00:00:00 2001
From: Marius <mariausol@gmail.com>
Date: Mon, 31 Jan 2011 00:29:42 +0200
Subject: beta 2011.01.24 23:51

---
 tex/context/base/java-ans.mkii | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 tex/context/base/java-ans.mkii

(limited to 'tex/context/base/java-ans.mkii')

diff --git a/tex/context/base/java-ans.mkii b/tex/context/base/java-ans.mkii
new file mode 100644
index 000000000..636c894f9
--- /dev/null
+++ b/tex/context/base/java-ans.mkii
@@ -0,0 +1,28 @@
+%D \module
+%D   [       file=java-ans,
+%D        version=1998.06.01,
+%D          title=\CONTEXT\ JavaScript Macros,
+%D       subtitle=Answer Analization,
+%D         author=Hans Hagen,
+%D           date=\currentdate,
+%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
+%C
+%C This module is part of the \CONTEXT\ macro||package and is
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for 
+%C details. 
+
+\startJSpreamble{Do_Check_Answer} used later 
+
+  function Do_Check_Answer (field, value) 
+   { if (event.value.toLowerCase()==value.toLowerCase())
+       { event.target.hidden = true }
+     % { event.target.display = display.hidden }
+     return("\040") } // funny, "" does not work
+
+\stopJSpreamble
+
+\startJScode{Check_Answer} uses {Do_Check_Answer}
+  event.value = Do_Check_Answer(JS_S_1, JS_S_2) ; 
+\stopJScode
+
+\endinput
-- 
cgit v1.2.3