knew it.
no Jochen, Less is MORE ;\)

267

 Code:
function a($)
    $a=($=)*4,3,3,three,four,five,six,seven,eight,nine,ten,eleven,twelve,8,8,7,7,9,8,8,0,0,6,6,5,5,5,7,6,6
    if b>$
        $a=($a[$ mod (20-10*($>19))]^)+$a[20+$/10]
    else
        $a=$a[($^)-(($^instr($,y))>9)]
    endif
    if $=$a
        $a=""+$+" is magic."
    else
        $a="" + $ + " is " + $a + ". "+a($a)
endfunction
_________________________
!

download KiXnet