code:

---

Break On
 
$Form = CreateObject("Kixtart.Form")
 
$Form.ScaleWidth = 300
$Form.ScaleHeight = 200
$Form.FontSize = 12
 
$Form.BackColor = 128,128,255
 
$Form.ForeColor = 0,0,255
$Form.FillColor = $Form.ForeColor
 
$Form.FillStyle = 1
  
$Form.Circle(26,30,40)
;$Form.Rectangle(27,10,110,40)
$Form.Circle(133,30,40)
$Form.Circle(80,80,50)
 
$Form.ForeColor = 255,255,255
$Form.FontName = "Comic Sans MS"
$Form.FontSize = 24
$Form.FontBold = 1
$Form.PrintXY(25,25,"Mickey")
$Form.FontSize = 12
$Form.FontBold = 0

 
$PBar = $Form.ProgressBar
$PBar.Size = 280,30
$PBar.Location = 10,140
$PBar.Max = 100
$PBar.Value = 50
$PBar.ForeColor = 150,255,150
 
$Form.Center
$Form.Show
 
While $Form.Visible 
 $=Execute($Form.DoEvents)
Loop
 
Exit 1
 

---