看好多的人想要注册码，给出个简单注册程序的代码，看能收多少钱，高手就不要进了。

Shengfantasy · 发表于 2019-4-9 21:19

(defun 字串分解 (字串 / i k s lst)
  (setq i 0 k (chr 160))
  (while (/= "" (setq s (substr 字串 (setq i (1+ i)) 1)))
(if (< s k)
   (setq lst (cons s lst))
   (setq lst (cons (substr 字串 i 2) lst)
i (1+ i))
)
  )(reverse lst)
)

这个函数里的 k (chr 160) 和 (if (< s k)...)是什么意思啊？

wowan1314 · 发表于 2019-9-8 23:08

mark~ mark~ mark~

qwsss31 · 发表于 2024-6-9 19:33

看个热闹小尝试一下哈

qwsss31 · 发表于 2024-6-10 00:13

已经完美调试了，大佬牛啤，支持支持，用好了就四位验证码是咋回事哈

tanjurun · 发表于 2024-6-10 12:28

可以拿出来分享了，不错

账号		自动登录	找回密码
密码			注册