LIST 19

============================================================================

;##### I/O Map #####
pio_a		equ	001ch		; ←　内蔵PIOのアドレス定義
pio_b		equ	001eh

;##### RESET #####
	org	0000h			; ←　リセットするとここから始まる
	ld      sp,09fffh		; ←　スタックポインタをセット
	di				; ←　割り込みを禁止
	jp      main			; ←　メインに飛ぶ

;##### NMI #####
	org     0066h			; ←　（NMIは来ないが一応入れておく）
	retn

;##### Main #####
main:
	ld	a,0cfh			; Mode 3
	out	(pio_a+1),a
	ld	a,00000000b		; 0:Out / 1:In
	out	(pio_a+1),a
	ld	a,0cfh			; Mode 3
	out	(pio_b+1),a
	ld	a,11111111b		; 0:Out / 1:In
	out	(pio_b+1),a
loop:
	call	sw_check		; ←　スイッチ入力をLED表示
	jr	loop

sw_check:
	in	a,(pio_b)		; ←　PBポートの状態を入力
	out	(pio_a),a		; ←　PAポートから出力する
	ret				; （共に負論理なので反転が不要）

	end

============================================================================