OPLObjectFile**
LOC::M:\OPL\VR3A.OPL
VR3A.TXT
\TXT\
XPOS%
YPOS%
FWIDTH%
FHEIGHT%
FNAME$
MAXFONT%
SPWIDTH%
FONTLST$
FONTNO%
FONTID%
VWIDTH%
VROWS%
STATFON%
MAXPAG%
PAGEOFF&
CURPAG%
BKMARK%
FONTVPG%
FILENAM$
OPAFILE$
VINIT
CLRVPG
STATUS
SHOWPG&
GETK%
RESCAN
WRIVPG
READVPG
VFONT
SELFON%
DROPBMK
JMPBMK
PARSE$
OPEN%
ABOUT
VR3a v1.00 
1994 Robert Boucher
Showing page 
On the last pageO
On the first pageO
On the first pageO
On the last pageO
Jump to page
Page:_
Page:_
CancelO
Rescan Completed
ContinueO
OkH@[n
Scan to End Completed
ContinueO
OrH@[
OgH@[!
ONH@[
Opening 
OoH@[
\TXT\*.*
Select a text file to read
+	Filename:O
Quit VRO
Opening 
Really Quit?
OxH@[
File+
Open new textOo
Page+
Jump to pageOj+	Next pageOn+	Prev pageOp+
First page+
+	Last page+
BookMark+
Drop BmkOr+
Goto BmkOg
Rescan+
Full rescan+
Scan to endOk
Special+
Select fontOf+
Zoom inOz+
Zoom outOZ+
About VROv+
ExitOx
Vertical Text ReaderO
for the Series 3aO
Version 1.00, January 1994O
Copyright 
1994 Robert BoucherO
boucher@asimov.ocunix.on.caO
PARSE$
READVPG
FONTVPG%
MAXPAG%
CURPAG%
PAGEOFF&
BKMARK%
Error Opening 
Error: 
.VPGK
SHOWFON
VFONT
SPWIDTH%
MAXFONT%
FONTNO%
FONTVPG%
MAXPAG%
Select Font
Font:_
CancelO
ShowO +
VFONT
VPRINT
FONTNO%
SPWIDTH%
STATFON%
FWIDTH%
FONTID%
FNAME$
MAXFONT%
FHEIGHT%
NO  NAMEO
12345678901234567890O
abcdefghijABCDEFGHIJO
   Press any key    
VFONT
VPRINT
PARSE$
FONTNO%
SPWIDTH%
STATFON%
FWIDTH%
FHEIGHT%
MAXPAG%
CURPAG%
VWIDTH%
FILENAM$
 Fnt:K
 Fnt:K
Text: 
VPRINT
VWIDTH%
SPWIDTH%
FWIDTH%
FONTNO%
VROWS%
O$hD[R
O	@`[
SHOWBMK
BKMARK%
CURPAG%
Drop which Bookmark?
+	Bookmark:_
CancelO
ShowO +
SHOWBMK
CURPAG%
BKMARK%
Jump to which Bookmark?
+	Bookmark:_
CancelO
ShowO +
BKMARK%
+	Bookmarks
: Page K
     K
: Page K
: Page K
     K
: Page K
: Page K
     K
: Page K
: Page K
     K
: Page K
: Page K
     K
: Page K
SPWIDTH%
FWIDTH%
FONTNO%
XPOS%
YPOS%
FWIDTH%
FHEIGHT%
FNAME$
STATFON%
MAXFONT%
FONTLST$
sman0405
smxn0406
sman0508
smxn0608
smxn0614
smxn0808
smxn0814
FONTNO%
FONTID%
FNAME$
VWIDTH%
FWIDTH%
VROWS%
FHEIGHT%
STATFON%
SPWIDTH%
\VR3A\
T|WBx
T|WBx
T|WBx
XPOS%
YPOS%
XPOS%
YPOS%
FHEIGHT%
FONTNO%
SPWIDTH%
FWIDTH%
PARSE$
WRITE%
MAXPAG%
PAGEOFF&
CURPAG%
BKMARK%
FONTVPG%
.VPGK
VPG: Error Opening 
Error: 
PARSE$
READ&
MAXPAG%
PAGEOFF&
CURPAG%
BKMARK%
FONTVPG%
.VPGK
VPG: Error Opening 
Error: 
MAXPAG%
PAGEOFF&
CURPAG%
BKMARK%
FONTVPG%
FONTNO%
VFONT
CLRVPG
SCANPG&
FONTVPG%
PAGEOFF&
MAXPAG%
CURPAG%
Scanning Page 
h{E[H
Scanning Page 
VWIDTH%
SPWIDTH%
FWIDTH%
FONTNO%
VROWS%
O$hD[D
O	@`[
OPAFILE$
ABOUTo
OPEN%;
SELFON%E
SHOWFON[
STATUS3
SHOWPG&
DROPBMK
JMPBMK
SHOWBMKo
VWIDTH%
VINIT"
VFONT
VPRINT
WRIVPG1
READVPG
CLRVPG
RESCAN
SCANPG&
WRITE%~#
READ&
PARSE$
GETK%6%