Lua Programming Help Thread

[eldiablov]

layer = {}
layer[1] = ImageCreateEmpty(480,272)
layer[2] = ImageCreateEmpty(480,272)

while true do

layer[1]:blit(maspritez,0,0)
layer[2]:blit(mabackgrowndz,0,0)

screen.flip()
screen.waitVblankStart()
end

Probably a few small errors, haven't used Lua for a while.

Is this what you meant ?

[Freshmilk]

Next time, read the function documentation
http://wiki.ps2dev.org/psp:lua_playe...ound_and_music

I feel so stupid now, considering I did read that before posting here. I guess I should be more observant. Thanks for the fix.

[dan369]

layer = {}
layer[1] = ImageCreateEmpty(480,272)
layer[2] = ImageCreateEmpty(480,272)

while true do

layer[1]:blit(maspritez,0,0)
layer[2]:blit(mabackgrowndz,0,0)

screen.flip()
screen.waitVblankStart()
end

Probably a few small errors, haven't used Lua for a while.

Is this what you meant ?

yeah, thanks lol. (Why didn't i think of that *sigh* *calls himself stupid*

[legacyxero]

Heres my issue. at the the transition from (Pressing start to play) to (loading "intro) I dont want to use the command

"screen.waitVblankStart() "

because i dont want it to wait. I want it to stay there UNTILL I press start!!

what should I do to display "intro" (its a picture that takes up the whole screen) after I press start also.

So here is my code:

pink = Color.new(255, 0 , 153)
blue = Color.new(0 , 153, 255)
orange = Color.new(255, 102, 0)
gray = Color.new(153, 153, 153)
black = Color.new(0 , 0 , 0)
green = Color.new(0, 255, 0)
white = Color.new(225, 225, 225)

--*****LOADING SCREEN*****

screenrint(194, 136, "Loading: 0%", blue)
screen.flip()
screen.waitVblankStart(60 )
screen:clear()

intro = Image.load("abaddonsparra ble/introscreen.png")

screenrint(194, 136, "Loading: 20%", blue)
screen.flip()
screen.waitVblankStart(60 )
screen:clear()

lvlone = Image.load("abaddonsparra ble/levelone intro.png")

screenrint(194, 136, "Loading: 40%", blue)
screen.flip()
screen.waitVblankStart(60 )
screen:clear()

story = Image.load("abaddonsparra ble/story.png")

screenrint(194, 136, "Loading: 60%", blue)
screen.flip()
screen.waitVblankStart(60 )
screen:clear()

choiceone = Image.load("abaddonsparra ble/choice1.png")

screenrint(194, 136, "Loading: 80%", blue)
screen.flip()
screen.waitVblankStart(60 )
screen:clear()

screenrint(194, 136, "Loading: 100%", blue)
screen.flip()
screen.waitVblankStart(60 )
screen:clear()

screenrint(194, 136, "Press START to play", white)
screen.flip()

pad = Controls.read()

if pad:start() then
screen:clear()
screen:blit(0, 0, intro)
screen.flip()
end

[_dysfunctional]

You would need to load the images in a separate thread so that the graphics can be updated each frame. I'm not really sure if Lua (on the PSP?) has any threading support, but I would look it up if I were you.

Actually, what? Can you elaborate please?

[thecobra]

Heres my issue. at the the transition from (Pressing start to play) to (loading "intro) I dont want to use the command

"screen.waitVblankStart() "

because i dont want it to wait. I want it to stay there UNTILL I press start!!

what should I do to display "intro" (its a picture that takes up the whole screen) after I press start also.

So here is my code:

you can do a while loop if you like for example

 inintro = 1
perc = 0
while (inintro == 1) do

screen:clear()
if (perc == 0) then
intro = Image.load("abaddonsparra ble/introscreen.png")
perc = 10
else if (perc == 10) then
lvlone = Image.load("abaddonsparra ble/levelone intro.png")
else if (perc == 100) then

screenrint(194, 140, "Press START to play", white)


pad = Controls.read()

if pad:start() then
inintro = 0
end 

end
screen:print(194, 136, "Loading: "..perc.."%", blue)
screen.flip()
end
while (1) do
//start game stuff
end

note*: it may have some error because i just did it so you can understand

just keep on using else if for every perc you want to use and modifier the perc so it blit property

[legacyxero]

well this whole game is just going to be like a scenario game.

for example, here is the first choice you make in the game.



It is just going to be whether you press ^, O, or X and it will load another picture with some story line, and then another choice.

I didnt think the code would be that advanced just to load a picture after pressing a button.

[thecobra]

well this whole game is just going to be like a scenario game.

for example, here is the first choice you make in the game.



It is just going to be whether you press ^, O, or X and it will load another picture with some story line, and then another choice.

I didnt think the code would be that advanced just to load a picture after pressing a button.

ok let me if i can understand you.

you want to show first a loading animation/screen first to load the images, then you want to blit a serctaine image to the screen depening on the button user press?

if so then it as easy as making 2 while loops one to load all the images and the second to ask the user to press a button and then blit that image to screen

example:

---Example by Thecobra---
inloading = 1 --say if we are still loading images
perc = 0 --how many images we load in percentage
while(inloading == 1) do ---if we are still laoding then--
screen.clear()
screen:print("loading.."..perc,Color(0,0,255))
screen.flip()
if (perc == 0) then
intro = Image.load("abaddonsparra ble/introscreen.png") --load intro image--
perc = 10
else if (perc ==10) then
image1 = Image.load("abaddonsparra ble/image1.png") --load image 1 if perc = 10--
perc = 20
else if (perc == 20) then
image2 = Image.load("abaddonsparra ble/image2.png") --load image 2 if perc = 20--
perc = 30
 ---so on and so on for else if--
else if (perc == 100) then
--ok we loaded everything so let exit our loop of loading--
inloading = 0
end

end
--now let start our real program :) ---
imgtodisplay = 1
while true do
pad = Controls.read()
screen.clear()
if imgtodisplay == 1 then
screen:blit(intro)
end
if imgtodisplay == 2 then
screen:blit(image1)
end
if imgtodisplay == 3 then
screen:blit(image2)
end
if imgtodisplay == 4 then
screen:blit(image3)
end
if pad:triangle then
--set current image to something else--
imgetodisplay = 2
end
if pad:square then
--set current image to something else--
imgetodisplay = 3
end
if pad:circle then
--set current image to something else--
imgetodisplay = 4
end
--print out some txt--
screen:print("press triangle to display image 1")
screen:print("press square to display image 2")
screen:print("press circle to display image 3")
screen.flip()
end

like last time note that commands are not propertly use or missing something, it just meant to give you a idea on how to do it, it simple if you understand what it doing and try it you self :) good luck

[Slasher]

ok let me if i can understand you.

you want to show first a loading animation/screen first to load the images, then you want to blit a serctaine image to the screen depening on the button user press?

if so then it as easy as making 2 while loops one to load all the images and the second to ask the user to press a button and then blit that image to screen

example:

---Example by Thecobra---
inloading = 1 --say if we are still loading images
perc = 0 --how many images we load in percentage
while(inloading == 1) do ---if we are still laoding then--
screen.clear()
screen:print("loading.."..perc,Color(0,0,255))
screen.flip()
if (perc == 0) then
intro = Image.load("abaddonsparra ble/introscreen.png") --load intro image--
perc = 10
else if (perc ==10) then
image1 = Image.load("abaddonsparra ble/image1.png") --load image 1 if perc = 10--
perc = 20
else if (perc == 20) then
image2 = Image.load("abaddonsparra ble/image2.png") --load image 2 if perc = 20--
perc = 30
 ---so on and so on for else if--
else if (perc == 100) then
--ok we loaded everything so let exit our loop of loading--
inloading = 0
end

end
--now let start our real program :) ---
imgtodisplay = 1
while true do
pad = Controls.read()
screen.clear()
if imgtodisplay == 1 then
screen:blit(intro)
end
if imgtodisplay == 2 then
screen:blit(image1)
end
if imgtodisplay == 3 then
screen:blit(image2)
end
if imgtodisplay == 4 then
screen:blit(image3)
end
if pad:triangle then
--set current image to something else--
imgetodisplay = 2
end
if pad:square then
--set current image to something else--
imgetodisplay = 3
end
if pad:circle then
--set current image to something else--
imgetodisplay = 4
end
--print out some txt--
screen:print("press triangle to display image 1")
screen:print("press square to display image 2")
screen:print("press circle to display image 3")
screen.flip()
end

