中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
« [1] [2] »
作者:
标题: [原创]********彩色字符******** 上一主题 | 下一主题
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『楼 主』:  [原创]********彩色字符********


@echo off
::::::::Colorful  Characters::::::::
::::::::{ s11ss 2007-10-27 }::::::::

::Release all variables once the programme has ended:
setlocal

::Receive the string to be showed:
set "str=%1"
goto :CalLen
:GetStr
echo Please input a string,like CN-DOS:
set/p str=
:CalLen
if "%str%" equ "" goto :GetStr

::Calculate the length of the string:
set/a len=0
:AddLen
call set word=%%str:~%len%,1%%
if not "%word%" equ "" (
        set/a len=%len%+1
        goto :AddLen
)

::Calculate the size of the file t.com:
set/a comsize=48+%len%

::Switch 10 to 16,for making t.t:
call :10to16 %len%
call :10to16 %comsize%
call set len=%%r%len%%%
call set comsize=%%r%comsize%%%

::Make t.t:
cd.>t.t
set w=^>^>t.t echo
%w% a
%w% xor di,di
%w% sub si,si
%w% mov dx,ds
%w% mov cx,%len%
< "%~f0" more +88 >>t.t
%w%.
%w% e130 "%str%"
%w% rcx
%w% %comsize%
%w% n t.com
%w% w
%w% q

::Make t.com:
more t.t|debug>nul

::Run t.com:
t.com

::Delete temporary files:
del t.t
del t.com

::End the programme:
goto :eof







::::::::Function definition and other codes for making files::::::::
::This function returns the value in hex,named r%1:
:10to16
set/a q=%1
        :c
        set/a r=%q%%%16
        set/a q=%q%/16
        call set r=%%r:10=a%%
        call set r=%%r:11=b%%
        call set r=%%r:12=c%%
        call set r=%%r:13=d%%
        call set r=%%r:14=e%%
        call set r=%%r:15=f%%
        call set r%1=%r%%%r%1%%
if not %q% equ 0 goto :c
goto :eof

::This is one part of the file t.t,which is the source of t.com:
mov ds,dx
mov bl,[si+130]
mov ax,b8f0
mov ds,ax
mov [di],bl
mov ax,cx
mov bl,7
div bl
inc ah
mov [di+1],ah
inc si
add di,2
loop 109
xor ah,ah
int 16
mov ax,4c00
int 21


   此帖被 +20 点积分      点击查看详情   
评分人:【 knoppix7 分数: +4  时间:2007-10-27 17:23
评分人:【 lxmxn 分数: +12  时间:2007-10-28 20:43
评分人:【 junchen2 分数: +4  时间:2007-10-29 09:38


2007-10-27 16:50
查看资料  发短消息 网志   编辑帖子  回复  引用回复
knoppix7
银牌会员





积分 1287
发帖 634
注册 2007-5-2
来自 cmd.exe
状态 离线
『第 2 楼』:  

哇!好.佩服佩服.

2007-10-27 17:22
查看资料  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 3 楼』:  



  Quote:
Originally posted by knoppix7 at 2007-10-27 05:22 PM:
哇!好.佩服佩服.

哪里哪里,小伎俩而已.

2007-10-27 17:51
查看资料  发短消息 网志   编辑帖子  回复  引用回复
brumal520
新手上路





积分 14
发帖 10
注册 2007-10-27
状态 离线
『第 4 楼』:  

下下来看了。但是没弄懂

2007-10-27 18:07
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 5 楼』:  



  Quote:
Originally posted by brumal520 at 2007-10-27 06:07 PM:
下下来看了。但是没弄懂

注释已经够详细了啊........

2007-10-27 23:14
查看资料  发短消息 网志   编辑帖子  回复  引用回复
fastslz
铂金会员

DOS一根葱


积分 5493
发帖 2315
注册 2006-5-1
来自 上海
状态 离线
『第 6 楼』:  

