求大佬帮忙改一下代码

Siuzf

之前在明经上找到的2个插件，现在想要把它们的效果结合一下，求大佬出手帮忙改一下。（把视频2中能显示文字位置的效果结合到视频1中的程序去）。代码全放上来了。

start4444

第二个太繁琐了，真没啥效率，把第一个加入自动递增编号，你可以试试

Siuzf

start4444 发表于 2022-3-24 17:37
第二个太繁琐了，真没啥效率，把第一个加入自动递增编号，你可以试试

感谢大佬出手，程序很好用，还有一点小问题，就是有时想纯数字编号时，前缀去不掉，变成带问号的。不过也够用了，再次感谢大佬出手。

start4444

Siuzf 发表于 2022-3-25 10:14
感谢大佬出手，程序很好用，还有一点小问题，就是有时想纯数字编号时，前缀去不掉，变成带问号的。不过也 ...

把这句替换掉，按感叹号取消前缀，你也可以自己设其他

(setq TXT-qz (if (= "" (setq TXT-qz` (getstring (strcat "\n-->请输入前缀<" TXT-qz "> [取消(!)]:"))))  TXT-qz (if (= TXT-qz` "!") (setq TXT-qz` "") (setq TXT-qz` TXT-qz`))))

Siuzf

start4444 发表于 2022-3-25 11:14
把这句替换掉，按感叹号取消前缀，你也可以自己设其他

(setq TXT-qz (if (= "" (setq TXT-qz` (getstr ...

感谢大佬！感谢大佬！感谢大佬！