* PIP PATCH TO ALLOW DIRECT DISK TO DISK COPY TO WORK WITH THE
* UNIQUE SECTOR NUMBER FORMATTING OF TRACK 0 (0,1,2,4,5,6...18)
*
* AFTER LOADING PIP.S19, LOAD PIPATCH.S19 AND THEN SAVE:
*    SAVE PIP.CMD,$2000,$2E4F,$2458
*
* MIKE DOUGLAS, JULY 2022

	ORG	$2E40		PUT PATCH AT END OF PIP
PATCH	TSTA			ON TRACK 0?
	BNE	NORMAL		NO
	CMPB	#2		ON SECTOR 2?
	BNE	NORMAL		NO
	INCB			SKIP SECTOR 3

NORMAL	INCB			MOVE TO NEXT SECTOR
	CMPB	#18+1		18 SECTORS
	RTS

* OTHER PATCHES

	ORG	$2784		INSERT CALL TO THIS PATCH
	JSR	PATCH

	ORG	$278D		USE 35 TRACKS INSTEAD OF 77
	FCB	#35

	ORG	$273F		USE ZERO AS FIRST SECTOR ON TRACK 0
	FCB	0
	
	END
