summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorsenator <senator>2009-11-16 10:25:55 +0000
committersenator <senator>2009-11-16 10:25:55 +0000
commit7a94c424fda908c93331e378e209866b3e2d7e77 (patch)
tree5fcfbe55e5a380a605e68596986fcb56cb499c9b
parentb8a6eb573c1992d41393cec87d1ac8d6fb3a6972 (diff)
Latest changes, mostly to visus macros
-rw-r--r--server/xml/macros/keratometri-1.0.xml14
-rw-r--r--server/xml/macros/ref_90d_linse-1.0.xml4
-rw-r--r--server/xml/macros/ref_efterkontrol-konklusion-1.0.xml5
-rw-r--r--server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml31
-rw-r--r--server/xml/macros/ref_subjektivt-1.0.xml2
-rw-r--r--server/xml/macros/visus-egen_korr-1.0.xml131
-rw-r--r--server/xml/macros/visus-manifest_refraktion-1.0.xml133
-rw-r--r--server/xml/macros/visus-template-1.0.xml134
-rw-r--r--server/xml/macros/visus-uden_korr-1.0.xml119
9 files changed, 314 insertions, 259 deletions
diff --git a/server/xml/macros/keratometri-1.0.xml b/server/xml/macros/keratometri-1.0.xml
index 76874b5..9c7a611 100644
--- a/server/xml/macros/keratometri-1.0.xml
+++ b/server/xml/macros/keratometri-1.0.xml
@@ -7,7 +7,7 @@
end
function tostr(value)
- value = string.format('%.2f', value)
+ value = string.format('%.02f', value)
value = string.gsub(value, '\\.', ',')
return value
end
@@ -29,15 +29,15 @@
rx2 = rx1 - 90
end
- rd1 = tonumber(string.format('%.2f', 337.5 / rr1))
- rd2 = tonumber(string.format('%.2f', 337.5 / rr2))
+ rd1 = tonumber(string.format('%.02f', 337.5 / rr1))
+ rd2 = tonumber(string.format('%.02f', 337.5 / rr2))
if ( rd1 &lt; rd2 )
then
ry1 = rd1 - rd2
ry2 = rx1
else
- ry1 = rd2 - rd1
+ ry1 = rd2 - rd1
ry2 = rx2
end
@@ -68,15 +68,15 @@
lx2 = lx1 - 90
end
- ld1 = tonumber(string.format('%.2f', 337.5 / lr1))
- ld2 = tonumber(string.format('%.2f', 337.5 / lr2))
+ ld1 = tonumber(string.format('%.02f', 337.5 / lr1))
+ ld2 = tonumber(string.format('%.02f', 337.5 / lr2))
if ( ld1 &lt; ld2 )
then
ly1 = ld1 - ld2
ly2 = lx1
else
- ly1 = ld2 - ld1
+ ly1 = ld2 - ld1
ly2 = lx2
end
diff --git a/server/xml/macros/ref_90d_linse-1.0.xml b/server/xml/macros/ref_90d_linse-1.0.xml
index 6f94213..d6a3f09 100644
--- a/server/xml/macros/ref_90d_linse-1.0.xml
+++ b/server/xml/macros/ref_90d_linse-1.0.xml
@@ -4,7 +4,7 @@
out = ''
if ( getValue('90d_linse.right.missing') == '' )
then
- out = out .. 'Oftalmoskopi, højre øje:\n'
+ out = out .. 'Oftalmoskopi, o.dxt:\n'
out = out .. getValue('90d_linse.right.indblik') .. ' indblik.\n'
out = out .. 'Papil: ' .. getValue('90d_linse.right.papil') .. '\n'
out = out .. 'Makula: ' .. getValue('90d_linse.right.makula') .. '\n'
@@ -26,7 +26,7 @@
then
out = out .. '\n'
end
- out = out .. 'Oftalmoskopi, højre øje:\n'
+ out = out .. 'Oftalmoskopi, o.sin:\n'
out = out .. getValue('90d_linse.left.indblik') .. ' indblik.\n'
out = out .. 'Papil: ' .. getValue('90d_linse.left.papil') .. '\n'
out = out .. 'Makula: ' .. getValue('90d_linse.left.makula') .. '\n'
diff --git a/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml b/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml
index 651e949..b1c5903 100644
--- a/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml
+++ b/server/xml/macros/ref_efterkontrol-konklusion-1.0.xml
@@ -6,10 +6,11 @@
out = out .. getValue('ref_efterkontrol.konklusion.konklusion')
if ( getValue('ref_efterkontrol.konklusion.konklusion') == 'Behandlingsmålet er ikke nået. Der er indikation for og ønske om rebehandling.' )
then
- out = out .. ' Der aftales ' .. getValue('ref_efterkontrol.konklusion.rebehandling') .. ' på ' .. getValue('ref_efterkontrol.konklusion.oeje') .. '.\n'
+ out = out .. ' Der aftales ' .. getValue('ref_efterkontrol.konklusion.rebehandling') .. ' på ' .. getValue('ref_efterkontrol.konklusion.oeje') .. '.'
end
if (getValue('ref_efterkontrol.konklusion.yderligere_kommentarer') ~= '' )
then
+ out = out .. '\n'
out = out .. getValue('ref_efterkontrol.konklusion.yderligere_kommentarer')
end
return out
@@ -52,7 +53,7 @@
<label caption="Konklusion:"/>
<altcombobox name="ref_efterkontrol.konklusion.konklusion" layout="vbox" value='na' script="konklusion">
<item caption="Ikke udfyldt" value="na"/>
- <item caption="Tilfredsstillende resultat. Patienten afsluttes" value="Tilfredsstillende resultat. Patienten afsluttes"/>
+ <item caption="Tilfredsstillende resultat. Patienten afsluttes." value="Tilfredsstillende resultat. Patienten afsluttes."/>
<item caption="Ikke indikation eller mulighed for yderligere behandling. Patienten afsluttes." value="Ikke indikation eller mulighed for yderligere behandling. Patienten afsluttes."/>
<item caption="Behandlingsmålet er ikke nået. Der er indikation for og ønske om rebehandling. Der aftales: (udfyld herunder)" value="Behandlingsmålet er ikke nået. Der er indikation for og ønske om rebehandling."/>
<altitem caption="Andet" value="andet" layout="hbox" innerwidget="ref_efterkontrol.konklusion.andet">
diff --git a/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml b/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml
index f923db3..3fbfa10 100644
--- a/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml
+++ b/server/xml/macros/ref_forunders-informeret_samtykke-1.0.xml
@@ -3,7 +3,7 @@
<resume language="lua">
out = ''
out = out .. 'Informeret samtykke:\n'
- out = out .. 'Patienten er informeret detaljeret om indgrebet, det forventede resultat samt risici og komplikationer i overensstemmelse med afdelingens retningslinier og giver samtykke til behandling. Patienten er indforstået med den brillestyrke som forventes med operationen, nemlig ' .. getValue('ref_forunders.informeret_samtykke.dioptrier') .. ' dioptrier og ' .. getValue('ref_forunders.informeret_samtykke.cylindre') .. ' cylindre. Patienten er informeret om at der vil være rest-nærsynethed efter operationen.'
+ out = out .. 'Patienten er informeret detaljeret om indgrebet, det forventede resultat samt risici og komplikationer i overensstemmelse med afdelingens retningslinier og giver samtykke til behandling. Patienten er indforstået med at der er risiko for at operationen ikke giver den fulde effekt. Patienten er informeret om at der vil være rest-nærsynethed efter operationen.'
if ( getValue('ref_forunders.informeret_samtykke.yderligere_kommentarer') ~= '' )
then
@@ -29,35 +29,8 @@
<frame layout="vbox">
<label caption="Patienten er informeret detaljeret om indgrebet, det forventede resultat samt risici og komplikationer i"/>
<label caption="overensstemmelse med afdelingens retningslinier og giver samtykke til behandling. Patienten er "/>
- <label caption="indforstået med den brillestyrke som forventes med operationen (anfør herunder). Patienten er"/>
+ <label caption="indforstået med at der er risiko for at operationen ikke giver den fulde effekt. Patienten er"/>
<label caption="informeret om at der vil være rest-nærsynethed efter operationen."/>
- <frame layout="hbox">
- <label caption="Dioptrier:"/>
- <combobox name="ref_forunders.informeret_samtykke.dioptrier" value="">
- <item caption="-4" value="-4"/>
- <item caption="-3" value="-3"/>
- <item caption="-2" value="-2"/>
- <item caption="-1" value="-1"/>
- <item caption="0" value="0"/>
- <item caption="1" value="1"/>
- <item caption="2" value="2"/>
- <item caption="3" value="3"/>
- <item caption="4" value="4"/>
- </combobox>
- <label caption="Cylindre:"/>
- <combobox name="ref_forunders.informeret_samtykke.cylindre" value="">
- <item caption="-4" value="-4"/>
- <item caption="-3" value="-3"/>
- <item caption="-2" value="-2"/>
- <item caption="-1" value="-1"/>
- <item caption="0" value="0"/>
- <item caption="1" value="1"/>
- <item caption="2" value="2"/>
- <item caption="3" value="3"/>
- <item caption="4" value="4"/>
- </combobox>
- <spacer/>
- </frame>
<checkbox name="ref_forunders.informeret_samtykke.informeret_samtykke" caption="Godkend ovenstående" truevalue="true" falsevalue="" script="samtykke"/>
</frame>
<label/>
diff --git a/server/xml/macros/ref_subjektivt-1.0.xml b/server/xml/macros/ref_subjektivt-1.0.xml
index f0d615c..db5116f 100644
--- a/server/xml/macros/ref_subjektivt-1.0.xml
+++ b/server/xml/macros/ref_subjektivt-1.0.xml
@@ -21,7 +21,7 @@ Syn: ${ref.subjektivt.syn}
<frame layout="vbox">
<altcombobox name="ref.subjektivt.smerter" layout="vbox" value="Ikke udfyldt">
<item caption="Ikke udfyldt" value="Ikke udfyldt"/>
- <item caption="Ingen smerter" value="Ingen smerter"/>
+ <item caption="Ingen" value="Ingen"/>
<item caption="Lette smerter" value="Lette smerter"/>
<item caption="Mange smerter" value="Mange smerter"/>
<altitem caption="Andet" value="andet" layout="hbox" innerwidget="ref.subjektivt.smerter.andet">
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>
diff --git a/server/xml/macros/visus-manifest_refraktion-1.0.xml b/server/xml/macros/visus-manifest_refraktion-1.0.xml
index a2c16fc..520c4ce 100644
--- a/server/xml/macros/visus-manifest_refraktion-1.0.xml
+++ b/server/xml/macros/visus-manifest_refraktion-1.0.xml
@@ -1,24 +1,46 @@
<?xml version='1.0' encoding='UTF-8'?>
<macro name="visus-manifest_refraktion" 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.manifest_refraktion.missing.right') == '' or getValue('visus.manifest_refraktion.missing.left') == '' or getValue('visus.manifest_refraktion.ou') ~= '' )
+ then
+ out = out .. 'Visus optimal refraktion:\n'
+ end
+
if ( getValue('visus.manifest_refraktion.missing.right') == '' )
then
- out = out .. 'Visus, manifest refraktion, o.dxt'
- if ( getValue('visus.manifest_refraktion.kontrast.right') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.right') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.dxt: '
if ( getValue('visus.manifest_refraktion.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.snellen.right') .. '\n'
+ out = out .. getValue('visus.manifest_refraktion.snellen.right')
+ if ( getValue('visus.manifest_refraktion.etdrs.right') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.manifest_refraktion.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.etdrs.right') .. '\n'
+ if ( getValue('visus.manifest_refraktion.snellen.right') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.manifest_refraktion.etdrs.right') .. ' ETDRS, '
+ end
+ if ( getValue('visus.manifest_refraktion.kontrast.right') ~= '' )
+ then
+ out = out .. getValue('visus.manifest_refraktion.kontrast.right') .. ' kontrast, '
end
- out = out .. 'Korr.: ' .. getValue('visus.manifest_refraktion.korr.sf.right') .. ' sf'
+
+ out = out .. 'cc ' .. getValue('visus.manifest_refraktion.korr.sf.right') .. ' sf'
if ( getValue('visus.manifest_refraktion.korr.cyl.right') ~= '' )
then
out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.cyl.right') .. ' cyl'
@@ -27,50 +49,51 @@
then
out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.grader.right') .. ' grader'
end
- out = out .. '\n'
+
if ( getValue('visus.manifest_refraktion.st_hul.right') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.manifest_refraktion.st_hul.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.st_hul.snellen.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.snellen.right')
end
if ( getValue('visus.manifest_refraktion.st_hul.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.right') .. ' ETDRS'
end
+ out = out .. ' st.h.'
end
- if ( getValue('visus.manifest_refraktion.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
-
-
-
-
if ( getValue('visus.manifest_refraktion.missing.left') == '' )
then
- out = out .. 'Visus, manifest refraktion, o.sin'
- if ( getValue('visus.manifest_refraktion.kontrast.left') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.left') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.sin: '
if ( getValue('visus.manifest_refraktion.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.snellen.left') .. '\n'
+ out = out .. getValue('visus.manifest_refraktion.snellen.left')
+ if ( getValue('visus.manifest_refraktion.etdrs.left') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.manifest_refraktion.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.etdrs.left') .. '\n'
+ if ( getValue('visus.manifest_refraktion.snellen.left') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.manifest_refraktion.etdrs.left') .. ' ETDRS, '
end
- out = out .. 'Korr.: ' .. getValue('visus.manifest_refraktion.korr.sf.left') .. ' sf'
+ if ( getValue('visus.manifest_refraktion.kontrast.left') ~= '' )
+ then
+ out = out .. getValue('visus.manifest_refraktion.kontrast.left') .. ' kontrast, '
+ end
+
+ out = out .. 'cc ' .. getValue('visus.manifest_refraktion.korr.sf.left') .. ' sf'
if ( getValue('visus.manifest_refraktion.korr.cyl.left') ~= '' )
then
out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.cyl.left') .. ' cyl'
@@ -79,23 +102,20 @@
then
out = out .. ', ' .. getValue('visus.manifest_refraktion.korr.grader.left') .. ' grader'
end
- out = out .. '\n'
+
if ( getValue('visus.manifest_refraktion.st_hul.left') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.manifest_refraktion.st_hul.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.st_hul.snellen.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.snellen.left')
end
if ( getValue('visus.manifest_refraktion.st_hul.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.manifest_refraktion.st_hul.etdrs.left') .. ' ETDRS'
end
+ out = out .. ' st.h.\n'
end
- if ( getValue('visus.manifest_refraktion.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
@@ -103,25 +123,24 @@
-
-
-
-
if ( getValue('visus.manifest_refraktion.ou') ~= '' )
then
- out = out .. 'Visus, manifest refraktion, o.u'
- if ( getValue('visus.manifest_refraktion.kontrast.ou') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.ou') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.u: '
if ( getValue('visus.manifest_refraktion.snellen.ou') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.manifest_refraktion.snellen.ou') .. '\n'
+ out = out .. getValue('visus.manifest_refraktion.snellen.ou')
end
if ( getValue('visus.manifest_refraktion.etdrs.ou') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.manifest_refraktion.etdrs.ou') .. '\n'
+ if ( getValue('visus.manifest_refraktion.snellen.ou') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.manifest_refraktion.etdrs.ou') .. ' ETDRS'
+ end
+ if ( getValue('visus.manifest_refraktion.kontrast.ou') ~= '' )
+ then
+ out = out .. ', ' .. getValue('visus.manifest_refraktion.kontrast.ou') .. ' kontrast'
end
end
@@ -371,18 +390,18 @@
return true
</script>
</scripts>
- <widgets caption="Visus - manifest refraktion"
+ <widgets caption="Visus - optimal refraktion"
layout="vbox">
<frame layout="hbox">
<!-- 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.manifest_refraktion.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.manifest_refraktion.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.manifest_refraktion.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.manifest_refraktion.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.manifest_refraktion.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.manifest_refraktion.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.manifest_refraktion.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.manifest_refraktion.st_hul.left" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.left"/>
</frame>
diff --git a/server/xml/macros/visus-template-1.0.xml b/server/xml/macros/visus-template-1.0.xml
index 57fb8d5..7818e5a 100644
--- a/server/xml/macros/visus-template-1.0.xml
+++ b/server/xml/macros/visus-template-1.0.xml
@@ -4,30 +4,43 @@
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 for begge øjne + ou i resumeet (navn1->navn2)
+ 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.template.missing.right') == '' or getValue('visus.template.missing.left') == '' or getValue('visus.template.ou') ~= '' )
+ then
+ out = out .. 'Visus template:\n'
+ end
+
if ( getValue('visus.template.missing.right') == '' )
then
- out = out .. 'Visus, template, o.dxt'
- if ( getValue('visus.template.kontrast.right') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.template.kontrast.right') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.dxt: '
if ( getValue('visus.template.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.template.snellen.right') .. '\n'
+ out = out .. getValue('visus.template.snellen.right')
+ if ( getValue('visus.template.etdrs.right') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.template.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.template.etdrs.right') .. '\n'
+ if ( getValue('visus.template.snellen.right') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.template.etdrs.right') .. ' ETDRS, '
+ end
+ if ( getValue('visus.template.kontrast.right') ~= '' )
+ then
+ out = out .. getValue('visus.template.kontrast.right') .. ' kontrast, '
end
- out = out .. 'Korr.: ' .. getValue('visus.template.korr.sf.right') .. ' sf'
+
+ out = out .. 'cc ' .. getValue('visus.template.korr.sf.right') .. ' sf'
if ( getValue('visus.template.korr.cyl.right') ~= '' )
then
out = out .. ', ' .. getValue('visus.template.korr.cyl.right') .. ' cyl'
@@ -36,9 +49,8 @@
then
out = out .. ', ' .. getValue('visus.template.korr.grader.right') .. ' grader'
end
- out = out .. '\n'
- out = out .. 'Add korr.: ' .. getValue('visus.template.add.sf.right') .. ' sf'
+ out = out .. ', add ' .. getValue('visus.template.add.sf.right') .. ' sf'
if ( getValue('visus.template.add.cyl.right') ~= '' )
then
out = out .. ', ' .. getValue('visus.template.add.cyl.right') .. ' cyl'
@@ -47,50 +59,51 @@
then
out = out .. ', ' .. getValue('visus.template.add.grader.right') .. ' grader'
end
- out = out .. '\n'
+
if ( getValue('visus.template.st_hul.right') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.template.st_hul.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.template.st_hul.snellen.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.template.st_hul.snellen.right')
end
if ( getValue('visus.template.st_hul.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.template.st_hul.etdrs.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.template.st_hul.etdrs.right') .. ' ETDRS'
end
+ out = out .. ' st.h.'
end
- if ( getValue('visus.template.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
-
-
-
-
if ( getValue('visus.template.missing.left') == '' )
then
- out = out .. 'Visus, template, o.sin'
- if ( getValue('visus.template.kontrast.left') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.template.kontrast.left') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.sin: '
if ( getValue('visus.template.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.template.snellen.left') .. '\n'
+ out = out .. getValue('visus.template.snellen.left')
+ if ( getValue('visus.template.etdrs.left') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.template.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.template.etdrs.left') .. '\n'
+ if ( getValue('visus.template.snellen.left') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.template.etdrs.left') .. ' ETDRS, '
end
- out = out .. 'Korr.: ' .. getValue('visus.template.korr.sf.left') .. ' sf'
+ if ( getValue('visus.template.kontrast.left') ~= '' )
+ then
+ out = out .. getValue('visus.template.kontrast.left') .. ' kontrast, '
+ end
+
+ out = out .. 'cc ' .. getValue('visus.template.korr.sf.left') .. ' sf'
if ( getValue('visus.template.korr.cyl.left') ~= '' )
then
out = out .. ', ' .. getValue('visus.template.korr.cyl.left') .. ' cyl'
@@ -99,9 +112,8 @@
then
out = out .. ', ' .. getValue('visus.template.korr.grader.left') .. ' grader'
end
- out = out .. '\n'
- out = out .. 'Add korr.: ' .. getValue('visus.template.add.sf.left') .. ' sf'
+ out = out .. ', add ' .. getValue('visus.template.add.sf.left') .. ' sf'
if ( getValue('visus.template.add.cyl.left') ~= '' )
then
out = out .. ', ' .. getValue('visus.template.add.cyl.left') .. ' cyl'
@@ -110,23 +122,20 @@
then
out = out .. ', ' .. getValue('visus.template.add.grader.left') .. ' grader'
end
- out = out .. '\n'
+
if ( getValue('visus.template.st_hul.left') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.template.st_hul.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.template.st_hul.snellen.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.template.st_hul.snellen.left')
end
if ( getValue('visus.template.st_hul.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.template.st_hul.etdrs.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.template.st_hul.etdrs.left') .. ' ETDRS'
end
+ out = out .. ' st.h.\n'
end
- if ( getValue('visus.template.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
@@ -134,25 +143,24 @@
-
-
-
-
if ( getValue('visus.template.ou') ~= '' )
then
- out = out .. 'Visus, template, o.u'
- if ( getValue('visus.template.kontrast.ou') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.template.kontrast.ou') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.u: '
if ( getValue('visus.template.snellen.ou') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.template.snellen.ou') .. '\n'
+ out = out .. getValue('visus.template.snellen.ou')
end
if ( getValue('visus.template.etdrs.ou') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.template.etdrs.ou') .. '\n'
+ if ( getValue('visus.template.snellen.ou') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.template.etdrs.ou') .. ' ETDRS'
+ end
+ if ( getValue('visus.template.kontrast.ou') ~= '' )
+ then
+ out = out .. ', ' .. getValue('visus.template.kontrast.ou') .. ' kontrast'
end
end
@@ -409,11 +417,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.template.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.template.kontrast.right" value="">
@@ -567,6 +575,7 @@
</frame>
</frame>
<frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
<frame layout="hbox">
<frame layout="vbox">
<label/>
@@ -585,6 +594,8 @@
<lineedit name="visus.template.korr.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
</frame>
</frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
+<!-- start fjern herfra hvis add felterne ikke skal bruges -->
<frame layout="hbox">
<frame layout="vbox">
<label caption=""/>
@@ -603,6 +614,7 @@
<lineedit name="visus.template.add.grader.right" regexp="|[\d]+" script="lt359gt0" value=""/>
</frame>
</frame>
+<!-- slut fjern hertil hvis add felterne ikke skal bruges -->
<frame layout="hbox">
<checkbox name="visus.template.st_hul.right" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.right"/>
</frame>
@@ -754,11 +766,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.template.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.template.kontrast.left" value="">
@@ -912,6 +924,7 @@
</frame>
</frame>
<frame layout="vbox">
+<!-- start fjern herfra hvis korr felterne ikke skal bruges -->
<frame layout="hbox">
<frame layout="vbox">
<label/>
@@ -930,6 +943,8 @@
<lineedit name="visus.template.korr.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
</frame>
</frame>
+<!-- slut fjern hertil hvis korr felterne ikke skal bruges -->
+<!-- start fjern herfra hvis add felterne ikke skal bruges -->
<frame layout="hbox">
<frame layout="vbox">
<label caption=""/>
@@ -948,6 +963,7 @@
<lineedit name="visus.template.add.grader.left" regexp="|[\d]+" script="lt359gt0" value=""/>
</frame>
</frame>
+<!-- slut fjern hertil hvis add felterne ikke skal bruges -->
<frame layout="hbox">
<checkbox name="visus.template.st_hul.left" caption="Yderligere måling med st. hul (udfyld herunder)" truevalue="true" falsevalue="" script="st_hul_check.left"/>
</frame>
diff --git a/server/xml/macros/visus-uden_korr-1.0.xml b/server/xml/macros/visus-uden_korr-1.0.xml
index 9d450e6..dc087de 100644
--- a/server/xml/macros/visus-uden_korr-1.0.xml
+++ b/server/xml/macros/visus-uden_korr-1.0.xml
@@ -1,81 +1,101 @@
<?xml version='1.0' encoding='UTF-8'?>
<macro name="visus-uden_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 for begge øjne + ou 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.uden_korr.missing.right') == '' or getValue('visus.uden_korr.missing.left') == '' or getValue('visus.uden_korr.ou') ~= '' )
+ then
+ out = out .. 'Visus uden korrektion:\n'
+ end
+
if ( getValue('visus.uden_korr.missing.right') == '' )
then
- out = out .. 'Visus, uden korr., o.dxt'
- if ( getValue('visus.uden_korr.kontrast.right') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.uden_korr.kontrast.right') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.dxt: '
if ( getValue('visus.uden_korr.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.right') .. '\n'
+ out = out .. getValue('visus.uden_korr.snellen.right')
+ if ( getValue('visus.uden_korr.etdrs.right') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.uden_korr.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.right') .. '\n'
+ if ( getValue('visus.uden_korr.snellen.right') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.uden_korr.etdrs.right') .. ' ETDRS, '
+ end
+ if ( getValue('visus.uden_korr.kontrast.right') ~= '' )
+ then
+ out = out .. getValue('visus.uden_korr.kontrast.right') .. ' kontrast'
end
+
if ( getValue('visus.uden_korr.st_hul.right') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.uden_korr.st_hul.snellen.right') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.uden_korr.st_hul.snellen.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.uden_korr.st_hul.snellen.right')
end
if ( getValue('visus.uden_korr.st_hul.etdrs.right') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.st_hul.etdrs.right') .. '\n'
+ out = out .. ', ' .. getValue('visus.uden_korr.st_hul.etdrs.right') .. ' ETDRS'
end
+ out = out .. ' st.h.'
end
- if ( getValue('visus.uden_korr.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
-
-
-
-
if ( getValue('visus.uden_korr.missing.left') == '' )
then
- out = out .. 'Visus, uden korr., o.sin'
- if ( getValue('visus.uden_korr.kontrast.left') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.uden_korr.kontrast.left') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.sin: '
if ( getValue('visus.uden_korr.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.left') .. '\n'
+ out = out .. getValue('visus.uden_korr.snellen.left')
+ if ( getValue('visus.uden_korr.etdrs.left') == '' )
+ then
+ out = out .. ', '
+ end
end
if ( getValue('visus.uden_korr.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.left') .. '\n'
+ if ( getValue('visus.uden_korr.snellen.left') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.uden_korr.etdrs.left') .. ' ETDRS, '
+ end
+ if ( getValue('visus.uden_korr.kontrast.left') ~= '' )
+ then
+ out = out .. getValue('visus.uden_korr.kontrast.left') .. ' kontrast'
end
+
if ( getValue('visus.uden_korr.st_hul.left') ~= '' )
then
- out = out .. 'Måling foretaget med st. hul:\n'
if ( getValue('visus.uden_korr.st_hul.snellen.left') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.uden_korr.st_hul.snellen.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.uden_korr.st_hul.snellen.left')
end
if ( getValue('visus.uden_korr.st_hul.etdrs.left') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.st_hul.etdrs.left') .. '\n'
+ out = out .. ', ' .. getValue('visus.uden_korr.st_hul.etdrs.left') .. ' ETDRS'
end
+ out = out .. ' st.h.'
end
- if ( getValue('visus.uden_korr.missing.left') == '' )
- then
- out = out .. '\n'
- end
+ out = out .. '\n'
end
@@ -83,25 +103,24 @@
-
-
-
-
if ( getValue('visus.uden_korr.ou') ~= '' )
then
- out = out .. 'Visus, uden korr., o.u'
- if ( getValue('visus.uden_korr.kontrast.ou') ~= '' )
- then
- out = out .. ', ' .. getValue('visus.uden_korr.kontrast.ou') .. ' kontrast'
- end
- out = out .. ':\n'
+ out = out .. 'o.u: '
if ( getValue('visus.uden_korr.snellen.ou') ~= '' )
then
- out = out .. 'Snellen: ' .. getValue('visus.uden_korr.snellen.ou') .. '\n'
+ out = out .. getValue('visus.uden_korr.snellen.ou')
end
if ( getValue('visus.uden_korr.etdrs.ou') ~= '' )
then
- out = out .. 'ETDRS: ' .. getValue('visus.uden_korr.etdrs.ou') .. '\n'
+ if ( getValue('visus.uden_korr.snellen.ou') ~= '' )
+ then
+ out = out .. ', '
+ end
+ out = out .. getValue('visus.uden_korr.etdrs.ou') .. ' ETDRS'
+ end
+ if ( getValue('visus.uden_korr.kontrast.ou') ~= '' )
+ then
+ out = out .. ', ' .. getValue('visus.uden_korr.kontrast.ou') .. ' kontrast'
end
end
@@ -358,11 +377,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.uden_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.uden_korr.kontrast.right" value="">
@@ -667,11 +686,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.uden_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.uden_korr.kontrast.left" value="">