明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1097|回复: 9

[提问] 源码里面的好多代码都是乱码

[复制链接]
发表于 2023-5-11 19:52:35 | 显示全部楼层 |阅读模式
问一下大家,源码里好多符号都是?号或者#号,是什么原因呢?



(DEFUN C:BBq (/            #RE2   ??O7          ??A6         ?~#8        ?~#9   ?~@0   ??I2
             ?~@1   ?~@3   ?~@4          ??I1         P1        P2     ?}N2   ?}S2
             ?~@8   ?~{3   ?#*5
            )
  (DEFUN #RJ2 () (??U6))
  (DEFUN #RF7 ()
    (DEFUN ?~}2        (??I1 / ?~}3 ??62 ?}:7 ?~}4 ?~}5 ?~}6 P1 P2 P3)
      (DEFUN #RF7 ()
        (setq P1 (LIST (?}G0 'MIN (??[0 'CAR ?~}5))
                       (?}G0 'MIN (??[0 'CADR ?~}5))
                 )
        )
        (setq P2 (LIST (?}G0 'MAX (??[0 'CAR ?~}6))
                       (?}G0 'MAX (??[0 'CADR ?~}6))
                 )
        )
        (setq ?}:7 (DISTANCE P1 P2))
        (setq P3 (??U1 P1 (??S4 P1 P2) (??$2 ?}:7 2)))
      )
      (DEFUN #RF5 () (setq ?~}3 (??I4 ??I1)) (setq ??62 ?@Z8))
      (DEFUN #RF6 ()
        (REPEAT        ?~}3
          (setq ?~}9 (#RF1 (??I6 ??I1 (setq ??62 (??70 ??62)))))
          (setq ?~}5 (??I5 (CAR ?~}9) ?~}5))
          (setq ?~}6 (??I5 (CADR ?~}9) ?~}6))
        )
      )
      (#RF5)
      (#RF6)
      (#RF7)
      P3
    )
    '?~}2
  )
  (DEFUN #RE8 () (DEFUN #RE9 () (* ??H5 (GETVAR ??H6))) '#RE9)
  (DEFUN #RE6 () (??J7))
  (DEFUN #RE3 () (??F0 #RE4))
  (DEFUN #RE5 () (setq ??I1 (SSGET)))
  (DEFUN #RE7 () (SETVAR ??28 0))
  (DEFUN #RF3 ()
    (DEFUN #RF1        (?#*5 / ?}}6 P1 P2)
      (DEFUN #RF2 () (setq ?}}6 (??59 ?#*5)))
      (DEFUN #RF3 ()
        (if
          (?}$3 (?}$4 (?}$1 'vla-GetBoundingBox (LIST ?}}6 'P1 'P2))))
           (PROGN (setq P1 (vlax-safearray->list P1))
                  (setq P2 (vlax-safearray->list P2))
           )
        )
      )
      (#RF2)
      (#RF3)
      (LIST P1 P2)
    )
    '#RF1
  )
  (DEFUN #RF8 ()
    (if        (??:6 ??I1 nil)
      (PROGN (setq ?~#8 0)
             (while (and ??I1)
               (setq ?}N2 (?~}2 ??I1))
               (setq ??O7 (??_1 (??]8 (GETVAR ?}J0) 2 8) 10 ?}E6))
               (setq ??A6 (??_1 (??]8 (GETVAR ??N3) 2 8) 10 ?}E6))
               (setq ?}S2 (??@0 ?}F9 ??O7 ??A6 ?}J1))
               (command ?~*4)
               (command ?}S2)
               (command ?}N2)
               (command ??I1)
               (command ??S8)
               (command ?~*5)
               (command ?}S2)
               (command ?}N2)
               (command ??S8)
               (command ??S8)
               (command ??S8)
               (setq ?~#8 (??70 ?~#8))
               (??Z1 (??@0 #RF9 (??N5 ?~#8) ?~*8))
               (setq ??I1 (SSGET))
             )
      )
      (PROGN
        (??F0 ?~~3)
        (setq ??I1 (SSGET '((0 . "*POLYLINE"))))
        (setq #RE2 (#RE9))
        (setq ??I2 0)
        (command ?@V9)
        (command ?#{4)
        (while (and (AND ??I1 (< ??I2 (??I4 ??I1))))
          (setq ?#*5 (??I6 ??I1 ??I2))
          (setq ?~{3 (#RF1 ?#*5))
          (setq P1 (CAR ?~{3))
          (setq P2 (CADR ?~{3))
          (setq ?}N2 (??U1 P1 (??S4 P1 P2) (??$2 (DISTANCE P1 P2) 2)))
          (setq ?}S2 (??@0 ?}F9 (??]8 (GETVAR ?}J0) 2 ?@T1) ?}J1))
          (setq ?~@8 (SSGET ?~~8 P1 P2))
          (VL-CMDF #RJ0 ??R9)
          (if (?~~9 ?}B3 ?}S2)
            (PROGN (command ?~*0)
                   (command ?~*1)
                   (command ?~*2)
                   (command ?~*3)
                   (command ??S8)
            )
          )
          (command ?~*4)
          (command ?}S2)
          (command ?}N2)
          (command ?~@8)
          (command ??S8)
          (command ?~*5)
          (command ?}S2)
          (command ?}N2)
          (command ??S8)
          (command ??S8)
          (command ??S8)
          (setq ??I2 (??70 ??I2))
        )
        (command ?@V9)
        (command ?#~6)
        (??Z1 (??@0 ?~*7
                    (??N5 ??I2)
                    ?~*8
                    #RJ1
                    (??]8 (- (* ??H5 (GETVAR ??H6)) #RE2) 2 ??^3)
                    #MW1
              )
        )
      )
    )
  )
  (DEFUN #RJ3 () (??F0 #RJ4))
  (#RE3)
  (#RE5)
  (#RE6)
  (#RE7)
  (#RE8)
  (#RF3)
  (#RF7)
  (#RF8)
  (#RJ2)
  (#RJ3)
  (??Z1)
)
(vl-ACAD-defun 'C:BB)
'C:BB

发表于 2023-5-12 08:46:53 | 显示全部楼层
反编译可耻、可反编译后发帖询问更可耻....
回复 支持 1 反对 0

使用道具 举报

发表于 2023-5-11 21:41:51 | 显示全部楼层
一看又是破解的源码
发表于 2023-5-11 21:42:32 | 显示全部楼层
这是反编译出来的代码 经过加密的 就这样 不是乱码 而且也是可以运行的
 楼主| 发表于 2023-5-11 22:15:44 来自手机 | 显示全部楼层
的确是反编译的,想知道怎么能解密出来,加载运行不了
 楼主| 发表于 2023-5-11 22:32:07 来自手机 | 显示全部楼层
飞雪神光 发表于 2023-5-11 21:42
这是反编译出来的代码 经过加密的 就这样 不是乱码 而且也是可以运行的

请问用什么方法可以解密出来吗?
发表于 2023-5-12 07:40:30 | 显示全部楼层
本帖最后由 飞雪神光 于 2023-5-12 07:42 编辑

这已经是解密的了要想还原成正常代码 就得手动了 一个一个替换 用不了是缺少函数库和加密的全局变量
 楼主| 发表于 2023-5-12 08:33:04 来自手机 | 显示全部楼层
飞雪神光 发表于 2023-5-12 07:40
这已经是解密的了要想还原成正常代码 就得手动了 一个一个替换 用不了是缺少函数库和加密的全局变量

谢谢楼主的指点
发表于 2023-5-12 10:35:02 | 显示全部楼层
这种现象已经越来越多了
 楼主| 发表于 2023-5-12 11:07:32 来自手机 | 显示全部楼层
看来就是破出来,改为正常参数工程量都大,代码太长都得放弃。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-26 10:25 , Processed in 0.152951 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表