R:Morrow Designs Micro-Menu system - Rev 2.5 R:MD-3/3P version Module - MDWORK.PIL without BAZIC R:Copyright 1982, 1983, 1984 Morrow Designs, Inc. R:All Rights Reserved R:Written by Harrison Schreppel for Morrow Designs R:Modified by John VanderWood 3/27/84 *BEGIN ESC:*RETURN CLRS: LF: 3 T: {CREATE A WORKING DISKETTE} LF: 2 T: This operation creates a "working diskette" for any of the T: supplied software. When done, you will have a diskette with all T: the necessary files for a particular application program, and it T: will be installed for your equipment--automatically! In addition, T: your distribution copies of the software will be backed-up, and T: can be put away for safe keeping. T: T: You must have a spare diskette for each of the working disk- T: ettes to be created. The diskette doesn't have to be blank, but T: any information on it will be erased. To create a complete set of T: diskettes, you'll need 14 spares. T: T: T: Press{RETURN}when you're ready to go, or TNR: Press{ESC}to go back to the Main Menu. A: *MAIN U:*MSG *SELECT CLRS: LF: 4 T: Following is a list of the programs included with your Micro T: Decision. To create a working diskette containing one of these T: programs, enter its number after the "Option" prompt. LF:2 T: {1} NewWord & Correct-It T: {2} SuperCalc T: {3} Correct-It only T: {4} Personal Pearl T: {5} Quest T: {6} MBASIC T: {ESC} Return to{MAIN MENU} T: {R} Review instructions T: *ACTION CUR:0,19 TNR: CUR:0,19 TNR: {Option: INMAX:1 A: M:1,2,3,4,5,6,R, BELLN: JN:*ACTION T:{ M:R JY:*MAIN CLRS: M:1 JY:*NEWWORD M:2 JY:*SUPERCALC M:3 JY:*CORRECTIT M:4 JY:*PEARL M:5 JY:*QUEST M:6 JY:*MBASIC *NEWWORD LF: 7 T: T: For convenience, {the spelling checker "Correct-It" will also be placed T: on your NewWord Working Diskette.} You will need a spare disk, the NewWord T: Distribution Diskette, and the Correct-It Distribution Diskette before T: continuing. T: TNR: Press any key to continue: INMAX: 1 A: CLRS: LF: 2 T: Before NewWord 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. If you have no idea how to respond and no-one is T: around to help, select "2 Draft Printer." T: T: {1} Simple {8} NEC Spinwriter 2000 series T: {2} Draft printer {9} NEC Spinwriter 3500 series T: {3} Typewriter printer {10} NEC Spinwriter 5500 series T: {4} Qume Sprint 11 {11} Okidata Microline 84 (step 2) T: {5} Silver Reed EXP550 {12} Okidata models 92/93 T: {6} Diablo 1610/20/40/50 {13} Epson MX80/100 & FX80/100 T: {7} Diablo 630 {14} C.Itoh Prowriter T: T: {15 Morrow's MP100/200/300 series} *NWLOOP1 CUR:0,20 T: CUR:0,20 TNR:}Please select your printer and press RETURN: { INMAX:3 A: #ptr M: 1 , 2 , 3 , 4 , 5 , 6 , 7 , 8 , 9 , 10, 11, 12, 13, 14, 15, BELLN: JN:*NWLOOP1 *NWLOOP2 CUR:0,20 TNR: CUR:0,20 TNR:}You selected printer number{#ptr.} Is that correct? Type{Y}or{N}: INMAX: 1 A: M:Y,N BELLN: JN:*NWLOOP2 M:N JY:*NWLOOP1 CASE (#ptr):*1,*DRAFT,*3,*4,*5,*6,*7,*8,*9,*10,*11,*12,*13,*14,*15 *1 DEF: $PRINT byanxn J:*SELTERM *2 DEF: $PRINT bybnxn J:*SELTERM *3 DEF: $PRINT bycnxn J:*SELTERM *4 DEF: $PRINT bydnxn J:*SELTERM *5 DEF: $PRINT byenxn J:*SELTERM *6 DEF: $PRINT byfnxn J:*SELTERM *7 DEF: $PRINT bygnxn J:*SELTERM *8 DEF: $PRINT byhnxn J:*SELTERM *9 DEF: $PRINT byinxn J:*SELTERM *10 DEF: $PRINT byknxn J:*SELTERM *11 DEF: $PRINT bylnxn J:*SELTERM *12 DEF: $PRINT bymnxn J:*SELTERM *13 DEF: $PRINT bynnxn J:*SELTERM *14 DEF: $PRINT byonxn J:*SELTERM *15 DEF: $PRINT byenh3a'M'o'r'r'o'w' 'M'P'1'0'0'/'2'0'0'/'3'0'0' 'S'e'r'i'e's' 'P'r'i'n't'e'r0D0A00.xxxn J:*SELTERM *SELTERM DEF: $MDL 'M'i'c'r'o' 'D'e'c'i's'i'o'n' 'L'e'v'e'l' c:a=@9-3 j(a):*lvl4nw c:a=a+1 j(a):*lvl3nw c:a=a+1 j(a):*lvl2nw c:a=a+1 j(a):*lvl1nw C:a=a+1 j(a):*lvl0nw *lvl4nw def: $TERM ayonha$MDL 'I'V' 'T'e'r'm'i'n'a'l0d0a00xx j:*install *lvl3nw def: $TERM ayonha$MDL 'I'I'I' 'T'e'r'm'i'n'a'l0d0a00xx j:*install *lvl2nw def: $TERM aynnha$MDL 'I'I' 'T'e'r'm'i'n'a'l0d0a00xx j:*install *lvl1nw def: $TERM ayrnha$MDL 'I' 'T'e'r'm'i'n'a'l0d0a00xx j:*install *lvl0nw def: $TERM ayknha$MDL '0' 'T'e'r'm'i'n'a'l0d0a00xx j:*install *DRAFT CLRS: LF: 6 T:} T: With{2}, your printer is going to be installed as a {DRAFT PRINTER.} T: This will be fine for general-purpose printing; however, there may T: be some printing features (like superscripting) that will not work T: unless you reinstall NewWord with the NWINSTAL.COM program. Refer T: to the{Nuts & Bolts}section of the NewWord User's Guide for details T: on reinstalling NewWord for a specific printer. A briefer discus- T: sion of the same topic appears in the Correct-It User's Guide. LF:2 TNR: Press any key to continue: { INMAX: 1 A: J:*2 *install CLRS: LF:11 T:{Insert the SPARE diskette in the UPPER drive and close the latch. TNR: Press any key when you're ready: INMAX: 1 A: T: T: Stand by. . . CPM:format b d;pip;B:=pip.com;B:=key.com;B:=stat.com;;sysgen;a;b;; DEF: $DISK NewWord DEF: $EXISTFILE nwinstal.com C:n=@8-1 U(n):*3DRIVES J(n):*NWCONT U:*EXIST *NWCONT CLRS: LF: 11 T: Okay, that looks like the NewWord Distribution diskette. TNR: We'll switch diskettes again in a second. Stand by. . .{ LF: 7 CPM:B:;pip B:=C:*.*;B:;era nw.key;ren nw.key=nw2.key;nwinstal;nwu;nw;$TERM$PRINT;A: C:a=@9-2 DEF(a):$NWAUTO key nw J(a):*NWCPM DEF:$NWAUTO nw *NWCPM CPM:pip B:=return.com;era B:nwinstal.com;era B:nwu.com;auto *B: $NWAUTO; *LOOPB CLRS: LF:2 T:{ T:Now when your lower drive is reassigned as drive C, insert the CORRECT-IT T:Distribution Diskette. ----------} T: T:Drive A is still the CP/M System Diskette. T:Drive B is still the spare (working) diskette.{ EXIST: C:correct.com JY: *CORRECT T:} T:That appears to be the wrong diskette. Please be sure that drive C con- T:tains the Correct-It Distribution Diskette. T: TNR:Type any key to switch back to drive A (The CP/M System disk): { INMAX: 1 A: CPM: J: *LOOPB *CORRECT T:} T:Okay, that looks like the Correct-It diskette. TNR:We'll switch diskettes again in a second. Stand by. . .{ CPM:pip B:=C:*.* C:x=@9 J(x):*NWDONE CLRS: LF: 6 T:}Since you selected "None of the above" at the Terminal Selection Menu back T: when you created your CP/M System Diskette, NewWord has been installed for T: a Level 0 or "Minimum" terminal. It's likely that you'll be able to get T: more efficient performance from your terminal by later running the NewWord T: installation program "NWinstal". See the pamphlet "Special Instructions T: for NewWord and Correct-It" for instructions. T: TNR:{Press any key to continue: INMAX: 1 A: *NWDONE CLRS: LF: 10 T:{Your working diskette for NewWord and Correct-It is now finished. Put the T: Distribution copies away in a safe place. T: TNR: Press any key to return to the Create Working Disks Menu: } INMAX: 1 A: J:*SELECT *SUPERCALC DEF: $DISK SuperCalc DEF: $EXISTFILE sc.com C:b=@8-1 U(b):*3DRIVES J(b):*SCCONT U:*EXIST *SCCONT CLRS: LF:11 T: Okay, that looks like the right diskette. We'll switch diskettes T: again in a moment. {Be sure the upper drive has the SPARE disk- T: ette in it.} T: TNR: Press any key to continue: { INMAX: 1 A: c:x=@9 J(x):*SCCPMS CLRS: LF: 4 T:}Because you selected "None of the Above" at the Terminal Selection Menu back T: when you created your CP/M System Diskette, SuperCalc will NOT be installed T: automatically in the following operation. Later on, you will need to run the T: program INSTALL.COM on your SuperCalc Working Disk to set it up for your own T: terminal. {See page B-14 in the SuperCalc User's Guide.} T: TNR: Press any key to continue: { INMAX: 1 A: CPM:format b d;;pip b:=C:*.*; DEF:$PROG sc DEF:$DISK SuperCalc J:*COMPLETE *SCCPMS CPM:format b d;pip B:=C:*.*;B:;era sc.key;ren sc.key=sc2.key;A:; C:a=@9-3 J(a):*lvl4sc C:a=a+1 J(a):*lvl3sc C:a=a+1 J(a):*lvl2sc j:*lvl1sc *lvl4sc DEF: $PROG key sc CPM:B:;scinst;y;oyay;A: J:*COMPLETE *lvl3sc DEF: $PROG key sc CPM:B:;scinst;y;g1ay;A: J:*COMPLETE *lvl2sc DEF: $PROG sc CPM:B:;scinst;y;g1ay;A: J:*COMPLETE *lvl1sc DEF: $PROG sc CPM:B:scinst;y;f1ay;A: J:*COMPLETE *CORRECTIT CLRS: LF: 7 T:{This operation will create a Correct-It Working Diskette. Correct-It is T: probably already present on any NewWord Working Diskettes you have created. T: Diskettes made with this selection will have nothing but Correct-It on them. T: T: Label a spare diskette "Correct-It Working Diskette" and place it in the T: UPPER drive. Do that now. T: TNR: }Press any key when you're ready:{ INMAX:1 A: CPM:format b d DEF: $EXISTFILE correct.com DEF: $PROG correct DEF: $DISK Correct-It C:b=@8-1 U(b):*3DRIVES J(b):*CORCONT U:*EXIST *CORCONT CLRS: LF: 9 TNR:Okay. }That looks right to me. Stand by. . .{ CPM:pip B:=C:*.*; J:*COMPLETE *PEARL CLRS: LF:4 T: }Personal Pearl is a very powerful application program. In making it so T: versatile however, you are faced with a lengthy installation procedure. T: We have made this procedure as clean and straight-forward as possible. T: If you follow all the instructions, you will end up with a personalized T: working copy of the Personal Pearl data base management program. T: T: Be forewarned that you'll have nine diskettes to keep track of, and you T: will be swapping them in and out of both drives. {So label the diskettes T: properly and read the screen instructions carefully!} T: T: You will need SIX spare diskettes and about 30 minutes of spare time. If T: you do not want to make working copies of Personal Pearl now, press ESC. T: TNR: {Press anything else to keep going: } INMAX: 1 A: CLRS: LF: 5 T:} T: Before getting started, you should label the six diskettes{exactly}as T: shown here: T:{ T: Pearl Backup Master ##1 T: Welcome and File Maintenance T: Starter Library T: Sort Data T: Design Forms and Reports T: Print Reports and Enter Data} T: T: Next you'll format each of the six to prepare them for use. For the T: next few minutes, all diskette swaps will be in and out of the UPPER T: drive. Leave the CP/M System Diskette in the lower drive. T:{ TNR: After}labelling the diskettes, press any key to proceed:{ INMAX:1 A: DEF: $NAME Pearl Backup Master ##1 U: *LOOPF DEF: $NAME Welcome and File Maintenance U: *LOOPF DEF: $NAME Starter Library U: *LOOPF DEF: $NAME Sort Data U: *LOOPF DEF: $NAME Design Forms and Reports U: *LOOPF DEF: $NAME Print Reports and Enter Data U: *LOOPF J: *MASTBKP *LOOPF CLRS: LF: 5 T: }Insert the{$NAME}diskette into the UPPER drive and TNR: close the latch. Press any key when you're ready: { INMAX: 1 A: CPM:format b d;sysgen;a;b;;pip B:=return.com; E: *MASTBKP CLRS: LF: 3 T: {Insert the disk you labelled PEARL BACKUP MASTER ##1 into the UPPER drive T: and close the latch.} Do that now. T: TNR: Press any key when that's done: INMAX: 1 A: DEF: $DISK Personal Pearl ##1 of 2 DEF: $EXISTFILE welcome.com C:b=@8-1 U(b):*3DRIVES J(b):*PEARLCONT U:*EXIST *PEARLCONT CLRS: LF:2 T:}Okay. Everything looks good so far. Stand by. . .{ T: CPM:pip B:=C:*.*; CLRS: LF: 7 T: T: {Next I need you to type your name exactly as you would like it to appear on T: Personal Pearl screens. It can be up to thirty characters, and THERE MUST T: BE AT LEAST ONE SPACE IN IT.} *PRLLOOP1 CUR:0,13 T: ______________________________ CUR:0,13 TNR: Type your name and press RETURN: { INMAX:30 A: $NAME *PRLLOOP2 CUR:0,15 T: }You have entered your name as{$NAME}. T: }Is it{exactly}as you want it, TNR: and is there a space in it? Type{Y}or{N}: INMAX:1 A: M:Y,N JN:*PRLLOOP2 M:Y JN:*PRLLOOP1 CLRS: c:a=@9-2 DEF(a): $ter 5 j(a):*doit c: a=a+1 DEF(a): $ter 2 j(a):*doit DEF: $ter 1 *doit CPM:B:;ren install.dat=instalf.dat;welcome;$ter;p;2;$name;y;A: *PIPS CLRS: LF: 2 T: }Okay! Good work! T: T: {Put the Pearl Distribution Diskette ##1 of 2 away where it is safe and won't T: confuse you. From here on your master diskettes are PEARL BACKUP MASTER ##1 T: and PEARL DISTRIBUTION ##2 OF 2.} T: T:} In the messages that follow, when you see{"Your lower drive is being reas- T: signed as drive C,"} this means to insert {PEARL BACKUP MASTER ##1} into the T: {LOWER}drive (it's probably still in the upper drive right now). T: T: When the lower drive is reassigned as{drive A,}put the{CP/M SYSTEM DISKETTE} T: back in. Got it? You may want to jot that down. T: T: Let's give it a try: T:{ EXIST:C:install.dat JY: *OK T:} T: That appears to be the wrong diskette. Be sure it's BACKUP MASTER ##1. TNR: Press any key to continue: INMAX: 1 A: T: J: *PIPS *OK CLRS: LF: 2 T:} T: That looks like the right diskette. You'll be switching diskettes several T: times in the next few minutes, so don't be surprised. T: T: Insert the diskette labelled {Welcome and File Maintenance}into the {UPPER} TNR: drive and close the latch. Press any key when you're ready: INMAX: 1 A: CLRS: CPM:pip;B:=C:welcome.*;B:=C:pearl.a00;B:=C:pearlfm.*;B:=C:prlhelp.txt;B:=C:install.dat;; CLRS: LF: 7 T:{ Remove the Welcome and File Maintenance Diskette from the upper drive and T: set it aside. You're finished with it for now. T: T: Then insert the SORT DATA Diskette in the UPPER drive.} Do that now. T: TNR: Press any key when you're ready: { INMAX: 1 A: CLRS: CPM:pip B:=C:psort.*; CLRS: LF: 7 T: }Still there? Good! Remove the Sort Data Diskette from the upper drive and T: set it aside; you're done with it now. T: T: Next, insert the DESIGN FORMS AND REPORTS Diskette in the UPPER Drive.} Do T: that now. T: T: Is a pattern emerging? Don't get too bored; things will change in a TNR: minute. . . Press any key when you're ready: { INMAX: 1 A: CLRS: CPM:pip;B:=C:pearl.a00;B:=C:prlhelp.txt;B:=C:pearldf.*;B:=C:pearldr.*;B:=C:pearli.*;; CLRS: LF: 7 T: {Remove the Design Forms and Reports Diskette and insert the PRINT REPORTS T: AND ENTER DATA Diskette in the UPPER DRIVE.} Do that now. T: TNR: Press any key when you're ready: { INMAX: 1 A: CLRS: CPM:pip;B:=C:pearl.a00;B:=C:prlhelp.txt;B:=C:pearlpr.*;B:=C:pearled.*;; *LOOPG CLRS: LF: 5 T: }Thus ends Phase I. For Phase II, you need PEARL DISTRIBUTION MASTER ##2 T: of 2. Unless you have four disk drives,{whenever you see "..reassigned T: as drive D" (D now, not C), this means "Put the MASTER ##2 IN THE LOWER T: DRIVE. Okay?} T:} T: A quick test run: T:{ EXIST:D:pearli.lib JY: *OK1 T:} T: That appears to be the wrong diskette. Be sure it's number 2 of 2, and that TNR: it's for Personal Pearl. Press any key to continue: INMAX: 1 A: J: *LOOPG *OK1 CLRS: LF: 7 T:} T: Okay. Looks like you're getting to be a real pro. You won't need Backup T: Master ##1 anymore, so put it somewhere out of the way. T: T: {Leave the PRINT REPORTS AND ENTER DATA Diskette in the UPPER DRIVE. If you T: already removed it, put it back. Do that now.} T: TNR: Press any key when you're ready: { INMAX: 1 A: CLRS: CPM:pip;B:=D:pearled.*;B:=D:pearlpr.*;; CLRS: LF: 7 T: Remove the Print Reports and Enter Data Diskette and insert the DESIGN FORMS T: AND REPORTS Diskette in the UPPER DRIVE. Do that now.} T: TNR: Press any key when you're ready: { INMAX: 1 A: CLRS: CPM:pip;B:=D:pearli.*;B:=D:pearldf.*;B:=D:pearldr.*;; CLRS: LF: 7 T: {Now remove the Design Forms and Reports Diskette and insert the STARTER T: LIBRARY Diskette in the UPPER Drive.} Do that now. T: TNR: Press any key when you're ready: { INMAX: 1 A: CLRS: CPM:pip;B:=D:*.?00;B:=D:*.dir;; CLRS: LF: 7 T: {Will the wonders never cease! Just when you least expect it, you find T: YOU'VE FINISHED creating Personal Pearl Working Diskettes! T: T: The one labelled Backup Master ##1 now serves no purpose; it's just part T: of this process. The two Distribution Diskettes are not used either, T: unless you need to create a new set of working disks. T: TNR: }Press any key to return to the Create Working Diskettes Menu: { INMAX: 1 A: J: *SELECT *QUEST CLRS: T: T:}You have two choices here. If you have just received your system you must T: first create your working Instructional disks (Option 1). This option is T: used for demonstration and training purposes only. T: T: When you are ready to set-up your company data and put Quest to work for T: you, you will need to create a new "Data" Disk. The procedure in Option 2 T: will guide you through the necessary steps to do this. You must have sent T: in your registration to Quest Inc. See your Quest manual for information T: about registering your copy of Quest. T: T: {1} Create Quest Instructional Diskettes T: {2} Create Quest (registered) Data Diskettes T: {R} Return to previous menu T: T:{OPTION:} *questloop CUR:10,15 T: CUR:10,15 INMAX:1 A: M:1,2,R, BELLN: JN:*questloop M:R JY:*SELECT M:1 JN:*production CLRS: LF:8 T: Creating a Demonstration copy of Quest requires three blank diskettes. T: Label the three blank diskettes as: T: T: {1} Instructional Disk T: {2} Posting Disk T: {3} Reporting Disk T: TNR: Press{RETURN}to proceed, AFTER you have labelled the diskettes: A: CLRS: LF: 8 T: Insert the diskette you just labelled "Instructional" disk in your UPPER T: disk drive, and press RETURN when you're ready. T: TNR: {DO NOT PUT YOUR DISTRIBUTION DISK IN THE DISK DRIVE!} A: TNR:{ C:a=@9-2 DEF(a):$KPAUTO key kp J(a):*KPCPM DEF:$KPAUTO kp *KPCPM CPM:FORMAT B D;SYSGEN;A;B;;AUTO *B: $KPAUTO;PIP;B:=KEY.COM;B:=A:RETURN.COM;; CLRS: LF: 8 T: }Insert the diskette you labelled "Posting" disk in your UPPER disk drive, TNR: and press RETURN when you're ready: { A: CPM:FORMAT B D CLRS: LF: 8 T: }Insert the diskette you labelled "Reporting" disk in your UPPER disk TNR: drive, and press RETURN when you're ready: { A: CPM:FORMAT B D CLRS: LF: 4 T: }Now take the diskette you labelled "Instructional" disk, and place it in T: your UPPER disk drive. T: T: When your lower disk drive is re-assigned to be "drive C," insert the disk T: labelled {Quest DISTRIBUTION Diskette...Instructional (Data) Disk} in your T: LOWER drive and press RETURN. T: T: When the lower drive is assigned back as drive A, remove the Distribution T: disk and replace it with your{CP/M System Diskette. }Then press RETURN. T: TNR: Got it? Okay; press RETURN when you're ready to continue: { A: CLRS: CPM:PIP B:=C:*.*; DEF: $QUEST POSTING U: *questcopy TNR:{ CPM:BACKUP| DEF: $QUEST REPORTING U: *questcopy TNR:{ CPM:BACKUP| CLRS: LF: 8 T: { You now have an instructional copy of the Quest Bookkeeper system. T: Place your distribution diskettes away in a safe place.} T: TNR: Press RETURN to return to the Create Working Diskettes Menu: A: J:*SELECT *questcopy CLRS: LF: 6 T: }Now, insert the diskette you labelled $QUEST disk in your UPPER disk T: drive. You will be asked to insert a {SOURCE}diskette in drive A (your T: lower disk drive). When this request is made, insert your{DISTRIBUTION} T: copy of the quest $QUEST disk in your LOWER drive, and press RETURN. T: TNR: Press RETURN to continue: { A: E: *production CLRS: LF: 6 T: }You will need two blank diskettes. One of the blank diskettes will only T: be used for making the production diskette, and should be labelled as T: {"TEMPORARY INSTRUCTIONAL".} The other blank diskette will become the T: Production disk for your company, and should be labelled {"PRODUCTION".} T: T: After labelling the diskettes, insert the blank {PRODUCTION} diskette in TNR: your UPPER drive, and press RETURN when you're ready: { A: C:a=@9-2 DEF(a):$KPAUTO2 key kp J(a):*KPCPM2 DEF:$KPAUTO kp *KPCPM2 CPM:FORMAT B D;SYSGEN;A;B;;AUTO *B: $KPAUTO2;PIP;B:=A:RETURN.COM;B:=A:KEY.COM;; CLRS: LF: 10 T: }Please make sure that your printer is turned on and is on-line. T: TNR: Press RETURN after you do that: { A: CLRS: LF: 10 T: }Insert the blank{TEMPORARY INSTRUCTIONAL}diskette in the UPPER drive, and TNR: press RETURN when you're ready: { A: CPM:FORMAT B D; CLRS: LF: 3 T: }Leave the TEMPORARY INSTRUCTIONAL diskette in the upper drive, and go get T: your{distribution}copy of the disk that Quest calls{"Instructional (Data) T: disk".} T: T: Remember? You said you would put it in a safe place. Go get it now. T: T: When we continue, you will be asked to put a{SOURCE}diskette in drive A. T: At that time, put your{DISTRIBUTION COPY}of the Quest Instructional (DATA) T: disk in your LOWER drive, and press RETURN. T: TNR: Press{RETURN}when you're ready to continue: { A: CPM:BACKUP|SYSGEN;A;B;;PIP B:=A:RETURN.COM; CLRS: T:} Now, take the {TEMPORARY INSTRUCTIONAL}diskette out of the UPPER drive, and T: insert the diskette you labelled{PRODUCTION}in the drive instead. T: T: As we continue, you will be asked to insert your{WORKING}diskette for Quest T: in drive A. At that point, insert the diskette you labelled as {TEMPORARY T: INSTRUCTIONAL}into the LOWER drive instead, and follow with a RETURN. This T: will cause Quest to create a production version of itself for your company. T: T: The Quest installation program that is about to run will say that you must T: have the Quest Instructional disk in drive A, and a newly configured CP/M T: System Diskette in Drive B. {Ignore that message.} The placement of disks T: in the drives is as follows: T: T: {DRIVE B (UPPER)} -- This should now have the diskette you labelled T: {PRODUCTION.} T: T: {DRIVE A (LOWER)} -- When told to insert your{WORKING}diskette for Quest in T: drive A, you must insert the diskette you labelled as T: {TEMPORARY INSTRUCTIONAL.} T: TNR: When you are ready to continue, press RETURN: A: CPM:PAUSE KINS QUEST|PIP B:=A:KP.KEY;KINS|B:RETURN| CLRS: LF: 5 T: }You now have a completed Quest PRODUCTION data disk for your company. The T: TEMPORARY INSTRUCTIONAL disk is no longer needed. T: T: You'll still use the same Posting and Reporting working as before. T: TNR: To return to the Create Working Diskettes Menu, press RETURN: { A: J:*SELECT *MBASIC DEF: $DISK MBASIC DEF: $EXISTFILE mbasic.com DEF: $PROG mbasic CLRS: LF: 10 T:}Be sure the spare diskette is in the upper drive. TNR: Press any key when you're ready: { INMAX: 1 A: CPM:format b d; C:b=@8-1 U(b):*3DRIVES J(b):*BASCONT U:*EXIST *BASCONT CLRS: LF: 3 T:}Okay. That looks right to me. Stand by; we'll switch diskettes again in TNR: a minute. . .{ T: CPM:PIP;B:=pip.com;B:=stat.com;B:=C:MBASIC.COM;B:=C:OBASIC.COM;B:=C:RANTEST.BAS;; J:*COMPLETE *MSG C:A=@8-1 U(A):*DRIVE3 E(A): C:A=A+1 U(A):*DRIVE2 E(A): U:*DRIVE1 E: *DRIVE1 CLRS: LF:5 T:}Evidently you responded "1" when asked earlier how many disk drives you have. T: Since Morrow no longer sells single-drive systems, I suspect you made a T: mistake. If so, start over by creating a new CP/M System diskette, giving T: the actual number of drives this time. Recycle this diskette if you like. T: TNR: Press{[RETURN]}to continue: { A: E: *DRIVE2 CLRS: T: T: }You have a two-drive Micro Decision. Because of this, when T: creating working diskettes, {Drive A}will be re-assigned at times T: to become {Drive C.} It is very important that you place the T: correct diskette in the LOWER drive when it is re-assigned. T: T: Whenever I re-assign the drive to be {Drive A}, place T: your{CP/M SYSTEM DISKETTE}in the LOWER drive. T: T: Whenever I re-assign the drive to be {Drive C}, place T: your{DISTRIBUTION} diskette in the drive. Which Dis- T: tribution diskette to use will vary. T:{ T: Drive B} (upper drive) should always have the {SPARE} T: disk in it. The spare diskette becomes your Working T: Diskette. LF:2 TNR: Press any key to continue: INMAX: 1 A: E: *DRIVE3 CLRS: LF: 5 T:}Since you have at least three disk drives, your procedure for creating work- T: ing diskettes is relatively simple. T:{ T: o Drive A always holds the CP/M System Diskette. T: o Drive B holds the SPARE diskette that becomes the working diskette. T: o Drive C holds the appropriate DISTRIBUTION diskette. T: TNR:}Press{[RETURN]}to continue: { A: E: *EXIST CLRS: LF:2 T:} T:Remember, when you see "Your lower drive is is being re-assigned as{drive C}, T:this means Insert the $DISK Distribution Diskette. When it is T:re-assigned as{drive A}, insert the CP/M System Diskette. In summary:{ T: T: Drives A and C are both the LOWER drive. T: Drive A is for the CP/M System Diskette; T: Drive C is for the $DISK Distribution Diskette. T: T: Drive B (the upper drive) always holds the SPARE diskette.} LF:2 T:First we'll switch diskettes twice, to make sure we understand each other.{ T: EXIST: C:$EXISTFILE EY: CLRS: LF: 10 T: {That appears to be the wrong diskette. Be sure drive C contains the T: $DISK Distribution Diskette.} T: TNR: Press any key to switch back to drive A (the CP/M System disk): { INMAX: 1 A: CPM: J:*EXIST E: *3DRIVES CLRS: LF: 7 T:}Place the SPARE Diskette in Drive B. T:}Place the $DISK Distribution Diskette in drive C. T: TNR: Press any key when you're ready: { INMAX: 1 A: EXIST: C:$EXISTFILE EY: CLRS: BELL: LF: 5 T:{I'm afraid that doesn't look like the right diskette in drive C. CPM: T: To review the instructions, press{[RETURN]}: INMAX: 1 A: J:*3DRIVES *COMPLETE CPM:pip B:=key.com;sysgen;a;b;;auto *B: $PROG;pip B:=return.com; CLRS: LF:7 T:}You now have a{$DISK}working diskette. Make sure to label it T: accordingly. T: T: Put the Distribution copy away for safe keeping. You shouldn't need it T: unless something happens to the working copy you just made. T: TNR: Press{RETURN}to go back to the Create Working Diskettes menu: { INMAX:1 A: J:*SELECT *RETURN CLRS: LF:11 TNR:{Returning to the Main Menu, please stand by. . . CH: micro