sciinit.lis

为日本瑞萨苏州分公司做的一个温控系统

                        .module SCIInit.c
                        .area text
 0000                   .dbfile SCIInit.c
 0000                   .dbfunc e SCIInit _SCIInit fV
 0000           _SCIInit::
 0000                   .dbline -1
 0000                   .dbline 9
 0000           ; /*SCIInit:串行口初始化子程序-----------------------------------------------*
 0000           ; *功 能:对串行口进行初始化,默认为允许SCI,正常码输出,8位数据,无校验等        *
 0000           ; *      允许发送器允许接收器.查询方式收发,波特率为9600(设fBUS＝2.4576MHz)   *                                           *
 0000           ; *参 数:无                                                                  *
 0000           ; *返 回:无                                                                  *
 0000           ; *-------------------------------------------------------------------------*/
 0000           ; #include "SCIInit.h"
 0000           ; void SCIInit(void)
 0000           ; {   //(1)总线频率fBUS＝2.4576MHz，定义波特率Bt=9600
 0000                   .dbline 10
 0000           ;     SCBR=0b00000010;
 0000 A602              lda #2
 0002 B719              sta 0x19
 0004                   .dbline 12
 0004           ;     //(2)设置允许SCI，正常码输出、8位数据、无校验
 0004           ;     SCC1=0b01000000; 
 0004 A640              lda #64
 0006 B713              sta 0x13
 0008                   .dbline 14
 0008           ;     //(3)设置允许发送、允许接收，查询方式收发     
 0008           ;     SCC2=0b00001100; 
 0008 A60C              lda #12
 000A B714              sta 0x14
 000C                   .dbline -2
 000C           L1:
 000C                   .dbline 0 ; func end
 000C 81                rts
 000D                   .dbend