R:Morrow Designs Micro-Menu system - Rev 2.3
R: hard disk version
R: Module - MDINST.PIL
R: Copyright 1982, 1983 Morrow Designs, Inc.
R: All Rights Reserved
R: Written by P. Ledbetter for MD11
R:
ESC:*return
CLRS:
*SELECT
CLRS:
LF:1
T:		   {INSTALLING APPLICATION SOFTWARE}
T:
T: Following is a list of the programs included with your  Micro 
T: Decision. Not all software supplied with your Micro Decision 
T: needs to be "installed". The software that needs to be installed
T: appears in the list below. You should install any program you
T: plan on using. To install a particular application software
T: package, enter it's number after the {OPTION} prompt.
LF:2 
T:   {1}   WordStar
T:   {2}   LogiCalc
T:   {3}   Personal Pearl
T:   {4}   Backfield	
T: {ESC}   Return to main menu
T: 
T: {OPTION}:
*action
cur: 11,17
inmax:1
a:
m: 1 , 2 , 3 , 4,
jn:*action
CLRS:
M:1
JY:*wordstar
M:2
JY:*logicalc
M:3
JY:*pearl
M:4
JY:*backfield
	
*wordstar
def: $NAME WordStar
def: $INSTALL INSTWS
def: $PROG WS
CLRS:
LF:2
T:			{INSTALLING WORDSTAR}
T:
T: Before WordStar can be installed for your system, you must select your
T: printer type from the list below. If you are not sure what to choose,
T: talk to your dealer.
T:
T:      Printer Selection Menu	        
T:      ----------------------
LF:2
T:	1.  Morrow printer
T:	2.  Any "teletype-like" printer
T:	3.  "Teletype-like" printer that can BACKSPACE
T:	4.  DIABLO 1610/1620 daisy wheel printer
T:	5.  DIABLO 1640/1650/630/Xerox 1700 series daisy wheel printer
T:	6.  QUME Sprint 5 daisy wheel printer
T:	7.  NEC Spinwriter 5510/5520 thimble printer
T:	8.  None of the above
T:	R.  Return to installation menu
LF:1	
T:     Enter selection: 
*again
CUR: 26,22
INMAX: 1
A:
M: 1,2,3,4,5,6,7,8,R,
JN:*again
M: R
JY:*SELECT
M: 1
JY: *1print
M: 2
JY: *2print
M: 3
JY: *3print
M: 4
JY: *4print
M: 5
JY: *5print
M: 6
JY: *6print
M: 7
JY: *7print
M: 8
JY: *8print
*1print
def: $PRINT eynylyyyx
J:*selterm
*2print
def: $PRINT aynylyyyx
J:*selterm
*3print
def: $PRINT cynylyyyx
J:*selterm
*4print
def: $PRINT dynylyyyx
J:*selterm
*5print
def: $PRINT eynylyyyx
J:*selterm
*6print
def: $PRINT fynylyyyx
J:*selterm
*7print
def: $PRINT gynylyyyx
J:*selterm
*8print
def: $PRINT aynylyyyx
J:*selterm
*selterm
c:a=@9-2
j(a):*lvl3ws
c:a=a+1
j(a):*lvl2ws
c:a=a+1
j(a):*lvl1ws
*lvl3ws
def: $TERMINAL yycy
j:*install
*lvl2ws
def: $TERMINAL yyky
j:*install
*lvl1ws
def: $TERMINAL yyay
j:*install
*install
CPM:instws;$TERMINAL$PRINT;
J:*complete

*logicalc
def: $PROG LC
def: $NAME LogiCalc
def: $INSTALL LCSET
clrs:
lf:2
t:			{INSTALLING LOGICALC}
t:
c:a=@9-2
j(a):*lvl3lc
c:a=a+1
j(a):*lvl2lc
c:a=a+1
j(a):*lvl1lc
*lvl1lc
cpm:ren termcap.sys=termcap1.sys;era termcap2.sys;era termcap3.sys;
j:*complete
*lvl2lc
cpm:ren termcap.sys=termcap2.sys;era termcap1.sys;era termcap3.sys;
j:*complete
*lvl3lc
cpm:ren termcap.sys=termcap3.sys;era termcap1.sys;era termcap2.sys;
j:*complete

*pearl
DEF: $PROG PEARL
DEF: $NAME Personal Pearl
DEF: $INSTALL WELCOME
EXIST:A:WELCOME.COM
JN:*backuppearl
*backuppearl
CLRS:
LF:2
T:			{INSTALLING PERSONAL PEARL}
LF:2
T:	After the terminal installation, you will be presented with three 
T:	choices.  Personalize, Demonstrate, or Exit. Feel free to try the
T:	demonstration out. It's sort of a "test drive" if you will.  When
T:	you have satisfied  your  curiosity,  select   the "P" option  to 
T:	Personalize Pearl. This will allow Personal Pearl to complete the
T:	job you so innocently started.
T:
T:	Because we  have started  the installation for you,  when Pearl's
T:	installation is being performed, you will see messages saying:
T:		can not copy from A to A and
T:		PLACE XX DISTRIBUTION DISKETTE IN DRIVE A AND PRESS RETURN
T:	Ignore the messages, and press return when asked to change diskettes.
T:
c:a=@9-2
j(a):*lvl3pp
c:a=a+1
j(a):*lvl2pp
c:a=a+1
j(a):*lvl1pp
*lvl1pp
cpm:welcome;1|
j:*complete
*lvl2pp
cpm:welcome;2|
j:*complete
*lvl3pp
cpm:welcome;5|
J:*complete 

*backfield
DEF: $PROG BACKFIELD
DEF: $NAME BACKFIELD
CLRS:
LF:10
T: Insert Backfield diskette in the floppy drive.
T: Press {RETURN} when ready.
INMAX:1
A:
CPM:PIP;C:=A:SYSGEN.COM;C:=A:MOVCPMH.COM;C:=A:AUTO.COM;C:=A:BOOTHD.COM;C:=A:IMS.COM;;SYSGEN MOVCPMF.COM;C;;AUTO *C IMS %^SYSGEN MOVCPMH.COM%B%%AUTO *B IMS !@AUTO!C:RESTORE!%BOOTHD%; 
CLRS:
LF:10
T:Backfield diskette ready for use to RESTORE hard disk.
LF:2
T:Press {RETURN} to go back to the installation menu.
inmax:1
a:
J:*SELECT


*complete
CLRS:
CUR:0,12
T:Function complete.
T:You have installed the system for $NAME.}
CUR:13,18
T:Press{RETURN}to go back to the installation menu.
inmax:1
A:
J:*SELECT

*return
CLRS:
T:Returning to main menu, please stand by...
CPM:ERA INIT.PIL;AUTO PILOT CPMENU
ch: micro