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

XIAObo595219317

ENTITY/CYL(1000)
NUMBER/VAL(42),MIDU
STRING/stt(200),wjwz(200)
: ^5 ~" Q5 r3 y3 s0 ?MIDU=7.85 $$ 密度
string/part_name(132),ERP(132)
string/date1(132),date2(132),date3(132),date4(132)
& w" N' E8 ?6 o% \4 iioi=0

- }: \$ v! c( \$ b         $$程序加密，用时间限制使用权限$$
  d. q8 e& h. w5 I; q$ J7 J; I
0 {( x3 i; ?3 n' \% p; s    date1=substr(date,1,2)
/ T; `! ^( N1 N3 P, }0 \3 V    date2=substr(date,5,2)
    date3=substr(date,9,2)
    date4=date3+date1+date2
        $$PRINT/DATE,DATE1,DATE2,DATE3,DATE4
    $$messg/date4
    if/valf(date4)>20140416,jump/messg:

$ S5 j: D5 a7 l  ?6 J4 Estart:

( w) l1 T$ h( H/ i1 }L10:
    param/'肖波提示:请输入密度...',$
# O; F* [! L$ j# F' @! r8 P1 @          '密度(g/mm")',MIDU,resp
          JUMP/L10:,END:,,resp

# }4 V, g# }( Y7 O0 |) ?% I! G. l( `L20:
MASK/70     
IDENT/'肖波提示:请选择实体...',CYL,cnt,nm,RESP
JUMP/L20:,END:,,resp
$$注意UG单位是（毫米/英寸）   GCM  表示厘米/克   
2 Y$ E! ^  m3 @. @" d$ `ANLSIS/SOLID,CYL(1..nm),GCM,VAL
( o; c* a% |; ^. b. Q$ o) ]6 K+ b$$ 质量=密度*体积  
ZL_g=MIDU*VAL(2)   $$ 质量(克)
3 ~. Z1 W& @/ N0 Y# DZL_kg=ZL_g/1000    $$ 质量(千克)
' d* @9 A5 n* k$ K- [ZL_t=ZL_g/1000000  $$ 质量(吨)
2 T8 B, |! F, A% v5 U, m7 Zioi=ioi+1

6 B3 o8 x9 e' P# Z; N+ f! b5 c
l30:
           jump/start:
" g# X( V9 L2 q. s, d/ d& }
messg:
$ l6 H9 e2 t6 {) M            messg/'程序使用中有任何问题',$
$ N2 A# j0 V1 E7 I/ M8 @                  '你的使用时间已过期,请联系肖波 QQ:595219317'
% z0 N: z4 J! W. C: m8 j6 f
4 E0 R) p/ V* `$ L! t' Strm:

HALT
  |& x9 D. N! y/ E4 _

望··

DDDDDDDDDDDDDD

cbgjx5

有这么神奇的外挂！