cmdX1.0 智能命令集成系统

gbhsu

两个月前，在家无聊时编的cmd+num的东东得到大家的厚爱
最近不断有网友提出升级，都有点迫不及待了，呵呵
因追求完美，有些地方反复修改，花了不少时间，经常到凌晨两三点
想想不上班时，有时还觉得挺幸福的
可能是象玩游戏一样上瘾了吧  搞这玩意不等吃不等穿的
又没有人给我开工资，再说这东东，我也不怎么用，我自已的一套操作习惯了，呵呵
总想等什么都搞好再发出来的，但想法太多，想要做的事也太多
这次最亮点的地方是增加了纯数字命令 可以改字高，改半径，改字值，改尺寸，改颜色，大家试试吧 欢迎拍砖!
同时也解决了命令重复问题，虽然有些地方还没有来得及改
另外增加不少命令，大家试着用吧，基本上是原创，要是谁看不惯哪部分内容，我可以去掉!
呵呵，还想集成明镜大侠的汉字命令，不知他同意不同意，所以也就没有包含进来
另外还想把左手键命令编进去，同时仿一些天正好的命令进去
想法是好的，也越来越多了
cmd+num就不够用了，改用cmdX了，“X”代表任意字符，同时也是我的姓--许，呵呵
由于时间关系，有点地方没有来得及改，我改好就传上来
内容太多，源程序就不贴了，反正关键的一些内容还在那个贴子上
高手们自已会编可能对我这个不感兴趣，不会编的只要能用就行了，也不必看了
收一个币币，辛苦费哦
有BUG贴上来哦!!

cmdX1.01  2011.09.28 更新 rec100,sq100命令重复,数字命令小BUG，blkc1=bs1  帮助命令：cmdXhelp=chelp=c?
cmdX1.02  2011.09.29 更新  div5=/5  等分复制用"/5"比较形象!
                                             Line move copy 可重复 rec100,200命令小BUG  
                                             增捕捉参数设置命令 "cmdXosmode " 设置osmode系统变量
                                             Line可以用，其他还没有来得及改!明天改!
cmdX1.03 2011.10.01更新   默认cmdXosmode 为当前osmode系统变量的值
                                             半径画圆CR100,直径画圆CD100，旋转RT45可重复
                                             同是解决了捕捉参数,包括rec100,200 sq100的捕捉设置
cmdX1.04 2011.10.02更新   解决含小数点命令不能重复的问题！
                                             解决scale命令重复问题！
                                             增加版本号命令:cmdXver
                                             增加命令功能更新重置:cmdXinit
                                             程式进一步优化!
                                              由于程式分开的，使用过程中有问题的话请告之!

cmdX智能命令:
blkc     blkc1 修改块内对象颜色 0=byblock 256=bylayer 1=红色;blkc=block color
chamfer  y100 cha100 倒角100
          y100x200    倒角100X200                    ;2011.07.19add
          y100,200    倒角100X200                    ;2011.07.19add
circle   CR100 画半径为100的圆
          CD100 画直径为100的圆
copy     c100 co100 向右拷贝100   ;copy right
             c45X100  45度方向拷贝100
             c-45X-100  -45度方向拷贝-100          ;极标坐标
             c100,200   拷贝到相对坐标 100,200     ;相对坐标  ;2011.07.19add
             c,200      拷贝到相对坐标  0,200      ;可以略零
dx50     ;比例1:50截断线 [断][线]=[DX]=breakline,可两点画，可选直线，可输比例，可更新截断线,真正智能!
div10    ="/10"   ;选取对象等分拷贝,如为单个对象则等分该对象;常规命令为:divn=divide num;2011.09.17.23:12
edtext   ;修改单个文字，结束后所有相同文字均更新；find 命令行简化版
        eq+\"text\" 或=+\"text\" ,即eq或=后加任意字符，则文字对象修改为任意字符
