【原创】文字任意位置原位递增，（源码奉献，一个不留）
本帖最后由 yjr111 于 2011-10-17 23:24 编辑2011-10-17 公布源码：文本任意位置精装版，收银二两，嫌贵绕道.
2011-10-14 公布源码，可以根据自己需要更改了
2011-10-5重大更新，倾情奉献！
1、支持右键不退出重新选择初始值和递增量；
2、支持大小写数字带括弧递增！
3、修正因不规范书写文本后有空格造成的退出
4、大小写、字母混合一起末尾递增
5、提示信息进行了一些增加，如选到非属性块时的提醒
2011-9-18
本程序进行了一点改进：
1、原位递增经过修改，支持框选、多选、点选；
2、支持小数（初始量和增量均可）
2011-9-22 改进：
1、增加在原数基础上得递增（右键点击即可）2、修正了尺寸文本原有基础递增时测量值为“”时取1组码有误，现改取42组码的问题。仅对lsp源码更新。。。
2011-9-23更新：
1、完美支持框选、多选、点选；
2、完美支持各种文字
3、操作更加人性化
4、命令QQQ或YWDZ1
考虑到某些同志可能需要不带数字的汉字后递增数字的需求，把原始版本也一并发上来。
（原始版，对不带数字的汉字可以递增数字：WBDZ）
（QQQ或YWDZ1）
2011-9-24功能预告
增加末尾字母a~z及A~Z的递增，测试中。。。2011-9-25 重要更新：
1、修改完美版文本末无数字或字母情况下自动递增数的问题；
2、修改完美版中始终递增的不合理，新增可重新选择从初始量递增；
2、在原数字完美版基础上新增末尾字母递增功能：
（1）大小写字母智能识别！
（2）功能丰富，可原数递增、不断递增、重新复位递增，免去不断重新输入初始量和递增量的烦恼；
（3）始终支持各种文本，当然尺寸文本如果你末尾真的会有字母，照样给你好看！ 废话少说，上菜！
2011-9-26功能预告
末尾汉字数字原位递增，即将上市，敬请期待！先发张测试图。。。2011-9-27 版本更新预告
末尾汉字数字原位递增功能已经大体完成，还有一个BUG在测试中。。。
2011-9-27终结版
1、末尾汉字数字原位递增已经完成，困难很大，对我等新手来说实在有点吃力，不过总算弄出来了，实际效果自我感觉还可以
2、指定初始量的递增原则上可以到千亿，不过一千万一下基本没有问题，（我说的有没有问题只是相对于平常的格式而言，数值本身递增再大也可以）数字再大没测试，有兴趣的朋友自己试试；
3、原数基础上递增只到十万，十万以上不稳定，递增量不能太大，否则会出问题；
4、同样支持初始递增、原数基础递增、中途复位再递增、连续递增，对于其他标注及属性块未测试，估计通用。
5、对于文本前数字递增及前后数字递增，有兴趣的朋友可以自己修改，修改一下或加个子程序应该就可以了
6、小窍门，递增量也可以为负哦。。。
2011-9-29 终结版更新
1、解决所有自己测试到的问题，汉字数字递增到9999999999999989共16位即10万万亿，够了吧？
2、解决了格式显示少零或多零的问题，解决了原数基础递增出错的问题
3、“o"改为”零“
如果数字是10是不是只能增到19？ 没人顶自己顶一下！ qq1254582201 发表于 2016-4-18 22:13
跪求大神，能否解决后边带.00的问题。。。
(setvar "dimzin" 8) 我觉得应在原来基础上递增！ 我想试用一下，我有个复制递增 支持原创，支持奉献 xhq1954425 发表于 2011-9-18 10:30 static/image/common/back.gif
如果数字是10是不是只能增到19？
可以无限递增，下载看看便知 下来看了，怎么代码不全？论坛附件下载有问题吗？我的是傲游浏览器。
第一句话：
octet-stream
Content-Length: 1276
最后一句话：
(setq n (+ n 收到，万分感谢。但是下载别的附件现在都有问题。郁闷中 支持原创，如果支持框选就更好了，顺序可选，如上下分行左起，左右分列上起