⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 rl_unit1.pas

📁 一个很不错的绿色小软件 可以实现 上网 一个小助手
💻 PAS
📖 第 1 页 / 共 4 页
字号:
unit rl_Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, TFlatPanelUnit, TFlatButtonUnit, StdCtrls,
  TFlatComboBoxUnit, TFlatEditUnit,
  DateUtils, ComCtrls, TFlatMemoUnit, Menus,mmsystem, FileCtrl;

  procedure check_ago;
  function get_ts_datetime():TDatetime;   //返回一个日期,作为时钟开始工作的对象

  const
  START_YEAR=1901;
  END_YEAR=2050;

//返回iYear年iMonth月的天数 1年1月 --- 65535年12月
function MonthDays(iYear,iMonth:Word):Word;

//返回阴历iLunarYer年阴历iLunarMonth月的天数,如果iLunarMonth为闰月,
//高字为第二个iLunarMonth月的天数,否则高字为0  1901年1月---2050年12月
function LunarMonthDays(iLunarYear,iLunarMonth:Word):Longword;

//返回阴历iLunarYear年的总天数 1901年1月---2050年12月
function LunarYearDays(iLunarYear:Word):Word;

//返回阴历iLunarYear年的闰月月份,如没有返回0  1901年1月---2050年12月
function GetLeapMonth(iLunarYear:Word):Word;

//把iYear年格式化成天干记年法表示的字符串
procedure FormatLunarYear(iYear:Word;var pBuffer:string);overload;
function FormatLunarYear(iYear:Word):string;overload;

//把iMonth格式化成中文字符串
procedure FormatMonth(iMonth:Word;var pBuffer:string;bLunar:Boolean=True);overload;
function FormatMonth(iMonth:Word;bLunar:Boolean=True):string;overload;

//把iDay格式化成中文字符串
procedure FormatLunarDay(iDay:Word;var pBuffer:string);overload;
function FormatLunarDay(iDay:Word):string;overload;

//计算公历两个日期间相差的天数  1年1月1日 --- 65535年12月31日
function CalcDateDiff(iEndYear,iEndMonth,iEndDay:Word;iStartYear:Word=START_YEAR;iStartMonth:Word=1;iStartDay:Word=1):Longword;overload;
function CalcDateDiff(EndDate,StartDate:TDateTime):Longword;overload;

//计算公历iYear年iMonth月iDay日对应的阴历日期,返回对应的阴历节气 0-24
//1901年1月1日---2050年12月31日
function GetLunarHolDay(InDate:TDateTime):string;overload;
function GetLunarHolDay(iYear,iMonth,iDay:Word):string;overload;

//procedure movemouse(iYear,iMonth,iDay:word);  //完成信息汇总显示

function Getjiejia(iMonth,iDay:word):string;//返回特殊节假日

function Getnonglijiejia(iYear,iMonth,iDay:Word):string;//返回农历特殊节日

function title_inf(iYear,iMonth,iDay:word):string;

function browse(browse_sign:boolean;browse_date:Tdate):boolean;  //浏览记录


