URL
https://opencores.org/ocsvn/m16c5x/m16c5x/trunk
Subversion Repositories m16c5x
[/] [m16c5x/] [trunk/] [Code/] [MPLAB/] [M16C5x_Tst2.lst] - Rev 2
Compare with Previous | Blame | View Log
MPASM 5.50 M16C5X_TST2.ASM 7-4-2013 11:39:38 PAGE 1LOC OBJECT CODE LINE SOURCE TEXTVALUE00001 ;*******************************************************************************00002 ; M16C5x_Tst2.ASM00003 ;00004 ; This is the source for the test program used to develop the PIC16C5x proce-00005 ; core. It has also been used to test the P16C5x version of the PIC16C5x core.00006 ;00007 ; The first instruction of the program is expected to be placed in location 0.00008 ;00009 ; The program tests most instructions, but not is a self-checking manner. In-00010 ; spection of the registers is the method used to verify that the cores are00011 ; operating correctly.00012 ;00013 ;*******************************************************************************0001400015 LIST P=16F59, R=DEC0001600017 ;-------------------------------------------------------------------------------00018 ; Set ScratchPadRam here. If you are using a PIC16C5X device, use:00019 ;ScratchPadRam EQU 0x1000020 ; Otherwise, use:00021 ;ScratchPadRam EQU 0x2000022 ;-------------------------------------------------------------------------------000230000000A 00024 ScratchPadRam EQU 0x0A0002500026 ;-------------------------------------------------------------------------------00027 ; Variables00028 ;-------------------------------------------------------------------------------0002900000000 00030 INDF EQU 0 ; Indirect Register File Access Location00000001 00031 Tmr0 EQU 1 ; Timer 000000002 00032 PCL EQU 2 ; Low Byte Program Counter00000003 00033 Status EQU 3 ; Processor Status Register00000004 00034 FSR EQU 4 ; File Select Register00000005 00035 PortA EQU 5 ; I/O Port A Address00000006 00036 PortB EQU 6 ; I/O Port B Address00000007 00037 PortC EQU 7 ; I/O Port C Address000380000000A 00039 Cntr EQU ScratchPadRam+00000000B 00040 MemStart EQU ScratchPadRam+100000015 00041 Count EQU 32-MemStart000420000000A 00043 DelayLoop EQU ScratchPadRam+00004400045 ;-------------------------------------------------------------------------------00046 ; Set Reset/WDT Vector00047 ;-------------------------------------------------------------------------------0004807FF 00049 ORG H'7FF'00050Message[306]: Crossing page boundary -- ensure page bits are set.07FF 0A00 00051 GOTO Start00052MPASM 5.50 M16C5X_TST2.ASM 7-4-2013 11:39:38 PAGE 2LOC OBJECT CODE LINE SOURCE TEXTVALUE00053 ;-------------------------------------------------------------------------------00054 ; Main Program00055 ;-------------------------------------------------------------------------------000560000 00057 ORG H'000'0005800059 ;-------------------------------------------------------------------------------0000 0763 00060 Start BTFSS Status,3 ;; Test PD (STATUS.3), if 1, ~SLEEP restart0001 0A30 00061 GOTO SleepRestart ;; SLEEP restart, continue test program0002 0C07 00062 MOVLW 0x07 ;; load OPTION0003 0002 00063 OPTION0004 0040 00064 CLRW ;; clear working register0005 0005 00065 TRIS PortA ;; load W into port control registers0006 0006 00066 TRIS PortB0007 0007 00067 TRIS PortC00068 ;00069 ; GOTO Next ;; Test GOTO00070 ;0008 0A0A 00071 GOTO Next00072 ;0009 0CFF 00073 MOVLW 0xFF ;; instruction should be skipped00074 ;000A 090D 00075 Next CALL Subroutine ;; Test CALL00076000B 0022 00077 MOVWF PCL ;; Test Computed GOTO, Load PCL with W000C 0000 00078 NOP ;; No Operation00079000D 080E 00080 Subroutine RETLW Subroutine + 1 ;; Test RETLW, return 0x0E in W00081000E 0C0B 00082 MOVLW MemStart ;; starting RAM + 1000F 0024 00083 MOVWF FSR ;; indirect address register (FSR)00084 ;-------------------------------------------------------------------------------0010 0C15 00085 MOVLW Count ;; internal RAM count - 10011 002A 00086 MOVWF Cntr ;; loop counter0012 0CAA 00087 MOVLW 0xAA ;; zero working register00088 ;0013 0020 00089 Loop1 MOVWF INDF ;; clear RAM indirectly0014 02A4 00090 INCF FSR,1 ;; increment FSR0015 02EA 00091 DECFSZ Cntr,1 ;; decrement loop counter0016 0A13 00092 GOTO Loop1 ;; loop until loop counter == 000093 ;0017 0C0B 00094 MOVLW MemStart ;; starting RAM + 10018 0024 00095 MOVWF FSR ;; reload FSR0019 0CEB 00096 MOVLW (256 - Count) ;; set loop counter to 256 - 23001A 002A 00097 MOVWF Cntr00098 ;001B 0260 00099 Loop2 COMF INDF,1 ;; Complement Memory Pattern from Loop 1001C 02A4 00100 INCF FSR,1 ;; Increment Indirect Pointer to Memory001D 03EA 00101 INCFSZ Cntr,1 ;; increment counter loop until 0001E 0A1B 00102 GOTO Loop2 ;; loop00103 ;001F 006A 00104 CLRF Cntr ;; Clear Memory Location 0x0800105 ;-------------------------------------------------------------------------------MPASM 5.50 M16C5X_TST2.ASM 7-4-2013 11:39:38 PAGE 3LOC OBJECT CODE LINE SOURCE TEXTVALUE0020 00EA 00106 DECF Cntr,1 ;; Decrement Memory Location 0x080021 01CA 00107 ADDWF Cntr,0 ;; Add Memory Location 0x08 to W, Store in W0022 00AA 00108 SUBWF Cntr,1 ;; Subtract Memory Location 0x080023 036A 00109 RLF Cntr,1 ;; Rotate Memory Location 0x080024 032A 00110 RRF Cntr,1 ;; Rotate Memory Location0025 0C69 00111 MOVLW 0x69 ;; Load W with test pattern: W <= 0x690026 002A 00112 MOVWF (MemStart - 1) ;; Initialize Memory with test pattern0027 03AA 00113 SWAPF Cntr,1 ;; Test SWAPF: (0x08) <= 0x960028 012A 00114 IORWF Cntr,1 ;; Test IORWF: (0x08) <= 0x69 | 0x960029 016A 00115 ANDWF Cntr,1 ;; Test ANDWF: (0x08) <= 0x69 & 0xFF002A 01AA 00116 XORWF Cntr,1 ;; Test XORWF: (0x08) <= 0x69 ^ 0x69Message[305]: Using default destination of 1 (file).002B 026A 00117 COMF Cntr ;; Test COMF: (0x08) <= ~0x00002C 0D96 00118 IORLW 0x96 ;; Test IORLW: W <= 0x69 | 0x96002D 0E69 00119 ANDLW 0x69 ;; Test ANDLW: W <= 0xFF & 0x69002E 0F69 00120 XORLW 0x69 ;; Test XORLW: W <= 0x69 ^ 0x6900121 ; SLEEP ;; Stop Execution of test program: HALT002F 0A40 00122 GOTO PortTst00123 ;-------------------------------------------------------------------------------0030 0004 00124 SleepRestart CLRWDT ;; Detected SLEEP restart, Clr WDT to reset PD0031 0663 00125 BTFSC Status,3 ;; Check STATUS.3, skip if ~PD clear0032 0A34 00126 GOTO Continue ;; ~PD is set, CLRWDT cleared PD0033 0A33 00127 ErrorLoop GOTO ErrorLoop ;; ERROR: hold here on error00128 ;0034 0C10 00129 Continue MOVLW 0x10 ;; Load FSR with non-banked RAM address0035 0024 00130 MOVWF FSR ;; Initialize FSR for Bit Processor Tests0036 0060 00131 CLRF INDF ;; Clear non-banked RAM location using INDF0037 0503 00132 BSF Status,0 ;; Set STATUS.0 (C) bit0038 0423 00133 BCF Status,1 ;; Clear STATUS.1 (DC) bit0039 0443 00134 BCF Status,2 ;; Clear STATUS.2 (Z) bit003A 0203 00135 MOVF Status,0 ;; Load W with STATUS003B 0300 00136 RRF INDF,0 ;; Rotate Right RAM location: C <= 0, W <= 0x80003C 0340 00137 RLF INDF,0 ;; Rotate Left RAM location: C <= 0, (INDF) <= 0x00003D 0020 00138 MOVWF INDF ;; Write result back to RAM: (INDF) <= 0x80003E 0021 00139 MOVWF Tmr0 ;; Write to TMR0, clear Prescaler003F 0A00 00140 GOTO Start ;; Restart Program00141 ;-------------------------------------------------------------------------------00142 ;PortTst00143 ;00144 ; MOVLW 0xAA ;; Load W with 0xAA00145 ; MOVWF PortA ;; WE_PortA00146 ; MOVWF PortB ;; WE_PortB00147 ; MOVWF PortC ;; WE_PortC00148 ; MOVF PortA,0 ;; RE_PortA00149 ; MOVF PortB,0 ;; RE_PortB00150 ; MOVF PortC,0 ;; RE_PortC00151 ; COMF PortA,1 ;; Complement PortA00152 ; COMF PortB,1 ;; Complement PortB00153 ; COMF PortC,1 ;; Complement PortC00154 ; CLRF PortA ;; Clear PortA00155 ; CLRF PortB ;; Clear PortB00156 ; CLRF PortC ;; Clear PortC00157 ; CLRW ;; zero working registerMPASM 5.50 M16C5X_TST2.ASM 7-4-2013 11:39:38 PAGE 4LOC OBJECT CODE LINE SOURCE TEXTVALUE00158 ;00159 ;0040 00EC 00160 PortTst DECF 0x0C,10041 020C 00161 MOVF 0x0C,00042 0025 00162 MOVWF PortA00163 ;0043 0945 00164 CALL Delay00165 ;0044 0A40 00166 GOTO PortTst0016700168 ;00169 ; Delay Subroutine00170 ;0045 0000 00171 Delay NOP00172 ;0046 0CEE 00173 MOVLW 0xEE0047 002A 00174 MOVWF 0x0A0048 0C01 00175 MOVLW 0x010049 002B 00176 MOVWF 0x0B00177 ;004A 02EA 00178 DelayLp DECFSZ 0x0A,1 ;; Decrement Delay Low004B 0A4A 00179 GOTO DelayLp004C 0004 00180 CLRWDT ;; Tickle WDT004D 02EB 00181 DECFSZ 0x0B,1 ;; Decrement Delay High004E 0A4A 00182 GOTO DelayLp00183 ;004F 0800 00184 RETLW 0x0000185 ;-------------------------------------------------------------------------------00186 ENDMPASM 5.50 M16C5X_TST2.ASM 7-4-2013 11:39:38 PAGE 5SYMBOL TABLELABEL VALUECntr 0000000AContinue 00000034Count 00000015Delay 00000045DelayLoop 0000000ADelayLp 0000004AErrorLoop 00000033FSR 00000004INDF 00000000Loop1 00000013Loop2 0000001BMemStart 0000000BNext 0000000APCL 00000002PortA 00000005PortB 00000006PortC 00000007PortTst 00000040ScratchPadRam 0000000ASleepRestart 00000030Start 00000000Status 00000003Subroutine 0000000DTmr0 00000001__16F59 00000001__DEBUG 1MEMORY USAGE MAP ('X' = Used, '-' = Unused)0000 : XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX0040 : XXXXXXXXXXXXXXXX ---------------- ---------------- ----------------07C0 : ---------------- ---------------- ---------------- ---------------XAll other memory blocks unused.Program Memory Words Used: 81Program Memory Words Free: 1967Errors : 0Warnings : 0 reported, 0 suppressedMessages : 2 reported, 0 suppressed