define(f,`ifelse($1,0,,$2 `f(decr($1),eval($2+$2*$3/100),$3)')')f(translit(include(/dev/fd/0),:,`,'))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page