; READ SNAPSHOT FROM MS-DOS 720KB DISKS ON SPECTRUM +3
; DRIVE B: *MUST* BE A 3.5" DRIVE
; PART THREE THE *SNAPSHOT STARTER*
; 
; THIS PART RESIDES IN THE SCREEN, AT THE TOP AT WILL CORRUPT
; LENGTH OF PART3+27 BYTES
; 
; THIS IS THE PART THAT STARTS THE SNAPSHOT
; TO CHANGED THE PART OF THE SCREEN BEEING CORRUPTED CHANGE THE LABEL
; SNAPHD IN PART2 AND PART3
;
; THANKS TO RICHARD SWANN FOR THE +D VERSION
; +3DOS VERSION BY THOMAS KJAER
; EMAIL TAKJAER@DAIMI.AAU.DK
;
PORTM	EQU	#7FFD
SNAPHD	EQU	#4000
	ORG	SNAPHD+#1B	; RESIDES IN SCREEN AFTER SNAP-INFO
; FIRST PAGE OUT RAM 01 AND LOCK PAGEING
MAIN	LD	BC,PORTM	
	LD	A,48
	OUT	(C),A	; PREVENT FURTHER PAGEING AND USE RAM 00
;
	POP	BC
	POP	IY
	POP	IX
	POP	AF
	LD	R,A
	POP	AF
	LD	SP,(SNAPHD+23)
	EI
	RETN	; GO FOR IT!!!
END
LEN	EQU	END-MAIN

