OpenCores
URL https://opencores.org/ocsvn/8051/8051/trunk

Subversion Repositories 8051

[/] [8051/] [trunk/] [asm/] [xrom_test.asm] - Diff between revs 185 and 186

Only display areas with differences | Details | Blame | View Log

Rev 185 Rev 186
    ajmp start;
    ajmp start;
check:
check:
    subb a, #04;
    subb a, #04;
    jnz error1;
    jnz error1;
    mov a, b;
    mov a, b;
    jnz error2;
    jnz error2;
    ret;
    ret;
error1:
error1:
    mov p1, #01;
    mov p1, #01;
    ajmp error1;
    ajmp error1;
error2:
error2:
    mov p1, #02;
    mov p1, #02;
    ajmp error2;
    ajmp error2;
    .org 020eh
    .org 020eh
start:
start:
    mov p0, #090h;
    mov p0, #090h;
    mov a, #20;
    mov a, #20;
    mov b, #05;
    mov b, #05;
    div ab;
    div ab;
    lcall check;
    lcall check;
    mov p0, #00h;
    mov p0, #00h;
    ljmp test1;
    ljmp test1;
    .org 500dh;
    .org 500dh;
test1:
test1:
    mov a, #00;
    mov a, #00;
    mov b, #00;
    mov b, #00;
    mov r0, a;
    mov r0, a;
    mov r1, #30h
    mov r1, #30h
    mov dptr, #data;
    mov dptr, #data;
loop1:
loop1:
    mov a, r0;
    mov a, r0;
    movc a, @a+dptr;
    movc a, @a+dptr;
    mov @r1, a;
    mov @r1, a;
    inc r0;
    inc r0;
    inc r1;
    inc r1;
    mov a, r0;
    mov a, r0;
    subb a, #25;
    subb a, #25;
    jnz loop1;
    jnz loop1;
    mov p0, #01h;
    mov p0, #01h;
    mov r0, #00h;
    mov r0, #00h;
    mov r1, #30h;
    mov r1, #30h;
    mov b, #05;
    mov b, #05;
loop2:
loop2:
    clr c;
    clr c;
    mov a, @r1;
    mov a, @r1;
    subb a, b;
    subb a, b;
    jnz error3;
    jnz error3;
    inc b;
    inc b;
    inc r1;
    inc r1;
    inc r0;
    inc r0;
    mov a, r0;
    mov a, r0;
    subb a, #25;
    subb a, #25;
    jnz loop2;
    jnz loop2;
    mov p0, #002h;
    mov p0, #002h;
    ljmp _end;
    ljmp _end;
error3:
error3:
    mov p1, #03;
    mov p1, #03;
    ajmp error3;
    ajmp error3;
    .org 800fh;
    .org 800fh;
_end:
_end:
    mov p0, #0eeh;
    mov p0, #0eeh;
    ajmp _end;
    ajmp _end;
    .org 9000h;
    .org 9000h;
data:
data:
    .db 5;
    .db 5;
    .db 6;
    .db 6;
    .db 7;
    .db 7;
    .db 8;
    .db 8;
    .db 9;
    .db 9;
    .db 10;
    .db 10;
    .db 11;
    .db 11;
    .db 12;
    .db 12;
    .db 13;
    .db 13;
    .db 14;
    .db 14;
    .db 15;
    .db 15;
    .db 16;
    .db 16;
    .db 17;
    .db 17;
    .db 18;
    .db 18;
    .db 19;
    .db 19;
    .db 20;
    .db 20;
    .db 21;
    .db 21;
    .db 22;
    .db 22;
    .db 23;
    .db 23;
    .db 24;
    .db 24;
    .db 25;
    .db 25;
    .db 26;
    .db 26;
    .db 27;
    .db 27;
    .db 28;
    .db 28;
    .db 29;
    .db 29;
    .db 30;
    .db 30;
    .db 31;
    .db 31;
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.