Subversion Repositories pentevo

(root)/tools/asl/asl-current/tests/t_z80reg/t_z80reg.asm – Rev 1186

Details | Last modification | View Log | RSS feed

Rev	Author	Line No.	Line
1186	savelij	1	cpu z80undoc
		2	page 0
		3
		4	acc equ a
		5	cnt equ bc
		6	cnt_h equ b
		7	cnt_l equ c
		8	src equ de
		9	src_h equ d
		10	src_l equ e
		11	dst equ hl
		12	dst_h equ h
		13	dst_l equ l
		14	sptr equ sp
		15
		16	isrc equ ix
		17	isrc_h equ ixh
		18	xh reg ixh
		19	isrc_l equ ixl
		20	xl reg ixl
		21	idst equ iy
		22	idst_h equ iyh
		23	yh reg iyh
		24	idst_l equ iyl
		25	yl reg iyl
		26
		27	ld a,ixh
		28	ld a,isrc_h
		29	ld a,xh
		30
		31	cpl a
		32	cpl acc
		33	neg a
		34	neg acc
		35
		36	ld i,a
		37	ld i,acc
		38	ld a,i
		39	ld acc,i
		40	ld r,a
		41	ld r,acc
		42	ld a,r
		43	ld acc,r
		44
		45	out (c),0
		46	out (cnt_l),0
		47	out (c),a
		48	out (cnt_l),a
		49	in a,(c)
		50	in a,(cnt_l)
		51	out (20h),a
		52	out 20h,a
		53	in a,20h
		54	in a,(20h)
		55
		56	ld a,(bc)
		57	ld acc,(cnt)
		58	ld a,(de)
		59	ld acc,(src)
		60	ld a,(hl)
		61	ld acc,(dst)
		62	ld a,(ix+12h)
		63	ld acc,(isrc+12h)
		64
		65	ex de,hl
		66	ex src,dst
		67	ex hl,de
		68	ex dst,src
		69
		70	irp reg,hl,dst,ix,isrc,iy,idst
		71	ex (sp),reg
		72	ex reg,(sp)
		73	endm
		74
		75	jp (hl)
		76	jp (dst)
		77	jp (ix)
		78	jp (isrc)
		79	jp (iy)
		80	jp (idst)
		81	jp (isrc+0)
		82
		83	cpu z380
		84
		85	exts a
		86	exts acc
		87	cplw hl
		88	cplw dst
		89	negw hl
		90	negw dst
		91	extsw hl
		92	extsw dst
		93
		94	ld i,hl
		95	ld i,dst
		96	ld hl,i
		97	ld dst,i
		98
		99	sub hl,(1234h)
		100	sub dst,(1234h)
		101	sub sp,1234h
		102	sub sptr,1234h
		103
		104	ina a,20h
		105	ina acc,20h
		106	inaw hl,20h
		107	inaw dst,20h
		108	outa 20h,a
		109	outa 20h,acc
		110	outaw 20h,hl
		111	outaw 20h,dst
		112
		113	inw hl,(c)
		114	inw hl,(cnt_l)
		115	outw (c),de
		116	outw (cnt_l),de
		117	outw (c),1234h
		118	outw (cnt_l),1234h
		119
		120	multw hl,de
		121	multw dst,src
		122
		123	ex (hl),a
		124	ex (dst),acc
		125	ex a,(hl)
		126	ex acc,(dst)
		127
		128	ex de,de'
		129	ex src,src'