Lua Programming Help Thread

[Anti-QuickJay]

Post that part of code please.
You need to input a "then" by a "="

[SportzOwner]

red = Color.new(255,0,0)
black = Color.new(0,0,0)
white = Color.new(255,255,255)

menustatus = 1

while true do
screen:clear(black)
pad = Controls.read()

if pad:up() then
menustatus = menustatus - 1
screen.waitVblankStart(4)
end

if pad:down() then
menustatus = menustatus + 1
screen.waitVblankStart(4)
end

color={white, white, white, white}

screenrint(50,50,"Road To St. Louis", color[1])
screenrint(50,60,"Exhibition", color[2])
screenrint(50,70,"Options", color[3])
screenrint(50,80,"Exit", color[4])

color[menustatus]=red

if menustatus == 1 then
if pad:cross() then
--insert game code here
end
end

if menustatus == 2 then
if pad:cross() then
--insert Exhibition here
end
end

if menustatus == 3 then
-- inserts options here
}

while true do
if up1() and then cursor=cursor-1 end
if down1() and then cursor=cursor+1 end

if cursor==0 then cursor=2 end
if cursor==3 then cursor=1 end

screen:clear(black)
list_options(8,8,options, ">",1,white,red,curso r)
screen:flip()

if cross1() or circle1() then
if cursor==1 then
--Insert Code Here
elseif cursor==2 then
--Insert Code Here
elseif cursor==3 then
--Insert Code Here
elseif cursor==4 then
--Insert Code Here
elseif cursor==5 then
--Insert Code Here
end
end

if menustatus == 4 then
if pad:cross() then
break
end
end

if menustatus <= 0 then
menustatus = 4
end

if menustatus => 5 then
menustatus = 1
end

screen.flip()
screen.waitVblankStart()
end

-= Double Post =-
Opps I forgot to remove some of the Ends to show what the file was like before, ill look at it soon.
-= Double Post =-
Fixed

[SG57]

Um im trying to fix your code via formatting, yet I can't work anything out... Example - why the hell is there a random '}' in the middle there?

[Anti-QuickJay]

Dont you need the options?

options = {
   "Option 1",
   "Option 2"
 }

-= Double Post =-
Now that I look at it, Your combining that Menu Status snippet with the list_options example.

[SportzOwner]

Opps i think thats suppose to be a end end there, i had another code in there, but removed it to show what it was like, that explains my newest error. :), i didn't look hard enough and it was 2 am.
-= Double Post =-
Opps i still had some of the extra code in there. From the options, and i removed half of it in the last code heres what it suppose to be.

red = Color.new(255,0,0)
black = Color.new(0,0,0)
white = Color.new(255,255,255)

menustatus = 1

while true do
screen:clear(black)
pad = Controls.read()

if pad:up() then
menustatus = menustatus - 1
screen.waitVblankStart(4)
end

if pad:down() then
menustatus = menustatus + 1
screen.waitVblankStart(4)
end

color={white, white, white, white}

screenrint(50,50,"Road To St. Louis", color[1])
screenrint(50,60,"Exhibition", color[2])
screenrint(50,70,"Options", color[3])
screenrint(50,80,"Exit", color[4])

color[menustatus]=red

if menustatus == 1 then
if pad:cross() then
--insert game code here
end
end

if menustatus == 2 then
if pad:cross() then
--insert Exhibition here
end
end

if menustatus == 3 then
-- inserts options here
end
end

if menustatus == 4 then
if pad:cross() then
break
end
end

if menustatus <= 0 then
menustatus = 4
end

if menustatus => 5 then
menustatus = 1
end

screen.flip()
screen.waitVblankStart()
end

-= Double Post =-
Okay I think i fixed the error, its now on line 50, no loop near break on the above code

Line 50 area, i know it saying it can't break

if menustatus == 4 then
if pad:cross() then
break
end
end

[Anti-QuickJay]

Remove the break and put something like System.Quit() or os.exit

[myschoo]

if menustatus == 3 then
-- inserts options here
end
end

remove 1 end

[SportzOwner]

1 end from all menu status?

