【原创】把一个字符串隐藏到一个变量符号中

baitang36 · 发表于 2022-7-22 12:33:00

发现一个很有趣的东西，可以把一个字符串藏到一个符号中。
比如有个变量a，它的值是 “12345”，可以再把一个字符串如“abcd”放到符号a中保存，可以分别读取。(setq a nil)不会影响隐藏字符串的内容。
做了一个syz-set-string.fas，里面定义了两个函数 syz-set-string和syz-get-string
syz-set-string的用法是 (syz-set-string '符号字符串 ) 把字符串藏到一个符号中。成功返回T，不成功返回nil。
syz-get-string的用法是 (syz-get-string '符号 ) 成功返回符号中隐藏的字符串，不成功返回空字符串""。
试验方法如下：
命令: (LOAD "C:/00/syz-set-string.fas")
命令: (setq A "1234")
"1234"
命令: (syz-set-string 'A "abcd" )
T
命令: (syz-get-string 'A )
"abcd"
命令: !a
"1234"
甚至还可以把字符串藏到系统函数中：
命令: (syz-set-string 'princ "test princ" )
T
命令: (syz-get-string 'princ )
"test princ"

llsheng_73 · 发表于 2022-7-22 14:16:00

这样一来的话，完全可以搞出很多不敢想象的东西。。。
比如先把一些系统函数的真正意义放进去，然后重定义它，甚至让它成为nil或者其它。。。总之就是看懂它也没用，因为它已经不是所看到的了。。。
反正就是把它的皮囊放进灵魂，然后破坏皮囊，使之看起来已经死了，但实际上还能救活
甚至直接搞些张冠李戴的东西，谁都看不明白。。。