You are welcome.. (and some more demo code)

Happy to see you having started writing your home code, jimmyjoejack.. I also code on my Treo in bed (till my wife kicks me out)  :)

Since I cannot upload files to the files section any more, I copy-pasted here some more demonstration codes I wrote. There are 9 programs separated with asterices. Just copy them in a new .txt file on your desktop, then copy these text files on your SD card's PALM\Programs\Plua\SRC folder, then change the extensions to lower case ".lua". You can access and run them in Plua after changing to "Card"...

Here we go...


*********************************************************************

-- ** Combinatorial Mathematics **

function fact(x)
   local mult=1
   for i=1,x do
   mult=mult*i
   end
  return mult
end

function getnumbers()
  local p=gui.gettext(num1field)
  if p=="" then gui.alert("You cannot leave a field blank.") return nil,nil end
  if tonumber(p)==nil then gui.alert("Only numbers.") return end
  p=tonumber(p)
  if p~=tonumber(string.format("%d", p)) then gui.alert("Integral numbers please.") return nil,nil end
  local q=gui.gettext(num2field)
  if q=="" then gui.alert("You cannot leave a field blank.") return nil,nil end
  if tonumber(q)==nil then gui.alert("Only numbers.") return end
  q=tonumber(q)
  if q~=tonumber(string.format("%d", q)) then gui.alert("Integral numbers please.") return nil,nil end
  if p<q then gui.alert("First argument cannot be smaller than the second.") return nil,nil end
  return p,q
end
 
function permu()
  local p,q=getnumbers()
  if p==nil or q==nil then return end
  screen.moveto(0,200)
  print("                                                                       ")
  print("                                                                       ")
  print("                                                                       ")
  screen.moveto(0,200)
  local k=fact(p)/fact(p-q)
  s="   The permutation of  ( "..tostring(p).." , "..tostring(q).." )  is "
  print(s)
  print()
  print("     ",k)
  return
end

function combi()
   local p,q=getnumbers()
   if p==nil or q==nil then return end
   screen.moveto(0,200)
   print("                                                                        ")
   print("                                                                        ")        
   print("                                                                        ")
   screen.moveto(0,200)
   local k=fact(p)/(fact(q)*fact(p-q))
   s="   The combination of  ( "..tostring(p).." , "..tostring(q).." )  is "
   print(s)
   print()
   print("     ",k)
   return
end

gui.title("COMBINATORIAL MATHEMATICS")
screen.moveto(10,50)
num1field=gui.field(1,10,10,"",not nil,nil)
screen.moveto(140,50)
num2field=gui.field(1,10,10,"",not nil,nil)
screen.moveto(5,100)
butcomb=gui.button("combination")
screen.moveto(133,100)
butperm=gui.button("permutation")
screen.moveto(180,270)
exitbtn=gui.button("Quit")
screen.rect(6,48,92,28)
screen.rect(132,48,92,28)
gui.setfocus(num1field)

while true do
 ev,id=gui.event()
  if ev==appStop then break end
  if ev==ctlSelect and id==butperm then permu() end
  if ev==ctlSelect and id==butcomb then combi() end
  if ev==ctlSelect and id==exitbtn then os.exit() end
end


*********************************************************************


-- ** Random colored disks, fun to watch.. **

screen.clear()
while true do
x=math.random(320)
y=math.random(320)
c=screen.rgb(math.random()*256,math.random()*256,math.random()*256)
r1=math.random(160)
r2=math.random(160)
screen.disc(x,y,r1,r2,c)
ev=gui.event(0)
if ev==appStop then break end
end


**********************************************************************


--   **  Simple demostration game **


function  initfile()
points=0
person={}
f,numrec=io.open("db:/Gamehigh.ber","r+")
if numrec==0 then person={"nobody",0}
        data=bin.pack("SB", person)
        f:createrec(string.len(data))
        f:openrec(0)
        f:write(data)
        high=0
        f:closerec() end
f:openrec(0)
data=f:read("*a")
person=bin.unpack("SB", data)
high=person[2]
f:closerec()
f:close()
end

function play()
shots={}
gui.destroy()
for n=1,10 do
gui.title("Points: "..points)
  for i=1,n do
     if shots[i]==1 then screen.disc(120+i*16,14,8,6,screen.rgb(0,255,0))
     else screen.disc(120+i*16,14,8,6,screen.rgb(255,0,0))
     end
  end  
