Lua Programming Help Thread

[energytr]

ok im started to read all of these

[FaT3oYCG]

Yea, it sure would be.

:ROFL: why how i love your attitude XD

back onto subject, why do you want to create binary code rain?

p.s. look at the C/C++ tuts on a serch on google most of the first few how to maky my 1st ... 5th program in C/C++ are code rain, lua is much like C/C++ especially if you use one of the older luaplayers.

but as many people are told you would apparently be better off using pge luaplayer.

[wicked_fable]

:ROFL: why how i love your attitude XD

back onto subject, why do you want to create binary code rain?

p.s. look at the C/C++ tuts on a serch on google most of the first few how to maky my 1st ... 5th program in C/C++ are code rain, lua is much like C/C++ especially if you use one of the older luaplayers.

but as many people are told you would apparently be better off using pge luaplayer.

Well, I think their main point is just for him to learn to code in the first place not really that he is better off using PGE Lua(more like a sub-point if anything).

[_dysfunctional]

:ROFL: why how i love your attitude XD

back onto subject, why do you want to create binary code rain?

p.s. look at the C/C++ tuts on a serch on google most of the first few how to maky my 1st ... 5th program in C/C++ are code rain, lua is much like C/C++ especially if you use one of the older luaplayers.

but as many people are told you would apparently be better off using pge luaplayer.

Are you trying to make him disregard what I said?

Also, are you really that stupid? How does using LuaPlayer make Lua ANY MORE LIKE C++, than it would be using PGE Lua?

[FaT3oYCG]

no im not trying to disregard what you said, and im not going to come back at that with a smart ass remark, lets forget i even said that and carry on normally.

*FaT3oY looks at it himself and thinks WTF*

EDIT:

*FaT3oY looks at it again and thinks strike the incorrect bit*

[SG57]

NUM_POSITIONS = 400

Position = {}

function ResetPosition(i)
  c = "0"
  if math.random(0,1) == 1 then
    c = "1"
  end
  Position[i] = {x = math.random(0,480), y = -math.random(10,100), speed = math.random(1,4), char = c}
end

for i = 0, NUM_POSITIONS do
  ResetPosition(i)
end

while true do
  screen:clear()
  
  for i = 0, NUM_POSITIONS do
    if Position[i].y > 272 then
      ResetPosition(i)
    end

    Position[i].y = Position[i].y + Position[i].speed
    
    if Position[i].speed == 1 then
      col = Color.new(0,68,0)
    elseif Position[i].speed == 2 then
      col = Color.new(0, 125, 0)
    elseif Position[i].speed == 3 then
      col = Color.new(0, 188, 0)
    elseif Position[i].speed == 4 then
      col = Color.new(0, 255, 0)
    end
    
    screen:print(Position[i].x, Position[i].y, Position[i].char, col)
  end
  
  screen.waitVblankStart()
  screen.flip()
end

Matrix effect?

[Mister Chief]

Try and keep it civil boys.

[wicked_fable]

Edit: Problem solved. :humped:

[Digikid13]

BGMS = 1
BackroundMusic = {}
System.currentDirectory(ms0:/music)
musicList = System.listDirectory()
musicNumber = Table.getn(musicList)

for a = 1,musicNumber do
     if string.find(musicList[a],".mp3") then
          BackroundMusic[a] = Mp3.load(musicList[a])
     end
end

Mp3.play(BackroundMusic[BGMS],true)
BGMS = BGMS + 1

while true do
     if Mp3.EndOfStream == "true" then
          Mp3.play(BackroundMusic[BGMS],true)
          BGMS = BGMS + 1
     end

     screen.waitVblankStart() --I know useless =.=
end

This won't work for some reason.

[FaT3oYCG]

First of all there are two entries in listdirectory - . and .. - that arent even real existing files. Then you have to check that each file is actually an mp3. Then you have to access the names with musicList[i].name. Then you have to actually play each one rather than just loading each one and then going off to play the last one.

[Nielkie]

What fatboy?
Only things he needs to change to make it work:
Mp3.load doesn't return anything, call it before you play the file.
In your file loop, each file is a table. use file.name instead of just file.
Your directory needs to be a string.
Lua is case sensitebe. It's "table.getn"

Some housekeeping issues:
If you use straight BackroundMusic[a] = blah, then what happens if the file is not a mp3? You'll error when it gets to one. Use table.insert.

Why do you need to use string.find? ".mp3" is useless if it isn't at the end of a file. use

string.lower(string.sub(item.name, -4)) == ".mp3"

No need to change the current directory or list the directory in a random table. Also, iterate through a table properly, use:

