[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[游戏娱乐] 混編桌面點擊遊戲測試(沒完成的)

本帖最后由 Taurus 于 2022-6-14 00:22 编辑

數年前我寫的混編腳本 , 寫到半途荒廢沒有繼續寫 , 內含幾種腳本互相傳遞參數
代碼把圖片一併編寫進去 , 不產生臨時文件(只在一部電腦編寫 , 其他電腦可能html會出現移位 , 如果出現移位問題請回報一下)

注意 , 需要關閉腳本的話 , 桌面右上角會出現紅色移動式按鈕

(腳本太長超過字數限制 , 下面會切開三段發文)
  1. /<!--::[MIX Script]//*
  2. cls
  3. @echo off&setlocal enabledelayedexpansion&mode con: cols=45 lines=1&title testing&color 0a
  4. set icons=20
  5. set Gamemode=Y
  6. set Bload=9
  7. set oldBload=!Bload!
  8. set load=^-^\^|^/^-^\^|^/&set/a a=!random!%%4
  9. set load=!load:~%a%,4!
  10. set/p=                 Step 1/4  <nul
  11. call :getrandom 0
  12. call :getrandom !icons!
  13. set MYMARK=[%TIME::=-%-!VarRD[0]!-%random% ]
  14. set MYMARK=!MYMARK:.=-!
  15. title Taurus's Script !MYMARK!
  16. cls
  17. set/p=                 Step 2/4  <nul
  18. call :loadicon
  19. for /f "skip=3 tokens=1-9* delims= " %%a in ('tasklist /v /fi "windowtitle eq Taurus's Script !MYMARK!"') do (
  20.     call :loadicon
  21.     if "%%a"=="cmd.exe" set MYPID=%%b
  22. )
  23. title [PID:!MYPID!]
  24. set strA=%%%n
  25. cls
  26. set/p=                 Step 3/4  <nul
  27. for /l %%i in (1,1,!icons!) do (
  28.     call :loadicon
  29.     set/a str=!random!%%2+1
  30.     set MYMARK=[%TIME::=-%-!VarRD[%%i]!-%random% ]
  31.     set MYMARK=!MYMARK:.=-!
  32.     set MYMARK2=!MYMARK: =!
  33.     set process%%i=Taurus's Script{Child}!MYMARK!-[%%i]
  34.     start /min "" Wscript -e:jscript "%~s0" /notwait "cmd /c title Taurus's Script{Child}!MYMARK!-[%%i]^&for /f !strA! in ('echo !str!,!MYMARK2!,!Gamemode!^^|mshta "%~s0"') do echo get!strA!"
  35. )
  36. start /min "" Wscript -e:jscript "%~s0" /Monitor "!MYPID!" "%~s0"
  37. :lp
  38. set/a n=0
  39. set killlist=
  40. cls
  41. call set/p=                 Step 4/4  <nul
  42. call :loadicon
  43. for /f "skip=3 tokens=1-9* delims= " %%a in ('tasklist /v /fi "windowtitle eq Taurus's Script{Child}*"') do (
  44.     call :loadicon
  45.     if "%%a"=="cmd.exe" (
  46.         set taskprocess=%%j&&set taskprocess=!taskprocess: =!
  47.         set tasknub=!taskprocess:*-[=!&&set tasknub=!tasknub:]=!
  48.         call set process=%%process!tasknub!: =%%
  49.         if not "!process!"=="" if "!taskprocess!"=="!process!" (
  50.             set PID[!tasknub!]=%%b
  51.             call set killlist=!killlist!%%PID[!tasknub!]%%,
  52.             set/a n+=1
  53.         )
  54.     )
  55. )
  56. set killlist=!killlist:~0,-1!
  57. if not "!n!"=="!icons!" goto :lp
  58. if not "!Gamemode!" == "Y" call :bossmsg
  59. :back
  60. cls
  61. if "!Gamemode!" == "Y" (
  62.     set/p key=       Testing boss mode? [Y/N] :_
  63.     if /i "!key!" == "Y" (call :bossmsg&goto :jumpout)
  64.     if /i "!key!" == "N" (goto :jumpout3)
  65.     goto :back
  66. )
  67. :jumpout
  68. cls
  69. set nuber1=                     ◢█              █              █              █              █            ███
  70. set nuber2=                    ◢██◣        █    █            ◢◤          ◢◤          ◢◤            ████
  71. set nuber3=                    ◢██◣        █    █            █◤            ◥◣        █    █        ◥██◤
  72. set nuber4=                    ◢  █          █  █          █  █          ████            █              █
  73. set nuber5=                    ████        █              ███◣              █        █    █        ◥██◤
  74. set nuber6=                    ◢██◣        █              ███◣        █    █        █    █        ◥██◤
  75. set nuber7=                    ████              █            ◢◤          ◢◤            █              █
  76. set nuber8=                    ◢██◣        █    █        ◢██◤        █    █        █    █        ◥██◤
  77. set nuber9=                    ◢██◣        █    █        █    █        ◥███              █        ◥██◤
  78. set nuber0=                    ◢██◣        █    █        █    █        █    █        █    █        ◥██◤
  79. for /l %%i in (1,1,29) do (
  80.     set/a W=45-%%i,H=1+%%i
  81.     if !H! gtr 8 set H=8
  82.     mode con: cols=!W! lines=!H!
  83. )
  84. set/p=!nuber%Bload%!<nul
  85. :bosslp
  86. for /f "tokens=1-3 delims= " %%a in ('taskkill /f /fi "windowtitle eq taurus-HTA-ICONs*"') do if "%%c"=="PID" set/a Bload-=1
  87. if "!Bload:~0,1!"=="-" set Bload=0
  88. if "!Bload!" lss "!oldBload!" start /min "" Wscript -e:jscript "%~s0" /voice "!Bload!" & set oldBload=!Bload!
  89. if "!Bload!" lss "1" cls&set/p=!nuber0!<nul&ping/n 2 127.1>nul&goto :jumpout2
  90. cls&call set/p=%%nuber!Bload!%%<nul
  91. goto :bosslp
  92. :jumpout2
  93. for /l %%i in (16,1,45) do (
  94.     set/a H-=1
  95.     if !H! lss 1 set H=1
  96.     mode con: cols=%%i lines=!H!
  97. )
  98. :jumpout3
  99. cls
  100. set/p=       Click [Enter] to kill any ICONs
  101. taskkill /f /im wscript.exe >nul 2>nul
  102. taskkill /f /im mshta.exe >nul 2>nul
  103. exit
  104. :bossmsg
  105. set ttimes=0
  106. start /min "" Wscript -e:jscript "%~s0" /killlist "!killlist!"
  107. start /min "" Wscript -e:jscript "%~s0" /voice "BOSS MODE"
  108. goto :eof
  109. :getrandom
  110. set lptime=%1
  111. if "!lptime!" lss "1" (
  112.     set lptime=1&set VarRD=VarRD[0]
  113. ) else (
  114.     set lptime=%1&set VarRD=VarRD[%%N%%]
  115. )
  116. for /l %%i in (1,1,!lptime!) do (
  117.     call :loadicon
  118.     set N=%%i
  119.     for /f "delims=" %%X  in ('CScript -Nologo -e:jscript "%~s0" /getrandom 100000000000000') do call set !VarRD!=%%X
  120. )
  121. goto :eof
  122. :loadicon
  123. set/p=!load:~0,1!<nul
  124. set load=!load:~1!!load:~0,1!
  125. goto :eof
  126. -->
  127. <script>window.resizeTo(1,1);</script>
  128. <!DOCTYPE HTML PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  129. <hta:application border="dialog" innerBorder="no" maximizebutton="no" scroll="no" MinimizeButton="no" caption="no" ID="oHTA" SysMenu="no" icon="%windir%\system32\cmd.exe">
  130. <meta http-equiv="Content-Type" content="text/html">
  131. <html>
  132. <head>
  133. <title>Taurus's Script</title>
  134. <style type="text/css">
  135. body{
  136.     position:fixed;
  137.     visibility:hidden;
  138. }
  139. div{
  140.     font-size: 16px;
  141.     font-family:pmingliu;
  142.     position:absolute;
  143.     overflow:hidden;
  144. }
  145. #exitbutter{
  146.     position:absolute;
  147.     overflow:hidden;
  148.     font-family:Arial;
  149.     font-size:86px;
  150.     background-color:#660000;
  151.     border-style:solid;
  152.     color:#CC0000;
  153.     height:99px;
  154.     width:99px;
  155. }
  156. #X{
  157.     font-family:Arial;
  158.     font-size:21px;
  159.     color:#FFFFFF;
  160. }
  161. </style>
  162. <script laguage="javascript">
  163. try{
  164.     var fso= new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(0);
  165.     var BatStr=fso.ReadLine();
  166.     var Gamemode=(BatStr.split(' ')[BatStr.split(' ').length-1]);
  167.     var Batcode=(BatStr.split(' ')[BatStr.split(' ').length-2]);
  168.     BatStr=(BatStr.split(' ',1));
  169.     if ( Gamemode != "Y" ) {Gamemode="N"}
  170. }
  171. catch (e) {alert ("Error fso");}
  172. var ws = new ActiveXObject("WScript.Shell");
  173. var Gamestart=0;
  174. var killnub="off"
  175. if ( BatStr == 1 || BatStr == 2 || BatStr == 3 ) {
  176.     BatStr=BatStr;
  177. } else {
  178.     BatStr=1;
  179. }
  180. if ( Gamemode == "Y" ) {
  181.     if ( BatStr != 3 ) {
  182.         bossmsg = setInterval('callback()',1);
  183.     }
  184. }
