打开base项目,下main.c文件里加入以下代码

对于在一行内的局部注释, 没有找到解除注释的宏,

macro Comments_orUn_gx()
{   //用杠星注释多行,或取消杠星注释 ,不选中多行时,只处理当前行
    hwnd = GetCurrentWnd()
    hbuf = GetCurrentBuf()
    )
        stop   

    // debugBuf只是为了调试
    // debugBuf = NewBuf("debugBuf")
    // ClearBuf(debugBuf)   

    lnSelFirst = GetWndSelLnFirst(hwnd)     // 获得选中内容的第一行
    lnSelLast = GetWndSelLnLast(hwnd)       // 获得选中内容的最后一行  

    const_space = " "               // 空格
    const_comments_begin = "/*"             // 多行注释符号-开始
    const_comments_end = "*/"           // 多行注释符号-结束
    isCancelComments =    

    // 跳过开始的空行,否则下面报错
    line_index = lnSelFirst
    orig_text = GetBufLine(hbuf, line_index)    // 获得第一行的text
    )
    {
        line_index = line_index +
        orig_text = GetBufLine(hbuf, line_index)            // 获得下一行的text
    }  

    // 根据第一行选中文本,确定是“注释”,还是“取消注释”
    // 判断是否以“//”开始,如果是则认为是“取消注释”,首先需要去掉空格
    subIndex =
    ) == const_space)
            subIndex = subIndex +    

    ) == const_comments_begin)    // 以“/*”开头,取消注释
    {
        isCancelComments =    

        dest_text = strmid(orig_text, subIndex+, strlen(orig_text))
        )
        {
            DelBufLine(hbuf, line_index)                // 本行只有“/*”时,删除
        }
        else
        {
            PutBufLine (hbuf, line_index, dest_text)        // 替换以前的text
        }
        line_index = line_index +
    }
    else    // 进行注释
    {
        InsBufLine(hbuf, lnSelFirst, "/*")
        InsBufLine(hbuf, lnSelLast+,  "*/")  

        stop
    }  

    // 遍历所有选中的行
    // line_index = lnSelFirst                      // 前面已经跳过开头的空行
    // while(line_index <= lnSelLast)                    // 对选中的内容进行操作
    while(line_index < GetBufLineCount(hbuf))                //or 从当前行开始,查找到第一个“*/”为止或到结尾
    {
        orig_text = GetBufLine(hbuf, line_index)    // 获得以前的text
        )                   // 如果是空行或只有一个字符,则跳过
        {
            dest_text = ""
            )               // 取消注释
            {
                // 查找注释符“*/”
                subIndex =
                 && strmid(orig_text, subIndex, subIndex+) != const_comments_end)
                        subIndex = subIndex +    

                ) == const_comments_end)  // 找到“*/”,进行处理
                {
                    prefixText = strmid(orig_text, , subIndex)             // 前面的text
                    lastText = strmid(orig_text, subIndex+, strlen(orig_text))     // 后面的text
                    dest_text = cat(prefixText, lastText)   

                    )
                    {
                        DelBufLine(hbuf, line_index)                // 本行只有“*/”时,删除
                    }
                    else
                    {
                        PutBufLine (hbuf, line_index, dest_text)        // 替换以前的text
                    }  

                    break                               // 退出
                }
            }
        }  

        line_index = line_index +
    }
}  

macro CommentSelecte_inOneLine()
{   //注释选中,只在单行中有效,不选中任何字符的话就在光标处插入一对杠星注释符
    hbuf = GetCurrentBuf()
    ln = GetBufLnCur(hbuf)
    str = GetBufSelText(hbuf)
    str = cat("/*",str)
    str = cat(str,"*/")
    SetBufSelText (hbuf, str)
}  

