|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
|
a={}for i=1,10 do a[i]={} for j=0,10 do if(i%2==0) then a[i][j]=0 end endendprint(a[9][10])print(a[10][10])print()--雙端隊列List={}function List.new() return {first = 0,last = -1}endfunction List.pushleft(list,value) local first= list.first-1 list[first] = value list.first= firstendfunction List.pushright(list,value) local last = list.last+1 list[last]= value list.last=lastendfunction List.popleft(list) local first=list.first if(first>list.last) then error("list is empty") end local res= list[first] list[first]=nil list.first=list.first+1 return resendfunction List.popright(list) local last = list.last if last<first then error("the list is empty") end local res = list[last] list[last]= nil list.last= list.last-1 return resendfunction List.display(list) if(list.first>list.last) then error("the list is empty",2) end for i=list.first ,list.last do print(list[i]) endendmylist=List.new()List.pushleft(mylist,12)List.pushleft(mylist,"00")List.pushright(mylist,34)List.pushright(mylist,56)List.display(mylist)print()function newStack () return {""}endfunction serialize(o) if type(o) == "number" then io.write(o) elseif type(o) == "string" then --不要手動加入引號，否則會有邊際效應 io.write(string.format("%q",o)) elseif type(o) == "table" then io.write("{\n") for i,v in pairs(o) do io.write(" "..i.." = ") serialize(v) io.write(",\n") end io.write("}\n") endendserialize(123)print()serialize("112233")print()tab = { a=11,haha="www" ,c=333}serialize(tab)function basicSerialize (o) if type(o) == "number" then return tostring(o) else return string.format("%q", o) endendfunction save (name, value, saved) saved = saved or {} -- 參數未傳入的初始化 io.write(name, " = ") if type(value) == "number" or type(value) == "string" then io.write(basicSerialize(value), "\n") elseif type(value) == "table" then if saved[value] then io.write(saved[value], "\tcircle\n") else saved[value] = name io.write("{}\n") for k,v in pairs(value) do local fieldname = string.format("%s[%s]", name, basicSerialize(k)) save(fieldname, v, saved) end end else error("cannot save a " .. type(value)) endenda = {x=1, y=2; {3,4,5}}a[2] = a -- 循環表a.z = a[1] -- 共享子表save('a',a) |
運行結果：
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
nil000123456123"112233"{ a = 11, c = 333, haha = "www",}a = {}a[1] = {}a[1][1] = 3a[1][2] = 4a[1][3] = 5a[2] = a circlea["y"] = 2a["x"] = 1a["z"] = a[1] circle |