复制代码
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

  1. var ws = new ActiveXObject("WScript.Shell");
  2. var SW = window.screen.width-98;SH = window.screen.height-84;
  3. var endW =window.screen.width-99+55;endH =-80;
  4. var oldX=-1;oldY=-1;goy=0;gox=0;Cutpoint=0;markW=0;markH=0;Xtakepoint=0;Ytakepoint=0;point=0;PX=SW/2;PY=SH/2;nx=0
  5. var EColor="#FF0000#EE0000#DD0000#CC0000#BB0000#AA0000#990000#880000#770000#660000#770000#880000#990000#AA0000#BB0000#CC0000#DD0000#EE0000";
  6. DColor="#FF0F0F#FF3F0F#FF6F0F#FF9F0F#FFCF0F#FFFF0F#CFFF0F#9FFF0F#6FFF0F#3FFF0F#0FFF0F#0FFF3F#0FFF6F#0FFF9F#0FFFCF#0FFFFF#0FCFFF#0F9FFF#0F6FFF#0F3FFF#0F0FFF#3F0FFF#6F0FFF#9F0FFF#CF0FFF#FF0FFF#FF0FCF#FF0F9F#FF0F6F#FF0F3F"
  7. BAT = "4.1,0,0,▓,f$3,,,,c0$,1.07,,,$,0.6,,,$,1.07,0.82,,$,0.57,,,$,0,,,$,0.07,0.74,,80$,1,,,$,0.5,,,$,1,0.65,,$,0.5,,,$,0.07,0.36,,$,0.5,,,$,1,,,$0.7,0.59,0.5,,000080$,1,,,$,2,,,$,2.5,,,$,3,,,$,4,,,$,5,,,$,6,,,$,7,,,$,7.2,,,$4.3,0.06,0.25,,f$,0.42,,,$0.7,7.2,0.5,,0$,6.6,,,$,5.7,,,$0.5,7.9,1,,c0$,10.1,,,$,9,,,$2,1.05,1.3,●,808000$,0.75,1.15,,$,1.45,,,ffff00$1,2.78,1.95,▊,80$,,2.35,,$2,1.62,0.84,|,0$,1.6,,,$,1.45,1,-,$,,0.96,,$,1.39,,,$,,1,,$,1.58,1.35,|,$,1.54,,,$,1.4,1.54,-,$,,1.5,,$,1.38,1.35,|,$,1.34,,,$3,0.87,0.54,-,ffff00$,0.92,,,$,0.95,0.89,,f$,0.85,,,$0.5,5.88,5.25,▊,80$,5.6,,,$,5.45,6.9,▓,808000$,5.35,,,$1,3.35,4,,f$,1.65,,,$,1.85,,,$2,1.12,1.24,|,0$,1.08,,,$,1.01,,,ffff00$,0.97,,,$,1,1.48,-,0$,,1.44,,$1,1.7,2.8,▓,808000$,1.2,3.3,,$,1.03,3.7,,f$,1.3,2.75,,808000$,0.58,2.85,,f$,,2.75,,$,1.83,2.26,,808000$,1.91,,,$,1.22,1.55,,f$2.8,0.74,0.32,-,$,,0.38,,$,0.5,0.35,,0$,0.41,,,f$,0.47,0.7,,0$,0.53,0.63,,$,0.46,,,808000$2.5,0.57,0.69,|,0$2.8,0.35,,-,80$,,0.77,,f$2.5,0.51,0.66,,$1,0.9,2.3,▓,808000$,0.7,2.9,,f$,,2.2,,$,1.05,1.95,,$1.5,1.48,1.6,|,$,1.57,,,$,1.56,,,$,1.9,1.2,,$,1.94,,,$,1.64,1.68,-,$,,1.62,,$0.3,8.4,10.32,▓,ffff00$,8.44,9,,808000$0.26,7.88,13.8,,ffff00$,8.92,,,$,8.58,,,$,9.95,9.6,,$,9.75,,,$,9.65,,,$,9.55,,,$,9.45,,,$,8.25,12,,$,11.25,15.5,,$,,14,,$,,13.4,,$,13.15,13.8,,0$1.9,1.7,1.48,-,$,,1.5,,$,1.9,1.55,,$,,1.57,,$,2.1,1.34,,$,,1.38,,$,,0.98,,$,,0.95,,$,1.8,0.65,,808000$,1.9,,,$,2.1,1.3,,$,,1.25,,$,,1.2,,$,,1.17,,$,1.9,1.47,,$,,1.43,,$,,1.39,,$1.5,2.65,2.36,|,0$,2.7,,,$,2.93,1.95,,$,2.95,,,$,2.65,1.15,,$,2.7,,,$1.9,2.13,1.35,-,$,1.88,0.75,,f$,,0.8,,$,2.08,1.05,,$,,1.1,,$,1.9,,,$,,1.05,,$1.4,2.43,1.55,|,808000$,2.48,,,$1.9,1.9,1.15,-,f$,1.7,,,$,1.5,,,$,1.4,,,$0.3,12.65,9,▓,808000$1.4,3.16,1.85,|,0$,3.12,,,$,2.92,1.3,,$,2.86,,,$0.8,4.35,1.87,▓,f$,5.2,2.68,,$1.4,2.86,2.5,|,0$,2.92,,,$0.8,5.3,4.68,▓,f$,4.3,5.2,,$,1.68,5.1,,$,5,,,$,5.2,2.65,,$,5,2,,$3.2,0.85,0.02,-,$,0.83,,,$1.25,2.36,1.23,,$,,1.13,,$,,1.18,,$,,1.11,,$1.9,1.49,0.5,,80$,1.52,,,$,1.49,0.65,,$1.2,3.45,1.65,|,0$0.9,4.45,4.55,▓,f$,,1.8,,$1.9,1.8,0.68,-,808000$,1.88,,,$,,0.66,,$,1.78,1.2,,ffff00$,1.58,1.24,,$,1.62,,,$,1.33,,,$,,1.2,,$0.3,12.9,11.1,▓,0$,,11.4,,$,12.3,11.1,,f$,,11.4,,$1.3,3.19,1.3,,$,3.45,2.1,,$,3.19,2.85,,$2.9,0.6,0.82,-,0$4.1,0.4,0.44,,f$,0.24,0.4,,"
  8. TXT = "3,0,,▓,80$,0.82,,,$,,0.8,,c0$,,1.06,,$5.4,0,,,f$,,0.18,,$3,1.52,0,|,c0$,,0.7,,$,,1.1,,$,1.56,0,,$,1.6,,,$,1.67,,,0$,,0.7,,$,,1.08,,$,1.55,0,,$,,0.7,,$,,1.08,,$,1.48,0,,c0$,,0.7,,$,,1.1,,$,0.03,0,,f$,,0.7,,$,,1.1,,$,0.08,0,,0$,0.28,,,$,0.48,,,$,0.68,,,$,0.88,,,$,1.08,,,$,1.28,,,$5,0,0.1,▓,f$0.25,,0,,0$,0.2,,,$,1.8,,,$,1.9,,,$,2.4,,,$,2.5,,,$,3,,,$,3.5,,,$,4,,,$,4.5,,,$,7,,,$,6.3,,,$,8.8,,,$,9.6,,,$,11,,,$,11.7,,,$,13.5,,,$,14.2,,,$,16.5,,,$,15.85,,,$,18.45,,,$,,0.8,,f$,15.95,,,$,13.7,,,$,11.2,,,$,8.9,,,$,6.38,,,$,3.9,,,$,1.8,,,$,0,,,$,19.8,,,0$,,0,,6$,20.5,0.8,,71654b$,19.8,0,,6$,,23.3,,0$3.5,0.08,0.73,_,c0$,0.38,,,$,0.8,,,$,0.95,,,$0.25,18.4,23.3,▓,0$3.5,0.09,0.77,_,$,0.38,,,$,0.8,,,$,0.98,,,$0.25,0.4,23.9,▓,9$,0,23.3,,$,0.4,,,80$2.5,1.4,0,-,0$,1.1,,,$,0.25,,,$,0.45,,,$,0.25,0.15,,$,0.45,,,$,0.25,0.45,,$,0.45,,,$,0.25,0.66,,$,0.45,,,$,0.65,,,$,0.85,,,$,1.05,,,$,1.25,,,$,1.4,,,$,0.25,0.81,,$,0.45,,,$,0.65,,,$,0.85,,,$,1.05,,,$,1.25,,,$,1.4,,,$,0.25,0.96,,$,0.45,,,$,0.65,,,$,0.85,,,$,1.05,,,$,1.25,,,$,1.4,,,$,0.25,1.11,,$,0.45,,,$,0.65,,,$,0.85,,,$,1.05,,,$,1.25,,,$,1.4,,,$,0.25,1.35,,$,0.45,,,$,0.25,1.5,,$,0.45,,,$1.26,1.7,0.8,▓,f$0.26,18,1.4,,80$,,1.9,,$,,2.4,,$0.25,19.9,22.9,,c0$,19.4,23.2,,$,19.2,,,$3,1.67,1.7,|,0$,1.3,1.07,_,$,,1.09,,$0.23,22,25.6,▓,"
  9. if (BatStr != 3) {
  10.     CColor=DColor;
  11.     var X = getrandom(1,SW);Y = getrandom(1,SH);
  12.     var RW = getrandom(1,SW);RH = getrandom(1,SH);
  13.     window.moveTo(RW,RH);
  14.     var Speed = getrandom(2,10);
  15.     setInterval("ChangeICON(BatStr)",0);
  16.     starC = setInterval('starcolor("ALL")',50);
  17.     show=setInterval("move()",1);
  18. } else {
  19.     CColor=EColor
  20.     show2=setInterval("ChangeICON(BatStr)",0);
  21. }
  22. function move(j,k,l){
  23.     if( RH==Y && RW==X ){
  24.         markW = getrandom(1,SW);
  25.         markH = getrandom(1,SH);
  26.         Speed = getrandom(2,10);
  27.         if ( l == 1) {
  28.             Speed = getrandom(7,10);
  29.             markW = j;
  30.             markH = k;
  31.         }
  32.         if(markW>X){Xtakepoint = markW-X;}
  33.         if(markW<X){Xtakepoint = X-markW;}
  34.         if(markH>Y){Ytakepoint = markH-Y;}
  35.         if(markH<Y){Ytakepoint = Y-markH;}
  36.     }
  37.     point+=1;
  38.     if(Xtakepoint>Ytakepoint){
  39.         Cutpoint = Xtakepoint/Speed+1;
  40.         Xnub=Cutpoint-point;Ynub=point;
  41.     }else{
  42.         Cutpoint = Ytakepoint/Speed+1;
  43.         Ynub=Cutpoint-point;Xnub=point;
  44.     }
  45.     Xhalf=Xtakepoint/Cutpoint;Yhalf=Ytakepoint/Cutpoint;
  46.     goX=Math.round(Xhalf*2/Cutpoint*Xnub);
  47.     goY=Math.round(Yhalf*2/Cutpoint*Ynub);
  48.     if(markW>X){X = X+goX;nx+=1}
  49.     if(markW<X){X = X-goX;nx+=1}
  50.     if(markH>Y){Y = Y+goY;nx+=1}
  51.     if(markH<Y){Y = Y-goY;nx+=1}
  52.     window.moveTo(X,Y);
  53.     if (( point>Cutpoint ) || (oldX==X && oldY==Y)){
  54.         RW=X;RH=Y;point=0;
  55.     }
  56.     oldX=X;oldY=Y;
  57.     if( l == 1){
  58.         if ((Y==PY&&nx==1)||(X==PX&&nx==1)||(X==markW&&Y==markH)){
  59.             window.moveTo(PX,PY);
  60.             clearInterval(show2);
  61.             setTimeout("show=setInterval('move()',1)", 10000);
  62.         }
  63.     }
  64.     nx=0;
  65. }
  66. function move1(i){
  67.     try {clearInterval(onbutter);} catch (e) {}
  68.     if(i=="on"){
  69.         try {clearInterval(starC);} catch (e) {}
  70.         document.getElementById("exitbutter").style.background = "#660000";
  71.         document.getElementById("exitbutter").style.color = "#CC0000";
  72.         if (endH<0){
  73.             endW-=11;endH+=16;
  74.             window.moveTo(endW,endH);
  75.             onbutter=setInterval('move1("on")',1);
  76.             return;
  77.         }
  78.     CColor="#CCCCCC#660000"
  79.     starC = setInterval("starcolor()",150);
  80.     }
  81.     if(i=="off"){
  82.         if (endH>-80){
  83.             endW+=11;endH-=16;
  84.             window.moveTo(endW,endH);
  85.             onbutter=setInterval('move1("off")',1);
  86.             return;
  87.         }
  88.         document.getElementById('X').style.visibility = "visible";
  89.         try {clearInterval(starC);} catch (e) {}
  90.         CColor=EColor
  91.         starC = setInterval('starcolor("off")',20);
  92.     }
  93. }
  94. function starcolor(i){
  95.     CColorA=CColor.slice(0,7);CColorB=CColor.slice(7);
  96.     if (i=="off"){
  97.         document.getElementById('exitbutter').style.background = CColorA;
  98.     }
  99.     if (i!="ALL"){
  100.         document.getElementById('exitbutter').style.color = CColorA;
  101.     } else {
  102.         document.getElementById('iconNON').style.background = CColorA;
  103.     }
  104.     CColor=(CColorB+CColorA);
  105. }
  106. function ChangeICON(i){
  107.     if ( i == 1) {j="BAT";k="TXT";l="iconNON";m="iconexit";n="98";o="84";p="2";}
  108.     if ( i == 2) {j="TXT";k="BAT";l="iconNON";m="iconexit";n="84";o="98";p="1";}
  109.     if ( i == 3) {j="iconexit";k="BAT";l="iconNON";m="TXT";}
  110.     if ((i != 3)&&(Gamestart != 0)) Changesize(k,'-');
  111.     document.getElementById(m).style.visibility = "hidden";
  112.     document.getElementById(k).style.visibility = "hidden";
  113.     document.getElementById(j).style.visibility = "visible";
  114.     if (i != 3){
  115.         document.getElementById(l).style.visibility = "visible";
  116.         SW =window.screen.width-n;
  117.         SH =window.screen.height-o;
  118.         setTimeout("Changesize(k,'+')", 8000);
  119.         BatStr=p;
  120.     } else {
  121.         if (Gamestart == 0) {
  122.             window.resizeTo(99,99);
  123.             window.moveTo(endW,endH);
  124.             clearInterval(show2);
  125.             Gamestart=1;
  126.             starC = setInterval('starcolor("off")',20);
  127.         } else {
  128.             if (i == "off") {
  129.                 move1("off");
  130.             } else {
  131.                 document.getElementById('X').style.visibility = "hidden";
  132.                 move1("on");
  133.             }
  134.         }
  135.         return;
  136.     }
  137.     Gamestart=1;
  138. }
