Update Survey.asm

- Make SURVEY.COM port probing compatible with Z280
6 years ago · ee2d8d31f4
1 changed files with 5 additions and 3 deletions
--- a/Source/Apps/Survey.asm
+++ b/Source/Apps/Survey.asm
@ -600,9 +600,11 @@ PORTLP:
 	mov	c,a			; port number to reg c
 	mvi	b,0			; for 16 bit  port addressing
 	db	0edh,078h		; z80: in a,(c)
 ; inactive port could return 0xFF or 0x78
 	CPI	0FFH
 	JZ	NEXTPT
 ; inactive port could return 0xFF or 0x78 or the port address
 	cmp	c
 	jz	nextpt
 	cpi	0FFh
 	jz	nextpt
 	cpi	078h
 	jz	nextpt
 ISPORT: