#SingleInstance force
#NoTrayIcon
SetBatchLines,-1

;dll structure
;Result := DllCall("DllFile\Function", "Type1", Arg1, "Type2", Arg2,.....,"TypeX",ArgX) ;pretty straight forward

DllCall("LoadLibrary","str","d2d1.dll") ;default path C:\Windows\SysWOW64\d2d1.dll on 64bit
global 	sizeX = 300,sizeY = 300, hGui ; hwnd
		,pFactory ; the Direct2d Factory
		,pWDFactory ;the DWrite Factory
DllCall("d2d1\D2D1CreateFactory","uint",0,"ptr",guid(CLSID,"{06152247-6f50-465a-9245-118bfd3b6007}"),"uint*",0,"ptr*",pFactory) ;Create D2D1 Factory

DllCall("LoadLibrary","str","dwrite.dll")
DllCall("dwrite\DWriteCreateFactory","uint",0,"ptr",GUID(CLSID,"{b859ee5a-d838-4b5b-a2e8-1adc7d93db48}"),"ptr*",pWDFactory) ;Create DWriteFactory


Gui,new,hwndhGui
;CustomColor = EEAA99  ; Can be any RGB color (it will be made transparent below).
Gui +AlwaysOnTop -Caption ;+ToolWindow  ; +ToolWindow avoids a taskbar button and an alt-tab menu item.
;Gui, Color, %CustomColor%
;WinSet, TransColor, %CustomColor% 0

;gui,new,hwndhGui
gui,show,w%sizeX% h%sizeY%

OnMessage(0xF,"_rectangle")
OnMessage(0x14,"_WM_ERASEBKGND")
_rectangle()
return
GuiClose:
ExitApp


_WM_ERASEBKGND(){
	return 0
}

