From e51af58093988ea86070e6b6cd8f3c65d835c085 Mon Sep 17 00:00:00 2001 From: senator Date: Tue, 13 Oct 2009 11:00:49 +0000 Subject: all visus macros fixed. all files containing tremaaneder moved to efterkontrol. several other smaller fixes applied to various. --- server/xml/macros/visus-autoref-1.0.xml | 739 ++++++++++++++++++-------------- 1 file changed, 423 insertions(+), 316 deletions(-) (limited to 'server/xml/macros/visus-autoref-1.0.xml') diff --git a/server/xml/macros/visus-autoref-1.0.xml b/server/xml/macros/visus-autoref-1.0.xml index 7949497..603fbcc 100644 --- a/server/xml/macros/visus-autoref-1.0.xml +++ b/server/xml/macros/visus-autoref-1.0.xml @@ -1,27 +1,87 @@ + out = '' if ( getValue('visus.autoref.missing.right') == '' ) then - out = out .. 'Visus, højre øje:\n' - out = out .. 'Snellen: ' .. getValue('visus.autoref.snellen.right') .. '\n' - out = out .. 'ETDRS: ' .. getValue('visus.autoref.etdrs.right') .. '\n' - out = out .. 'Korr.: ' - .. getValue('visus.autoref.korr.sf.right') .. ' sf, ' - .. getValue('visus.autoref.korr.cyl.right') .. ' sph ' - .. getValue('visus.autoref.korr.grader.right') .. ' grader.\n' + out = out .. 'Visus, autoref, o.dxt' + if ( getValue('visus.autoref.kontrast.right') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.kontrast.right') .. ' kontrast' + end + if ( getValue('visus.autoref.st_hul.right') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.st_hul.right') + end + out = out .. ':\n' + if ( getValue('visus.autoref.snellen.right') ~= '' ) + then + out = out .. 'Snellen: ' .. getValue('visus.autoref.snellen.right') .. '\n' + end + if ( getValue('visus.autoref.etdrs.right') ~= '' ) + then + out = out .. 'ETDRS: ' .. getValue('visus.autoref.etdrs.right') .. '\n' + end + out = out .. 'Korr.: ' .. getValue('visus.autoref.korr.sf.right') .. ' sf' + if ( getValue('visus.autoref.korr.cyl.right') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.korr.cyl.right') .. ' cyl' + end + if ( getValue('visus.autoref.korr.grader.right') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.korr.grader.right') .. ' grader' + end + out = out .. '\n' + + if ( getValue('visus.autoref.missing.left') == '' ) + then + out = out .. '\n' + end end if ( getValue('visus.autoref.missing.left') == '' ) then - out = out .. 'Visus, venstre øje:\n' - out = out .. 'Snellen: ' .. getValue('visus.autoref.snellen.left') .. '\n' - out = out .. 'ETDRS: ' .. getValue('visus.autoref.etdrs.left') .. '\n' - out = out .. 'Korr.: ' - .. getValue('visus.autoref.korr.sf.left') .. ' sf, ' - .. getValue('visus.autoref.korr.cyl.left') .. ' sph ' - .. getValue('visus.autoref.korr.grader.left') .. ' grader.\n' + out = out .. 'Visus, autoref, o.sin' + if ( getValue('visus.autoref.kontrast.left') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.kontrast.left') .. ' kontrast' + end + if ( getValue('visus.autoref.st_hul.left') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.st_hul.left') + end + out = out .. ':\n' + if ( getValue('visus.autoref.snellen.left') ~= '' ) + then + out = out .. 'Snellen: ' .. getValue('visus.autoref.snellen.left') .. '\n' + end + if ( getValue('visus.autoref.etdrs.left') ~= '' ) + then + out = out .. 'ETDRS: ' .. getValue('visus.autoref.etdrs.left') .. '\n' + end + out = out .. 'Korr.: ' .. getValue('visus.autoref.korr.sf.left') .. ' sf' + if ( getValue('visus.autoref.korr.cyl.left') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.korr.cyl.left') .. ' cyl' + end + if ( getValue('visus.autoref.korr.grader.left') ~= '' ) + then + out = out .. ', ' .. getValue('visus.autoref.korr.grader.left') .. ' grader' + end + out = out .. '\n' + + if ( getValue('visus.autoref.missing.left') == '' ) + then + out = out .. '\n' + end end return out @@ -90,7 +150,7 @@ - + + + @@ -141,7 +234,7 @@ return true - @@ -153,159 +246,166 @@ map="missing_eye_right_map" truevalue="mangler" falsevalue="" value=""/> - - - -