and yes these are from the snippits, im trying them out, and i did have the options in it untill i moved it.
-= Double Post =-
Opps i left out the pad:cross out of the options

red = Color.new(255,0,0)
black = Color.new(0,0,0)
white = Color.new(255,255,255)

menustatus = 1

while true do
screen:clear(black)
pad = Controls.read()

if pad:up() then
menustatus = menustatus - 1
screen.waitVblankStart(4)
end

if pad:down() then
menustatus = menustatus + 1
screen.waitVblankStart(4)
end

color={white, white, white, white}

screenrint(50,50,"Road To St. Louis", color[1])
screenrint(50,60,"Exhibition", color[2])
screenrint(50,70,"Options", color[3])
screenrint(50,80,"Exit", color[4])

color[menustatus]=red

if menustatus == 1 then
if pad:cross() then
--insert game code here
end
end

if menustatus == 2 then
if pad:cross() then
--insert Exhibition here
end
end

if menustatus == 3 then
if pad:cross() then
-- inserts options here
end
end

if menustatus == 4 then
if pad:cross() then
System.Quit()
end
end

if menustatus <= 0 then
menustatus = 4
end

if menustatus => 5 then
menustatus = 1
end

screen.flip()
screen.waitVblankStart()
end

Now it should be right.

[Anti-QuickJay]

Remove the

screen.waitVblankStart(4)

and add a

oldpad = pad

behind the last vblank at the end of your code.

[SportzOwner]

Okay so we ended with

red = Color.new(255,0,0)
black = Color.new(0,0,0)
white = Color.new(255,255,255)

menustatus = 1

while true do
screen:clear(black)
pad = Controls.read()

if pad:up() then
menustatus = menustatus - 1
end

if pad:down() then
menustatus = menustatus + 1
end

color={white, white, white, white}

screen:print(50,50,"Road To St. Louis", color[1])
screen:print(50,60,"Exhib ition", color[2])
screen:print(50,70,"Optio ns", color[3])
screen:print(50,80,"Exit" , color[4])

color[menustatus]=red

if menustatus == 1 then
if pad:cross() then
--insert game code here
end
end

if menustatus == 2 then
if pad:cross() then
--insert Exhibition here
end
end

if menustatus == 3 then
if pad:cross() then
-- inserts options here
end
end

if menustatus == 4 then
if pad:cross() then
System.Quit()
end
end

if menustatus <= 0 then
menustatus = 4
end

if menustatus => 5 then
menustatus = 1
end

screen.flip()
screen.waitVblankStart()
oldpad = pad
end

Ill go test it.
-= Double Post =-

oldpad = pad

That gave off another then expected near = error as that is line 56

[emericaska8r]

if you are using the oldpad technique, then in each keypress if statement you need to do something like:

if pad:up() and oldpad:up() ~= pad:up() then ...

as for that error it spat out at you i'm not sure why that shouldn't have worked. try putting at the top of your code somewhere:

oldpad = Controls.read()

i'm not sure if that will fix it or not, i'll do some tests to see if it will real quick though
-= Double Post =-
ok after thinking about it, i'm not sure why that [then expected near "="] error came up, you would still need that oldpad = Controls.read() at the top of your code somewhere so that it is declared as a controls.read() variable before it is used. otherwise, on the first loop through it wouldn't even be a variable yet.

[SportzOwner]

Same error, just now its on line 70 because of extra coding put in.

pad = Controls.read()
oldpad = pad

currstate="startup"
function printCentered(y, text, color)
local tl=string.len(text)
local xmod = 240-((tl*10)/2)
screen:print(xmod, y, text, color)
end
-----------------
dofile("colors.lua")--contains all color codes, make one yourself
-----------------
screen:clear()
printCentered(131,"Starti ng up...",white)
screen.waitVblankStart(3)
screen.flip()
-----------------------------------------
function mainmenu()
menustatus = 1

while true do
screen:clear(black)


if pad:up() and oldpad:up() ~= pad:up() then
menustatus = menustatus - 1
end

if pad:down() and oldpad:down() ~= pad:down() then
menustatus = menustatus + 1
end

color={white, white, white, white}

