/* Copyright (C) 1995 Eddie C. Dost
This file is part of the HP48 C Library.

The HP48 C Library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public License
as published by the Free Software Foundation; either version 2 of the
License, or (at your option) any later version.

The HP48 C Library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details. */

	xdef	__detect
	xdef	___gx

__detect
	move.a	#$00029,d0
	move.b	(d0),a
	move.ao	#___gx,d0
	clr.b	c
	bne.b	a,0,.t0
	inc.b	c
.t0
	move.b	c,(d0)
	rtn

___gx
	dcr.2	0