Import mojo

Class Game Extends App

    Function DrawBild()
        SetColor 0, 0, 255
      DrawRect 0, 0, DeviceWidth(), DeviceHeight()
      SetColor 255, 255, 255
      SetBlend AlphaBlend
      SetAlpha 0.5
      DrawText "LOL", 10, 10
    End

    Field updateCount
   
    Method OnCreate()
       
        SetUpdateRate 60
    End
   
       
    Method OnRender()
        Cls
        DrawBild
    End
   
End

Function Main()
    New Game()
End

   Method OnResize()
      
   End

Import mojo

Function Main()
   New Game()
End

Class Game Extends App

   'summary:The OnCreate Method is called when mojo has been initialized and the application has been successfully created.
   Method OnCreate()
   
      'Set how many times per second the game should update and render itself
      SetUpdateRate(60)
   
   End
   
   'summary: This method is automatically called when the application's update timer ticks.
   Method OnUpdate()
      
   End
   
   'summary: This method is automatically called when the application should render itself, such as when the application first starts, or following an OnUpdate call.
   Method OnRender()
      Cls()
      
   End

   'summary: This method is called instead of OnRender when the application should render itself, but there are still resources such as images or sounds in the process of being loaded.
   Method OnLoading()
      
   End
   
   'summary: This method is called when the application's device window size changes.
   Method OnResize()
      
   End
   
   '#REGION Code to handle susped status of the game goes here
   
   'summary: OnSuspend is called when your application is about to be suspended.
   Method OnSuspend()
   
   End
   
   'summary: OnResume is called when your application is made active again after having been in a suspended state.
   Method OnResume()
      
   End   
   '#END REGION
   
   '#REGION Code to handle game closing goes here:
   
   'summary: This method is called when the application's 'close' button is pressed.
   Method OnClose()
      Super.OnClose()
   End

   'summary:This method is called when the application's 'back' button is pressed.
   Method OnBack()
      Super.OnBack()
   End
   
   '#END REGION

End

GLFWvidmode return_struct;
int width, height, x, y;

int DesktopWidth(void)
{
   glfwGetDesktopMode( &return_struct );

   return return_struct.Width;
}

int DesktopHeight(void)
{
   glfwGetDesktopMode( &return_struct );

   return return_struct.Height;
}


void SetWindowSize(int width, int height)
{
   glfwSetWindowSize(width, height);
}

int DeviceWidth(void)
{
   glfwGetWindowSize(&width, &height);
   return width;
}

int DeviceHeight(void)
{
   glfwGetWindowSize(&width, &height);
   return height;
}

void SetWindowPos(int x, int y)
{
   glfwSetWindowPos(x, y);
}

Import mojo

#GLFW_WINDOW_TITLE="YAAAAA"
Import "screen.cpp"

#GLFW_WINDOW_FULLSCREEN=True
#If TARGET = "glfw" Then
Extern
   Function DesktopWidth:Int()
   Function DesktopHeight:Int()
   Function SetWindowSize:Void(width:Int, height:Int)
   Function DeviceWidth:Int()
   Function DeviceHeight:Int()
   Function SetWindowPos:Void(x:int, y:int)
   
Public

#Else
   Function DesktopWidth:Int()
      Return 1
   End Function
   Function DesktopHeight:Int()
      Return 1
   End Function
   Function SetWindowSize:Void(width:Int,height:Int)
   End Function
   Function SetWindowPos:Void(x:int, y:int)
   End Function
#End If

Class Game Extends App
      
    Function DrawBild(Bild:Image)
        SetColor 0, 0, 255
      DrawRect 0, 0, DeviceWidth(), DeviceHeight()
      SetColor 255, 255, 255
      SetBlend AlphaBlend
      DrawText "LOL", 10, 10
      DrawText TouchX() + " " + TouchY(), 10, 20
   
    End

Method OnCreate()
      SetWindowSize(DesktopWidth(), DesktopHeight())
            
       
        SetUpdateRate 60
    End
   
       
    Method OnRender()
        Cls
        DrawBild Char
      #If TARGET = "glfw" Then
         If KeyDown(KEY_ESCAPE) Then EndApp
      #EndIf
    End
   
End

Function Main()
    New Game()
End

Import mojo

#GLFW_WINDOW_TITLE="YAAAAA"
Import "screen.cpp"

#If TARGET = "glfw" Then
Extern
   Function DesktopWidth:Int()
   Function DesktopHeight:Int()
   Function SetWindowSize:Void(width:Int, height:Int)
   Function DeviceWidth:Int()
   Function DeviceHeight:Int()
   Function SetWindowPos:Void(x:int, y:int)
   
Public

#Else
   Function DesktopWidth:Int()
      Return 1
   End Function
   Function DesktopHeight:Int()
      Return 1
   End Function
   Function SetWindowSize:Void(width:Int,height:Int)
   End Function
   Function SetWindowPos:Void(x:int, y:int)
   End Function
#End If

Class Game Extends App
      
    Function DrawBild(Bild:Image)
        SetColor 0, 0, 255
      DrawRect 0, 0, DeviceWidth(), DeviceHeight()
      SetColor 255, 255, 255
      SetBlend AlphaBlend
      DrawText "LOL", 10, 10
      DrawText TouchX() + " " + TouchY(), 10, 20
   
    End

Method OnCreate()
      SetWindowSize(DesktopWidth()-10, DesktopHeight()-70)
      SetWindowPos(0, 0)      
       
        SetUpdateRate 60
    End
   
       
    Method OnRender()
        Cls
        DrawBild Char
      #If TARGET = "glfw" Then
         If KeyDown(KEY_ESCAPE) Then EndApp
      #EndIf
    End
   
End

Function Main()
    New Game()
End