3D Title Menu Problems.

Function SCENE_Menu%()

	-> Block of code to setup the scene this function executes. 
	This means declaring local variables, positioning the camera etc.

	-> Block of code with a loop to run the scene. In your case, 
	a 'menu screen with options'. Whenever the user selects an
	option, you can have a special animation\transition like a 
	fade-out, for instance, and as soon as the transition ends 
	(that's when the next scene should start), you 'store the chosen 
	option in a local variable' and exit the loop with the Exit command.

	-> Block of code to free\clean anything this scene might have 
	loaded and that won't be used again, like a graphic\sound\font
	that is only used here.

	-> Return the 'chosen option stored in that local variable' as an 
	integer. This represents the "ID" of the new state to be run.

End Function

Global CurrentState ;The only global you should use in your entire program...

While Not CurrentState = STATE_Quit
	Select CurrentState
		Case STATE_Play
			CurrentState = SCENE_Play()
		Case STATE_Menu
			CurrentState = SCENE_Menu()
		Case STATE_Options
			CurrentState = SCENE_Options()
		Case STATE_Quit ;Redundancy check just for clearance.
			End
	End Select
Wend

End

Function Print_Hello%()
    
    
    Print "hello World"
    WaitKey()
    Repeat 
    Forever
    
End Function


Print_Hello()

Function Print_Hello%(msg$)    ;Now takes one argument
    
    
    Print msg
    WaitKey()
    Repeat 
    Forever
    
End Function


Print_Hello("Sup world")

Function Add_Then_Double#(x#, y#)
    Return (x + y) * 2
End Function

;... can be used as part of an expression
Print Add_Then_Double(2, Ceil(Log(31) / Log(2))) + 5

Local a = 1, b = 2, c = 3
Global g = 2, h = 4

Function Foo(a, b)    ;This a and b are completely unrelated to the outer ones
    Local c = a + b * g    ;The global variable g is visible from inside the function, and if we change it, it will change the global outside
    Print "My local c is " + c
    Local h = c * g    ;Local variables can however "shadow" globals - this h makes the global h outside invisible
    Return h
End Function

Print Foo(c, b + a)    ;Prints "My local c is 9", then 18
Print c        ;Prints 3

PositionEntity ent, 10, 20, 30    ;Standalone command - no () needed
Local xPos# = EntityX(ent)    ;Function as value expression

;*******************
;** Bucky the Box **
;** Practice File **
;*******************

AppTitle "Bucky the Box"
Graphics3D 800,600,32
SetBuffer BackBuffer()

HidePointer ;hide the windows mouse

Include "Includes\Draw3D.bb" ;load draw commands file
Include "Functions.bb" ;include game functions

Const STATE_Play = 1
Const STATE_Menu = 2
Const STATE_Quit = 3

If FDrawHandle=0 Then Runtime Error "Handle not set"

Function SCENE_Menu()
	;"-> Block of code to setup the scene [...]"	
	Local menuTimer = CreateTimer(60)
	Local menuMusic = PlayMusic( ... )
	Local menuTitle = LoadImage3D( ... )
	Local menuLogo = LoadImage3D( ... )	
	Local newState = 0

	;"-> Block of code with a loop to run the scene [...]"
	;[...]

	;"-> Block of code to free\clean [...]"
	FreeTimer menuTimer
	StopChannel menuMusic
	FreeImage3D menuTitle
	FreeImage3D menuLogo

	"-> Return the ID of the new scene that the game will show."
	Return newState
End Function

;THIS IS ALL WITHIN THE OUTER SCOPE. ALL GLOBALS HAVE TO GO HERE
Graphics3D 800,600
SetBuffer BackBuffer()

Type enemy ;Types are useful for managing a bunch of data at once.
                    ;Types are Global in nature.
   Field body
End Type

Global camera = CreateCamera() ;Your camera is going to be
                                                     ;everywhere in your game!

Global hero = CreateSphere() ;This is your character's body, and needs
                                                ;to be accessible anywhere

Global lifeleft = 100 ;Your character has so much life, and it is going to be
                                ;everywhere

Local enemycount ;This variable is only used once, to make a certain
                              ;number of enemies. No need to have this available
                              ;throughout the whole program.
For enemycount = 1 To 100 ;Do this part 100 times, so we will have 100
                                             ;enemies total
   MakeNewEnemey() ;This will leave the Outer Scope and move into the
                                  ;"MakeNewEnemey() Scope", found below in the
                                  ;Function
Next

Function MakeNewEnemy() ;NOW WE HAVE MOVED INTO THE INNER
                                            ;SCOPE OF "MakeNewEnemy()"
   Local tempbody = CreateCube() ;"tempbody" is only going to exist
                                                       ;inside of this scope. Everywhere else,
                                                       ;it is non-existent.
   Local e.enemy ;Make a new Enemy Type, and the variable only needs
                           ;to exist in this scope. We can access all enemies later
                           ;in the "UpdateEnemies" function below the main loop.
   e\body = tempbody ;the enemy's body is now the temporary cube we
                                   ;created.
End Function ;WE ARE NOW LEAVING THE INNER SCOPE AND RETURNING
                      ;TO THE PREVIOUS SCOPE BEFORE WE CAME HERE.

;NOW LET'S MOVE INTO THE MAIN SCOPE
While Not KeyDown(1)

   UpdateEnemies() ;THIS WILL GO TO THE INNER SCOPE OF
                               ;"UpdateEnemies()" FOUND BELOW
   ;MoveEntity tempbody,0,1,0 ;Note that "tempbody" was local to the
                                                ;"MakeNewEnemy()" Scope, and will cause
                                                ;an error if you try to use it in the Main
                                                ;Scope. That's why it is commented out.
   UpdateWorld
   RenderWorld
   Flip

Wend

;NOTE THAT THIS SPACE IS OUTSIDE OF THE MAIN LOOP AND NOT INSIDE
;OF A FUNCTION, SO IT'S BACK IN THE OUTER SCOPE.

Function UpdateEnemies() ;THIS IS NOW IN THE "UpdateEnemies()"
                                           ;SCOPE
   Local e.enemy ;We are only going to use this variable in this function.
                           ;Even though we already used a variable with the same
                           ;name in the "MakeNewEnemy()" Scope, they are both
                           ;Local to the function they were created in, so they are
                           ;still completely different from each other.
   For e.enemy = Each enemy ;For every single enemy we've created
      If EntityDistance(hero,e\body) < 10 ;Here's where we can access Global variables.
                                                               ;Remember that "hero" is Global,
                                                               ;and can be seen anywhere in
                                                               ;our game.
         lifeleft = lifeleft - 10 ;Change the Global variable of lifeleft, and take
                                         ;away 10 units of life
      EndIf
   Next
End Function ;NOW WE WILL RETURN TO THE PREVIOUS SCOPE BEFORE
                     ;THIS FUNCTION


;NOTE THAT THIS SPACE IS OUTSIDE OF THE MAIN LOOP AND NOT INSIDE
;OF A FUNCTION, SO IT'S BACK IN THE OUTER SCOPE.
End

Function BLAH()

   Local x
   x = x + 1
   If x >= 100
      Print "This is what I want to happen after multiple passes"
   EndIf
   Return

End Function

Local x = BLAH(x)

Function BLAH(variable)

   variable = variable + 1
   If variable >= 100
      ;Do something
   EndIf
   Return variable

End Function

Local camera = CreateCamera() ;the camera variable is local

While Not KeyDown(1)

   MoveEntity camera,0,0,1 ;even though camera is local to the Outer Scope, it is still visible in this loop

Wend

While Not KeyDown(1)

   Global x = 0

Wend