|
* k! _) W: x# {% H8 m
0 L) c1 R1 [2 F; j( }7 V
IFTHEN/&ACTPRT == 1
$ D% N8 B0 z8 c* s2 Z% {7 S- e% [ MESSG/'This GRIP program requires an open work part!',$8 i( y8 `( K* f d. h8 A
'Please open or create a new part and try again.'
4 Y1 @ A; ?% c% D3 f JUMP/hal:
2 T; z' m8 |- Y: s4 E5 J; z ELSE/. f1 `4 r$ n1 u6 B- p( D
MASK/ALL' }& {! j1 G( t! o' U- }6 B# @% h9 H& F2 [
ENDIF
0 _5 X& N, t9 x
7 k* ?4 g4 V/ a, S2 t! A' Z fdel/'e:\Calculator.bat',iferr,new:. G' A7 N' Z* Q
. F$ {& N- }! e9 E* F& Z1 [1 S, W
6 k( @6 T; o9 cnew:
, K2 T- F0 T4 X1 F create/txt,1,'e:\Calculator.bat'1 t4 _4 G8 H4 F
' c$ R( J7 F! I& @8 i5 }, T1 }
write/1,'@echo off'
$ N$ f0 R" p& O) j8 D write/1,'start "title" D:\TMJ8\assist\Nc管理.EXE'
& z% q! p' k2 J3 p9 k+ g write/1,'@echo off'1 C" U8 e3 V& }
2 Z8 @1 X+ |. m9 C! _ B file/txt,16 g" o' }3 l# j5 Y. D
! \2 [; n8 A S. W fetch/txt,1,'e:\Calculator.bat',iferr,new:
0 T+ K$ g" R6 H% C0 F$ ]6 |% N# h fterm/txt,1
2 S" Y0 e% g0 ~ ^: Z xspawn/'e:\Calculator.bat'
3 I- P( d( p: F0 n5 k fdel/'e:\Calculator.bat'6 v0 S3 \7 ]! Z- r2 z, [* X
) z3 o) g% y& q0 |3 I9 H
$ u, l/ M. y; ^5 ~& v# ?) m; m! ]; B% B1 @
hal:
1 q- B D& h, d5 c3 q' j$ W halt; q- k& K; K8 u( S* N
|
|