@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}@ }#  |||DDOS DOSDOS SYS }}}0}}JK"}CDOS SYSB+AUTORUN SYSB-TB B0HP B6GETW B8DIC B;ID B <KEYCOP } 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e}}@(S(@ H}EiͩkΩ͙kCopgj`j {j`Hi͝Νh`,}L"OGOL:D" NUR:I TXEN:))I,I($A(CSA,I+0871 EKOP:01 OT 1=I ROF:"`h"=$A:)01($A MID:)017(KEEP,907 EKOPtlj;k+*opui-=vcbxz436521, .nm/reytwq9078<>fhdgsaLJ:KOPUIVCBXZ$#&%"! NM?REYTWQ()'@FH.}DGSAؠڠà ŠѠȠӠhhhhhϢԆ8 _eԅ/}eՅ`              EYTWQ()'@FHl U S E O F S P E C I A L K E Y S ̠ AND ..... Π -New Para. -End of le 1}tter ˠӠ -Curs. Left-Stop Edit - Tab -Back S/ovrprnt. ӯ-Lower Case-Centre Page 2} Alphabetic -Start Underline -Stop Underline Ԡ AND .... - H E L P ! 3} -Scroll Up ӯ-Upper Case -Scroll Down Alphabetic -Cursor Left Ӡ -Put nul 4}l line -Cursor Right before current-Insert Null ̠ -Null fill -Delete Charc. current line 5} n Insert Item n -Single space Display Item Names PRESS Π TO RESUME EDIT of le x'hhhhh`ˈϤ̈ &٩ԅ`h8өө<ө pi $   pi"  7}Ԍ`Ǡ`J`qi2 ``hhhͥiةϐа8Хϩ wݩХЅԆ`i"  rITEM 1COMPANY NAMEITEM 2ADDRESS LINE 1ITEM 3ADDRESS LINE 2ITEM 4ADDRESS LINE 3ITEM 5ADD.LAST LINEITEM 6CONTACT NAM9}EITEM 7TITLEITEM 8DEAR...ITEM 9TEL No.ITEM 10NOTESITEM 11ITEM 11FLAG 1CL/SU/BO/DE/OTHFLAG 2CONTACT MONTHFLAG 3:}MAILSHOTS Y/NFLAG 4UNALLOCATED 4FLAG 5UNALLOCATED 5LINE 2ITEM 4ADDRESS LINE 3ITEM 5ADD.LAST LINEITEM 6CONTACT NAM9Z0000-9 ONDFLAG 4FLAG 4FLAG 5FLAG 5 3ADDRESS LINE 2ITEM 4ADDRESS LINE 3ITEM 5ADDR LAST LINEITEM 6CONTACT NA   m=M@@A9A(B 3\A@ @ Ay =}((KEYCOP (C) AMAZON SYSTEMS 1981 ]6-6-@'6-@36-A9?6-A(K6-B ];,;@>},==6.3hԅՍ̅ϩ!ύ S`6-A@ (}W ((DISC COPY USES 1 OR 2 ?}DRIVESM( TYPE NO. OF DRIVES OR 0 FOR MENUW A( @ 6-A:, ("A@( )!@ *KK(C}@}PUT A WRITE PROTECT TAB ON THE DISC YOU'RE COPYING FROM.+ A2 A7X&(?OK TO FORMAT DISC ON DRIVEA} 8( ANSWER Y OR NB AX0Y*0y@<A6-?:C:,,F>  ( BAD SECTORS FOUND4(USE A NEB}W DISC.> @ & A0 A&% D:KEYCOPF2& A@ A&% D:KEYWORD1, A"( ON DRIVE C}, A+ A!( ON DRIVE 1+ A;;(3}ԠԠ͠ҠŠàΠҮI2+}CD\66$}@@A9A(]`AF A0 @ @x} @KEYWORD1 MAIN MENU + A0 && I};@@,;@,9@ , +6-A  +;@,;A ,6-@ A!  A"II6 J}.? MAIN PRINTprints labels - two up, 4in wide, 1.5in deep. #NN67@b,.;Print any 7 items from each Client K}record.  6-@ #A A 8,9 A& A'! A(+ A9% D:COMPOSE+ L} A# A$! A%+ A 6 A) A1! A2+ A6%D:MAINW+@%@ A0 M}) A ;-@W(@ s-@s(@Premember to remove your sy N}stem disc and file it carefully...........U-@ U(@2switch off console before attempting to re O}load! A `6- @  #A A 8, %D:UPD%D:SETUP%D:DICUP P} A %D:KEYCOP))* MENU- TABLE-DRIVEN\ TABLE AT 1500  6-(}* B1e"(KEYWORD-1 English langu Q}ageE(Epson/Okidata/Seikosha versione((c) Amazon Systems Dec 1982(CHOOSE AN OPTION:)"-" R}")6-@*"@( "68,-*6-% 6. _6-@6-@% BP2(R( S} INPUT 1 TO & & V_6-B:,/@%6.1 DIGIT, PLEASE/ A5=6-@:,&@H  )!&36. T} OUT OF RANGE= A5T (}6-@!6-@+ BPT($ԠԠԬŠ$$6 U}LETTER PROCESSING,3,920##CLIENT FILE PROCESSING ,3,930MAIN PRINT,3,940DISC COPY,3,996 INSTRUCTIONS,3,9 V}70STOP,3,950@5JFILE UPDATE,1,991TCLIENT FILE SET-UP,0,992^ ITEM NAME ALLOCATION,1,993hRETURN TO W} MAIN MENU,3,20|STOP,3,950] A#AP! A*6-8,6AyV6-@$+%@,%AZ ]$ X}d(}EPSON MX80 II(?(!Bold is used instead of underlineB(d(Backspace does not overprint,0&(but deletes previo Y}us character0 Ap/(}EPSON MX80 III(/(No restrictions. ApE(}OKIDATA M82A (*( No underline Z};( No backspaceE Aph(}SEIKOSHA GP100A (-( No underline>( No backspace^(Line spacing always 6/inch.h A [}p*#(Press to continue'*$4,SEIKOSHA GP100A,3,3EPSON MX80/II ,3,0EPSON MX80/III,3,1 \}OKIDATA M82A,3,2^/('}KEYWORD works with several printers.I(This version uses:^(Seikosha GP100A##(Ep ]}son MX80 types II & IIIZ(OKIDATA M82AS(8Press to choose your printer for today.WZ$j(0@ ^}@$H:,@B0@g0@@$H:,@j$=#(PRESS Π TO CONTI _}NUE':(}***WAIT***=$2$4$9p(}INITIAL INSTRUCTIONS (p(KFirst of all, make sure your KEY i `}s plugged into the left hand controller>TT(Lport on the front of your keyboard....you won't get much further without it! a}C>>(5The disc you bought from us is called the ISSUE DISC.HQQ(H For safety's sake, please be sure to make a copy of b} the ISSUE DISC.R44(+ While you may make as manycopies of it as \RR(Iyou need, always keep the issue disc SPECIFICAL c}LY for makingcopies from. f33(+These copies are called:- SYSTEM DISCS.po(o(dŠŠĠ٠͠Ԡ d}ӪϠŠӠƠŬͬҠĠԠӠ( ( A $$**("}KEYWORD1 e}consists of three parts:k(ҠǺk(JWhich lets you compose letters, store them, retrieve them, edit them f}, and b( print them.b(JIt lets you put 'ITEMS' in the letterswhich indicate where client details,II(Asuch as NAME g}& ADDRESS are to be inserted by the Main Print.oo(gThese letters are stored by KEYWORD on the SYSTEM DISC or on a h}separate LETTER DISC you can create.n"(ԠŠǠn(GWhich you use to build, maintain and inspect a i}file of Client records.QQ(IClient files are NOT stored on the SYSTEM DISC. They use CLIENT DISCS.UU(LITEMS from th j}ese records can be mergedwith letters for mailshot purposes by:L( ΠԺ?(%Which does the bulk printing for yo k}u.B(L A $FILE MAINT $  (}ԠŠ qq(iThe Client File is a collection of l} Client RECORDS, arranged in order of ITEM 1 (usually Client name). II(AEach RECORD consists of ITEM 1, up to 9 other I m}TEMS, and 5 FLAGS. qq(iAll the Flags are always present in a record, and the maximum length of all items together is 101 c n}harcs.$ f(f([͠can be up to 35 characters long, and is used as the Identifier for the record.. X(X(L o}can be up to 27 characterslong, and can contain any information.L U(U(JӠare 1 character fields which are u p}sed by the MAIN PRINT to decideQ BB(:whether or not to include the record in a particular run.[  A $` FILE M q}AINT 2e $j [ [(O}Here is an example of a record. The text in is for clarity: o ( r}ͺκt ((( NAME : Amazon Systemsy ''( ADDR LINE 1 : 4 Flintgrove,| $$( ADDR LINE 2 : s} Bracknell,} --(% ADDR LINE 3 : Berkshire, RG12-2JN~ ""(ADDR LAST LINE : England. --(% CONTACT NAME : Mrs. B.J. t}Williamson ( 'DEAR..' : Beryl ( BUSINESS : S/W (͠ (͠ .. u}(&庠젱󮠠 $$(ǺκǠ ( SALES AREA : C ( MAILSHOT Y v}/N : Y ( Ǡ ( Ǡ ( Ǡ( A  $ ' 6- w}'A% (}CLIENT FILE PROGRAMS. [[(SIf you have not yet set up your Clientfile, that is the first t x}hing you haveto do. ii(`In order to make file processing quickand efficient, the whole file is set up at the beginning, y} //(' with an empty slot for each record. PP(HAt set-up time, we also allocate the names of the items in the records z}. q(q(eOnce the file is set up, you always use the file update program to update/delete/add/inspect ( yo {}ur Client records. ( RR(JUse item name allocation option to change the displayed names of items. ]](UIF YOU HAVE A |}LREADY SET UP YOUR CLIENTFILE, TYPE 'Y'. OTHERWISE, TYPE 'N' &  *6-*B:, @A% >6.7@ }}<@,(4Y)4y46-@> A%# 0N*0nA%% $( $2 g  (} LETTER PROC ~}ESSINGg(AYou can use the word processor to produce both single letters< i( and mail shots.f(HWith single letter }s, type everything that is to go in the letter, thus:i(F l(Mrs B J Williamson,/(Amazon Systems,A( 4 Flintgrove,P( } Bracknell,[(Berks,l(England.P m(21st July 1981.(*( Dear Beryl,=( Re: KEYWORDm(*I am writing to you } to tell you about our Z fc([new product called KEYWORD. I knowyou are interested in new software, and.......etc...etcf }(  A $ $ LL(D}However, for a mail shot, you would compose the letter like this: ` ( 6, }( 1,( 2,'( 3,0( 4,A( 5, 11O( Dear 7,`( Re: KEYWORD 33(*I am writing to you to tell you abo }ut our  OO(Gnew product called KEYWORD. I knowyou are interested in new 8, and... ..(& } N$(Where item 6 is Contact nameN(% items 1-5 are Company name/addr G"( item 7 is salutationG( } and item 8 is a product range. /,($( Items 1-10 are in Client records.)/( JG(?Item 11 is the Date - supply it when } you print the letter.J(  A $ $ $$(} CREATING/EDITING A LETTER y-@@@0( }4 @6-@L6-@V BPy(The text being edited looks a @)(! bit likethis, with str }ipes @((known as nulls.)  S-(%Control characters appear in reverse S(!graphics. eg tab and newline  UU(LO }nly use RETURN when you actually needone. KEYWORD handles line overflow and E#(automatically starts a new >(line when } necessary. E( 6 80((All EDITS are performed on line 19. 8(@ l-@@(2-@@P }6 M(ӠӠŠa-@@Pe i l(J  A $T $^ ##(} MAIN PRINT PRINTS LAB }ELSh {-@@?(#  S-@@{(#    }r 3  3(#  | 6-@6-@% BP9-@@M-@@ }W(k-@@s6-%|!B:,6-  (7<, ( .-@@6-%(!B:,"~}PC R FLIDLIS Blogomaker 8}@@SETUP 0 A P6-F:@,0 A(A0 +@&A(+B7t&A( *A8}@'@@*$0uw #B@+@! A0;0@@@U0@@a6-8}k@w6-ADuk!(YOU ARE USING Ġ -J($A WORD-PROCESSING, RECORD-KEEPING & k(MAILSHOT MANAGEMENT PA:b}%%,$$!-$% /2B(& PRESS FI$$!(}LOAD DISC TO BE COPIED $$D:KEYCOP Ay sFGw;;)}*+{AP@@@@@@@4} BP B@ B0 B@ B`BpBAA A! }6} $}@@@ !"#$$}%&'()*+,-./01234$}56789:;<=>?@AB 11$}CLIENT PROGRAM  (C) AMAZON SYSTEMS 1981 @@6-6-@'6-@36-@?6-@$}K6-@W6-@c6-@o6-@{6-@ 6-@6-BP6-BP@K6-BQ06-B'$}6-B036-B?6-BK6-A77;@r,;,;$,;@5,;@,9,;@5,9@ $},9@,;A%,;@$@(,;@$,;,;@&,;@,;@,;A%,"6. $} #;@ ,(@6-A$6-!6-@2-6-@8668,-@ AG<6.7<, @r6-)6.7<$},3 @r96-<$H> 6- @x 7<,1@&6->67<,.>:@:7<,,&,J 6-A:,"$L+ 6-6-6(67$}<,.>:@:7<,,%,+$N 6- $dREAD IN DICTIONARYf A Ah^ (LOAD SYSTEM DISC, PLEASEE( TYPE 'YE$}S' WHEN YOU'VE DONE THATO BT^ Ai,D:GETW#' ,n0D:DIC"-@$})0xC6-+&,$%6.>:B:,,(67<,.:67%<%@:,,.> C  (} ^ 6-6- ^($}FTHIS PROGRAM IS FOR ADDING, DELETING, OR AMENDING CLIENT FILE RECORDS.SS(K You have 101 characters for items,$} plus 5 flags, in each record.B(B(6SINCE THE DATA WILL APPEAR IN CORRESPONDENCE, pp(hREMEMBER TO USE $} LETTERS FOR MOST OF YOUR DATA, EXCEPT WHERE THERE ARE PROPER NAMES.8(%(PRESS Π TO CONTINUE)$}3 A8DD (}  56-@:7<,,)( }TYPE 7<%,5  OR-- %PRESS TWICE TO RETURN TO $}MENU6-@6-@  6-6-B:,"A*VAL.NAME1 B6-6-# $}' 1 A0 6. A, "6- A@6% D:KEYWORD17Q A(} 6-@,6-@$}0 Q(MOUNT SYSTEM DISC ON DRIVE 186(( TYPE 'YES' WHEN YOU'VE DONE THAT,6 A9% D:KEYWORD1; *MAC= $}B *CL.MENU 6- }6.*FND 1ST REC=Q1$!7<,4%6.7<,&? B  $}"/  NONE FOUND56-? A0 6-:*UP/PRT N/AN @  S   BX. 68,-"@$}$6.1 TO . A`b*RD NX REC=Q1$l B A@v 6-% Ap)  NO MORE"6.$}) Ap6.1 TO  Ap# 6-# PRESS FOR MORE& & TYPE  FOR DETAILS++ #TYPE 'NEW'$} TO ADD A NEW CLIENT HEREEE =TYPE 'STOP' TO LOOK AT ANOTHER PART OF THE FILE OR TO ABANDON##4STOP)4stopA$})4NEW)4new B`) A8 6-B:,"6-$6-*6-. 8 A *VAL.I$->KZ $}B%Ap Ap!Ap 6-8, **CL.DTLS> *RD.R1ZH *U-PKR B&$} B0f *PR.CLz B5%6-@6-@ % BP-- %TYPE 'ALT' TO ALTER, 'DEL' TO DELETE,-- %'N$}EXT' TO CONTINUE, 'STOP' TO ABANDONA4ALT)4alt# Bf- B@7 BuA A114STOP)4NEXT)$}4stop)4nextA)4DEL)4del B) A A"33ROUTINE TO ESTABLISH WHETHER ONE DRIVE OR$} TWO"JJ(B}THESE PROGRAMS CAN BE RUN ON EITHER ONE 810 DISC DRIVE OR TWO."@@(7IF YOU USE TWO DRIVES, THE SYSTEM DISC$}GOES ON DRIVE 1,"..(& WHILE THE CLIENT FILEGOES ON DRIVE 2."hh(_IF YOU ARE USING ONLY ONE DRIVE, AND THE SYSTEM ASKS$} YOU TO LOAD A CLIENT DISC, IT IS OK TO "SS(KREMOVE THE SYSTEM DISC. YOU WILL BE TOLD TO RELOAD IT WHEN IT'S NEEDED.$}#?+(#נ٠ӠϠŠӠſ?(ҠҠ #%416-@% A#6-@02$}A#q2Ap@--@@4(B-@PF q(%ҠŠӠ̠Ġ#N$}-AP 2# &(N(#PRESS Π WHEN YOU'VE LOADED A #&(CLIENT DISC ON DRIVE #&$N( *MacP($}B:, @$U(B:,!@'$W( 6-B:, 6-B:,Z(& 6.6.7<,&4McBPd(6.7<,0Ma$}c$i( 6-&n( FILED UNDER 'MAC'?x( B$(Q67@ ,.267@<@,.M% 86-A$}4McG6-Q B( 6-(-B:,(67<,.7<,(%6-@:7<,,%!@B0( @eB0$}(67<,.>:%@2,( 6-%"' BP( ( 6. $) HOWL")G -AUA6@62@$}@: D2G$,)==SET UP WORD LENGTH FOR DICTIONARY (USED IN 32KB SYSTEM)6)H6-'@%$%&-%B:$},&06-%&>@:7<,,B H6-@)7 6-?:,-%$)F:%AU,- 46.7$)*G$->IZ W.O/P*0 6-6$}--B:,06-@:7<,,&@H * B* "!6-&6-6*4 @6-@$%# +6-$$}16-4$&* ERR6-$0*:**L1Z,H1Z->R2$N* 6- B 67<,.X* 6- B 67<,.b*$*$}*IZ->G$(O/P)* "6.0000$*$6-'B6-'O:,$6-$*K -6-$@:67<,.>:P:,%@H%+&$},$,@6-K6-&P:,*   $**VAL.ITEM1+ 6.+5 6-6- +67%,. TOO SHORT5 B +.!@5$}$67%,. TOO LONG. B*+/ -6-@:7<,,%!A"/ B/+"Bp4+!!@6-%! B$}P>+!@BH+!@dBPM+"BR+!!!@7* @XBPf+"@2BPp+$} B+ "Bp+"AU$+6-A$+c(All upper case.6(Is it OK? Answer yes or no<6$}.F BL6.U6-B:,c"B`+#67%,. TRY AGAIN# B++6-%A(!AU+6-&AV+=6$}7<,.>:,-67%,. DUFF CHARACTERS36-= BP+ 6- $+41Q:,&Q:,!@@*Q:,!@@*Q:, @4$+V ($}}-  R(4FIT THE KEY TO THE LEFT HAND PORT ON YOUR CONSOLEV +  A+ *YES/NO++ 6- $}B:,!!6.7<,+ B`+  ANSWER Y OR N B0+4Y)4yB,4N)4nB , BP$}, 6-,$$,*FND 1st REC=Q1$V, BB``, 6-6-6-j, ***LOOPt, "B~, $}"6-, 6- $, *READ, B`,96.7<, @r6-)6.7<,3 @r96-,-6.7@$$}<@#%B:,,-4Bp, 26- B,B`, 6- B,"B@, 6- $}B`, @q,-6.7@$<@#%B:,,-4Bp, B`- @q --6.7@$<@#$}%B:,,-4B@- 26- B`- B-%%@:7@<@,,"B- 6- B(- 6-$} BP- *OPENx-< BP#6.D0:ID167<,.=:,<-+ -"68,-& +$}-+-B:,7<,/7<,!'+ B- - BP-8,"B-<, LOAD CLIENT DISC FOR INITIAL 7<$},<( ON DRIVE - BP-55 -TYPE 'YES' WHEN DISC READY OR 'NO' TO ABANDON- B"B@.  ' '$}'' A., 6.67<,.CLIENT,@.   $.*U-PK N/A6. B0@.E6-8,%6. #7<$},4%3 7@ ,;6-&E BEB. E.5 -6-@($+&,%(!B:,+'5 BF.6-@:7<,,"$}BIG.%!BIH. 7%<%,I. 6-% |. AU6-A.$.*RD.NXT=Q1$/ $}$/(6.7@$<@#%B:,,%4($&/ 6- $0 *I$->KZ0 B:,"6-$00 6-6--B:,$}06-@:7<,,&@H1 B%1!B%1 6-A:,$$1' 6-$81 *RD.R1ZV1 6- $2*$}U-PK.CL2 B2 3C 6. -Ae@?67B:,%,.7@<@,C 3 6- B2P36.7@ ,$},3$3*U-PK.IT135 68,-@:7@<@,,)6-8,56-@$36.7<%&,6-%$3*U-PK.IT2-103;$}-@268,-@:7%@<%@,,;6-8,336-+&,$@(%%67<,.>:,3"B2x3#67%<%,.7$}<%&,#6-%3   $4 *PR.CL4 4# }6-7<,4%#6-426.7<8,,6-! B6P26-A&$}B:,4(-@6-8,("B54 6-&46-+&,$@(%56.7%<%, 5 B6P5  5]6.$} (flag)&-@@F67<,.7&@<&@,S7<,00] B6P45 95# #(  Ӡ$} ;5&  &( 6 ӠΡ>5$R5 *PR\5]6-+&,$%6-@:7<,,A(7@<&,7%<%, :M$}AUW A]6.^5B:, @!($f5(( $p5*PR.W LETTERSr5 6.>:@:,%&P:'@,,u5C6-+$}&,$%6-@:7<,,C(7@<&,7%<%, :w5B:, @ ($x5(( $5*REF LETTERS6 $}6# }6-7<,4%#6-626.7<8,,6-! B626-A&B:,61-@6-8, "'6.1$} B86 6-&$66-+&,$@(%.66.7%<%,86 B6B6 D6T6. (flag)&-@@F67<$},.7&@<&@,P B6T E6# #(  Ӡ F6&  &( 6 ӠΡG6$6 *$}PK.CL6 6.65 67@<@,.>:8,,)6-8,56-@$667<%&,.7<,6-%6I-@267%@$}<%@,.>:8,,;6-8,I"B@X66-+&,$@(%6#67<%&,.7%<%,#6-%6 667<@$},.64 6-B:, @Q*67%,.******4 B@p7$: *ZIP:@@:!-@$&($} !$: *COL.CH;(0$H:,0%0$H:,($> *NEW CL> } >Q6-@:7<,,' TYPE 7<$}%,?(OR PRESS IF C(M(IS OKQ>" 6-B:,"6." B`&>. 6-B:, B$ }. B`$}>E7<,07<,;(#}YOU CAN'T CHANGE THE FIRST LETTER!E B`> 6. B >4 6.-Af@067$}%@,.4 >*-@68,- *6.00000>68,-B:,> B5>*FIX EA.IT/FL>)-@ $}Ba% B5) >/-@@! Ba+ B5/ >*AM.NEW CL> Bf>*PK/INS CL> B@$}6- Bp $>V6-@:7<,,' TYPE 7<%,R(&OR PRESS TO ABANDON THIS CLIENTV> 6-B:,"$}' A> B`$>*FIX IT.I1Z? 6-6-@! BP ? 6-8,?"A ?.6-+&,$%6-@:$}7<,,.6.7%<%,*?((7<&,:"(( Ba/?0!@6-&@&(7<,0 Ba4?$6-+&,$$}@(%$(7%<%,9?A(ŠנŠ)6-@'5AUA6-A>? 6-B:,H?E!@ Bc$}# ;(MUST BE 0-9 OR A-ZE BaPb?% ! (TOO LONG% BaPp?N 68,-!@&6-&@367<$},.09!D67<,.N Bb`u?"Bb`z?&6-+&,$@(%&67%<%,.?$?*VAL FLAG? "6.0$}6-6- $?*!+10*/9,)+1A*/Z,'6-*$? 6- $@ *AMD.CLA B8 A 6-6-@  BP$}A>(WHICH TO CHANGE?>( TYPE - OR IF NO MORE CHANGES(AB:,!BfP-A6-@:,&@d/A'!@2* $}@Y'6-&@22A"@&Bg@A!@) BfP?A!@6-%AA***FIX A$} FIELD****FA' 6- Ba B8' BfPPAX6-@:7<,,$6.7@<&,967B:,%,.7<%,X67%,. CANNOT$} BE CHANGED.UA8867@6,.% DELETE & RE-INSERT AS NEW RECORD.ZA Bg BfpdA*CHCK RECLNTHnA@ 6--$}@@(6-%8,, @!ABgxA$Am76.-RECORD TOO LONG - REDUCE IT BY CHAR(S)Y67@2<@$}4,.=:&A,c Bgm BfpA& 6-6-@ BP# &$hB *INS.CL|B }B 6.B88,!8,6$}-5 REJECTED - RE-ORGANISE FILE8$B 6.6-6-B ***LOOPB B$B @qB-6.7@$<$}@#%B:,,-4BrB2BrBBqB 6-B"Bp@B$B 6-6-8,B& 6- B$} Bu#&$B 6-6- Bs0C 6- Bp:C/ 6-6-8, B& Bu,/$DC $}6-6-6C5 6. B6-8,"6-, Bu25$C_68,-%8, 8,_ @FILE FULL - RE-ORGANISE BEFORE$} INSERTING ANY MORE RECORDSD6.D0:ID67<,.=:, D!@!(D - D 6-8, %} *D4D 6- Bp\D *WR.R1ZzD' 6-6. D0:CLIENT'67<,.=:,D46-?:A, 6-%@4 A`%}BupD 6-%D D (D@D$PF *RD.PZiF 6-nF%6-%@% A`%}BPxF 6-%F F  F$F 6- $DH *RD.NXbH @qlH& 6-6- 6-6& B%}vH "6-$H 6- B$H @qH 6- B`H%%@:7@<@,,"B0H&W} @)} !"#$)}%&'()*+,-./0@123)}456789:;<=>?@ABC)}DE3 A3COMPOSE (C) AMAZON SYSTEMS 1981&@@#(&$!@) }67<,.6-%C67<,.(6-%#4 )6-/6.56-C"@ $?67<,.6-%4 ) }$6.*6-567<,.? @ 67<,. 0 6-$%67<%,. 6-&6-0 @  A(@ $) } !@@!(  !6-,@@(7<,,(7<,L @ A&"6-8<,) }(6.4@B@&I(L$$ 6-F:,!A'$ 6-%6.7<, 6-@:,+ ") }1a*/z+6.>:@:,&@2,$ "6.$ 6-$%6.7<%,$ 6-8<,$ 6)}-8<,$" 6-$%67<%,.7<,"$  @83 "6-Ad!6-AU'6--36- 6-F)}:, !A@1  6-%6.7<,! 4 A  @1"+ "1a*/z+6.>:@:,&@2,)}# 46- @1$ 46- @1% 6-@:,$& A(  @)' A7(, @()}6- @$#")6-,$)E 6--@! @$% / @"56-A6-@#E * 0(7<, @D)}+(,& 6- @"6-6-# &$-, @(6- @&#")6-,$.3 6--@! @&)}'"36-@/1  @"6-6-! '(1 @B2 6-3 6-&"@T47<,4 @T)}5 @Q6. 6-%6.6-&%+67<,.7<,.$f 6-6.AgVA(6-?:A6 l!@6-!6-@ % --7 A ; b(@&ӠԠ̯Ӡנ)7}l A&@?  " A  A&@F 68<,-P /6-8<,68<,-$68<,-/68<,-Z " $d 68<,-)8}$T $!Q:,%Q:,!*Q:,!*Q:,!$$$^ V A)0(}6-'-@8( KEY FAILURE!@0N6-@&V0)9}h T-AA/2@@3 7 T(FIT SECURITY KEY, PLEASEm % D:KEYWORD1r B A)04("LO):}AD SYSTEM DISC & PRESS Π8B A)% 6. Q( B`6.!6.D1:*6-B:,6!@G6. ϠǠ);}Q A0     ' A0 ,-@!'"6-%, A1 :6.7<,:+1A*/Z,)++10*/9,*)<},A0 vv6.lҠ٠ԠΠ٠ҠŠàӠҠàӠԠ)=} %%67B:,%,.ԠȠҠ ( A2 ' 6. A0 "67%<%,. "6-@ 67<%)>},..LET$ ( " (} (6-6-" A)  A2@ A 4END6-%( EN)?}D OF LETTER/ A)09 A2>A$ A& 6-$% 67<%@8,. 6-8<, Z!@ A2)@}6-%6-) A(I-P(T Z6- *(7@<@8, 6-%* A2  )"(Ӡ)A}ΠϠŠ& )$ '( ̠6.END' A2% WRITE LETTER TO FILE B68A<,- 6-A&6-)B},6.26-86-B AF@ 6 A3@(7<,#(.(END36$  A4 A3  & 6-6.A)C}&G N WORD OA(6-?:A66-B  6-7<,0A8@6.7<,4)Q} )4$ 6-&"A8` ##7<,4 )7<,4A8` A8@S 6-%6.%67<&%,.7<,06)R}7<,.66-<6-@ I(7<,S A&K(7<@8,!6-8<,+6-$%867<%,.>6-D6-H K$(;67)S}<,.7%<,"67<,.+(7<,16-76-; 27<,4 @P7$F8 6.6-6-6-!6-% .(7)T}<,5(8$Z> @(6-8<,";(ϠŠӠ̯Ӡ>$d/68<,-6-8<,"%6-/ A9`n)U}68<,-x@ @(68<,-#68<,-.68<,-46-:6-@6.;(7<,6-6-"6-(6-, 26.)V}86-;$? AC)@D:HP/6-56-9 ?(}%-@( %  6-)W}(}4-@6-8<,$"*6-4 ACP. 6-6- 6-$%.(7<%@7,7  6--@")X}!"-6-@"7 AC9 6-6- 6-$%.(7<%@7,96-8<,   6-6- 6- $&F)Y} A)08(!LOAD SYSTEM DISC & PRESS Π< F AC0@ AD*@D:DIC06-66-: )Z}@(}5(ԠƠӠ:1-@($((, 1?$$( AND ITEM 11 IS ALWAYS DATE.D((( PR)[}ESS TO RETURN TO EDITN AC $F A)08(!LOAD SYSTEM DISC & PRESS Π< F ADkg(_}RE)\}MOVE SYSTEM DISC, AND REPLACE WITH A VACANT DISC - PRESS Π WHEN YOU'VE DONE THATk F.(&ŠՠŠӠ)]}àӠſ8 AFAF@ 1 AF0#ATD:' 1 AF@;(CANNOT FORMAT THIS DISC-)^}-@ 7 A ;  ! 6-AP!6-AP*$4i[(SYOU CAN PUT A LETTER DISC ON DRIVE 1 NOW IF REQUIRED)_}. PRESS Π WHEN READY_ i AF@zz68A<,- 6-A&6--6.36-96-?6-K6-AU A))`}[6-t67@<@,.z(}{ 6.|S67@$<@$,.567@3<@3,.S"A )"A)a}A`~f6(.TYPE 'Y' IF A5 WIDTH REQ (OR FOR A4)<6-B6-N6-A RZ4Yf6-A 4y6-)b}A " Ah.$(Ӡ٠٠ϠԠ. A]-AA/2@@3 =)c}2K( INTERRUPTQ6-W6-]6- PP(HTYPE 'Y' Π TO PRINT AGAIN OR 'N' Π TO RETURN TO )d}MENU A"A` 6- AF@ $"A AeL 6-%6-P:'AP,%,6-$A)e}P2!< AeB6-L Ac 6-& $U6-P:'+%,,A,6-&+%,$8ADA )f}U6-?:C:, C3G $" AgP Af^SS(K}ҠҭؠԬΠ)t}ȠԠϠ̧ΠέŧΠh2 A''''"'(6-2 A0r$"Ah 5(( )u}PRESS ANY KEY WHEN PRINTER READY, 25$K6-@$F:Ay,%K6.(EF20--2068? )v}6.7,6.7%@,.6.7%@,?6.7%@,Q 6-6-1(IS THE STATIONERY CONTINUOUS?; AA"G)w}6-Q Ah@ 6-6-@ Ah AhZ 6-Z(LGIVE FORM DEPTH IN HALF INCHES - ie COUNT THE S)x}PROCKET HOLES PER FORM  AhP Ah`!(ĠҠ! Ah@ 6-$ AhEND OF LETTER*Y}hiQ+Q-z}@ -{}-|} !"#$%&'()*+,-./-}}01234567@89@:@;<=>?-~}@ABCDE@FGHIJKLMN-}OPQRSTUVWXYZ[\]^-}_`abcdefg6 @D6MAIN PRINT (C) AMAZON SYSTEMS -}1981n 6-6.A'A@6-?:A6;@@,>6.'F  @H> 6- @x -}7<,1@&6->67<,.>:@:7<,,&,J 6-A:,"$L+ 6-6-6(67<,.>:@:7<,,%,+$N 6- $Zrr;-}$,;,;@,9,;,9@ ,9@,;A%,;@$@(,;@$,;$@6,\6. -} _..;@&,;,;,;,;,;,;,dyy;,9A<,;A@,;@,;Ab,9@ ,;@-},;,;@P,;,;@,;@b,eK6-@$F:Ay,%K6.(EF20--2068f-}? 6.7,6.7%@,.6.7%@,?6.7%@,g! A) A! Ah_ (LOAD SYSTEM DISC, PLEAS-}EF(!TYPE 'YES' WHEN YOU'VE DONE THAT.P BU_ An*D:DIC-#*xC6-+&,$%-}6.>:B:,,(67<,.:67%<%@:,,.> CQ!@D:GETW(/6;G6-Q A -}Pd 6.6-@ A P36.7@:,067%<%,. A-}` *LABELS 6-6-3 (}6-6- )( LABEL PRINT3 A  A AK (}6--}6- # A2K(# PRESS ANY KEY TO INTERRUPT THE RUN A@ A*DISP RECORDS 4 (}6-6--} *( FILE DISPLAY4 A %` -( A 6(ԠΠΠ@ A J A N \-AP-}` * 6- A`CURSOR POS&@@#(&$G N C & CONVERT- "6-Ad!6-A-}U'-6- 6-F:,"A @  $$22@!-@ % /22$1@-}@#A%6-+(}16-(CHOOSE AN OPTION:<"-"!")"+( 468,-<6-%-} 6. O 6-6-  (B( INPUT 1 TO & & ΠFO6-B:,/@%6.1 DIGIT, PL-}EASE/ A576-@:,& )!&-6. OUT OF RANGE7 A5G (}6-@!6-@% G(Ԡ-}ԬŠ$$5LETTER MAILSHOT,3,260NAME/ADDRESS LABELS,3,450CLIENT FILE PRINT,3,400CLIE-}NT FILE DISPLAY,3,8006RETURN TO MAIN MENU,3,250@*FLAG SETTINGSJi(}FLAG SETTINGSi(MFor each of the flags, yo-}u can choose either to print ALL clients whose flagT<.(&is a particular value or values,OR2 < A ^PP(Hto pr-}int ALL clients EXCEPT those whose flag contains a value or values.hjj(bIf ANY of the flags in a record indicate t-}hat it is to be printed, thenit WILL be printed.rN -(FLAG -6-+%@,$%;6-@:7<,,N( : 7%<%-},|t( CHOOSE:2(1. ٠ PARTICULAR VALUES.Y("2. ̠Ԡ PARTICULAR VALUES.t(3. Š THIS FLAG. (-}4. PRINT ٠ RECORD.41A 436.0 A 446.1 A< 026-6-}-@! 2( TRY AGAIN..< A` 416.0 A 6.06.1)-@6%67<,.7&<&,-}) 32A`8(TYPE ALL THE VALUES..!*6-B:,8"A`E 6--6.7<,*/Z*1A;6-}-@:,&@TE AP,/9*10"6-@:,&@G, AP' 6-'67<,.>:@:7<,,%A(, AU6-}7<,. C 6-(,(ERRORS - START AGAIN6 A29'C A*6-+&,$@6%*67<%@5,.-} 44' A#6-@6-@ #  A"$ 6- A\ 6-6-6- -}6-'-V(!RECORD WILL BE PROCESSED IF FLAG  IS:\6-0 -7<,41((>:%@H,06-%B 6-%-} -@&*7<,41:(>:%@d,B6-%' 6-% '*@6AF ("@69(}A-}LL RECORDS WILL BE PRINTED<'F A(FLAG  IGNORED#( (6-% #"AD(IS THAT SATISFACT-}ORY?7(ANSWER 'YES' OR 'NO'.A BD$TA(9RUBBISH! THAT MEANS NO RECORDS WILL BE PRINTED AT ALL!K A2Q6--}T$*START AT ALFA""(}WHERE TO START PRINTING?qq(hPrinting starts from any name or from any letter of the alph-}abet, and ends at the end of your client /  A /(file or when you abandon.&E0((INPUT START NAME OR LETT-}ER OF ALPHABET4EB:,"A@+##7<,/Z*7<,1AAE0J 6-6-@ @("ԠԠȠ-}̠ҠJ A05M&(}LOAD CLIENT DISC ON DRIVE M("PRESS WHEN YOU'VE DONE THAT7  $b$ 6- -}A%<0@$H:,@$00@<6-A 0S 6-6-68<,-%68<,-}-+6-16-76-=6-C6-I6-S A%a-@68<,-&+68<,-%16-; A%S2%@-}@W a A) 2"68<,-68@<,-"$?-B:,6-@:7<,,*A6%86-%@<-} ?$ CLEAR LINE X  6-$%67<%,.$( ##CREATE NEW LINE AFTER CURRENT2 + "!(ҠŠ̠+ A-}P<  6-6-8<,> H!@6-6- ) A >(ҠԠŠH A&@?  " A  A&@-}F 68<,-P /6-8<,68<,-$68<,-/68<,-Z " $d 68<,-$T $!Q:,%Q:,!*Q:,!*Q:,!$-}$$^ F (}6--(( KEY FAILURE!00>6-@&F0h X-AA/2@@3 7-} N(FIT YOUR KEY נX AP  (}6. *( B`6.!6.D1:*6-B:,    ' A0 ,--}@!'"6-%, A1 6.7<, "67%<%,. "6-@ 67<%,..LET$ (-} " (} (6-6-" A)  A2@ ; 4END6-%( END OF LETTER) 3 A28-};$ A& 6-$% 67<%@8,. 6-8<, Z!@ A26-%6-) A(-}I-P(T Z6- *(7@<@8, 6-%* A2  )"(ӠΠϠŠ& )$ '( -}̠6.END' A2% & 6-6.A&G N WORD OA(6-?:A6:@:,%,3Z# AT&$-} A@g DECIDEh 6--6.7<,r,/Z*1A"6-@:,&@T, AB@|,/9*10"6-@:,&-}@G, AB@ 6-*6-+&,$@6%*6.7<%@5,7<,41'$   6-  6-AP-}*$4j\(TYOU CAN PUT A LETTER DISC ON DRIVE 1 NOW IF YOU WISH. PRESS Π WHEN READY.` j AF@ A)-}" A` $ ")"$ *LABELS " AQ AR$O-(%}WE CAN PRINT SEVEN ITEMS TO A-} LABEL O(YOU MUST CHOOSE THE ITEMS NOW&(&('ITEM 0' MEANS A BLANK LINEO-@6-+&,$%-6-@:7<,,-}K(ITEM  IS 7%<%,O  - AQ  A  A X 6-6-@ <(LINE  OF LABE-}L IS ITEM..@J @rXAQ  )!@AQ 68,- N (}-+( LABEL LINE  IS -}46-8,:"D(BLANKN AQp(,6-+&,$%6-@:7<,,,(7%<%,2B  ($(IS THAT SATISFACTORY?. B-}4(}BAQ<R-(%}̠Ԡ LOAD CONTINUOUS LABELSR( PRESS ANY KEY WHEN PRINTER READY>#  6-}-# ASA'$(Ӡ٠٠ϠԠ'$BSS(K}ҠҭؠԬΠȠԠϠ̧Πέ-}ŧΠCSI(AŠӧϠŭ٠ҠϧϠΠRETURNO6-S D, 6. B6."-}"', ASF 6- $P,6-@&"@#6.)6.,$Z. -6-8,"$ AR. AR@d "-}6. AR@n:6-+&,$@(%%6-@:7<,,+:6.7%<%,o "6.q ARs)6-@:7<,,-})67,.7%<%,u "67,.x= AS")F:,-(INTERRUPT.....3= AR 6.  AS-}$67B:,%,.B:,!$ ARP,($TYPE 'YES' TO CONTINUE, 'NO' TO QUIT6 B<"F AQP AR-} 6- $% 6.7<,4%%6.7@ ,> AR67,.B:,!,7<,4%>67,.7@ ,$ A-}Q3   $*END GAMEAT`"@AT`,> 6.-@,6-+&,$@(%:-}67<,.>:,> 6 ARTH( }ĠƠΠ-( A , H(ӠΠҠՠ^ F:,$h-}-@P  AT`zt68A<,- 6-A&6--6.36-96-?6-K6-AU A)[6-t67-}@<@,.{ 6.|S67@$<@$,.567@3<@3,.S"A )"AA`~f6(.TYPE '-}Y' IF A5 WIDTH REQ (OR FOR A4)<6-B6-N6-A RZ4Yf6-A 4y6-A " A-}h.$(Ӡ٠٠ϠԠ. @]-AA/2@@3 =2K( INTERRUP-}TQ6-W6-]6-A`mm(eTYPE 'Y' TO PRINT LETTER AGAIN 'Q' TO QUIT (OR-} TO CONTINUE)AUAU4Y)4yA`*4Q)4q'''' '* A0 6-}- AF@ $"A AeL 6-%6-P:'AP,%,6-$AP2!< AeB6-L Ac -}6-& $U6-P:'+%,,A,6-&+%,$8ADA U6-?:C:, C3G N6.Q$" AgP"Af'$^SS(K}ҠҭؠԬΠȠԠϠ̧Π-}ŧΠ_II(AŠӧϠŭ٠ҠϧϠΠRETURNc" 6. B6.""$h"-}' ' '''6-" A0r$"Ah 5(( PRESS ANY KEY WHEN PRINTER READY, 25$Q 6-6-}-1(IS THE STATIONERY CONTINUOUS?; BA"G6-Q Ah@ 6-6-@ Ah Ah^ 6-Z(-}LGIVE FORM DEPTH IN HALF INCHES - ie COUNT THE SPROCKET HOLES PER FORM ^1 @r'(ĠҠ1 A-}h@ 6-$ AhEND OF LETTER ! $ Ae Af$"33ROUTINE TO ESTABLISH WHETHER ONE DRI-}VE OR TWO"JJ(B}THESE PROGRAMS CAN BE RUN ON EITHER ONE 810 DISC DRIVE OR TWO."@@(7IF YOU USE TWO DRIVES, THE SYSTEM-} DISCGOES ON DRIVE 1,"..(& WHILE THE CLIENT FILEGOES ON DRIVE 2."hh(_IF YOU ARE USING ONLY ONE DRIVE, AND THE SYSTEM-} ASKS YOU TO LOAD A CLIENT DISC, IT IS OK TO "SS(KREMOVE THE SYSTEM DISC. YOU WILL BE TOLD TO RELOAD IT WHEN IT'S NE-}EDED.#H+(#נ٠ӠϠŠӠſH(ҠҠRETURN #416-@$#6-@-}02A#$N( *MacP(B:, @$U(B:,!@ $W( 6-B:, 6-B:,Z(& 6.6.7<,&4-}McBPd(6.7<,0Mac$i( 6-&n( FILED UNDER 'MAC'?x( B$(Q67@ ,.267-}@<@,.M% 86-A4McG6-Q B( 6-(-B:,(67<,.7<,(%6-@:7<,,%!@-}B0( @eB0(67<,.>:%@2,( 6-%"' BP( ( 6. $)*G$->IZ W. -}O/PNCH)B:,"B*0 6-6--B:,06-@:7<,,&@H * B* "!6-&6-6*4-} @6-@$%# +6-$16-4$&* ERR6-$0**L1Z,H1Z->R2$N* 6- B 67<,.X* 6--} B 67<,.b*$**IZ->G$ W. O/P* "6.0000$*$6-'B6-'O:,$6-$*K -6-$-}@:67<,.>:P:,%@H%+&,$,@6-K6-&P:,*   $+ *YES/NO+! 6- B:,!!6.7<,+4Y)-}4yB,4N)4nB ,+! ANSWER Y OR N & Π+ B0, 6-, 6. $$,*FND 1st REC=Q1$-}V, BB``, 6-6-6-j, ***LOOPt, "B~, "6-, 6- $, *READ,-} B`,96.7<, @r6-)6.7<,3 @r96-,-6.7@$<@#%B:,,-4Bp, -}26- B,B`, 6- B,"B@, 6- B`,96.7<, @r-}6-)6.7<,3 @r96-,-6.7@$<@#%B:,,-4Bp, B`-6.7<, @r6-}- --6.7@$<@#%B:,,-4B@- 26- B`- B-%%@:7@<@,,"B.}- 6- B(- 6- BP- *OPENx-F  BP#6.D0:ID167<,.=:,<F B-+ .}-"68,-& +-+-B:,7<,/7<,!'+ B- - BP-8,"B-<, .}LOAD CLIENT DISC FOR INITIAL 7<,<( ON DRIVE -66 .TYPE 'YES' WHEN DISC READY OR 'NO' TO ABANDON- B".}B@. 6- $., 6.67<,.CLIENT,@.$.*RD NXT=Q1$/ $/(6.7@$.}<@#%B:,,%4($&/ 6- $0 *I$->KZ0 B:,"6-$00 6-6--B:,06-@:7<,,&@H1.} B%1!B%1 6-A:,$$1' 6-$81 *RD R1ZV1 6- $2*U-PK CL2 B2 3;.}-A9@767<%@,.7<@,; 3 6- B2P36.7@ ,,3$3*U-PK IT135 68,-@:7.}@<@,,)6-8,56-@$36.7<%&,6-%$3*U-PK IT2-103;-@268,-@:7%@<.}%@,,;6-8,336-+&,$@(%%67<,.>:,3"B2x3#67%<%,.7<%&,#6-%3   $4 *PRT. } CL4  "" B64 " B7"$4# }6-7<,4%#6-4*6.7<8,,6-! B6. }P'*$4(-@6-8,("B546-+&,$@(%56.7%<%, 5 B6P$5  5. }D-@@26.7&@<&@,:00D B6P45 >5$R5******PRINT\5A6-+&,$%6-@:7<,. },A(7@<&,7%<%, :]5< " B6837@<&,7%<%, :< _5B:, @!($f5. }(( $p5Z/('}Ԡ LOAD CONTINUOUS STATIONERYT( PRESS ANY KEY WHEN PRINTER READYZ6-u5  $.}v5SS(K}ҠҭؠԬΠȠԠϠ̧ΠέŧΠw5SI(AŠӧϠŭ٠Ҡ.}ϧϠΠRETURNO6-S x5 B"' B5z5 6- $5F B633?3 .}FILE PRINT 7AT,C F$: *ZIP:@@:!-@$&( !$:******************.};* CHANGE COLOURS *;******************;(0$H:,0%0$H:,($>S Bc AF`"(}A.}@D:*.LETG6-M6-S6->!!(SELECT A LETTER BY NUMBER>5 #7@<@,0 (+(5 B.}a>Q(7<@,6-%("@ +(G(PRESS Π FOR MOREQ Ba> B`>3 "*")(NO LETTE.}RS ON THIS DISC3 Bc>(NO MORE"Ba@>$ 6-(TYPE $(1 - >(& & TO CHOOSE ?'.}'(TYPE 0 TO RETURN TO MENU?B6-B:,%"@ $"*(}06-86-%B B` ?:0(INV.}ALID REPLY...TRY AGAIN : BaP*?06-@:,&@H  )!&&6-0 Ba`4? "6.$H?86-@$%2.o}bq ''DICUP (C) AMAZON SYSTEMS 19812 @06-@h%6-2;@2},AF:A6,"*F:A7,"+A67A7A @0A6A7 @&%D:SETUP2} @P @$ @@% D:KEYWORD1( @P @02.'(LOAD SYSTEM DISC & PRESS +.$2}@@AD@ Ay!@"@#$%AA&AD'6}A()A&&SETUP (C)AMAZON SYSTEMS 1981 SET UP CLIENT FILES26-AP2MAX RECORDS PER DISC (810 D6}RIVE)%6-@%SINGLE DRIVE SYSTEMW6-6-@'6-@36-@?6-@K6-@W6-@6}{6-BP6-B@'6-B036-B@?6-B`K6-BpW6-Bc6-Ao6-A {6-A!6}EE;,;,;,;@,;A%,;@&,;,;@,@   #-6-A6-F:,%F:%6},"A6A( (} 2jj(bTHIS PROGRAM SETS UP A NEW CLIENT FILETYPE 'Y' Π IF YOU WANT TO SET UP A NEW C6 }LIENT FILE.4< A" F (} P U ADD=1 OR 2Z==(5HAVE YOU TAKEN A SECURITY COPY O6!}F THE ISSUE DISC?d@ A"<($IT IS VITAL TO SECURE THE ISSUE DISC@ i5 6-A6)F:,%F:%,"A66"}5%D:DICUPkhh(`IF YOU EVER WANT TO CHANGE THESE NAMESAGAIN, CHOOSE THE CLIENT MENU OPTION FOR NAME ALLOCATION.l A6#}n (}x ]](UYOU CAN STORE A CLIENT FILE OVER MORE THAN ONE FLOPPY, AT ABOUT 650 RECORDS PER DISC.nn(ee6$}g If you have 1200 records, you mightstore Clients with Company names A-L on the first disc and M-Z( on the other6%}SS(KSPECIFY THE MAXIMUM NUMBER OF RECORDS YOU WANT TO STORE ON YOUR CLIENT FILE6-@  !BA6&} 6-' @'A (} `&(SORRY, WE CAN ONLY ACCOMODATE I( RECORDS FOR EACH LETTER 6'}`(OF THE ALPHABET-(#(CHECK YOUR FIGURES AGAIN- A  (}  II(AYOU MAY DISTRIBUTE THE CLIENT6(} NAMES HOWEVER YOU LIKE, BUT......--(%WE ADVISE THE FOLLOWING DISTRIBUTION:/%( DISC RANGE DISC RANGE/ A6)}S/(THIS WILL ACCOMODATE P:%, RECORDSM( OR MORE, ON  DISC(S)S6-I(I( HAVE YOU GOT , DISC(S) W6*}E CAN USE FOR THE CLIENT FILE?11((OTHERWISE, THE RUN WILL BE ABANDONED.  A"  6.A-6+}" 6-6-@ , "6.Z A`6`+(DISC  STARTS AT LETTER ''K(WHAT LETTER DOES IT END A6,}T?O`B:,A;V 1a+(Ġԡ-? lower caseH(PRESS TO CONTINUELV A@2A6-}J2ZA`TM "(YOU'VE GONE BEYOND 'Z'<(BEFORE THE LAST DISC!@ J AM%h, ,(DISC  RUNS 6.}FROM  TO r  67<,. 6.>:@:,%,|  (} HH(&YOUR CLIENT FILE WILL BE SPREAD OVER  DISC6/}(S), AS FOLLOWS:F 6.A-1(  TO 7<,>P:',"'F(-6.>:@:7<,,%, -(IS THAT 60}OK?  A"  6.A- (}  ."@.(REMOVE THE SYSTEM DISC AND99(/LOA61}D A DISC FOR USE AS A CLIENT DISC IN DRIVE --(%TYPE 'Y' WHEN READY OR 'N' TO ABANDON'6-@  A#62}' T6-@ T(:@:,%, 5 (}:   DP-(%NOW RELOAD THE SYSTEM DISC ON DRIVE 1P(TYPE 'Y' 68}WHEN YOU'VE DONE THATN AApX? A D:*.SYS$ )?@D:ID]' (69}-( ' A b2#(THAT ISN'T THE SYSTEM DISC!(2 Apl (}  vEA(9SYSTEM ALL SET - TAKE A S6:}ECURITY COPY OF THE SYSTEM DISC!E YES/NO ROUTINE$$(TYPE 'Y' OR 'N' & Π% (4Y)4y"6-6;}%$4N)4n6-$ ADICTIONARY UPDATEa (}a(STHIS IS WHERE YOU ALLOCATE NAMES TO THE ITE6<}MS AND FLAGS IN YOUR CLIENT RECORD.dd(\Π HAVE ALREADY SET UP SAMPLE NAMES TO ITEMS, WHICH YOU MAY USE OR CHA6=}NGE, AT WILL.;$,;$, A*D:DIC-#*6-+&,$%6.>:B:,, 676>}<,. 67%<%@:,,.$6.>:B:,,. 67<,. 67%<%@:,,.8   B-@ A G-@6?} A I AL.6-+&,$%6-@:7<,,.6.7%<%,Q 6-@:7<,, 6.7%<%,R 6-6-6@}@  V( =jBB(:TYPE NEW DESCRIPTION, OR PRESS TO LEAVE IT AS IT ISt6-B:,"$~G 6A}=(/TOO LONG - LIMITED TO 15 CHARCS.......TRY AGAING A@*67<,.>:, 67%<%,.* AE(LOAD SYST6B}EM DISC;(TYPE Π TO CONTINUEE A%xW A0$@D:DIC,-:6-+&,$%H6-@:7<,,6C}W6.7%<%, 6-@:7<,, 6.7%<%,! ((  !$Z4(>:A%,!IF YOU'VE GOT A WRITE-PROTE6D}CT TABZ(!ON YOUR SYSTEM DISC, TAKE IT OFF!3 (PRESS TO CONTINUE$)3 ACOLOUR CHANGE10$H6E}:,@010$H:,@$4 CURSOR IN MIDDLE OF SCREEN> 6-6-@ $")"(PRESS 6F} TO CONTINUE&)$"33ROUTINE TO ESTABLISH WHETHER ONE DRIVE OR TWO"JJ(B}THESE PROGRAMS CAN BE RUN ON EITHER ONE 816G}0 DISC DRIVE OR TWO."@@(7IF YOU USE TWO DRIVES, THE SYSTEM DISCGOES ON DRIVE 1,"..(& WHILE THE CLIENT FILEGOES ON DRI6H}VE 2."hh(_IF YOU ARE USING ONLY ONE DRIVE, AND THE SYSTEM ASKS YOU TO LOAD A CLIENT DISC, IT IS OK TO "SS(KREMOVE T6I}HE SYSTEM DISC. YOU WILL BE TOLD TO RELOAD IT WHEN IT'S NEEDED.#H+(#נ٠ӠϠŠӠſH(Ҡ6J}ҠRETURN #416-@$#6-@02A#$'#``ROUTINE TO CALCULATE DISTRIBUTION OF E6K}NGLISH NAMES, BASED ON BERKSHIRE TELEPHONE DIRECTORY(#XXA,27,B,106,C,169,D,201,E,218,F,244,G,280,H,344,I,348,J,368,K,386,L,6L}415,M,470,N,4842#MMO,494,P,536,Q,538,R,572,S,642,T,674,U,676,V,682,W,739,X,740,Y,743,Z,744<#+;@&,9@&,%#A6M}+6-F#-@&""P##67<,.68,-&6-# Q#!!ALF=A-Z:PP=NO OF PAGES EACHZ#f 6-6--6N}@&/68,-8,$$'88,!A68,-fPP=NO OF RECS EXPECTED FOR EACH CHd#-%8,!68&,-68&,'6-%-6-6O}n#6-%8, 6-%x#0 6-6.A-@&08, A#! (  TO Z!$#<6.7<,'(6P}  TO 4P:',"'<(#$6.7%<%,6-%$ A2 6-B:,"B002 B006-A:6Q}, $2*( NON-NUMERIC #6-B' *$6 B@% D:KEYWORD16,(LOAD SYSTEM DISC" A, B@:6R}%@@"(%$>+ BP-@$&$(( +$hBA -AA 6@02@6S}4 >2A$PF6 B%67<@ ,.CLIENT6@UF,$(}WRITING EMPTY CLIENT FILE( , WFU.(&TH6T}IS MAY TAKE SOME TIME...............4"U(LONG ENOUGH FOR A CUP OF TEAZFaa6.W00000000011111000000000DUMMY RECORD ...6U}...............................................dF8867B:,%,.&......................................nF+ (!6.7@6V}<A%,+-%xF ( F-67<,.ID6.7<,-@F- (((!(%&*6y}$H 6- B$H B I *DEL.CL"I; 1($ARE YOU SURE YOU WANT TO DELETE THIS; B$I&X}B*I'67@<@,.>:,' BufI$D2:UPD*RD.NXbH @qlH& 6-6- 6-6& B$D ! $ Ae Af$>X Bp AF`(}<@D:*.LETB6-H6-N6-X6.025*Z}>@!(SELECT A LETTER BY NUMBER'"@(OR CREATE A NEW ONE.> "(TO BE READ IN.> "(TO BE DELETED.>F *[}#7@<@,0 (+(<6.7<@,F Ba>Q(7<@,6-%("@ +(G(PRESS *\} FOR MOREQ Ba> B`>3 "*")(NO LETTERS ON THIS DISC3 Ba0>(NO MORE"Ba0>$ 6-(*]}TYPE $(1 - >(& & TO CHOOSE?3 "3(TYPE  TO INPUT A NEW NAME ?''(TYPE 0 *^} TO RETURN TO MENU?B6-B:,%"@ $"*(}06-86-%B B` ?:0(INVALID REPLY...TR*_}Y AGAIN : BaP*?.6-@:,&@H )!$6-. Ba`/?*"Ba`4? "6. $9?g " A)0*`}6-A:,( @ g(:ӠàǠРԠȠҠŠԠ>?6 "+(INPUT LETTER IDENTITY, P*a}LEASE/3 6$H?86-@$%2@D:*.LET86-R?; #7@<@,0 (+(16-; *t}CKAGE.Nu!!((C) AMAZON SYSTEMS 1982Xu]-@C"% B) C0@@@]0@:c}@]u Bbu<-@A  -BB@d<% D:KEYWORD1u-@@ $u"C:d}$u!A6-&$u$",!6-@$$u /6-$uii121,82,86,122,61,62,79,87,123,:e}62,65,72,88,124,63,73,80,89,125,63,64,85,89,126,64,64,87,89,127,64,65ugg87,89,128,65,65,87,89,129,65,66,87,88,130,66,66,87:f},88,131,66,67,76,82,86,88,132,67,67,70,81,86,87uee133,67,67,70,76,85,87,134,67,68,85,86,135,67,68,84,86,136,68,69,83,85,13:g}7,68,69,81,85,138,68,69uOO80,84,139,68,69,79,84,140,68,69,77,82,141,69,69,74,81,142,69,78,143,69,74uii144,95,95,145,93,:h}95,146,58,63,88,96,147,58,75,86,96,148,58,96,149,58,59,66,96,150,59,60,70,90,92,97uee151,59,60,74,88,94,97,152,59,60,94,97:i},153,59,60,94,98,154,60,61,94,98,155,60,61,94,98,156,60,61ucc76,88,94,99,157,60,61,68,85,93,98,158,61,61,64,71,93,97,159,6:j}1,61,64,67,92,97,160,61,62,91,96vee161,61,62,91,95,162,61,62,90,94,163,61,63,89,94,164,62,63,89,93,165,62,63,76,76,88,92,1:k}66,62,63 vii76,77,79,82,88,91,167,62,63,76,81,88,90,168,62,64,71,80,87,90,169,62,76,77,79,87,89,170,62,71,79,80vGG86,89,:l}171,62,67,80,82,85,88,172,81,88,173,82,87,174,84,86,1000000\vfv7 #B!-@0%"3A6%7 pv%%:m}6-AV$F:Aa,%F:A`,zv1-@@x-%@%A91 v'A'A@v:n}BBAv$vjj72,138,72,238,32,6,175,32,6,189,0,9,141,10,212,141,22,208,224,79,208,5,169,0,141,32,6,104,170,104:p}@D:*.LET86-R?; #7@<@,0 (+(16-; Ba\? 6-% Bbf?6.q},64D2:LOGODLIS Blogomaker 8.7@<@,p?;-@B:,!7<,4 $'16.7<&,; Bb`z? ?   $?O&(IS THE SYSTEM DIS.r}C ON DRIVE 1?7( PRESS ;? E6-O BaPF*RD CL PZiF 6-nF%6-%@% A`BPxF 6-%.s}F- 6-?:A,-@wF  F$F 6- $DH *RD NXbH96.7<, @r6-)6..u}Ba\? 6-% Bbf?6.7@<@,p?;-@B:,!7<,4 $'16.7<&,; Bb`z*z}7<,3 @r96-lH& 6-6- 6-6& BvH "6-$H 6- B$H96.7<, @.v}r6-)6.7<,3 @r96-H 6- B`H%%@:7@<@,,"B0H$H 6- B.w}$H BD:MAIN?B6-B:,%"@ $"*(}06-86-%B B` ?:0(INV,%-A0 (}6-F:A, @FK  ( BAD SECTORS FOUND4(USE A NEW DISC.> AK%D:KEYCOP>} -$F1(}FILE ERROR(-(PROGRAM ABORTED1 D2:SETUPEYWORD16,(LOAD SYSTEM DISC" A, B@:4G? ?A#(YOU HAVE CHOSEN  - OK'6B:,!@A6.7<,?4Y)4y $? 6- BahBQ (LOAD*{} SYSTEM DISC, PLEASE4-@A8 B BpGQ B` D2:COMPOSE? "6. $9?g " A)0(XTUPde& 6 DZZZZZZZ1CURMENNUSHUZIPAWESTADICOLCMIABCFNRECEZYNYNIJALFPPAP41i1232435ޥ<<8B}.6- + (7<, ( (# +(  A $ @@SETUP 0 A P6-F:@,0"} A(A0 +@&A(+B7t&A( A@$ $& %%(} MAIN PRINT "}PRINTS RECORDS0 k-@@A(% COMPANY NAME:Amazon Systems k(% ADDRESS LINE 1:4 Flintgrove : W"}-(% ADDRESS LINE 2:Bracknell W(% ADDRESS LINE 3:Berks D W-(% CONTACT:Mrs B J Williamso"}n W(% DEAR.....:Beryl N W-(% TEL.:0344-23314 W(% PRODUCT:Software "} X W-(% DISTRIBUTOR:Y W(% FLAG 2:N b - ((%-"}A) - g $$( MAIN PRINT PRINTS RECORDSv  A $ $ ( ((} MAIN PRINT PRINTS LETTERS"} ( (  A&0$:%@@"(%$ D2:KEYWORD1$ $& %%(} MAIN PRINT QZ 6-6-6-\gg6.]hԅhhhhh h  S ԭ `    m_>} ")" Ad;Ai!Ap@+ Ap1"; Ax;Ai!Ap@+ Ap3>}Fred Smith, 12 Balfour St., Leith. 3 January 1982. Dear B}Fred,  KEYWORD-1 Thank you very much for you letter of the 17th DB}ecember. We will be delighted to supply a copy of KEYWORD suitable for your elaborate problem, just as soon asB}"%;6-&6"$%%,(}COPY OK - LABEL IT NOW.6 A0 6-%% @& A0 A&% D:KEYW>}ORD1&6-?:C:,<<%<,"#6-&$@ 6-%,(RPT SEC  DR F:Ai,@ @Ap @p, >}A"( ON DRIVE , A: A0( ON DRIVE 1: A((( ԠԠ͠>}àΠҮI2+%%,$$!-$% /2B(& PRESS FI$$!(}LOAD DISC TO BE COPIED $$>} D:KEYCOPF2 ON DRIVE , A: A0( ON DRIVE 1: A((( ԠԠ͠<D:DICUPbq ''DICUP (C) AMAZON SYSTEMS 19812 @06-@h%6-2;@0Ԡ͠àΠҮI2+%%,$$!-$% /2B(& PRESS FI$$!(}LOAD DISC TO BE CO>}PIED $$ D:KEYCOPF2FTBSHUD@@A9A(]`AF A0< you need it. Regards.   B}  Gil Williamson B}D:DICUPcrG ''DICUP (C) AMAZON SYSTEMS 19812 @06-@h%6-2;@0 END  Gil Williamson @Y" TO FORMAT DISK 2D2:K'U ?' 1L v_ \b \LNO CARTRIDGEh' <0 $B}2 0P vL RUN FROM WHAT ADDRESS?TYPE "Y" TO CREATE MEM.SAV' ~0Y s0 ' 1 L FL1MEM.SAV FILE ALREADB}Y EXISTSu( <0 2 0 0(( (( 1 ~0Yr( 1BʝD(EJ 1 B 1 .{(} 1 B}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 2.B}D2:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1B} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUB}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}OPzJZZZZZZZBFTSHUD@@A9A(B 3\A@ @ } MAIN PRINT PRINTS RECORDS0 k-@@A(% COMPANY NAME:Amazon Systems k(% ADDRESS LINE 1:4 Flintgr"}ove : W-(% ADDRESS LINE 2:Bracknell W(% ADDRESS LINE 3:Berks D W-(% CONTACT:Mr"}s B J Williamson W(% DEAR.....:Beryl N W-(% TEL.:0344-23314 W(% PRODUC"}T:Software X W-(% DISTRIBUTOR:Y W(% FLAG 2:N b - (("}%-A) - g $$( MAIN PRINT PRINTS RECORDSv  A $ $ ( ((} MAIN PRINT "}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0B}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L B}PRINTS LETTERS ( (  A&0$:%@@"(%$ D:KEYWORD1 _, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭB}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNB}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rB}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtB}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. B} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VB},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭB}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT B}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξB}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-B}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L B}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥB}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{B}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1B} L ERROR- 144ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDB} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4-uB} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4-u@