From e9a8dafe97dfc4570e08bd8a1054e7f6e91ff8a1 Mon Sep 17 00:00:00 2001 From: whiteshark0 Date: Sun, 8 Apr 2007 21:50:36 +0000 Subject: Fixed a Bug Fading in to Options Screen Fixed Exit in Grafic Screen don't work git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@74 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenOptions.pas | 2 ++ Game/Code/Screens/UScreenOptionsGraphics.pas | 6 +++--- 2 files changed, 5 insertions(+), 3 deletions(-) (limited to 'Game/Code/Screens') diff --git a/Game/Code/Screens/UScreenOptions.pas b/Game/Code/Screens/UScreenOptions.pas index 2a8d0d9a..0fffedac 100644 --- a/Game/Code/Screens/UScreenOptions.pas +++ b/Game/Code/Screens/UScreenOptions.pas @@ -232,6 +232,8 @@ begin Button[3].Texture.ScaleW := Progress; Button[4].Texture.ScaleW := Progress; Button[5].Texture.ScaleW := Progress; + Button[6].Texture.ScaleW := Progress; + Button[7].Texture.ScaleW := Progress; end; end. diff --git a/Game/Code/Screens/UScreenOptionsGraphics.pas b/Game/Code/Screens/UScreenOptionsGraphics.pas index 4befb092..6152c9c0 100644 --- a/Game/Code/Screens/UScreenOptionsGraphics.pas +++ b/Game/Code/Screens/UScreenOptionsGraphics.pas @@ -38,7 +38,7 @@ begin { if SelInteraction <= 1 then begin Restart := true; end;} - if SelInteraction = 6 then begin + if SelInteraction = 5 then begin Ini.Save; Music.PlayBack; FadeTo(@ScreenOptions); @@ -50,14 +50,14 @@ begin InteractPrev; SDLK_RIGHT: begin - if (SelInteraction >= 0) and (SelInteraction <= 5) then begin + if (SelInteraction >= 0) and (SelInteraction <= 4) then begin Music.PlayOption; InteractInc; end; end; SDLK_LEFT: begin - if (SelInteraction >= 0) and (SelInteraction <= 5) then begin + if (SelInteraction >= 0) and (SelInteraction <= 4) then begin Music.PlayOption; InteractDec; end; -- cgit v1.2.3