Zanzer I post too much Reputation: 126 Joined: 09 Jun 2013 Posts: 3278
|
Posted: Thu Dec 17, 2015 11:34 pm Post subject: |
|
|
You are an odd one, indeed.
Code: | index = 0
spaces = 40
step = 1
values = {}
for i=0,spaces do
local text = "*"
for j=0,i do
text = " " .. text
end
values[i] = text
end
timer=createTimer(nil, false)
timer.Interval=100
timer.OnTimer=function(timer)
if index >= spaces then
step = -1
elseif index <= 0 then
step = 1
end
index = index + step
UDF1.CELabel1.SetCaption(values[index])
end
timer.Enabled=true |
|
|