PHONEBK  
   PHONBOOK d d                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  
  П PHУEBOOK BY MIKE ьERSУ  О Ъ╨\Е F  P9$ї"PHONBOOK"$(  Л N$р50),N1$р50),C9$р64),J$р64)2  Л P$р15),P1$р15)7  Т\Т\Т\Т\Т\Т\Т\Т\Т\Т\Т\Т?8 Т"* * * * * * * * * * * PHONEBOOK * * * * * * * * * * * * ",<  A$ї""\Т\Ж "function: ",A$\Д A$ї"" ▓ Ъ< A  Т\Т\Т\Т
F  О Ъ┌P  Б Cї1 ▒ FZ  Е A1$\Д A$їA1$ ▓ Ц Ъx d  Г C%n  В A$," : no such function"\И Ъ< x  У C И ЪМ ,Ък ,Ъ,ЪT,Ър
В  И Ъ< М  П QUITЦ  В "Quit"а  Нк  П FIND5┤  J$ї""\Ж "find name or number: ",J$\Д J$ї"" ▓ ЪВ ╛  Ч #1,P9$,╚  Д ▀р1)ё0 ▓ Ъ╥ \ТJ$," : not found"\И Ъ· ╥  Е #1,P1$,N1$,C9$▄  Д P1$ёJ$ ▓ Д N1$ёJ$ ▓ Ъ╚ #ц  Д J$їN1$ ▓ ЪЁ \ТN1$\ТC9$\И Ъ· Ё  ТP1$\ТC9$·  В\Ш #1\И Ъ┤ 
 П ADD* N$ї""\Ж "add name: ",N$\Д N$ї"" ▓ ЪВ ( P$ї""\Ж "number: ",P$\Д P$ї"" ▓ Ъ0" C9$ї""\Ж"comments: ",C9$\Д C9$ї"" ▓ C9$ї" ", Ч #1,P9$1 Д ▀р1)ї0 ▓ Ъ@!6 Д ▀р1)ї0 ▓ Ъ@\Е #1,J$\И Ъ6@ Щ #1,P$,N$,C9$!J Ш #1\В N$," : added"\Т\И ЪT П KILL+^ N$ї""\Ж "kill name: ",N$\Д N$ї"" ▓ ЪВ h Ч #1,P9$\Ч #2,P9$r Dї0| Д ▀р1)ї0 ▓ ЪдЖ Е #1,P1$,N1$,C9$Р Д N$ёN1$ ▓ ЪЪ\DїDу1\И Ъ|Ъ Щ #2,P1$,N1$,C9$\И Ъ|д В N$," : ",о Д Dї0 ▓ В "not found"&╕ Д Dё0 ▓ В "killed",%3I,D," time",┬ Д DЎ1 ▓ В "s"\Д Dї1 ▓ В╠ Щ #2,&1╓ В\Ш #1\Ш #2\И Ъ^
р П FIX*ъ N$ї""\Ж "fix name: ",N$\Д N$ї"" ▓ ЪВ Ї Ч #1,P9$\Ч #2,P9$■ Dї0 Д ▀р1)ї0 ▓ ЪЮ Е #1,P1$,N1$,C9$ Д N$ёN1$ ▓ ЪФ& Dї1>0 Т\Т"name:     ",N1$\Т"number:   ",P1$\Т"comments: ",C9$\Т1: A$ї""\Ж "fix (which one)? ",A$\Д A$ї"" ▓ ЪФ%D Д ╠рA$)Ї2 ▓ Ъ:\A$їA$р1,2)\J$ї""0N Д A$ё"NA" ▓ Ъb\Ж"name: ",J$\Д J$ї"." ▓ Ъ0/X Д J$ї"#" ▓ N1$ї" "\Д J$ё"#" ▓ N1$їJ$\И Ъ02b Д A$ё"NU" ▓ Ъv\Ж"number: ",J$\Д J$ї"." ▓ Ъ0/l Д J$ї"#" ▓ P1$ї" "\Д J$ё"#" ▓ P1$їJ$\И Ъ0*v Д A$ї"CO" ▓ ЪА\Т"can't fix it"\И Ъ0%А Ж "comments: ",J$\Д J$ї"." ▓ Ъ0/К Д J$ї"#" ▓ C9$ї" "\Д J$ё"#" ▓ C9$їJ$\И Ъ0Ф Щ #2,P1$,N1$,C9$\И ЪЮ В N$," : ",и Д Dї0 ▓ В "not found"▓ Д Dё0 ▓ В "fixed"╝ Щ #2,&1╞ В\Ш #1\Ш #2\И Ъъ╨ З 5'┌ З "QUIT","FIND","ADD","KILL","FIX"Оg  ╘f                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      216-793-8034MIKEIt's Me....!216-793-6221
DICK SMITH
The Boss !804-526-6100JORTOMCOL.HGHTS.B.K.,EMMETT,TOM804-526-6100COLONIAL HEIGHTSJORTOM,INC.1-800-553-8000KIDDIE RIDES USAPeter Gurko1-800-528-1409BANNER:Pittsburg above:for Balto:1-800-237-5000 or 1-301-944-50601-216-482-3235CHARLIE(Work Phone:Frederick Communications,Inc.1-216-788-7910CAMPBELL BUSINESS SYSTEMS(Tim McFadden:TRS-80 fixes:Bulletin Board1-216-759-2422	INSURANCE8Don McTigue,Liberty Ins. Agency,3999 Belmont,Liberty,OH.1-800-631-8084ROWERoy Asbury:Coin Changers1-800-243-8764	STANADYNEJeff Anderson:ext. 2225216-747-6062-48MCI)Mid-America Entertainment Management Inc.1-800-343-6565ATWJim Chen:1-617-933-58191-312-647-9655ABLOYCoin Changer Locks:Ray Haney1-814-266-7014	JOHNSTOWNBK:David,Mgr.1-609-778-1200STEVE HINKUS*BK offices:303 fellowship rd.,Mt.Laurel,NJ1-215-666-0440STEVE LEWISOXFORD VALLEY:1-215-946-79841-800-621-2391BALLY6Ed Pelligrinni:Len Budner:1-312-871-7600:Bally Midwest1-215-946-7984OXFORD VALLEY.BK:Chuck=Dist.Mgr.:Marty=Mgr.:Jack=Gnds.Keeper1-216-755-2224KarenCharlie:Karen Nattoli1-216-793-0821BOBbob Partington*"Bridge builder"1-216-755-2224KARENCharlie:Karen Nattoli1-814-238-2281STATE COLLEGEBK #606:Mark,Mgr.1-609-387-9120
BURLINGTONBK 1006:Terry,Mgr.1-412-869-4668BADENBK 26451-215-627-4840PHILLYBK 2947:Greg,Mgr.1-412-655-1577BALDWINBK 993:Lisa,Mgr.1-412-828-0669HARMERSVILLEBK 25461-412-751-2828
MCKEESPORTBK 2909 Bob,Mgr.1-412-824-2578N.VERSAILLESBK 3030:Tom,Mgr.1-215-521-0909RIDLEY PARKBK #506:1-609-858-6808OAKLYNBK #533:Virginia,Mgr.1-215-544-7009MORTONBK #327:Steve,Mgr.1-215-565-5472MEDIABK #9641-609-853-1444WOODBURYBK #979:Mary,Mgr.1-609-234-3343MAPLE SHADEBK #2557:Tim,Mgr.1-215-338-7918	FRANKFORDBK #431:Ed,Mgr.1-609-587-1880MERCERVILLEBK #530:Filindo,Mgr.1-215-687-5066DEVONBK #6231-412-628-3314MONA-314 N. Prospect Street,Connellsville,PA.15425A.15425