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
|
--Show various debug information
module(..., package.seeall)
-- This will show all tables and their values as debug information
--
-- USAGE: <?
-- USAGE: require("debugs")
-- USAGE: io.write(debugs.variables(view))
-- USAGE: ?>
function variables ( view )
debuginfo = [[
<span style='color:#D2691E;font-family:courier;'>
<h2>DEBUG INFO: THIS VIEW CONTAINS THE FOLLOWING VARIABLES/TABLES</h2>
------------ START DEBUG INFORMATION ------------<BR>]]
--print ("<span style='color:darkblue;font-family:courier;'>")
for a,b in pairs(view) do
if not (type(b) == "table") then
debuginfo = debuginfo .. "<b>" .. a .. "</b>: ><span2 style='color:black'>" .. b .. "</span2><<BR>"
else
debuginfo = debuginfo .. "<b>" .. a .. "</b>:...<BR>"
for c,d in pairs(view[a]) do
if not (type(d) == "table") then
debuginfo = debuginfo .. "<b> { " .. c .. "</b>: ><span2 style='color:black'>" .. d .. "</span2>< <B> }</B><BR>"
else
debuginfo = debuginfo .. "<b> { " .. c .. "</b>:...<BR>"
for e,f in pairs(view[a][c]) do
if not (type(f) == "table") then
debuginfo = debuginfo .. "<b> { { " .. e .. "</b>: ><span2 style='color:black'>" .. f .. "</span2>< <B> } }</B><BR>"
else
debuginfo = debuginfo .. "<b> { { " .. e .. "</b>:...<BR>"
for g,h in pairs(view[a][c][e]) do
if not (type(h) == "table") then
debuginfo = debuginfo .. "<b> { { { " .. g .. "</b>: ><span2 style='color:black'>" .. h .. "</span2>< <B> } } }</B><BR>"
else
debuginfo = debuginfo .. "<b> { { { " .. g .. "</b>:...<BR>"
for i,j in pairs(view[a][c][e][g]) do
if not (type(j) == "table") then
debuginfo = debuginfo .. "<b> { { { { " .. i .. "</b>: ><span2 style='color:black'>" .. j .. "</span2>< <B> } } } }</B><BR>"
else
debuginfo = debuginfo .. "<b> { { { " .. i .. "</b>:...<BR>"
for k,l in pairs(view[a][c][e][g][i]) do
if not (type(l) == "table") then
debuginfo = debuginfo .. "<b> { { { { { " .. i .. "</b>: ><span2 style='color:black'>" .. l .. "</span2>< <B> } } } } }</B><BR>"
end
end
end
end
end
end
end
end
end
end
end
a,b,c,d,e,f,g,h,i,j = nil,nil,nil,nil,nil,nil,nil,nil,nil,nil
end
debuginfo = debuginfo .. "------------ END DEBUG INFORMATION ------------</span>"
return debuginfo
end
|
