;  PROGRAM NAME:  LBRHLP
;  AUTHOR:  Bob Peddicord
;  date:     Jan 88
;  version:  1.0
;
;  derivation:  help53 by Richard Conn
;  some help routines from help52
;  I want to thank Steve Greenberg for his uncrunch code
;
; Version 1.5 by Howard Goldstein, 6/20/90.  See file LBRHLP.INF
; for revision history.

ver	equ	15

z3env	defl	0fe00h

false	equ	0
true	equ	not false
yes	equ	not false
no	equ	false

; Modules to include

.accept	'Enter (yes) for uncrunching or (no) for unsqueezing ',uncr
;
; MEMBUF is the address of the first free page above the program.  For version
; 1.5 linked with VLIB4D and SYSLIB4B, the correct value is 1600h for the
; uncrunching verion and 1500h for the unsqueezing version.
;
	.radix	16
.accept	'Enter addr of first free page above pgm and data ',membuf
	.radix	10

	include	lbrhlp1		; equate's and external calls

	include	lbrhlp2		; setup and start of program

	include	lbrhlp3		; continuation of program

	include	lbrhlp4		; misc routines

	 if	uncr
	include	lbrhlp5		; uncrunch routines

	 else
	include	lbrhlp6		; unsqueeze routines
	 endif

	include	lbrhlp7		; data

	end