Your potential,My passion!!!

原创 2006年06月23日 20:40:00
//C51单片机+8155+数码显示 //两组红绿灯,红灯显示30s,绿灯显示25s,黄灯显示5s并闪烁. org 0100h ajmp main main: mov sp,#30h setb p3.2 acall INIT8155 mov tmod,#1 mov th0,#0h mov tl0,#0h mov ie,#0 setb tr0 mm: mov r1,#1eh mov r2,#19h mov p1,#0f3h //11110011 setb p3.2 mov r3,#19h m1: acall delay1 djnz r3,m1 acall INIT mov r2,#05h mov r1,#05h mov p1,#0f5h setb p3.2 mov r3,#05h m2: acall delay1 cpl p1.1 djnz r3,m2 acall INIT mov p1,#0feh clr p3.2 mov r1,#19h mov r2,#1eh mov r3,#19h m3: acall delay1 djnz r3,m3 mov p1,#0eeh setb p3.2 mov r1,#05h mov r2,#05h mov r3,#05h m4: acall delay1 cpl p1.4 djnz r3,m4 ajmp mm delay1: jnb tf0,$ clr tf0 acall compute mov 2bh,#047h loop: mov dptr,#table mov a,r5 movc a,@a+dptr mov r0,#0feh acall display mov a,r4 mov dptr,#table movc a,@a+dptr mov r0,#0fdh acall display mov a,r7 mov dptr,#table movc a,@a+dptr mov r0,#0fbh acall display mov a,r6 mov dptr,#table movc a,@a+dptr mov r0,#0f7h acall display djnz 2bh,loop dec r1 dec r2 ret compute: mov a,r1 mov b,#0ah div ab mov r4,a mov a,b mov r5,a mov a,r2 mov b,#0ah div ab mov r6,a mov a,b mov r7,a ret display: mov 2ah,#0ffh mov 2ch,a dis1:mov a,2ch mov dptr,#0f102h movx @dptr,a mov dptr,#0f101h mov a,r0 movx @dptr,a djnz 2ah,dis1 ret INIT:mov th0,#0h mov tl0,#0h ret INIT8155: mov dptr,#0f100h mov a,#03h movx @dptr,a ret table:db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh,77h,7ch end

相关文章推荐

My potential supervisors with projects

转载这篇文章的目的是:一定程度上能够体现一些领域最前沿的研究与应用 *****************************************************************...

5种提高认知潜能的方法(You can increase your intelligence: 5 ways to maximize your cognitive potential )

今天逛新浪微博时发现了一篇scientific american的文章,写得挺好:一个是文笔,读起来通俗易懂;另一个是内容,有理有据。原文在这里。而且作者态度显得非常自信(大概意思是,只要你照着我说的...
  • BusyCai
  • BusyCai
  • 2011年04月07日 18:44
  • 2430

VIJOS 1278 My Story Your Song-雨天

题意简述在前n个正整数中选取m个数ai,使得1/ai之和为X/Y分析HNOI的一道题 《彩票》 直接n选m的搜索,加上可行性剪枝(继续选总和一定小于或大于X/Y)似乎就可以过了 但是时间效率不太...

cheaprayban.rogues.ca/ some sort of trading program on the potential must absolutely move as a resul

some sort of robot software from your potential must 100 % move by way of flame Lower than a 3rd ...

Ten potential of mobile Internet business and profit model

原文网址 Abstract: The mobile Internet is the latest stage of Internet development, the combinati...
  • autoasm
  • autoasm
  • 2011年11月24日 14:27
  • 1062

【励志文章】Learning needs of the target instead of passion

学习需要激情,但是更需要目标和理想。 关于学习的方法:学而不思则罔,思而不学则殆。 关于学习的目的:非学无以广才。 关于学习的态度:非志无以成学。 关于学习的时间:集中时间和注意力,专注做好一件事情。...

PASSION之Logback(1)

日志系统介绍

PASSION之ASSEMBLY(一)

视角转换编程语言的本质就是控制cpu的行为。对于应用层面的编程语言,我们忽略了对硬件的触碰,总是陷入编程语言规范的思维,没有总体的对计算机的概况的了解。对于汇编语言,我们面向的不同CPU的指令集。汇编...

PASSION之Nginx+Tomcat集群搭建(一)

Nginx的依赖模块 gzip模块需要 zlib 库 rewrite模块需要 pcre 库 ssl 功能需要openssl库 安装pcre 获取pcre编译安装包,在http://www.pcre.o...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Your potential,My passion!!!
举报原因:
原因补充:

(最多只允许输入30个字)