ö�ë�~# Â�!9"ñ�!šo>Í€2Ã"�ÃÛ‹!šo>Í€2Ã0�ÃÛ‹*í�¯w#w!w]ë!÷‹<Í�)“‹!šoRf�Í“>Íî‹!ø‹>Í*;ÍY3!šoR¤�Í“>Íî‹!ü‹>Í*;!‰m>Í*! Œõ>Í*!‰mÍÞ)Íð);ÍY3!šoRÃ�Í“>Íî‹! Œ>Í*;ÍY3!šoRâ�Í“>Íî‹!Œ>Í*;ÍY3!šoR-‚Í“>Íî‹!1Œ>Í*;!‰m>Í*;!8Œ>Í*;!‰m>Í*;!<Œ> Í*;ÍY3!šoRv‚Í“>Íî‹!1Œ>Í*;!‰m>Í*!GŒõ>Í*!‰mÍÞ)Íð);!HŒ> Í*;ÍY3!šoR¶‚Í“>Íî‹!RŒ> Í*;!‰m>Í*;!_Œ>Í*;!‰m>Í*;ÍY3!šoRö‚Í“>Íî‹!~Œ> Í*;!‰m>Í*;!‹Œ>$Í*;!‰m>Í*;ÍY3!šoRAƒÍ“>Íî‹!¯Œ> Í*;!‰m>Í*;!»Œ>,Í*;!‰m>Í*;!çŒ> Í*;ÍY3!šoR`ƒÍ“>Íî‹!ñŒ>Í*;ÍY3!šoRžƒÍ“>Íî‹!öŒ>Í*;!‰m>Í*!�õ>Í*!‰mÍÞ)Íð);ÍY3!šoR½ƒÍ“>Íî‹!�> Í*;ÍY3!šoR܃͓>Íî‹!�> Í*;ÍY3!šoR „Í“>Íî‹!�>Í*;!#�>Í**ë�ÍÜ);ÍY3!šoR+„Í“>Íî‹!ø‹>Í*;ÍY3!šoRi„Í“>Íî‹!&�> Í*;!‰m>Í*!3�õ>Í*!‰mÍÞ)Íð);ÍY3!šoR²„Í“>Íî‹!4�> Í*;!‰m>Í*!>�õ>Í*!‰mÍÞ)Íð);!?�> Í*;ÍY3!šoRò„Í“>Íî‹!I�> Í*;!‰m>Í*;!U�>*Í*;!‰m>Í*;ÍY3!šoR…Í“>Íî‹!�>Í*;ÍY3!šoR0…Í“>Íî‹!‘�>Í*;ÍY3!šoRn…Í“>Íî‹!™�> Í*;!‰m>Í*!÷‹õ>Í*!‰mÍÞ)Íð);ÍY3!šoR�…Í“>Íî‹!¦�> Í*;ÍY3!šoRÖ…Í“>Íî‹!4�> Í*;!‰m>Í*!÷‹õ>Í*!‰mÍÞ)Íð);!°�> Í*;ÍY3!šoRõ…Í“>Íî‹!»�>Í*;ÍY3!šoR†Í“>Íî‹!À�>Í*;ÍY3!šoR3†Í“>Íî‹!ø‹>Í*;ÍY3!šoRq†Í“>Íî‹!&�> Í*;!‰m>Í*!Î�õ>Í*!‰mÍÞ)Íð);ÍY3!šoR±†Í“>Íî‹!Ï�> Í*;!‰m>Í*;!Ü�>.Í*;!‰m>Í*;ÍY3!šoRü†Í“>Íî‹! Ž>Í*;!‰m>Í*;!Ž>Í*;!‰m>Í*;!<Œ> Í*;ÍY3!šoR‡Í“>Íî‹!Ž>Í*;ÍY3!šoR:‡Í“>Íî‹!$Ž>Í*;ÍY3!šoRY‡Í“>Íî‹!)Ž>Í*;ÍY3!šoRx‡Í“>Íî‹!8Ž>Í*;ÍY3!šoR¨‡Í“>Íî‹!LŽ>Í*;!PŽ>Í**ë�ÍÜ);ÍY3!šoRLJ͓>Íî‹!TŽ>Í*;ÍY3!šoRæ‡Í“>Íî‹!iŽ>Í*;ÍY3!šoRˆÍ“>Íî‹!nŽ>Í*;ÍY3!šoR$ˆÍ“>Íî‹!‚Ž>Í*;ÍY3!šoRCˆÍ“>Íî‹!ŠŽ>Í*;ÍY3!šoRbˆÍ“>Íî‹!’Ž>Í*;ÍY3!šoR�ˆÍ“>Íî‹!šŽ>Í*;ÍY3!šoR ˆÍ“>Íî‹!©Ž>Í*;ÍY3!šoR¿ˆÍ“>Íî‹!ø‹>Í*;ÍY3!šoRވ͓>Íî‹!ÀŽ>Í*;ÍY3!šoRýˆÍ“>Íî‹!׎>Í*;ÍY3!šoR‰Í“>Íî‹!ߎ>Í*;ÍY3!šoR;‰Í“>Íî‹!‚Ž>Í*;ÍY3!šoRZ‰Í“>Íî‹!çŽ>Í*;ÍY3!šoRy‰Í“>Íî‹!ïŽ>Í*;ÍY3!šoR·‰Í“>Íî‹!ÿŽ> Í*;!‰m>Í*!÷‹õ>Í*!‰mÍÞ)Íð);ÍY3!šoRŠÍ“>Íî‹!4�> Í*;!‰m>Í*!>�õ>Í*!‰mÍÞ)Íð);!?�> Í*;ÍY3!šoR>ŠÍ“>Íî‹! �>Í*;!‰m>Í*!�õ>'Í*!‰mÍÞ)Íð);ÍY3!šoR]ŠÍ“>Íî‹!C�>Í*;ÍY3!šoR|ŠÍ“>Íî‹!‘�>Í*;ÍY3!šoRºŠÍ“>Íî‹!Y�>Í*;!‰m>Í*!÷‹õ>Í*!‰mÍÞ)Íð);ÍY3!šoRÙŠÍ“>Íî‹!i�> Í*;ÍY3!šoRøŠÍ“>Íî‹!u�>Í*;ÍY3!šoR‹Í“>Íî‹!}�>Í*;ÍY3!šoR6‹Í“>Íî‹!��> Í*;ÍY3!šoRU‹Í“>Íî‹!˜�>Í*;ÍY3!šoRt‹Í“>Íî‹!®�>Í*;ÍY3!šoR“‹Í“>Íî‹!¼�> Í*;ÍY3!šoR²‹Í“>Íî‹!Ü�>Í*;ÍY3!šoRы͓>Íî‹!ë�>Í*;ÍY3!šoÍ—Í,É*ñ�ùÍÅ+*í�6d#6Í,É2õ�!ó�ÃcYELSE IF !(MQ:CMD)=M STORE T TO MQ:MMORE DO WHILE MQ:MMORE STORE MORE TO MQ:MODE TO MQ:MMD @ 21,10 SAY ENTER E TO EDIT @ 22,10 SAY D TO DELETE @ 23,0 SAY P TO PRINT, PRESS RETURN WHEN DONEGET MQ:MMD READ IF !(MQ:MMD) =E ERASE* EDIT RECORD DO .EDIF !(MQ:MMD)=D STORE N TO MQ:ANS@ 23,10 SAY ARE YOU SURE(Y/N)? @ 23,28 GET MQ:ANS READIF !(MQ:ANS)= DELETE TO MQ:GDELENDIFRELEASE MQ:ANSP @ 23,10 SAY PLEASE SET UP PRINTER STORE SET CONSOLE OFF WAIT SET CONSOLE ON SET FORMAT TO PRINT DO .OUT SET FORMAT TO SCREEN ELSE STORE F TO MQ:MMOREENDIF PENDIF DENDIF EENDDO MQ:MMORERELEASE MQ:MMORE,MQ:MMD STORE F TO MQ:GMOREENDIF MENDIF SENDIF NENDDO MQ:GMOREIF MQ:GDEL = @ 23,10 SAY WANT TO PERMANENTLY DELETE RECORDS(Y/N) @ 23,49 GET MQ:ANS IF MQ:ANS = PACK ELSE RECALL ALL ENDIF RELEASE MQ:ANSENDIF MQ:GDELRELEASE MQ:CMD,MQ:GMORE:MQ:GDELRELEASE MQ:MODE õ