[Back to TEXTWNDW SWAG index] [Back to Main SWAG index] [Original]

    { 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 *****

[Back to TEXTWNDW SWAG index] [Back to Main SWAG index] [Original]