#include??
??
unsigned?char?code?ps[]={12345};?
unsigned?char?code?dispcode[]={0x3f0x060x5b0x4f0x66?
?????????????????????????0x6d0x7d0x070x7f0x6f0x000x40};?
unsigned?char?pslen=9;?
unsigned?char?templen;?
unsigned?char?digit;?
unsigned?char?funcount;?
unsigned?char?digitcount;?
unsigned?char?psbuf[9];?
bit?cmpflag;?
bit?hibitflag;?
bit?errorflag;?
bit?rightflag;?
unsigned?int?second3;?
unsigned?int?aa;?
unsigned?int?bb;?
bit?alarmflag;?
bit?exchangeflag;?
unsigned?int?cc;?
unsigned?int?dd;?
bit?okflag;?
unsigned?char?oka;?
unsigned?char?okb;?
??
void?main（void）?
{?
??unsigned?char?ij;?
??
??P2=dispcode[digitcount];?
??TMOD=0x01;?
??TH0=（65536-500）/256;?
??TL0=（65536-500）%256;?
??TR0=1;?
??ET0=1;?
??EA=1;?
??
??while（1）?
????{?
??????if（cmpflag==0）?
????????{?
??????????if（P3_6==0）?//function?key?
????????????{?
??????????????for（i=10;i>0;i--）?
??????????????for（j=248;j>0;j--）;?
??????????????if（P3_6==0）?
????????????????{?
??????????????????if（hibitflag==0）????????
????????????????????{?
??????????????????????funcount++;?
??????????????????????????if（funcount==pslen+2）??
?????????????????????????{
??????????????????????????funcount=0;?
??????????????????????????cmpflag=1;?
?????????????????????????}?
???????????????????????P1=dispcode[funcount];??
????????????????????}?
????????????????????else?
??????????????????????{?
?????????????????????????second3=0;?
??????????????????????}?
??????????????????while（P3_6==0）;?
????????????????}?
???????????}?
??
??????????if（P3_7==0）?//digit?key?
????????????{?
??????????????for（i=10;i>0;i--）?
??????????????for（j=248;j>0;j--）;?
??????????????if（P3_7==0）?
????????????????{?
??????????????????if（hibitflag==0）?
????????????????????{?
??????????????????????digitcount++;??????????????????????
??????????????????????if（digitcount==10）?
????????????????????????{?
??????????????????????????digitcount=0;?
????????????????????????}?
??????????????????????P2=dispcode[digitcount];?
??????????????????????if（funcount==1）?
????????????????????????{?
??????????????????????????pslen=digitcount;?
??????????????????????????templen=pslen;?
????????????????????????}?
????????????????????????else?if（funcount>1）?
??????????????????????????{?
????????????????????????????psbuf[funcount-2]=digitcount;?
??????????????????????????}?
????????????????????}?
????????????????????else?
??????????????????????{?
????????????????????????second3=0;?
??????????????????????}?
??????????????????while（P3_7==0）;?
????????????????}???????????????
???????????}?
??????}
??????else?
???????????{?
????????????cmpflag=0;?
????????????for（i=0;i??????????????{?
????????????????if（ps[i]!=psbuf[i]）?
??????????????????{?
????????????????????hibitflag=1;?
????????????????????i=pslen;?
????????????????????errorflag=1;?
????????????????????rightflag=0;?
????????????????????cmpflag=0;?
????????????????????second3=0;?

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件??????76800??2007-08-23?14:49??32.電子密碼鎖設計\32.電子密碼鎖設計.doc

?????文件???????8393??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock

?????文件???????4839??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.c

?????文件???????1792??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.hex

?????文件?????????41??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.lnp

?????文件???????8837??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.LST

?????文件??????12183??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.M51

?????文件???????9171??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.OBJ

?????文件???????1025??2007-08-23?14:42??32.電子密碼鎖設計\Keil-C\lock.Opt

?????文件???????2134??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.plg

?????文件???????2146??2007-08-20?03:36??32.電子密碼鎖設計\Keil-C\lock.Uv2

?????文件?????????34??2007-08-23?14:41??32.電子密碼鎖設計\Keil-C\lock.__i

?????文件???????1027??2007-08-20?15:57??32.電子密碼鎖設計\Keil-C\lock_Opt.Bak

?????文件??????????0??2007-08-20?03:34??32.電子密碼鎖設計\Keil-C\lock_Uv2.Bak

?????文件???????6376??2005-03-22?15:22??32.電子密碼鎖設計\Keil-C\STARTUP.A51

?????文件??????14048??2007-08-20?03:35??32.電子密碼鎖設計\Keil-C\STARTUP.LST

?????文件????????758??2007-08-20?03:35??32.電子密碼鎖設計\Keil-C\STARTUP.OBJ

?????文件??????90642??2007-08-23?14:42??32.電子密碼鎖設計\Last?Loaded?lock.DBK

?????文件??????91573??2007-10-16?22:13??32.電子密碼鎖設計\lock.DSN

?????文件????????832??2007-10-16?22:13??32.電子密碼鎖設計\lock.PWI

?????目錄??????????0??2009-04-13?12:57??32.電子密碼鎖設計\Keil-C

?????目錄??????????0??2009-04-13?12:57??32.電子密碼鎖設計

-----------?---------??----------?-----??----

???????????????332651????????????????????22