{ SWAG NOTE : The sources for these are included as XX3402 encoded at the end of this file !! } Anyway, I've 'cut' together this contribution. I believe.. well -hope- that this code will be of use to some of the pascal-programmers out there. It consists of a low-level unit to manipulate textmodes, a mid-level unit for some simple Windows-boxes, a demo-program for those two units and lastly another Input() routine (sort of version 2.0 of the one I submitted over a year ago.) If you could keep the STMR_LOW, STMR_MID, and STMRDEMO source in the same .SWG file that would be great (so people wouldn't have to look for them all over the place). { STMRDEMO v0.1.0 - (C)1996 Eddy L O Jansson / DFR Research & Engineering Desc: This is a small demonstration of some of the STMR_LOW & MID routines. Notes: This program will demo screen-modes 3 (80x25 and 80x50), $55 (132x25) and $54 (132x43). The last two modes may not be available on your graphics-card. } { -------------------- CUT -------------------------------- cut and save as stmr.xx and use XX3402 to decode : xx3402 d stmr.xx { ---------------------------------------------------------- *XX3402-012774-291196--72--85-59206--------STMR.ZIP--1-OF--3 I2g1--E++c+6++mLTG2Hzm-oH-E++9pV+++A++++IpFBIZxAHpQiI23HvHnxQletYfyb8jz0 JRz4hI+mMA0CswIjyk6qXfbnJlYQ7tR8PMYNqQla452XML-GqPzxpDeM1lU6Rdn2SyytrggC IejJLydiGHpn5jc0ifqXgnwCHmtqs1BoGHESYd-1Xos3514DkVYP0nyY56e5P36Cu1IBGj1Z wODDXlx-D-OietJOdENZ8CuKOfzxhUJhnvi-EnW-zt9cC+hV5TPqny0AQYcWRk0zEXiwYbVd t6RLXlx7N5iIit2z2Xs94uc-rd16NqAC+NicSG4mh+U4YYlzB+u6c0+YgIB78ux+RnkOgIVk Y2oox8W5S6fRBuyPuqzOrKMdUMJWPODyR5D1+TljzPY1J9UZ-xvsYFWH+9diF4b65IHE1tXv ANZFIUUYx4+sZckAKIEfo-js5CHzl610Sa+3hEt6X+Gj86PCCPaWVfQKjNE1sMOBkGIVX9ZY +r4AIGLMCVln6Pi0EC5gmCNWOER42LCdBwMdCn+UplFliED4OEUV2mUMsbYOZLn4cMWlv0BO UjEF+FAq1XkBdo5MBMo4Z0VVgIiQDU6udStMY5t+kJRBs6RiADNccjHyK615kc7Et7Dk-UTv cg+FXxKJNVquJ4W73XR8CqbHeG-fCs-zCm4Pn2W2kiIsR342j39Fe6uNc3l9wGYQgN0tUsUB 8L0hSYS7-MaGM67uYe08+ioWI4l-2nw6U6L-1IlMx32ykQPqpXAhLwtNl0jE7hmLzNTyZ5cO FORkHJ3ip3CY3Rn+8s+TQV4B3Mp8z-7jH9CKhqK3Q2u5zS+4qMS05CK5JsIIUx+FWjKyd7AC qHIGfoLz2GInEJnmJm4Ws12tJVDJCZrjbFMsv7vphDIcpW98eJ0nQWJqh5b2Vid-JMa-F8+o W1q8cZdt+pU29skp1mal1C0Y2WQ83ZYQ2S2C3Cunre2ZQI70cR+culZ3v0cWEsEqSZ5YoqgO eEaVg5TG9O-YCDllQjN5Mj6VoqVEOAWGb7s2EEIu-IyWifeWL8yDDl5MWxV6EkK0LJ37IdFG hXNZ476PFNqWq-qEw2efMm9PCsKVN6Rn32NHWAXjXkLZnrM57B795lQBEFjlZ86dwF0ha11c rkXoCCyAjFfZaaKg-ckJKXaJEbH7Uc-BgAJZ5ar+VEEdlbB0xy+EhYheNi684Va14ofcYDiS wdAEoJ3+L6AJ+gMyXYRZjIUbjVU+3mHoG6Gi8H+fPtSBPW9zOW0Asv4SOjygrPtcbfIfQAsd yA7-jTWLByeFXm9Yp-QJu0HeXRQadu5m3IA8-+dWEA8DmYO+ZcT21lkocm4tuKDrNIGdt44Y b2Bg+kVxHGKEFsq1O8iV1O0SRzC8YqVQQIJ3IcNzyvv5Xhix-hEPxSfKSbpXEnLzRw-46lfd bidacvOpLehK5nzuwjVFtvXLDhhjvfMFCIcEXSe6H9IDCe+c21-z9y3tTETVfUZ8jLjVkB8z nmMqk6LjWE54EiUSf1f4H6q1HgYJvTeTu+lc+kpXlkmuSBcxS3fLs-4xlb1sljQcIu3NUvRi -2KDWW5vW+tbNquQAXwIBA9kbctGTQ6dwG98CJmmG9ahO5qGC2WQQjRRHxbK9Ada374PxvJ8 NIOW5p15Wjn5XnuLrwCyQKrEEEciWIjVEzYCTpxECuQqx8ZUW1BcTUn3mBSMIkxM88SN14UM FnzgkU-6+jyH-A1E9Fjt+ACU0ixIXoH9j+5V1opQHZm3nFfEfP7Uf26uSijlm0C0Qi-gG2rk FD0fUDJ7+BQYwZ3y42jsW9cy0M6P-K+3ClbsvU0CnfgxFQE6-2AoW9GWv1XBRV70ZI2fDxdE PUUXOWlfVABQ-ooY+sa88HL+q2hul4i9CSvBuJDKjUl+qo-eUcHorG0GA1jddboz019gl8vE WLqUBivG1989m-TovHgnv8rnHfCqcryT0xu+fcehC30ZeHV065SzPNKfjtLfBKQyDmr4jeK2 EwuJNfpsm5A5bqepQbo1Wdxcl5Hs9abbBNyv8W8-U+P180M7fQ+iYtHucH6O6bZ-H9UGhJKO I42hKju93gihmHFPVqot8W6r43Rde7AnZTGd7+N1U16Tzz8GFXEI7jNDI5AQOJ+73S4M4E2T IHbhW55iGnn40uSG8wYJYrBXJaZH0NQ396cHCUfBU1A9zAGcNTR7wgUwyaHCX4rb+jrhsVn4 W-uyFYqAJoFzFPi6+sLs2vKvG4SfeWnl89RRRPJOiPNpClqhfdZNpEWa3tg81xQosiWbt8Dl kLcTF0roYCW2L16WW-x0EJZt4NAoLeV+owM-RUYYnhMYBVcWm4mKJzWf+Dlaq4S-GTUYF3wv zN-CIVW8u9XLyrt6cdiGnM4aN1U8O6Mh6zPbHereGCHDbenJKgw8lmkG9DnfDsvNBEq0jzvr X+uNFBdoQTRGo-tn7LpPNKTwCHfUSESPl6tvKs69BLd4lHU8iIrNHHUU+U9auUosObU-Zt61 10O8HwCByNr5fCtu8Aka-f6ugpdR8n4PRCQkP1Cr5wNkbsb-f6dp43kg-sKUZs5+73-Vl+qn Hjg4Tfbj0luXGmPkEsJ-vtwac808OwravasdLwFDiVadnYYwPiyaqfhlSpsOZvyyP+0od4c9 9DoEXIWWjf9Mo8j4dBpytOJ3AWjGD-5Z4ybCH8fsIoFoXohonaWy6dKwtSjMFfCCTtkkjabt qVJekiuQO0KWS5patpWuKiQZz6r9RNS46f7dHlQOCgYlVjXiCwXwZaad6H0Ha+OMLudzrWrB upAvL7R32SIX3bcOVno8KmFZDGgayyMdBr2oTMiYNwsuIcZzgiBvAD8QO-dAbdRMuCv7sQZN 9CprmkKpadmGzDcqVcOwJPxPPXof1gChGTPJsOfBb3LWvCf93ItdRZBFKZ2yww7dgGYip7H5 IoQFXXpjm6iRrw4C3Ydc9m6H6B+uSKhrUsaficnMo2PDhwworSySOQd98mvBQSXF89X7KBwW Oqil8Hem7yf7iY5t0qYwe3Eetj2BDiM74g3L2LFmPjon-NpEQRy0XeABLm7dZCyR7Kq5971q HsbeGkHwumqhSfawPWAf-HHX++tF+UwUNttDaKCd-1HIXoGTCpnuPU7NIEW8jXfUwGG1i3C- +MjwHyV9+yWHO3ptqizV77F2omeMARwrFZ5eSPNRzQtLocktnmfdNqLhAtZZpbWJafufCVOu YckuIW8z9rLYS7V1mSq8XiLt9PFkjBuwVE6khIzKn5qcsugGjMgoNyLtNgM59Igzja9VxmLP DGoPDCAIjYg0bNkJKEG3DcY87SD3zl39yzSI0N7NZt+jXSLGD2V7HQZhFaMnxfQgYrVUAcjh RPbAohNoHn99KPSrmkZyg8VWuzcp9z6g3xZRl7IK43tuhxXoBFKfN8qGFs5LAwUXa5jlSvai KCc+-FNuuHqqb1+Ir3sH3m9e0V7S-PGk87imltLzw-9GTuz+5V32LSGHXnHI9ZHtK5qTnr34 RFHul-E3D3aI0VXtbMv3YxkfWBQIVlR56fcaYTDquPibRJqyZNPwLCuekPC+QcfW95Qdk5mx se1w6w+i4oQizL3OD8BwLcy7c2SOX98xwcRzQ2LUvyN4DriIucTfv57ZtPma6gzoiqv2Ua1F xa5DFyCG2nfOMTn+X2jF-QHKDZdfpvSJKCH+6j1M78nAIEoSjQHWYzW2jgyaecFAcOl+n-HO TZLJfNmTebmWdbvgbJkQJt86cgiiz0+k3Gw-pWYd5uOeqWECGF7mZLR6RcuZOOrCGPQ03pVE Fs67iS4433HtBRPV1CYED2JJQ7BPgR4GwrooGZ73CsoKMk2ZsLTrrapxUpngbNqrGmXnDNzf ZjraMJQqxN4o0V6dp2YCIWQMe3tRF8UjcFKq+zxecAtrcDWmfyf77+9WTfm8q-XnCSnWiF9M Nu5MbavD3b2ELvld5KN8EcvMBRqc3ux7N7OrYr9MwGbVC-Hur50q9iEp2mlvNR0Oesqt4B06 jgqdMZ2RvlNJlymC6wuWy6MgSmOjygmoOQ-G-j9+xuXinHETgqV6UdmC3hMQlyqubee1fbZ6 Eu3RmHfUmRcRGeeIYXd5dsThczNlfxbfb-mjLac2HJDdW5EFDbnwG5NT+lYsJTgMC8Ocp+w3 fBJYCkqxf3FL8J7OBBDIqRmjpUTaNryObepK5SHABZjUh++nAZ3vPX+h61mr5adpT8MxQAVG CXCpJ+ilHtqpnFUbtEuNdWN+PQ36F98XwLthSzC1cgD3jaHaiF8hb9YUc-n9HVkHfpHZ7ovW HVpPksVhT-0dhZcAU+FKLxGfdUEmCIpusOFqU-hp8D6FQOZufk0km-IkhD775dqreFj9ABDw JaM4HWOmi9dso6cvLPXv3FNiIQ0KcsvFa+z+klUtnscWdXxJpqlMrszDzObx6I3JLH6OVOZ+ TByTTYWBSvhcbDcFS56yvXjbjOvwBKIccM5XqcI6Pa7ovvaDSDxodtzU3NrukVcTxyKH2hqf I79Ro4BtrzNvq-wkBU9J9w3kB68BN7jWSu3+vpVGxjxHlhNapHLJbAk1tj3yiXntWcdAYEEK 2lqexOXAC+ouIRJK0T+n5ToJw3ophq7ZqPz0QfW3OhnVGDaSkZw3l6u3qewYh395hqUCzYH2 Vh+MMokQcVvr3MDpZ8JVL12XjqM+uM0rjBUgFyAzKgyt+RJ1VSOlgvmQvC4mwunqMP3yZdSA DFWadUaGCFpxEk5K+p9OvY5nf9bPOtz36qSAogbDvatRITK+S4vqSaSRpbajjM1bNvIZL8xI ATK+13UdK17gaqMBKiLsCRbvGZJ8Dm7wkaTN+mxpEN3feaCyd9-p9qmol7UlG+LGPdtrkh0N XMKq26K4JyPp8lg5er2IB15Kla2Gt9uHlT43lVES3RIYWKGut-IiJKxTpYGYli6d36tRqqzb XFqGXlFTA+el4ZmxrMYw55NPIClHUQ2Mnvacy8TS-0KqYIi7Gk6L9jpEwdIu43MXArb6xoit vpnNxKwPz7SpkPz5ZaHpKfmzWmZvImQZzrzPxTrMRLfPcwn9FQDme6hGEK3xEa4d1kecnp1M fRDAdWqYNfzYqfKWg0Tv8BZigFXLXQfpPB9U-dcQDUXkiKP6h3EWgt7LBkJCv8fw3xpwrYxZ OKPlTsObHy5YhBQtujlD4rc5bStz6ZynDY5PnpFdEt47evYlvmlmf57wBL-IYJ5cilEOtK94 0OFRWXhRx+duIo6Qh1ij1rfUsXI8XN9pQ7z7P+cihXhYyu8npnhMg7b7aW2Ony9w72OcNhNf NachIXNf5XC90kKxgYrQiEXq8nM-rq6HTrhhdvRlKKobKfNuzt5OjaoVvh8czwrOz5YOmikx ttTXt2SetIspjkzeQBV8tv-xT-wSvqimiardvRx+JbTq3ujMpEdpgExSF9RRg3yFmpreKlzm mKXO-pZIeNbIJtDSpnzAyCb3VucnZnylN9JLKm1HCxGzDiGHpziHeHqojNBIJuyETQ+bixwU mxl1sRh8wXt8NtTum6JWhMQGiRneLbt5cTTBIMRJQcfgpAa6Ibrvm+vWgtR68+HfIqBTebOR rZH9CjD1YeFvg50Yfkh59A8-YaS0OpuXBczmQDCxhfKpcod6w7VqYe7GPTfJ0MCOugzkoy9A 8hzFrvuiBfibYQVPB5E5El7xxACf-VHJhn1J-vu0waZhMoBzW4vrgDluvzbalZPlR9RHUhQF 4EpwZtRR2bbadMoI8GJRPcWjSg-nNyj3ZjvW7hOSPpKbxKfe5FccjhlmhagpdpuhuYzkeMd6 9AW2HF+yXWeOPrWKyqDwJ2s7WhJ8jNs+pdwbU9e4gqFqHQJONKAP+PwgACTZJfjEqCz9b-D1 XEztZ9taJvyqL1kjaQnNdv5QzjmDZCKOcLQmJCwy1DIipQonqywej6HnYEApyRwxBUaHrPQe 4lks8Kzg1dHan+bNKzDcdEzF-cavFgswSkPc-Mtf+tZwhdge-FAY3N4pFTjoEzh3KpBOz0Id ***** END OF BLOCK 1 ***** *XX3402-012774-291196--72--85-26461--------STMR.ZIP--2-OF--3 eBnfb9JrRLKaCUD3QY9tO+tvhz6893QhDZtKIpWfJXRWgwbIQWuNmtPt9WvOfBJeeaUHxwUG PHxMKW+uKrKviClo6sr5HiNC3po69mvLLHm3RSPipB31ZcgyJSiv2gupSfJOlHBnxFpPz++M Tfa8yCcfhiN9dM8-lzELCQp5RprwlBXjXP6ypJt0HeP4S+K0h4aNhT-WCStoaT78e8gfcnMZ sbzs6LcBqOYTWiX4ppfBxPIxyTzelXcichUvfqrgBI5LYOupBaLzxfdROD3NwPNeI10nWz4J fnuqqX+B4YxvRnoBcq6B9aZjag-gmvbOpKEixF2qJSOPk9lsjfuqrodUh3jIAmuWVsp3We-v daQHuGbhlDGc4kgn6rlNJ91TdpTefOEtzQmfQ337zefpodZPW54Yjbcr6ZQI+FWo1d71Q1Ym jUvk2aSC5jbhwc9iv1g-GmV9TC9+gGLBWdVej+-bOfmxMC3wvz9aOrvfT6Aw7RnuhMcQ4SW2 kWumn-46ZthWQtiLq8l-bI5P9AAIJjy7-najVdCY6Y5yOCE1aTZJJX7IBq2e-RbO4aFH22oX Jmb6j0nAdqCh0TiLI1mWkzRfJTbLK8hiPjvq+NTHyvILZQdOjTeVVDsrhCae-4qwD-JFQOoZ sNpe0KX+uKnLhif0ZxxAzTlbX1jX2TnGjTX3YTwSz+8zkWwbUFRzmjQLjG6nOm0hMBonxkJU jMDCj36+qPhUrRSxo9ZTeWezidbUhKwC95pp65Zrk06xA8BWxYlaaq94wlpqSMaT1nJxhcAM 6p6zAjCvIqTaew8qlptqeuhCYuRavXSnDvV+Yra3pvas4KuYyRQEkr4+0Ow4pdgwgqyqUp7p zX4LxWq-XAsYOEQn89L819-aoBeXzKyfzPe1iNr-jMvKuSBLWdAftwyn5weLXSrXjQfXFzw5 I2g1--E++U+6+AoRT03JISirR+I++1oD+++A++++IpFBIZxBGIEiI23HpJRRPm6r35p5sXxQ fJNZK+lV-d7aEOVBU0Fo+sYMBc0WRCIk7aAhX755EBVcTxIyhBdyDjGVTSVHDuHqdLxVTo9h wIkUT4qr9pJ56XClnvbbrChf1nnre+0vJKyyeBQeFPU14zDl25gyhAWhU1dn01HNK30Dy41I eNASY+YN7C3pD5MLXw2x3mPNH1NXEVeAQh7wybEDecsnUpAsUwxYC7xtg+CJcmMoWIwkvvbk 2JGx4laLQCfRl4Aeq+LaZ6pxS1GAV-s-XxE3+qaAXgM19+U6OKwcrTYNgASX2SD0-nZ2D6Qs 8dFVLlkT7CQkAAmQxGGTEu1ipWs06bf7XBM3SD62KWvpUTdSEU04DjKcvl65-jGOMnt1I2gA kFRoA61fAFosoXD6b6EYNGEvW4CvoYOD1MRmoWzco+oaWyWlbgjNY60jfKfNAVjBC9plFEUB 1Q-Fgpdh5nGf4LXi2u+0UQm+xaT-cnzW-1jmAECpDgnM48PM2w311rjUmk8cK369Eo8sq5id tV7+oYBA-kUMZpKQLOjdDWQ2Sh62g1tALJbJ0S2-SY6Ym03VROc-hE-29iWbDiPXH2xYd1Bp 5J45BOeh+ZU38virMyJmkT0n+FiB0BQnqLn-rBglgxZsv5IwJaioegqXUr6p5dDdyPe-HgzO FGIaNWAW7Mws5d8KT6Pk8c2hJ7hQvZo3i-vnT04-9pGLtfCrpau2VA9VH--7S4kK6w1ySY1i 5a1af+L2DK-rJyq60y9XhCeVHpHHnkbtr0cVjoeEZ+MR--YJtcaJ2deO8CfvbJkBCELNEACa rWfVVnRzTjTx5wg2Am-Iq5WJwDDPbvvuwShZUeIJ7aGBkhjTjzXZaqJ0HVBQhYPVnKxTzjfh AW4jovt9Lw9FqCg7mXmcSM9kDisFi2fzWmg6SAtNXnVXHg1iQI6wKn-CX+basTw3C4RIuGG9 ey+awEBso1bf06iIBjIQBXpYhm5w3grE39bcV-s6kR2d0qu5iDRGDFF+fLxF5mH9ZkukL9dW OAD3IYTm4FgEv4qoMMIyCeW9qiVYiswBWijhVTtC05PCyXtGxtJEOd166Po3ztbpMstbRS9v y6PAmqUjlSVeaKKiB2+wpHIuzuLQ1peh7Xcw81xP78hSekp5+n8IH-lor+uIpQjfuhzpKepy TZehJlihUpPhfD5-rLRBPeUb8rtAF7oA1Mp+tv6OBboJS6Muat0QNQXdmwS5yxZg6Gij8uGV bnz+2gwdffDkrduCP6FOISlZnESyXWFaUyRJ5zzVFcZmYy7Z3rAJrsXYqskvFeE8xgYdv0RH CGj6fw9lx49CG2rH7deZHCGa9QrHdWDKaFk7r3lOJwZp+FuGRS9PmGQ9ueNmz1umiNaQQeLx uTigFk3g6W7udlhIOuhiPVAhIBp8rJpDpRLSPXOzXHdLrYHT0yao5rMB07ScFcYOFWxUhDdu yR-ykB2JLekiacNHijSrv61zllYR3K4yQPTvFM2td0A3VKVn8YWbKnMu8HAJSSd4j2HdrKJW 4NRTk2LiYLOw2Ncu7RuBQ6oEhe-kxOuIK5wOTSV9Ns8tJCww95MVD8CWGbI87QBiUoAbM0LH FaX9HYMXNhVgwsbuKEKgYVbo5JF6nyXc9-R9bXPFDG3ZcFkmfMzZ7mgzSmXuycROT8kDtH9l -0S4XPffAzzUJqOMiYFoBuTSNlmurI8dertvRJAbOFAQdbfoTWgh5IYeb3EAxeQGLHduESrd Q1xrIao3Jev0CJb1PXTR9KJpsQ9hDsROJXM7NC0HBJDaIlp2JqP3JgeI8DYbh8N23kyCl3y7 t47R1uj5hMMAQuSIleCRaYQ3lEDuGbynS-qDJFiJH1nqBp-9+kEI++6+0++l5rkVVpR7A-28 +++d4+++1++++3BIHJ72FIpD9Z--IupMzL9OmVLzDnBtVBstRy8d75gVYU1PUN1KlXXEqi-- lBVBrQu0pYMHcOKGg8LfWFygvx1SJyeSLIY64xwvvOob2OgxLvzngKRrRF5mit+ik-aTXovM UfTSjbZwykPISzRw0DRapOeOI+4xMpUTDil1prJHC6AVz6Y4IQE1S+wbdmAMgMXFQ1O5roAr iDA0lY6ji5jvFWUvMR4g8IQkbbgFW5wIcULpTL03mG08EldvEVCzVMUj4Dv4QmMlzDpgC-2e nzgb2D7J9DF4JOZek4AKZPIiAowSj2kjF9CEgO0ms0u9c+PucNbM1O0-0q9IA+o0Cso4u3PB 3jA48Y9OHeCiticpcmdIAz-d32Dwk23dKh+I+Vv1Z+4xdttDdvu+5218Jm2e2GWKQqwKJKMo R+LMvkXmGmEYQsS65+WTKYWuD-c7gGZgz1KDotU7AUlxpt3yNDALr+hW3auEnUKihMWU7-N7 fNT8rfstLEIn4ScFcyuTKRc2GE6jw2JcxNrXyjgRwz1xHiTYzMth4NgmUjwWN352L054iQxc 6-WaH4FPq0lFqyRgATauMtdpgmaSph5BlozDdXcrEdE3veM37xNbK+zEVyMN1yvuEKkolGmK Yi0wdlXUe8awIhBT9TCaV27AubrW656lPfORYda9YAyMikcNXAzEqmi9L3jYmWPLBXG38LMb sefgRvXDElIrJDI6lw6p3gndEcg+VK2GSb2ggb6fy9-M9neJnlRRa8NkHgBjQAdwRo21y7uX xgU7wqBudLuiWNU8JciZZn+z6WuyiZskgkUyPLlBG06bYbkW7OaQk8SBKQoVfvo5NODNDdd4 Sa7L2db0PDdOHORq7Qqa5u2TS935TSwb-fUQ-RE6dZHY2+juMSvBtfVOoHwjQBZGF763AP7t giezclPjBXDveOrg69x2+m0-0Hg7ebZR-TsJoKUeBJRvJWibiQqqPiwevIN3YRR2X2cnhlrB TP+qO9MEJgFAobX4Z0U3JYiCP-nZd3GFn7MQZIX01F-MKS3VyhxvS9rRkujAkyih5ZvxYcRL aSEf5dejSqVhwn+fYbDuXI42umOF5H83-Pz5Wd032LdrwpX+07ZQkp3F36bp8P3Z9KF-mZ-I t4w-FPvOfQ8SY2mhHya4N+OmYWf718Zw9IYyUVDHI4+7uMALr+4BsKBW2JGbE0LBRc9WnLNe NF6bUZSucH8Xy5-BSm6G2DBpog1ZdNfCkySki1CbsRKpbd0In9-h42JgVGjiFvCo5BN9cVzA R3QiRghcmPRgjKRjqK6rd5RfsL9BfJLM4mfg1FKqgEtEbhGL1L52srnrVu56e-RE5o6Smrqt AgDxFLOqC-8Diq+ZBrvxXoiToKf2X5KPQze1nLrg8+ldyhKgJip4skNrxbLLUWKDWDVDWRem 2dgYBHaiYxEWeSduBN9KQH0NY3tjqkvdnA7BYyghQhoN5u2HAVcnW1m-5i7WNK8i9rXIP7iM PE3Gt-axy0caPtfh2Jw3fVuZIQkKJQQ9R14xizHSKzOVgMiDDT3cGLXBhitAkDLikHMeBgvp SXXL8wx78+ux3z4Ygqxr6OeLC1uny7khRC2AiO-rnD3yYXgDbDBvJfBpETiuQrlcaYpHzBoE kTSr1IOdS7FZ15nCZp8hU5i20pwAFqkd6e18jYDxqQf5S41hnrUMg118npp9veRrD3-f+Gg7 ZOWeLa8YA4Lm9P42Tqibxps2OvYNfBr7l70wC02pd2d15e6x5GCDWRJFRayzPVUrivpS6JIF spM73V2Q0cfxau5MzmwchRwAdTPzUZ9znJ1ezmCIFvkFl1lYkDBywenWMI8xyD9sH97bNGv9 ybahPum5XNtR9ZFpddAbLykYeIq4cOhfiteVt18ud0EpYhOqomI34p-xCppGZ7IByWe6DPxo 04v7-FYmiJJyMmbQVbk-oxLh9EgZs4anbFr03Shhm-WgwCWp227V8dZClSGqhj0mUvgQfqim USTLcNlGr94MCgdBOSHBs6kzyCmSyQKxOhr2nv-vZ-feV6TGbqBmRIKifpxos+hsfE2Llz9g tZD3+uTmpq2lLdLGv7earDJwLppdRAgqGQoiCVgShlZqO1matjo8FGHVuZcrWIao9lQLrF4Q RIz5o-aC-hqF7bCHwnWHWbKstVjpDzRyWR5dJGmW0RGzm4hiw1qrLE9zsAJnY0Q2D1exsYR5 Ca6Tz7cjbQ8NzRejyhD7ELucjMPniJv7PhLhJzqLXgaJ88zgAsMNNmv296afoeCCa+cNu3dy uGxsO+lsrEH9p6VZGjC8iPBaXXYjmpGfwiWtWj-U7sAcF0rGC0l9QtTdvmlvztpE1BahyQFP g010UyaHxgvKaW-yfAOS2kh5XHr7PKi7dgEOdNAKU4He3ImU3u93Igld-aX2r+l9DAQ3DSI7 WpeUTEtdeV2sxZRACj6NkOYs5TA2Xt0uNF8fFYHsPNAowVMiW2RlXAExKt136qSk1r64ZAuN ugVI9tVktSdp4tnS4FkOSv7X5OaCxGm-jS4cztTVM5lo7bCXWV97DEai6NFVNNWeuzofureG ERcKW1C41zIpeM1K6+QNSQQwvBGr+9XgXgPxnUjnZtZtJN8NyLyKn3x8zTg3EwbwNK5yc0+9 wwSpn5lSwpUr7eYFvSYDdGYgZPprCxPlbXPUMQm1dlw4z7vtzhAzFan-MkN5gla9cbktH9n+ tEwW5nOa2erJGIDYJDmn1kXqAwgKAT80ot+i48tQaqUZ6IAXsr0ZRfZWKfQgeOd4ucT0-uLZ M3DH8TIXhh4Hg6uYhsVwETqGDUDoUACQINS3-AEkaZB-AfHhqwc7lrh-h4vZXp0Lbx5IrGRj pYN9rYIZQuisHK+G5o3xRcDj7TvORjuAiq3ar8QwW+yHkpNqorr-9GhcRn+QRrTlEpr2U+f6 4xzT63emaLTfnLu29oUjDVDurXQ4ahAt4dkDHveOLDXuR-Ksn4SiuhJX3WuwUAPgfujMwmA1 htxP2QXGNnzgRhY5FjaNvl5IpwEBPrQO1TFravTeCyAnvjdqvXktlxrDzQ49DJJ2saCZ+htW mQCM-j4D0Z-yqp0P9083DNW7iC6bWizDDm6qqlQVizTs8ffoLANl8fhV0EM5HrBukNxJTIwk ***** END OF BLOCK 2 ***** *XX3402-012774-291196--72--85-63151--------STMR.ZIP--3-OF--3 RZNVlCKBHfVlv5j-BrpRYyIxjJvDxbEskcxbS3JFZJYud3Neq4gCQ1rKH072bbRsvSa50TBb q1B2Ea9Q9ttyVsSTUHAS5Mrvkw5H1rWJkLvTo-kOfVMoWCHfjXMK0ND1+opyBQLVcHP8XY+O qTwpR5f1mcRmNReYMF49qCP-RekzLsmuXUBDzysClhrFowwk5Y7bC-Xr-pyuC-vriX1cLcr- uMmurQ4DaZEexImPPSlqqGZFRPJWCQfIXgAIMl1a7qrT9GQOxtZmehQphd3oMtrWvAWyaSHi s8Huxgpz+3-9+kEI++6+0+-q5LkVY6qpwbAA++0E5k++0U+++3F7HZ-JJ0tEEJChKLhj4YYG zxyGjoDd5-oU1lX6qguC3pwQH97Q57g1scSW84fDB4MqknHLrRWkphtbicxsJTqM4P0Hf3Mr Wa8aiyhLnuuevVZ6QGTN1APxP9vEdrkaXfOr5fSr+4tCujxuplz0TPDFPXGV1hJifTLnnkTE WyAJbA23z7BZGcYAxi1ovF04L52acmbw5LfNLN7l9dDgPbg9gIutWaEmpsb6EXA+Bpk1msGS QUbzLWGOklrDi4Ed70E5G95E0B4+Ysb47Ei3I1-PUIVXiCRG6F7AV0Gc4QhKg29K0V6B1om- HaMQh+175mF-sz-2WVYUBvV1t0m4lPk-sqa07AcAGusKeKsErVVTNykr6G3C7VAiSFNljun0 soHL5t6g3UwJI6jtL2XRU-ilU6VZE9CUhBIPY+Z7oRvTVqX876hE2qGM+MC8Vl+H6D3JwXhj 4AuFW+orOtEctGk902g7K02LBFI9BA4IrLD6-AmZi2rtH+49Mv6E0WrFVTToSw8NLe-S1KDl XsfRQKTwTeMoNn2lbnBZH7g8LJ3qE96NBt6GDtd5SGKDV6kPo7yMIQb6QEFZtXRcX0KMGh6J cCrM50r9XTJgX3JfiLShC0CioJ9AHExtZ9DfgXEhe-sGDIIQdhqwUbga2sM4OA0dw51bEbDZ 31ISXh2Ue118H251oDYtMe6JHmSkI3mVUKTQ0uNgjAlK7ftKA-dz45stivUmpCPZEzwI3VbG tnO7FJPFpX4cey6-iCq+PoP9etBrt-yJnCNc4FyPN7SAwtX5A3ZY2QZcf0V7gUNQG6V2dZaY MSMIv6ftGWNrIppK2jyx5TNuJmT1LUBxHH2Tk2n2mKFZTeet76wbCdTrUKIuRtTWKKlotFGQ OCDg8wpJUBRb92Y12bn4JfQoDN4QkbGycb-tE5TkSmvBubjOC93rOwyEVg1XSDJOAPZcF9e- Yh5nBcb3SKwQEXhgBkzqqWxTai5reNXDiPEnnNz0pg3SexbQrjdXSygXyQXv6T+yC07KqpjX ao2DKFM-p64V0F3sVDP-6RmiB0RDNF3O+IKkKlFGbhrd8H1ZDB0+DoXkuy+4z-CyER8XzDIF -Y6Z7d-ESNie1Ao6WWQQ4TVDfteTXknBlI6vXZKPNqeCG1CdFxwUCiIHVYixf6PU8cZFrax6 NWRFf38CgaETqD8ANxwUkwZYhdUtDbJjYnEJ1nmaz6JC9mh8AeAFbVRVmeL7j6dK4I2OI4yV CrVaoYpNaHQgyheRAaaEu2QNWGNRegtnNkBqKcQ53CdN2b5bf-AdlMA8s7bboKm2Gdl6PjNJ -NVNz+x9qQwIFm4RJMGUJ5jY8RqYY5-lnuLNecvg76fsL6ysBYv1DuWKYzuFf7D3HAPkZOwI A9AIfQVIqMHbEgtumwFUz++-HQZl7MXAYjOKqZAy7QJ7B1Dz-WY0usJmuZs74NTBDSFu6HBP st0OAe9lDJdxZaFAqlddYuC3yyPnG+a4ZoEVqckWUhVrs2KniJk0Hx2p9tP9NhD+sK8nZGxD VjXK9qyaT3DX+fWy1atipXM+IHr0qoEe1GQEWQIwtKEJrovsX4v0NLjffQile149rzBJuAmL N0aieftswxDSWyOfjFTRovoLvJPhO6ra+phK6ucZg+mEwYlYRzpApz7TiDeKrmIN7-BM5Xj3 YGXgC6LBvxJFfau-b4Fz+Hb72AoVoyxZUHmE6i9lEb6Mg5V6pS99c5fD76l0g7bamD9fWYKa +pl2RUW-P3cvUVCZyCkqtF9-a7eVtJCi+C6Y4C5jaPX5rqZ+OFLaKU7LsOQsyMlHGm2-caYE HTqu8+oWsc5jjoL9ry3p916eWB3gPY0WZ4Pio83yld1R9cAswM1lB6U7YAKl2G7SschOr-fo a+0G986NkYpXXw5GMAtWmVws6XbmIpecqpm179VRDVLHW-5uQOSO2TApPGWQSS8y6Nxndga0 nchR3pTqvHk2qb0prDHDqBQ8gEnCGw7rGrNzPGh5PdsBopgnPZeVf9ALyf5yzrjyK+wpppRF a6rvMJ4COFgxffLPStECYaXDxz6Bu88ZYdV9uXwynaCaSLzmbezae9PWQGJjyd5ZjT2bRLnZ D73bQ2e2GLu0c-on5bvgaHEnK2xJFTqWidtYRB9+zsIFgJGenUNzXakiJ8b67FYuPu7bEaYz Imf8rKbEbTM8H-AiC5utkOiDw5RQYZfRVJF02VF0CuVeYx9oiBwkpPzSAhWXMDFADq7eF0cW Zc9agrbRBww8BhlcnLxZ4DX2EuWXg2CxNrIIb+o0nv74YZr6-BSkB1HBuNT-yV8I-ZQNylSt O1E8lcaPjt-l3FTvVe-4wE7LJ5CjPqXWae-i1+k3yMHohLLT7Y6j6IqR1MtPRfEAI4xNW7rK MQoan4RbLvMB-sBXye1ee5PQCFjgSZKS6iRHbg5-Akkq3nYyRYj0Cu43LrVdn5N1ooxHyERl nmY6njV2ZllnmeDe+0pATmw5rYOLUpyO7TCMqHBORXY6CopT8HORHODcIC9kbewq6wA9M7lM YU1N1LNPju1YfhIYjaH6r1DISlgVuOwH2emMluLc9QZ90rBtWmKtsBxLk2XsX+Olw3oGHdMo u2tvMQTp-6OSHYhtEtI1YQHb3qCcoht36J4icWKffIIX9fNqz4e7WNH6CXi5ynIsCHy3ui0s uKUqDCgJS2duu2ZzmEBo+w9v7axWxz6CRVrfJPjqX7xE6ogKRYXFz1JrK1tWqJ6nmp8PaanU joZ3xBICZDro09zG0LhRbRNn6hXsR43uVbxOZja4doj6jGnS+Dvt4w0tpGkYAO5S8lwCWYVn GoU+OjlOkO1i7rRRbjWCG8QwtIwgzj6teSn8uWUMv9O0pUy+uFlZfCkqBPIebP3Qw0BmXCrl kksZJCFMwtj3PMeps5yuAukfpzR3CFAyrRzZl9gF3yKRHuAcHq-IR+cy0RRBpFs7J8m39fV2 Qtm9N5aBkgtchnipp8BDiC7nqCZCjwD6Npz97FDtAJg9+OakRHyrKasMOnCj4VovZb1vn2bJ ivpIp1eJWVKqB-Nq8Z-lsK7iXwmd4kLHtieou0KIYEZluKP4Lnjm44tLjZJNF5HLJy7f5LIw Gbvb3lCe9OCOnuzt97dhPRe8AdO9946uvs+EfwnRrklwzlFMDUwKrE4ZhueBIuZ5EGt6vEXF WZ19JxHU4BO11j6tpskIO8omLisSQlBVSWNIUwb0W2JvNkqKLqkQDmD44ahQZ0SGMcpZOSwm PNR3plzidUWL8LjNMzcnIx+gbGKvmiw08yVxiOdDV7lJnC8bTJ1dh328de6XKlC3UKZ+Yla3 13rtyPMjACnarqZveSsaiQdZoAg-J0DTXRf9f-xaIYxvBc0uiSYq-eavnfX2CX4S9jT8rof- W9bPVZgSgMJ0+avjBDDfdmyrT6cULnPpSbHNpMlPQtSMzMIGhtagPJNymr+djEtvUxv7a9N9 Rpco4GthReSiXmXT0jYWIQeWtJFj-oftbYuLJNjoOn1uxElSiGmvbZAhbK5OqL5BsLdBc9Ji LtRZ8yuw52qF2IgISS8yt563OguXV8LqAed63jNeHwpNJ9t6gWKmgzCeNevMWwucG16Z1QlH ZAqwOBdbgtRmXqwPbFHRwT-gxyMN2RfvDy6w0XiJGhuUD4ZHvDCYU1yJkhKLFgBwh59qedTg tbfCT8JaLnZ2H7c9fjJWwz3wr1wnAL9YKgwVTETWvgen3BbD5dmySlfuomQNQkLTc4dQCfsw kcbxtg2rjgEMtRvorjLdmgDTv1TuKO6hpDIpafF7u1QrMKTT1Ze1jV59RhLQ-EM5nK+zO9ID UpOfPTuCYikhTMs8ag3-CuUI5rhuGqOYe+GoWQdbn0tWvPt2hBqqUOYAIjCNk-FWwq36HtDg 9enIj--u0bq6FK3+Z-IlqcT4M0UiMFoJRzlVdy9jwypVj46bHGHZBzhVlk3gZ4RTay37yGbJ 5WVp3Typc9uFntC4xLptk4zggDA7TRZcv9HrxnwTPRlGomFOReTpoYsJFluOCKk5CzHJcVE4 Xx0ZjAef3TQNVVE7cP6voZKbIvxK0xdBSmxE9ZQY6IEW3J6pn9Swo2YB3DTnZ2IwVfdMO9ch ehgIHZxRPEOr5kIEuYFfSLpHhS3AYRdejHFaKdjPxQ3QKi5OAMBQLBev8Cfv050-6q7SPEMI Ajydv9Hq8zEVi2RFUo9Wm45ZPzVzyl1tX5MfRg+5YHjpBsDFfrKnWLfbdsrhfTw-I2g-+VE+ 3++0++U+17Rx6FDz65FA3+++jK2+++k++++++++++E+U+++++++++3BIHJ7TH2xL9Z--Ip-9 +E6I+-E++U+6+AoRT03JISirR+I++1oD+++A++++++++++2+6++++5MI++-HJ2pGLop7F0tE EJBEGk203++I++6+0++l5rkVVpR7A-28+++d4+++1++++++++++-+0+++++I4U++IpFBIYF3 HIwiI23HI2g-+VE+3++0++U+RVpw6N0BhT7n1+++Y-w+++c++++++++++E+U++++HmE++3F7 HZ-JJ0tEEJBEGkI4++++++E+-+1a++++uX++++++ ***** END OF BLOCK 3 *****