UG后处理加密器正式提供试用 2019-02-23更新

夜故事

神奇的加密 谢谢版主

chenjia2222

谢谢啦，学习学习

廖小皮

謝謝分享..........

dushiyu

好用吗 下载试试

919616

谢谢分享-----

王天俊

这么多人下载了，唯独只有我厚着脸皮说不会用。有没得大师出个教程分享一下啊！ 感激不尽

王天俊

328612167 发表于 2019-5-20 20:40
) |' o. n! U7 p6 _* W0 x5 R本加密器加密的后处理默认支持UG软件版本如下：
根据软件的版本选择合适的解密dll.，如有任何问题，请本帖 ...

能不能出个使用教程啊？    不会用啊！

王天俊

我把要加密的代码替换成生成出来的set cam_post_dir [MOM_ask_env_var UGII_CAM_POST_DIR]
" l! D# j' E# t; C" @2 E& ?8 gset this_post_dir "[file dirname [info script]]"
set encrypted_post_file "[file rootname [info script]]ab_crypt.txt"
! H5 i( i% z* c6 N- Mif { ![file exists $encrypted_post_file] } {
   set __msg "ERROR in[info script] :"$encrypted_post_file" is not found."
   MOM_abort $__msg
0 M1 U6 |: M/ _7 b1 N! Z}

0 f8 E, I* Y1 r########################################################################
) M- U& F# \, a* S, h set x64 0 ; set path "" ;
, J* t! r3 C. X+ W set root_dir [MOM_ask_env_var UGII_ROOT_DIR] ;
* U, {+ }7 L3 T5 W5 n. r. Q2 \0 U set os_64 ${root_dir}ugtcl.dll
3 H. S7 X, s8 S# U: b8 [( C7 v if { [file exists $os_64] } {
. D- B- j' o& g3 y# a6 A, i, d& m   set sz [ file size $os_64 ] ; set sz [ expr double($sz) ]
. X7 l8 ~' ]5 z+ I& B) U3 g   if {$sz>600000.} { set x64 1 ; } else { set x64 0 ; }
/ r9 M: ]+ ^/ A2 v  G } else { set x64 1 ; }
if {$x64} { set encload_dll ${path}encload_x64.dll ; } else { set encload_dll ${path}encload_x32.dll ; }
if { ![file exists ${cam_post_dir}$encload_dll] } {
   set __msg "ERROR in[info script] :Shared library "Encload" is not found in ${cam_post_dir}."
   MOM_abort $__msg
' {, o8 e( ?- \) o' u( Q }
  
1 j7 ?; c% }- i$ |3 i9 R########################################################################
& k, `  t5 S! S6 |) {$ N4 ecatch {
9 \5 g/ r" z* x8 H- n3 a6 u   MOM_run_user_function ${cam_post_dir}$encload_dll ufusr
   encload [file nativename $encrypted_post_file]
}
: s  B- }+ x( `. Y2 l& A 但是不成功！    还请大佬教一下

helonggui

不错，不错

1234quite

下来看看，好不好用