CP/M/CPM_CDROM.iso/mbug/mbug105.arc/MAILMEN.LQR/GETMAIL.FMT

Text File | 1979-12-31 | 3KB | 113 lines

* GETMAIL.FMT SCREEN FOR USE WITH MAILMEN.PRG COPYRIGHT JAN. 1984 PHILIP
* PERLMAN
@ 1,0 SAY '+==================='
@ 1,20 SAY '===================='
@ 1,40 SAY '===================='
@ 1,60 SAY '==================+'
@ 2,0 SAY '|'
@ 2,27 SAY 'ADD INFORMATION BELOW'
@ 2,78 SAY '|'
@ 3,0 SAY '|'
@ 3,20 SAY 'Check your entries before continuing.'
@ 3,78 SAY '|'
@ 4,0 SAY '|==================='
@ 4,20 SAY '===================='
@ 4,40 SAY '===================='
@ 4,60 SAY '==================|'
@ 5,0 SAY '|   Company'
@ 5,13 GET company
@ 5,78 SAY '|'
@ 6,0 SAY '|   First'
@ 6,13 GET first
@ 6,34 SAY 'Last'
@ 6,39 GET last
@ 6,78 SAY '|'
@ 7,0 SAY '|   Addr1'
@ 7,13 GET addr1
@ 6,63 SAY 'Friend'
@ 6,71 GET friend
@ 7,63 SAY 'Business'
@ 7,71 GET bus:xmas
@ 7,78 SAY '|'
@ 8,0 SAY '|   Addr2'
@ 8,13 GET addr2
@ 8,55 SAY 'Birthday'
@ 8,64 GET birthday PICTURE '99/99/99'
@ 8,78 SAY '|'
@ 9,0 SAY '|   City'
@ 9,13 GET city
@ 9,39 SAY 'State'
@ 9,45 GET state
@ 9,50 SAY 'Zip'
@ 9,54 GET zip
@ 9,78 SAY '|'
@ 10,0 SAY '|'
@ 10,78 SAY '|'
@ 11,0 SAY '|            Business Telephones'
@ 11,43 SAY 'Other Telephones'
@ 11,64 SAY 'Location      |'
@ 12,0 SAY '|'
@ 12,13 GET Tel:wrk PICTURE '999-999-9999'
@ 12,28 SAY 'Ext.'
@ 12,33 GET ext1
@ 12,43 GET tel:hm PICTURE '999-999-9999'
@ 12,64 GET loc1
@ 12,78 SAY '|'
@ 13,0 SAY '|'
@ 13,13 GET tel:wrk2 PICTURE '999-999-9999'
@ 13,28 SAY 'Ext.'
@ 13,33 GET ext2
@ 13,43 GET tel:hm2 PICTURE '999-999-9999'
@ 13,64 GET loc2
@ 13,78 SAY '|'
@ 14,0 SAY '|'
@ 14,13 GET tel:wrk3 PICTURE '999-999-9999'
@ 14,28 SAY 'Ext.'
@ 14,33 GET ext3
@ 14,43 GET tel:hm3 PICTURE '999-999-9999'
@ 14,64 GET loc3
@ 14,78 SAY '|'
@ 15,0 SAY '|'
@ 15,78 SAY '|'
@ 16,0 SAY '|   Prior. 1'
@ 16,13 GET prof1
@ 16,35 SAY 'Prior.2'
@ 16,43 GET prof2
@ 16,78 SAY '|'
@ 17,0 SAY '|   Prior. 3'
@ 17,13 GET prof3
@ 17,78 SAY '|'
@ 18,0 SAY '|'
@ 18,78 SAY '|'
@ 19,0 SAY '|   Comment'
@ 19,13 GET mcom1
@ 19,78 SAY '|'
@ 20,0 SAY '|'
@ 20,13 GET mcom2
@ 20,78 SAY '|'
@ 21,0 SAY '|'
@ 21,78 SAY '|'
@ 22,0 SAY '+==================='
@ 22,20 SAY '===================='
@ 22,40 SAY '===================='
@ 22,60 SAY '==================+'







9-999-9999'
@ 12,28 SAY 'Ext.'
@ 12,33 GET ext1
@ 12,43 GET tel:hm PICTURE '999-999-9999'
@ 12,64 GET loc1
@ 12,78 SAY '|'
@ 13,0 SAY '|'
@ 13,13 GET tel:wrk2 PICTURE '999-999-9999'
@ 13,28 SAY 'Ext.'
@ 13,33 GET ext2
@ 13,43 GET tel:hm2 PICTURE '999-999-9999'
@ 13,64 GET loc2
@ 1