os.sleep(0.1+3*math.random())
x=math.random(300)+10
y=math.random(270)+40
screen.disc(x,y,10,10,screen.rgb(255,0,0))
t=os.clock()
while true do
ev,inx,iny=gui.event(0)  
   if ev==appStop then os.exit() end
   if os.clock()-t>0.5 then break end
   if    ((ev==penDown)
   and (inx>x-10) and (inx<x+10)
   and (iny>y-10) and (iny<y+10))
   then
       points=points+1
       screen.disc(x,y,10,10,screen.rgb(0,0,255))
       os.sleep(0.1)
       shots[n]=1
       break end
   end
   end
end

function trunk()
if points>high then
      newrecname=gui.input("You broke the record !  Enter your name:")
      person[1]=newrecname
      person[2]=points
      f=io.open("db:/Gamehigh.ber","r+")
      f:removerec(0)
      data=bin.pack("SB", person)
      f:createrec(string.len(data))
      f:openrec(0)
      f:write(data)
      f:closerec()
      f:close()
      high=points
      end
screen.clear()
gui.title("Hunt 'em down ! !")
screen.moveto(130,180)
print("Last game points: "..points)
screen.moveto(130,210)
print("High score: "..high.." by "..person[1])
screen.moveto(130,130)
startbtn=gui.control{type="button",text="Start",width=100}
screen.moveto(250,270)
quitbtn=gui.button("Quit")
screen.moveto(80,80)
gui.label("Press Start to begin...")
points=0
end


initfile()
trunk()
while true do
e,v=gui.event()
if e==appStop then os.exit() end
if e==ctlSelect and v==startbtn then
    play()
    trunk()
    end
if e==ctlSelect and v==quitbtn then os.exit() end
end


*********************************************************************


-- ** Reflecting ball on screen **  
-- ** You can also draw a full circle, but buffering makes it slightly faster.**

screen.clear(0)
bufempty=buffer.get(0,0,10,10)
screen.disc(5,5,5,5,16777215)
buffull=buffer.get(0,0,10,10)

function makecircle()
buffer.put(bufempty,xo,yo)
buffer.put(buffull,x,y)
end

screen.clear(0)
x=50+math.random(130)
y=50+math.random(130)
repeat
xd=math.random(3)-1
until xd~=0
repeat
yd=math.random(3)-1
until yd~=0

while true do
xo,yo=x,y
x=x+xd
y=y+yd
if x>315 then xd=math.random(3)-3
   elseif x<5 then xd=math.random(3)
   elseif y>315 then yd=math.random(3)-3
   elseif y<5 then yd=math.random(3)
   end
if gui.event(0)==appStop then break end
makecircle()
end


*********************************************************************


-- ** Draw on the screen **

screen.clear(0)
white=screen.rgb(255,255,255)
while true do  
  ev,x,y = gui.event()
  if ev==penDown then xo=x yo=y end
  if ev ==penMove  then
  screen.line(xo,yo,x,y,white)
  xo=x yo=y
  elseif ev == appStop then os.exit()
  end  
end


*********************************************************************


-- **  Using sound.tone and slider **

function ex()
screen.clear()
screen.moveto(70,150)
print("Thanks for using me...")
os.sleep(1)
os.exit()
end

function act()
screen.font(7)
screen.moveto(10,280)
print("                                      ")
screen.moveto(10,280)
screen.color(screen.rgb(200,0,0),bckgrnd)
print("Now playing...")
sound.tone(freq,dur,vol)
screen.moveto(10,280)
print("                                      ")
screen.moveto(10,280)
screen.color(screen.rgb(0,160,0),bckgrnd)
print("Finished.")
end

function pr()
screen.font(0)
screen.color(0,bckgrnd)
screen.moveto(240,147)
print("        ")
screen.moveto(240,147)
print(freq-1)
screen.moveto(260,187)
print("        ")
screen.moveto(260,187)
print(math.floor(dur/100)/10)
screen.moveto(260,227)
print("        ")
screen.moveto(260,227)
print(math.floor(vol*1.5625))
end

