* $Revision Header * Header built automatically - do not edit! *************
*
*	(C) Copyright 1990 by Olaf Barthel & MXM
*
*	Name .....: Bypass.asm
*	Created ..: Friday 10-May-91 17:38
*	Revision .: 1
*
*	Date            Author          Comment
*	=========       ========        ====================
*	10-May-91       Olsen           Created this file!
*
* $Revision Header *********************************************************

	section	text,code

CALL	macro
	xref	_LVO\1
	jsr	_LVO\1(a6)
	endm

*----------------------------------------------------------------------*

	xdef	_Printf
	xdef	_SPrintf
	xdef	_MyExamine
	xdef	_MyExNext
	xdef	_MyOpen
	xdef	_MyClearMenuStrip

*----------------------------------------------------------------------*

_Printf:
	movem.l	d2/a6,-(sp)

	move.l	12(sp),d1
	lea	16(sp),a0
	move.l	a0,d2

	move.l	_DOSBase(a4),a6

	CALL	VPrintf

	movem.l	(sp)+,d2/a6
	rts

*----------------------------------------------------------------------*

_SPrintf:
	movem.l	a2/a3/a6,-(sp)

	move.l	 4+12(sp),a3
	move.l	 8+12(sp),a0
	lea	12+12(sp),a1
	lea	stuffchar(pc),a2

	move.l	4,a6
	CALL	RawDoFmt

	movem.l	(sp)+,a2/a3/a6

	rts

stuffchar:
	move.b	d0,(a3)+
	rts

*----------------------------------------------------------------------*

_MyExamine:
	pea	(a6)
	move.l	_DOSBase(a4),a6
	move.l	_OldExamine,a0
	jsr	(a0)
	move.l	(sp)+,a6
	rts

*----------------------------------------------------------------------*

_MyExNext:
	pea	(a6)
	move.l	_DOSBase(a4),a6
	move.l	_OldExNext,a0
	jsr	(a0)
	move.l	(sp)+,a6
	rts

*----------------------------------------------------------------------*

_MyOpen:
	pea	(a6)
	move.l	_DOSBase(a4),a6
	move.l	_OldOpen,a0
	jsr	(a0)
	move.l	(sp)+,a6
	rts

*----------------------------------------------------------------------*

_MyClearMenuStrip:
	pea	(a6)
	move.l	_IntuitionBase(a4),a6
	move.l	_OldClearMenuStrip,a1
	jsr	(a1)
	move.l	(sp)+,a6
	rts

*----------------------------------------------------------------------*

	lea	__BSSBAS,a0
	move.l	#__BSSLEN,d0

*----------------------------------------------------------------------*

	csect	__MERGED

	xref	_DOSBase
	xref	_IntuitionBase

	xref	_OldExamine
	xref	_OldExNext
	xref	_OldOpen
	xref	_OldClearMenuStrip

*----------------------------------------------------------------------*

	xref	__BSSBAS
	xref	__BSSLEN

*----------------------------------------------------------------------*

	end