《I2C总线接口和简易IC卡读写器》由会员分享，可在线阅读，更多相关《I2C总线接口和简易IC卡读写器（4页珍藏版）》请在金锄头文库上搜索。
1、$regfile=M16def.dat$crystal=11059200$baud=9600DimIAsByte,TempAsByteDimData1(8)AsByte,Data2(8)AsByteDimCard_okAsBitConfigLcdpin=Pin,Db4=Portc.4,Db5=Portc.5,Db6=Portc.6,Db7=Portc.7,E=Portd.5,Rs=Portd.3定义LCD显示屏接口定义PPortc.0为I2C总线的Scl定义PPortc.1为I2C总线的Dda定义IC卡的写地址指令字定义IC卡的读地址指令字定义3个I/O口为输入开关接口清LCD显示Config
2、Lcd=16*4ConfigScl=Portc.0ConfigSda=Portc.1ConstAdresw=&HA0ConstAdresr=&HA1ConfigPinc.0=Input,Pinc.1=Input,Pinc.2=InputPortc.0=1:Portc.1=1:Portc.2=1CursorOffNoblinkDoCls显示提示字符检测有无IC卡插入无IC卡插入有IC卡插入检测系统设置为写卡方式?写卡方式，要求输入密码字Locate1,1:LcdDemoforIC_CardIfPinc.2=1ThenLocate2,1:LcdNoIC_CardWait1ElseIfPinc.0=
3、0ThenClsLocate1,1:LcdEnterPassword:I=1Locate2,1Do由RS-232口接收PC输入Temp=Inkey()IfTemp0ThenData1(i)=Temp:I=I+1LedChr(temp)PrintChr(temp);EndIfLoopUntilI8PrintForI=1To8I2cstartI2cwbyteAdreswI2cwbyteII2cwbyteData1(i)I2cstopWaitms10NextIfPinc.1=0ThenForI=1To8WriteeepromData1(i),INextEndIfForI=1To8I2cstartI2
4、cwbyteAdreswI2cwbyteII2cstartI2cwbyteAdresrI2crbyteData2(i),NackI2cstopNext的密码字符，长度为8个同时在LCD上显示密码将8个密码字写入IC卡中写入地址为1-8如果系统设置为修改系统密码时将密码写入AVR的EEPROM中写入地址为1-8读IC卡刚写入的密码Card_ok=0ForI=1To8IfData1(i)Data2(i)ThenCard_ok=1ExitForEndIfNextLocate2,1IfCard_ok=0ThenLcdWriteCardok!ElseLedNoorBadCard!?EndIfDoLoop
5、UntilPinc.2=1ElseCls:Locate1,1ForI=1To8I2cstartI2cwbyteAdreswI2cwbyteII2cstartI2cwbyteAdresrI2crbyteData1(i),NackI2cstopLcdChr(data1(i)NextForI=1To8ReadeepromData2(i),I判别写入密码同用户输入的密码是否相同相同，写卡完成不同，写卡操作有误或坏的IC卡等待用户抽出IC卡系统为读卡方式读IC卡上的密码字8个显示在LCD上读系统密码字8个NextCard_ok=0ForI=1To8IfData1(i)Data2(i)ThenCard_ok=1ExitForEndIfNextLocate2,1IfCard_ok=1ThenLcdPasswordnotok!ElseLedPasswordOk!EndIfDoLoopUntilPinc.2=1EndIfEndIfLoopEnd将系统密码和比较密码不符密码相符等待用户将IC返回循环IC卡上的密码抽出
