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-egen_korr-1.0.xml | 729 +++++++++++++++++------------- 1 file changed, 414 insertions(+), 315 deletions(-) (limited to 'server/xml/macros/visus-egen_korr-1.0.xml') diff --git a/server/xml/macros/visus-egen_korr-1.0.xml b/server/xml/macros/visus-egen_korr-1.0.xml index ad346f5..bbdd5ca 100644 --- a/server/xml/macros/visus-egen_korr-1.0.xml +++ b/server/xml/macros/visus-egen_korr-1.0.xml @@ -4,24 +4,76 @@ out = '' if ( getValue('visus.egen_korr.missing.right') == '' ) then - out = out .. 'Visus, højre øje:\n' - out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.right') .. '\n' - out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.right') .. '\n' - out = out .. 'Basis: ' - .. getValue('visus.egen_korr.basis.sf.right') .. ' sf, ' - .. getValue('visus.egen_korr.basis.cyl.right') .. ' sph ' - .. getValue('visus.egen_korr.basis.grader.right') .. ' grader.\n' + 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 + if ( getValue('visus.egen_korr.st_hul.right') ~= '' ) + then + out = out .. ', ' .. getValue('visus.egen_korr.st_hul.right') + end + out = out .. ':\n' + if ( getValue('visus.egen_korr.snellen.right') ~= '' ) + then + out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.right') .. '\n' + end + if ( getValue('visus.egen_korr.etdrs.right') ~= '' ) + then + out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.right') .. '\n' + end + out = out .. 'Korr.: ' .. 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' + end + if ( getValue('visus.egen_korr.korr.grader.right') ~= '' ) + then + out = out .. ', ' .. getValue('visus.egen_korr.korr.grader.right') .. ' grader' + end + out = out .. '\n' + + if ( getValue('visus.egen_korr.missing.left') == '' ) + then + out = out .. '\n' + end end if ( getValue('visus.egen_korr.missing.left') == '' ) then - out = out .. 'Visus, venstre øje:\n' - out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.left') .. '\n' - out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.left') .. '\n' - out = out .. 'Basis: ' - .. getValue('visus.egen_korr.basis.sf.left') .. ' sf, ' - .. getValue('visus.egen_korr.basis.cyl.left') .. ' sph ' - .. getValue('visus.egen_korr.basis.grader.left') .. ' grader.\n' + 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 + if ( getValue('visus.egen_korr.st_hul.left') ~= '' ) + then + out = out .. ', ' .. getValue('visus.egen_korr.st_hul.left') + end + out = out .. ':\n' + if ( getValue('visus.egen_korr.snellen.left') ~= '' ) + then + out = out .. 'Snellen: ' .. getValue('visus.egen_korr.snellen.left') .. '\n' + end + if ( getValue('visus.egen_korr.etdrs.left') ~= '' ) + then + out = out .. 'ETDRS: ' .. getValue('visus.egen_korr.etdrs.left') .. '\n' + end + out = out .. 'Korr.: ' .. 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' + end + if ( getValue('visus.egen_korr.korr.grader.left') ~= '' ) + then + out = out .. ', ' .. getValue('visus.egen_korr.korr.grader.left') .. ' grader' + end + out = out .. '\n' + + if ( getValue('visus.egen_korr.missing.left') == '' ) + then + out = out .. '\n' + end end return out @@ -90,7 +142,7 @@ - + + + @@ -153,171 +238,178 @@ map="missing_eye_right_map" truevalue="mangler" falsevalue="" value=""/> - - - -