Lua Programming Help Thread

I just trying to get it were it stays something like VCS Device installed or LCS Device Installed text show for a few secs.

PHP-Code:

---

Red = Color.new(255, 0, 0)
Green = Color.new(45, 157, 65)
darkOr = Color.new(194, 118, 30)
yellower = Color.new(255, 242, 135)
White=Color.new(255,255,255)

function PrintCentered(y,string,color)
screen:print( 240 - (string.len(string)*8) / 2 ,y,string,color);
end

Background = Image.load("bg.png")

System.Unassign("flash0:" )

System.Assign("flash0:", "lflash0:0,0", "flashfat0:")


while true do

current = 1
oldpad = Controls.read()

while true do

pad = Controls.read()

screen:blit(0,0,Background)
PrintCentered(3,"GTA Cheat Device Pack 3.03 OE V3",darkOr)
PrintCentered(18,"Pack Made By Yolarry. Cheat Device Made By Edison Carter",darkOr)
screen:print(115, 96, "Install Vice City Stories Cheat", White)
screen:print(115, 106, "Install Liberty City Stories Cheat", White)
screen:print(115, 116, "Uninstall Vice City Stories Cheat", White)
screen:print(115, 126, "Uninstall Liberty City Stories Cheat", White)
screen:print(30, 245, "Dark_AleX 3.03 OE-C Only!", yellower)



if current == 1 then
screen:print(115, 96, "Install Vice City Stories Cheat", Green)
end

if current == 2 then
screen:print(115, 106, "Install Liberty City Stories Cheat", Green)
end

if current == 3 then
screen:print(115, 116, "Uninstall Vice City Stories Cheat", yellower)
end

if current == 4 then
screen:print(115, 126, "Uninstall Liberty City Stories Cheat", yellower)
end

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

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

if current == 6 then
current = 1
end

if current == 0 then
current = 4
end

if pad:cross() and current == 1 then 
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/gb3s1518.bwfon","flash0:/font/gb3s1518.bwfon","no") 
System.writeFile("ms0:/PSP/GAME150/GTACD/vcs/vcscheatdevice.prx","flash0:/kn/vcscheatdevice.prx","no") 
System.writeFile("ms0:/PSP/GAME150/GTACD/vcs/pspbtcnf_game.txt","flash0:/kn/pspbtcnf_game.txt","no") 
end

if pad:cross() and current == 2 then
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/gb3s1518.bwfon","flash0:/font/gb3s1518.bwfon","no")
System.writeFile("ms0:/PSP/GAME150/GTACD/lcs/lcscheatdevice.prx","flash0:/kn/lcscheatdevice.prx","no")
System.writeFile("ms0:/PSP/GAME150/GTACD/lcs/pspbtcnf_game.txt","flash0:/kn/pspbtcnf_game.txt","no")
end

if pad:cross() and current == 3 then
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/gb3s1518.bwfon","flash0:/font/gb3s1518.bwfon","no")
System.removeFile("flash0:/kn/lcscheatdevice.prx")
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/pspbtcnf_game.txt","flash0:/kn/pspbtcnf_game.txt","no")
end

if pad:cross() and current == 4 then
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/gb3s1518.bwfon","flash0:/font/gb3s1518.bwfon","no")
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/lcscheatdevice.prx","flash0:/kn/lcscheatdevice.prx","no")
System.writeFile("ms0:/PSP/GAME150/GTACD/restore/pspbtcnf_game.txt","flash0:/kn/pspbtcnf_game.txt","no")
end

if pad:square() then
Image:save("screenshot.png")
end

if pad:start() then
System.Quit()
end


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

end

end 


---

and still cant figure out how to remove them off the flash:0. So I made it 0kb when they uninstall it.

how can i check flash free memory?

ex. check flash memory then
if <270kb then
System.Quit()
end

if >270kb then
bla....
end

thx in advance

