Skip to content

Commit

Permalink
Merge pull request #13 from softbie/menu-exit-fix
Browse files Browse the repository at this point in the history
Фикс выхода из меню настроек
  • Loading branch information
13Hz authored Jun 20, 2024
2 parents 588e346 + ab37b68 commit 74af665
Showing 1 changed file with 7 additions and 7 deletions.
14 changes: 7 additions & 7 deletions Menus.bb
Original file line number Diff line number Diff line change
Expand Up @@ -77,7 +77,7 @@ Function Options()
;frame rating
timer=CreateTimer(30)
;MAIN LOOP
foc=9 : oldfoc=foc
foc=10 : oldfoc=foc
go=0 : gotim=0 : keytim=20
While go=0

Expand All @@ -96,9 +96,9 @@ While go=0
If KeyDown(1) Then go=-1
;proceed
If KeyDown(28) Or ButtonPressed()
If foc<6 Then foc=9 : keytim=10
If foc=>7 And foc=<8 Then go=1
If foc=9 And keytim=0 Then go=-1
If foc<8 Then foc=10 : keytim=10
If foc=>8 And foc=<9 Then go=1
If foc=10 And keytim=0 Then go=-1
EndIf
EndIf

Expand Down Expand Up @@ -194,9 +194,9 @@ Wend
FreeTimer timer
If go=1 Then PlaySound sMenuGo Else PlaySound sMenuBack
If go=1
If foc=7 Then screen=3
If foc=8 Then screen=4
If foc=9 Then screen=1
If foc=8 Then screen=3
If foc=9 Then screen=4
If foc=10 Then screen=1
EndIf
If go=-1 Then screen=1
End Function
Expand Down

0 comments on commit 74af665

Please sign in to comment.