AM8EB153编程实例.docVIP

程序设计基础 I/O口的配置问题 将PORTB口设置为高四位为输出， 第四位为输入（上拉） PTB_IOM EQU 0x06 PTB_PH EQU 0x0D MOVIA B IOST PTB_IOM MOVIA B IOST PTB_PH 注意：若I/O口设置为输出口时， 本系列单片机并非自动关闭上拉或者下拉功能， 须手动关闭或者使能。 BSR，BCR 指令对 I/O Port 的影响 当使用位操作指令对端口进行写操作时，需要特别小心。这时执行过程如下：首先从 I/O 端 口上( 请注意：不是数据锁存器) 读取其状态，然后执行位操作，最后将结果写到端口上覆盖原来 的内容。 举例说明： BSR 0x6,0 ;(1) BSR 0x6,1 ;(2) 当用户执行以上两条指令时，是希望在 PB60~1上输出高电平，可是执行完(2)时却发现PB0 输出低电平了，这是为什么呢？ 原因在于执行(2)的时候，PB0 虽然是输出高电平，但是被外部硬件拉低到低电平了，这样 读进来时为低，程式就将低赋值给PB0 。有以下两个方案供选择来避免上述现象的发生： 1） 改善外部硬件，如接一电阻在IO口上来保持端口电平。 2） 用一个RAM来记录输出口的状态，避免直接使用位操作指令对端口操作 检查寄存器内容 寄存器R20内容是否为0 MOVR R20， 0 BTRSS STATUS, Z GOTO No_Zero … ;=0 处理程式 No_Zero: … ；非0处理程式 寄存器R20内容是否为55H MOVIA 0X55 XORAR R20，0 BTRSS STATUS, Z GOTO NoEQU … ;相等处理程式 NoEQU: … ;不相等处理程式 例3、 比较R20 的内容与55h的大小 MOVIA 0X55 SUBAR R20， 0 BTRSC STATUS, Z GOTO Is_EQU BTRSS STATUS, C GOTO Is_LT ;R20 55H GOTO Is_GT ;R20 55H 比较寄存器R20、R21的大小 MOVIA R21， 0 CMPAR R20 BTRSC STATUS, Z GOTO Is_EQU BTRSS STATUS, C GOTO Is_LT ;R20 R21 GOTO Is_GT ;R20 R21 循环条件 简单的for循环 如果用户需要同一段程式执行N 次，则可以利用一个寄存器做计数器来实现。在执行循环体前，先设置计数器初值，然后执行循环体，在循环体结尾处通过减1 或加1 来实现需要循环的次数。下面实例实现8 次循环。 MOVIA 0Xf8 ；100H – 8 = F8H MOVAR R20 LOOP: … DECRSZ R20， 1 ;计数器-1 GOTO LOOP … ;结果为0 退出 IF…THEN… 格式 IF…THEN…语法可以通过比较两个寄存器内容是否相等或者比较一个寄存器内容与常数是否相等来实现。 实现“IF (X=55H) THEN GOTO NEXT” X EQU R20 MOVIA 0x55 XORAR X, 0 BTRSC STATUS, Z ;X = 55H? GOTO NEXT ;X = 0X55 GOTO NEXT … ;X != 0X55 退出 实现“IF (X = Num1) （x = Num2）THEN GOTO NEXT”; X EQU R20 MOVR X, 0 ADDIA 255-Num2 ADDIA Num2 – Num1 +１ BTRSC STATUS, C GOTO NEXT … 注： Num2 必须大于Num1 FOR…NEXT 格式 FOR…NEXT格式是一种复杂的FOR 循环格式，用户可以确定循环的起点和终点。下例 实现“FOR X ＝15 TO 20 ”： X EQU R20 MOVIA 0xF MOVAR X ;X = 15 LOOP: … INCR X, 1 MOVR X, 0 SUBIA 0x14 ;20 – ACC -ACC BTRSS STATUS, Z ;X 20, go on GOTO LOOP … ;循环退出 程序多分支设计(SWITCH…CASE) 利用PCL 指针,此方法简单明了 MOVR CASE, 0 ADDAR PCL, 1 GOTO Event1 ;case = 0 GOTO Event2 ;case = 1 GOTO Event3 ;case = 2 … 注：此方法仅用于每页的前256个字节 2、利用查表和CALLA 指令，此方法结构清晰。 MO