head	1.1;
branch	1.1.1;
access;
symbols
	rel_19:1.1.1.1
	rel_12:1.1.1.1
	rel_2:1.1.1.1
	rel_1:1.1.1.1
	rel0:1.1.1.1
	simont:1.1.1;
locks; strict;
comment	@;; @;


1.1
date	2002.07.29.13.33.17;	author simont;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2002.07.29.13.33.17;	author simont;	state Exp;
branches;
next	;


desc
@@



1.1
log
@Initial revision
@
text
@	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		;
@


1.1.1.1
log
@Initial CVS import
@
text
@@