强....CMD加debug汇编
不过有个可以加有颜色的ECHOX,附件不好贴了我贴vbs生成吧
bs=_
"Qt0AEQBAAAACAA6UFSTL18Lc4pEAAAguAAQCAAAAFNESPhlLFhVRs37C8RV1VfDfmJzkMJkwMAJQ4mMAhLRCYAvTg2BwRjXQjKpSbNKBIBCFCYyMo2mABHybzJjTN6jWtt2+QK+0Hf6jftRFxB0WDglb12GQUCqtNST1TcSrRNVH"+_
"1Iz3/1avPzZukEs9993zvfff/ePQOn9l1etX71etvt2r9eW+3oFlUUUUsg/iERRJoi4xly5/pB83Iny+HpyeS/3N1gmuhf3UXx6rqWnbpmNvuaKfTOXT5VX9m94c1V4sGvV7sqqdeV30t6cTbetVMvsyKj8k4oE3KK3gJrxh3uUs"+_
"nyIMZ+KUeY4Zay/cI/rNm6EuNLobTM9LfcYi9sljrwlL2jDOC+/SXGP9h/nmCjlszQ5/xemnnKuHP4rzHSSQPsehw4xpiyqm3aL3T5wd7ZKL7jE/9YxDnLE98Wdt1Su3xUJgHi6LCuqIEKLz9h/sh/+ZDC+qp2aWDcDeigDT5/vI"+_
"J46Q5/7z/f6nDbdXHzliJtraG6uV0uC4uENK2Iz4h/QXKtEzTpq/Vf9aRtsB0WNgS9Q+zKYbuUUfDufDttND8SdmIiO1MPL4u+ZS4jhEB9+kvNgX+LbgjdoYw1PLSkIajSiQLPtBCn7Mo0LQ4TTpuA617mnEh/Ey34pXnKPRiLJm"+_
"E3Xe41nPDOxeIgefCb/cJkPZMQeYCyTIg86II/NEkNonNXOF0zQBtJZif5YSsKl4HWk4sIIbigcZSI7PGIvTCyNIg8vQAdH0rxLhs4nxAyLlg0lAy9RAdJ0r3f6CIrLGIHBB5YFQ+AEQZQv+NSIflYg8tnOe1beMkVQA1Fl0fkES"+_
"nPrBkPPB5BFQWEB5eJIvLJkbJGIDQQ+YCIHFB59TQeNSI3VMQuGCyqFQ+uEQrmeN5pLZxni8dT0rMkJuzYS8MpEPfRi/5EQzge110EQeJ7xAyBmGelmAyG46fKp7daysZTUQaUQ7Wm4dGTifJKxHf6ciXGB5vmg8elQ2VMQ+IEk7"+_
"SA5456fCybSC5ieODI/WEkbVA57TAthpTdkr9vlnsZg6HztDyW19AHxd4I4Jwy71fpDE0iikfq6u/K97u3KVd3n9n3dfN2uHzhS1v7+VdH2v7wH7Qc6XlaZ7S17TAsoWaY1l3/Rc/UU+fE3tJ+sHxHmoC4uT1DEwd7qHMoJKTeUq"+_
"E8QUr+Gb3ejfPEmf3D4XBZUK+dNQRuDvdzhyx/yDv/2OmLKKtvPgtnKZ46HQZvYPLrY778TUQolgQDUaQ1O0e6ZIwjjGPJwztMAo187Q9gt5U70zgKUB9XaQCZpPTksxnQm6v0w5fQVA+B+sp47smM1xBCbCl/BBk54uPV39Kyyv"+_
"yMoMfPw1lQZep9iMbDcmtH/ltnAl2GiZCSyqwAl+Uw7IYA7DAuEGwnyv7nS9D1ybmkn287uN13QbcsHQsB1eRRvXqvBSaHgthwUTJ0dIw1LlnA15Kyp2yboYAveexg99FNf1ujYweNcqfKgdI/gwFZxtjQlVtiM56zTWJrXyXYey"+_
"qb96h8zLaF/KBrzqWQOX2lfvPhU2ZRCZPAAX72JxFd3FJicUdREPkY8mnuUEpcuSOMQ+rggMSqsmhlQt2TRmiNQfhNhQnMlB39M0TegpzgAJ5eyyEhp+JM1zriXqfMaEA5rmvKzRW028YtnXABKCyl99iAtvbrFixeqxaPtaEDDd"+_
"12vvvHCqgq9M9Cs4ZpFY2zqKIDgh7FBuPTMw9HA0xFBGRo1Ru+NzkD8wXljIZR+fOh/lSBkRorK2E9Zg4pvPUMJJ00iFiOlQsFDISPkSE39bwMKuI39bPwERj9QMLvi805IfnppzR0agDcAEYlTTU3N69vlguUCg4eYe8MWEJc0+"+_
"QspWWYVgtjMZufolPgenQvzkxrP4C4Oh2wUg7/Kc3mJtR6kkECLGLeH9eFmAE/4jeOMYc/A/HpxXBOFdY0HJN0pu0QlOxrynqUaYZWo5O4sdMPijYVBfonjY1GcFBPHxamRd5IqrshrzxuylTBhipCX4z9824TgtqEcnofUt3LXF"+_
"lfqFEzuoXLap2vveANUwStvTqsduj65uKws9d+DNRutvz3lq3T1+OnH8ThPB6rF77sa6rV77cb03RYfn1JS7lSwcHy0+fLT7HqIS7fSRk2FIT7Sx3e2Ie1KVIh8sXzhWQgAdgix+vnucpEcXE9OBqtajUgaf+4VUs/StvbiTI4Mm"+_
"Jp78NQh5BFFneGRRR2TQgiMjiCTEKeHlzDKeYDUcCJV4IeUsbFZtGc/oUl6U/YA89PRxQYPRMDh9kTEve2JxSPFQSS/nTiG/mhkG/jC6hpgO045h2CiACdNoiVWgDVkwtJy9FF4RIpKIU/gQQMIRxc/Bqswmf+t27hxB3NJhESWr"+_
"HBte/bfBiJzUVUKyadQCpO0Fj2++HRi0qNmPcOPTIkSrZKdPS42h0t5QZ0a3MfdAANxAasdvW75uB5ITbEAz1h0q7OLNPjDMt9y8dCRGR4TGBFWz5Qv3FBj2bKD3GFC9SbHIkdS9EOKBX3QG3UUeQgLA0gHwD8nDVm8bpFM/mEYG"+_
"XLast/JhkB4LDwLCe3UItmtoICRgl6PrcbnwDFUQKStu/Ek6XY8iKUES0K0TPe86sTgrQ/R0Y/v+EoaMtHghNKx13kBxxY61/UEggmCQv1R03jQ0PQgobhQUA4WnDT1P9MWsszFzCZw/Y0m74lCNdPBa+w41umKlBNSiYtABioZe"+_
"tTWvDIjBuiQddlB1pH3JlsfvjYdSSurofM0HpOHo6pSBqEzjYNHr3qJI7VIApkNA51dK9g+ORXvH7QB2qEuNosBl1byGi21BIYjoVgVFKNbwk2DhU5Lsy2h0FilTcIbaWQ86ohxhT1y6SOA5RsS10i5h1Nz/qGdAiZ1cE3Dwr2iS"+_
"XfYgsmt4gFc+7+XONLHVNtAodE8sE/5wCLYifWuP/l1n6BV7Us+jbAYa3dhCer0Lgzey1MNGaIrqfcEgUM1x9qUsvwOrRpm3nGzpvmFCnW75cgXcY3aORYYmmSapn/LFqPYBgLyk977fj7wsgps1swwpTtAreu5eI9/0sbtF5kqq"+_
"BxDcdfUS/WywnFCfmABuAGmGcnDF40oJvSZXIL490ClCoO8Cp+y5ojJNzSPNzKu0MLj0wvgHZxxejLXOiaYuF+oRJLKL86iWM7HsHuRHiAt4wsH5Jc0S0y6zpXWHFKrXE11fFU56nET51OXT1bzKNZOi7eRJfXEEq/TXyzKe8c9/"+_
"zxDiP1J4NW+yUl8lePMJmFOa4/xvQyv29WA/Yf804yhcCG24j6ZpH4smDSMMtf80oJM0lU2Ob1y6VFsTMHllH2fp08bKapdXv5Q3IYy+d1tKLN77g28d2wEbvkupwLp7oo7GB6eaFBwYe8HoLzSB8y6Lwk+hs0dIACqnWqoCb5DE"+_
"wSTajjpiejOvHLtSUZxx0ubH9mJPXm+R3EilEhYQrVQbFRUpVkAaEk5hZ/E4RCTdslFnBAFW2h2PDZgI4gU3PqnRbFYiq0iuCfYk1Ma1bfTT463/5Ibo2O9JmIc/g7SCgvF8R1U9jgQ7PMj1S2Lmx6fPEkE7lgjb8rJTk2Xd6UnH"+_
"dheHEh0dRu7y+D8oUXDLvbqdc3MTu7mtYGtdHNmzy9VGiECqLACqZG6W5me98NYpweR97D7u3GqvXqr3M97WrI3DAhIzhuWS05KYIg/xLwZx23rFzSCsWzERrRgNqopzSoRxCdSy6+p+ugckYRo69ZqZ7zF9LDNH9BkmjiMjHj/q"+_
"Ifi2nYrr8Ycfmte783wtW3bTf7vn8oKuPGsj5AMXa45U6AXZHb3aPPEzRCPHaqx9CBZUb3N43m4g7rI3dv9Kis8+ahIwck1kpA3WuPV3acdrM1o0Srakibyi+AGIlSBc7Q1y/2QAXpaqZvDRmU3/OTY9SE63BZtgMjjiUMoobFUE"+_
"4LDONNZZeRhkVsUiPVLPYUKJx8/ZZc0LLq3vYl5jEghqI7PwRPH1YmZspwTRaOWJm7upAY27uhXq5bUdvB0gpbTDKdEOBm4RpA8SX3u01ht2Ai9reErlgAkr1rZXmW0cq56KYOemZBmh8hrjYdVHTMhvNYiXO0+jIXQ5j6ENDuQR"+_
"8KDS83NFfGi4pI0XPirUo2wtPAac9cvMeHV5GCiWUo4FbajQzshEJHURWXxx4m3XcgfcXgpE4ROKStoHksEzzqJtDipSRRY0GfLTBkRaHuRKJKtSFVaWH984mROtqjxz4HefCAMzjLiYPUbrxSyw8sSZvppNOqX1xHfoZIqBoEGy"+_
"GafwhHP1us4nJooDjGo2jnIkkUJ5CZyo+pO3kpJd2IFDRc/8QxUPPUcikxSwJnInoyLwgTELiQXaVTVcPJIqAcsaFNFFRVwK5i05j1MwnzsGDg8EHrpVkLg8j6KemE1990iPDyAelwdY39FpnfWGK/TUy/1TKxS+GnsRJnYtvN+q"+_
"XL4IEChjRoLjSJpCRhfEcmnfGIxf1XgkNHURubKps7LQIRsKpeT9olO1qrERzIx0YQZ8CauxziMdRzFZ0obux3W3dqRIQjObnfcqKxQfoLz7HBETSzMaSnRIM+gtdSC3rPVW1JCw0+To0z46mTloUCVttYtjiQbytm996WTUYl5i"+_
"LEIYufBYusIYJ237y1mTWMNlDerLiolk8VqTiLdqN+WIxHpxOxbe1RNeK4Cf6g/ghBr8Iu7Cjo1oQfQPybx5FljajBioM35Osv3HhCxPjM0o5KPIoxLQgLTiQV5soSUC6uSMAboL0PHAXaGX0gjF2QpJoCTBpJSYij5cu7WPTEZt"+_
"jm5MBD0uzVxTwqhfFlGqZyjDKWELzmDoQrDiVsBSX1azITadQCxDb6rmq9JjXXfWQHVP1eNWs2GuA86SRoBCQFT9gvVK4LgAOYMAvYKUbZxLIbH4j2AIji2ttho2XVnBAS1cK6RYfvUtMXtfldsVMbeU0FAa/laQxk+6dcxS4Rrz"+_
"DQwTJN/DYfvlqtUZt+HOxEr1dMBW5HR5EIvtZKOR0a1ycEJyY013wCyEl1jGTZ9mJ21kQo+D0ZMMmFSBblAuzYAOPK03fEMjZ9ZC3/lRInvu2PIDE6h1zyPUA/lQZ5LNCZdheo/JK0/LEazBomSq99CUw88U9RZw3bE6UjeKeKKF"+_
"39IkUjeoffK0yJqpPt3Af0KdExUNxVQ98WWBBGRJ+aA5YQaKJ2LXRDdvOnZcJWR8dzVvGvnfSCCm3f6DC/fWTEvemMQhIcMs0TQh+4ZkI/f/UwNSAb55NA+JoQ3cGM/XDf0WDel08JWoYRO9twQWYeQnWiHo+5mdjw+L5uLXYCaV"+_
"qaWwc83gFTyuDmu/HhCJ2wb+hIxsmcAUiuSsozRbuBOYsU57ChJ6QcOhMEHnSIqnReeANvTrsM9vOXFxcCmfcSxZEvUsHtr22gIS92jHv2Y6gxMpn3QUw/EwrvW66Nv1D2DF8XFB/0TLWpsJTsxZnOL40a6k8Pe1TzUKOZaDSeuJ"+_
"KPDbD55VETeOOC5n12gJG/iUUHxWikzflwTb2Skc+eE0/AbM5MaicCYbw7upnRmiSScztMOi93bsh1UjvCyVecN9xyKCeYRcHM6MQP1dVvo2YUoOjTGEfEa1zQgelavQqDiA9XLXq+INwWKJGZUFqQ+bTjYLvSMC0/XUw7JNW0du"+_
"2g7nEuF54PtB9y38MzlPikwqzgQl0jL4jprsMAwX7m1Dl0NFV+l9seTDSPriBUXScjo+9HbiNp3T2KKJyfCtGj+IImxKG6+IeuxkICXDQ4uuXAELSnucG3hSNxMpnLxUcFhi/SWEe1cSMH/gxEtXpXP++3Aj67FX16tr1tlBpad7"+_
"jFvyIVUtu+YqWzfc4V/WNqfy0seU/eKqzYVo/yUh7fn1YrGpq3horpQX2QzMX/oTsoN2xkctTzQGhXbjfetNH7gWI9tlsuLw+BGoxwk7Do+GMC1eXQ2bQotm9TvExrd0PENgcHuZ3h11Qh6Hz4LbGf9euYWBFj1+iDrPIhVT+Rcl"+_
"GWEn2WZM2HTq9qrzDxG0YSsiR6h1+yupKKpORsUZrff4rSkbVC2nheaWfDI4IX6WwbtVvZFlKbtpzLcLEwZ/5tSAeANLNhaDCykhb0G4bG2ViDObw3hdH2UzUN7BBWgi6be5D00xb4s2tv3TeldIqbDrEaU0kBHoEJK/DVTVTG7v"+_
"WmAPNVaYCkD0FQSphNdwmKt/md3vu+P213nS33NCxqaJ6+6L3Qfzc/9jFkZS7ovXs3FYUt+Rbo6sLcuYqSZ7gwwcgRtJgvfAfY8N8Qh7LawxduG4OLdn2HKMnsMI2nw9iPHGKG+cLfAE/5YerWrIwdSD5uGtvGB8hean6tr2a241"+_
"OMTjiQSmPjZilp5ccyAM2/gxgXfdAnRSLiS6VbmbSGZE085g7Q5r9RKUWsvVE0ohdJUqnoA0TRgaHuRdcTdkndUDjCJqXzVrCSSePcyBgfLz0+hSDfX/ARsffFiqqY0n3GUw/Sh+b9kd0FsMkdlod6NqosbSiIW5tf6GjKvtbUrL"+_
"3nBu9R7wLK/jlalu2IXKPcZX7WZfuUKd+/N4qDKR3/rpO3uIEVFgb+/Ntv9ZjEpMtNO243xChcu/c6DQCzII9WVOOogTGyaQLHn1fmBwGwvooNzVPK6PM5dz/nRMhWTRu/tEvJmcYVviMHWLcY/5VIQeQxyR97yyif6TroU36mL9"+_
"xzSK2bZQ6Rup2Qi7KdPw2yCyj5fQAtm9xiURigbbFqHAzXrxT61KbDJUk3HiM0iGq8tyjoUlSoJPMRvOs/RWpNIvfsbRuTRfPieTrRZgG8vht0556G6oJO8QTDs99MWauQk6nuLjqOjno6Z78wg/OiJBHlBfzCG8cK271ggtv3mu"+_
"BykLaZ54tWx5IhNPQ8u5MPyJ/fPWJR3G0L1LL3RYl7eLACtH1meJT03AZjt6iYGK9OsUMg74abjAyFHhtc0QzKQAa0EMsiYgmmI6f59H4RoQZ9/NKgPe3KGc+XuRzsYKENoXI2Jc4nm8vrhMWIj4YoT6RcZhnu0yYFyrN0YRzvi6"+_
"StMMxjch1G8QCCZTSDDp4gs8jlaDdfrS8CD5ncV3iF17xm/6x7s9Xvi69kZg6tpePO8fP2mf7JKv7Qts+M6C44ELetZrXFNO/l1PFyJThEcJ69M86V8XGljS7IRamVzwP5wnGCIMFQdZTtcvic4N2m156Nkzg0fVmNxZu0aeopTg"+_
"N34so3aMoLqL0NHKE4iJRBa4z4SvL1yaXS/dg9tL5+veHSDQ0SXKBV7lIKXXLTrR7KimFjMjSpUuAX+YYjdpx3EB+NHYZUQ/ezCz8JwKcERwJWUak9DG18m+bIPE9r4zElaBrOZ5zy0UjtIDcTjpDUCRGZfU84ls4R/h2I+SAQ0w"+_
"GiCQDimDEAXvRzJhVvF1DGtvPTHkYoP4opmRYnHoJzxLHb7pSh03SQRKlS7ly9NhQYA0EEuR/RkkAwLqb5K2RIcr9KjJ+6zo2o7w2yb2argsQgDtPH7zY45nWotlP7zwUIiotbSxvX+QilcHyYuVLqOYDl8fC6xqWejJux0aRHkH"+_
"W2iPTCZvAJMNMtVRRR77wSNRHmN6+eGt9lUszYEwwbfTct32oJWhP3J3+TsrQzh2qm+r3iLUJH1bdXUklHG1bzZ5hnzy7fJEC5GNWcQG12EgTIBHYSjhrj/RWY7VcOCZ6AOk7EKQfS0nfaf10JvvueTZ/sOkuuoedZBUt2eGNbnp"+_
"k0DnpcedRce1vv3zGoV0zHljvJqHF2anq5o2gaUSQ2/hg50s5Flu977HR7QZ6emBs2qLhsyKfCLvqI831i/uNs5RLBmTwq7pG5uBdvfO3M4Ii1wycvKB1ZE0NsvS+K8m3TR5f0IkFGbIpPGEysJX/7jJ2kljM+9RxzdeZP74E2No"+_
"ftcQMtePtx7MJ1lD+y2B7FGZ5D0SEefm9tofDBgin09bhdFpDE6urDuAk19G+Wch7jiOtWxXEJnRG7/pq3uVrXzQKq++V/c/eH4pmBNE5P3X40qLH1P9TOjv3Ol8P6H9EqHwXXpcgeM/R/HqH4jeC/exaQGxncmdcAC4n6KP6WNr"+_
"eUlUOPJqsu87tb/1T9EkY/1xZ/nQ720m6fQyMDn7IlqdbbjU9AC+nLtcNLN7wYHvxAF+qfAFPXOgktwk590Yf+iIGn/PPaFDUfys4ZBAEp39V7mY8yDElQ/P6z2hq28XSeROZMtH1eSgWtLeEUdpR/D73F46BL51x0XeSUZK8uKy"+_
"7PI74a0761lN6vK4wfOtRV6O06Oba9CDFYzJ2urKUPmLBOUzN4WwnS0e2sJNh1OcTP7iWSAWskDt/7sVQsvGev7OIq5NJXdBXYNu7Cf2df4FHvmzcwrvF96ywKnG+phunxD0ocak09PeKjdAn0j2cmIe9/ie92TUvns4r/jhT9Vg"+_
"iIihTdRDQLLy3GzziteeVkahrPNqL70+Zt1Bp9ja9hV9Og6hVPt6xVD77zU2WZ53nnveNWuyOqZqD47zsbInecIneCfnVKneiP6JCtgvw0rb60qf6NeTEgTJJw893Tx37nyH9f47wp47IpQJZA/1H2vXUySa8YsijpL7B0+O/34e"+_
"7X5+ImX0uF6pe8SCi3RTif5sCBEwqWMHa1yONW7EVo6vbV05cOrnBR0df9kZhAnxkWVhiJRvpGdmSqHWm6VqnB0E9MzBqKHkG0/A3m6Rsv3Doei0P22GnvPNt6cUV7mwDV0PbKf0/NKx/87UULa0+D87+VrvPmlX/A82r34Hr2n9"+_
"duDa6FftU8d2Bum8/QPObO1rGNK381cuDcuj301Ex77HYPzkwj8TL+vAfHxSAfRO35On6b47wW+kTO1O8dALzoB8oenD4Njd8pk9hd3jP0r5rHLHQzWNTfJ07JzvH3SCl9OPmHH+TFZSGNlGCD5k3P0f9D0wBi0kd/eRHd9xWcc8"+_
"zfyrma9GDpi6z+RfczvdYvPye3Ov9Iq5veaMID5vjsvI4Z+tPwH+LCeO4K/j6v+o57QMf5+hdM14x22Xn7Fk7GHWykN0731IChHv2GP8tNOEHzpUbN5g1Y4oLq0w1NFOUbYk8lQjgPJHpUqNMOOMo/Dp92o1E132Btkc+je/9GGU"+_
"xAqvOV5nq99OF1De1XzV2JK7dSF9ZGton+x+ofm3poX8hv/TPpznVk8Pc+HR9Ap3+H9z8Yz+e/aYL5uzIqdmfHCmJyZj2HNJncNKH9CKXtUNxgckNmot9pDzWhN0HYJZL09AetJsMwQjOCm9JDSddxT01Yu7Dz6Pa8Y1nWUoDj5e"+_
"sNrY6OhSTOaRUWd9pLhK0oEhJnrUK8Uls1cp9DG9yJnBKxE6HDIzVALpo18nbwW1LfJOZceDb32XDJBVZC/w4eKtXj1uCOhWo5KtVyBwS5gOfXoZv5KqPdptWenfiyKGBMPKmV072+dJv+FHxU4tvzdf+VvSDJoelvmY1/FWs3bg"+_
"Wl0swydSS5KPDKvcHM9T+uEr/vr2UiZ+JZGl+PP09/rEo7bXQ3XWxevFQ3c96A1nDcKY740vwk+ngleyBSVlUAb1y/nh6jn+b68S/PgB9/MEh7exthPenywmVhu9hnQXMKpkY+IUP41RFu0ThzEU0d5wVRL1Wdpp2h/bxZkTS5cJ"+_
"5iQbe593Ummh3IucoXQGu+HL5m/nvHyv+K17jMZ8XQiKzRaTiBWenBK9UUZoxc4VCoaWIuR1smtf/LyEtJcLvzgRwDvTEfyHA7ow3nmh3RB1HdKrI4tr6+t6JIjz3iArnnSe2eCTrLVh2IsCr5WK4K36oLwGsmMrb9CKYi1sU89C"+_
"DtIdgITT0nWhozqQXU8hd5UYTM+wuNEG19SvO4aXMTguhq678TOrKbDLdiGtbdM+d/WwM+QXZ1YTYQjbNdZZPUVINsJ2pBkGRJ2ScA3oEIUslOu7rh6PF2gqPpT4sZ3nCzRIfKT8FODPOFCC1lbxesWsnREyh9fN17RfhSz+LxOS"+_
"WhXG9f0EXf0MkiHFYxwdf++UT1NT0/ULo7ZCzdZnItl3XzN0AmPRTWy4AbaAL+qvPTb/PFX/RBbfV0ESfIW9kv5f5MztFA+Pyo9SDLm1XtnMxMQZ19dPAydtLxEWXYMy6d8qSZ9TBHs+bjJytcCZkegDtKQks++1x5TdIaqkJN+A"+_
"PdebzpEHYs3QLCzl8pdiCFF6KpGGU/7TQ0ZR+uDLW2ppl6gTF3AyI1+5RL2+LBEIg8bkr/bxh+qmfNziJ5hdspEHyhCN43TStsujZ98hNsK3YyheDd1B2KpwFOMm6y2MQFkCIyMl/BJZ0b+gAdrJma3gTp9yGuZvb/5wgZxhKIPU"+_
"GQVuaB7HoKaZtsujVGhWcjmvX2yhif9bl1fU9lt/coVuQNabPHpqpheteZqBcZGDUNEjXJtlsDbSJ08jTFUFhxeSlQFoSS8rfZP3Z2PVshcafNhuuSW/IdguZ/e/1Ymi9oAJeNo2gnedPtJixQxEevC4d/2opzgieYfHKdOatnA0"+_
"/VeotNSUD67gUYajesMSCSwaycoqIq5vzKmOOVygx9/Kx63Fmqx2sJqkD5IuYiW2Mm0+c/IxKX/rvnhWP40kCZJ4GkOKplYJ0EEoTqa0n+9iqHDpSaiue2GW8uYdDYtvI2CZOiN7Pc7xrfLJemsBzQwG+/JnY0oBSSij3x63A0cs"+_
"y3xkZKIziXjHGnbQvD0abAOkrX/Qq4MK25Okxmbkaz2/17AaszfK+vUCZRe9Wbnxp3RUZwzgz7CI/QTF9J0BCdxkR/d3ZuLyt2OfXym7geC/OvLNdOxy5E03DBVgVjF/fbb+3Qm+XtjIrObOmEHv/gQugUL6GyR/YJPljgtfg9Qa"+_
"4X46wuspIEZc3vQ9VxxO+yp/bajPlVy1NY6/e2J0ZiLRf9NTW7CbUImY/0q+6mn6uhftE8/WG+1gBm3JraVMGbRu7c7Ojs8uiAzWs03yPMI/fp7uTBU7y7PyJ8zxX3f5YH6LP9M00hGltmMy2FjstFkvxThJXiAdxGre3xSTHxgZ"+_
"Fv8uvrQxzIiUofF8PX2i0RsS5RfiXeXv12SNql6X0Hj2rBlOjNL4VINgcG4mmF9OGgr2GhY2CajO74aKlE9s4u4WN28nD5g04ku+muCkyfqTSXL3B5qQ4K+07Iu2jVBg03OnE3b9QXegtO8a2p1+QuTKXzK5QOmUkOogpi6h0uOg"+_
"eZrM778/EY+FgyuMw5IkjMrewQW3PN2sQC6MajG9cb/5ncH77LDwzIbgXHfpw7+R3Pyt93GTXaz+TQI/YKkzfqrDpeInVxvEbRu4Y5wIGXaF7HRfivs425wh7b9sIyJXIQ4QACtZAbbMgN46LFb4Z/whJzen3OqVHYIdPo6Pvmbt"+_
"gM2auQP5LD/NR8X+4Pbijgn3L3Q52FsvWKNqGwvbavWmQsh8PoQ4Os+843gHSYvrYmPRkZ8kJfedss+IwZQXnWceJ7cMsn4N/gopv9BJ9t2xrLhG+hCh3JjuOBnIz/GdEw7oT9DNeXRd1n0FAPbCclzAw/j9qzyMw/QNeE4MDz27"+_
"Eb7+hY8wN8xafxohaVLBV4b4fo9Bk7VRu7X7vSu3CcLnns9GpDP+QOX5DP6hZuy/XjWKUNkW5xbo9cDCMO+DSYy+Pww8gDCMtpXk3zrwwsJADfq08fpUp6Fwy1HaU+BIB9OaC2VRwiVIPEkoE22ZY3iE2hgMkw+wJj3kZOSYXfy4"+_
"NZusE2FRwaM9BlkPDuOPT8nB3J8FD9Zw1bfqnQc6RX7o1PAuI9JcAct1DZPjkEh+ZvVz0gf2b/A9De5Of1B9Q3+o8ajjeOUvP4tAn8Ju9CwWkVcP3l+JQ1+OvXBxGat9sZZgzyz00PypeGj4ckKOwoLhPupFRHnvLjSy85IjC9sE"+_
"QPLJ0jhPepZRQbbwOit3BvE4w0oNnThZKqHEMolNq4OetOPTsHv2DGf5a3Glr5gy1d2zDZUueC4Mujxq4MFH48VIvTuQ+1JyeFxfqYdPsF3ZxF3pSpbSfZPNtXMYBJfWazWs/+7uwzIPJtMfZOOIJWEm4U0S8FtbDzxlPGeU/l7Z"+_
"Q6vUtMMevLdBVrXl0VwC3I2goihvgtTuuByVXkrSIXKbCuWB5yJ5alkrSIX3O5aVkrVRuahctWyVbkr1Tu6gctRGfkrtw4ra4yDjPy19QucRuqjxH5qBGfkrdy4jc1EjFy19zYZzwVLMtQueYy1WIXPGnWy1jzplctLO32Cc9Ecu"+_
"RueSO3IXPF5qByVbkrdRu2DzNIXB58lc1OnWiTPZaf0uH6lvE3Qvdp3n0TQ9JlLvzY68/gtcXANdcG8qL8qSc0EpNyjcUCcYSRv3CyeIpmhB7jl3HIQ2tEsNkWVzYXQnbd/1gdQIqu3I6MEFj/dVUlZbvBN+37ArEWpGqI9GUhjc"+_
"tHyVXkrgvBe9ik3+IvtTucULc9ykrCJXHVH3G67xVt6obX1qju+qViugryjEnxseU/LH7hRmQ16av4YZb7JdZBMUawhZXKNQmn7BzUHeApv2to9v/BkEvwECGgUAfCxb/D4Zcn7+pVPQAaz/1WYkToj70jmW/cyN0HjY+PH2d/6r"+_
"w2ifqfVfdZzzVg2bzArklWjiaHLOTzQHTPwLiUiM0X7291Ft/E2b8njQQ6Nx3NQ984iOVQkIV0uQ0uNBsYddXJ2OD6UO7TzRR0m5RpKU1GLpobeFQk10AEvtFQKUpbtGzlZTXTL+Lt7UKVjC6sII8FFIR2Q7e0bHiOQKs7tRr7gg"+_
"7CHv8gM3rJrZeGXMVyWQ8gpPG503264lLhQqfFD91CsIPj59qvTK9WX2squwS7s4wX4098XwQPe+TizuuQzUkWXnTNjFndX7FY27I5oMBUIxT/HWJjoYz+9XrSspLvaqsg88MSMN0cwfTCXsSTP0K404gww1yO5OQ/KsTbkzLOK6"+_
"22sFoyFrs2wr0jVfhvHvjxn7eNLQSo0Ejb2rRSyyI3L0zfNq1xZwvkDuLkn83wRh7is2FdGSasJTsgAf+KR806LXM2rk2tff0w/zlduzfIJ/olr9d6ndsZPXVxeWbxeu0itff/aOETb9OK2z1WsnVWsnboYPTmcYfn/AOq15JPfa"+_
"L2+ObkE0aRI2d0e+lCHHjPzR/UhnjzeeEhnfXP3vwxvvHfCH/he+2CHnmhbTCPdGad6Frg00V+tibVmspAlTiVetxF6rwgfF49ZCtA8+NI8Ea2iStjdcWyimVxFp2Uw6GH5O+Myr3UZotg3Y/CZtm8NsvXrNsf64c4o+b0fp28fL"+_
"W8/QUWrmdjKvpLFaj4axF7ovmapE44cM87fLfbXyaA1WI4TmChcmeHFGrX4q+Q54fJafa2fYrtQ4lEwDuKkPav/fjm9//S2XbLJYftVO3nBf2mVfam9+NkRQh41WsqsFSR00k9kbRWXF91Bu4IovCgmNDE0tEtpRsLMWv0FtklvM"+_
"7ZFbz5afMvSQjyT64gp6ni3wfKgCRAJv/qtur9zatLDaiqHiUOwrWJeX5upV2TzHpd+b/7mWb7wZ1cecIO7HCr37QYggBTRdv5rKVU3JfVefXHs6jLBEnuWHvtGWcJsjbMgbNyIO7Q3IOn6pw0mn0rJMizcaN4+lmQlh1VEWr+Tj"+_
"16/icMkZYmLaJq9pIsQjMeAZzRKR7fXnE+G6kwNnodk+TeVQC/gTJIhc1JBhmlyatEyPBmdu2n86xRFTkoiaJqYUJBLvZw/rxPGFRMZeqBhfsyo8jN96JzP651jyPW5gzPsUpquAh2L8uIX+ZYNPsch2TRe/uwLJeMoV4v3JkV4v"+_
"NcM4rX+Sinf/11LilkYRcenE5W+vqoIOOZRMRbuRrpXLuC5EoCpFqQ6IRQP2hiXf5LQfDBy3M2Vr9z7qF1ioQtTlNdFTIUi+6RrtBR9iJN+rwsbXMv7fuMhTtnJmxyGrDPJCxsSi4l3whitsEYXmYmF88NpRtVGS97o9fAQoZGxs"+_
"F7/UOzCPD42s9HBr5yCdYbi58Lp5dIgvBlBD+Mh9vQbJ0Ra63qei53ejwicGQ94N15H+L8m2Sy/4qdgW9RwDZ2Ullk8aopRzpNLyQGble5CW6Yd6W6I7KSHcEN2+27M2EHn+N/yZCBeznVtUgAkuwk2JY/aP/Y0DSO/nK/zEnMK+"+_
"LJK+hsFJgFUXA739HozBXHsAmYSggPVMqkk2CiQAYdZzH80e2m8OuiuPF/MSLAdTOvX2JNnOU7vB/8lewaC8ItxSNdHVpjB4AKdAR3lv8fSsRRZ+7RZwd/UDJAGZ/Kpy3APTDlrFTbHx2zV3ax0EtTLCqH47evIVatcShxmfTclj"+_
"2bTchGpcBFxGbHf1Llv7vHRf2/AXK1+GyUZXbL06c+R5gXvO1OrVy19nw+TEt9CWFiD+8odm4ESjMjXkXPqh/ni9nU63vr9TrvCBt/d1AfKJVLZSEHoZefmHM9ZissEzimG5gcl7xqr9TmbZCDjaTxE7KQLcNdJ5G05O4lXpu0J1"+_
"afih7sVsnxUsnLM0lQj1dkGojHjpMCNTKVNRe2vyLgF7kCVEfMkZhyMG4yibSbjgtkbAudp5+0EXIZ7fhKlMBfJRM2AQ+bYYP0BdcfSya2IAxELm/cpP0G+bP0MCWoOAODNtgrKqHDn5hbPuKJic6jjZbDz9qVdXv/lOkXpWR1tw"+_
"njOKT8K1CRE7Vq1jhCLflahw1vSteZksYNkcj6/2Mq/T+84srdtP2MBmomPUtv7GeTp6A02J8eYrUs4G0gKf7GBglRJOKO0mgbjNo8e5tOFVFO4ddCDYUSEvZGxbvBbxnLF4OcEvDoNTwc4SuDqZDtV5YxoxLPqNaADB7EG3gK/V"+_
"i2oQEG73XyxbKp4jVeAbtYJE6DxLQ2bGafIXgixQ2okKnP37wtBMSfUjRNFY6byy0J50HbvvJC/tQg9CAsmIwSief6xOU0rFt/DKOjzJLDfrD65TzI+H88E/OOPxfXxHfyt/pz/vD0qkqADbyKcOMwH5SJhJtCASTBpO+5zE5SpE"+_
"vBXaTWUOLRC9FAvJxPkxd2cIDvOTJEJbvN8+1xTeQ7TGj88oZjMGig0JWsEa1R0rwsUwrlDfKMkiiWSifwz5o9cEd2dUuP4kjvw4olkj3pI+hU+AEiaHAumymvVKcOXyMC94Yu3H9Ziz9LwIGemcoLCD9x3CrzV3+KzDOMROmIcw"+_
"9QOzspiD1lWo0khJmIb07BTx/0+jZLlrGk6/Tk9wLfcz5M8xP1zT8mG243QkS02+YGizzRMtn+mMMJW/7tPyEcFnScfL+hfTa2OZ0K9NSH4I13Q9hV8MdspCvULIoB23URKhBov4WkA2CDo8s37tP/1Hb71gOhsKdfKYc+Ea9F5E"+_
"EHnMK8C9VOm3iHv/Px3XHwNAUP+VSx/RvJH/fklXh7EtfE77lubgrJNYIafqHThrxq2SGS+X2xdYBDrd5I/Y943rhZB372va97XPg8nXhnMT9jlAvpfLAf58mmM6mWhNx801qhCt0+ob/6vqPoERh5yW3v+YH68m/PPKgJn/5HN/"+_
"Dzt/EZZlw+lrUdFFfOoFWZW8mGZhR9v2C4WTx2+RbKJ3ALu4jYwxSGfnljMB91p3QZJ3Mk14WMvZOcBQaLo/x3ISEK4Ie7jXJRJ0dWeJ6w+LTO/SA/G42Eg/BiD37YMKJgXd4WnAvG0f8337rMH9j745oKeu3W6E6slonZ0Uh5Rd"+_
"ANTwWqcGXAlAfGdRq9VpalojINk5nW26533Lu8T5f287Pn9gnfZHzknGgtMUtXGgKOVG5BzLJF+4hyjDFndnYJSHkeCDRTQ8I6XFTKNTabMxyDW8TON2e9ZIsxkKySh2TATiSIrV6tnrQj0ClVji9HktYCD0xuMqCopIesc4IQeG"+_
"j8JKmpL4ZCLKWqD8+hOw9OW6Q5d2+kHZzPNHJeRo74sUuJAXrkxag34lnS+wq6pKm1udHoMdHiy0DmJy6bxIr7jy6pmg2zVPokKqlpi+DxAYUwNAxCPeohKSS2+Fje6Z4q8x+sRPnNsVj30Z0+zvCJuYsmVj6joEZYiIzwXFh7z3"+_
"mCbL0I2BcByAesgUGz8ha1Gm87cYNwvbH4FvaEynaJZyudwudEVRBi1oE1ltouyOqrcj6aSRd5Mqr8SUdDJP+TyUV9D8rVODNkjVeIH9BXSQe3Y/SwGCIzQUhJu/mF7IhJ+OKl2UCxOcMT9YM7diRBKF0Zi0tJPvM28i25dmYo0P"+_
"ytYx3Zt5R2EY1ZwNGFISsMFTL1ieIm9kOJFUsFch7JuWTF2ppAc20yp+wWMYmDZ+FF887gkGD7oubDBZqDBmkFmRFFKMtRaKaCbwFUq5RUaf8Sms4nb+zxoeQG4sGBvgOS5Df2YSa9DZKOfODoeEc8cOKkNLaQOSOTeYPSO237NC"+_
"FsfN4UIJsc/4mPYBiZeQjc4QsCoB0e2xQTX9Xh30OtvfWJ6nS0jU3m65xE3X1nq5ryqWTu7MP7N5urmx3+ay9bB9Et8Cc6ZkF4wTGFUonxXQLemdo10s7uyLN+wl6Lcq4iBu7QrgCKTZQW4gWCmgbXN2+n6JVoXcM9B7PECsAKQc"+_
"Zq4d8IDx22gs0X4so9tJXvpSTYK0U47OnxDKD7F6pao+uZ1udKkG73/thFO3s74LvISqpqcjGQv8peusIXyA8bh3oBeSMWFh3gLOg+lB0QwS4ZeZT3c29r3VPYd+3U4eeNN5MiMOPge7NxT5gQd36nv4zzBK/VPFUKZhvw/H0AZJ"+_
"kF51/ycG0/Ek3CzD3v3EWiekZc7G7fSyzn6aVXevBVMmD1UlzhiL32gNjStS0umDC8Lm70fRf1MG2H2j/4rU9QXK9zRXJ/4Hfl/4ZQu2xfheflda/RaPqxjZo/PnmJ7bkv/4euup3/KtvI27eqlbToUDtqHDPRP5BAbZoph8Sp6w"+_
"qfOcRJ6g23bKo2N/DgrymHAgLCmt1n2AZrfJiYT9T1a7IwFnt+5s1PntGFIj7vEm+Y88c9bQZvagnL85YjXEh9Ms1ytpfPlFk/guoVu+BaFhMN+rG8rkz2+4stfKDP0QofBQ9UbqH2d4oNIib/cGOpKvzU7Dee+KWokXw4KW4GPO"+_
"CqTtHdf8Vsgr9rf/RgtpCQ5Z+DNG97g6rbbQufnxMRjpMMJgaxac6sTa87hKl08rcO0o139YTx7c0yRU2aImyWNHjLbvQQ+GoatoI2zTiwHGK0F27xMBrKvhHGqjF2uGUGe0tSyMAHy4d4fZ24rqlw+w618gsObN7vDP/EtTblHB"+_
"OBdrng+qW6ooxZOv8PuyfOa9/cJxgu5jyMof4zzMolFEMo2H2Skg7M1hGgvssGIJM09xNkxcr2UdEH7qruFsrn0CfU5NMvZDGnR7n93VL08xcGEflqONYXPo05srklgpbws/l2fYvjWchk/MnWsClxy1Nxm/G7ccBCF8mRxecgBJ"+_
"9kdoJy5NOxMXCcYyBcMHyhJ4YaDz+/WpC9DoBNylQP0a3My0974+k6Sf2y5MG/+W7NrYVp8y2/q0B35wX+GvYjPq+zFmAfM6few5XM0KUvzGKpnh0I+ithjuEg6zGtiAVZrvF4Jr/VGeHC4nArcNxk5ILuxzwtJ5VokASNa/8hov"+_
"PxFvV4jb0pbkZoN47Xh2ZBd2anseX0mpoktbkvAt/Lu/1ljmka3+eTe/aNWGj2vKYy7X7Vuvo7X7KG89r1hWOhIlnYzvZai0L1CND3lCuItm5vNyc+8/iyDPR2+AGYrqQU+7PxyvW43LW+T4E2fHbfY8+zMB/OSw/TkQ6tkQ8Zng"+_
"/cTw/kSwfwEwXBJEfhJ4/SSw/Vkg/eTAfDkg/+SwvSCp3ZC+fFG+hU+Yl6yH3UiyHL5Zh8xi2jQ+YsGyH0mXpvV9aP+ejTAZ8kASuPPEQsnAkH7QS6JvEovZz+Hq1TuHG1kmLbb/0yItwLjs12EBbsayks/0h0W2vwnOSkXYXvQs"+_
"nBCAR0zABgJ6Zg4XegIRGS8c22Ae64LFeW3whnfIhHHv4XG8MlhDP3SbDTkXKFZZi9TRrT6Cls2Dbo/17+wyGYDx5fMVTxf+H/E76n/xjx3NM7n3DtbK+DCpr4OIkBmUZZEd/rfUo2McYIHNdFTkdpyw1M9HBNacgIvLqTiA2NOQ"+_
"kxpXtllQQxdsIHTCRKPZkH4tNh5tLIhsFz1U7VOacHMSQRH4smSxRlHBTxW4RvUl8Bksljm4BkcYu/qqO+7vq7Mq3Ssw20G0YhJ8jFqJ1S7Dc4HZkRvOrAVbceOLbfsSpZyqfBRRUSqHdwvUrE13N9ycV9p5fPWfZRVtR7vbIh2j"+_
"Fr7/L19t2tf4Ex36TAfbMZ8lHNSQpDEztqR7z2vU9mXdl+Vqkqv47Za6WtwmP3aOqEL8z+Lx3FnjF7hKNrc+UKro9GZxmWybIjNVErQJdQYdesAR3+ann1cXA9TKuQeLEIwiWlYR+Jb8TGtHiT/v4+3FkKWk/i6kXTPN9LhBeq9L"+_
"ySREinvNV/0OAkPZ/O8dcTYyj82HDtOpmtItH03iYHKeGpEdS9yxp5AvH2TZWJk2/lH0X7O4fRfYxjIuIV8JM/2WpXFZ1CevNr7m+wjFPU3PWt2hgoDNW+3oIMvM6KuwO70Gpe267Xx77wvzOqxhc6M1LWfFuYZTUs0uJTc/Akzs"+_
"/b8WuAFkZ6LLpN06HjurQOoue5O+HzLuPfGlkU3qscO+8TTZuua408QNYkpPVohIvcL0fxI13Iw43//o5nkBHXG+1TIDVPIao21549KVU3TiM+Gps3sDo5g0DBfvm479coCrp+WyEbVuEbjgxmWkizEvFrgZk+XuGaETCMBGpehI"+_
"x9/iWYpn05Zpmp6NjEjQyEq6HeRgqXH0NMzvstbqGN5z/JfFBKn/LXnXiNqun7VE0qQLxGp1o96iSo9rrkb/WoaZdorNkhfhfXbwc5fvV/H0q/GKIVH61cp3gI01JQ0k/H8hdaogn4qKYVtDT8qOGyIZ9paeopFxpk/8erMydA/W"+_
"aj+liEJ6PGasetNuYSCVufARXnig4UkzfD7sTo0RSbpifrw6kc+dZnakqtGNsxcy0TgpyEA2h/JfN2euYZpTpmdT0N6D3hGSJyfKRWLETro+rBBTXQIfVjJYIvz3UPUIrvwlAnD51J3YSxRRl+W2/u0vLhDHfTTdpOGOGX3qlkt/"+_
"y6gHPKO5tBxflB7XhtXSERU/9/aC/GyfePla9dG7tY58PWgy6+XTzmY+n8T+4GOYhNNmlsMcphTTSMcT2vmrv5U+5Xr3PFkhfvnyf9daseMbNJOvqwKKM/0OxltyAsRVtKUDm85DtzoznOZ7jxzk5LPwxJswK/QedE8gTitswCer"+_
"EdDJSe81MZTFXeITiX/a8iNxobfTxyOTxqz3yF2CbMb4tNqWJ37nczDPEKdBMi58wRGolCxbO4c1mwTzdvZiRBH9hbgiW42X4U22FFgDQ8DCIRSi7TrILX+zAI2SeS75Z5NVcbtYpuubNKx4NNkCLyDrSYLenyGUCuEIDWSQgQ+s"+_
"3eD8PbKUCoHjFHnoCQSa93cmAOQyo8TT3Al6uGcUms9xJVNRbkiRG/cpPemfx1ZHKGZ7ZQDgUWHYpMTZY1CSobMq90NY2QPv7NTKyJH+rw7MMsgwBp8nXs3/BajPduPmZQ6sx71FbJYiiSwlVcdjiKBZKmq7naS58qJnTYKOVlI3"+_
"ghdVCY055QuFLO8cbY7Logo7GQRcOlx50b6SZlQLQEThyYKkjxMFTuiYcJjxFLtItVHs1T1tMhZRmbxY/eucBD5pPteXnNEKPRQPT0gcFaUige2oB1OzYQVAdCw04cNN4QkJh5fVLXbMqjy+93JiRoQssL2+9fcxhlZbjrYPTvnf"+_
"li8n8FilYunfh07qEe/31Hcl97wg26pRxlFVm8nuNxf6CvpfLebgaN5FmJ4bhNJrPYmgwY60es0kLniJekAPO1X1w4KyKVjAjj1HAyIT0jPL2hAIv21ug3HGCvjTT/+ZnmQSyQ/RLQj/5OwGt5cvz7H351I7YsPjAu7tkbWaifRS"+_
"jv04cqd4/uEv+CvJvZac7cifhknDgR/ENd+w3Lx4D05W1xnWvpakcj27V26Kg9Zz/oOE0k43XD62rNPsKgBU/4KjgdW7lofpTbkAT7eSjamLgpuza0+5fV8tyzL+k/O1vZSDaLsd8qR8aYahNkXYrc9uDtLDj08v2t1q0SsG+TGa"+_
"8rHIoL6nu2DlKJgY4/VTw/fJB/fE73o/T9znQ2Bs4G9pz9E/+pKshCa5QyF2T3oNPG2EKxNaz0NuIbie32UJNFvo3pN0vJ6AL6XtNJffpUkZvXJcEoYLBQHujqIHevQybJ0a/DgZLbuITezlDJTOkM5QScA4B/+upDsKLsiThmrG"+_
"ZVnMCZ5FHETpvbqXkupbDuW7Su+pZJW/kCdbSOa6HL1skLKaCg8D5Qs2qoLE9U8H7NeK9176wKhc0HONvP5J1YituqXEc6xnq+qtKnDAxH62QiwmiBfbfitSf0+Ir6QVECQA18ZoaQAF9R73FFqcQACoGBNIyeQERpuZSh8T1B17"+_
"4aYxrCV54wHSHEig/Wai3XFujAYre1GtwO6VRWVELsj+A8In9rutJE0hoClLa235jDf43cGeOuhxRV9H8J1TzSlPpObTuUpu0kmtXfkIhsfTxUh9dUslrddgz6I9DSLXyBelCQVp0t6NuKf4Lnn3q+sFBDEMHZk2CdQ8lGJ/VZEZ"+_
"EBrsn+lrEP0MFmrn2v6DZTLHrjD2nkvjnK11UJWwbpSeGa7dW7+gkt+KYt4dmkTq1NNns+ZLNxk3RJXs8d/HlFU4T30gT2egcIEM065DEbzU5WOP2nsaHS+mQRWSVKImXC5Ru6PhFrLn0ilHBBn4+dMJj5bYSUXFGNL8dAH4W8Dr"+_
"3AbKf3yNlvXSyfaRWev48uKZ0XIITqeQcKRYIq7tpSdrpMU0vDh+gkavb88W5PgsNbOwnQbN4b99p49tjrRckZsFe9pJXf8MPJrTHBhKuc9mNsed+8uHWwhwdkxiuIvZIYFH2i5b3PDXdy7fQB+PFPf/k43bwMZLjlo5PFG9+CHB"+_
"jr9TeX9x1yWJOT7LZ9T3qY40xUXZ+0my2sXsnLzn2d5Z++0mpnCCdt4iNiifHHynywczZrmbolMMj6Yd4m2HMQsTTowh+o5xf5abU+PaC73wLP47PVox3iwQlgUfWdQDKdCZf6Dor64/cs9nH6ybhDH/LnTRgfSd98KUbm4IpJvd"+_
"Yr8JiEJRsdgE2PvcanxyQv/pv85J+jeei/VkxnA/ZlJK/pl7v04y7aSwtMJJqfHLs+dsg7VR1b2mfpGfGB8iAVvOLS97YZ30IORyqP8OW+HNe7UMR2YV+4tacjXaTNq5kNtYNnMAC72k3RINco/WnCyLZ6rVKDLyaLYQjaFzyUMy"+_
"y2GH7JfegAypDNqJGfC5jp7ncIqGdd2aXxqzJqYKKPWFlnE6/KJmSYJTpYWP53slQ8PpEcxQ21VS1Hdkg86blg/uGk2zRPPCgpiNjFmiPNNFx9bS3fQS1vccG+fS2v6Hn4vPCt6BzmsYj+gGg6DajRvzNE9KL+RaoP/Eg9a0ZVvb"+_
"vI0ZFdPCEm7XNMG8MwVZ2CdrRcY/pq1/Pk2QHtA3qFsbBp9DgnUVXmF/cSr74+58qufo43MBmWT4+CdwJu1wzH+8TbX8QSbHSQRefMctYtMeueSa6kSa6nKuQQNqPqLB9NuzE8f/J4vpE83Q8+xT0v/ff+/3/c1lsMnLYeFOvF48"+_
"bugCL8Svo5P/LaBXWZOrcz14sqL+KuMnz15tVV1X8Ck/8AwtRNecltrBDnph/aIIub0Q3dth/2yehb8XJBxftJSSqSY7wF8vUAzugVdi/uhpJivwFI+m5lK+2+kcp0xkI3WY/vMdMkxzXBudvsivpVSlCQtzeZ57EFkLZu41l5c1"+_
"3rzlW1G3ozb1TF3d514x5sXdtCXuqq6y3UFzbNbeT5r0ijnWgrFBcdVVV7W2Y53btOL35Grq6Kcu5Kd6pi7xjzNXtTPrvCn1umaqoiqdWV1I+tA8U1a8uxyrx5a28G3cNzjOLx3uEXXP1XRtlvuKWoTB59Nn7aEg5sO4uSnVuuyw"+_
"3V7c1rrMyR10r725dX1a9se4igauVgY2UF1SYRZPS8aH41pTnbuGd8O3Nq0hMupj4QuIeu1tUxaqqyqqAlEZ+O7Cn/cva35PPFlnRA/VTwXZBOn7qjFeqcS1/Vsua2s3qXrzyxfru818tEeF4qWgMAHCZdr35VDU2yKk4cmEOrWS"+_
"DX1mdW9m94s2vVVbxpnNzIuawMZOLSTTy0sEKN3NlgEpD9ivzaX/m9uRQHV4cWMLaWOXz6LvmyXjnKAtgQA6U/4OjtcVjEf3SVrb9emb5bsq1VdcoEpCc6aqoWkfe0pualZ+aFVEgGL4ZjhGrQizlVR1Ij/XAdqfcdS8NNgP9k6c"+_
"FAWIlRpjKirVIDWxaR+/US4nDl/bUm/3QV16B1rbt8q2Y5rejVIrTESleoQmnS3y0dTId326roaJtcvVV96kgXQCV0Spk1Ue1Ud2mK3zaWPBRS19zTx1eE4maNetV68e3sXds7curpAyvELGBXJkYJ5sZTSTbtq1UhztCGY55ztZ"+_
"aRivlD8tCDWKhEklV7p8qqWSrbcjb+upSQF1umy3C4vVcXero61URtL052q25srpCPerp68Lw52gwOJjB+dvxg7Kroi1iYJSYbovAwpyfeOXxm153cTeUvW+GdOrtNLnVVpzq8Mral5aFrl6Mp6CcWTBURxTBA3F/cCcvQgbv1WB"+_
"S12m18c6OBazZ51UhTI9BG9aJkCJ9qqVX0grjzdZLcNLcpLc1L8qXYlL8Gr+G24tUj7KutFe3LE5hp8UapNZ+cxU/1VVTteAFvuq84cxxU3UAyQwrWb0oMqYV6Tm+FQ1XVvV0WQWVO7azPGCxZpoMM3NSChbECYSxEQfpk+SomPU"+_
"LTrK4xsi4xyNURleSV0YwK3OTEpJl/JfceeiH8BzzduKZsQnbeLeqCdFPNlRONiLW+mWdVrz7m9WrSmGxN35C4n40cu2NXRtVPLPOLnq/QtOqIWn3NBqlk5SPK8KtkjzaQlVVoxbcQ1SuO9WdNgruuqr6bXxajH/jdwjTJ7F6ED4"+_
"Ux6Kfj6hN356EwPV98bQzLGoWUSrkbihB0Xaj4WX/mrxzt6pGIvHByB2u1NhCy1WtHzKNQKSDn/DzWWG6Ek52RwftkVarQk+MNJGm8xeexgnPJ9Fh1HGA2C++iwvN8F5TKpfT1s2KoMp24qbzSSm35mpoTbLVUzm86pC7imY3ZVV"+_
"LCH0sttUFq/XHcH9xiT8gycaL7muxbq0VkXs1kpnxSqu2qEFLyP01KTqthvlQZ+xFfd8HEf3yJEf74VFfpFhTgV4rLSnL53Gk4pF+7w8YtEipNkRfBLxjzKqet04+uvn1UBzOXyaXLqvuVPoxWSwPiE8bioNvYG14v+wfNsVMvFM"+_
"/m2x3+wfNc3xPlpCn/Cu4L5SvsL/Kuyls0ldVuv6FMGl/H9Zk3i3q9U1mqwZF1UD6XTxqzy94Mmas+qzly/T+c+67otHA8S8XH4vuwfJCvtE8HBPDH+NnVGDb+V4jiLAH8XJ4vVh/S8Jl/fbnzffjijo44DGLhTUUwFUEFliTRUY"+_
"iSQEAFlIRB2mz4T5Mci74HFIBr9tgvk13ea39IcSuwlRRUQBFpgiUkCqi8fAEprMFWyUkiU6CKoApcJhkQhV28Zezse3b3zkUFFEeO/9m59dev38mZnbn3tYcpSDt/+gV03NsNf8XWQPqakxzLe/25X8zIJCz+tjULw/mBOrUqNH"+_
"eFWqTg/icAfP58wb5E0ypdUI3KqVkdk+wKtXyrbT3iKQ6B6jmDKxRVc+TkTkr+WPhDHfvtTYJfJvXzRu6jbEzDNDwk5/4UZ90Mz6Z+J8a5kH6TnF94+V7V+vscnBpt7z3u7e/iSd/Mcr+nK13CXNgpgOwdlfl7Fnhbd4WGuoMcPC"+_
"uVh7OZ42Cu7B3oK3H+vLTf9p9jAPG8MwE/GpKA+YQNQTQHwqg7A+Gw6g+gfEsF4pgnDmgfVJfLwUPD7BzDaAuKwDsK4ugHAeI4RgtADAbrt935eBg5BXHEB+SwDA9BJlfi2PNj820eSWXPcmv58JpdVwVBRg7a7b9/Yv1B76gtcW"+_
"3oZ9XZFyYvKpzPdBmLbYq6EGZvPkIztODi62pS7b4jNJcNnHr8cHpftcdDC4WicLXybPsSzc8NWOw1pJ0J8L43srn7ct8cPHPNhpzxLDnh9yBtiE9o9FwH2mqZ98Dt6J2W3NS3VNfdOVMbEdYQFjTjTtQjedctyJB88uOdM2obNN"+_
"p9ukt9cBuiyN8CFabbM9SOedpLjc9E50x1Mn1ylvdroUJuy5vkjnxbpy2BqunrbHdd3wOc6mxMZuH2dlM+sBpV2qd6wIrVOtimzPoOJI65aOKMZtxoVtgW+se2TP3LyZj7y3iLYsgJjpbkIqs+JVqCHs1yxjU4nNgWMBqzwxRw6n"+_
"Ekrnb0I4Lrv0Ugm5vrztyr+I3XZ3DYlWwdF/gem46itXW2L0cnUB4KdyGhF66F1amesW5fZegH7kFbiQD/ENs7l6ZuWby1uqbbDn+K0Opfrt7idI5+Z6ejbo/wklrKfh3scLY+G5z4f7p3l9+F2r+ijN9n/aH6z2YesHTHR8sYXb"+_
"fndn+qLPsNdY4Go/sMda3HmuS+5kslr3JO+Rb65p79QDe5B5j9pGYATdnuRp8naQKI5tgkeqNIHK4zcy7S5THcizkk91+1xBZt9mUfbqnk6fg6h1bMJP65hfMqveh+3n8+7IVF5f/c8af8c8xXD4rlu267i/O1u4vqF5le2aX8zV"+_
"p6AqpV14VF1sqzrOHfvhFgpCtSY48Q+vw5TykQbjxHW+UHYfqDpSL1yJ3E51T0fsHuvpsPqjTLRy48usAuLl14Hd1amK9La0vffq1Mx8juK2UpfRjR9Pbzbs52bwPSh6+a54YDR8Gb0/gx563UbKxi+IHnVm6EDiR/hK/zyM4EA4"+_
"jYMfjBHcb94pftB8WZLMyxxbiNDJvt5FxhIL+Twma7pRa8nXWGfKmw/fR8mXeTs3auxf8OOS7dCaGvEZZhSLbLC3ArcyisIj+6ul+t2b7OG/b7xYjd8TnPq/nV2bf+e7zfVYfu5cmSlmU2l/kx0yF5GjzAOJ8XSVXdNevs6C0qic"+_
"Gz1kTcmj26y3P+P/XGfM2IfaKjPinf1kaVwfRqAVLVb+rK/cU7pcxzt53MddSTPVM6YqTC+EdNxgOieXJWnFdWR1R5g+9IacQydH//eiOJ+8MgQ1S6xCLi4dfsyWwzTkqLzUX0LMjOHXdU0JBKihXH91xZkWXqdwy0IoMx28s2cF"+_
"0vMvXGuvSdCspK9fTt2S03h4mICmlxTc/HYPiqEj3xkZ7HYb9RwtI6WSNjEje0quM2fhyBPEh8UoR4QcnWWXlYi4YJZ16Imz/l4/8mx2ql3Oz/2vo5hdtvmKA/1U1F/GlftnIfi86kbVt4aqkoDaRsXcnAlDL7iaQv6r3h0vzQXH"+_
"ftxf84q9KvyU+bAULFgAUAAFAAAAIAAoTVINtUzvwhnSAAAA6CAAJAAAAAAAAAAAAACAAAAAAAAAFNESPhlLFhVRQtUBGAAAAAQAAEAA3AAAA8pSAAAAAA=="+_
"":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 "ECHOX.zip",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