I know this isn't the best way but I can't think of another:
Make a for statement group (heck there might be like 3 for statements within each other) to go through all the files in flash and find their filesize and add them up, then subtract from 24mb (I think that's flash0 space) and get it. There might be an easier way but I'm not sure

There is me an cloudpjff7 wrote it. Sorry but I wont post it because it's part of our upcoming project.

You don't have to post the code but what's the method you use?

Hy guys...
So,
I am making a side scrolling FPS game thingy...
I have 5 bullet blitted but I want to let one dissapear when I press R.
Obv. screen:unblit(400,220,bul let) didn't work :p
So... Could anyone help me?

(*sigh* I'm a lua n00bz0r :| )

does screen:unblit even exist ?

does any one know any good wifi tuts, without using netlib?

Zitat:

---

Zitat von eldiablov

does screen:unblit even exist ?

---

No...
That's why it wont work...
D'oh :p

Zitat:

---

Zitat von Savagefreak

Hy guys...
So,
I am making a side scrolling FPS game thingy...
I have 5 bullet blitted but I want to let one dissapear when I press R.
Obv. screen:unblit(400,220,bul let) didn't work :p
So... Could anyone help me?

(*sigh* I'm a lua n00bz0r :| )

---

use an if statement to blit it.
eg

Code:

---

if r = false then
  screen:blit(400,220,bullet)
end
if pad:r() then
  r = true
end

---

he wants to "unblit" it so to speak. Not blit it.
-= Double Post =-
Why dont you try making the image nil or null ??

i forget :S

Zitat:

---

Zitat von eldiablov

he wants to "unblit" it so to speak. Not blit it.
-= Double Post =-
Why dont you try making the image nil or null ??

i forget :S

---

exactly, thats what that script does. first it blits it then when you press r it wont blit any more.....

Oh snap. SOrry

Zitat:

---

Zitat von eldiablov

Oh snap. SOrry

---

lol np, also in case no one saw it.

doese any one know any good wifi tuts without netlib

id just refer to the lua documentation. It will be complicated though.

Zitat:

---

Zitat von the undead

lol np, also in case no one saw it.

doese any one know any good wifi tuts without netlib

---

There might be but it might be dificult seeing as youresam bascically perfected it, but yeah it is hard to comprehend

pomg....
I'm a real n00b :|

Now I have this:

Code:

---

while true do




gun = Image.load("IMG/gun.png")
crosshair = Image.load("IMG/crshr.png")
bullet = Image.load("IMG/Bullet.png")
health_bar = Image.load("IMG/health_bar.png")
tools = Image.load("IMG/Toolkit.png")


while true do
screen:clear()
screen:blit(1,1,gun)
screen:blit(0,0,tools)
screen:blit(1,1,health_bar)
screen:blit(200,50,crosshair)
screen:blit(400,260,bullet)
screen:blit(400,250,bullet)
screen:blit(400,240,bullet)
screen:blit(400,230,bullet)
screen:blit(400,220,bullet)

pad = Controls.read()

if r = false then
  screen:blit(400,220,bullet)
end
if pad:r() then
  r = true

end

screen.flip()

screen:clear()

end

end

---

and I get this error:
27: then expected near =

So... help?

Zitat:

---

Zitat von Savagefreak

pomg....
I'm a real n00b :|

Now I have this:

Code:

---

while true do




gun = Image.load("IMG/gun.png")
crosshair = Image.load("IMG/crshr.png")
bullet = Image.load("IMG/Bullet.png")
health_bar = Image.load("IMG/health_bar.png")
tools = Image.load("IMG/Toolkit.png")


while true do
screen:clear()
screen:blit(1,1,gun)
screen:blit(0,0,tools)
screen:blit(1,1,health_bar)
screen:blit(200,50,crosshair)
screen:blit(400,260,bullet)
screen:blit(400,250,bullet)
screen:blit(400,240,bullet)
screen:blit(400,230,bullet)
screen:blit(400,220,bullet)

pad = Controls.read()

if r == false then
  screen:blit(400,220,bullet)
end
if pad:r() then
  r = true

end

screen.flip()

screen.waitVblankStart()

screen:clear()

end

end

---

and I get this error:
27: then expected near =

So... help?

---

Try adding that extra "="
also you may have to add a "screen.waitVblankStart() " arounf the end

Code:

---

if r = false then

---

should be

Code:

---

if r == false then

---

Code:

---

bullet = Image.load("folder2/cross.png")
r = false

while true do

screen:clear()

if r == false then
screen:blit(5,220,bullet)
end

pad = Controls.read()

if pad:cross() and r == false then
  r = true
elseif pad:cross() and r == true then
  r = false
end

screen.waitVblankStart()
screen.flip()
end

---

this works ok, but better to use oldpad if you know how to..

Alright... so I added that stuff...
Now I have this:

Code:

---

while true do




gun = Image.load("IMG/gun.png")
crosshair = Image.load("IMG/crshr.png")
bullet1 = Image.load("IMG/Bullet.png")
bullet2 = Image.load("IMG/Bullet.png")
bullet3 = Image.load("IMG/Bullet.png")
bullet4 = Image.load("IMG/Bullet.png")
bullet5 = Image.load("IMG/Bullet.png")
health_bar = Image.load("IMG/health_bar.png")
tools = Image.load("IMG/Toolkit.png")


while true do
screen:clear()
screen:blit(1,1,gun)
screen:blit(0,0,tools)
screen:blit(1,1,health_bar)
screen:blit(200,50,crosshair)

pad = Controls.read()

if r == false then
  screen:blit(400,260,bullet5)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,250,bullet4)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,240,bullet3)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,230,bullet2)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,220,bullet1)
