Ms豪秒级的延时65535msr
r
UINT
0r
TR01r
while
Ms利用T0做定时计数器，循环采样，直到达到定时值r
r
TH00r
TL020r
whileTH04r
r
r
r
r
TR00r
r
r
BOOLWaitComm等待上位机的命令18字节r
r
BYTE
0r
RI0r
whileRI等待第一个字节r
ComBuf
SBUFr
RI0r
r
for
17
r
r
TimeOut0r
whileRIr
r
TimeOutr
if
TimeOut10000后17个字节都有超时限制r
retur
0r
r
ComBuf
SBUFr
RI0r
r
retur
1r
r
r
BOOLWaitResp等待上位机回应1字节有超时限制r
r
TimeOut0r
RI0r
whileRIr
r
TimeOutr
if
TimeOut50000r
r
retur
0r
r
r
RI0r
ComBuf0SBUFr
retur
1r
r
r
BOOLWaitData写器件时等待上位机数据，18字节，有超时限制r
r
BYTE
r
RI0r
for
0
17
r
r
TimeOut0r
whileRIr
r
TimeOutr
if
TimeOut10000r
r
retur
0r
r
r
RI0r
ComBuf
SBUFr
r
retur
1r
r
r
voidSe
dData发送数据或回应操作完成18字节r
r
BYTE
0r
for
17
r
r
TI0r
SBUFComBuf
r
whileTIr
TI0r
r
r
r
voidSe
dResp回应上位机1个字节在写器件函数中使用r
r
TI0r
SBUFComBuf0r
whileTIr
TI0r
r
r
voidSetVpp5V设置Vpp为5vr
r
P3_40r
P3_30r
r
r
voidSetVpp0V设置Vpp为0vr
r
P3_30r
P3_41r
r
r
voidSetVpp12V设置Vpp为12vr
r
P3_40r
P3_31r
r
r
voidRstPro编程器复位r
r
pwfpProOver直接编程结束r
Se
dData通知上位机，表示编程器就绪，可以直接用此函数因为协议号（ComBuf0）还没被修改，下同r
r
r
voidReadSig
读特征字r
r
pwfpReadSig
r
Se
dData通知上位机，送出读出器件特征字r
r
r
voidErase擦除器件r
r
pwfpEraser
Se
dData通知上位机，擦除了器件r
r
r
voidWrite写器件r
r
BYTE
r
pwfpI
itPro编程前的准备工作r
Se
dData回应上位机表示进入写器件状态，可以发来数据r
while1r
r
ifWaitData如果等待数据成功r
r
ifComBuf00x07判断是否继续写r
r
for
2
17
ComBuf217为待写入数据块r
r
ifpwfpWriteComBuf
调用写该器件一个单元的函数r
r
pwfpProOver出错了就结束编程r
ComBuf00xffr
Se
dResp回应上位机一个字节，表示写数据出错了r
WaitData等待上位机的回应后就结束r
retur
r
r
Address下一个单元r
r
ComBuf01回应上位机一个字节，表示数据块顺利完成，请求继续r
Se
dRespr
r
elseifComBuf00x00写器件结束r
breakr
else可能是通讯出错了r
r
pwfpProOverr
retur
r
r
r
else等待数据失败r
r
pwfpProOverr
retur
r
r
r
pwfpProOver编程结束后的工作r
Delay_ms50延时等待上位机写线程结束r
ComBur