like last time note that commands are not propertly use or missing something, it just meant to give you a idea on how to do it, it simple if you understand what it doing and try it you self :) good luck

That is horrible code, I wouldn't advise anyone to use it as an outline. Although it works, it's bad.

[legacyxero]

That is horrible code, I wouldn't advise anyone to use it as an outline. Although it works, it's bad.

could you help me out then slasher?

[yaustar]

Got bored so here is a framework in pure Lua that is easily scalable (virtually data driven). You should be able to understand the code and make it work for PSP and your needs.

-- Constants
DIRECTION_NORTH = 1;
DIRECTION_EAST = 2;
DIRECTION_SOUTH = 3;
DIRECTION_WEST = 4;

roomList = {};

-- Create the rooms
roomList[0] = { imageFilename = "", debugText = "RoomA, exits: West and South", exitRooms = {} };
roomList[1] = { imageFilename = "", debugText = "RoomB, exits: East and South", exitRooms = {} };
roomList[2] = { imageFilename = "", debugText = "RoomC, exits: East and North", exitRooms = {} };
roomList[3] = { imageFilename = "", debugText = "RoomD, exits: West and North", exitRooms = {} };

-- Map the rooms together
roomList[0].exitRooms[DIRECTION_WEST] = roomList[1];
roomList[0].exitRooms[DIRECTION_SOUTH] = roomList[3];

