Break On

$LoginBox = CreateObject("Kixtart.LoginBox")

$LoginBox.Caption = "Installing Applications"
$LoginBox.MinButton = 0
$LoginBox.MaxButton = 0
$LoginBox.SysMenu = 0
$LoginBox.Width = 400
$LoginBox.Height = 200

$Status = $LoginBox.AddLabel(320,10,70,20,"[12 of 15]")
$Display = $LoginBox.AddLabel(10,35,380,60,"Message")
$Message = $LoginBox.AddLabel(10,80,380,20,"Status")
$PBar = $LoginBox.AddProgressBar(10,120,370,30,"")

$LoginBox.Center
$LoginBox.Show

For $i = 1 To 100 Step 2
 $PBar.Value = $i
 Sleep (0.2)
Next

Exit 1

Break On

$LoginBox = CreateObject("Kixtart.LoginBox")

$LoginBox.Caption = "Installing Applications"
$LoginBox.MinButton = 0
$LoginBox.MaxButton = 0
$LoginBox.SysMenu = 0
$LoginBox.Width = 400
$LoginBox.Height = 150

$Message = $LoginBox.AddLabel(10,20,380,20,"")
$Message.FontSize = 10
$Message.FontBold = 1

$ProgressBar = $LoginBox.AddProgressBar(10,50,370,30,"")

$Status = $LoginBox.AddLabel(320,90,70,20,"")
$Status.FontBold = 1

$LoginBox.Center
$LoginBox.Show

$Installs =
"Installing Office,",
"Installing Office Service Pack 1...",
"Installing McAfee Anti-Virus...",
"Installing McAfee Service Pack ...",
"Installing Host Explorer ..."

$Count = UBound($Installs)

For $i = 1.0 To UBound($Installs)
 $Status.Text = "[$i or $Count]"
 $Message.Text = $Installs[$i]
 $ProgressBar.Value = (((0.0+$i)/$Count)*100)
 Sleep (2)
Next

$LoginBox = 0

Exit 1