Hi i wanna make a lua program (Unsure about game)
And i successfully made my first SUPER HELLO WORLD
Here's the code to the super hello world.
PHP Code:
green = Color.new(0, 255, 0)
yellow = Color.new(255, 255, 0)
red = Color.new(255, 0, 0);
black = Color.new(0, 0, 0);
white = Color.new(255, 255, 255);
screen:print(194, 136, "Loading: 30%", yellow)
screen.flip()
screen.waitVblankStart(60)
screen:print(194, 126, "Loading: 60%", yellow)
screen.flip()
screen.waitVblankStart(60)
screen:print(194, 116, "Loading: 100%", yellow)
screen.flip()
screen.waitVblankStart(60)
time = 0
pi = math.atan(1) * 4
background = Image.load("background.png")
smiley = Image.load("smiley.png")
helloworld = Image.load("helloworld.png")
while true do
screen:blit(0, 0, background, 0, 0, background:width(), background:height(), false)
x = math.sin(pi * 2 / 250 * time) * 200 + 220.5
y = 172 - math.abs(math.sin(pi * 2 / 125 * time) * 150)
screen:blit(x, y, smiley)
time = time + 1
if time >= 500 then
time = 0
screen:blit(0, 0, helloworld, 0, 0, helloworld:width(), helloworld:height(), false)
screen:print(170, 136, "c5cha7's Hello World!", green)
screen.flip()
screen.waitVblankStart(440)
end
screen.waitVblankStart()
screen.flip()
pad = Controls.read()
if pad:start() then
break
end
end
But know i am making a PSP XMB Player.
What it doe's is make's a Window's XP Feeling to your PSP
But i cannot get it to run so here's the code if anyone can help.
PHP Code:
green = Color.new(0, 255, 0)
yellow = Color.new(255, 255, 0)
red = Color.new(255, 0, 0);
black = Color.new(0, 0, 0);
white = Color.new(255, 255, 255);
mainmenuimg = Image.load("Data/Images/mainmenu.png")
optionmenuimg = Image.load("Data/Images/optionmenu.png")
menupointerimg = Image.load("Data/Images/menupointer.png")
mouse = Image.load("Data/Images/mouse.png")
splashimg = Image.load("Data/Images/Intro/splash.png")
click1 = Image.load("Data/Images/Intro/Click1.png")
click2 = Image.load("Data/Images/Intro/Click2.png")
open1 = Image.load("Data/Images/Open.png")
background = Image.load("Data/Images/BG/background.png")
Folder1 = Image.load("Data/Images/Folder/folder1.png")
Folder2 = Image.load("Data/Images/Folder/folder2.png")
click = Sound.load("Data/Sounds/click.wav")
System.usbDiskModeActivate()
function mouseControl()
pad = Controls.read()
dx = pad:analogX()
if math.abs(dx) > 32 then
x0 = x0 + dx /(mousespeed)
end
dy = pad:analogY()
if math.abs(dy) > 32 then
y0 = y0 + dy /(mousespeed)
end
x1 = x0
y1 = y0
if pad:start() then
screen.waitVblankStart(30)
return "menu"
end
end
--Option menu
function optionmenu()
oldoptionMenuPad = Controls.read()
loopoptionmenu = true
while loopoptionmenu do
screen:blit(0, 0, optionmenuimg, false)
optionMenuPad = Controls.read()
if optionMenuPad ~= oldoptionMenuPad then
if optionMenuPad:cross() then
screen.waitVblankStart(10)
mainmenu()
loopoptionmenu = false
end
oldoptionMenuPad = optionMenuPad
end
screen:print(103, 240, "Press X to return to main menu.", red)
screen.waitVblankStart()
screen.flip()
end
end
--The Main Menu function
function mainmenu()
oldmainMenuPad = Controls.read()
mainMenuSelection = 1
loopmainmenu = true
while loopmainmenu do
screen:blit(0, 0, mainmenuimg, false)
if mainMenuSelection == 1 then
screen:blit(120, 120, menupointerimg)
elseif mainMenuSelection == 2 then
screen:blit(120, 200, menupointerimg)
end
screen.waitVblankStart()
screen.flip()
mainMenuPad = Controls.read()
if mainMenuPad ~= oldmainMenuPad then
if mainMenuPad:down() then
mainMenuSelection = mainMenuSelection + 1
click:play()
if mainMenuSelection > 2 then
mainMenuSelection = 1
end
end
if mainMenuPad:up()then
click:play()
mainMenuSelection = mainMenuSelection - 1
if mainMenuSelection < 1 then
mainMenuSelection = 2
end
end
if mainMenuPad:cross() then
click:play()
if mainMenuSelection == 1 then
getready()
loopmainmenu = false
elseif mainMenuSelection == 2 then
optionmenu()
loopmainmenu = false
end
end
oldmainMenuPad = mainMenuPad
end
end
end
--Animations
function folder1()
screen:blit(0, 0, background, false)
screen:print(5, 5, string.format("PSP XMB V0.1"))
screen:print(350, 5, string.format("Time:".. time))
screen:blit(1, 1, folder1)
screen:blit(x1, y1, mouse)
screen:blit(x1 - 2, y1 - 2, open1)
screen.waitVblankStart()
end
mainmenu()
while true do
time = time - 1
pad = Controls.read()
if pad:select() then
mainmenu()
end
if targetControl() == "menu" then
mainmenu()
end
if didShotHit() == "hit" then
click:play()
open()
end
if didShotHit() == "headshot" then
click:play()
open()
end
screen:blit(0, 0, background, false)
screen:print(5, 5, string.format("PSP XMB V0.1"))
screen:print(350, 5, string.format("Time:".. time))
screen:blit(2, 2, Folder1)
end
screen:blit(x1, y1, mouse)
screen.waitVblankStart()
screen.flip()
end
end
Lua Player Game/App Help
you can edit the sensitivity by fooling with the "/ 64" part
