比如：

//怎样注释当前电脑时钟时间.

macro NumToName(Month)

{

    if (Month == 1)

        return "Jan"

    if (Month == 2)

        return "Feb"

    if (Month == 3)

        return "Mar"

    if (Month == 4)

        return "Apr"

    if (Month == 5)

        return "May"

    if (Month == 6)

        return "Jun"

    if (Month == 7)

        return "Jul"

    if (Month == 8)

        return "Aug"

    if (Month == 9)

        return "Sep"

    if (Month == 10)

        return "Oct"

    if (Month == 11)

        return "Nov"

    if (Month == 12)

        return "Dec"

}

macro PrintDate()

{

    szTime = GetSysTime(1)

    Day = szTime.Day

    Month = szTime.Month

    Year = szTime.Year

    if (Day < 10)

        szDay = "0@Day@"

    else

        szDay = Day

    szMonth = NumToName(Month)

    hbuf = GetCurrentBuf()

    SetBufSelText(hbuf, "@szMonth@ @szDay@, @Year@")

}