_rectangle()
{
	static pRenderTarget,pBrush3,pBackgroundBrush,pTxtBrush,textFormat
	
	if A_PtrSize=8
		_struct(tD2D1_HWND_RENDER_TARGET_PROPERTIES,"uint;uint;uint;uint",hGui,hGui>>32,sizeX,sizeY)
	else
		_struct(tD2D1_HWND_RENDER_TARGET_PROPERTIES,"uint;uint;uint",hGui,sizeX,sizeY)
	
	;PixelFormat:
		_struct(tD2D1_PIXEL_FORMAT,"uint;uint",28,0)
	;	Tooltip % &tD2D1_PIXEL_FORMAT
		
		;_struct(tD2D1_RENDER_TARGET_PROPERTIES,"uint;uint;uint;float;float;uint;uint")
		_struct(tD2D1_RENDER_TARGET_PROPERTIES,"uint;uint;uint;float;float;uint;uint",0,0,1,0,0,0,0)
		;Colors
		_struct(tD2D1_COLOR_F4,"float;float;float;float",0,0,0,0) ;BackGround
		_struct(tD2D1_COLOR_F3,"float;float;float;float",1,0,0,1) ;Square
		_struct(tD2D1_COLOR_F5,"float;float;float;float",1,1,0,1) ;Text
		
		_struct(HBITMAP,"uint;uint;uint;uint;uint",500,500,1,32,0)
		

	;ID2D1Factory
	DllCall(vt(pFactory,14),"ptr",pFactory
			,"ptr",&tD2D1_RENDER_TARGET_PROPERTIES
			,"ptr",&tD2D1_HWND_RENDER_TARGET_PROPERTIES
			,"ptr*",pRenderTarget)  ;CreateHwndRenderTarget

	;CreateBitmap
;	DllCall(vt(pRenderTarget,4),"ptr",pRenderTarget,"uint",500,"uint",500,"uint",1,"ptr",32,"float",0,"ptr*",bitmap)
	;im lost here

/*
	DllCall(vt(pFactory,13),"ptr",pFactory
			,"ptr",&HBITMAP ; not sure how or what.
			,"ptr"&tD2D1_RENDER_TARGET_PROPERTIES
			,"ptr*",pRenderTarget) ;CreateWicBitmapRenderTarget
			
	;DllCall(vt(pFactory,16),"ptr",&tD2D1_RENDER_TARGET_PROPERTIES,"ptr*",pRenderTarget)
			
		Tooltip % 	DllCall(vt(pRenderTarget,56),pRenderTarget,tD2D1_RENDER_TARGET_PROPERTIES)
		*/


	;ID2D1RenderTarget
	DllCall(vt(pRenderTarget,8),"ptr",pRenderTarget
			,"ptr",&tD2D1_COLOR_F4
			,"ptr",0,"ptr*",pBackgroundBrush) ;CreateSolidColorBrush
			
	;ID2D1RenderTarget
	DllCall(vt(pRenderTarget,8),"ptr",pRenderTarget
			,"ptr",&tD2D1_COLOR_F3			
			,"ptr",0,"ptr*",pBrush3) ;CreateSolidColorBrush					
			
	;ID2D1RenderTarget
	DllCall(vt(pRenderTarget,8),"ptr",pRenderTarget
			,"ptr",&tD2D1_COLOR_F5
			,"ptr",0,"ptr*",pTxtBrush) ;CreateSolidColorBrush
			
	_struct(tD2D1_RECT_F,"float;float;float;float",0,0,sizeX,sizeY)
	_struct(tD2D1_ROUNDED_RECT,"float;float;float;float;float;float",0.12*sizeX,0.12*sizeY,0.88*sizeX,0.88*sizeY)	
	_struct(tD2D1_TEXT,"float;float;float;float",5,5,sizeX,sizeY)

	
	
	;DllCall(vt(pWDFactory,15),"str",fontFamilyName,"ptr",fontCollection,"int",fontWeight,"int",fontStyle,"int",fontStretch,"float",fontSize,"str",localeName,"ptr*",textFormat)	
	
	;ID2D1RenderTarget
	DllCall(vt(pRenderTarget,48),"ptr",pRenderTarget) ;start draw
	DllCall(vt(pRenderTarget,17),"ptr",pRenderTarget,"ptr",&tD2D1_RECT_F,"ptr",pBackgroundBrush) ;background
	DllCall(vt(pRenderTarget,18),"ptr",pRenderTarget,"ptr",&tD2D1_ROUNDED_RECT,"ptr",pBrush3,"float",2,"ptr",pStrokeStyle) ;rectangle
	DllCall(vt(pWDFactory,15),"str","Arial","ptr",0,"int",700,"int",1,"int",0,"float",13.0,"str","en-us","ptr*",textFormat)	
	DllCall(vt(pRenderTarget,27),"ptr",pRenderTarget,"str","Michael","uint",7,"ptr",textFormat,"ptr",&tD2D1_TEXT,"ptr",pTxtBrush,"uint",0,"unit",0) ;drawtext
	DllCall(vt(pRenderTarget,47),"ptr",pRenderTarget,"ptr",&tD2D1_RECT_F)
	DllCall(vt(pRenderTarget,49),"ptr",pRenderTarget,"uint64*",0,"uint64*",0) ;end draw
	

}

GUID(ByRef GUID, sGUID){ 
    VarSetCapacity(GUID,16,0)
    return DllCall("ole32\CLSIDFromString","wstr",sGUID,"ptr",&GUID)>= 0?&GUID:""
}


_struct(ByRef var,type="",param*){
	if type is Integer
    {
		Loop % VarSetCapacity(var,type,0)//4
			if param[A_Index]
				NumPut(param[A_Index],var,(A_Index-1)*4,"uint")
	}else{
		StringSplit,key,type,`;,%A_Space%
		VarSetCapacity(var,key0*4,0)
		loop %key0%
			if param[A_Index]
				NumPut(param[A_Index],var,(A_Index-1)*4,key%A_Index%)
	}	
	return &var
}

vt(p,n){
	return NumGet(NumGet(p+0,"ptr")+n*A_PtrSize,"ptr")
}