;*****************************************************************************
; ファイル名		TEST0.asm
; 対象マイコン 		Z80
; ファイル内容		Z80マイコンボードテストソフト
;*****************************************************************************
;=============================================================================
;シンボル定義
;=============================================================================
PORTA	.EQU	0x80	;8255 ポートAアドレス
PORTB   .EQU	0x81	;8255 ポートBアドレス
PORTC	.EQU	0x82	;8255 ポートCアドレス
CWR		.EQU	0x83	;8255 コントロールアドレス
CW		.EQU	0x89	;コントロールワード
						;A,Bポート = OUTPUT
						;Cポート = INPUT

;=============================================================================
;初期化処理
;=============================================================================
			;======================================
			;コード領域アドレス指定
			;======================================
			.area	CODE(ABS)
			.org	0x0000

			;======================================
			;8255レジスタ設定
			;======================================
			LD		A,CW
			OUT		(CWR),A

;*****************************************************************************
;Mainルーチン
;*****************************************************************************
			LD		A,0x00
LOOP1:		OUT		(PORTA),A
			OUT		(PORTB),A
			JR		WAIT
LOOP2:		INC		A
			CP		0x00
			JR		NZ,LOOP1

LOOP3:		IN		A,(PORTC)	
			OUT		(PORTA),A
			OUT		(PORTB),A
			JR		LOOP3

;*****************************************************************************
;WAIT
;*****************************************************************************
WAIT:		EX		AF,AF'
			LD		BC,10

WAIT1:		LD		DE,0x400
WAIT2:		DEC		DE
			LD		A,D
			OR		E
			JR		NZ,WAIT2
			DEC		BC
			LD		A,B
			OR		C
			JR		NZ,WAIT1
			EX		AF,AF'
			JR		LOOP2