type
  TForm3 = class(TForm)
    rl_fp1: TFlatPanel;
    rl_fp2: TFlatPanel;
    rl_fp3: TFlatPanel;
    rl_fp4: TFlatPanel;
    rl_fp5: TFlatPanel;
    rl_fp7: TFlatPanel;
    rl_Tm1: TTimer;
    rl_tm2: TTimer;
    FlatEdit1: TFlatEdit;
    FlatButton2: TFlatButton;
    FlatButton3: TFlatButton;
    FlatButton4: TFlatButton;
    FlatButton5: TFlatButton;
    FlatButton6: TFlatButton;
    FlatButton7: TFlatButton;
    FlatButton8: TFlatButton;
    FlatButton9: TFlatButton;
    FlatButton10: TFlatButton;
    FlatButton11: TFlatButton;
    FlatButton12: TFlatButton;
    FlatButton13: TFlatButton;
    FlatButton14: TFlatButton;
    FlatButton15: TFlatButton;
    FlatButton16: TFlatButton;
    FlatButton17: TFlatButton;
    FlatButton18: TFlatButton;
    FlatButton19: TFlatButton;
    FlatButton20: TFlatButton;
    FlatButton21: TFlatButton;
    FlatButton22: TFlatButton;
    FlatButton23: TFlatButton;
    FlatButton24: TFlatButton;
    FlatButton25: TFlatButton;
    FlatButton26: TFlatButton;
    FlatButton27: TFlatButton;
    FlatButton28: TFlatButton;
    FlatButton29: TFlatButton;
    FlatButton30: TFlatButton;
    FlatButton31: TFlatButton;
    FlatButton32: TFlatButton;
    FlatButton33: TFlatButton;
    FlatButton34: TFlatButton;
    FlatButton35: TFlatButton;
    FlatButton36: TFlatButton;
    FlatButton37: TFlatButton;
    FlatButton38: TFlatButton;
    FlatButton39: TFlatButton;
    FlatButton40: TFlatButton;
    FlatButton41: TFlatButton;
    FlatButton44: TFlatButton;
    FlatButton45: TFlatButton;
    FlatButton46: TFlatButton;
    FlatButton47: TFlatButton;
    rl_tm3: TTimer;
    rl_tm4: TTimer;
    rl_tm5: TTimer;
    rl_tm6: TTimer;
    rl_year: TFlatEdit;
    rl_month: TFlatEdit;
    rl_year_month: TFlatButton;
    rl_fp_nt1: TFlatPanel;
    rl_tm7: TTimer;
    rl_tm8: TTimer;
    rl_lv_rc: TListView;
    rl_fm_nt: TFlatMemo;
    rl_pm1: TPopupMenu;
    N4: TMenuItem;
    N7: TMenuItem;
    N8: TMenuItem;
    N9: TMenuItem;
    rl_pm2: TPopupMenu;
    N10: TMenuItem;
    N11: TMenuItem;
    N12: TMenuItem;
    rl_tm_sound: TTimer;
    rl_nt_save: TFlatButton;
    rl_fp6: TFileListBox;
    rl_nt_delete: TFlatButton;
    rl_tm_dbclick: TTimer;
    N1: TMenuItem;
    procedure FormCreate(Sender: TObject);
    procedure rl_fp1Click(Sender: TObject);
    procedure rl_Tm1Timer(Sender: TObject);
    procedure rl_tm2Timer(Sender: TObject);
    procedure rl_fp3Click(Sender: TObject);
    procedure rl_tm3Timer(Sender: TObject);
    procedure rl_tm4Timer(Sender: TObject);
    procedure rl_fp5Click(Sender: TObject);
    procedure rl_tm5Timer(Sender: TObject);
    procedure rl_tm6Timer(Sender: TObject);
    //-------------------------------------------
    procedure loadsunli(iYear,iMonth:word);
    procedure choushi;
    procedure FlatButton46Click(Sender: TObject);
    procedure FlatButton45Click(Sender: TObject);
    procedure FlatButton47Click(Sender: TObject);
    procedure FlatButton44Click(Sender: TObject);
    procedure rl_year_monthClick(Sender: TObject);
    procedure FlatButtonclick(sender:Tobject);
    procedure FlatButtonMouseEnter(Sender: TObject);
    procedure rl_fp_nt1Click(Sender: TObject);
    procedure rl_tm7Timer(Sender: TObject);
    procedure rl_tm8Timer(Sender: TObject);
    procedure N4Click(Sender: TObject);
    procedure N7Click(Sender: TObject);
    procedure N8Click(Sender: TObject);
    procedure N9Click(Sender: TObject);
    procedure N10Click(Sender: TObject);
    procedure N11Click(Sender: TObject);
    procedure N12Click(Sender: TObject);
    procedure rl_tm_soundTimer(Sender: TObject);
    procedure rl_nt_saveClick(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure rl_lv_rcDblClick(Sender: TObject);
    procedure rl_tm_dbclickTimer(Sender: TObject);
    procedure rl_fp6Click(Sender: TObject);
    procedure N1Click(Sender: TObject);
    procedure rl_nt_deleteClick(Sender: TObject);
    //-------------------------------------------
  private
    { Private declarations }
     //计算从1901年1月1日过iSpanDays天后的阴历日期
    procedure l_CalcLunarDate(var iYear,iMonth,iDay:Word;iSpanDays:Longword);

    //计算公历iYear年iMonth月iDay日对应的节气 0-24,0表不是节气
    function l_GetLunarHolDay(iYear,iMonth,iDay:Word):Word;
  public
    { Public declarations }
  end;


var
  Form3: TForm3;
  enter:integer;   //控制'确定'按钮是更新操作还是添加操作.
  datetime_back:Tdatetime; //启动程序时获取一条最近将来发生的记录
implementation
uses rl_unit2,rl_unit3, Unit1;
{$R *.dfm}
//===========================================================================================================================
var
  sign:boolean;
  enter_tag:word;     //鼠标所在控件的日期是几号
  click_tag:word;
  Dbclick_count:integer; 
//数组gLunarDay存入阴历1901年到2100年每年中的月天数信息,
//阴历每月只能是29或30天,一年用12(或13)个二进制位表示,对应位为1表30天,否则为29天
  gLunarMonthDay:array[0..149] of Word=(
    //测试数据只有1901.1.1 --2050.12.31
    $4ae0, $a570, $5268, $d260, $d950, $6aa8, $56a0, $9ad0, $4ae8, $4ae0,   //1910
    $a4d8, $a4d0, $d250, $d548, $b550, $56a0, $96d0, $95b0, $49b8, $49b0,   //1920
    $a4b0, $b258, $6a50, $6d40, $ada8, $2b60, $9570, $4978, $4970, $64b0,   //1930
    $d4a0, $ea50, $6d48, $5ad0, $2b60, $9370, $92e0, $c968, $c950, $d4a0,   //1940
    $da50, $b550, $56a0, $aad8, $25d0, $92d0, $c958, $a950, $b4a8, $6ca0,   //1950
    $b550, $55a8, $4da0, $a5b0, $52b8, $52b0, $a950, $e950, $6aa0, $ad50,   //1960
    $ab50, $4b60, $a570, $a570, $5260, $e930, $d950, $5aa8, $56a0, $96d0,   //1970
    $4ae8, $4ad0, $a4d0, $d268, $d250, $d528, $b540, $b6a0, $96d0, $95b0,   //1980
    $49b0, $a4b8, $a4b0, $b258, $6a50, $6d40, $ada0, $ab60, $9370, $4978,   //1990
    $4970, $64b0, $6a50, $ea50, $6b28, $5ac0, $ab60, $9368, $92e0, $c960,   //2000
    $d4a8, $d4a0, $da50, $5aa8, $56a0, $aad8, $25d0, $92d0, $c958, $a950,   //2010
    $b4a0, $b550, $b550, $55a8, $4ba0, $a5b0, $52b8, $52b0, $a930, $74a8,   //2020
    $6aa0, $ad50, $4da8, $4b60, $9570, $a4e0, $d260, $e930, $d530, $5aa0,   //2030
    $6b50, $96d0, $4ae8, $4ad0, $a4d0, $d258, $d250, $d520, $daa0, $b5a0,   //2040
    $56d0, $4ad8, $49b0, $a4b8, $a4b0, $aa50, $b528, $6d20, $ada0, $55b0);  //2050

//数组gLanarMonth存放阴历1901年到2050年闰月的月份,如没有则为0,每字节存两年
  gLunarMonth:array[0..74] of Byte=(
    $00, $50, $04, $00, $20,   //1910
    $60, $05, $00, $20, $70,   //1920
    $05, $00, $40, $02, $06,   //1930
    $00, $50, $03, $07, $00,   //1940
    $60, $04, $00, $20, $70,   //1950
    $05, $00, $30, $80, $06,   //1960
    $00, $40, $03, $07, $00,   //1970
    $50, $04, $08, $00, $60,   //1980
    $04, $0a, $00, $60, $05,   //1990
    $00, $30, $80, $05, $00,   //2000
    $40, $02, $07, $00, $50,   //2010
    $04, $09, $00, $60, $04,   //2020
    $00, $20, $60, $05, $00,   //2030
    $30, $b0, $06, $00, $50,   //2040
    $02, $07, $00, $50, $03);  //2050

//数组gLanarHoliDay存放每年的二十四节气对应的阳历日期
//每年的二十四节气对应的阳历日期几乎固定,平均分布于十二个月中
//   1月          2月         3月         4月         5月         6月
//小寒 大寒   立春  雨水   惊蛰 春分   清明 谷雨   立夏 小满   芒种 夏至
//   7月          8月         9月         10月       11月        12月
//小暑 大暑   立秋  处暑   白露 秋分   寒露 霜降   立冬 小雪   大雪 冬至
{*********************************************************************************
 节气无任何确定规律,所以只好存表,要节省空间,所以....
**********************************************************************************}
//数据格式说明:
//如1901年的节气为
//  1月     2月     3月   4月    5月   6月   7月    8月   9月    10月  11月     12月
// 6, 21, 4, 19,  6, 21, 5, 21, 6,22, 6,22, 8, 23, 8, 24, 8, 24, 8, 24, 8, 23, 8, 22
// 9, 6,  11,4,   9, 6,  10,6,  9,7,  9,7,  7, 8,  7, 9,  7,  9, 7,  9, 7,  8, 7, 15
//上面第一行数据为每月节气对应日期,15减去每月第一个节气,每月第二个节气减去15得第二行
// 这样每月两个节气对应数据都小于16,每月用一个字节存放,高位存放第一个节气数据,低位存放
//第二个节气的数据,可得下表
  gLunarHolDay:array[0..1799] of Byte=(
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1901
    $96, $A4, $96, $96, $97, $87, $79, $79, $79, $69, $78, $78,   //1902
    $96, $A5, $87, $96, $87, $87, $79, $69, $69, $69, $78, $78,   //1903
    $86, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $78, $87,   //1904
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1905
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1906
    $96, $A5, $87, $96, $87, $87, $79, $69, $69, $69, $78, $78,   //1907
    $86, $A5, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1908
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1909
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1910
    $96, $A5, $87, $96, $87, $87, $79, $69, $69, $69, $78, $78,   //1911
    $86, $A5, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1912
    $95, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1913
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $78,   //1914
    $96, $A5, $97, $96, $97, $87, $79, $79, $69, $69, $78, $78,   //1915
    $96, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1916
    $95, $B4, $96, $A6, $96, $97, $78, $79, $78, $69, $78, $87,   //1917
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $77,   //1918
    $96, $A5, $97, $96, $97, $87, $79, $79, $69, $69, $78, $78,   //1919
    $96, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1920
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $87,   //1921
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $77,   //1922
    $96, $A4, $96, $96, $97, $87, $79, $79, $69, $69, $78, $78,   //1923
    $96, $A5, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1924
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $87,   //1925
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1926
    $96, $A4, $96, $96, $97, $87, $79, $79, $79, $69, $78, $78,   //1927
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1928
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1929
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1930
    $96, $A4, $96, $96, $97, $87, $79, $79, $79, $69, $78, $78,   //1931
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1932
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1933
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1934
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1935
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1936
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1937
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1938
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1939
    $96, $A5, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1940
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1941
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1942
    $96, $A4, $96, $96, $97, $97, $79, $79, $79, $69, $78, $78,   //1943
    $96, $A5, $96, $A5, $A6, $96, $88, $78, $78, $78, $87, $87,   //1944
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1945
    $95, $B4, $96, $A6, $97, $97, $78, $79, $78, $69, $78, $77,   //1946
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $78,   //1947
    $96, $A5, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1948
    $A5, $B4, $96, $A5, $96, $97, $88, $79, $78, $79, $77, $87,   //1949
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $77,   //1950
    $96, $B4, $96, $A6, $97, $97, $79, $79, $79, $69, $78, $78,   //1951
    $96, $A5, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1952
    $A5, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1953
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $68, $78, $87,   //1954
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1955
    $96, $A5, $A5, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1956
    $A5, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1957
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1958
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1959
    $96, $A4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1960
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1961
    $96, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1962
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1963
    $96, $A4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1964
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1965
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1966
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1967
    $96, $A4, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1968
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1969
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1970
    $96, $B4, $96, $A6, $97, $97, $78, $79, $79, $69, $78, $77,   //1971
    $96, $A4, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1972
    $A5, $B5, $96, $A5, $A6, $96, $88, $78, $78, $78, $87, $87,   //1973
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1974
    $96, $B4, $96, $A6, $97, $97, $78, $79, $78, $69, $78, $77,   //1975
    $96, $A4, $A5, $B5, $A6, $A6, $88, $89, $88, $78, $87, $87,   //1976
    $A5, $B4, $96, $A5, $96, $96, $88, $88, $78, $78, $87, $87,   //1977
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $78, $87,   //1978
    $96, $B4, $96, $A6, $96, $97, $78, $79, $78, $69, $78, $77,   //1979
    $96, $A4, $A5, $B5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1980
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $77, $87,   //1981
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1982
    $95, $B4, $96, $A5, $96, $97, $78, $79, $78, $69, $78, $77,   //1983
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $87,   //1984
    $A5, $B4, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //1985
    $A5, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //1986
    $95, $B4, $96, $A5, $96, $97, $88, $79, $78, $69, $78, $87,   //1987
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //1988
    $A5, $B4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1989
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $79, $77, $87,   //1990
    $95, $B4, $96, $A5, $86, $97, $88, $78, $78, $69, $78, $87,   //1991
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //1992
    $A5, $B3, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //1993
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1994
    $95, $B4, $96, $A5, $96, $97, $88, $76, $78, $69, $78, $87,   //1995
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //1996
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //1997
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //1998
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //1999
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2000
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2001
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //2002
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //2003
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2004
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2005
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2006
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $69, $78, $87,   //2007
    $96, $B4, $A5, $B5, $A6, $A6, $87, $88, $87, $78, $87, $86,   //2008
    $A5, $B3, $A5, $B5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2009
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2010
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $78, $87,   //2011
    $96, $B4, $A5, $B5, $A5, $A6, $87, $88, $87, $78, $87, $86,   //2012
    $A5, $B3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $87,   //2013
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2014
    $95, $B4, $96, $A5, $96, $97, $88, $78, $78, $79, $77, $87,   //2015
    $95, $B4, $A5, $B4, $A5, $A6, $87, $88, $87, $78, $87, $86,   //2016
    $A5, $C3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $87,   //2017
    $A5, $B4, $A6, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2018
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $79, $77, $87,   //2019
    $95, $B4, $A5, $B4, $A5, $A6, $97, $87, $87, $78, $87, $86,   //2020
    $A5, $C3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2021
    $A5, $B4, $A5, $A5, $A6, $96, $88, $88, $88, $78, $87, $87,   //2022
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $79, $77, $87,   //2023
    $95, $B4, $A5, $B4, $A5, $A6, $97, $87, $87, $78, $87, $96,   //2024
    $A5, $C3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2025
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2026
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //2027
    $95, $B4, $A5, $B4, $A5, $A6, $97, $87, $87, $78, $87, $96,   //2028
    $A5, $C3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2029
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2030
    $A5, $B4, $96, $A5, $96, $96, $88, $78, $78, $78, $87, $87,   //2031
    $95, $B4, $A5, $B4, $A5, $A6, $97, $87, $87, $78, $87, $96,   //2032
    $A5, $C3, $A5, $B5, $A6, $A6, $88, $88, $88, $78, $87, $86,   //2033
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $78, $88, $78, $87, $87,   //2034
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2035
    $95, $B4, $A5, $B4, $A5, $A6, $97, $87, $87, $78, $87, $96,   //2036
    $A5, $C3, $A5, $B5, $A6, $A6, $87, $88, $88, $78, $87, $86,   //2037
    $A5, $B3, $A5, $A5, $A6, $A6, $88, $88, $88, $78, $87, $87,   //2038
    $A5, $B4, $96, $A5, $A6, $96, $88, $88, $78, $78, $87, $87,   //2039
    $95, $B4, $A5, $B4, $A5, $A6, $97, $87, $87, $78, $87, $96,   //2040
    $A5, $C3, $A5, $B5, $A5, $A6, $87, $88, $87, $78, $87, $86,   //2041

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -