diff options
| author | senator <senator> | 2009-08-17 06:53:14 +0000 |
|---|---|---|
| committer | senator <senator> | 2009-08-17 06:53:14 +0000 |
| commit | 28350af1374c07d1dfdee727d9d6d37219446d4f (patch) | |
| tree | 6a592230157e6cb63ddf3fb61dfaf3ff4a011b87 /server/xml/macros/keratometri-1.0.xml | |
| parent | 27d3a44257b60d5a3538f5f70cc644bc1715d8cf (diff) | |
Et eller andet
Diffstat (limited to 'server/xml/macros/keratometri-1.0.xml')
| -rw-r--r-- | server/xml/macros/keratometri-1.0.xml | 26 |
1 files changed, 3 insertions, 23 deletions
diff --git a/server/xml/macros/keratometri-1.0.xml b/server/xml/macros/keratometri-1.0.xml index 2b54164..e568d0e 100644 --- a/server/xml/macros/keratometri-1.0.xml +++ b/server/xml/macros/keratometri-1.0.xml @@ -1,33 +1,13 @@ <?xml version='1.0' encoding='UTF-8'?> -<!-- - 20081203: Bent Bisballe Nyeng - Feltnavnene ændret så de giver mening. - --> -<!-- - 20090108: Bent Bisballe Nyeng - Højre/venstre byttet om. - --> -<!-- - 20090202: Bent Bisballe Nyeng - 'missing eye' tilføjet. - --> <macro name="keratometri" version="1.0"> <resume language="lua"> out = '' if ( getValue('keratometri.right.missing') == '' ) then - out = out .. 'Keratometri, højre øje:\n' .. - 'Radius 1: ' .. getValue('keratometri.right.r1') .. - 'Radius 2: ' .. getValue('keratometri.right.r2') .. - 'Cylinder: ' .. getValue('keratometri.right.x1') + if ( getValue('keratometri.right.x1') > 0 and getValue('keratometri.right.x1') < 90 ) + end - - if ( getValue('keratometri.left.missing') == '' ) - then - out = out .. 'Keratometri, venstre øje:\n' .. - 'Radius 1: ' .. getValue('keratometri.left.r1') .. - 'Radius 2: ' .. getValue('keratometri.left.r2') .. - 'Cylinder: ' .. getValue('keratometri.left.x1') + out = out .. 'Keratometri, højre øje:\n' .. 'Radius 1: ' .. getValue('keratometri.right.r1') .. ' mm (' .. string.format('%f', 337.50 / getValue('keratometri.right.r1')) .. ' D) i ' .. getValue('keratometri.right.x1') .. ' grader.\n\nRadius 2: ' .. getValue('keratometri.right.r2') .. ' mm (' .. string.format('%f', 337.50 / getValue('keratometri.right.r2')) .. ' D) i ' .. getValue('keratometri.right.x2')' end return out |