roomList[1].exitRooms[DIRECTION_EAST] = roomList[0];
roomList[1].exitRooms[DIRECTION_SOUTH] = roomList[2];

roomList[2].exitRooms[DIRECTION_EAST] = roomList[3];
roomList[2].exitRooms[DIRECTION_NORTH] = roomList[0];

roomList[3].exitRooms[DIRECTION_WEST] = roomList[2];
roomList[3].exitRooms[DIRECTION_NORTH] = roomList[0];

bGameFinished = false;
currentRoom = roomList[0];

function ChangeRooms( direction )
	newRoom = currentRoom.exitRooms[direction];
	if newRoom ~= nil then
		currentRoom = newRoom;
	end
end

while not bGameFinished do
	print( currentRoom.debugText );	
	local sPlayerInput = io.read();
	sPlayerInput = string.upper( sPlayerInput );
	
	if "Q" == sPlayerInput then
		bGameFinished = true;
	elseif "N" == sPlayerInput then
		ChangeRooms( DIRECTION_NORTH );
	elseif "S" == sPlayerInput then
		ChangeRooms( DIRECTION_SOUTH );
	elseif "W" == sPlayerInput then
		ChangeRooms( DIRECTION_WEST );
	elseif "E" == sPlayerInput then
		ChangeRooms( DIRECTION_EAST );
	end
end

[thecobra]

That is horrible code, I wouldn't advise anyone to use it as an outline. Although it works, it's bad.

lol, yeah it horrible but like i said
this code is just to give a idea on how he should do it, not to actually use it.

maybe you can make another code for him,;)

[legacyxero]

lol, yeah it horrible but like i said
this code is just to give a idea on how he should do it, not to actually use it.

maybe you can make another code for him,;)

Yeah, I tried using that code, but i couldnt figure it out.

[eldiablov]

Have you looked at yaustars code ? :/

[TurtlesPwn]

Have you looked at yaustars code ? :/

Obviously not because it actually is done properly and makes sense and it is just too difficult to understand the logic and scalability of it.

[legacyxero]

Obviously not because it actually is done properly and makes sense and it is just too difficult to understand the logic and scalability of it.

get off my back man...

I read it and am scaling it right now...

Keep in mind im a lua n00b still.

[yaustar]

As said earlier, it is a pure Lua framework. If you want to make it work with LuaPlayer and use button input, you have to do the legwork yourself. If I just give you the exact code, you won't learn or understand anything.

If the code I have given is too complex, then work in baby steps towards it.

You first step should be switching between two images using a button press.

Brief:
- When the program loads up, it displays image A
- When the user presses SQUARE, it displays image B
- When the user presses SQUARE again, it displays image A
- When the user presses SQUARE again, it displays image B
- etc

Post your code here when you have done this.

[legacyxero]

As said earlier, it is a pure Lua framework. If you want to make it work with LuaPlayer and use button input, you have to do the legwork yourself. If I just give you the exact code, you won't learn or understand anything.

If the code I have given is too complex, then work in baby steps towards it.

You first step should be switching between two images using a button press.

Brief:
- When the program loads up, it displays image A
- When the user presses SQUARE, it displays image B
- When the user presses SQUARE again, it displays image A
- When the user presses SQUARE again, it displays image B
- etc

Post your code here when you have done this.

its probably going to take me a couple days to get it working, and thank you again for the framework.

In the meantime, could you tel me whats wrong with this code?
its for my menu.

