Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: Notesfiles $Revision: 1.7.0.10 $; site trsvax
Path: utzoo!linus!decvax!bellcore!ulysses!mhuxr!mhuxt!houxm!ihnp4!inuxc!pur-ee!uiucdcs!convex!trsvax!todd
From: todd@trsvax
Newsgroups: net.micro.pc
Subject: Re: Orphaned Response
Message-ID: <53500026@trsvax>
Date: Tue, 11-Feb-86 18:12:00 EST
Article-I.D.: trsvax.53500026
Posted: Tue Feb 11 18:12:00 1986
Date-Received: Fri, 14-Feb-86 07:39:52 EST
References: <4900017@uok.UUCP>
Lines: 20
Nf-ID: #R:uok.UUCP:4900017:trsvax:53500026:000:560
Nf-From: trsvax!todd    Feb 11 17:12:00 1986



	To print the screen from BASIC, a short assembly language
	program will do the trick. The assembly language routine is
	embedded in a string, and should work with any MS-DOS BASIC.
	To use it, just say GOSUB 900.

	900 ' Dump screen using INT 5
	910 A$ = CHR$(&HCD) + CHR$(&H5)		' int 5 instruction
	920 A$ = A$ + CHR$(&HCB)		' far return instruction
	930 ENTRY!=PEEK(VARPTR(A$)+1)+256*PEEK(VARPTR(A$)+2)
	940 CALL ENTRY!
	950 RETURN


	This information has been provided by an individual.
	... canonical disclaimer ...

						Todd Milburn
						Tandy Corp.