264
 Code:
function a($)
    $a=4*($=),3,3,three,four,five,six,seven,eight,nine,ten,eleven,twelve,8,8,7,7,9,8,8
    if b>$
        $a=($a[right($,1+($<20))]^)+substr(t66555766,left($,~),1)
    else
        $a=$a[($^)-((instr($,y)^$)>9)]
    endif
    if $=$a
        $a=""+$+" is magic."
    else
        $a=""+$+" is "+$a+". "+a($a)
endfunction
_________________________
!

download KiXnet