Lu系统扩展动态库LuSystem之字典

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。

    （1）新建字典

2. !!!using("sys");
   
3. \\" C, a: V& o& a7 P( C8 u, Y2 U5 n6 R
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">\\" C, a: V& o& a7 P( C8 u, Y2 U5 n6 R</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

用函数dict生成字典更为方便：

2. !!!using("sys");7 u' d\\" \. Z2 _+ s2 P7 `
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">7 u' d\\" \. Z2 _+ s2 P7 `</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");- m8 R. |' v6 J; B; n7 V
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">- m8 R. |' v6 J; B; n7 V</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");/ \3 s* Z$ T3 T1 F
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">/ \3 s* Z$ T3 T1 F</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。

$ ?9 v; |, }) ~0 O$ D# [    （4）删除字典
5 Q5 `% ?7 q2 t1 h# P/ Z( u" `5 U% w
8 \3 l. g7 z6 ^8 U) C* m    删除指定键－值对：a.dict_del["aa","abc"];
% d1 _5 Y' _! ]: l
    清空字典：a.dict_clear();
, ]9 N6 T( }5 R9 ~/ M
    删除字典对象，但暂存在缓冲区：del[a];
3 q2 V. m3 m- N2 c6 t* v
3 R/ w  O8 s, J) X6 L! D9 Z& L    立即彻底删除字典对象：delete[a];

    （5）字典反序

2. !!!using("sys");
   
3. 3 o, z' u% b% ?
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<br /> <span style=\\"display:none\\">3 o, z' u% b% ?</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

结果：

1. dict{aa : 1.2 , abc : luu}dict{abc : luu , aa : 1.2}

复制代码

（6）字典存取效率测试：在字典a中添加若干元素，元素的键通过变换字符串str的值得到，sum用于求所有元素的值的和。

2. !!!using("sys");
   
3. ) T( t6 n2 \; j& @7 z1 S
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,, a7 p6 r' P) `( {2 Q! _7 U
   
6.   i=0, while{++i<=100, str[1]=i,
   
7. 7 q$ t$ M+ ^% u+ u
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}/ F+ V) `7 ?' x6 |; z4 Q. v' m
   
10.   },
    
11. 9 ?3 w, a/ g: t3 C' q
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},6 @$ r5 r) p  W6 f2 j3 {
    
14.   t0=clock(), sum=0,
    
15. 5 x! T6 O$ w# M# G\\" u
16.   i=0, while{++i<=100, str[1]=i,: g* h9 l# c$ X3 x7 H
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. 6 k\\" t, I8 v' G
20.   },
    
21. 7 T, t0 X7 N6 \8 E
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">) T( t6 n2 \; j& @7 z1 S</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">, a7 p6 r' P) `( {2 Q! _7 U</font><br />   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">7 q$ t$ M+ ^% u+ u</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">/ F+ V) `7 ?' x6 |; z4 Q. v' m</font><br />   },<br /> <span style=\\"display:none\\">9 ?3 w, a/ g: t3 C' q</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<font class=\\"jammer\\">6 @$ r5 r) p  W6 f2 j3 {</font><br />   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">5 x! T6 O$ w# M# G\\" u</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">: g* h9 l# c$ X3 x7 H</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">6 k\\" t, I8 v' G</span>   },<br /> <span style=\\"display:none\\">7 T, t0 X7 N6 \8 E</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=1550000009 N, A! z: w* {' ]
   
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码