when I run it I get the error for line 111: 'then' expected near '='

--********MENU*********

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}

screenrint(50, 50, "Start Game", color[1])
screenrint(50,60,"Controls", color[2])
screenrint(50,70,"Exit", color[3])

color[menustatus]=red

if menustatus == 1 then
if pad:cross() then
end
end

if menustatus == 2 then
if pad:cross() then


screenrint(50,50,"Press Triangle to move North", white)
screenrint(50,60,"Press Circle to move East", white)
screenrint(50,70,"Press Cross To Move South", white)
screenrint(50,80,"Press Square to move West", white)
screen:Print(380,100,"Pre ss Triangle to go back to main menu", blue)

if pad:triangle() then
menustatus = 1
end


end
end

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

if menustatus <= 0 then
menustatus = 3
end

if menustatus => 4 then
menustatus = 1
end

screen.flip()
screen.waitVblankStart()
end

[TurtlesPwn]

The point was for you to take baby steps toward a framework, not for us to continue helping you hardcode it.

[legacyxero]

The point was for you to take baby steps toward a framework, not for us to continue helping you hardcode it.

im sorry, is this not the lua help thread?

and did I not say im working on it?

[TurtlesPwn]

im sorry, is this not the lua help thread?

and did I not say im working on it?

Do you teach a baby to walk or just carry it around all day?

Work on the framework use, ditch your hardcoded crap.

[GP3X]

In the meantime, could you tel me whats wrong with this code?
its for my menu.

when I run it I get the error for line 111: 'then' expected near '='

Are you an idiot? There isn't even 111 lines there, only 70.

Also, I agree with TP, this is a help thread, not a learn how to walk thread. Take a little pride in your work please, don't hard code everything, otherwise your programs will be a giant mess of crap that no one will want to look at and you will go down in history with the other thousands of PSP lua noobs.

[SG57]

legacy check your operators..... more specifically, greater-then-equal-to... (it isn't => if you're stumped)

[yaustar]

its probably going to take me a couple days to get it working, and thank you again for the framework.

In the meantime, could you tel me whats wrong with this code?
its for my menu.

when I run it I get the error for line 111: 'then' expected near '='

Use [ code ] [ / code ] tags (without spaces), indent the code properly and repost.

[Mr_Shizzy]

I've been looking over Red Squirrels CTF unpacker src. Any way this could be done in lua ?? (attached src)

Any help I could get achieving this would be greatly appreciated.

Thanks

~shizzy

[Nielkie]

It can be done relatively easily.

This should get you started:

function string.Mbyte(s)
	local r = {}
	for i=1, string.len(s) do
		table.insert(r, string.byte(string.sub(s, i, i)))
	end
	return r
end

function string.NMbyte(s)
	local b = string.Mbyte(s)
	local r = ""
	for i, n in ipairs(b) do
		r = r .. tostring(n)
	end
	return tonumber(r)
end

function string.stripNull(string)
	local r,n = string.gsub(string,"%z.*$","")
	if n ~= 1 then
		return r
	else return "" end
end

function readBits(stringa, l)
	stringa = string.reverse(stringa)
	local value = 0
	for i=1, l / 8 do
		value = value + string.byte(string.sub(stringa,i,i)) * (256 ^ (i - 1))
	end
	return value
end

function CPTFHeader(file)
	return {
		sig = file:read(4),
		version = string.NMbyte(file:read(4)), --?
		name = string.stripNull(file:read(8)),
		magic = file:read(4),
		checksum = file:read(4), --?
		headercount = readBits(file:read(4), 32),
		size = readBits(file:read(4), 32)
	}
end

function CTFPatchHeader(file)
	return {
		name = string.stripNull(file:read(64)),
		start = readBits(file:read(4), 32),
		size = readBits(file:read(4), 32)
	}
end

Also, the basic structure of a CTF:
[PTF file with modified header] (CPTFHeader)
[Patch files]
[Patch file headers] (CTFPatchHeader)

[Mr_Shizzy]

It can be done repetitively easily...{code}

Thank you VERY much. :Punk:

[Nielkie]

Gah, "repetitively". Damn you FF spellcheck!

[fchaos]

I can't for the life of me figure out how to make a texture on a 3d object semi transparent, can someone help me out?

[slicer4ever]

i'm not vary familiar with lua's 3D functions, however understanding openGL, and the pspgu, i'd suggest looking in the documentation for lua(which ever one your using, but i suspect pge?), for method calls which contain the word blend