line input"##"s$:for i=1to len(s$)c$=mid$(s$,i,3):?chr$(35-3*(c$>"#  "or"   "=c$));next