I copy pasted this code:
`t$=Text to display, prog#=0.0 - 1.0
FUNCTION Progress(t$,prog#)
prog_x=(screen width()/2)-128
prog_y=(screen height()/2)
ink rgb(255,255,255),0
center text prog_x+128,prog_y-16,t$
ink rgb(16,16,16),0
box prog_x-1,prog_y-1,prog_x+257,prog_y+17
ink rgb(255,16,16),0
box prog_x-1,prog_y-1,prog_x+1+(prog#*256),prog_y+17
sync
ENDFUNCTION
But when I use it like this
Function InitDarkBasic()
Sync on
Progress("Loading:",1/20)
Backdrop on
Progress("Loading:",2/20)
Autocam off
Progress("Loading:",3/20)
Hide Mouse
Progress("Loading:",4/20)
Set Camera Range 0.5, 5000
Progress("Loading:",5/20)
Fog On
Progress("Loading:",6/20)
Fog Distance 40
Progress("Loading:",7/20)
Set Display Mode 1680,1050,16
Progress("Loading:",8/20)
Set Ambient Light 100
Progress("Loading:",9/20)
set point light 0, 50, 100, -50
Progress("Loading:",10/20)
set light range 0, 5000
Progress("Loading:",11/20)
Autocam Off
Progress("Loading:",12/20)
Randomize timer()
Progress("Loading:",13/20)
EndFunction
I get one bar that never moves.
Can anyone help?
