SECTION "code",CODE

	INCLUDE	"pplib.i"

	XDEF	_ppCalcPasskey

_ppCalcPasskey:
	move.l	a6,-(a7)
	GETPPBASE
	move.l	8(a7),a0
	jsr	_LVOppCalcPasskey(a6)
	move.l	(a7)+,a6
	rts

	END