From f3bbdcc6b27b1f584ccf16cbf595fb78577683a2 Mon Sep 17 00:00:00 2001 From: senator Date: Mon, 7 Sep 2009 09:05:41 +0000 Subject: Almost done with ref_tremaanederskontrol. Konklusion still not done though --- server/xml/macros/visus-1.0.xml | 34 +++++++++++++++++++++++----------- 1 file changed, 23 insertions(+), 11 deletions(-) (limited to 'server/xml/macros/visus-1.0.xml') diff --git a/server/xml/macros/visus-1.0.xml b/server/xml/macros/visus-1.0.xml index 963a234..0a7cdf0 100644 --- a/server/xml/macros/visus-1.0.xml +++ b/server/xml/macros/visus-1.0.xml @@ -26,20 +26,30 @@ then out = out .. 'Visus o.dxt. ' .. getValue('snellen.right') .. '\n' out = out .. 'ETDRS o.dxt. ' .. getValue('etdrs.right') .. '\n' - out = out .. 'Korr.: ' .. getValue('snellen.right.corr.basis') .. ' add ' - .. getValue('snellen.right.corr.sph') .. ' sf, ' - .. getValue('snellen.right.corr.cyl') .. ' sph ' - .. getValue('snellen.right.corr.axis') .. ' grader.\n' + if ( getValue('snellen.right.corr.basis') ~= 'Ingen' ) + then + out = out .. 'Korr.: ' .. getValue('snellen.right.corr.basis') .. ' add ' + else + out = out .. 'Korr.: add ' + end + out = out .. getValue('snellen.right.corr.sph') .. ' sf, ' + .. getValue('snellen.right.corr.cyl') .. ' sph ' + .. getValue('snellen.right.corr.axis') .. ' grader.\n' end if ( getValue('snellen.left.missing') == '' ) then out = out .. 'Visus o.sin. ' .. getValue('snellen.left') .. '\n' out = out .. 'ETDRS o.sin. ' .. getValue('etdrs.left') .. '\n' - out = out .. 'Korr.: ' .. getValue('snellen.left.corr.basis') .. ' add ' - .. getValue('snellen.left.corr.sph') .. ' sf, ' - .. getValue('snellen.left.corr.cyl') .. ' sph ' - .. getValue('snellen.left.corr.axis') .. ' grader.\n' + if ( getValue('snellen.left.corr.basis') ~= 'Ingen' ) + then + out = out .. 'Korr.: ' .. getValue('snellen.left.corr.basis') .. ' add ' + else + out = out .. 'Korr.: add ' + end + out = out .. getValue('snellen.left.corr.sph') .. ' sf, ' + .. getValue('snellen.left.corr.cyl') .. ' sph ' + .. getValue('snellen.left.corr.axis') .. ' grader.\n' end end return out @@ -180,6 +190,7 @@ + @@ -327,9 +338,9 @@