main.lis

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

                        .module Main.c
                        .area text
 0000                   .dbfile Main.c
 0000                   .dbfunc e main _main fV
 0000           ;        ADValue -> 0,X
 0000           ;           Temp -> 22,X
 0000           ;              i -> 23,X
 0000           _main::
 0000                   .dbline -1
 0000 A7E8              ais #-24
 0002 95                tsx
 0003                   .dbline 12
 0003           ; //-------------------------------------------------------------------------*
 0003           ; //工程文件名:TLC2543.prj                                                   *
 0003           ; //硬件连接:                                                                *
 0003           ; //    TLC2543的CS,I/O CLOCK，DATA INPUT，DATA OUT分别接PTC0,PTD1~PTD3      *
 0003           ; //程序描述:由TLC2543采集11路AD值                                           *
 0003           ; //日    期:2007.04.18                                                      *
 0003           ; //-------------------------------------------------------------------------*
 0003           ; #include "Includes.h"   //总头文件
 0003           ; 
 0003           ; //主函数
 0003           ; void main()
 0003           ; {
 0003                   .dbline 16
 0003           ;     INT16U ADValue[11];
 0003           ;     INT8U Temp[1];
 0003           ;     INT8U i;
 0003           ;     MCUInit();
 0003 CD0000            jsr _MCUInit
 0006                   .dbline 17
 0006           ;     SPIInit();
 0006 CD0000            jsr _SPIInit
 0009                   .dbline 18
 0009           ;     SCIInit();          //调串行口初始化子程序              
 0009 CD0000            jsr _SCIInit
 000C 95                tsx
 000D 2036              bra L3
 000F           L2:
 000F                   .dbline 20
 000F           ;     while(1)
 000F           ;     {
 000F                   .dbline 21
 000F           ;        i=SCIReN(1,Temp);
 000F AF16              aix #22
 0011 89                pshx
 0012 8B                pshh
 0013 A601              lda #1
 0015 87                psha
 0016 CD0000            jsr _SCIReN
 0019 A703              ais #3
 001B 95                tsx
 001C B700              sta *__r1
 001E E717              sta 23,X
 0020                   .dbline 22
 0020           ;        if(i==0)
 0020 2623              bne L5
 0022                   .dbline 23
 0022           ;        {
 0022                   .dbline 24
 0022           ;          if(Temp[0]==0xAA) 
 0022 E616              lda 22,X
 0024 A1AA              cmp #-86
 0026 261D              bne L7
 0028                   .dbline 25
 0028           ;          {    
 0028                   .dbline 26
 0028           ;           ADC11P(0,ADValue);
 0028 89                pshx
 0029 8B                pshh
 002A 4F                clra
 002B 87                psha
 002C CD0000            jsr _ADC11P
 002F A703              ais #3
 0031 95                tsx
 0032                   .dbline 27
 0032           ;           SCISendN(22,(INT8U*)ADValue);
 0032 89                pshx
 0033 8B                pshh
 0034 A616              lda #22
 0036 87                psha
 0037 CD0000            jsr _SCISendN
 003A A703              ais #3
 003C                   .dbline 28
 003C           ;           SCISend1(0xAA);
 003C A6AA              lda #-86
 003E 87                psha
 003F CD0000            jsr _SCISend1
 0042 A701              ais #1
 0044 95                tsx
 0045                   .dbline 29
 0045           ;          }
 0045           L7:
 0045                   .dbline 30
 0045           ;        }
 0045           L5:
 0045                   .dbline 31
 0045           L3:
 0045                   .dbline 19
 0045 20C8              bra L2
 0047           X0:
 0047                   .dbline -2
 0047           L1:
 0047 A718              ais #24
 0049                   .dbline 0 ; func end
 0049 81                rts
 004A                   .dbsym l ADValue 0 A[22:11]i
 004A                   .dbsym l Temp 22 A[1:1]c
 004A                   .dbsym l i 23 c
 004A                   .dbend