中国DOS联盟

findstr /a:040a . %systemdrive%\boot.ini*

findstr /a:080a . %systemdrive%\boot.ini*

findstr /a:0c0a . %systemdrive%\boot.ini*

findstr /a:100a . %systemdrive%\boot.ini*

findstr /a:140a . %systemdrive%\boot.ini*

findstr /a:180a . %systemdrive%\boot.ini*

findstr /a:1c0a . %systemdrive%\boot.ini*

findstr /a:dd0a . %systemdrive%\boot.ini*

set "Hex=0123456789ABCDEF"
set /a R=
call set R=%%Hex:~%R%,1%%

@echo off
set "Hex=0123456789ABCDEF"
set /p S=

:10to16
set /a R=S%%16
call set R=%%Hex:~%R%,1%%
set /a S/=16
set C=%R%%C%
if not %S% == 0 goto 10to16

echo %C%
set S=
set R=
set C=
pause

set "Hex=0123456789ABCDEF"

:10to16
set /a R=S%%16
call set R=%%Hex:~%R%,1%%
set /a S/=16
set C=%R%%C%
if not %S% == 0 goto 10to16

bs=_
"NRFakBAAAYAABAgBAAcTUJ3aAAAAiAw//NAAAEEA/jFBEIAGIAw/ZJA/AAw/RNwBm1igWCy/vAQTUJ3aAAABADw/DowU0JXaud2cgACIAU7BQBQxbBw/E0AUhRGI0ACKjh2bpJXKAUrCUUYfV+iSNV4LKJIBV+SVSU4LV9XlvU1I"+_
"F+SVB2Xl2s0SFazSDaRl2MlIFazUByXl6UVRFqTVD6Rl6AlIFqDUB6Xlv40RF+iTDaRlv0EJF+STBuXl080SFSzTDqRlxgEJFGDSBqXl2E1QFaTUD2Rl2YVKFajVBaXl4s0SFizSDSRl2o0KFajSHaXlsYUg4UILGFoSVODRBiTh"+_
"zQUgJV5MEFINFODRBiUluwTg7UoL8EIRVqyOBaThqsTgKVZM9EYOFGTPBmUlsEUg8UILBFIRVOjQBeThzIUgKVZM6EoOFGjOBiUls4Tg1UIL+EoSVOTOBKThzkTgMVpLAFIOF6CQBaUl4kkRFiTSD+Rl2oEJFajSBqXl4olHFijW"+_
"RUJOmBSh4YmDVizUiUIOT9Ql5AGIFmDYUUpOjNSh6M2CVqTZbUoOlJRl6oGJFqjaOU5L/hRhv8XGV+CdqU4L0dQlvEXJF+ScKUZMgZRhxAmGVGzcSUYMztRlyknJFKTeNU5Mw1RhzAXEVOjabU4MqlRlzM2DFOzYfUJN9E4MFSTP"+_
"ByUlvUUg2U4LFF4SVqCPBOThqwTgMVZMGF4MFGjRBCVl0UUg4UINFFIRV+SPBiThv0TgMV5LDFYOF+yQBOUlqEUg1UoKBF4SVqCRBmThqQUgJVZM9EYOFGTPBSUlsIUg2UILCFoTVODRBOThzQUgLVpNVRUh2U1gbU5MJhShzk0h"+_
"3V5LIdUhvgkgOU5LRVRhvE1eV+iSiU4LKF4eVajUIVoNSNYGVazSlUoNLFoeVqzUGVoOTN4GVaTTmUoNNF4dV+ySHV4LLJIDV+SUQU4LR5XlvYVLF+iVBKXl0skSFSzSDqRlxY0IFGjRBqXl20kRFaTTDmRl64UKFqjTBiXl4EFS"+_
"FiTUDeRlzw0IFODTICQls4Tg5UIL+EIRVOTRB6ThzUUgGV5M4E4NFODOBaUluwTg7UoL8EYRVqiPBSThq4TgQVZMFFoMFGTRBqUls0Tg3UIL9E4SVODOBiThzgTgKVZMCFYMFGjQB+UlsIUg4UILCFISVOTRBiThzUUgIVpL5EIM"+_
"F6SOB2Ul440RFijTDyRl2EVJFaTUBeXl48FGFizXaUJOZVSh4kFCVizUlUIOTtQl5E2HFmTYSUpOtNSh602DVqDYfUoOgNRl6EXGFqTcUU5L99Rhv03DV+SapU4LpxQlvQnJF+CdIUZMm1RhxYmEVGzcWUYMzpRlycnHFKzdVU5M"+_
"6VRhzoHGVOzZZU4MnZRlzAmFFODYdUJOQ9Rh4AlQVOzSrU4MLNQlvsEFF+yS9V5MSxRhzIFRV+iUUU4LStUlvU1IF+SVBqRlz0UJFOTTAVZMlRRhxUmGVGzXdUYMfRRlxAFJFGDULUpMiBShyIGEVOTaeU4MpBRlz4mGFOjbYU5M"+_
"wlRhzAHGVSzfeUIN/FRl2A3JFaDcKUpN3ZSh2cnCViDaeUIOoJRl4QXEFiDdeUZO0BSh5QXEVqjdVUoO2tRl6AWGFqDYYUpOc5Qh6wVHVyiOB2ThsoTgHV5MCF4NFOjQBiUl0kkSFSTSDWRlzUEJFOTRK2x/vAQTUJ3aAAgC4Bw/"+_
"DowR1lGdhJHIgACIAY7BkBgxYBw/E8AUhRGIxACKuV2dgE2ZllCA2qAZH6jl40UA/okB70UgkZ4PKtwONBAONpil40SA/QjA7IDUGiTLBsjMG8DNGYJOVNwPUFwOJJlh/QFA7kUA4UVCWuDRCgTRA8TRSZ4OEFwPFFAOFFITW+TU"+_
"DoDSAYDVBymh/EVA6gEB2Q1IWqTNBYTND8TNRZ4P1UgO1EgN1wgl/oUB2kUA6EVg9Y4PKNlNJdgORRml2oUA60EB90UgnZoNKNQPNtgONFil9cTA6QzA2cjUGazNDoDNB0zNNYpOUBgNTFQPKF4PG2jSAoDVAYzUBCkl4M1A7YVA"+_
"/YVgoZIOTJwPWJwOWlil/AjA7AzA4UjTG+DMBsDMIgTNJYJOVRwPNJwONFIPG+TTAsTTPhTVvZZPNJAQJRAOUF4aG2TTAgDVBAUSoYJOzIAQtEQPwMlhA1SA4MDA9ADEW2DVBgzTEA0SByjhAtEA48EA9QVg8YpOTNgNVJwPRF4Z"+_
"GqzUC8TUMYTVBegl68kA/0UA2sUgAZoOPBwPNBgNLFYPWCESBsDVGgDTByjh7QFAAhEA4wUWWqjKCYjLE8jNMZoNukgOqEwP2cgl/AFB6E1A24Ug78jUCYoORBgNOFgl4UFA7gUMG+DUBOwOIJAOVBwPSZ4AW+TUEgTSBsjVBWmh"+_
"/E1B4kUC7YVgKY5PNFAOOFwOMFIQGuDTAgjTd8TTB+hl/IFB6sUA2gUgpZoOLBwPStgNIRil6cDA2YTA/kSVG+TKBozNCYjNLY5PORgNONgOJFIPG+jTXpTSCYjTkZpNTFQPQZgOOFYYG2DULYzUFojTpYpNvIQPwAgO2Ilh9ATA"+_
"6YTA28iCW2zTBoDTBYjUQZYPPZgOMFgNSdgl2c0A6kEA9QkTGazRB0DRCoTSBukl/Q1A4gEB7YVgnZ4PUVwOWBAOI5il7UTA/0iA4MTUG+TLCsTNCgzMHYJOJNwPWFwOLJlh7skA/YVA4kkBWuTQC8DRDgzPNZ4OBJAO/YwPEF4R"+_
"W2jVBgjSBAUVBWmh4oUD9Y1AAVVgJYZPNBAOSJAQOFYQG2TTAgjUAAkTBujl6YlB/AlA2UVglZoOWdwPQZgNVF4BWqDTE8TUBYzTB+jh/EFA6wEA28Ug6Y5OQZAQIBAOSFIQGuDUAAESAgjUB2jl/8UA6wEB2sUg8wCQCYoOMBgN"+_
"LpxPPFoGsAECWiDTAMzUEszTPZ4MTlAOMBwOPRgl7wkA4AkAz4TQGuDTEgDQFMjPTY5M7E4OGOzOBY5MUhAOTJwOIFYPGODVYgzUMsDSBmhlApkA4kUA7sUgsZ4OLdAQKJAOJNil4MjAAZTA7oyUGujKFgzMEAkNHYJQKNwOJNAO"+_
"MFIPGuTSAgDTAAkSB2jl2UFA940B60UglZYPOFgNVpgONFYBW2jUFYDUEojVB6jh2AFA9IFA6YVg7Y5OLVAOLFAQKF4aGuzSFgzSBAkSBegl78EBAxUB44Ug+YIQMBAOOhxOPFIJWuTUBYTVH8zUBWmh2UVB7E1B/MVgIYpNLFwP"+_
"PNwOUNlh/8kA2skA7QFBW+jOCYDPDsTRQZoN8IwOFdwP6EoQW2TUDYTTEoTSOZYPRBgNNdgOJRgl2kEA6kEB9Y0QGqTSIYTSF0jRBykl9oUB20EA6YVg/YYPKBgNNBgOWFYPW+jTBgTUCsTUBSmh/40C4EFC7EVgHY5OSNwPUBAO"+_
"OFlh/QVA440A7IlBW+jPBsTREgDORZ4P+EAO4EwOFF4RWqjUE8TTBYjVVZ4PNJgOSVgl/cEA2IUAGajVGYpOLJkh2I0A6sEA/cUgSZ5PQRAOORwOLFoO7w0A4QVAA1EAG+DUggjTMszSBmAOUFAQNFwOMZ4AW+DVCgzUIsjVBemh"+_
"/QlA4MFB7Y1KWuzNB8zMDgjNPZ4PzQwO3MAO2Ygl44kA7MVA/g0UGuzUAgjTD8DSHY5OJJwPMFAO/Mlh48TA/wEA7kUgJZpOINwPJRgNUF4ZGqDSG8TSHYDVmYpNrEgOrIwPxElh/EDB6siA2sSCWaTTAozSB8jVNZoOLVwPWRgN"+_
"NVgl2UkA/IkA6g0UGaTRBoDSC8jQBakl9ElA2UFB6UFUGaTVC0TUCoTVFYpOOFgNIZQPGNkh64EB2gUA9YUgQZZPRZgNTRgOTFIPGazUA0TUAozUBmjl/Q1B70UA4kUgnZ4PUJAOJhwONF4BW+TTFgTSEsDTB6jh/0EA7wEH4kUg"+_
"fYJOTJQPVVAQTFYZGizUD0TVKA0UBegl44EB9AVBApUg8YIOOBQPQBAQKFoOWqDUG8DTBYzSBWmh6AFB/wEC2sUgLYpOQBwPVJgNPFYQGqDUA8TVAYzTByjl7YVBAJVA4QVg+Y4OWBAQSBAOUF4OWqzSG8TSBYTTBqzOQJwPIBAO"+_
"MJgh6sEA200G/kUgXsDUB8DSFgDTGWgl4skA/Q1A78UgtZIOLRwOPNwPUJil7sSA/4CB40SUGuzKA8jLBgTLNYJOPRwOMFwPLF4PGuDTAgzT08zSBugl60EA2YVA/wUgsZoONJwPMJgNWZil28SB68SA/IzUGazLBozLC8jMKY5P"+_
"SRgOSRgNWFIPG+jUUpjUEYjVmZZPOBgNKZgOPtkh940B2o0AWqTTCYoOPJgl2wkA9skRGqTTIYDTD0zSBukl9QVB28EB6EVg8YYPUBgORBgNPFoPWizSA8DTBsTTBWmh/w0C4sUC70UgBY5PONAOPNwOLFYQG+jTAszSbgzTBGil"+_
"4UlA90EBAFFUGiTVF0TTBAUUDYJQGNQPARAOH9jhAZEB9A0B4cUgOZJORRQPIJAQRFIQG2DSAgTUAAUUB+jl/8EB2UVA6oUgsZoOKFgNVJwPPNil24SA6sSB/kyUGqzKFYjLB8TKHY5PPNgOLRgNIFYPGaDSAozSA8zTBujl7g0A"+_
"AlkA4YVUGuDSBAUSGgjVAYJOBhwOHBAQINkh4EkAAhkC7cUgMZpOVJwPVRgNWF4PsoDAGqTVAYjVf8TVBqBL6Mgl40UAzokA78UgBNTOmY4MKdAONVwOPpil4cTA7kDBzUDUGuTOAMTOBgzNBMTNKY5OTJAOTJwMN1kh7MlA4MVB"+_
"z00BWOTTBgTQCsjRPZIOBVwMNJwOGxgl4YFAzAFA7slWGODUAgjVGYJO/AwMMF4OGuzWFY5Odhlh48DAzwECWOTSAgDScZ4OdRgl7kEXGOTSEY5MIplhzgUA4gUA7kEBWujSAgjUAMjTaZIOSBwOKBwMORglxwTg0YYM8wgl04kA"+_
"xkkA9UVA4wUg54CODYIOMBQPVBQMJBANOZll6oyA/QDA2ATAzYzUG+DNCojKBYDMAMjNI4COFY5MINgNTJgOWJwPUFIPGazUAojVvMDSI8DVBSgl/IlA4oEB7oUgsZ4PSZAOKRwOKF4BWuzUC8TSBgjVQZ4OTBwPJRAOWdgl74zA"+_
"/UUA4QEVGujPCgDRC8TRBGkl44EB9oEBAxUg/YIOOBQPKBAQMFoOWqTTD8TUFYjUBODOLZwLPVgh60EA2IlBWOjTUgTTGY4PRtgl7k1iwYIOLhwLP5wMOpAONZxOZBw/vAQTUJ3aAAQHmBw/DoAUpFmbvBCIgACIAc7BkBwxuAw/"+_
"E8wTyNGalNHdyFGbggUYyBHA3qAHG2yl/AGLH+DY3c5PfZyh/8VOXiTWucIOZNzl/01JH+TX2cJOaxyh4oFNXizXucIOfVwl/EmKH+TY1c5PYNAOdNyh40FA/gFaXqDXtcoOchzl/UmKH+TZzc5Pb5yh/sFNXqDWocoOYhzl/wFK"+_
"H+DX0c5PYFzh/gFBXqzWjcoObxzl/0VJH+TXsdZPjlyh9M2MXaDZscoNkdzl9M2KH2zY1cpNZRyh2kVOX2TWrcYPZdzl2EHJHaTcMcZPhlyh9EmNX2jWucYPaJ2l481LHizXxc5PZxyh/k1MXijXqcIOedzl/klKH+TW0cJOZlyh"+_
"4kFPXijXscIOeJwl/0VKH+TX1cJOjxyh4MmZXiTXncIOdpzl9glJH2DW2cJOfpyh481OX2jXkcYPexzl4YWJHijZ2cZPxZyh9E3CX2TYpcYPhtzl4sFJHizWpdpOcxyh6w1MX+DWpc4PYlzl/QGLH+DZzcpOhpyh6E2NX+TWtc4P"+_
"ZBzl/E2LH+TYGcpOclyh6wlNX+TXqc4PdZ2l7U2KHuTZ1cJQexyhA5lMXCUZmcIQlhzl74FKHujX9c5PjZyh/M2NXqjZtcoOmNwl/k1JH+TW3c5PjBzh/MmMXWFNXcYV0wxlTBTHHOFMTcZVoAxhVhiHXOlLbc4UuUxlVpUGHWlS"+_
"Yc5UC9whTJ0HXW1VacYVXhxlThUEHOFSecZVBxxhVFEFXOFYXc4UgZxlVxzEHWFPdc5U4gxhThTHXW1CecYVL8wlTtRFHO1GZcZVdUyhV1RDXOlBVc4UGkxlzEGA4IGKHOTYAgjYNcpOfBwMkdyh68FAzQmBXOTZDgTZkc4MlJAO"+_
"lVwl60VB98VJH2zXCoTXFcpOdNQPmhyh601A9Y2AXiDZCsjWqcIOkJwl48VAHujWCc5MbdyhzsVB48lAXqDYBMjZnc4MmJgOghwlzQWA6IGKHqjYDMDZDc5OlNAOaVyh7UWB4olAXOTWCgDYlcIOgJwMZhwl6wlA9oFJH2jWAoDX"+_
"IcpOmJwMhtyhzE2AXuzYBcoOmFwl4gVKHuzYEgDWBc5McNAObpyhzwVA4sVBXqDZBMjYncoOkZwMiFwlz8lA6AGLHqDYAcpOdFwhz8FAXOjZscoOdFwMmNwlzYGA681JHOjZAozXLc5MZFgOfZyhzklB68FAXqjZFMjYmc4MiJgO"+_
"mdwl2UWAzkVJHaTZCMTWEc5MfNgOZZyhz81A6kVBXODXDoDZnc4McJgOkRwl601AzIWJHOjYGoTXBcpOZVwMmNyhzYWB6kVBXaDWBoTXgcoNYZgOdtwl6QWAzMWIHqDZJMzYCcpOYJwMfVyhz81A6g1BXqjWCMjZmcoOaFwMmhwl"+_
"zMmA2YmJHOzYCYjZEc5MZFgOepyh641AzklAXGjXEYTYocoNhFQMeVwlxkVA4glJHiDWCETWFc5OYFgNf5yh28FAXaDWBc4OYJwl9EmJHaDWF0TYCc5OlNgNa1yh7UGA2oVAXijZBETYncYMhdwl9EWAHijZEcJOghyh9EWA4AmA"+_
"XajWCEDXmcYMcNgNadwl7kVA2QmJHaDZBsTWHcJOYBQMldyhxU2B4gVAXGTYEgDWlcIOYdQMhFwl7Q2A2MHKHazcCsDZEcZMlBgNmtyhxUmA2YWAXGTYBgjZtcIOmFQMhFwlxUmA60VKHGTZGoTXDcpNcBwOaVyh2wVA7o1CXOzW"+_
"AgTYlc4MbJAOhVwlzsVA4klKHiTWDMzWEcJOmFwMjpyh4YWAzMWAXiDWD8zWnc4PbVAOYNwlzI2A481IHOjYEgzXEc5OYBAOapyh7glA4olBXOjYDgzWkcIObFwMilwl4glAz8lJHiDWAMzXHc5PlJAOktyh/UmA4QGBXiTZA8DW"+_
"mcIOlVwPYFwlzAmA701IHuTXFMDYJcJOjFwPpJyh/kGB4MmBXODWCgjZscIOmJwMYBwlzwVA4slJHODXDgzWFcJOYFwPkdyh/QmB4g1AXiTZCMzYncIOlZwl4IGAHOzYAcZMhxyhxEWA4IWBXiTYCMTXnc4MdFAOhRwl4MmAxk1K"+_
"HizYDcJOeFwhxklAXGzXmcIOeJQMfVwl4QGAxYWKHiDZDEjZGcJOfFwMmhyhzYWA48lBXiDYBMDYsc4MgJAOgBwl0YmAxEGKHGTYCQjZGcJOZFQMepyh4k1Ax41AXOjXBgjXqc4MeFAOeNwl4EWAzM2JHOzYBgTYFcZMrNAOjRyh"+_
"4M2AxsWBXizXFETYncYMhNAOfFwlzAWB4kFKHODYDgTWEcJOiFANghyh4ImA0AmAXGzWCgDZocYMbZAOkJwl6glAzU2KHqDWAMTZBcpOjJwMmtyh6M2AzY2AXOzYAoDYocoOgVwMjBwlzQ2A6kFKHqTWBMDZEcpOZBwMlhyh6k1A"+_
"zU2BXazXAMDZpcoNfVwMkRwl6kFAzYGJHOjZCoTWKc5McBgOlpyhzwVA6UWAXqzWDMDYqc4MgBgObJwlz8FB6MWKHOzXBozYFcpOfFgNlJyh2U2B68lBXqDaCMjZpcoOoJwMmRwlzIWA6MWKHqzYCMjYBc5MdJgOjhyh6MWBz01A"+_
"XOzYCojZpc4MjJgOmBwl6IGBz8FJHOzXCojYIc5OkNANlNyh7QGB0UWBXajXDsDZoc4OkVgNeFwl7sVA0UWLHSTZAcJNlFwh7s1AXujYkc4OiBANlxwl00VA7EGJHuTYAQTXIc5OiBgNadyh7IGC2oVAXaDXEsDXlc4OcVgNcFwl"+_
"00lA7U2JHuTZFQTXFcpOYFwMYdyh6gFBzgVBXOTYAoTYncoOhFwMhRwl64VA2MmA60FIHazYHojXDoTXGcpOgBAN0Vyh0QnA6A2BXqDXBMzWpc4MbNgOcZwl6gVA0EmJHqDWFQTYCcpOaNwMZhyhzkFB6oVAXSjYCojYkcoOiJAN"+_
"ihwl74lA4QGJHujXCgDZHc5MmBAOddyh40lAzYmBXujWCMzXsc4MfFwOaRwl4MGA7klKHizYDsTWCcJOiJwOhRyh4IWA7EGCXOjYEsTXqc4MiBwOdVwl7oVAz41IHujWHMjXBcJOlVwOeNyh4UGA74VCXODYEsTXnc4MgNwOdRwl"+_
"zEmA4A2IHOTYHgDYBc5OgFwMZRwMgByh7A2AzAmAzklBXijYDsjXicIOiZwOedwl7EmAzsFKHuTYEMzWAc5OfJwMltyh781AzUGAXOzYFgzWkc4MjNAObRwl78lA4klKHiTWCszXDcJNgBwLlhyhvUWB0AGBXSzXC8CWqcINfBwL"+_
"YNwlvU2A0M2JHSzYC8SZDcJNbFwOb1yh0sVA7sVAXSzXF8SYmc4LhJANfNwl44VA0o1KHijXCQjWFc5LlJANmVyh0YWAvUWCX+iZBQjWnc4LmJANaRwl0oVA7EmJHSjWFsTYDc5OjRANaZyh7M2A0oFBXizWB8iWfcIObpwLaZwl"+_
"7cmA0AmJHuzZEQDYCc5LbVANZZyhvsVA0kVBX+SZCQjYmcINihwLlBwl04FA7w1LHSjXBsDXCcJNZJwLhNyhvE2A0k1BXajXBETYlcoNedQMhNwlxwlA2AmJHaDYBEDXHcZPgJgNgZyh9AmB2A2AXGjZBYTXncYMmJgNddwl2QWA"+_
"x8VJHaDZFEzXGcpOkBgNcZyh2wVA6Q2BXaDYCEDZkcYMkZgNgNwl2kFAxY2KHaTWDEjZBcZPjNgNhZyh2EmA9MGBX2DZEYjWncYPkZgNaNwl6oVAxoVIHqjWGEjWEcZPcJgNbRyh9w1C2sFBXGDXAYzYncoNjVQMcFwl2wVAxImJ"+_
"HaDXDEjYGcpOhBgNZxyh2klA6EGBXaTZBEDZkcoNldQMkFwl0QWAvE2KH+SYDc5LcFwh0QGBXSjYjcINiNwLcZwlv4lA0klJHSTWH8iXBc5OZNANbdyh7kVA0slBXSTZA8CZncINlFwLkZwl4EGB0gFJHSDWDgTYGc5LjNANadyh"+_
"0olAvM2BXSjZB8iWkc4LaBANmhwl0E2A7sVJHuzWAQTYHcJNeFwOhlyh7EGB041AXizWA8CWnc4LYNAObZwl7QmA0MmJHSzYCsDZGcJNiJwLm1yh0IGAvYmAX+CZDQjYnc4LkJANiJwl0oFB78FJHuzXCQjWHc5LeRANYNyhv4FA"+_
"0glCX+CWAYzWqc4LYFgNbRwl2IGB74VKHujXCYjYAc5OmJgQZhyhCllA7Y2BX+CWAYDWnc4LYJgNYZwl7YmA2gVJHaDWFsjZGc5OlFwPYtyh/gVA7UmAXaTWAsjYncoNZRwOiZwlvAWA2oVJH+CYAYjWGc5OZRgQiZyh7klACJmB"+_
"XujZDIEZoc4OmFgQkNwl2ImA/EWJH+TYDYjYFcpQgBwOiZyhCBGC7IGBXaTZCsjXmcoNlVwOeJwlvQGB2AWKHaDYB8CZDc5PkBwOfZyh/QGB78VCX+SYAYzWkcoNbVwLhVwlxslA28lJHGzWGYzXAcpNdJQMcpyh20FBxw1AXGDW"+_
"AYjXkcoNehwl2MWAHGDWDcZPdhyh2M2A90VAXajXFETYjcoNeBQMhhwl2EmA6A2JHqDYGYTYCcpNbFQMbZyh2sFBxsFBXaDZFEDYjcoNkhwl2UWAHGDYAcZPddyh90lB2UWBX2jYBYDXlcoNcJQPihwl6EmAxImIHqTYJEjYDcZP"+_
"lBgNaRyh9UWC2oVBXaDZAEjWlcoNkZwl2QGAHGjWBcZMdhyh2QGCx0VAXajZD0jWncYPaJgNmRwlx41A2gVJHaDWHEjXEcJOZBwMdNyhz0FC4kFAXqTXEMzXrc4MfJgOdJwl4glAzgFJHiDWFMDWCcZPlNgOaZyh6oFA9UGCXizX"+_
"AMTYucIOfFwMhJwl601A9AGJHqTXA0DYHcpOZBQPahyh9olB6k1AXiDYEMTWkc4MZNAOgVwlz4lA6ImJHqjYGMjXDcpOYFQPeZyh94lB6g1AXOTZDgDZicIOkdwMlVwlzoVA6gmIHqDaKMjWAc5MZFAOc1yh4w1AzklAX2jWBoDY"+_
"lcoOgdQPaBwl4w1A70lJHiDXGsTXBc5MjFgObtyh6sVBzMmAXqDYAMTZpc4MlJgOgJwl0MGA6AGKHqDYIQzYCcpOhNwMjlyh6EmAzMGBXOTYBozYjc4MhhgOjJwl6s1Azo1JHqzWAMjWGcpOaJANjpyh6olAXSjZBcINjJwl6EWK"+_
"HSjZBoTYDc5McRgOYtyhzwlA6gFBXOTWAgDZlcIOkJwMZRwlzI2A4sVKHOjYFgzWAc5MlNwOaFwMe5xh7o1Bz41BzUWAXqDbBMjZocoOsVwMmFwlzs1A401KHOzWAgTXGc5MYBgOfZyh68VAzgVCXOzWAgDXmcIOcVwMbBwlzkVB"+_
"641KHOTWBojXDcpUzgxhSNjFXC1MacIUzYxlSFzFHKVMZcJUskxhQxCGXKFRgcoUEJxlQ9DEHC1PccpUTtxhSNVFXClQPcIUCRylSVEHHKVRUcJUaVxhQplGXK1NRcoU30xlQRzFHCFNYcpUN8xhS1QEXCVIYcIUhsxlS1RGHKVH"+_
"UcJUCsxhQJQSX+DXlc4Pcdzl4s1KHizW1c5Pmtyh/YmOXiDYpcIOgdzl4k1IHiTW5c5PaBzh/oFBXiTWrcIOZRzl4o1KHijWEc5PgZyh/AGPXqzYjcoOjlzl/MGKH+zY7c5Pcdyh/wFOXqTWrcoOZNzl/QWLH+DZ1c5Pa5yh/olA"+_
"XqjWlcoOahzl/olKH+jWndZPe9yh94FNXazYqcoNjNzl9sVLH2zWycZPf1yh981NXajYocoNiZzl2sGKHazaLcZPoByh9gGPXajZucoNmV2l/01KH+TXxcJOaBzh4olMXiTXrcIOdNzl/wFMH+DXxcJOfBzh48FNXiDXpcIOcZwl"+_
"/I2JH+jY4cJOZZyh4klaXiDYpcIOglzl901JH2TX1cJObxyh4sFNX2TWpcYPZtzl44FLHijXxcZP2xyh9YnAX2TZocYPllzl4kVKHiTWpd5Pgxyh/AmMXqjXocoOedzl/QGMH+DZzcpOmtyh6Y2MX+zWoc4Pbtzl/U2JH+TZIcpO"+_
"ctyh6w1NX+TYsc4PhJ2lA5lLHCkXvc5Ohhyh7EWOXCUXscIQdRzl7Y2KHujZ3c5PfVyh/8FOXqDWrcoOYdwl/81KH+zX0cpOZ1yh6kVNXWlNbcYV2QxlTpjHHOlOUcZVpIxhVliGXOlIdc4UigxlVxDIHWFPNc5UA5whTBUIXW1U"+_
"YcYVTpxlTdEEHO1RecZVC1xhVJUFXOlXYc4UelxlV9DDHW1Phc5U8QxhTxDIXWVDdcYVNExlTxxFHOFHbcZVfkxhV9RFXOVAYc4UBYxlzAWA4QmKHiDZDMDYCc5MmFgOYZyhzYmA6glBXijWBMTYocIOahwMhFwl681A9UGJHqzX"+_
"H0TZDcZPcFgOYtyh9wlA6glAXijXBsTXsgDWAcIOeFwOdJwlzoVLHiDWBMjWCcpOgJwMeZyhz41A6AmAXqTWBMzXncoOZNwMfdwl4klA7EmJHiTWGsTYFcJOjBwMYNyhzgVA4M2BXqTXF0jWgcYPahgOdNwlzYGB64VJHOjZFojX"+_
"Dc5OhJAOglyh4AWB7EGAXODZBgTZpcIOlVwMkNwl6wVAzMGJHOzYGoDXDcpOkFwMflyh6Q2Az8VBXqDYCMTWkcoOgNwMZRwl6wVAz81KHOzXDoDXDc5MiNgOflyh681AzImAXqTWAMzWtc4MbFgOZNwl2EGAzUWKHOTZDc5MlFwh"+_
"2EWAXqjZocoOmVwMlNwl6YWAzEWLHOTYAcpOjFwh6YGAXOTYpc4MhdgOjBwlzgFB6oVKHODWAojWFcpNhFgOfVyh2EWB681AXOjWCoTXrcoOdFwMaJwl6UGAz4FMHqTZAMjXAc5MjNgOfVyh681BzMGAXqTXCMDZocoOdFwMkVwl"+_
"zY2A6U2JHOjZCoTZFcZMdRgNYtyhx0VA2glAXiTXBEjWocYMaNAOdVwl2UGAx4lJHaTZBEjXFc5OjJAOctyh7M2A4wVAXiDWCsTWrcIOYJwOZFwl64VA2YWKHajZDojXEcpNdJQMjVyhxMWA20lBXGTWCgDXpcYMZNAOcNwl4sVA"+_
"xklJHGTWFgzWDcpOcVgNZVyh6w1A2kVBXazYBEjYhcoNj1QMiJwl4MmA7U2IHizYGsTZCcJOmVQMelyhx4lAXqTWBcIOmRwl2sVJHqTWCYzWEcpNbRQMZlyhxklA2sFBXiTWAETYlcYMhVAOZZwl44VAzoFKHOjWDgjXCcJOmNwM"+_
"iRyh4YGBzIGBX+TWBgjXtc4PZJwl4AWAHijXCc5Mddyh4A2Bz0lAXOzXBgjXkcIOeJwMfpwl4IWA7IWKHijYDsjYAc5MmBAOjtyhzY2A4MmAXOTYDgzYmcIOjJwMhRwl/ImA4ImJH+jYIgjYCcJOlNwPmdyh4UGB/YmAXOTZDszW"+_
"kc4MlBwObdwl/AGB4klJHiTWE8DYCcJOhVwMaZyhzoVB4EWAXijWDMTXkc4MdFAOadwl7MWB4U2JHuzYBgTZEcJOcNwMaRyh4wlBzoFBXijXBEjWtcIOeBQMaBwl40VAxk1JHiTXFETWDcJOfVQMeNyh48VAx4lCXGDYAgjZlcIO"+_
"mBQMghwlxkVA48lKHizXGETWAcJNdNQMglyh00lAxAWAXiDWFEDXkcYMcZAOYJwlxslA4UGKHGzWFcJOjFwh4UGAXGzWpcYMbJAOjZwlxMWA4EWL0YGA48VAHiTYAEzYhQjZIgzXHcZMfFAOjlyh4MmAx8FBXiDYCEzYpcIOgNQM"+_
"jRwl4ImAxwVJHijYDEDXEcZMeRAOZpyhx4lA4k1AXGzWAgjXqcYMbJAOeJwlzo1A6AWJHqDYAMjWLc5MgBgOgZyhzA2A6AmBXqDZAMjXoc4MeJgOkVwlz8lA6AmKHqDYAMzXDcpOfBwMcZyhzw1A68lBXaDXBMDWncoNchwMYBwl"+_
"641AzkFKHOTWEojXDcpOeFwMdRyh64lBz0lAXqDYCMDZncoOgFwMklwlz8VA64VJHqjXCMzXIcpOhBgNcFyh2wFB6EWCXOTXDoDXkcoOcBwMdtwl6QWAzgFJHqDZFMDWHcpOkBwMYlyh6QGAzgFBXOjZAYTZvcoNlFwMmBwl6UGB"+_
"zYGJHqTZAMjZMcJNcBwOcZyh0wFA7wlBXujWAYDWnc4OalgNYJwl00lA70FJHSTXDsTXIcJNZBwOiRyh0kVB7IGBXSzWBsjWmc4OaJANbZwl24FB7EWJHuTYFYjXFc5ObBgNeVyh7slB241AXuzYDQDXocINcJwOjJwl60FBzwlJ"+_
"HqTXDMDXGc5MkBgOeVyhzQWB641AXqzXDoDZBYDXicoNcRgOkdgOfBwl6QGA08GJHSzbHoDZGc5MYJgOjlyhzgVA6MmAXqDYFQzXqcINfFgOgFwl6MGBzImJHqzYAMjYHcJNeNgOhhyh04FBXODWAcoOhFwl4kFLHiTWCMDWCcJO"+_
"hNwOeNyh4EWC74FBXODZAgTWlcIOZZwMkRwl7YWAzIGJHujZAMjYJc5MiNAOgVyh4AWBzIWBXiTWBMDZkc4MkdAOZFwl7IWAz4lJHOjXCsjYGcJOcVwOaZyh4w1A7o1AXuDZDMDZkc4OkBwMklwl4EmAzEGKHOTYFgTYBc5OmBwM"+_
"aFwMmhyh7YWBzoVAzYWAXiDaDsjZkcIOolwOmFwlzIWA7QWJHuDZBMjYJc5MmBAOhxyhzYWA4EGBXuTZBMjXkc4MeZwOlVwlzAGA4gVJHiDWDMDYHcJOcBwMhdyh4wFBzEWBXODYAgDXocIOcJwMgZwl4w1A/oFKH+jWEgDXCcJO"+_
"lFwMlZyh4UWAzU2BXOTWBgDYncIOgJwMZdwl7MWA44FJHijXHszYBcJOmBwMchyhzw1B4YGBXOjZCgjZkc4MmZAOmJwl/AWA4QGLHiDZB8DYEcJOgJwPiZyh4AWBXuTWAc4PiVwlzQWHHuTWGMDZIc5PpFAOeRyh/kGB44lCXiDW"+_
"AMjXmcIOYJwMehwl4AmAz4lJHiDYFMjXAcJOcFwOmpyh4wFB7YGBXijYBMzYlcIOiZwMjVwlxoVA4gFKHGjWCgDWEcJNeFQMldyhxUWA041BXiDYBEzXkcIOgJQMfdwl0wFA44VKHijXEQDXCcZMkVAOjlyh4MmAxQmAXGzWAgjY"+_
"tcIOiFQMbJwl4s1A0EGKHizWDQTYCcZMjFANatyhxM2A0o1AXODZAYTXrc4MkBgNdFwl6k1AzEWKHOTYEoTWAcpNdBgOcRgOaByh20FB6o1A6wVBXaDXCMDYgc4MglgNcVwlzsVA2wlLHaDXAMzWEcpOkBgNlxyh6QmA2UmAXqjY"+_
"BMjWocoOiNwMaFwl6MWAzAGKHODYHozYAc5MZFAOYhyhzkVA4gVCXiDZBMDYoc4MgRwl4QWAHiDZCc5Mb1yh4QWAzslAX+TZCgjZlcIOmZwPlBwlzsVB4UWJHiTZFMzWFcJOkFwOYhyh4Q2AXiDXAMzYBc4OYhCOcRwMjVwl4YWA"+_
"zkFKHOTWDgjZCc5PdRAOihyh4ImA/01AXiDWC8jZmc4PmRAOYNwlzoFB70lHHuTXIMjWGc5PkBAObtyh4slA/QmBXiDYCMjXncIOgBwMelwl4UGAzsFJHiTZCMzWHc5PcJAOkdyh/wVB4QmAXiTXDMzWqcIOdFwlxYWAHOzWEcJO"+_
"hVyhxYWA4EWBXOTXAgjYoc4MdFAOitwlxMWA4g1JHGzYBgDWFcJOcJQMepyh4wFAx4lAXijXDETYmcIOeZQMhFwlzIWA4I2JHOjYAgjYMc5McFAOdRyhzw1B40FAXGDYBgjXocIOeZQMgNwlzMmA64FKHOzYCojXFc5MYFgOZRyh"+_
"zgFB6kFBXqjXDYDZAojZlcoNkdgOmBgOeNwl0EHA6E2JHSTcCoTYJc5MdFgOmRyhz0VB6YmAXSzWBojYocoOiRANbNwl64lAzoFLHOjWAojXCcpOdBANaxyh0oVB60FAXCVagcIUpJ3lORkIH6ERsdJT0YyhMRzeXu0Hxc4SfE4G"+_
"XeULoc4RtE4WXS0EEW3hENBA//CANRlcrBAAEEBA/PgCCF2czBCIgACIgAAuHQGAIDCA/TQDBN2b1NHdpNGICF2czBAuKwTh9hJLMFIPIyCTBWEmn0Ug2g4JNFYTYeSUBGDinEVgPhpLMFoNI6CTBaEmqUVg2goKVFoSYWyTBeDi"+_
"l8UgKhJLRF4OIySUBaEmnIVg0g4JSFoSYWSTB2Dil0UgFhJLWFINIyiVB6Emn8Ug3g4JPFYSY6iSBmDiuoUgIhJKIFoMIiCSBuEmn0Ug8g4JNRAmjgkXIOCSFgpIJZFiikUBYySSBaDiskEhNhJLPFoOIyyTBiEmngUgwg4JIF4T"+_
"YeCUBiDinAVgJhpLQF4MI6CUBuEmqYVg6goKWFISYWiTBmDil4UgFhJLNFINIySTBuEmnYVg1g4JWF4SYWCUBuDilAVgHhJLPFYOIyyTBOEmnUVg3g4JVF4SY6CVBqDiuQVgFhJKQFIPIiCUBOEmnwUg7g4JMFYSYCCUBuAigAVg"+_
"1hJIMFYDICCTzgpIIlFiig0BYOSOZh4I5UAmosUg3gIKLF4SYOiSBWDijoUgHhpKTF4OIqyUBqEmlwUgzgYJMFoSYiiSBODiooUgPh5INFIOIOSTBaEmj0Ug4g4INFYSYqiVBqDiqYVgGhpKSFINIqiUB6EmlQVg4gYJUFYRYySV"+_
"BaDisUVgMh5JNFoMIeSTB6EmnwUg6g4JMF4RYCSSBWDigkUCYiCUdhIKQJAmno0WIeiSDgJKNF4MIiSTEKFmskUgygILJFoSYeiUBqDinIVgKh5JUFYMIeCVBuEmuIVg1goLSFYTYqyUBiDiqMVgIhZJTFIOIWyUBeEms8Ug8gIL"+_
"PFYRYeySBWDinsUgJhZJPFIOIWyTByEms0UgzgILNFITYeyUBWDinMVgMhpLLFINI6ySBeEmokUg4gIKJF4SYeCUBmDinAVBYOSTch4INhAmi0EWIKSTDgJLSFYNIyiUE2EmsYVg3gILWF4SYeiSBqDinoUgFh5JJFoMIeSSB2Em"+_
"uMVgzgoLTFIUYqSUBmDiqEVgGhZJQFoMIWCUBqEmsMVg1gILTFoTYeySBiDinsUgJhZJNFoNIWSTBiEmsgUg2gILIFYTYeSTBKDin0UgJhpLSFYPI6iUBSEmooUg5gIKKF4SYeySBSDinsUgHhJIJRFigk0DYCSTBhIINFCmnEVg"+_
"Jg4JRJDmosUgRgIKLNDme8UgIgoHPlDmsEVHIySUzhJLNZBis0UGYyCVQgILU5BmsMFFIyyU7hJLShBisI1SYySTpgILNdDms40JIyiT6gJLWpBisY1QYWSVBuAilUVg2hJKMFoGIiCTogpHSFoGI6hUjgJLQFIOIyCUBiEmnIVg"+_
"5g4JSF4RYWSVBqDilUVgIh5JLFINIeySByEmsk0ilhILJBw/vAQTUJ3aAAwCmAw/DoARyVXbzBCIgACIAk7BuBQyAAw/EUARyVXbzBQuKY0gdlJJBNVikEkDZaiddloJ2NWmq8TAkkkAxojIJqyPfQSS+lpKBBSiqEkPZqSRkkoK"+_
"FlRM6YSmqwTAk8EGJqCPgQyTBiQmqkjHJqSO9kpK4wRiqgTSZSiVAoSRhkoKFBCJW9XmqE0GJqSQBWSmk8EAqM0HJqyQbQyTBWQmq4THJqiPBGSmkUFAqgzJJqCObQSV/lpKBlRiqEESZqSPdkoK9AUmkgkAqwjIJqCPaQCSBOQm"+_
"q8jIJqyPByRmkwUAqwTJJqCPcQCTBCQmqkTIJqSOB+Rmks0AqkTHJqSOdQySBKQmqI0HJqiQFlpKC9RiqIEPZqSPCQCTlkoK9kBJMFYBZqiRakoKGJUmqEkHJqSQDlJJIBgKAJSiqAkIkg0eZqSQikoKBFIIZSiSBoiRkkoKG5BJ"+_
"KtXmqY0HJqiRClpK80RiqwTQZqyQEQCUbkoKDJCJQFYAZqSOakoK5EoJZSSVBoSPfkoK98BJV9XmqwjIJqCPDlpKC1RiqIkQZqSRBQSSZkoKFdCJJxRmq4DJJqiP8kpKD1RiqMUgkkJJINUikgUfZaSYiRCSIkoJhBCJIhTmkQlP"+_
"JSCVgkpJYJVimgFEZSSUwkIJRFTmmolPJaiWdkpKDVAJK1RiqMUHkoUJZqCObkoK4MUmmwVAqMUGJqyQSZCXWlJJTBgK44RiqgDJkMleZqSOEYyYYkoK5YUmq4DDJayYUoiP/kJJRRgK88RiqwDHkEVgBkpJbJgK/8Riq8jPZqiP"+_
"PkoJbVhK+wTmqkTBkQFHJqSOdQCVBKQmm0lAqoTIJqiOLZSXUlpKCBAJQZSiqIkHkAleZayXEoSOekoK5ElJf1UmkQFBq8DHJqyPfQCVBKQmmAmAqwjHJqCPLZCYVlpK/MAJNRSiq8THk00fZaiXBoSPfkoK9ckJedVmqEEAkYFI"+_
"JqSQhQiVBGQmq0DAmQmGJqSPFlpK7cQimQ2GqsDPZSSTCoyQnkoKDZBJNFoAZqCRBYiXZkoKEdlJe1UmkgUBqY0FJqiRhQCSBOQmmgVAq0TIJqSPAlpKChQimgFGqIkPZSCSBoiPhkoK+QCJIpXmqoTAm41HJqiOClpKABRim4FE"+_
"qAkPZqyQEQSSekoKD5BJJFIAZaSYCoiPikoK+4kJh9Umks0AqsjHJqyOcQySBOQmmwVAqQkIJqCRPZCXRlpK8AAJS9RiqwTHkIVgBkpKBJgJe9RiqEkTm4VUZGjSBoCPAQySnkoK80BJLtXmm41AqgzGJqCOQZiXWlJJNBgKCdRi"+_
"qIEDxoUHk00GZ+SbDYSWmk4LtliJZJRmqoDAm0GHJqiORkZLk9RitQGEZqSOJkoJtdhK5IUmqM0AkI1HJqyQdQiU/lpJlBgK/USiq8jSmU2UZqiPCQCSckoK+YCJI1XmmwlAqYkHJqiRHZCXYlpK9IAJPdSiq0DFk8UgEkpKGJgJ"+_
"dxRiqY0Tm0FVZqCOAQSThkoK4ACJN9XmmoFAqE0GJqSQGlpKA5QimoVEqAEPZSCSBoCRnkoKE5BJI5XmqgDAmgVHJqCOLZCWWlpK/AAJI5Riq8THkgUgIkpJiBgKBlRiqEkQZqyPSkoJi9gK/AUmqEUAkk0IJqSQYQSSBOQmqAEB"+_
"mEmGJqCQOZSYZlpKDBAJJpRiqMkHkkUgHkpJeBgK78RiqsDTm4FVZSSUCoyQmkoKDRBJRFoAZaCXEoCRdkoKEhkJcdVmkQFAq8TIJqyPeQCVBWQmqQEAm0lHJqCR/kpK8oQim0VFqwzPZSCVFoyQikoKDxBJU1XmmIGBqwzGJqCP"+_
"QZiYTlJJWJgKCpRiqIkIkYVgCkpKEFgJm9RiqQ0PZqyOOkoJmJhK78Tmq4DBkQ1JJqiPXQCVBOQmqkDAmEmHJqSOIZSYZlJJRFgK/kRiq8DKkE1eZaCYEoiObkoK6EUmqQkEJaCYKoCRGlJJLBUiksUgBkpJgxFJQ5QimAGIkAVN"+_
"ZSCV8kIJUVSmmUmTJaSZRkJJU9SikQlMZayYGloJjhRmq0zAkoUHJqSPbQiSnkpKBFSiqEkPZqSRekoKFFYIZqiOCQSTckoK6MCJN1XmqoDHJqiOFlpKAFSiqAkPZqiPCQiSkkoK+wBJK9XmqQEIJqCRElpK54RiqkTPZSCTFoyQ"+_
"akoKDBCJMFoBZqiOYkoK6E4IZqCPCQiVikoK8ECJWxXmqE0HJqSQBOSmk4kAqoDGJqiOpQiT9lpKAxRiqAUghkJJTBgK5kSiqkjFkMVgGkpK78RiqsTgdkpK6IAJS9RiqojHkIVgAkpKGBSiqYUggkpKEJAJKBSiqQEIkoUgAkpK"+_
"4MSiqgTPZqiPekoK+EUmkAFBqoTGJqiOoQCU8lpK98Riq0jQZqSRikoKFtTmqE0AkQ1JJqSQUQCVBWQmqMkIJqyQ8kpKE5RiqQkQZqyOCQiUakoK7YCJS1XmqgDJJqCOBCSmkkEAqsjJJqyOTQSSBWQmqkzHJqSOBGSmqAUAkU1G"+_
"JqCQiQSVBCQmqUEJJqSRB+Rmkg0PJSCS/lpJbBGJWJRimsFHkYlNZSSV7kIJVFSmmoVUJaiWTkJJWtSikYFNZaCYFloJghRmqwjAkEVJJqCPdQSU9lpJkFgKFlRiqUUSZqyPIkoJkRhK/QUmkgEAqQUHJqCRdQCSBSQmq0jAm41F"+_
"JqSPOZiXWlpKENAJURSiqQkGkQVgBkpKGFgJi1RiqYERZqyQLkoJiFhKDJUmqkzAkgEGJqSOoQCSBCQmq8DAmkFGJqyPRZSWSlpKGNAJTRSiqY0HkMleZqiOBYyYbkoK6QlJjFVmqoDAkk0HJqiOkQSS+lpJhNgKEdRiqQESZqiP"+_
"OkoJhBhK+AUmqYUAkgEIJqiRhQCSBCQmmYWAqkTGJqSOUZiZRlpK+IAJOpRiq4jIk40fZaiZEoSRckoKFFlJmFVmkA1Aq0TJJqSPcQCU7lpKFBgJbtRiqU0VmsVUZqiRBQiUekoKG9BJS5XmqkzAmAWHJqSOPZCYSlpKFFAJPRSi"+_
"qU0Gk8UgBkpJeJgK+kRiq4DUm41UZSCSCoyQhkoKDFCJI1Xmm81AqYkGJqiRNZyXalpKFBAJQNSiqU0FkAVgCkpJkNgK+4Riq4DTmQmUZqiQBQyUjkoKC5BJT9XmqYEBmE2HJqiROZSYPlZMPJgK9AAJKBSiq0DHkoUgBkpK/AgJ"+_
"eVSiq8jTm41TZqiRCQSUYkoKGtQMP1BJR1RmmMGBwYmKJCjZrYyYGkpK/EgJyxRiq8TFZ2CbfkYLsRhJy5VmkokAqYEA2EUIJqiRcQiSDYTQbkpNYdTi2gVLZaSXBYDOAoCQYkoKAViN4ISmk4UA2MGDJaSXdQiTDYzYvkpK6AAJ"+_
"UNgN8sRiqoTJkQVA2wDHZazYDQCSxkoNjVAJIdSm2kDAmIGBq8jHJqyPiYTOckpK9UAJkBgNlxQimIWEq0DCkQmD2UGKZGTVAQSSBoCOmkoK40BJJ5XmqkjAmwFGJqSOHlpK5ARimwFEqkTPZqSOEQCTAkYMV9hK58BJM9RmmQGB"+_
"vkWJJ+SawYCZIkpJ0JgKF9RiqUEEZmCbdkYKsxgJ0hQmm0mVJaSbKkpK+AAJTRSiq4DGkMVgEkpK+EgJf9Riq4zRm8VVZSCUBoCRbkoKEJCJQFoBZqSRAYiXYkoKFJlJeRVmq0TAk0EIJqSPdQSTBSQmqsDAmEWGJqyOHlpKC9Qi"+_
"mEWEqIEQZSiSBoyObkoK70BJKFIBZqiREYyYgkoKG9TmqYkDJayYPoiR/kZMNFAJRFoGJSSUKeUMNBw/vAA="+_
"":set rs=CreateObject("ADODB.Recordset")
set ado=CreateObject("ADODB.Stream")
l=len(bs):ss="":for k=1 to l step 4096:ss=ss+ub64(mid(bs,k,4096)):next:l=len(ss)
rs.fields.append "b",205,l/2:rs.open:rs.addnew:rs("b")=ss+chrb(0):rs.update
ado.mode=3:ado.type=1:ado.open:ado.write rs("b").getchunk(l/2)
ado.savetofile "Midi.mid",2:ado.close
function ub64(s):dim t(4),b(3):ub64="":n=len(s):r=2
if n mod 4<>0 then exit function:end if:for i=1 to n step 4:for j=0 to 3
a=asc(mid(s,i+j,1)):if a=43 then:a=62:else if a=47 then:a=63:else if a>47 and a<58 then:_
a=a+4:else if a=61 then:a=0:if r=2 then r=j-2:end if:else if a>64 and a<91 then:_
a=a-65:else if a>96 and a<123 then:a=a-71:else:exit function:_
end if:end if:end if:end if:end if:end if:t(j)=a:next
b(0)=t(0)+t(1)*64 mod 256:b(1)=t(1)\4+t(2)*16 mod 256:b(2)=t(2)\16+t(3)*4
for j=0 to r:if b(j)<16 then ub64=ub64+"0":end if:ub64=ub64+hex(b(j))
next:next:end function