$D #USAGE
:S
;
;	RANVUE.DO
;	Invokes RANVUE  to vue a RANDOM file
;
;	Created:  October 84 by JAJ
;
:S
GOTO #$0
;##USAGE
:<USAGE: >
XY=12
:<RANVUE>
XY=11
:< {filename}{/option}
	This program will allow you to vue a RANDOM file

	Invoke by typing RANVUE {filename}/OPTION
 
        The only Options available are:
        /B  - creates a complete recallable backup of the file
             
             
>
XY=12
@EXIT
;#$0
:S
:<Loading $0>
:<.>
;LOAD BAS:VUE.SBR
LOAD VUE.SBR
:<.>
LOAD BAS:ACCEPT.SBR
:<.>
;LOAD BAS:XPPN.SBR
LOAD XPPN.SBR
:<.>
:R
;RUN DSK0:RANVUE.RUN[7,6]
RUN RANVUE.RUN
$0