★★称重量的外挂★★（已上传原代码）

XIAObo595219317

ENTITY/CYL(1000)
NUMBER/VAL(42),MIDU
. m) {7 w4 ]( G) [STRING/stt(200),wjwz(200)
( `" y' w% L& e8 E) rMIDU=7.85 $$ 密度
string/part_name(132),ERP(132)
string/date1(132),date2(132),date3(132),date4(132)
ioi=0

2 F; K$ m7 F) j         $$程序加密，用时间限制使用权限$$

" ]+ c: f) |+ I2 K: M    date1=substr(date,1,2)
    date2=substr(date,5,2)
    date3=substr(date,9,2)
9 f* c5 h  M  v7 Z: O6 r    date4=date3+date1+date2
        $$PRINT/DATE,DATE1,DATE2,DATE3,DATE4
    $$messg/date4
, |2 O+ j$ I3 m2 [    if/valf(date4)>20140416,jump/messg:
& S! F& H% D7 j9 \. b1 O
& k1 h, Z1 t9 A* v9 kstart:

) ]" R8 e- s; t) b! Q0 w; ~L10:
  v- O# d0 h3 `; Y* s4 }    param/'肖波提示:请输入密度...',$
          '密度(g/mm")',MIDU,resp
          JUMP/L10:,END:,,resp
' j! @$ S0 R' F# k9 \8 }
L20:
6 R4 h/ L% c' B' w1 V3 e% O" a- wMASK/70     
+ H! s6 v5 N+ O- m0 ^IDENT/'肖波提示:请选择实体...',CYL,cnt,nm,RESP
% u, S* t2 L+ X1 v8 sJUMP/L20:,END:,,resp
# R) e4 x& C! B: k* C1 B1 \! h$$注意UG单位是（毫米/英寸）   GCM  表示厘米/克   
ANLSIS/SOLID,CYL(1..nm),GCM,VAL
$$ 质量=密度*体积  
ZL_g=MIDU*VAL(2)   $$ 质量(克)
ZL_kg=ZL_g/1000    $$ 质量(千克)
- w+ X% \! N3 nZL_t=ZL_g/1000000  $$ 质量(吨)
ioi=ioi+1

9 g5 W* }8 {4 ]9 @* v7 C* `
6 Y' v6 [2 o2 {# S: Cl30:
4 o. J5 B5 E9 u. I; l! ~* x( Q           jump/start:
: M7 d  n5 m7 ?  @
5 B! ^4 S  i+ d, N3 I+ smessg:
            messg/'程序使用中有任何问题',$
6 U* K+ t' \5 J/ {, p$ ^- [& X& C                  '你的使用时间已过期,请联系肖波 QQ:595219317'

$ z0 U4 i& J& K/ ptrm:
: P; c  h1 h" W* h' ^" l
1 ~/ R2 r9 {" s. n: ^+ nHALT

望··

DDDDDDDDDDDDDD

cbgjx5

有这么神奇的外挂！