fillet   f100 f150.5  即f+任意数字可成命令
move     m100          向右移100     ;move right
              m100   向右移100    m-100  向左移100
               m,100  向上移100   m,-100 向下移100
               m45X100  45度方向移动100
               m-45X-100  -45度方向移动-100      ;极标坐标
               m100,200   移动到相对坐标 100,200 ;相对坐标
               m,200      移动到相对坐标  0,200  ;可以略零
lengthen   Len100,len-100    直线，多义线,尺寸线拉伸或缩短100      
line          L100   向右画线100   L-100  向左画线100
               L,100  向上画线100   L,-100 向下画线100     
               L45X100    45度方向画线100        ;极标坐标
               L45P100    45度方向画线100        ;可以用P表示极标坐标
               L-45X-100  -45度方向画线-100     ;极标坐标
               L100,300   相对坐标100,300画线   ;相对坐标 ;2011.07.19add
offset        o100       ;偏移100
                pline         pL10;画宽为10的多线段;2011.07.28 thank adc!
                              ;如回车则修改对象为多线段,宽度为10 2011.09.15
                plc100        ;画半径为100的多线段圆，宽度默认;2011.07.28
                plc10x200     ;画宽度为10,半径为200的多线段圆 ;2011.07.28
                qd100         ;qdim画间距为100的连续尺寸,图块内有分格线时用 ;2011.09.21
rotate        rt45  ro45  逆时针旋45度
                rt-45 ro-45 顺时针旋45度
                rectang       rec100x200  rec100,200绘制矩形100x200
  rec100    绘制100x100正方形，第一点为左下点 ;2011.07.26   
  rta45      文字，块旋转角度绝对值为45度 rotate angle=rta  ;绝对 absolutely 2011.09.10
                属性块属性文字暂未解决!
                scale         sc100  放大100
  square        sq100       绘制边长100的正方形,点为中心点
stretch       s100   向右拉伸100   ;stretch right                         ;时间关系，命令重复未改
                       sL100  向左拉伸100   ;stretch left
                       su100  向上拉伸100   ;stretch up
                       sd100  向下拉伸100   ;stretch down
  txtrt         txtrt45旋转所有文字 为45度        ;txt rotate 45  2011.09.15   
  zoom          za=zoom a;zd=zoom d; ze=zoom e; zo=zoom o;                            ;时间关系，命令重复未改
                zv=zoom v; zp=zoom p;                             2011.07.21add
         []            文字加\"[]\"                                        2011.09.24
         <>            文字加\"<>\"
         kh            括号 文字加\"()\" ;\"()\"在命令行用不起来，这点没有办法，望大侠出点子!
         100           纯数字的命令  2011.09.25
                                     默认数字开关为真：
                                                     可以改文字高度，圆半径，弧半径，尺寸值，
                                                     如文字为数字则改文字内容，其余功能以后再增加
                                     当颜色开关为真时则修改对象颜色[0-256]0随块 256随层
  分数亦可以实现，如sc1/2则为SCALE命令缩小0.5倍!
                燕川布衣 QQ:112100528

magicheno

不能自定义命令有点麻烦哦，好多和自己的冲突了，但是改也改不了饿

gbhsu

欢迎批评指正!
呵呵，又到一点了，睡觉去了。

yjr111

gbhsu 发表于 2011-9-27 01:00
欢迎批评指正!
呵呵，又到一点了，睡觉去了。

向楼主学习！顶一下先

lrd1861

支持一下辛苦了

690994

友情顶一下。

xiaxiang

呵呵，这次不放源码了哈

gbhsu

xiaxiang 发表于 2011-9-27 08:25
呵呵，这次不放源码了哈

源码太多太杂不看也罢!

fsxm

就冲你这把干劲也得顶帖呀！
明经lisp新一代的杰出代表！
让人看到了希望！

hao3ren

我也顶一下，这个程序不错啊

lincctw_ccl

這個不頂不行!
真的很方便
請教樓主
這次的下載內容購買的是源碼還是有編過的?