for i, file in System.listDirectory("ms0:/music")

[Digikid13]

Can you put up a remade version of mine, because you guys are confusing me?

[wicked_fable]

Seems to make sense to me if you just follow Nielkie. I don't quite understand what Fatboy means.

[xXChromeXx]

Is there a way to possibly use Lua to zip files. I really need a way to zip files without a Computer. It can be using PGELua or Luaplayer. I just need help or a nudge in the right direction.

[PSProgramer]

umm I know PGE can unzip zip files. . . look in the documentaion, there are 2 other features for zip files, so see if one of them makes zips. . .

[xXChromeXx]

None of them make zips. I was thinking maybe there might be a workaround way.

[FaT3oYCG]

find out how zip files are made and code it

[Digikid13]

--File created by Miro Lua
BGMS = 3
BackroundMusic = {}
musicList = System.listDirectory()
maxMusic = table.getn(musicList)

B = 1

while true do
	if B == 1 then
		Mp3.load(musicList[BGMS].name)
		Mp3.play()
		B = 2
		BGMS = BGMS + 1
	end

	if Mp3.EndOfStream == "true" then
		Mp3.load(musicList[BGMS].name)
		Mp3.play()
		BGMS = BGMS + 1
	end

	if (BGMS == maxMusic) or (BGMS > maxMusic) then BGMS = 3 end

screen.waitVblankStart()

end

this is what I got and I still got nothing

[dan369]

None of them make zips. I was thinking maybe there might be a workaround way.

Chrome: Its good to think that your first thought is to code it. But one simile Have you even thought that there might be a App for it?

[FaT3oYCG]

--File created by Miro Lua
BGMS = 3
BackroundMusic = {}
musicList = System.listDirectory()
maxMusic = table.getn(musicList)

B = 1

while true do
	if B == 1 then
		Mp3.load(musicList[BGMS].name)
		Mp3.play()
		B = 2
		BGMS = BGMS + 1
	end

	if Mp3.EndOfStream == "true" then
		Mp3.load(musicList[BGMS].name)
		Mp3.play()
		BGMS = BGMS + 1
	end

	if (BGMS == maxMusic) or (BGMS > maxMusic) then BGMS = 3 end

screen.waitVblankStart()

end

this is what I got and I still got nothing

i did this a while ago when i was trying to make an mp3 player myself, i had to make a workarround because i found it takes the piddle to get it to work correctly, you can probably make this smaller but atleast it works

white = Color.new(255, 255, 255)

MP3_Table = { }
Music_Directory = ""
Music_List = { }
Music_Number = 0

function organise_mp3()
	MP3_Table = { }
	Music_Directory = "ms0:/MUSIC/"
	Music_List = System.listDirectory(Music_Directory)
	Music_Number = table.getn(Music_List)
	for i = 1, Music_Number do
		if string.lower(string.sub(Music_List[i].name, -4)) == ".mp3" then
			table.insert(MP3_Table, Music_List[i].name)
		end
	end
end

music_organised = false

function sort_mp3()
	if music_organised == false then
		organise_mp3()
		music_organised = true
	end
end

current_mp3 = 1
loaded_mp3 = false

function play_mp3()
	if table.getn(MP3_Table) > 0 then
		if loaded_mp3 == false then
			current_path = System.currentDirectory()
			System.currentDirectory("ms0:/MUSIC/")
			Mp3me.load(MP3_Table[current_mp3])
			System.currentDirectory(current_path)
			Mp3me.play()
			loaded_mp3 = true
		elseif loaded_mp3 == true then
			if Mp3me.eos == "true" then
				Mp3me.stop()
				current_mp3 = current_mp3 + 1
				if current_mp3 > table.getn(MP3_Table) then
					current_mp3 = 1
				end
				loaded_mp3 = false
			end
		end
	end
end

while true do

pad = Controls.read()

screen:clear(white)

-- insert your main code here

--System.setHigh()

sort_mp3()
play_mp3()

--screen:print(10, 10, "Simple MP3 Player")

--screen:print(10, 30, "Runnung At: " .. System.getCpuSpeed() .. "mhz")
--screen:print(10, 40, "Song: " .. current_mp3)
--screen:print(10, 50, "Artist: " .. Mp3me.artist())
--screen:print(10, 60, "Title: " .. Mp3me.title())
--screen:print(10, 70, "Album: " .. Mp3me.album())
--screen:print(10, 80, "Genre: " .. Mp3me.genre())
--screen:print(10, 90, "Song Time: " .. Mp3me.gettime())
--screen:print(10, 100, "Song Length: " .. Mp3me.songTime())
--screen:print(10, 110, "Percent: " .. Mp3me.percent())