screen:print(50,50,"Road To St. Louis", color[1])
screen:print(50,60,"Exhib ition", color[2])
screen:print(50,70,"Optio ns", color[3])
screen:print(50,80,"Exit" , color[4])

color[menustatus]=red

if menustatus == 1 then
if pad:cross() and oldpad:cross() ~= pad:cross() then
--insert game code here
end
end

if menustatus == 2 then
if pad:cross() and oldpad:cross() ~= pad:cross() then
--insert Exhibition here
end
end

if menustatus == 3 then
if pad:cross() and oldpad:cross() ~= pad:cross() then
-- inserts options here
end
end

if menustatus == 4 then
if pad:cross() and oldpad:cross() ~= pad:cross() then
System.Quit()
end
end

if menustatus <= 0 then
menustatus = 4
end

if menustatus => 5 then
menustatus = 1
end

screen.flip()
screen.waitVblankStart()
end
end

---------------------------
screen:clear()
printCentered(131,"Press Start",white)
screen.waitVblankStart()
screen.flip()
if pad:start() and oldpad:start() ~= pad:start() then
currstate="menu"
end
end
----------------------------

if currstate = "menu" then
menu()
end
end

[emericaska8r]

ok. that all worked, and i found out that your error was that you put

if menustatus => 5 then

that needed to be ">=" ... here is a revised code of it all

red = Color.new(255,0,0)
black = Color.new(0,0,0)
white = Color.new(255,255,255)

menustatus = 1

oldpad = Controls.read()

while true do
  screen:clear(black)
  pad = Controls.read()

  if pad:up() and oldpad:up() ~= pad:up() then
    menustatus = menustatus - 1
  end

  if pad:down() and oldpad:down() ~= pad:down() then
    menustatus = menustatus + 1
  end

  color={white, white, white, white}

  screen:print(50,50,"Road To St. Louis", color[1])
  screen:print(50,60,"Exhib ition", color[2])
  screen:print(50,70,"Optio ns", color[3])
  screen:print(50,80,"Exit" , color[4])

  color[menustatus]=red

  if menustatus == 1 then
    if pad:cross() then
      --insert game code here
    end
  end

  if menustatus == 2 then
    if pad:cross() then
      --insert Exhibition here
    end
  end

  if menustatus == 3 then
    if pad:cross() then
      -- inserts options here
    end
  end

  if menustatus == 4 then
    if pad:cross() then
      System.Quit()
    end
  end

  if menustatus <= 0 then
    menustatus = 4
  end

  if menustatus >= 5 then
    menustatus = 1
  end

  screen.flip()
  screen.waitVblankStart()
  oldpad = pad
end

[andyauff]

I use "if pad:cross() and not oldpad:cross()"

Less words, works perfectly.

[SportzOwner]

I put oldpad because somone told me to, earlier, ill test it without it later.

[SG57]

Less words? This less words regardless of the number of buttons wanted:

if oldpad ~= pad then
    if pad:cross() then
        -- X pressed once
    end
end

[Mr_Shizzy]

How would you properly:

Look for a file on memory stick, and do "Action A" If it exists, or do "Action B" if it does not?

[myschoo]

file = io.open(ms0:/path)

if file then
-- action a
file:close()
else
-- action b
end

[Mr_Shizzy]

file = io.open(ms0:/path)

if file then
-- action a
file:close()
else
-- action b
end

Cool. Thanks man, turns out i left something out of the file path, and thats why it wasn't working. :P


Thanks for the reply. :)

[SportzOwner]

Gah now i can't this to leave my image sportz.jpg, any help?

black = Color.new(0,0,0)
pad = Controls.read()
white = Color.new(255,255,255)
--------------
function printCentered(y,text,colo r)
local length = string.len(text)
local x = 240 - ((length*8)/2)
screen:print(x,y,text,col or)
end
--------------
function scaleImage(newX, newY, theImage)

resizedImage = Image.createEmpty(newX, newY)
for x = 1, newX do
for y = 1, newY do
resizedImage:blit(x,y , theImage,
math.floor(x*(theImage:wi dth()/newX)),
math.floor(y*(theImage:he ight()/newY)),1,1)
end
end
return resizedImage
end
--------------
screen:clear(black)
printCentered(131,"Starti ng up...",white)
screen.waitVblankStart(3)
screen.flip()
--------------
sportz = Image.load("sportz.jpg")
-------------

