.data

szREGKEY	db	'Software\MasmEd1000\MasmEd',0
szMPATH	db	'Masm32Path',0

		.code

; 設置鍵值
_RegSetValue	proc _lpszValue,_dwSize
		local	@hKey
		invoke RegCreateKeyEx,HKEY_CURRENT_USER,addr szREGKEY,0,NULL,\
				REG_OPTION_NON_VOLATILE,KEY_ALL_ACCESS,NULL,addr @hKey,NULL
		
		.if	eax == ERROR_SUCCESS
			invoke RegSetValueEx,@hKey,addr szMPATH,NULL,REG_SZ,_lpszValue,_dwSize
			invoke RegCloseKey,@hKey
		.else
		.endif
		ret
_RegSetValue	endp

; 查詢鍵值
_RegQueryValue	proc _lpszValue,_lpdwSize
		local	@hKey,@dwReturn,@lstr

		mov	@dwReturn,-1
		invoke	RegOpenKeyEx,HKEY_CURRENT_USER,addr szREGKEY,NULL,KEY_QUERY_VALUE,addr @hKey
		.if	eax == ERROR_SUCCESS
			invoke	RegQueryValueEx,@hKey,addr szMPATH,0,NULL,_lpszValue,_lpdwSize
			mov	@dwReturn,eax
			invoke	RegCloseKey,@hKey
		.endif
		mov	eax,@dwReturn
		ret

_RegQueryValue	endp