;------------------------------------------------------------------------------
;  This file is part of the C51 Compiler package
;  Startup Code for the Philips LPC9xx devices 
;  Copyright (c) 1988-2004 Keil Elektronik GmbH and Keil Software, Inc.
;  Version 2.1
;
;  *** <<< Use Configuration Wizard in Context Menu >>> ***
;------------------------------------------------------------------------------
;  START900.A51:  This code is executed after processor reset.
;  You may add this file to a uVision2 project.
;
;  To translate this file use Ax51 with the following invocation:
;
;     Ax51 START900.A51 "your options"
;
;  To link the modified START900.OBJ file to your application use the following
;  Lx51 invocation:
;
;     Lx51 your object file list, START900.OBJ  controls
;
;------------------------------------------------------------------------------
;
;  User-defined <h> Power-On Initialization of Memory
;
; With the following statements the initialization of memory
; at processor reset can be defined:
;
;<o> IDATA memory length <0x0-0x100:0x2>
;<i> Notes: The absolute start-address of IDATA memory is always 0
;<i>        The IDATA space overlaps physically the DATA and BIT areas of the
;<i>        LPC9xx device.
IDATALEN        EQU     0x100    ; the length of IDATA memory in bytes.
;
; <o> XDATA memory start address <0x0-0xFFFF:0x2> 
; <i>the absolute start-address of XDATA memory
XDATASTART      EQU     0     
;
; <o> XDATA memory length <0x0-0xFFFF:0x2> 
; <i>the length of XDATA memory in bytes.
XDATALEN        EQU     0      
;
; </h>
;------------------------------------------------------------------------------
;
; <h> Reentrant Stack Initilization
;
;  The following EQU statements define the stack pointer for reentrant
;  functions and initialized it:
;
; Stack Space for reentrant functions in the SMALL model.
; <e> Activate reentrant Stack (SMALL model)
IBPSTACK        EQU     0       ; set to 1 if small reentrant is used.
; <o> top of stack <0x0-0x100:0x2> 
; <i> set top of stack to highest location+1 
IBPSTACKTOP     EQU     0x100   ; default 0FFH+1  
; </e>
;  Stack Space for reentrant functions in the LARGE model.      
; <e> Activate reentrant Stack (LARGE model)
XBPSTACK        EQU     0       ; set to 1 if large reentrant is used.
; <o> top of stack <0x0-0x200:0x2> 
; <i> set top of stack to highest location+1.
XBPSTACKTOP     EQU     0x1FF   ; default 01FFH+1 
; </e>
;
;  Stack Space for reentrant functions in the COMPACT model.    
; <e> Activate reentrant Stack (COMPACT model)
PBPSTACK        EQU     0       ; set to 1 if compact reentrant is used.
; <o> top of stack <0x0-0x100:0x2> 
; <i> set top of stack to highest location+1.
PBPSTACKTOP     EQU     0x100   ; default 0FFH+1  
; </e>
; </h>
;------------------------------------------------------------------------------
;
;  Setup LPC9xx Configuration Register (UCFG1, BOOTVEC, BOOTSTAT, SEC0..SEC7)
; <h> Configuration UCFG1
; Oscillator Configuration (UCFG1.0 .. UCFG1.2)
; <o> FOSC: (UCFG1.0 .. UCFG1.2)
; FOCS Val  Description
; --------  -----------
;    <0=>   high frequency crystal or resonator (4MHz .. 20MHz)
;    <1=>   medium frequency crystal or resonator (100kHz .. 4MHz)
;    <2=>   low frequency crystal (20kHz .. 100kHz)
;    <3=>   internal RC oscillator (7.373MHz +/- 2.5%)
;    <4=>   internal Watchdog oscillator (400kHz +20/-30%)
;    <7=>   external clock input on X1
; <i> Oscillator Configuration
FOSC EQU 3  ; default on unprogrammed parts: 3 = internal RC oscillator

