Sorry your browser is not supported!

set display mode ..... whatever....
set text transparent
color backdrop 0
sync rate 0
sync on
do
.... stuff....
....text here....
sync
loop

  rem Loading 2D Objects
   load image "data\textures\1.png",91
   load image "data\textures\2.png",92
   load image "data\textures\3.png",93
   load image "data\textures\go.png",94

   rem Loading 3D Objects
   if p1car$="Lamborghini" then delete object 1:load object "data\models\gallardo\gallardo.x",1
   if track$="Roman" then load object "data\models\sprint_tracks\roman\roman.x",3
   if track$="Bridge" then load object "data\models\sprint_tracks\bridge\bridge.x",3

   rem Put everything into position
   show object 1

   if p1car$="Bugatti"
      scale object 1,40,40,40
      speed#=0.0
      maxspeed#=120.0
      sync
   endif

   if track$="Bridge"
      position camera 1,50,50,50
      point camera 1,0,0,0
      position object 3,0,-130,-115
      scale object 3,450,450,450
      sync
   endif

   if track$="Roman"
      position camera 1,150,150,150
      point camera 1,0,0,0
      position object 3,0,0,0
      position camera 1,50,50,50
      point camera 1,0,0,0
   endif

   if p1car$="Lamborghini"
      position object 1,0,15,10
      scale object 1,30,30,30
      speed#=0.0
      maxspeed#=120.0
      sync
   endif


   rem Loading finished
   set text transparent
   color backdrop 0
   sync rate 0
   set text font "CHILLER"
   set text size 35
      do
        if DEBUG=1 and controlkey()=1
            set cursor 0,0
            print "Camera pos: X=";STR$(object position x(1));"  Y=";STR$(object position y(1)+15);"  Z=";STR$(object position z(1)+15)
            print "Car Model pos: X=";STR$(object position x(1));"  Y=";STR$(object position y(1));"  Z="+STR$(object position z(1))
            print "Terrain Model pos: X=";STR$(object position x(3));"  Y=";STR$(object position y(3));"  Z=";STR$(object position z(3))
            print "FPS: ";STR$(screen fps()) 
        endif
        
        
        position camera 1,object position x(1),object position y(1)+15,object position z(1)+15
        point camera 1,object position x(1),object position y(1)+15,object position z(1)+15
        
        sync

      loop
return

#constant SET_DEBUG     1

REM - Made my own object because I didn't have your objects and images to load.
make object cube 1,10
position object 1,0,0,50
    
REM - after object loading and stuff
set text transparent
color backdrop 0
sync on : sync rate 0   // ADDED: sync on
set text font "CHILLER"
set text size 35

do
    turn object left 1,0.1

    if SET_DEBUG=1 and controlkey()=1       REM - Changed DEBUG to SET_DEBUG, because it is a reserved word.
                                            REM - Is it supposed to be for when you set DEGUG mode in the compiler?
        set cursor 0,0
        print "FPS: ";STR$(screen fps())    REM - Used print like you did, although I would use a Text statement instead. 
    endif
    
    sync
loop