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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
4 M4 s+ H3 z. @" x1 o8 Y% C' D
    （1）新建字典

2. !!!using("sys");6 d- @( k, |2 M: i0 G0 p1 R
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">6 d- @( k, |2 M: i0 G0 p1 R</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");8 Z0 u5 Y2 x$ x4 n# g  i9 }: t
   
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">8 Z0 u5 Y2 x$ x4 n# g  i9 }: t</font><br /> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");* L8 L! ?6 @+ |, [/ v
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<font class=\\"jammer\\">* L8 L! ?6 @+ |, [/ v</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");
   
3. ( b0 `( M% R6 s
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<br /> <span style=\\"display:none\\">( b0 `( M% R6 s</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

    （4）删除字典

; h+ L/ A; [$ z% g/ s; p9 ^: m    删除指定键－值对：a.dict_del["aa","abc"];
/ x: o- n, C1 c1 J
2 s- c. E( |2 `) s    清空字典：a.dict_clear();

    删除字典对象，但暂存在缓冲区：del[a];

, d2 e* [+ h9 `$ x    立即彻底删除字典对象：delete[a];

9 D4 I! T+ H1 m+ h: `9 S( w* q    （5）字典反序

2. !!!using("sys");  O7 @, {2 z3 l( l# w1 M0 q6 o
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">  O7 @, {2 z3 l( l# w1 M0 q6 o</font><br /> 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");. w/ j4 b+ D( Y! n! O
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,2 @  R3 P  s7 H' E
   
6.   i=0, while{++i<=100, str[1]=i,' w2 N% Y% i' I8 m* U
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. 3 n# U2 n! y$ Y5 S* l; W' M8 i
10.   },
    
11. ( x; U5 D% c# R
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. 7 i( n% s1 G0 ^6 u* S; e3 g, P
14.   t0=clock(), sum=0,- ]$ |8 {2 w' T5 \. M8 k
    
16.   i=0, while{++i<=100, str[1]=i,6 f) o' x: v0 y\\" }* B$ }. \) g; C
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. 0 F( e7 X& l; R2 I0 c; H# N
20.   },9 Z0 i$ s) J7 F- a) O- E
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">. w/ j4 b+ D( Y! n! O</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<font class=\\"jammer\\">2 @  R3 P  s7 H' E</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">' w2 N% Y% i' I8 m* U</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">3 n# U2 n! y$ Y5 S* l; W' M8 i</span>   },<br /> <span style=\\"display:none\\">( x; U5 D% c# R</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">7 i( n% s1 G0 ^6 u* S; e3 g, P</span>   t0=clock(), sum=0,<font class=\\"jammer\\">- ]$ |8 {2 w' T5 \. M8 k</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">6 f) o' x: v0 y\\" }* B$ }. \) g; C</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">0 F( e7 X& l; R2 I0 c; H# N</span>   },<font class=\\"jammer\\">9 Z0 i$ s) J7 F- a) O- E</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   , D! x6 k4 B0 E
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码