; <o> WDSE: (UCFG1.4) 
; WDSE Val  Description
; --------  -----------
;    <0=> User can set WDT-Osc. as clock source
;    <1=> WDT is running with WDT-Osc.
; <i> Watchdog Saftey Enable (0 = default on unprogrammed part)
WDSE EQU 0  ; 0 = user can set WDCLK to select clock source(default on unprogrammed part) 
;           
; <o> BOE: (UCFG1.5)
; BOE Val  Description
; -------  -----------
;    <0=> Disable
;    <1=> Enable
; <i> Brownout Detect Enable (1 = default on unprogrammed part)
BOE EQU 1  
;
; <o> RPE: (UCFG1.6)
; RPE  Val  Description
; --------  -----------
;     <0=> Disable (P1.5 can use as input pin)
;     <1=> Enable  (P1.5 used as reset pin) 
; <i> Reset PIN enable (0 = default on unprogrammed part)
RPE  EQU 0  
;        
; <o> WDTE: (UCFG1.7)   
; WDTE Val  Description
; --------  -----------
;     <0=> Disable (WDSE has no effect)
;     <1=> Enable 
; <i> Watchdog timer enable (0 = default on unprogrammed part)
WDTE EQU 0  
; </h>
;
; <e> BOOTSTATUS (BOOTSTAT)
; BOOTSTAT   Val  Description
; ----       ---  -----------
BOOTSTAT EQU 0x00 ; enables ISP entry on power-up (default on unprogrammed part)

; BOOTVECTOR (BOOTVEC)
; BOOTVEC    Val  Description
; ----       ---  -----------
; <o> ISP entry point <0x0-0x1F00:0x100> <# /0x100> 
; <i> points to ISP entry point (default c:0x1E00 on unprogrammed part)
BOOTVEC EQU 0x1E  ; 
; </e>
;
; <h> Flash Security Configuration
; <h> SECO: (SEC0.0 .. SEC0.2)
; SEC0 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x0000 - c:0x03FF)
SEC0 EQU 0  
; </h>

; <h> SEC1: (SEC1.0 .. SEC1.2)
; SEC1 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x0400 - c:0x07FF)
SEC1 EQU 3  
; </h>

; <h> SEC2: (SEC2.0 .. SEC2.2)
; SEC2 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x0800 - c:0x0BFF)
SEC2 EQU 2  
; </h>

; <h> SEC3: (SEC3.0 .. SEC3.2)
; SEC3 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x0C00 - c:0x0FFF)
SEC3 EQU 0 
; </h>

; <h> SEC4: (SEC4.0 .. SEC4.2)
; SEC4 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x1000 - c:0x13FF)
SEC4 EQU 0  
; </h>

; <h> SEC5: (SEC5.0 .. SEC5.2)
; SEC5 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x1400 - c:0x17FF)
SEC5 EQU 0  
; </h>

; <h> SEC6: (SEC6.0 .. SEC6.2)
; SEC6 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x1800 - c:0x1BFF)
SEC6 EQU 0  
; </h>

; <h> SEC7: (SEC7.0 .. SEC7.2)
; SEC7 Val  Description
; --------  -----------
;    <q.0> Disable reading with MOVC
;    <q.1> Disable program/erase
;    <q.2> Disable IAP/ISP global erase
; <i> Flash Security Configuration sector 0 (c:0x1C00 - c:0x1FFF)
SEC7 EQU 7  
; </h> 
; </h> 

;------------------------------------------------------------------------------


                NAME    ?C_STARTUP

_UCFG1 EQU FOSC OR (WDSE SHL 4) OR (BOE SHL 5) OR (RPE SHL 6) OR (WDTE SHL 7)
_UCFG2 EQU 0

                CSEG    AT      0FFF0H
                DB      _UCFG1          ; place UCFG Bytes in hex file
                DB      _UCFG2          ; reserved for future use
                DB      BOOTVEC
                DB      BOOTSTAT
                CSEG    AT      0FFF8H                
                DB      SEC0
                DB      SEC1
                DB      SEC2
                DB      SEC3
                DB      SEC4
                DB      SEC5
                DB      SEC6
                DB      SEC7

?C_C51STARTUP   SEGMENT   CODE
?STACK          SEGMENT   IDATA

                RSEG    ?STACK
                DS      1

                EXTRN CODE (?C_START)
                PUBLIC  ?C_STARTUP

                CSEG    AT      0
?C_STARTUP:     JMP     STARTUP1

                RSEG    ?C_C51STARTUP

STARTUP1:

IF IDATALEN <> 0
                MOV     R0,#IDATALEN - 1
                CLR     A
IDATALOOP:      MOV     @R0,A
                DJNZ    R0,IDATALOOP
ENDIF


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


IF IBPSTACK <> 0
EXTRN DATA (?C_IBP)

                MOV     ?C_IBP,#LOW IBPSTACKTOP
ENDIF

IF XBPSTACK <> 0
EXTRN DATA (?C_XBP)

                MOV     ?C_XBP,#HIGH XBPSTACKTOP
                MOV     ?C_XBP+1,#LOW XBPSTACKTOP
ENDIF

IF PBPSTACK <> 0
EXTRN DATA (?C_PBP)
                MOV     ?C_PBP,#LOW PBPSTACKTOP
ENDIF

                MOV     SP,#?STACK-1
                JMP     ?C_START

                END