#include "minigui.ch" 
  
 #define APP_TITLE "Hello World!" 
  
 Function Main 
 	LOCAL aBackColor := {0,64,80} 
  
 	DEFINE WINDOW Win_1 ; 
 		AT 0,0 ; 
 		WIDTH 400 ; 
 		HEIGHT 400 ; 
 		TITLE APP_TITLE ; 
 		MAIN ; 
 		BACKCOLOR aBackColor 
  
 		DEFINE STATUSBAR FONT "Verdana" SIZE 10 
 			STATUSITEM "Item 0 "+CHR(0136) BACKCOLOR aBackColor 
 			STATUSITEM "Item 1 "+CHR(0136) WIDTH 92 BACKCOLOR aBackColor FONTCOLOR YELLOW 
 			STATUSITEM "Item 2 "+CHR(0136) WIDTH 92 BACKCOLOR aBackColor 
 		END STATUSBAR 
  
 	END WINDOW 
  
 	CENTER WINDOW Win_1 
 	ACTIVATE WINDOW Win_1 
  
 Return Nil