bckgrnd=screen.rgb(190,190,250)
screen.clear(bckgrnd)
screen.moveto(10,30)
screen.color(screen.rgb(0,0,200),bckgrnd)
screen.font(7)
print("H      I      G      H      A      U      D      I      O")
screen.line(10,55,310,55)
screen.font(0)
screen.color(0,bckgrnd)
btnbeep=gui.control{type="button",text="S o u n d",x=150,y=80,width=80,height=40,font=1}
btnquit=gui.control{type="button",text="QUIT",x=270,y=280,width=36,height=20,font=3}
screen.moveto(40,220)
v=gui.slider(200,64)
screen.moveto(40,180)
d=gui.slider(200,10000)
screen.moveto(40,140)
f=gui.slider(200,9999)
screen.moveto(2,227) print("Vol")
screen.moveto(2,187) print("Time")
screen.moveto(2,147) print("Freq")
screen.moveto(294,227) print("%")
screen.moveto(294,187) print("sec")
screen.moveto(294,147) print("Hz")
freq,dur,vol=10001,0,1
pr()
gui.setfocus(btnbeep)

while true do
ev,id,value=gui.event()
if ev==appStop then ex() end
if ev==ctlSelect and id==f then freq=10000+value end
if ev==ctlSelect and id==d then dur=value end
if ev==ctlSelect and id==v then vol=value end
if ev==ctlSelect and id==btnbeep then act() end
if ev==ctlSelect and id==btnquit then ex() end
pr()
end


**********************************************************************


-- ** Classic "Life"  loop **
-- ** Ofcourse, having a 16x16 grid makes the loop faster.. **

function init()
screen.clear()
cell={}
cellnext={}
for i=1,32 do cell[i]={} end
for i=1,32 do cellnext[i]={} end
for i=1,250 do
cell[math.random(32)][math.random(32)]=1
end
end

function drawworld()
screen.clear()
for x=1,32 do
for y=1,32 do
if cell[x][y]==1 then screen.box((x-1)*10,(y-1)*10,8,8) end
end
end
end

function tick()
for x=1,32 do
for y=1,32 do
sum=0
if x>1 and y>1 and cell[x-1][y-1]==1 then sum=sum+1 end
if y>1 and cell[x][y-1]==1 then sum=sum+1 end
if x<32 and y>1 and cell[x+1][y-1]==1 then sum=sum+1 end
if x>1 and cell[x-1][y]==1 then sum=sum+1 end
if x<32 and cell[x+1][y]==1 then sum=sum+1 end
if x>1 and y<32 and cell[x-1][y+1]==1 then sum=sum+1 end
if y<32 and cell[x][y+1]==1 then sum=sum+1 end
if x<32 and y<32 and cell[x+1][y+1]==1 then sum=sum+1 end
if sum<2 then cellnext[x][y]=0 end
if sum>3 then cellnext[x][y]=0 end
if (sum==2 or sum==3) and cell[x][y]==1 then cellnext[x][y]=1 end
if sum==3 and cell[x][y]==0 then cellnext[x][y]=1 end
end
end
cell=cellnext
end

init()
while true do
if gui.event(0)==appStop then os.exit() end
drawworld()
tick()
end


**********************************************************************


-- ** Buffers can be used to show BMP
-- ** files, but not jpg's...

screen.clear()
screen.moveto(70,50)
screen.font(7)
print("This is it !")
id,height,width=buffer.read("vfs0:/PALM/PROGRAMS/Plua/SRC/SUZUKIGSR600A-K7.bmp")  -- for example, my bike's pic..
buffer.put(id,0,0,3)
screen.moveto(100,100)
screen.font(0)
g=gui.button("This") -- you can have gui elements on a foreground..
screen.line(0,0,320,320) --...or draw something on them..
gui.main()


**********************************************************************


--  **  scrolling text like in eReader etc..  **

function newline()
buffer.use(vbuf)
screen.moveto(math.random(180),320)
print(math.random())
end

vbuf=buffer.new(320,340)
newline()

while true do
buffer.use()
for i=1,22 do
buffer.put(vbuf,0,-i)
--os.sleep(0.02) -- set the scrolling speed
if gui.event(0)==appStop then os.exit() end
end
buffer.free(vbuf)
vbuf=buffer.get(0,0,320,340)
newline()
end


**********************************************************************

END OF FILES...