--if pad:r() and not oldpad:r() then
--	Mp3me.stop()
--	if current_mp3 < table.getn(MP3_Table) then
--		current_mp3 = current_mp3 + 1
--	else
--		current_mp3 = 1
--	end
--	loaded_mp3 = false
--elseif pad:l() and not oldpad:l() then
--	Mp3me.stop()
--	if current_mp3 > 1 then
--		current_mp3 = current_mp3 - 1
--	else
--		current_mp3 = table.getn(MP3_Table)
--	end
--	loaded_mp3 = false
--end

--if pad:cross() and not oldpad:cross() then
--	Mp3me.play()
--elseif pad:circle() and not oldpad:circle() then
--	Mp3me.pause()
--elseif pad:square() and not oldpad:square() then
--	Mp3me.stop()
--end

-- insert your main code here

if pad:start() then
	Mp3me.stop()
	break
end

oldpad = pad

screen.waitVblankStart()
screen.flip()

end

as i said i was trying to find a workarround so i edited out some of the lines, but they do work!

hope that helps but im not saying its any good.

[Nielkie]

Why so much code?

function playRecursively(dir)
	for i, file in System.listDirectory(dir) do
		local name = file.name
		if not file.directory then
			if string.lower(string.sub(name, -4)) == ".mp3" then
				Mp3me.load(dir .. name)
				Mp3me.play()
				while not Mp3me.eos == "true" do
					System.sleep(100)
				end
			end
		else
			playRecursively(dir .. name .. "/")
		end
	end
end

playRecursively("ms0:/MUSIC/")

That should give you the gist of what to do.

[xXChromeXx]

Chrome: Its good to think that your first thought is to code it. But one simile Have you even thought that there might be a App for it?

I have searched quite abit with no luck. If you know of an app that zips files, please let me know. :)

[FaT3oYCG]

if you want to use your pc then use winrar www.rarlabs.com

[PSProgramer]

i think his PC is busted or something, and he uses his PS3, and PSP. but I could be wrong.

[xXChromeXx]

Ya my PC is busted. I used to have winrar >.>

Ya I use my PSP and PS3.

[Digikid13]

Thank you I needed this for my game Pong I am going to put both of you in the credit.
THANKS ^^
-=Double Post Merge =-
Better Version of FaT3oYCG's only area with my name in it is mine.

--File created by Miro Lua
white = Color.new(255, 255, 255)

MP3_Table = { }
Music_Directory = ""
Music_List = { }
Music_Number = 0

function organise_mp3()
	MP3_Table = { }
	Music_Directory = "ms0:/MUSIC/"
	Music_List = System.listDirectory(Music_Directory)
	Music_Number = table.getn(Music_List)
	for i = 1, Music_Number do
		if string.lower(string.sub(Music_List[i].name, -4)) == ".mp3" then
			table.insert(MP3_Table, Music_List[i].name)
		end
	end
end

music_organised = false

function sort_mp3()
	if music_organised == false then
		organise_mp3()
		music_organised = true
	end
end

current_mp3 = 1
loaded_mp3 = false

function play_mp3()
	if table.getn(MP3_Table) > 0 then
		if loaded_mp3 == false then
			current_path = System.currentDirectory()
			System.currentDirectory("ms0:/MUSIC/")
			Mp3me.load(MP3_Table[current_mp3])
			System.currentDirectory(current_path)
			Mp3me.play()
			loaded_mp3 = true
		elseif loaded_mp3 == true then
			if Mp3me.eos == "true" then
				Mp3me.stop()
				current_mp3 = current_mp3 + 1
				if current_mp3 > table.getn(MP3_Table) then
					current_mp3 = 1
				end
				loaded_mp3 = false
			end
		end
	end
end

while true do

pad = Controls.read()

screen:clear(white)

-- insert your main code here

System.setHigh()

sort_mp3()
play_mp3()

screen:print(10, 10, "Simple MP3 Player")

--screen:print(10, 30, "Runnung At: " .. System.getCpuSpeed() .. "mhz")
screen:print(10, 40, "Song: " .. current_mp3)
screen:print(10, 50, "Song Time: " .. Mp3me.gettime())
screen:print(10, 60, "Song Length: " .. Mp3me.songTime())
screen:print(10, 70, "Percent: " .. Mp3me.percent())

