stLFILELEFILESUBRANDFILENAMEEOLIOMSG1MSG2MSG3MRANSTARGAREAMAXLESADTRUELEICCOICBADICBLEICSTABISSTU UUU7U OUTT B" AU AA@@2BIBvAA4A6A@A5@@MIGHTY MAILER BY PHILIP BATE, Ph.D. (c) 1987, ANTIC PUBLISHING!6-I:,&A!;,(]];AU,;A`,;@,;@,;@,;@(,;@$,;@,2u67@,.>:AU,367@,.>:AU,V6.ӠΠҠΠՠu6.ӠҠƠŠ<nn6.dPress '' to print envelopes or '' to print addressee on letter. BE SURE PRINTER IS READYF6.hhhLVPqq67@<@,.Vԅh`hhhhhhmmhhhhhhmͥmRqq67@<Ar,.V8ͥ΢%8͍ `iͥiΩ6ȱ%8͍Sss67As<A`,.X `iͥiΩ*ʭ8͍ 8ԥեiԥi`T,#67A<A,.>:AU,,6-C:,ZMAIN MENUd +AR@1AdAUC@@UAVA&gA@dyAAA 6-n-@-@@Kx6. D:ADDLIST A0 +AR@1AdAUC@@UAVA&gA@dyAAA 6-(( Πՠ#( (#( - FIND & PRINT"("( - SCROLL & PRINT ( ( - PRINT LABELS(( - SCREEN LIST(( - CHANGE MENU(( - DIR & LOAD!(!( - MAKE NEW LIST( (( :6-F:Ad,"AU0@w: A0$)@$"AUA@GG&@HApA`A0AA0ApA @ A0""FIND ENTRY & PRINT ENVELOPESk (}A-AR?-@@g(#Locator for Name/Address to displayk" Ap, A`6"A@d(}("(@E(1(&Press Ҡ to get next same name4(E(7<%@,JA@d AT"@2A^ A0hPRINT ENVELOPES SERIALLYr6-%@ A |A@d(}(;(/($Press Ҡ to scroll not print2(;(7<, A++"@2)"@e)"@iAp A0PRINT COMPLETE LISTTT(L}You may wish to use these program lines to adjust your printer for theKK(Ccorrect spacing used by labels. BE SURE THAT PRINTER IS READY-@AP F@.@@P:; @F@ A0SCREEN COMPLETE:-@A ("(6-@AP: =B:,"%(NO LIST LOADED9-@AP=  A0CHANGE MENU5 (}-@@5(Šՠ&^( ("( - Add Name/Address%(A( - Delete Name/AddressD(^( - Save Updated List01(.(# - Main Menu (Without saving list)1(:<-@@ <("ŠŠǠϠΠD#-@@(# A NYA'AR-(}Y&@HA A A@A0X A0bADD NAMElL (}B:,",67B:,%@,.>-@@L( נv((ŠĠ _(,(&B:, FREE CHARACTERS IN MEMORY>-@@"_(PRESS FOR CHANGE MENU;AR'-@@7( FIRST LINE;B:,"A@467B:,%@,.467B:,%@,.>:AU,(( NEXT LINE?B:,"/67B:,%@,.>:AU,5(}? A0 ApDELETE A NAME6-@@"6(PRESS FOR CHANGE MENUVA'-@@;(Name to Delete?VB:,"A@ Ap A`5($(PRESSŠҠTO DELETE5(7<%@,$)@$"AUAp @2A@6-&%@ !!67SAVE ROUTINEHA@dRB:,"A\#( (ŮŠ #(aII(@Press to add changes to this file. Press ӧ to change f.(to a new$(DEVICE.FILENAME. Ap"@2A z; (}-@@7(DEVICE.FILENAME TO SAVE;B:,"A0i A 0@5@@A-M6-@2V6-B:,_6-C:,i Ap"@ B" A0E-@@0( I/O ERROR #F:A,;@E BMAKE NEW LIST( (} ((( ǠנӠm(C(8If you have a word processor, use it to make new files.m(%Separate addresses with two 's.Q(Q(FYou can also use this program to make lists. Follow directions below._A@d6.(?(NEW DEVICE:FILENAME TO USECUA_ A PAUSE SUBROUTINE-@@"(:6-F:Ad,"AU0@w: A$)@$"AUA "AUA0#"@i)"@e# A $$RAND SUBROUTINE.B:,"A086-%@B""6-?::@@,7<%@,D@G$G"@e9 @l>:@,7<%@,D@G$ A0LOAD MENUn A(}@A@@D:*.*U-@Bb)@j(>:,n  @( BLOAD ROUTINE8AR(4(DEVICE.FILENAME TO LOAD8(B:,"A02f A`@5@@A-@M6-@2S6-\6-C:,f Ap<-@ 67,.>:AU,* B-$FK (}-@@6( I/O ERROR #F:A,A@K BP A0ZIO LOAD/SAVEd36-A46-A6'6-A@36-A5n<6-P:'AV,$6-&$AV,%<%%@x<6-P:'AV,$6-&$AV,%<%%@)%@&@$)6-?:C:,<,%%6-F:%,%AV$F:%%@,$D1:MAILLIST.BAS