IO Device:F81801 DIO under Windows

From LEXWiKi

(Difference between revisions)
Jump to: navigation, search
(→F81801U WRITE)
Line 47: Line 47:
::SetPortVal(0x2e, dwAddrVal, 1);
::SetPortVal(0x2e, dwAddrVal, 1);
::SetPortVal(0x2f, dwPortVal, 1);
::SetPortVal(0x2f, dwPortVal, 1);
 +
}
 +
 +
=== F81801U GetDigitalInput===
 +
BYTE F81801U_GetDigitalInput()
 +
{
 +
CString tmp;
 +
BYTE byteGPIO3X = 0;
 +
BYTE byteData = 0;
 +
byteGPIO3X = F81801U_Read(GPIO3_Pin_Status_Register);
 +
byteData = byteGPIO3X & 0x0F;
 +
 +
return byteData;
 +
}
 +
 +
=== F81801U SetDigitalOutput ===
 +
void F81801U_SetDigitalOutput(BYTE byteValue)
 +
{
 +
BYTE byteData = 0;
 +
 +
byteData = (byteValue & 0x01) ? byteData + 0x10 : byteData;
 +
byteData = (byteValue & 0x02) ? byteData + 0x20 : byteData;
 +
byteData = (byteValue & 0x04) ? byteData + 0x40 : byteData;
 +
byteData = (byteValue & 0x08) ? byteData + 0x80 : byteData;
 +
 +
F81801U_Write(GPIO3_Output_Data_Register, byteData);
}
}

Revision as of 09:51, 16 August 2019

Contents

The Sample code source you can download from

How to use this Demo Application

Introduction

F81801 OPEN 

BOOL F81801U_Open()
{
	SetPortVal(0x2e, 0x87, 1);
	SetPortVal(0x2e, 0x87, 1);

	if (F81801U_Read(CHIP_ID_REGISTER1) == CHIP_ID_DEFAULT_VALUE1 && F81801U_Read(CHIP_ID_REGISTER2) == CHIP_ID_DEFAULT_VALUE2)
		return TRUE;
	return FALSE;
}

F81801 CLOSE 

void F81801U_Close()
{
	SetPortVal(0x2e, 0xaa, 1);
}

Initial internal F81801 

void F81801U_Init()
{
	 F81801U_Write(Logic_Device_Number_Register, GPIO_Device_Configuration_Registers);// GPIO Device Configuration Registers (LDN CR06) 
 
	 F81801U_Write(GPIO3_Output_Enable_Register, 0xf0);//GPIO34~GPIO37 OUTPUT SET / GPIO30~GPIO33 INPUT SET
	 F81801U_Write(GPIO3_Drive_Enable_Register, 0xf0);//GPIO34~GPIO37 DRIVE SET
  
	 F81801U_Write(Logic_Device_Number_Register, WDT_Registers);
	 F81801U_Write(WDTDE, 0x01);
	 F81801U_Write(WDT_REG1, 0x40);
	 F81801U_Write(WDOUT_EN, 0x80);
}

F81801U READ 

DWORD F81801U_Read(DWORD dwAddrVal)
{
	DWORD dwPortVal;
	::SetPortVal(0x2e, dwAddrVal, 1);
	::GetPortVal(0x2f, &dwPortVal, 1);

	return (dwPortVal & 0x00FF);
}

F81801U WRITE 

void F81801U_Write(DWORD dwAddrVal, DWORD dwPortVal)
{
 	::SetPortVal(0x2e, dwAddrVal, 1);
	::SetPortVal(0x2f, dwPortVal, 1);
}

F81801U GetDigitalInput

BYTE F81801U_GetDigitalInput()
{
	CString tmp;
	BYTE byteGPIO3X = 0;
	BYTE byteData = 0;
	byteGPIO3X = F81801U_Read(GPIO3_Pin_Status_Register);
	byteData = byteGPIO3X & 0x0F;

	return byteData;
}

F81801U SetDigitalOutput 

void F81801U_SetDigitalOutput(BYTE byteValue)
{
	BYTE byteData = 0;

	byteData = (byteValue & 0x01) ? byteData + 0x10 : byteData;
	byteData = (byteValue & 0x02) ? byteData + 0x20 : byteData;
	byteData = (byteValue & 0x04) ? byteData + 0x40 : byteData;
	byteData = (byteValue & 0x08) ? byteData + 0x80 : byteData;

	F81801U_Write(GPIO3_Output_Data_Register, byteData);
}
Retrieved from "http://tprd.info/lexwiki/index.php/IO_Device:F81801_DIO_under_Windows"
Personal tools