1037 AD$="." : FOR M=1 TO NDD : AD$=AD$+"#" : NEXT M