1 files changed, 64 insertions, 0 deletions
diff --git a/server/xml/macros/motilitet-1.0.xml b/server/xml/macros/motilitet-1.0.xml
new file mode 100644
index 0000000..229850e
--- /dev/null
+++ b/server/xml/macros/motilitet-1.0.xml
@@ -0,0 +1,64 @@
+<?xml version='1.0' encoding='UTF-8'?>
+<macro name="motilitet" version="1.0">
+  <resume language="lua">
+    out = ''
+
+    out = out .. 'Motilitetsundersøgelse viser ' .. getValue('motilitet')
+    
+    if( getValue('motilitet') == 'dobbeltsyn i yderstilling' or getValue('motilitet') == 'dobbeltsyn i midterstilling, men ikke fikseret øje')
+    then
+      out = out .. ' svarende til trækretningen for ' .. getValue('motilitet.traekretning')
+    end
+
+    out = out .. '.\n'
+
+    return out
+  </resume>
+  <queries>
+  </queries>
+  <maps>
+  </maps>
+  <scripts>
+    <script language="lua" name="motilitet">
+      if(value == 'dobbeltsyn i yderstilling' or value == 'dobbeltsyn i midterstilling, men ikke fikseret øje')
+      then
+        enable('motilitet_frame')
+      else
+        disable('motilitet_frame')
+      end
+
+      return true
+    </script>
+  </scripts>
+  <widgets caption="Motilitet" layout="vbox">
+
+    <frame layout="vbox">
+      <frame layout="hbox">
+	<label caption="Motilitetsundersøgelse viser:"/>
+	<combobox name="motilitet" value="" script="motilitet">
+	  <item caption="Intet dobbeltsyn" value="intet dobbeltsyn"/>
+	  <item caption="Dobbeltsyn i yderstilling" value="dobbeltsyn i yderstilling"/>
+	  <item caption="Dobbeltsyn i midterstilling, men ikke fikseret øje" value="dobbeltsyn i midterstilling, men ikke fikseret øje"/>
+	  <item caption="Fikseret øje" value="fikseret øje"/>
+	</combobox>
+      </frame>
+      <frame name="motilitet_frame" layout="hbox">
+	<label caption="Svarende til trækretningen for:"/>
+	<combobox name="motilitet.traekretning" value="">
+	  <item caption="m. rectus lateralis" value="m. rectus lateralis"/>
+	  <item caption="m. rectus medialis" value="m. rectus medialis"/>
+	  <item caption="m. rectus superior" value="m. rectus superior"/>
+	  <item caption="m. rectus inferior" value="m. rectus inferior"/>
+	  <item caption="m. obliquus superior" value="m. obliquus superior"/>
+	  <item caption="m. obliquus inferior" value="m. obliquus inferior"/>
+	</combobox>
+      </frame>
+    </frame>
+    
+    <!-- Knapper -->
+    <frame layout="hbox">
+      <spacer />
+      <button caption="Gem" action="commit"/>
+    </frame>
+  </widgets>
+</macro>