AT93C46/56/55串行EEPROM及单片机程序

ＩＦ （（Ｘ ＡＮＤ ０１Ｈ）＝０１Ｈ）ＴＨＥＮ ＳＥＴＤＩ；

ＥＬＳＥ ＣＬＲＤＩ；

ＳＥＴＣＬＫ；

ＥＮＤ；

ＤＯ Ｉ ＝１ ＴＯ ７；

ＣＬＲＣＬＫ； ＳＥＴＣＬＫ；

ＥＮＤ；

ＤＯ Ｉ ＝１ ＴＯ ８?

ＣＡＬＬ ＢＩＴＳＥＴ（．ＩＯＰＯＲＴ１，７）；

ＣＯＵＮＴ＝ＣＯＵＮＴ－１；

ＣＬＲＣＬＫ； ＳＥＴＣＬＫ；

ＢＩＴＯＵＴ（ＣＯＵＮＴ）＝ＩＯＰＯＲＴ１；

ＥＮＤ；

ＣＬＲＣＬＫ； ＳＥＴＣＬＫ；

Ｊ＝０；

ＡＡ： ＤＯ Ｉ＝ １ ＴＯ ８；

Ｊ＝Ｊ＋１；

Ｘ＝ＲＯＬ（ＡＤＤＲ，１；

ＡＤＤＲ＝Ｘ； ＣＬＲＣＬＫ；

ＩＦ（（Ｘ ＡＮＤ ０１Ｈ）＝０１Ｈ） ＴＨＥＮ ＳＥＴＤＩ

ＥＬＳＥ ＣＬＲＤＩ；

ＳＥＴＣＬＫ；

ＥＮＤ；

ＩＦ Ｊ＜＞１６ ＴＨＥＮ ＤＯ；

ＡＤＤＲ ＝ＤＡＴＡ；

ＧＯＴＯ ＡＡ；

ＥＮＤ；

ＣＬＲＣＳ；ＳＥＴＣＳ；

ＣＡＬＬ ＴＩＭＥ（１００）；?

ＥＮＤ；