- ;------------------------------------------------------------------------------
- ; STARTUP.A51: 用户上电初始化程序
- ;------------------------------------------------------------------------------
- ;
- ; 用户定义需上电初始化的内存空间
- ;
- ; 使用以下EQU命令可定义在CPU复位时需用0进行初始化的内存空间
- ;
- ;; ; IDATA 存储器的空间的绝对起始地址总是0.;
- IDATALEN EQU 80H ; 需用0进行初始化的IDATA存储器空间的字节数
- ;
- XDATASTART EQU 0H ; XDATA存储器空间的绝对起始地址
- XDATALEN EQU 0H ; 需用0进行初始化的XDATA存储器的空间字节数.
- ;
- PDATASTART EQU 0H ; PDATA存储器的空间的绝对起始地址
- PDATALEN EQU 0H ; 需用0进行初始化的PDATA存储器的空间字节数.
- ;
- ; 注意: IDATA 存储器的空间在物理上包括了8051单片机的DATA和BIT存储器空间.
- ; 听 说 至少要保证与C51编译器运行库有关的存储器的空间进行0初始化 不知是否
- ;------------------------------------------------------------------------------
- ;
- ; 再入函数模拟初始化
- ;
- ; 以下用EQU指令定义了再入函数模拟堆栈指针的初始化
- ;
- ; 使用SMALL存储器模式时再入函数的堆栈空间 .
- IBPSTACK EQU 0 ; 使用SMALL存储器模式再入函数时将其设置成1.
- IBPSTACKTOP EQU 0FFH+1 ; 将堆栈顶设置为最高地址+1.
- ;
- ; 使用LARGE存储器模式时再入函数的堆栈空间.; 使用LARGE存储器模式时再入函数的堆栈空间.
- XBPSTACK EQU 0 ; 使用LARGE存储器模式再入函数时将其设置成1.
- XBPSTACKTOP EQU 0FFFFH+1; 将堆栈顶设置为最高地址+1.
- ;
- ; 使用COMPACT存储器模式时再入函数的堆栈空间.; 使用COMPACT存储器模式时再入函数的堆栈空间.
- PBPSTACK EQU 0 ; 使用COMPACT存储器模式再入函数时将其设置成1.
- PBPSTACKTOP EQU 0FFFFH+1; 将堆栈顶设置为最高地址+1.
- ;
- ;------------------------------------------------------------------------------
- ;
- ; 使用COMPACT存储器模式时64K字节XDATA存储器空间的分页定义
- ;
- ; 以下用EQU指令定义PDATA类型变量在XDATA存储器空间的页地址
- ; 使用EQU指令定义PFAGE时必须与L51连接定位器PDATA指令的控制参数一致
- ;
- PPAGEENABLE EQU 0 ; 使用PDATA类型变量时将其设置成1.
- PPAGE EQU 0 ; 定义页号.
- ;
- ;------------------------------------------------------------------------------
- NAME ?C_STARTUP; 模块名为 ?C_STAUTUP
- ?C_C51STARTUP SEGMENT CODE ; 代码
- ?STACK SEGMENT IDATA ; 堆栈
- RSEG ?STACK ; 堆栈
- DS 1
- EXTRNEXTRN CODE ((?C_START)) ; 程序开始地址
- PUBLIC ?C_STARTUP
- CSEG AT 0x8000 ; 定义用户程序的起始地址,用MON51仿真器时可能有用
- ?C_STARTUP: LJMP STARTUP1
- RSEG ?C_C51STARTUP
- STARTUP1::
- ;
- ; 初始化串口
- MOV SCON,#40H
- MOV TMOD,#20H
- MOV TH1,#0fdH
- SETB TR1
- CLR TI
- ; 单片机上电IDATA内存清零 如果不需要上电清零IDATA 可以注销IF到IFEDN之间的话句
- ; 或者修改IDTALEN的长度 为了具有掉电保护功能 不知IDTALEN多长为好
- IF IDATALEN <> 0
- MOV R0,#IDATALEN - 1
- CLR A
- IDATALOOP: MOV @R0,A
- DJNZ R0,IDATALOOP
- ENDIF
- ;
- ; 单片机上电XDATA内存清零 如果不需要上电清零XDATA 可以注销IF到IFEDN之间的话句
- ; 或者修改XDATALEN的长度
- IF XDATALEN <> 0
- MOV DPTR,#XDATASTART
- MOV R7,#LOW ((XDATALEN)
- IF (LOW (XDATALEN) <> 0
- MOV R6,#(HIGH (XDATALEN) +1
- ELSE
- MOV R6,,#HIGH ((XDATALEN)
- ENDIF
- CLR A
- XDATALOOP: MOVX @DPTR,A
- INC DPTR
- DJNZ R7,XDATALOOP
- DJNZ R6,XDATALOOP
- ENDIF
- ;
- ; 送PDATA存储器页面高位地址
- IF PAGEENABLE <> 0
- MOV P2,#PPAGE
- ENDIF
- ;
- ; 单片机上电PDATA内存清零 如果不需要上电清零XDATA 可以注销IF到IFEDN之间的话句
- ; 或者修改PDATALEN的长度
- IF PDATALEN <> 0
- MOV R0,#PDATASTART
- MOV R7,#LOW (PDATALEN)
- CLR A
- PDATALOOP: MOVX @R0,A
- INC R0
- DJNZ R7,PDATALOOP
- ENDIF
- ;
- ; 设置使用SMALL存储器模式时再入函数的堆栈空间.
- IF IBPSTACK <> 0
- EXTRN DATA (?C_IBP)
- MOV ?C_IBP,#LOW IBPSTACKTOP
- ENDIF
- ;
- ; 设置使用LARGE存储器模式时再入函数的堆栈空间.
- IF XBPSTACK <> 0
- EXTRN DATA (?C_XBP)
- MOV ?C_XBP,#HIGH XBPSTACKTOP
- MOV ?C_XBP+1,#LOW XBPSTACKTOP
- ENDIF
- ;
- ; 设置使用COMPACT存储器模式时再入函数的堆栈空间.
- IF PBPSTACK <> 0
- EXTRN DATA (C_PBP)
- MOV ?C_PBP,#LOW PBPSTACKTOP
- ENDIF
- ;
- ; 设置堆栈的起始地址
- MOV SP,#?STACK-1 ; 例如 MOV SP,#4FH;
- ; This code is required if you use L51_BANK.A51 with Banking Mode 4
- ; 如果你的程序使用了Mode 4 程序分组技术 请启动下面的程序,不会吧你的程序超过64K 利害
- ; EXTRN CODE (?B_SWITCH0)
- ; CALL ?B_SWITCH0 ; init bank mechanism to code bank 0
- ;; 程序从第一组bank 0 块开始执行
- ; 跳转到用户程序MAIN函数
- LJMP ?C_START
- END
- ;lINSHENGFENG