Many people will say it is not possible to create a working status bar, thats why you cant find a tutorial.
I created a working statusbar for you:
description.ext
#define FontM "tahomaB36"
#define FontHTML "CourierNewB64"
#define ST_LEFT 0
#define ST_RIGHT 1
#define ST_CENTER 2
#define ST_FRAME 64
#define CT_STATIC 0
#define CT_BUTTON 1
#define CT_EDIT 2
#define CT_COMBO 4
#define CT_LISTBOX 5
#define CT_ACTIVETEXT 11
class RscText
{
type = CT_STATIC;
idc = -1;
style = ST_LEFT;
colorBackground[] = {0, 0, 0, 0};
colorText[] = {1, 1, 1, 1};
font = FontM;
sizeEx = 0.04;
};
class Dlgstatus
{
idd = -1;
movingEnable = true;
controlsBackground[] = { back, frame, status, statusbar, text };
class back : RscText
{
colorBackground[] = {0.4, 0.4, 0.4, 0.75};
text = ;
x = 0.4;
y = 0.2;
w = 0.3;
h = 0.35;
};
class statusbar : RscText
{
colorBackground[] = {0, 0, 0.75, 0.75};
text = ;
x = 0.44;
y = 0.3;
w = statusx;
h = 0.02;
};
class status : RscText
{
colorBackground[] = {0.75, 0.75, 0.75, 0.75};
text = ;
x = 0.44;
y = 0.3;
w = 0.2;
h = 0.02;
};
class text : RscText
{
colorBackground[] = {0, 0, 0, 0.75};
text = Closing OFP...;
x = 0.44;
y = 0.4;
w = 0.2;
h = 0.04;
};
class frame : RscText
{
idc = 103;
style = ST_FRAME;
colorText[] = {0, 0, 0, 1};
text = " ";
font = FontHTML;
sizeEx = 0.025;
x = 0.41;
y = 0.21;
w = 0.28;
h = 0.33;
};
objects[] = { };
controls[] = { };
};
init.sqs
statusx = 0
~3
dlg=createdialog "dlgstatus"
~2
#loop
? statusx >= 0.2: goto "done"
~0.005
closedialog 0
statusx = statusx + 0.001
dlg=createdialog "dlgstatus"
goto "loop"
#done
b="SmokeSource" camcreate [0,0,0];b setpos [10,10,10]