ADR.DOC Address Reader 1-10-90 Program to print address onto an envelop. Opens the file where letter is stored, extracts address, and sends to printer. Options allows various styles of return address. Printer escape codes may be customized by user. The letter must be written with the mailing address flush left. Nothing else may be flush left prior to address. Address must end with a carriage return. Wordstar dot commands are ignored. WHY BOTHER? Blame the Hewlett Packard DESKJET+. One of its many many good features is the availability to load and print letter envelopes. For the first time (for me) printing addresses on an envelope is a pleasure and a delight. Together with the DESKJET Times Roman font option, these addresses can really look extraordinarily nice. This program makes printing these nice envelopes a little easier. USER CUSTOMIZATION. The program is useable for any printer, with or without escape codes. Start by putting your return address (or addresses) in the program. The default return address goes into location "1". Printer escape codes may be added as desired. The "S" or "Simple" mode uses no escape codes. The "E" or "Exotic" mode uses "Escape" codes at locations 0130h and 0160h. The program as released uses simple mode with no escape codes, but the DeskJet codes are available for use by specifying "E" mode, 0 indent, 0 roll-down. Addresses available to modify are shown below. 0100 C38704 JP STRT 0103 20414452 AAA: DB ' ADR v 1.1 1-10-90 ',0ffh 011A 53 APT: DB 'S' ; printer type S (simple) 011B 22 API: DB 34 ; printer indent for mailing addr (34 spaces) 011C 05 APR: DB 5 ; printer roll-down for mailing addr (5 lines) 011D 01 ARTYP: DB 1 ; start-up default for retn addr 011E 03 ARNUM: DB 3 ; total retn addresses avail for use 011F 00 ARSEL: DB 0 ; which addr selected (prog use only) 0130 APR4D: ; PRINTER ESCAPE CODES FOR RETURN ADDRESS 0130 1B287331 DB 1BH,'(s1p5T' ; proportional print, Times Roman 0137 1B287331 DB 1BH,'(s12V' ; 12 point char height 013D 1B287330 DB 1BH,'(s0B' ; normal (not bold) 0142 1B266C35 DB 1BH,'&l5D' ; 5 lines/inch 0147 1B266130 DB 1BH,'&a0L' ; 0 left margin 014C 1B266C30 DB 1BH,'&l0E' ; 0 top margin 0151 1B26612D DB 1BH,'&a-1R' ; move row UP 1 line 0157 0D DB 0DH ; CR after new left margin 0158 00 DB 0 ; must end in "0" 0159 DS 7 ; extra space 0160 APR6D: ; PRINTER ESCAPE CODES FOR MAIN MAILING ADDRESS 0160 1B287331 DB 1BH,'(s14V' ; 14 point char height 0166 1B266C34 DB 1BH,'&l4D' ; 4 lines/inch 016B 1B266136 DB 1BH,'&a66L' ; left margin 66 0171 1B26612B DB 1BH,'&a+5R' ; move row down 5 lines 0177 1B287333 DB 1BH,'(s3B' ; bold 017C 00 DB 0 ; must end in "0" 017D DS 19 ; extra storage space 0190 52657475 AR1: DB 'Return addr - name ',0dh,0ah 01A5 52657475 DB 'Return addr - addr ',0dh,0ah 01BA 52657475 DB 'Return addr - city ',0dh,0ah 01CF 00 DB 0 ; marks end of data 01D0 DS 16 ; extra storage space 01E0 206E616D AR2: DB ' name - style 2 ',0dh,0ah 01F5 20616464 DB ' addr - style 2 ',0dh,0ah 020A 20636974 DB ' city - style 2 ',0dh,0ah 021F 00 DB 0 0220 DS 16 0230 00 AR3: DB 0 0231 DS 79 0280 00 AR4: DB 0 0281 DS 79 02D0 00 AR5: DB 0 02D1 DS 79 RESTRICTIONS: - User numbers are not supported. The program will open a filename in the form B:XYZ but not the form B3:XYZ. - When saving new info to disk, the data always goes to the current logged disk, with the current filename (taken from the CCP). - A maximum of 5 storage locations are reserved for return address style variations. For a very, very long return address, the only method is to use two of these locations. Just end in "0". - If using escape codes ("E" mode) the first character (at locations 0130h and 0160h must be the escape character (1Bh). Send bug reports and comments to: Russell A. Gaspari 6656 W. 87th Place Los Angeles 90045