scaleImage(480,272, sportz) -- Resize image.

while true do
screen:blit(0,0, resizedImage) -- Show the resized image

screen.waitVblankStart(3)
screen.flip()
currstate="ready"
end
--------------
pad=Controls.read()
screen:clear(black)
if currstate=="ready" then

screen:clear()
printCentered(100,"Press Start",white)
printCentered(300,"Powere d by Sportz",white)
screen.waitVblankStart()
screen.flip()
if pad:start() then
dofile("menu.lua")
end
end

[Anti-QuickJay]

leave my image sportz.jpg

English please? I don't understand what that means.

[emericaska8r]

with this code here:

scaleImage(480,272, sportz) -- Resize image.

i beleive you have to do :

somevariable = scaleImage(480,272, sportz)

then when you blit the image, instead of trying to blit "resizedImage" you have to put "somevariable" or whatever name you chose.

this is because when you return a value in a funtion, you need a variable to return it to, so you do: variable = function()

[SportzOwner]

English please? I don't understand what that means.

It means that it stays stuck on my image sports.jpg, or it won't leave my img.
-= Double Post =-
I added the variable into the screen blit, and fixed around it, but it still stays stuck on my image.

[myschoo]

resize the image manually! you are using functons from evilmana and u dont even know how do they work ... >_>

[emericaska8r]

well how big is sportz.jpg originally? because if it is bigger than 512x512 then it wouldn't load in the first place.

[SportzOwner]

The origenal is 600 x 150 pixels, it loads it just won't switch to current state ready, ill try to figure it out on my own.
-= Double Post =-
I fixed it.

black = Color.new(0,0,0)
pad = Controls.read()
white = Color.new(255,255,255)
--------------
function printCentered(y,text,colo r)
local length = string.len(text)
local x = 240 - ((length*8)/2)
screenrint(x,y,text,color)
end
--------------
function scaleImage(newX, newY, theImage)

resizedImage = Image.createEmpty(newX, newY)
for x = 1, newX do
for y = 1, newY do
resizedImage:blit(x,y , theImage,
math.floor(x*(theImage:wi dth()/newX)),
math.floor(y*(theImage:he ight()/newY)),1,1)
end
end
return resizedImage
end
--------------
screen:clear(black)
printCentered(131,"Starti ng up...",white)
screen.waitVblankStart(3)
screen.flip()
--------------
sportz = Image.load("sportz.jpg")
-------------

sportzimg = scaleImage(480,272, sportz) -- Resize image.

while true do
screen:blit(0,0, sportzimg, false) -- Show the resized image

screen.waitVblankStart(30 0)
screen.flip()

--------------
pad=Controls.read()
screen:clear(black)
screen:clear()

printCentered(100,"Press Start",white)
printCentered(200,"Powere d by Sportz",white)
if pad:start() then
dofile("menu.lua")
end

screen.waitVblankStart()
screen.flip()

end

Had the end, end something i needed

[johnjohnfroboy]

best place to go if u want to learn about Lua coding http://luaplayer.org/forums/index.php?topic=20.0

[emericaska8r]

hi this code here:

count = 5
white = Color.new(255,255,255)
function display()
	screen:print(140, 248, count, white)
end

for count = 1, 5 do
	while true do
		screen:clear()
		pad = Controls.read()
		display()
		if pad:square() and oldpad:square() ~= pad:square() then
			oldpad = pad
			break
		end
		oldpad = pad
		screen.flip()
		screen.waitVblankStart()
	end
end

(by the way it relates to my game without showing it yet)

basically i wanted a for loop that would decrease a variable, and show it using the display() function. I just wanted to know if anyone could tell me the specifics on why it never displays count decreasing.

i found ways around it, but just want to know why it doesn't.

[Anti-QuickJay]

best place to go if u want to learn about Lua coding http://luaplayer.org/forums/index.php?topic=20.0

Thats a lie.
Its http://www.lua.org/manual/5.1/

[Yongobongo]

^^^
http://lua-users.org/