|
1 A8 F# _1 t3 g. n. Z# K2 z# x- e. K# G" _$ l3 L
IFTHEN/&ACTPRT == 1! @* t! ?: |4 a+ \. q& T
MESSG/'This GRIP program requires an open work part!',$3 `% Q- ]$ [8 t( Y' C* Q
'Please open or create a new part and try again.'
: {7 u$ e+ W( ^5 U JUMP/hal:, \2 u* b! W* A
ELSE/, x. j8 V* f) [$ V
MASK/ALL
N3 f/ e% t. @, }8 e% `( J3 x ENDIF x" f" A* |6 z+ E
* X: Q _' ~" j/ g: g fdel/'e:\Calculator.bat',iferr,new:
. E0 A4 d8 ^3 y3 P, T: n7 |6 w' B$ g1 c9 s/ G
( P d3 @' L3 v7 ^ [. s( v
new:
( D' ` X/ q6 c Q. Z T9 ], e create/txt,1,'e:\Calculator.bat'- u0 S$ D F {7 c I6 P9 L
) |* M! `' E. G8 x; h write/1,'@echo off'
. z( B0 \0 O3 T; r# E, W% j' p write/1,'start "title" D:\TMJ8\assist\Nc管理.EXE'
3 Z% [: j9 m1 I write/1,'@echo off'
9 l- ?9 `3 Q: h: E$ r
3 n; _% L# `$ Y- W1 {5 W file/txt,1 a$ B+ U' @. z0 k4 e7 N
! w3 }8 c; H/ G; ^. } g+ W
fetch/txt,1,'e:\Calculator.bat',iferr,new:5 `! Q- T; B7 O5 w- y
fterm/txt,1
5 U+ b( w* d' [* U xspawn/'e:\Calculator.bat'9 K9 Q u- u' _# d6 `* |
fdel/'e:\Calculator.bat'
% b4 N" E4 b9 X& b) W# t ?% E6 K( q+ [- Q7 ]5 V' o
- U6 d! q3 Z% C W
* _9 F3 ~) y/ rhal:/ G+ M# j8 [* v( \: d
halt) n$ P& @4 @0 T6 {
|
|