1;
2;	ZX Spectrum specific routines
3;
4;	int if1_installed();
5;
6;	The result is:
7;	- 0 (false) if the ZX Interface1 is missing or not paged in
8;	- 1 (true) if the ZX Interface1 is connected and activated.
9;
10;	$Id: if1_installed.asm,v 1.3 2016-06-10 20:02:04 dom Exp $
11;
12
13	SECTION code_clib
14	PUBLIC	if1_installed
15	PUBLIC	_if1_installed
16
17if1_installed:
18_if1_installed:
19	ld	hl,(23635)
20	ld	de,23813
21	sbc	hl,de
22	ld	a,h
23	or	l
24	ld	hl,0
25	ret	nz
26	inc	hl
27	ret
28