[###############################################################################################] [$ sub Kurslink $][$endsub$] [###############################################################################################] [$ sub cell $] [$if !$rec -> {id} $] [- Neulink -] [$ elsif $fdat{bereich_id} eq 'f' || !$kurs -> {-gebucht} || $xkurs $] [$if $xkurs $]  [- Kurslink -] {-gebucht}?"/images/leer_rot.gif":"/images/leer_gelb.gif") +]"> [$else$]  [- Kurslink -] [$endif$] [$ elsif $fdat{bereich_id} eq 'b' $] [- $n = 2 -] [$ while ($n--) $] [- $banzahl = 1 ; $sanzahl = 5 ; -] [$ if $banzahl > 0 $] [$endif$] [$endwhile$]
[- Kurslink -][- Kurslink (($sanzahl || 0) . "/$banzahl") -] [+ $brec -> {bereichkurz} +] 
[$ endif $] [$endsub $] [###############################################################################################] [- $rec = { id => 1 } ; $kurs = { -gebucht => 1 } ; $brec = { id => 2, bereichkurz => 'bu' } ; $fdat{bereich_id} = 'b' ; $bgcol = '#1' ; $gifext = 'xxx' ; $l = 2 ; -] [$ while ($l-- > 0) $] [- cell -] [$endwhile$]