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

forcal

    字典（dict）是一个可直接存取的双向链表，可以存放若干任意的Lu数据。字典元素由“键－值”对组成，键只能是字符串，但值可以是任何Lu数据类型。
9 j! W7 n# n& b# ?2 ~1 B
" R  \! e4 I% _2 l" J    （1）新建字典

2. !!!using("sys");6 N) l: D7 J9 g2 r& ?% X: x
   
4. new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<font class=\\"jammer\\">6 N) l: D7 J9 g2 r& ?% X: x</font><br /> new[dict, "aa":1.2, "abc":"luuu"].o[];    //用函数new生成字典，有2组初始化数据。函数o用于输出字典。

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

2. !!!using("sys");
   
3.   K2 A& L8 X1 t7 W
4. dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

!!!using("sys");<br /> <span style=\\"display:none\\">  K2 A& L8 X1 t7 W</span> dict["aa":1.2, "abc":"luuu"].o[];         //用函数dict生成字典，有2组初始化数据。函数o用于输出字典。

（2）得到字典元素

2. !!!using("sys");
   
3. ! e2 u: w: ^4 B- D
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

!!!using("sys");<br /> <span style=\\"display:none\\">! e2 u: w: ^4 B- D</span> main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a."aa", a."abc"];

（3）增加字典元素

2. !!!using("sys");0 H\\" p8 l* k* g+ A
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

!!!using("sys");<font class=\\"jammer\\">0 H\\" p8 l* k* g+ A</font><br /> main(:a)= a=dict["aa":1.2, "abc":"luu"], a."cc"=a."abc"+"88", o[a];

说明：当往字典中增加元素时，若已存在该键，则进行更新。
) p3 T- P" \) ]+ J6 S7 x% Y% O/ |
# Q% U; g/ w) y9 e9 v. k' v    （4）删除字典
# Q( |0 R& C3 W% x" `
; T/ ^: e6 Q7 `4 T: }* ?) u    删除指定键－值对：a.dict_del["aa","abc"];

    清空字典：a.dict_clear();
" y7 a: x/ O1 Q; @& l
; @( K0 J7 B9 ^. ]5 Q    删除字典对象，但暂存在缓冲区：del[a];

% r( E6 O' G6 D/ P, q    立即彻底删除字典对象：delete[a];

1 o8 v( g% L$ W    （5）字典反序

2. !!!using("sys");, b; w; O! p+ ?) ]4 A\\" X
   
4. main(:a)= a=dict["aa":1.2, "abc":"luu"], o[a], o[a.dict_reverse()];

!!!using("sys");<font class=\\"jammer\\">, b; w; O! p+ ?) ]4 A\\" X</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");
   
3. 0 F& a% K  @$ B7 |1 Y+ s8 \
4. main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,
   
5. 3 N. f  N6 n, v
6.   i=0, while{++i<=100, str[1]=i,! d' o3 V0 x( F$ a. K1 c2 s- C
   
8.     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}
   
9. % T$ g  z. s9 O) }7 S
10.   },
    
11. 0 `4 T) q/ `\\" R- h- ~% y
12.   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},
    
13. 7 \* C/ k9 [: F' M
14.   t0=clock(), sum=0,
    
15. 9 A* A7 P$ C6 ^( o  E# E; O; ^
16.   i=0, while{++i<=100, str[1]=i,
    
17. ; }% C9 E: v+ [+ G! P$ W; J. Y, }. Z
18.     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}
    
19. 5 C\\" b# r/ E2 a4 h* K3 g. x
20.   },- ~( c3 {\\" v6 F2 ~2 R* E
    
22.   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

!!!using("sys");<br /> <span style=\\"display:none\\">0 F& a% K  @$ B7 |1 Y+ s8 \</span> main(:a,i,j,str,t0,sum)= t0=clock(), a=dict[], str="aaaa", sum=0,<br /> <span style=\\"display:none\\">3 N. f  N6 n, v</span>   i=0, while{++i<=100, str[1]=i,<font class=\\"jammer\\">! d' o3 V0 x( F$ a. K1 c2 s- C</font><br />     j=1000, while{j<2000, str[2]=j, sum=sum+i+j, a.str=i+j, j++}<br /> <span style=\\"display:none\\">% T$ g  z. s9 O) }7 S</span>   },<br /> <span style=\\"display:none\\">0 `4 T) q/ `\\" R- h- ~% y</span>   o{"\r\n创建字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum},<br /> <span style=\\"display:none\\">7 \* C/ k9 [: F' M</span>   t0=clock(), sum=0,<br /> <span style=\\"display:none\\">9 A* A7 P$ C6 ^( o  E# E; O; ^</span>   i=0, while{++i<=100, str[1]=i,<br /> <span style=\\"display:none\\">; }% C9 E: v+ [+ G! P$ W; J. Y, }. Z</span>     j=1000, while{j<2000, str[2]=j, sum=sum+a.str, j++}<br /> <span style=\\"display:none\\">5 C\\" b# r/ E2 a4 h* K3 g. x</span>   },<font class=\\"jammer\\">- ~( c3 {\\" v6 F2 ~2 R* E</font><br />   o{"\r\n查询字典耗时", [clock()-t0]/1000., "秒。共", len(a), "个元素。sum=", sum, "\r\n"};

结果：

1. 创建字典耗时0.89000000000000001秒。共100000个元素。sum=155000000
   6 l/ A' ]' U/ M/ I9 N
2. 查询字典耗时9.4e-002秒。共100000个元素。sum=155000000

复制代码