macro _tsGetTabSize()
{  //只被Comment_gx() 宏调用
    szTabSize = GetReg("TabSize");    

    if (szTabSize != "")
    {
        tabSize = AsciiFromChar(szTabSize[]) - AsciiFromChar(");
    }
    else
    {
        tabSize = ;
    }    

    return tabSize;
}    

macro Comment_gx()
{  //用杠星注释,不换行,至少注释一行,不推荐使用
    hbuf = GetCurrentBuf();
    hwnd = GetCurrentWnd();    

    sel = GetWndSel(hwnd);    

    iLine = sel.lnFirst;    

    // indicate the comment char according to the file type
    // for example, using "#" for perl file(.pl) and "/* */" for C/C++.
    filename = tolower(GetBufName(hbuf));
    suffix = "";
    len = strlen(filename);
    i = len - ;
    )
    {
        ] == ".")
        {
            suffix = strmid(filename, i, len)
            break;
        }
        i = i -;
    }
    if  ( suffix == "pl" )
    {
        filetype = ; // PERL
    }
    else
    {
        filetype = ; // C
    }    

    szLine = GetBufLine(hbuf, iLine);
    )  // C
    {
        szLine = cat("/*", szLine);
    }
    else                // PERL
    {
        szLine = cat("# ", szLine);
    }
    PutBufLine(hbuf, iLine, szLine);
    iLine = sel.lnLast;
    szLine = GetBufLine(hbuf, iLine);
    )  // C
    {
        szLine = cat(szLine, "*/");
    }
    else                // PERL
    {
        szLine = cat("# ", szLine);
    }
    PutBufLine(hbuf, iLine, szLine);    

    if (sel.lnFirst == sel.lnLast)
    {
        tabSize = _tsGetTabSize() - ;
        sel.ichFirst = sel.ichFirst + tabSize;
        sel.ichLim = sel.ichLim + tabSize;
    }
    SetWndSel(hwnd, sel);
}    

macro Comment_gg()
{   //用杠杠注释,不选中多行的话,注释当前行
    hwnd = GetCurrentWnd()
    selection = GetWndSel( hwnd )
    lnFirst = GetWndSelLnFirst( hwnd )
    lnLast = GetWndSelLnLast( hwnd )  

    hbuf = GetCurrentBuf()  

    ln = lnFirst
    buf = GetBufLine( hbuf, ln )
    len = strlen( buf )
    firststart = len
    while( ln <= lnLast )
    {
        buf = GetBufLine( hbuf, ln )
        len = strlen( buf )
        start =
        while( start < len )
        {
             ) == CharFromAscii() || strmid( buf, start, start +  ) == CharFromAscii() )
            {
                start = start +
                if( start > len )
                    break
            }
            else
                break
        }
        if( start < len && start < firststart )
        {
            firststart = start
        }
        ln = ln +
    }  

    ln = lnFirst
    while( ln <= lnLast )
    {
        buf = GetBufLine( hbuf, ln )
        len = strlen( buf )
         )
        {
            buf2 = cat( cat( strmid( buf, , firststart ), "//" ), strmid( buf, firststart, len ) )
            PutBufLine ( hbuf, ln, buf2 )
        }
        ln = ln +
    }
    SetWndSel( hwnd, selection )
}  

macro unComment_gg()
{   //取消杠杠注释,不选中多行的话,默认只处理当前行
    hwnd = GetCurrentWnd()
    selection = GetWndSel( hwnd )
    lnFirst = GetWndSelLnFirst( hwnd )
    lnLast = GetWndSelLnLast( hwnd )  

    hbuf = GetCurrentBuf()
    ln = lnFirst
    while( ln <= lnLast )
    {
        buf = GetBufLine( hbuf, ln )
        len = strlen( buf )
         )
        {
            start =   

             ) == CharFromAscii() || strmid( buf, start, start +  ) == CharFromAscii() )
            {
                start = start +
                if( start >= len )
                    break
            }
             )
            {
                 ) == "//" )
                {
                    buf2 = cat( strmid( buf, , start ), strmid( buf, start + , len ) )
                    PutBufLine( hbuf, ln, buf2 )
                }
            }
        }
        ln = ln +
    }
    SetWndSel( hwnd, selection )
} 

增加后,通过在键分配中分配宏命令的按键