end
if pad:r() then
  r = true
end





screen.flip()




screen:clear()



end






end

---

and it wont blit any bullets :|
btw, Can you get on flashchat?

at first you have to define "r" in "your variables sections" like this:

r = false

edit btw im on chat

oops
were it says


if r = false make that

if r == false

Code:

---

while true do




gun = Image.load("IMG/gun.png")
crosshair = Image.load("IMG/crshr.png")
bullet1 = Image.load("IMG/Bullet.png")
bullet2 = Image.load("IMG/Bullet.png")
bullet3 = Image.load("IMG/Bullet.png")
bullet4 = Image.load("IMG/Bullet.png")
bullet5 = Image.load("IMG/Bullet.png")
health_bar = Image.load("IMG/health_bar.png")
tools = Image.load("IMG/Toolkit.png")


while true do
screen:clear()
screen:blit(1,1,gun)
screen:blit(0,0,tools)
screen:blit(1,1,health_bar)
screen:blit(200,50,crosshair)

pad = Controls.read()

if r == false then
  screen:blit(400,260,bullet5)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,250,bullet4)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,240,bullet3)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,230,bullet2)
end
if pad:r() then
  r = true
end

if r == false then
  screen:blit(400,220,bullet1)
end
if pad:r() then
  r = true
end



screen:waitVblankStart()

screen.flip()




screen:clear()



end






end

---

and it wont blit any bullets :|
btw, Can you get on flashchat?[/QUOTE]

Zitat:

---

Zitat von myschoo

at first you have to define "r" in "your variables sections" like this:

r = false

edit btw im on chat

---

Could you please answer on the chat? :)
btw...
I added the r = false now.
But now when I press R all bullets disappear :|
...

Code:

---

gun = Image.load("IMG/gun.png")
crosshair = Image.load("IMG/crshr.png")
bullet = Image.load("IMG/Bullet.png")
health_bar = Image.load("IMG/health_bar.png")
tools = Image.load("IMG/Toolkit.png")

blitImage = true

while true do

screen:clear()

pad = Controls.read()

if blitImage == true then
  screen:blit(400,260,bullet)
  screen:blit(400,250,bullet)
  screen:blit(400,240,bullet)
  screen:blit(400,230,bullet)
  screen:blit(400,220,bullet)
end

if pad:r() then
  blitImage = false
elseif pad:circle() then
  blitImage = true
end

screen.waitVblankStart()
screen.flip()
end

---

this will unblit all images at once, and it will blit them back after you press (O) button

if u add

Code:

---

if pad:l() then
  r = false
