m@main=0#' ';n#'-'|n>0=print(div n 5)>>m;n#'*'=(n+1)#' ';n#_=getChar>>=(n#)