summaryrefslogtreecommitdiff
path: root/server/xml/macros/visus-egen_korr-1.0.xml
diff options
context:
space:
mode:
Diffstat (limited to 'server/xml/macros/visus-egen_korr-1.0.xml')
-rw-r--r--server/xml/macros/visus-egen_korr-1.0.xml131
1 files changed, 77 insertions, 54 deletions
diff --git a/server/xml/macros/visus-egen_korr-1.0.xml b/server/xml/macros/visus-egen_korr-1.0.xml
index 5256b07..f59f795 100644
--- a/server/xml/macros/visus-egen_korr-1.0.xml
+++ b/server/xml/macros/visus-egen_korr-1.0.xml
@@ -1,24 +1,46 @@
<?xml version='1.0' encoding='UTF-8'?>
<macro name="visus-egen_korr" version="1.0">
+<!--
+ Info ved oprettelse af ny visus macro hvor denne kopieres.
+ query-replace på .navn1. til .navn2.
+ skift macro navnet under macro tagget helt i toppen
+ skift overskrift i resumeet (navn1->navn2)
+ skift GUI overskrift for macroen under widgets afsnittet
+ fjern resume felter der ikke skal bruges
+ fjern tilsvarende GUI felter der ikke skal bruges
+ -->
<resume language="lua">
out = ''
+ if ( getValue('visus.egen_korr.missing.right') == '' or getValue('visus.egen_korr.missing.left') == '' or getValue('visus.egen_korr.ou') ~= '' )
+ then
+ out = out .. 'Visus egen korrektion:\n'
+ end
+
if ( getValue('visus.egen_korr.missing.right') == '' )
then
- out = out .. 'Visus, egen korr., o.dxt'
- if ( getValue('visus.egen_korr.kontrast.right') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.egen_korr.kontrast.right') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.dxt: '
if ( getValue('visus.egen_korr.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.right') .. '\n'
+ out = out .. getValue('visus.egen_korr.snellen.right')
+ if ( getValue('visus.egen_korr.etdrs.right') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.egen_korr.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.right') .. '\n'
+ if ( getValue('visus.egen_korr.snellen.right') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.egen_korr.etdrs.right') .. ' ETDRS, '
+ end
+ if ( getValue('visus.egen_korr.kontrast.right') ~= '' )
+ then
+ out = out .. getValue('visus.egen_korr.kontrast.right') .. ' kontrast, '
end
- out = out .. 'Korr.: ' .. getValue('visus.egen_korr.korr.sf.right') .. ' sf'
+
+ out = out .. 'cc ' .. getValue('visus.egen_korr.korr.sf.right') .. ' sf'
if ( getValue('visus.egen_korr.korr.cyl.right') ~= '' )
then
out = out .. ', ' .. getValue('visus.egen_korr.korr.cyl.right') .. ' cyl'
@@ -27,50 +49,51 @@
then
out = out .. ', ' .. getValue('visus.egen_korr.korr.grader.right') .. ' grader'
end
- out = out .. '\n'
+
if ( getValue('visus.egen_korr.st_hul.right') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.egen_korr.st_hul.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.egen_korr.st_hul.snellen.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.egen_korr.st_hul.snellen.right')
end
if ( getValue('visus.egen_korr.st_hul.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.st_hul.etdrs.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.egen_korr.st_hul.etdrs.right') .. ' ETDRS'
end
+ out = out .. ' st.h.'
end
- if ( getValue('visus.egen_korr.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
-
-
-
-
if ( getValue('visus.egen_korr.missing.left') == '' )
then
- out = out .. 'Visus, egen korr., o.sin'
- if ( getValue('visus.egen_korr.kontrast.left') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.egen_korr.kontrast.left') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.sin: '
if ( getValue('visus.egen_korr.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.left') .. '\n'
+ out = out .. getValue('visus.egen_korr.snellen.left')
+ if ( getValue('visus.egen_korr.etdrs.left') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.egen_korr.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.left') .. '\n'
+ if ( getValue('visus.egen_korr.snellen.left') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.egen_korr.etdrs.left') .. ' ETDRS, '
end
- out = out .. 'Korr.: ' .. getValue('visus.egen_korr.korr.sf.left') .. ' sf'
+ if ( getValue('visus.egen_korr.kontrast.left') ~= '' )
+ then
+ out = out .. getValue('visus.egen_korr.kontrast.left') .. ' kontrast, '
+ end
+
+ out = out .. 'cc ' .. getValue('visus.egen_korr.korr.sf.left') .. ' sf'
if ( getValue('visus.egen_korr.korr.cyl.left') ~= '' )
then
out = out .. ', ' .. getValue('visus.egen_korr.korr.cyl.left') .. ' cyl'
@@ -79,23 +102,20 @@
then
out = out .. ', ' .. getValue('visus.egen_korr.korr.grader.left') .. ' grader'
end
- out = out .. '\n'
+
if ( getValue('visus.egen_korr.st_hul.left') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.egen_korr.st_hul.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.egen_korr.st_hul.snellen.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.egen_korr.st_hul.snellen.left')
end
if ( getValue('visus.egen_korr.st_hul.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.st_hul.etdrs.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.egen_korr.st_hul.etdrs.left') .. ' ETDRS'
end
+ out = out .. ' st.h.\n'
end
- if ( getValue('visus.egen_korr.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
@@ -103,25 +123,24 @@
-
-
-
-
if ( getValue('visus.egen_korr.ou') ~= '' )
then
- out = out .. 'Visus, egen korr., o.u'
- if ( getValue('visus.egen_korr.kontrast.ou') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.egen_korr.kontrast.ou') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.u: '
if ( getValue('visus.egen_korr.snellen.ou') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.ou') .. '\n'
+ out = out .. getValue('visus.egen_korr.snellen.ou')
end
if ( getValue('visus.egen_korr.etdrs.ou') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.ou') .. '\n'
+ if ( getValue('visus.egen_korr.snellen.ou') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.egen_korr.etdrs.ou') .. ' ETDRS'
+ end
+ if ( getValue('visus.egen_korr.kontrast.ou') ~= '' )
+ then
+ out = out .. ', ' .. getValue('visus.egen_korr.kontrast.ou') .. ' kontrast'
end
end
@@ -378,11 +397,11 @@
<!-- Højre øje -->
<frame layout="vbox">
- <checkbox caption="Der er ikke målt på højre øje"
+ <checkbox caption="Der er ikke målt på o.dxt"
name="visus.egen_korr.missing.right" script="right_eye"
map="missing_eye_right_map"
truevalue="mangler" falsevalue="" value=""/>
- <frame name="right_eye_frame" caption="Højre øje" layout="vbox">
+ <frame name="right_eye_frame" caption="o.dxt" layout="vbox">
<frame layout="hbox">
<label caption="Kontrast:"/>
<combobox name="visus.egen_korr.kontrast.right" value="">
@@ -536,6 +555,7 @@
</frame>
</frame>
<frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
<frame layout="hbox">
<frame layout="vbox">
<label/>
@@ -554,6 +574,7 @@
<lineedit name="visus.egen_korr.korr.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
</frame>
</frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
<frame layout="hbox">
<checkbox name="visus.egen_korr.st_hul.right" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.right"/>
</frame>
@@ -705,11 +726,11 @@
<!-- Venstre øje -->
<frame layout="vbox">
- <checkbox caption="Der er ikke målt på venstre øje"
+ <checkbox caption="Der er ikke målt på o.sin øje"
name="visus.egen_korr.missing.left" script="left_eye"
map="missing_eye_left_map"
truevalue="mangler" falsevalue="" value=""/>
- <frame name="left_eye_frame" caption="Venstre øje" layout="vbox">
+ <frame name="left_eye_frame" caption="o.sin øje" layout="vbox">
<frame layout="hbox">
<label caption="Kontrast:"/>
<combobox name="visus.egen_korr.kontrast.left" value="">
@@ -863,6 +884,7 @@
</frame>
</frame>
<frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
<frame layout="hbox">
<frame layout="vbox">
<label/>
@@ -881,6 +903,7 @@
<lineedit name="visus.egen_korr.korr.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
</frame>
</frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
<frame layout="hbox">
<checkbox name="visus.egen_korr.st_hul.left" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.left"/>
</frame>