I will get my new psp in the end of this month, hope it would be 1.5 :\
Here is the code:
Code: Select all
-- Ngel V1.0 Menu Test !
green = Color.new(0, 255, 0)
select = 10
icon = Image.load("icon.png")
function delay(delay)
	for i = 1,delay do
	end
end
function choice(cho)
		screen:clear()
	if cho == 1 then
		screen:print(200, 200, "Option 1", green)
	end
	if cho == 2 then
		screen:print(200, 200, "Option 2", green)
	end
	if cho == 3 then
		screen:print(200, 200, "Option 3", green)
	end
	makemenu("0")
end
function makemenu(place)
if place == "down" then
	if select < 70 then
		select = select +30
		screen:clear()
	end
elseif place == "up" then
	if select > 10 then
		select = select - 30
		screen:clear()
	end
end
screen:print(200, 10, "Option 1", green)
screen:print(200, 40, "Option 2", green)
screen:print(200, 70, "Option 3", green)
screen:blit(177, select-6, icon)
screen.flip()
screen.waitVblankStart()
end
makemenu()
while true do
	pad = Controls.read()
	if pad:down() then
		makemenu("down")
		delay("9199900")
	end
	if pad:up() then
		makemenu("up")
		delay("9199900")
	end
	if pad:start() then
		break
	end
	if pad:select() then
		if select == 10 then
		choice(1)
		delay("9199900")
		end
		if select ==40 then
		choice(2)
		delay("9199900")
		end
		if select ==70 then
		choice(3)
		delay("9199900")
		end
	end	
end
fixed the problem!