   ,  ()  ,
   .
================================================================================

-------------------------------------------------------------[]-----
_SUB <Name> [*]

Name	  (    ,  
	)
*	  ,    
#	   

--------------------------------------------------------------------------------

_SUB <Name>, *, , destructing commands 

 	    (  ),
	   

---------------------------------------------------------------------[]-----
_SUB <Name>, <Shape>,[Title],[[=]Event],[Icon],[Type],[Mask][,Status]

Name	 ,       
Shape	   ,  <L()T()W()H()>.
	 L, T, W  H   .  L  T  ,
	    .
Title	   
Event	    ,   WinCMD
=Event	 
Icon	 ,    , : <IconFileName#ID>
Type	  [-][#][[$]Num][:[TranspColor]]:
	"-"	 
	"#"	 
	Num	1-99, ; 100  
	$Num	0-254,  ( ); 255  
	TranspColor      , - -  
Mask	[%FFFFFF%][*][<[W:H]>]bmpname     ,
	 ,    BMP (  RLE), GIF, JPG
	[%FFFFFF%]	  
	0		()  .
	*		    
	**		     only~:scale
	W:H		  (:)
	bmpname		 ,   "#"   
			  BMP,  #100
Status	 ,   :
	-top		  
	-forcenomin	 
	-disminb	  
	-maxb		  
	-discloseb	  
	-nosysmenu	  
	-nocap		 
	-nfocus		 
	-disaltmv	      ALT
	-size		 
	-trap		  
	-ntab		   ( TAB)
	-csize		 
	-na		
	-scale[:DPI]	  Win8 [:DPI ]
	-scalef[:DPI]	  NT5 [:DPI, 96  100%] 
--------------------------------------------------------------------------------
           "$",   
  _SUB        .
  ,   "&",  .     
.          .
    _SUB        .
         _END,      
   .   _END  CALL  .
     ( 0)  "WType"   IMAG  
 GIF.
      ,     
  .      
  . -    
.         .
         mark ::,     
.   :: ,      ,
 .       
  PE, ,    HKEY.
" ."     ,  ENVI aa.bb.cc.d=1.
  _SUB Name     . ..,  
    Name (CALL Name  ).
         CALL   ,
   ().
      ,  ALT    .
    :      
,      .    THIS
     .
--------------------------------------------------------------------------------
"ENVI @Name=Title"      
"ENVI @Name.Enable=[#]Value"   : 0 ,
	1  ( ), #   
"ENVI @Name.Visible=[*]Value"   : 0 , 1 ,
	*   ,  >=1 -   :
	SW_SHOW, SW_SHOWNORMAL, SW_MAXIMIZE, SW_MINIMIZE, SW_RESTORE,
	SW_SHOWDEFAULT, SW_SHOWMAXIMIZED, SW_SHOWMINIMIZED, SW_SHOWMINNOACTIVE,
	SW_SHOWNA, SW_SHOWNOACTIVATE, SW_FORCEMINIMIZE (. .doc)
"ENVI @Win.Paint=FuncName"       
	 HDC  .
"ENVI @Name.InvalidateRect=[Left]:[Top]:[Right]:[Bottom]:[Erase Bkground]" 
"ENVI @Name.Cursor=CursorID[, ][DLL File]"     .
	  ,     .
"ENVI @Name.Font=[FontSize][:[FontName][FontAdorn]]"   
"ENVI @Name.bkcolor=[BackColorVal]"       (=0)
"ENVI @Name.trans=0/1"  0x1   , 0x2:  
"ENVI @Name.style=[@*]CancelStyle[:AddStyle]".ENVI @@style=%WID%:[@*]v1:v2
	@:,*:
"ENVI @Win.HitTest=Height[:Width:x:y]"    
	 .  Height<=0, .
"ENVI @Name.cmd[?]=Name|CMD"   /  
	   "ENVI^ QueryCmd=1"
"ENVI @@Enable=WinID:[#]Num"   : 0  (
	), 1 , #   .
"ENVI @@Visible=WinID:[*]Num"   : 0 , 1 ,
	*   ,  ,   
"ENVI @@Enable=?WinID:VarName"    
"ENVI @@Visible=?WinID:VarName"    
"ENVI @WinCtrlName.Enable=?VarName"    
"ENVI @WinCtrlName.Visible=?VarName"    
"ENVI @@IsWindow=?WinID:VarName"  ,    WinID  

******************************************************************[]*****
_SUB DoLoop
_SUB F1, *, ,IFEX #[ %&h%<>0xFFFFFFFF && %&h%>0 ],CALL $Kernel32.dll, CloseHandle, #%&h%
_SUB Win1,W360H440,Function Demo,EXEC $USAGE.TXT,%IconFile%#19,20
_SUB A,W670H286,WinTitle,KILL *force *%&__PID%,%&MyName%,,,-scale:150
_SUB &Win4,W420H200,Test,,#1,10,,-top -na
_SUB &Win4,W420H200,Test,,#1,#-:0xC0C0C0,,-top -forcenomin