复制代码
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

TOP

  1. function Changesize(i,j){
  2.     Face=i;
  3.     if (j=='-') {
  4.         K=99;strA=("K>0");strB=("K--");
  5.         if (Face=='BAT'){Face='TXT'}else{Face='BAT'}
  6.         CColor=DColor;
  7.         starC = setInterval('starcolor("ALL")',50);
  8.         non=('visible');
  9.     }else{
  10.         K=0;strA=("K<99");strB=("K++");
  11.         try {clearInterval(starC);} catch (e) {}
  12.         non=('hidden');
  13.     }
  14.     while (eval(strA)) {
  15.         strJ=K-13;
  16.         if (strJ<1) {strJ=1};if (strJ>85) {strJ=85};
  17.         if (Face=='BAT') window.resizeTo(strJ,K);
  18.         if (Face=='TXT') window.resizeTo(K,strJ);
  19.         eval(strB);
  20.     }
  21. CW = (document.body.clientWidth); CH = (document.body.clientHeight);
  22.     document.getElementById('iconNON').style.visibility = non;
  23. }
  24. function gettimes(){
  25.     if ((Gamestart != 0)&&(killnub=="on")){
  26. ws.Run("cmd /c title Taurus-HTA-ICONs"+Batcode+"&pause" ,0);
  27. }
  28. }
  29. function getrandom(min,max){
  30.     return Math.floor(Math.random()*(max-min+1))+min;
  31. }
  32. function KillAll(){
  33.     ws.Run("taskkill /f /im mshta.exe",0);
  34.     window.close();
  35. }
  36. function callback(callback){
  37.     try{
  38.         var fso2 = new ActiveXObject("Scripting.FileSystemObject");
  39.         fso2.GetStandardStream(1).WriteLine("callback");
  40.     }
  41.     catch (e) {
  42.         clearInterval(bossmsg);
  43.         clearInterval(show);
  44.         musicpath = (fso2.GetSpecialFolder("0")+"\\Media\\ding.wav");
  45.         musicpath=musicpath.replace(/\\/g,"\\\\" )
  46.         sound(musicpath);
  47.         RH=Y; RW=X; killnub="on";
  48.         if (BatStr==1) ChangeICON("1");
  49.         show2=setInterval("move(PX,PY,'1')",1);
  50.     }
  51. }
  52. function sound(i){
  53.     document.all.bgs.src=(i);
  54. }
  55. function Printico(X){
  56.     pic = eval(X).split("$");
  57.     for(i=0;i<pic.length;i++){
  58.         str = (pic[i].toString());
  59.         str = str.split(",");
  60.         if (str[4].length == 1) {
  61.             str[4]=(str[4]+str[4]+str[4]+str[4]+str[4]+str[4]);
  62.         }
  63.         if (str[4].length == 2) {
  64.             str[4]=(str[4]+str[4]+str[4]);
  65.         }
  66.         for(J=0;J<5;J++){
  67.             if (str[eval(J)].length == "") {
  68.                 str[eval(J)]=(eval("oldstr"+(J)));
  69.             }
  70.         }
  71.         oldstr0=(str[0]);oldstr1=(str[1]);oldstr2=(str[2]);oldstr3=(str[3]);oldstr4=(str[4]);
  72.         ico = document.createElement("div");
  73.         ico.style.fontSize = (str[0]+"em");
  74.         ico.style.paddingLeft = (str[1]+"em");
  75.         ico.style.paddingTop = (str[2]+"em");
  76.         ico.innerHTML = (str[3]);
  77.         ico.style.color = ("#"+str[4]);
  78.         element = document.getElementById(X);
  79.         element.appendChild(ico);
  80.     }
  81. }
  82. </script>
  83. </head>
  84. <bgsound id=bgs src="" loop=1>
  85. <body id=bodyA onMouseOver=ChangeICON(BatStr);gettimes();>
  86.     <div id=BAT style="width:6.2em;height:5.4em;overflow:hidden;float:left;background-color:#808080;margin-left:-18.5px;margin-top:-15px;visibility:visible;"></div>
  87.     <div id=TXT style="width:5.4em;height:6.2em;overflow:hidden;float:left;background-color:#808080;margin-left:-19px;margin-top:-15px;visibility:hidden;"></div>
  88.     <div id=iconNON style="width:5.4em;height:6.2em;overflow:hidden;float:left;background-color:#ffffff;margin-left:-19px;margin-top:-15px;visibility:visible;"></div>
  89.     <div id=iconexit style="width:6.2em;height:6.2em;overflow:hidden;float:left;background-color:#CC0000;margin-left:-18px;margin-top:-15px;visibility:hidden;">
  90.         <input id=exitbutter style="margin-left:0px;" type=button value="×" onclick=setInterval("KillAll()",1); onMouseOut=move1("off");>
  91.     </div>
  92.     <div id=X style="width:1.2em;height:1.2em;overflow:hidden;float:left;margin-left:-2px;margin-top:63px;visibility:visible;">×</dir>
  93.     &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  94.     <input style="margin-left:0px;margin-top:200px;position:absolute;visibility:visible;" id=runbutton type="button" value="ChangeICON" onClick="ChangeICON(BatStr)" >
  95.     <style onload="Printico('BAT');Printico('TXT');"</style>
  96. </body>
  97. </html>
  98. */
  99. /*<!--::[JS Converter]*/
  100. var ws = new ActiveXObject("WScript.Shell");
  101. if (WScript.Arguments.length<2){
  102.     ScriptHELP ()
  103.     WScript.Quit();
  104. }
  105. var Tcom = (WScript.Arguments(1));
  106. if (WScript.Arguments(0)=== "/runhta"){
  107.     ScriptHTA();
  108.     WScript.Quit();
  109. }
  110. if (WScript.Arguments(0)=== "/help"){
  111.     ScriptHELP ();
  112.     WScript.Quit();
  113. }
  114. if (WScript.Arguments(0)=== "/getuac"){
  115.     ScriptUAC ();
  116.     WScript.Quit();
  117. }
  118. if (WScript.Arguments(0)=== "/notwait"){
  119.     notwait ();
  120.     WScript.Quit();
  121. }
  122. if (WScript.Arguments(0)=== "/getrandom"){
  123.     getrandom();
  124.     WScript.Quit();
  125. }
  126. if (WScript.Arguments(0)=== "/Monitor"){  
  127.     var batpath = (WScript.Arguments(2));
  128.     while(0<10){
  129.         ProcessMonitor();
  130.     }
  131. }
  132. if (WScript.Arguments(0)=== "/killlist"){
  133.     killPID ();
  134.     WScript.Quit();
  135. }
  136. if (WScript.Arguments(0)=== "/voice"){
  137.     talking (WScript.Arguments(1));
  138.     WScript.Quit();
  139. }
  140. WScript.Echo(" Parameters Error :\n"+
  141.     "\n"+
  142.     "["+WScript.Arguments(0)+"] is not Recognized Command \n"+"\n"
  143. );
  144. ScriptHELP ()
  145. WScript.Quit();
  146. function talking (i) {
  147.     new ActiveXObject("Sapi.SpVoice").Speak(i);
  148. }
  149. function killPID () {
  150.     var killlist = (WScript.Arguments(1));
  151.     count = 0;
  152.     while (killlist.split(',').length > count) {
  153.         str = ("taskkill /f /PID "+killlist.split(',')[count]);
  154.         GetObject("winmgmts:").Get("Win32_Process.Handle='" + killlist.split(',')[count] + "'").Terminate();
  155.         count++;
  156.     }
  157. }
  158. function getrandom () {
  159.     var nub = (WScript.Arguments(1));
  160.     str = Math.floor(Math.random()*nub)
  161.     WSH.Echo (str)
  162. }
  163. function notwait () {
  164.     var str = (Tcom);
  165.     ws.Run(str,0);
  166.     WScript.Quit();
  167. }
  168. function ScriptHTA () {
  169.     var str = (Tcom);
  170.     ws.Run(str,0,true);
  171.     WScript.Quit();
  172. }
  173. function ProcessMonitor() {
  174.     WScript.Sleep (500);
  175.     try{
  176.         var proc = GetObject("winmgmts:").Get("Win32_Process.Handle='" + Tcom + "'");
  177.         if (proc.Caption == "cmd.exe") {
  178.             //WScript.Echo("ok");
  179.         }
  180.     } catch (e) {
  181.         ws.Run("cmd /c echo 3|mshta "+batpath,0);
  182.         WScript.Quit();
  183.     }
  184. }
  185. function ScriptUAC () {
  186.     Inlink=Tcom.replace(/\"/g,"" )
  187.     link=(WScript.ScriptFullName);
  188.     if (link===Inlink){
  189.         var shell = new ActiveXObject('shell.application');
  190.         shell.ShellExecute( Inlink , 'UAC', '', 'runas', 0);
  191.     } else {
  192.     WScript.Echo(
  193.             "ERROR \n"+
  194.             "\n"+
  195.         "For safety reasons :\n"+
  196.         "1.\/[\/getuac]is not elevated privilege to External Scripts \n"+
  197.         "2.\/The \[Input values\] must match at \[JS requirements\] \n"+
  198.         "===============================================\n"+
  199.             "\n"+
  200.         "Input variable    : \["+Inlink+"\]\n"+
  201.         "JS requirements: \["+link+"\]\n"+
  202.         "===============================================\n"+
  203.             "\n"+
  204.             "Suggested input : \n"+
  205.             "Wscript -e:jscript \"%~s0\" /getuac \"%~s0\"\n"+
  206.             "\n"
  207.     );
  208.     };
  209.     WScript.Quit();
  210. }
  211. function ScriptHELP () {
  212.     WScript.Echo (
  213.         "The following parameters can be used :\n"+
  214.         "\n"+
  215.     "[Script Grammar]================================\n"+
  216.         "\n"+
  217.     "wscript -e:jscript [SCRIPT PATH] [PARAMETERS] [Command line]\n"+
  218.         "\n"+
  219.     "[PARAMETERS]======================================\n"+
  220.         "\n"+
  221.         "[/runhta]\n"+
  222.         "[/notwait]\n"+
  223.         "[/getuac]\n"+
  224.         "[/getrandom]\n"+
  225.         "[/Monitor]\n"+
  226.         "[/help]\n"+
  227.         "\n"+
  228.     "[Command line] example===============================\n"+
  229.         "\n"+
  230.         "Wscript -e:jscript \"%~s0\" /runhta \"cmd \/c echo;%str1%;%str2%^\|mshta \"%0\"\n"+
  231.         "Wscript -e:jscript \"%~s0\" /notwait \"cmd \/c echo [HELLO WORLD]\n"+
  232.         "Wscript -e:jscript \"%~s0\" /getuac \"%~s0\"\n"+
  233.         "Cscript -Nologo -e:jscript \"%~s0\" /getrandom [NUB RANGE]\n"+
  234.         "Wscript -e:jscript \"%~s0\" /Monitor [%PID%] \"%~s0\"\n"+
  235.         "Wscript -e:jscript \"%~s0\" /help\n"+
  236.     "\n"
  237.     );
  238.     WScript.Quit();
  239. }
  240. //-->
复制代码
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

TOP

啊啊啊啊啊,我的电脑!!!

TOP

返回列表