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

136     INDIRV/V2

137     COOLNT/ON

138     GO/PAST, CC2, TO, PL1

139     PSIS/PL1

140     LOOPST

141     IF(N)1Q, 1Q, 2Q

142     2Q)  TL, GR/CC2, PAST, 02

143     JUMPTO/3Q

144     1Q)  TR, GL/CC2, PAST, C2

145     3Q IF(R0-D1)2F, 2F, 3F

146     3F GF/CC2, PSTAN, TOR1

147     PSIS/TOR1

148     GF/CC2, TA, CC3

149     GF/CC3, TA, CC1

150     GF/CC1, PSTAN, PL1

151     PSIS/PL1

152     GF/CC1, PAST, CZ

153     JUMPTO/E

154     2F) IF(R0-D2)4F, 4F, 5F

155     5F) GF/CC2, ON, CR

156     PSIS/TOR1

157     GF/CC2, TA, CC3