end

---

then you can get them back

Is there a way with Lua to check if the file you are going to flash is currupt or not.

i think no, atleast not in lua

Code:

---

screen:fillRect (xIcon, yIcon, 5, 5, white)
screen.waitVblankStart(4)
screen.flip()
end

---

Whats wrong with that I'm getting an error

Zitat:

---

error: index.lua:55: '<eof>' expected near 'end'

---

SCRATCH WHATS ABOVE


I started from scratch and this is part of my new code

Code:

---

if menustatus == 1 then
    if pad:cross() then
    menu[1]
end

---

Here is the new error

Code:

---

index.lua:32: '=' expected near 'end'

---

you need to have one "end" for every "if"

also, if "menu" is a function, you need to use the () brackets, not the []

Zitat:

---

Zitat von Merick

you need to have one "end" for every "if"

also, if "menu" is a function, you need to use the () brackets, not the []

---

didn't fix it

There is a way to check for file corruption in lua, but it all depends on what corruption is to that file. Id say compare a non-corrupted file to the supposivley corrupted file, but with all the new firmwares, you could mistake a 3.12 firmware file as corrupt.

also, what method did you use? I believe i said earlier just to write 1 byte at a time to flash, once it wont write anymore, subtact how many bytes you wrote from the total size of flash.

TP- Your method is called recursively scanning every directory on flash for each file. I dont know how you would do this (maybe use qsort and sort a massive array that is the flash file system inot alphabetical order, and go all the way to z)

Just use some for loops and system.listdirectory to get it done.

tactical u mean i need to add file by file?

or i can just add directories then subtract them to 24mb?

I do not think directories give you their filesize. Since I see no other method, yes, that's what I mean.

flashroot = System.listDirectory("fla sh0:/")
table.remove(flashroot,1)
table.remove(flashroot,1)
for i = 1, table.getn(flashroot) do
if flashroot[i].directory then
tmpflashdir = System.listDirectory("fla sh0:/".flashroot[i].name)
table.remove(tmpflashdir, 1)
table.remove(tmpflashdir, 1)
for i = 1, table.getn(

etc just use a bunch of for loops and system.listdirectory and then get the filesize from the listdir resulty and add them all up.

ai - Directories dont take up any space (maybe a few bytes for hte name of it). What you should do, is write a file to flash0:. Than. write the same file to flash0, but with 1 byte added to it (if you want to be byte-precise, you could write megabyte if you wanted megabyte-precise). Repeat this until you cannot write to flash anymore, meaning its full. Than simply subtract hte total amount of space on flash0: (24 mb?) by how many bytes you wrote so it filled up. this is how much space is left. After you get the number you wanted, delete/remove the temporary file you used ooff flash0:. That seems like the best way. But, if flash0: can only be written to so many times, you could use my dumpFileSystem function to dump flash0:'s contents to ms0:, and subtract how large the ms0:/flash0/ folder is, from 24 mb or w/e the total is. than you could remove the folder after getting hte number you want. This creates a problem for 32mb users, or any users iwth low memory stick space.

TP - thats not a very good way to do it, as you dont know how many folders one has on flash. Ive created a secrret folder on my flash containing 1 TXT file containing my wireless internet 64-bit encrpyption code. Your method is very static, and not very user friendly (plus its manual recursion, so its pretty ugly =-S).

It's not static, it'd run through all files with the for loops. Also, if you write to flash and run out of space you might corrupt something. And if you dumped it, you'd then have to find the size of that dumped folder. I'm just finding the size of it without dumping it.

TP- I know itll run through all the files within the folder, but what about the folder within that (subdirectories)? Also, you dont know how many foldes there are on flash0, you can only assume, unless im missing a chunk of your snippet?

Also, you dont corrupt anything when running out of space when writing. It will simply not allow any more on the disk, just as a memory card (believe me, ive already ran out of space with my flasher example i made, i flashed a very large gameboot, it just copied up to the point of being full. Didnt corrupt anything, just left whatever is left of the gameboot.

That snippet was just a beginning to it.