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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
' J" Y! o3 `0 K7 h' z4 r
' M% K: w2 \8 N/ b. F; S3 Y    （1）新建字典

2. !!!using("sys");
   
3. & y$ }8 X\\" k. `! y% Q
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">& y$ }8 X\\" k. `! y% Q</span> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3. + Z% d2 }6 R; n, o' V
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">+ Z% d2 }6 R; n, o' V</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. $ L  ], w* v3 H4 w7 X: E  p
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">$ L  ], w* v3 H4 w7 X: E  p</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");+ U& N7 {# G2 |; Q
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">+ U& N7 {# G2 |; Q</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

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

. W. C. q0 c" @    （4）删除字典

    删除指定键－值对：a.dict_del["aa","abc"];
1 E" b5 s7 p1 J3 Z+ [* u
    清空字典：a.dict_clear();
) A. r, @; A/ E5 z
    删除字典对象，但暂存在缓冲区：del[a];

- q- q& f' I9 d" x7 S$ ?    立即彻底删除字典对象：delete[a];

7 Y) s3 g! p1 Y2 `+ {, q) B    （5）字典反序

2. !!!using("sys");6 C' g\\" e3 {8 N+ `
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">6 C' g\\" e3 {8 N+ `</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");& h) r2 s# H1 Z# M2 Z; ~6 X
   
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 3 N+ Y. Q  ^! F8 a; ~8 @
6.   i=0, while{++i<=100, str[1]=i,
   
7. 0 F7 H! [2 Z: H% n( r7 T
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}+ d4 l4 b+ W) N\\" ?1 q/ p
   
10.   },- q  @+ P/ A' k4 f. y0 s; T5 X
    
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. 9 P7 }3 b- B! _  c7 |
14.   t0=clock(), sum=0,; T( B. d0 \/ T4 y$ \% @9 {
    
16.   i=0, while{++i<=100, str[1]=i,, ?5 N. v\\" T! E3 o9 X1 [
    
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}2 z* d* {6 J' Q; R( w+ t* d
    
20.   },
    
21.   c) I, `9 `1 k4 S# t. l
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<font class=\\"jammer\\">& h) r2 s# H1 Z# M2 Z; ~6 X</font><br /> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">3 N+ Y. Q  ^! F8 a; ~8 @</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">0 F7 H! [2 Z: H% n( r7 T</span>     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<font class=\\"jammer\\">+ d4 l4 b+ W) N\\" ?1 q/ p</font><br />   },<font class=\\"jammer\\">- q  @+ P/ A' k4 f. y0 s; T5 X</font><br />   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">9 P7 }3 b- B! _  c7 |</span>   t0=clock(), sum=0,<font class=\\"jammer\\">; T( B. d0 \/ T4 y$ \% @9 {</font><br />   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">, ?5 N. v\\" T! E3 o9 X1 [</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<font class=\\"jammer\\">2 z* d* {6 J' Q; R( w+ t* d</font><br />   },<br /> <span style=\\"display:none\\">  c) I, `9 `1 k4 S# t. l</span>   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   ' J; _5 Z2 q  A8 W: H
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码