51单片机亮灯程序(入门)

------------------------------------------------------------------------------------------------------------

例0:

ORG   0000H

SETB  TR0          ;启动T0

MOV   R2, #250      ;定时计数初值

LOOP:

MOV   TH0, #(8192 - 10000) / 32   ;定时10ms

MOV   TL0, #(8192 - 5000) MOD 32

JNB   TF0, $       ;等待10ms

CLR   TF0

DJNZ  R2, LOOP     ;每隔5ms,R2减一次

CPL   P1.0         ;R2为0则LED亮灭转换

LJMP  0000H

END

例1:

ORG 0000H;程序端存放位置

LJMP MAIN;主程序入口

ORG 000BH   ;指明内存地址

LJMP T0ISR     ;

ORG 0030H;跳过异常向量区

MAIN:

MOV TMOD,#01H    ;定时器0,工作方式1

MOV TH0,#HIGH(65536-50000);为了配置定时器溢出周期为50000对TH0写入初值。HIGH()、LOW()都是宏定义,用于取双字节变量的高半字节和低半字节。

MOV TL0,#LOW(65536-50000);

SETB TR0    ;开启定时器0

SETB ET0    ;开启定时器0中断

SETB EA     ;开启总中断

CLR P1.0    ;灯灭

MOV R2,#10;定时次数

SJMP $

T0ISR:

CLR TR0

MOV TH0,#HIGH(65536-50000)     ;重赋初值

MOV TL0,#LOW(65536-50000)

SETB TR0

DJNZ R2,T0E    ;定时次数减1直到0,非0时直接转T0E退出

CPL P1.0      ;10次中断到则LED取反

MOV R2,#10;重赋计数值

T0E:

RETI

END

例2:

ORG 0000H

start:

MOV P1,#0FFH

CALL delay

MOV P1,#0H

CALL delay

CALL delay

LJMP start

delay:

MOV R7,#100

d2:   MOV R6,#250

d1:   DJNZ R6,d1

DJNZ R7,d2

RET

END

;100*250次*2*1us=500ms=0.5s

例3:

ORG 0000H

LJMP MAIN

ORG 000BH

LJMP T0ISR

ORG 0030H

MAIN:

MOV TMOD,#01H

MOV TH0,#HIGH(65536-50000)

MOV TL0,#LOW(65536-50000)

MOV R2,#100

SETB TR0

SETB ET0

SETB EA

CLR P0.0

SJMP $

T0ISR:

CLR TR0

MOV TH0,#HIGH(65536-50000)

MOV TL0,#LOW(65536-50000)

SETB TR0

DJNZ R2,T0E

MOV R2,#100

JNZ T001

SETB P0.0

SJMP T0E

T001:

DEC A

MOV R3,A

SETB P0.0

CLR P0.1

SJMP T0E

T0E:

RETI

END

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
平台声明:文章内容(如有图片或视频亦包括在内)由作者上传并发布,文章内容仅代表作者本人观点,简书系信息发布平台,仅提供信息存储服务。

推荐阅读更多精彩内容

  • /************单片机:HT66018​​********/ /************ 日期:1603...
    _小豆豆阅读 809评论 0 0
  • Spring Cloud为开发人员提供了快速构建分布式系统中一些常见模式的工具(例如配置管理,服务发现,断路器,智...
    卡卡罗2017阅读 135,026评论 19 139
  • 计算机网络第五版第一章,第五章,第六章的习题解答。编号是按照中文版图书来的,题目是复制的英文版图书。答案经过本人验...
    C就要毕业了阅读 34,194评论 3 9
  • 风里藏了一片叶子 黄色的躯体在阳光下通透的 如同一丝纸鸢的呼吸 但这风终究会停 这暖阳依旧会冷在西山侧 想继续藏下...
    简雨山阅读 167评论 0 0
  • 晚上无意和女性好友谈起择偶标准,她说一条:在一起要感觉舒服 听到这个回答,我突然想到小A最近向我发的牢骚:...
    Sweet瓶子阅读 463评论 0 1