Доброго времени суток. Хочу показать вам скрипт для опций в играх)
Скрипт написан
мною.
green = Color.new(0,255,0)
blue = Color.new(0,252,255)
fichiers = nil
Selecteur = 1
music = 1
picture = 1
while true do
screen:clear()
screen:print(50,50,"Music:" ..music,green)
screen:print(50,70,"Picture:" ..picture,green)
screen:print(50,90,"Save",green)
pad = Controls.read()
if pad:up() and not oldpad:up() then
Selecteur = Selecteur - 1
end
if pad:down() and not oldpad:down() then
Selecteur = Selecteur + 1
end
oldpad = Controls.read()
if Selecteur > 3 then
Selecteur = 1
end
if Selecteur < 1 then
Selecteur = 3
end
if Selecteur == 1 then
screen:print(50,50,"Music:",blue)
screen:print(50,70,"Picture:",green)
screen:print(50,90,"Save",green)
end
if Selecteur == 2 then
screen:print(50,50,"Music:",green)
screen:print(50,70,"Picture:",blue)
screen:print(50,90,"Save",green)
end
if Selecteur == 3 then
screen:print(50,50,"Music:",green)
screen:print(50,70,"Picture:",green)
screen:print(50,90,"Save",blue)
end
if pad:right() and Selecteur == 1 then
screen:clear()
music = 2
screen:print(50,50,"Music:" ..music,green)
screen:print(50,70,"Picture:" ..picture,green)
screen:print(50,90,"Save",green)
end
if pad:right() and Selecteur == 2 then
screen:clear()
picture = 2
screen:print(50,50,"Music:" ..music,blue)
screen:print(50,70,"Picture:" ..picture,green)
screen:print(50,90,"Save",green)
end
if pad:left() and Selecteur == 1 and music == 2 then
screen:clear()
music = 1
screen:print(50,50,"Music:" ..music,green)
screen:print(50,70,"Picture:" ..picture,blue)
screen:print(50,90,"Save",green)
end
if pad:left() and Selecteur == 2 and picture == 2 then
screen:clear()
picture = 1
screen:print(50,50,"Music:" ..music,green)
screen:print(50,70,"Picture:" ..picture,green)
screen:print(50,90,"Save",green)
end
if pad:cross() and Selecteur == 3 and music == 1 and picture == 1 then
file = io.open("Config.txt","w")
file:write("\nmysic = 1")
file:write("\npicture = 1")
file:close()
end
if pad:cross() and Selecteur == 3 and music == 2 and picture == 2 then
file = io.open("Config.txt","w")
file:write("\nmysic = 2")
file:write("\npicture = 2")
file:close()
end
if pad:cross() and Selecteur == 3 and music == 2 and picture == 1 then
file = io.open("Config.txt","w")
file:write("\nmysic = 2")
file:write("\npicture == 1")
file:close()
end
if pad:cross() and Selecteur == 3 and music == 1 and picture == 2 then
file = io.open("Config.txt","w")
file:write("\nmusic = 1")
file:write("\npicture = 2")
file:close()
end
screen.flip()
screen.waitVblankStart()
end
Жду +
.
Сообщение отредактировано 5 июля 2011 22:39. Редактировалось 2 раз(а)