diff options
Diffstat (limited to 'server/xml/macros/visus-egen_korr-1.0.xml')
| -rw-r--r-- | server/xml/macros/visus-egen_korr-1.0.xml | 131 |
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> |