out = ''
if ( getValue('snellen.mangler.odxt') == '' or getValue('snellen.mangler.osin') == '' )
then
out = out .. 'Objektivt:\n'
if ( getValue('snellen.mangler.odxt') == '' )
then
out = out .. 'Visus o.dxt. ' .. getValue('snellen.odxt') .. '\n'
out = out .. 'ETDRS o.dxt. ' .. getValue('etdrs.odxt') .. '\n'
if ( getValue('snellen.korr.basis.odxt') ~= 'Ingen' )
then
out = out .. 'Korr.: ' .. getValue('snellen.korr.basis.odxt') .. ' add '
else
out = out .. 'Korr.: add '
end
out = out .. getValue('snellen.korr.sf.odxt') .. ' sf, '
.. getValue('snellen.korr.cyl.odxt') .. '.sf '
.. getValue('snellen.korr.grader.odxt') .. ' grader.\n'
end
if ( getValue('snellen.mangler.osin') == '' )
then
out = out .. 'Visus o.sin. ' .. getValue('snellen.osin') .. '\n'
out = out .. 'ETDRS o.sin. ' .. getValue('etdrs.osin') .. '\n'
if ( getValue('snellen.korr.basis.osin') ~= 'Ingen' )
then
out = out .. 'Korr.: ' .. getValue('snellen.korr.basis.osin') .. ' add '
else
out = out .. 'Korr.: add '
end
out = out .. getValue('snellen.korr.sf.osin') .. ' sf, '
.. getValue('snellen.korr.cyl.osin') .. '.sf '
.. getValue('snellen.korr.grader.osin') .. ' grader.\n'
end
end
return out