--Draw Bars to screen, Left sound By [)[email protected][email protected]$t3r
Image:fillRect(200, Mp3me.visL(1), 5, 500)
Image:fillRect(210, Mp3me.visL(10), 5, 500)
Image:fillRect(220, Mp3me.visL(20), 5, 500)
Image:fillRect(230, Mp3me.visL(30), 5, 500)
Image:fillRect(240, Mp3me.visL(40), 5, 500)
Image:fillRect(250, Mp3me.visL(50), 5, 500)
Image:fillRect(260, Mp3me.visL(60), 5, 500)
Image:fillRect(270, Mp3me.visL(70), 5, 500)
Image:fillRect(280, Mp3me.visL(80), 5, 500)
Image:fillRect(290, Mp3me.visL(90), 5, 500)
Image:fillRect(300, Mp3me.visL(100), 5, 500)

--Draw Bars to screen, Right sound
Image:fillRect(320, Mp3me.visR(1), 5, 500)
Image:fillRect(320, Mp3me.visR(10), 5, 500)
Image:fillRect(330, Mp3me.visR(20), 5, 500)
Image:fillRect(340, Mp3me.visR(30), 5, 500)
Image:fillRect(350, Mp3me.visR(40), 5, 500)
Image:fillRect(360, Mp3me.visR(50), 5, 500)
Image:fillRect(370, Mp3me.visR(60), 5, 500)
Image:fillRect(380, Mp3me.visR(70), 5, 500)
Image:fillRect(390, Mp3me.visR(80), 5, 500)
Image:fillRect(400, Mp3me.visR(90), 5, 500)
Image:fillRect(410, Mp3me.visR(100), 5, 500)

if pad:r() and not oldpad:r() then
	Mp3me.stop()
	if current_mp3 < table.getn(MP3_Table) then
		current_mp3 = current_mp3 + 1
	else
		current_mp3 = 1
	end
	loaded_mp3 = false
elseif pad:l() and not oldpad:l() then
	Mp3me.stop()
	if current_mp3 > 1 then
		current_mp3 = current_mp3 - 1
	else
		current_mp3 = table.getn(MP3_Table)
	end
	loaded_mp3 = false
end

if pad:cross() and not oldpad:cross() then
	Mp3me.play()
elseif pad:circle() and not oldpad:circle() then
	Mp3me.pause()
elseif pad:square() and not oldpad:square() then
	Mp3me.stop()
end

-- insert your main code here

if pad:start() then
	Mp3me.stop()
	break
end

oldpad = pad

screen.waitVblankStart()
screen.flip()

end

[dan369]

Chrome: Search Tipster's Unzip/Unrar utility v0.3. They only thing is you need IrShell, (it can be used as a plugin for it) because i THINK the Eboot 1.50. Unless you have the 1.50 Kernel :?

[xXChromeXx]

It doesn't say anything about zipping files are you sure?

[eldiablov]

--Draw Bars to screen, Left sound By [)[email protected][email protected]$t3r
Image:fillRect(200, Mp3me.visL(1), 5, 500)
Image:fillRect(210, Mp3me.visL(10), 5, 500)
Image:fillRect(220, Mp3me.visL(20), 5, 500)
Image:fillRect(230, Mp3me.visL(30), 5, 500)
Image:fillRect(240, Mp3me.visL(40), 5, 500)
Image:fillRect(250, Mp3me.visL(50), 5, 500)
Image:fillRect(260, Mp3me.visL(60), 5, 500)
Image:fillRect(270, Mp3me.visL(70), 5, 500)
Image:fillRect(280, Mp3me.visL(80), 5, 500)
Image:fillRect(290, Mp3me.visL(90), 5, 500)
Image:fillRect(300, Mp3me.visL(100), 5, 500)

--Draw Bars to screen, Right sound
Image:fillRect(320, Mp3me.visR(1), 5, 500)
Image:fillRect(320, Mp3me.visR(10), 5, 500)
Image:fillRect(330, Mp3me.visR(20), 5, 500)
Image:fillRect(340, Mp3me.visR(30), 5, 500)
Image:fillRect(350, Mp3me.visR(40), 5, 500)
Image:fillRect(360, Mp3me.visR(50), 5, 500)
Image:fillRect(370, Mp3me.visR(60), 5, 500)
Image:fillRect(380, Mp3me.visR(70), 5, 500)
Image:fillRect(390, Mp3me.visR(80), 5, 500)
Image:fillRect(400, Mp3me.visR(90), 5, 500)
Image:fillRect(410, Mp3me.visR(100), 5, 500)

God, that just screams inefficient.

[wicked_fable]

I don't think he wants to UN-compress he wants to compress the file.