Some help for code structure

Strict
Import mojo


Global loader:C_FakeLoader




Function Main:Int()
	Local game:C_Game = New C_Game()
	
	Return 0
	
End




Class C_Game extends App
	Method OnCreate:Int()
		loader = C_FakeLoader("MyFile.dat")
		
		Return 0
		
	End
	
	
	Method OnUpdate:Int()
		Local currentByte:Int
		
		
		If loader.bytesRemaining > 0
			currentByte = loader.ReadByte()
			
		EndIf
		
		Return 0
		
	End
	
	
	Method OnRender:Int()
		Cls
		
		If loader.bytesRemaining > 0
			DrawText("Loading!", DeviceWidth() / 2, (DeviceHeight() / 2) - 20)
			DrawText(loader.bytesRemaining, DeviceWidth() / 2, DeviceHeight() / 2)
			
		EndIf
		
		Return 0
		
	End
	
End




Class C_FakeLoader
	Field bytesRemaining:Int
	
	
	Method New(filePath:String)
		Self.bytesRemaining = 1000
		
	End
	
	
	Method ReadByte:Int()
		Local currentByte:Int
		
		
		currentByte = Self.bytesRemaining
		bytesRemaining = (bytesRemaining - 1)
		
		Return currentByte
		
	End
	
End

Strict
Import mojo




'Anything global is declared here and can be defined, accessed or changed anywhere in the program.
Global i_am_a_global_integer:Int
Global i_am_a_global_float:Float
Global i_am_a_global_string:String



'All Monkey-X programs need an entry point function named Main, any function that needs to return a value must have its return type declared just before the parentheses().

Function Main:Int()
	Local game:C_Game = New C_Game()
	
	
	'Globals can be defined inside functions, like this.
	i_am_a_global_integer = 123
	i_am_a_global_float = 123.45
	i_am_a_global_string = "Hello!"
	
	Return 0
	
End




'Mojo programs require a class that inherits from the Mojo App class, then an instance of this class needs to be created inside the Main:Int() function.
'Classes can contain methods, these are similar to functions.
'But, unlike functions and methods, variables are declared inside a class by using the Field keyword and can be defined in any of its methods; I have put an example of a field inside the class below.

Class C_Game extends App
	'Declaration of variable inside a class.
	Field classVariable:Int
	
	
	Method OnCreate:Int()
		'Initiation stuff goes in here.
		
		'Fields are accessed like this.
		Self.classVariable = 123
		
		
		'Globals can also be defined inside methods, like this.
		i_am_a_global_integer = 123
		i_am_a_global_float = 123.45
		i_am_a_global_string = "Hello!"
		
		
		Return 0
		
	End
	
	
	Method OnUpdate:Int()
		'Update stuff goes in here.
		
		'Globals can also be defined, accessed or changed here.
		'This example will increase this variable by 1 every time OnUpdate() is called by the Mojo App.
		i_am_a_global_integer = (i_am_a_global_integer + 1)
		
		Return 0
		
	End
	
	
	Method OnRender:Int()
		'Clear the screen each frame.
		Cls
		
		'Drawing stuff goes in here.
		
		'And finally, this will spam stuff onto the screen.
		DrawText(i_am_a_global_integer, 0, 0)
		DrawText(i_am_a_global_float, 0, 20)
		DrawText(i_am_a_global_string, 0, 40)
		
		Return 0
		
	End
	
End

Class Game Extends App

	Field  Check:Image, ExitKnopf:Image,....


	Method OnCreate%()
		SetUpdateRate 60
		Loader= New LoaderClass
		.....
	End



	Method ReceivedImage:Void(bild:Image,FileName$)
		Print "LOADER received "+ FileName + " " + BilderZahl + " " + Millisecs()
		Select FileName
			Case "Check.png"
				Check=bild			
				Loader.Load("ExitKnopf.png")
			Case "ExitKnopf.png"
			....
		End
		BilderZahl=BilderZahl+1
	End



	Method OnUpdate%()
		If KeyHit(KEY_ESCAPE) Self.OnBack() 
		.....
		UpdateAsyncEvents
	End



	Method OnRender%()
		If LadeStufe=0
			Loader.Load("Check.png")
			SplashScreen
			LadeStufe=1			
			Return 0
		Endif
		.....
	End
End


Class LoaderClass Implements  IOnLoadImageComplete

	Method Load:Void(FileName$,Frames%=1)
		If ExtractExt(FileName)="png"
			LoadImageAsync  FileName,Frames,,Self
		Endif
	End



	Method OnLoadImageComplete:Void ( bild:Image, path:String, source:IAsyncEventSource )
		MyGame.ReceivedImage bild,path
	End
End