Téléchargement PSP

RacePSp - emulateur Neogeo pocket

par

RacePSp - emulateur Neogeo pocket

Caractéristiques

  • Langue : Français
  • Taille : 0.00 Ko
  • Licence : OpenSource
  • Site de l'éditeur : http://www.pspgen.com
  • Note de la rédaction : 4.0
  • Note de la communauté : 2.1/5 (19 avis)
  • Votre avis :
RacePSp - emulateur Neogeo pocket

Commenter 68 commentaires

Anonymous
bonjour ,j ai telech videospy pour custom firmw ,mais je n ai pas le meme fichier script que vous :?: :?: :?:
en dessous du code je n ai pas les modes :!:


constant1 = 4
constant2 = 20

keys = {
{ "C", "sin", "cos", "tan" },
{ "1/x", "x^2", "sqr", "/" },
{ "7", "8", "9", "*" },
{ "4", "5", "6", "-" },
{ "1", "2", "3", "+" },
{ "0", "+/-", ".", "=" } }

color = Color.new(0, 0, 255) --default ( 0, 255, 0)

function drawRect(x0, y0, w, h)
screen:drawLine(x0, y0, x0+w, y0, color)
screen:drawLine(x0, y0, x0, y0+h, color)
screen:drawLine(x0+w, y0, x0+w, y0+h, color)
screen:drawLine(x0+w, y0+h, x0, y0+h, color)
end

oldPad = Controls.read()
x = 1
y = 1
text = "0"
lastNumber = 0
deleteOnKey = true
lastOperation = ""
value = ""
number = 0

while true do
pad = Controls.read()
if pad ~= oldPad then
if pad:triangle() then
System.Quit()
end
if pad:left() then
x = x - 1
if x == 0 then
x = 4
end
end
if pad:right() then
x = x + 1
if x == 5 then
x = 1
end
end
if pad:up() then
y = y - 1
if y == 0 then
y = 6
end
end
if pad:down() then
y = y + 1
if y == 7 then
y = 1
end
end
if pad:cross() then
value = keys[y][x]
number = tonumber(text)
if value == "C" then
text = "0"
lastNumber = 0
lastOperation = ""
deleteOnKey = true
elseif value == "1/x" then
text = tostring(1/number)
elseif value == "sin" then
text = tostring(math.sin(number))
elseif value == "cos" then
text = tostring(math.cos(number))
elseif value == "tan" then
text = tostring(math.tan(number))
elseif value == "x^2" then
text = tostring(number*number)
elseif value == "sqr" then
text = tostring(math.sqrt(number))
elseif value == "/" or value == "*" or value == "-" or value == "+" or value == "=" then
if lastOperation == "/" then
text = tostring(lastNumber / number)
elseif lastOperation == "*" then
text = tostring(lastNumber * number)
elseif lastOperation == "-" then
text = tostring(lastNumber - number)
elseif lastOperation == "+" then
text = tostring(lastNumber + number)
end
if value == "=" and lastOperation == "=" then
if number == constant2 and lastNumber == constant1 then
System.rename("ms0:/MP_ROOT/100MNV01", "ms0:/MP_ROOT/100MNV03")
System.rename("ms0:/MP_ROOT/100MNV02", "ms0:/MP_ROOT/100MNV01")
System.rename("ms0:/MP_ROOT/100MNV03", "ms0:/MP_ROOT/100MNV02")
screen:print(200, 130, "Cheat enabled", Color.new(255, 0, 0))
screen.flip()
System.Quit()
end
end
number = tonumber(text)
lastNumber = number
if value == "=" then
text = tostring(number)
lastOperation = "="
else
lastOperation = value
end
deleteOnKey = true
elseif value == "+/-" then
text = tostring(-number)
else
if deleteOnKey then
text = value
deleteOnKey = false
else
text = text .. value
end
end
end
if pad:start() then
System.Quit()
end
oldPad = pad
end

screen:clear()
yk = 0
w = 80 --default 40
h = 40 --default 30
drawRect(w, 0, w * 4, h-2)
screen:print(w+4, 4, text, color)
for yindex,line in ipairs(keys) do
for xindex,key in ipairs(line) do
x0 = xindex * w
y0 = yindex * h
drawRect(x0, y0, w, h)
if xindex == x and yindex == y then
screen:fillRect(x0, y0, w, h, color)
foreground = Color.new(0, 0, 0)
else
foreground = color
end
screen:print(x0 + 5, y0 + 5, key, foreground)
end
end
screen.waitVblankStart()
screen.flip()
end
Signaler Citer
dmjb1981
Salut,
je pense que ce petit logiciel fera plaisir au petit pervers !!! Si vous voyez ce que je veux dire!!! lol
ciao
[HS] salut magixien, tu n'as pas repondu à mon MP!!!
Signaler Citer