杂志锁屏衍生版－轻轻松松背单词－新增四六级词库

1076964977

qs100371 发表于 2017-5-7 09:42
最后一版，手表不在了。

能不能自定义自己的词库?

1076964977

qs100371 发表于 2017-5-31 08:28
源码附在顶楼，售价10毛

楼主威武!!

1076964977

楼主的源码里的data.txt是按照顺序排列的词典 一共997行。
我写了几行代码把他们打乱 乱序了：）
代码如下：
(setq i 1)
(setq aaa (list))
(set 'in-file (open "data.txt" "read"))
(set 'out-file (open "myfile.txt" "write"))
(while (<= i 997)(begin (setq str111 (read-line in-file))
(setq aaa(cons str111 aaa))
(setq i (+ i 1))
))
(setq aaa(randomize aaa))
(setq aaa(randomize aaa))
(setq aaa(randomize aaa))

(setq i 1)
(while (<= i 996)(begin
(write-line out-file (nth i aaa))
(setq i (+ i 1))
))
(close in-file)
(close out-file)

1076964977

把新搞的词典弄进去打包了 牛逼了这回。发现楼主还更新了界面 有图片了。
但是 怎么图片不随机变了呢 只是个楼梯的图片

1076964977

1076964977 发表于 2017-6-1 23:18
把新搞的词典弄进去打包了 牛逼了这回。发现楼主还更新了界面 有图片了。
但是 怎么图片不随机变了呢 只是 ...

现在又会变了。。。。