diff options
Diffstat (limited to 'server/xml/macros/visus-uden_korr-1.0.xml')
| -rw-r--r-- | server/xml/macros/visus-uden_korr-1.0.xml | 119 |
1 files changed, 69 insertions, 50 deletions
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=""> |