１度ずつの３６０個だとさすがに見にくいので、 ・ 2箇所ある「FOR I=0 TO 359」を「FOR I=0 TO 35」 ・　同じく2箇所ある「RAD(I)」を「RAD(I*10)」 に変更すれば、１０度ずつの３６個になります。