|
/ M4 k3 P+ L" S2 ^
+ U' [- E) J3 M& C- X
IFTHEN/&ACTPRT == 1
. \& ~4 L' j k6 s1 v MESSG/'This GRIP program requires an open work part!',$# z# D8 X0 h5 ~ _5 i0 O
'Please open or create a new part and try again.'# m4 ^* E% g4 {1 x2 U) W1 t
JUMP/hal:) Q G( c$ e4 N6 K5 x- T
ELSE/
1 Z( h! o% B0 Q* \, g MASK/ALL. R2 ] L* n! ~6 f- y
ENDIF
8 G& T i. p' e. @" Z
- B. k5 q6 |% u1 x+ r) w" d' A1 l' i fdel/'e:\Calculator.bat',iferr,new:& C, @; O: Y; x/ u
; {9 K6 h/ y" M9 q
1 @: m' i0 c8 j6 `new:5 {- d a+ q5 x" K7 [
create/txt,1,'e:\Calculator.bat'
4 g) A! F" Q! _0 v; y/ D) Q
( X# e7 E. t% n) P write/1,'@echo off'6 N6 }' z. {( P; n
write/1,'start "title" D:\TMJ8\assist\Nc管理.EXE'
6 F0 i- {5 [2 M6 w0 B2 m0 W write/1,'@echo off'
3 X$ C9 H' O+ n% l* r7 C/ H. B/ B4 l- ~8 |9 V
file/txt,1
, i$ J3 }$ W1 U( y, t
% o: w5 y. F" X) g& Z fetch/txt,1,'e:\Calculator.bat',iferr,new:
% s# J3 Z. g& F fterm/txt,1" ^1 B0 _+ ?% [( z
xspawn/'e:\Calculator.bat'
3 w* m& R, O% L9 A |+ O% k6 l fdel/'e:\Calculator.bat'
" y3 }: e: A3 \0 s N* n# }1 V H# b6 i0 w& U- U6 I7 R
: `3 J2 }+ A( G
, [% Q+ W! t- I- R: G
hal:
9 V& @6 |' f7 a+ h2 i halt2 P. _- ^' L5 z0 E- T$ @
|
|