APT自动编程举例源程序(8)

158     GF/CC3, ON, CR;

159     PSIS/PL1

160     GF/CC3, TA, CC1

161     GF/CC1, PAST, CZ

162     JUMPTO/E

163     4F)  GF/CC2, TA, CC3

164     GF/CC3, TA, CC1

165     GF/CC1, PAST, CZ

166     E)   LOOPND

167     F/1000

168     COOLNT/OFF

169     GD/0, 0, 100

170     CUTCOM/OFF

171     GOTO/SP

172     ROTABL/DECR, (360.0/N1)

173     TOOLNO/1, SAME, (N1-l)

174     S/OFF

175     STOP

176         PRINT/3,ALL