142 lines
3.8 KiB
Lua
142 lines
3.8 KiB
Lua
-- Sample luaj program that presents an animated Applet designed to work
|
|
-- with the SampleApplet.java code in the examples/jse directory.
|
|
--
|
|
-- The Applet.init() method loads and executes this script with the Applet
|
|
-- as the first argument.
|
|
--
|
|
-- Other Applet lifecycle events are forwarded by the SampleApplet
|
|
-- by looking for these global variables and invoking them:
|
|
-- start()
|
|
-- stop()
|
|
-- paint(graphics)
|
|
-- update(graphics)
|
|
--
|
|
-- This basic applet handles key, and mouse input, has a basic animation loop,
|
|
-- and renders double-buffered graphics including the logo image in a swing frame.
|
|
--
|
|
local applet = (...)
|
|
print('loading', applet)
|
|
|
|
-- load the logo
|
|
local logo = applet:getImage(applet:getDocumentBase(), "logo.gif")
|
|
print('logo', logo)
|
|
|
|
-- implement the applet painting, start, and stop methods.
|
|
local animate,render
|
|
local prev, interval = 0,1/60
|
|
function update(graphics)
|
|
-- avoids clearing background
|
|
applet:paint(graphics)
|
|
end
|
|
function paint(graphics)
|
|
applet:repaint()
|
|
local curr = os.time()
|
|
local diff = curr - prev
|
|
if diff >= interval then
|
|
prev = curr
|
|
pcall(animate)
|
|
pcall(render, graphics)
|
|
end
|
|
end
|
|
function start()
|
|
applet:repaint()
|
|
end
|
|
function stop()
|
|
-- do nothing
|
|
end
|
|
|
|
-- the animation step moves the line endpoints
|
|
local x1,y1,x2,y2,xi,yi = 160,240,480,240,0,0
|
|
local vx1,vy1,vx2,vy2,vxi,vyi = -5,-6,7,8,3,1
|
|
local chars = {}
|
|
local advance = function(x,vx,max,rnd)
|
|
x = x + vx
|
|
if x < 0 then
|
|
return 0, math.random(2,10)
|
|
elseif x > max then
|
|
return max, math.random(-10,-2)
|
|
end
|
|
return x, vx
|
|
end
|
|
animate = function()
|
|
x1,y1,x2,y2 = x1+1,y1+1,x2-1,y2-1
|
|
local w,h = applet:getWidth(), applet:getHeight()
|
|
x1,vx1 = advance(x1,vx1,w)
|
|
y1,vy1 = advance(y1,vy1,h)
|
|
x2,vx2 = advance(x2,vx2,w)
|
|
y2,vy2 = advance(y2,vy2,h)
|
|
xi,vxi = advance(xi,vxi,w-100)
|
|
yi,vyi = advance(yi,vyi,h-100)
|
|
while #chars > 0 and chars[1].n <= 1 do
|
|
table.remove(chars, 1)
|
|
end
|
|
for i,c in pairs(chars) do
|
|
c.n = c.n - 1
|
|
end
|
|
end
|
|
|
|
-- the render step draws the scene
|
|
local bg = luajava.newInstance("java.awt.Color", 0x22112244,true);
|
|
local fg = luajava.newInstance("java.awt.Color", 0xffaa33);
|
|
local ct = luajava.newInstance("java.awt.Color", 0x44ffff33,true);
|
|
render = function(graphics)
|
|
local w,h = applet:getWidth(), applet:getHeight()
|
|
graphics:setColor(bg)
|
|
graphics:fillRect(0,0,w,h)
|
|
|
|
-- line
|
|
graphics:setColor(fg)
|
|
graphics:drawLine(x1,y1,x2,y2)
|
|
|
|
-- text
|
|
graphics:setColor(ct)
|
|
graphics:translate(w/2,h/2)
|
|
for i,c in pairs(chars) do
|
|
local s = 200 / (256-c.n)
|
|
graphics:scale(s, s)
|
|
graphics:drawString(c.text, c.x-4, c.y+6)
|
|
graphics:scale(1/s, 1/s)
|
|
end
|
|
graphics:translate(-w/2,-h/2)
|
|
|
|
-- image
|
|
graphics:drawImage(logo,xi,yi)
|
|
end
|
|
|
|
-- add mouse listeners for specific mouse events
|
|
applet:addMouseListener(luajava.createProxy("java.awt.event.MouseListener", {
|
|
mousePressed = function(e)
|
|
print('mousePressed', e:getX(), e:getY(), e)
|
|
x1,y1 = e:getX(),e:getY()
|
|
end,
|
|
-- mouseClicked = function(e) end,
|
|
-- mouseEntered = function(e) end,
|
|
-- mouseExited = function(e) end,
|
|
-- mouseReleased = function(e) end,
|
|
}))
|
|
|
|
applet:addMouseMotionListener(luajava.createProxy("java.awt.event.MouseMotionListener", {
|
|
mouseDragged = function(e)
|
|
-- print('mouseDragged', e:getX(), e:getY(), e)
|
|
x2,y2 = e:getX(),e:getY()
|
|
end,
|
|
-- mouseMoved= function(e) end,
|
|
}))
|
|
|
|
-- add key listeners
|
|
applet:addKeyListener(luajava.createProxy("java.awt.event.KeyListener", {
|
|
keyPressed = function(e)
|
|
local id, code, char = e:getID(), e:getKeyCode(), e:getKeyChar()
|
|
local text, s, c = e:getKeyText(code), pcall(string.char, char)
|
|
print('key id, code, char, text, pcall(string.char,char)', id, code, char, text, c)
|
|
table.insert(chars, {
|
|
n=255,
|
|
x=-6+12*math.random(),
|
|
y=-6+12*math.random(),
|
|
text=(s and c or '[?]')})
|
|
end,
|
|
-- ckeyReleased = function(e) end,
|
|
-- keyTyped = function(e) end,
|
|
}))
|
|
|