read a||cd /
$[(a*1134+35)/50-a/25*11+(a%100*a%3<a/60)+a/200]
echo $[_/20].$[_%20/2]$[_%2*5]
. *