Subversion Repositories 8051

        ajmp start              ;

;

; testing bank register select

;

error:

        mov p1, psw             ;

loop:

        nop             ;

        nop             ;

        ajmp loop               ;

start:

        clr a

        mov r0, a               ; bank 0

        mov r4, #040h           ;

        mov psw, #008h          ; bank 1

        mov r0, #001h           ;

        mov r4, #041h           ;

        mov psw, #010h          ; bank 2

        mov r0, #002h           ;

        mov r4, #042h           ;

        mov psw, #018h          ; bank 3

        mov r0, #003h           ;

        mov r4, #043h           ;

        mov p0, #00h            ;

        mov psw, #010h          ; bank 2

        mov a, r0               ;

        subb a, #002h           ;

        jnz error               ;

        mov a, r4               ;

        subb a, #042h           ;

        jnz error               ;

        mov p0, #01h            ;

        mov psw, #008h          ; bank 1

        mov a, r0               ;

        subb a, #001h           ;

        jnz error               ;

        mov a, r4               ;

        subb a, #041h           ;

        jnz error               ;

        mov p0, #02h            ;

        mov psw, #018h          ; bank 3

        mov a, r0               ;

        subb a, #003h           ;

        jnz error               ;

        mov a, r4               ;

        subb a, #043h           ;

        jnz error               ;

        mov p0, #03h            ;

        mov psw, #000h          ; bank 0

        mov a, r0               ;

        jnz error               ;

        mov a, r4               ;

        subb a, #040h           ;

        jnz error               ;

        mov p0, #04h            ;