第一高手    第二高手

2007-10-27 23:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 7 楼』:  

fastslz兄发的这个工具真是让我的这个批处理相形见绌啊。

2007-10-28 00:05
查看资料  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 8 楼』:  

这些都是怎么想到的呢?
idea从哪里来的?
请赐教!!

2007-10-28 00:18
查看资料  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 9 楼』:  



  Quote:
Originally posted by scriptor at 2007-10-28 12:18 AM:
这些都是怎么想到的呢?
idea从哪里来的?
请赐教!!

最近研究汇编,所以...

2007-10-28 12:54
查看资料  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 10 楼』:  



  Quote:
Originally posted by s11ss at 2007-10-27 23:14:

注释已经够详细了啊........

可能是汇编那段注释不够吧...

很不错,学习!!

2007-10-28 20:43
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
zysheng110
初级用户





积分 31
发帖 16
注册 2007-10-24
状态 离线
『第 11 楼』:  

正在学习中!有很多不会,现在头晕了

2007-10-29 00:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
rinfall
新手上路





积分 18
发帖 8
注册 2007-3-22
状态 离线
『第 12 楼』:  

一个字啊,那才叫“牛”

2007-10-29 09:14
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
plp626
银牌会员

钻石会员


积分 2278
发帖 1020
注册 2007-11-19
状态 离线
『第 13 楼』:  

运行结果弹出如下对话框
C:\Windows\system32\cmd.exe
ntvdm cpu 遇到无效的指令。
cs:0146 IP:63 74 20 65 72 选择 “关闭” 终止应用程序。

                                      关闭(C) 忽略(I)

怎么回事

2007-12-16 20:31
查看资料  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 14 楼』:  

把%w% a改成%w% a100试试

2007-12-16 23:10
查看资料  发短消息 网志   编辑帖子  回复  引用回复
penghuahui
初级用户




积分 163
发帖 86
注册 2007-9-5
状态 离线
『第 15 楼』:  

可以解释一下吗

2007-12-17 00:13
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] »
请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: