\START92\ \COMMENT=Program file dated 10/18/98, 14:10 \NAME=mbst \FILE=MBST.92P () Prgm Local i setMode("graph","polar") 0\->\\theta\min 360\->\\theta\max 3.2\->\\theta\step \(-)\128\->\xmin 128\->\xmax 32\->\xscl \(-)\128\->\ymin 128\->\ymax 32\->\yscl ClrDraw For i,20,1,\(-)\1 PxlCrcl 51,119,i PxlCrcl 51,119,i,0 EndFor For i,0,119,5 PxlLine 51,119,51,119+i PxlLine 51,119,51,119-i EndFor For i,0,128,5 Circle 0,0,i EndFor For i,0,128,5 Circle 0,0,i,0 EndFor DrawPol \theta\ For i,0,120,10 PxlCrcl 51,119,i EndFor EndPrgm \STOP92\