source insight增加注释宏的更多相关文章

  1. source insight 中文注释为乱码解决

    1. source insight 中文注释为乱码解决 http://blog.csdn.net/bingfeng1210/article/details/7527059 2. Source Insi ...

  2. Source Insight中文注释乱码、字体大小、等宽解决方法

    中文注释乱码解决方法: 用记事本打开源文件,然后,选择文件->另存为,编码选为”ANSI“   字体的调整: Source Insight 菜单栏选择Options->Document O ...

  3. Source Insight 中文注释为乱码解决办法(完美解决,一键搞定)

    我从网上查了一堆解决办法,但是都是2017年以前的解决方案,并且都是针对于source insight 3.5及以下版本的,目前SI软件版本都到4.0了,应该有新方法出现了. ------------ ...

  4. utf-8转换为ansi和修改文件名的批处理(可解决source insight中文注释乱码问题)

    source insight中文乱码有两个原因,一个是source insight的设置不正确.另外一个原因是源文件是utf-8格式的. 最近在工作中用source insight 查看jsp文件.j ...

  5. 【转】Source Insight中文注释为乱码的解决办法

    我网上查了一堆解决办法,但是都是2017年以前的,并且都是针对于source insight 3.5及以下版本的解决方案,软件版本都到4.0了,应该有新方法出现. 干货:Source Insight ...

  6. source insight增加tab标签页的方法之sihook

    1.效果如下 2.方法见如下博客 http://www.cnblogs.com/Red_angelX/archive/2013/01/23/2873603.html

  7. Source Insight常用快捷键及注释快捷键设置

    转:http://blog.csdn.net/tlaff/article/details/6536610 在使用SI过程中,我根据自己的使用习惯修改了它的默认快捷键,并且在配置文件中添加了一些人性化功 ...

  8. source insight之quicker.em宏的使用

    source insight有很多宏可以用,这里介绍的宏是quicker.em这个宏,它是华为的一个员工写的,很实用. 1.安装quicker.em宏 一.打开base这个工程Project-> ...

  9. source insight 编程风格(持续更新)

    1.字体Source Code Pro 出身于豪门Adobe,从名字上来看就知道是转为编码而生的.基本上也是拥有前面所提的编程字体的所有要素的.这个字体基本上具有编程字体所需的所有要素:等宽.支持Cl ...

随机推荐

  1. Eclipse关闭XML文件验证的方法

    XML的编写是否符合规范,可以通过XML Schema或DTD进行验证,但有时候电脑本来就很卡,而且XML的某些错误并未导致程序无法运行的情况下,暂时关闭XML的验证也算不错的选择. 如web.xml ...

  2. Ruby多行字符串,begin/end语句、注释

    #!/usr/bin/ruby #puts "Hello ,Ruby!"; print <<EOF #多行字符串 以<<开头 紧接着为结束字符串标识声明 并 ...

  3. python基础之文件操作

    对于文件操作中最简单的操作就是使用print函数将文件输出到屏幕中,但是这种操作并不能是文件保存到磁盘中去,如果下调用该数据还的重新输入等. 而在python中提供了必要的函数和方法进行默认情况下的文 ...

  4. JAVA实现 springMVC方式的微信接入、实现消息自动回复

    前段时间小忙了一阵,微信公众号的开发,从零开始看文档,踩了不少坑,也算是熬过来了,最近考虑做一些总结,方便以后再开发的时候回顾,也给正在做相关项目的同学做个参考. 思路 微信接入:用户消息和开发者需要 ...

  5. 移动硬盘安装win7,蓝屏,0x0000007B

    @echo offecho 加载注册表echo.reg load HKLM\sys %1\WINDOWS\system32\config\system >nul 2>nulif error ...

  6. Asp.Net MVC4 + Oracle + EasyUI 学习 序章

    Asp.Net MVC4 + Oracle + EasyUI  序章 -- 新建微软实例 本文链接:http://www.cnblogs.com/likeli/p/4233387.html 1.  简 ...

  7. 【随笔】MQTT简介

    我们知道,将用户使用的设备称为客户端,将提供给用户信息的端口称为服务器端.两个端口之间可以通过多种通信协议进行交互,比如HTTP(同步)或者基于消息传递的异步. HTTP是一种同步无状态的协议,不支持 ...

  8. pat甲级题解(更新到1013)

    1001. A+B Format (20) 注意负数,没别的了. 用scanf来补 前导0 和 前导的空格 很方便. #include <iostream> #include <cs ...

  9. iOS NSDate本地化

    1. NSDateFormatter *outputFormatter = [[NSDateFormatter alloc] init]; [outputFormatter setLocale:[NS ...

  10. HBase change split policy on an existing table

    hbase(main)::> create 'test_table_region', 'username' row(s) in 1.2150 seconds hbase(main)::> ...