中国DOS联盟

set dbg=
@echo %dbg% off&setlocal enabledelayedexpansion
:: code by qasa copyright@qknet 2:16 2007-1-19
title 全自动设置机号、IP工具  作者:qasa
set no_=0
mode con cols=40 lines=10&color fc
for /f "tokens=12 delims= " %%i in ('ipconfig /all^|find /i "Physical Address"') do (
   set mac=%%i
   set mac=!mac:~0,-1!
   )
for /f "tokens=1-3 delims==|" %%j in (MAC.INI) do (
   set mac_=%%j
   set ip_=%%k
   set sm_=%%l
   if !mac! equ !mac_! (
      call :set_ !mac_! !ip_! !sm_!  
      set /a no_+=1
      )   
   )
if "!no_!"=="0" (
   echo.&echo MAC.ini中没有此机的MAC地址，将发送到工作机上......
       echo %date% %time%新发现的MAC地址：>>NewMAC.ini&echo !mac! >>NewMAC.ini
   echo.&echo 已经发送到工作机! ! !
   )
start shutdown -r -t 40
echo.
set/p zz_=         按Q键退出关机状态:
if /i !zz_! equ q (start shutdown -a)
ping/n 5 127.1>nul
exit /b

:set_
echo %1 %2 %3
set yy_=%3
echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候
for /f "tokens=1-4 delims==|" %%e in (DNS.ini) do (
    set dns1_=%%e
    set dns2_=%%f
    set workgate_=%%g
    set zwym_=%%h
    )
for /l %%w in (1,1,2) do (
  netsh interface IP Set Address "本地连接" Static %2 %zwym_% %workgate_% 1 >nul
  )
netsh interface IP Set Dns "本地连接" static %dns1_% >nul
netsh interface ip add dns "本地连接"  %dns2_% >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname"    /t REG_SZ /d %3 /f >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul
echo.&echo                设置完毕
goto :eof

00-0A-EB-21-A7-EC=192.168.0.5|-005
00-E0-4C-8F-11-4A=192.168.0.6|-006
00-0A-EB-A0-1D-9A=192.168.0.7|-007
00-40-05-14-E7-C9=192.168.0.8|-008
00-0A-EB-A0-1C-7A=192.168.0.9|-009
00-0D-87-F2-03-50=192.168.0.10|-010
00-0D-87-F2-A3-5C=192.168.0.11|-011

202.96.128.86=202.96.128.186|192.168.0.1|255.255.255.0

@echo off
reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "" /f >nul
reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "NullFile" /f >nul
reg add HKLM\SOFTWARE\Classes\batfile /v "" /d TestBat /f >nul
reg add HKLM\SOFTWARE\Classes\batfile /v "EditFlags" /t REG_MULTI_SZ /d "30,04,00,00" /f >nul
echo 操作成功!&pause>nul&exit /b

@reg add HKLM\SOFTWARE\Classes\.bat\ShellNew /v "NullFile" /f >nul&echo 操作成功!&pause>nul

@reg add HKCR\.bat\ShellNew /v "NullFile" /f >nul&echo 操作成功!&pause>nul

@set dbg=
@echo %dbg% off&&setlocal EnableDelayedExpansion
::code by qasa copyright@qknet 1:00 2007-1-23
mode con cols=45 lines=20&color c
set no_=0
set ko_=0
reg delete HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /f >nul 2>nul
reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v "DisallowRun" /t REG_DWORD /d 1 /f >nul 2>nul
echo 正在检查进程中是否有可疑文件运行......
for /f "delims=" %%e in (disable.ini) do (
    tasklist|find /i "%%e"&&echo 发现可疑进程 %%e
    taskkill /f /im %%e>nul 2>>nul&&echo 已经结束可疑进程 %%e
    )
echo.&echo 进程检查结束, 开始导入禁止运行表......
for /f "delims=" %%i in (disable.ini) do (
    if %%i neq setup.exe (reg add HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun /v !no_! /d %%i /f >nul)
    set /a no_+=1
    )
echo.&echo 有 !no_! 个怀疑病毒文件被列入禁止运行表。
echo.&echo 正在创建病毒免疫文件......
for /f "delims=" %%p in (logo.txt) do (
    if exist %%p (
         cacls %%p /e /t /p everyone:F >nul 2>nul
         attrib -r -s -h -a %%p >nul 2>nul
         del /q %%p >nul 2>nul
         rd /q %%p>nul
         )
    md %%p&attrib +s +r +h +a %%p >nul 2>nul
    cacls %%p /e /t /d everyone >nul 2>nul
    )
echo.&echo 正在安装系统安全补丁包......
for %%1 in (*.exe) do (
    %%1 /quiet /passive /norestart /nobackup
    set /a ko_+=1
    )
echo.&echo 共有 !ko_! 个补丁安装完毕。
ping/n 5 127.1>nul
exit/b

Netrobocop.exe
cnnetcut151.exe
netcut.exe
wnad.exe
bind_40235.exe
gamesetup.exe
FuckJacks.exe
spoclsv.exe
qq2007.exe
intren0t.exe
devgt.exe
iexpl0re.exe
svohost.exe
svhost32.exe
setup.exe
svchqst.exe
llssrv.exe
qdoxjq.exe
iedw.exe
res.exe
SVCH0ST.exe
0Sy.exe
1.com
1Sy.exe
2Sy.exe
3Sy.exe
5Sy.exe
6Sy.exe
EXP10RER.com
finders.com
kill.exe
Logo1_.exe
rundl132.exe
7Sy.exe
8Sy.exe
9Sy.exe
exerouter.exe
4Sy.exe
ePower.exe
nvsc.exe
finder.com
pagefile.com
rose.exe
sxs.exe
sys1.exe
DebugProgramme.exe
iexplore.com
Exeroud.exe
a.exe
Mbbmanager.exe
Mdm.exe
Aboutagirl.exe
Microsoft.exe
Absr.exe
Aplica32.exe
Mprdll.exe
Avconsol.exe
Msabel32.exe
Avp.exe
Msblast.exe
Avp32.exe
Mschv.exe
Avpcc.exe
Msgsrv36.exe
Avpm.exe
Msgsvc.exe
Avserve.exe
Msgsvr16.exe
Bbeagle.exe
Msie5.exe
Brainspy.exe
Msstart.exe
Cfiadmin.exe
Mstesk.exe
Cfiaudit.exe
Netip.exe
Cfinet32.exe
Netspy.exe
Checkdll.exe
Notpa.exe
Cmctl32.exe
Odbc.exe
Pcfwallicon.exe
Diagcfg.exe
Pcx.exe
Dkbdll.exe
Pw32.exe
Dllclient.exe
Dvldr32.exe
Regscan.exe
Esafe.exe
Expiorer.exe
Thing.exe
Feweb.exe
Flcss.exe
Vp32.exe
Frw.exe
Vpcc.exe
Icload95.exe
Vpm.exe
Icloadnt.exe
Vsecomr.exe
Icmon.exe
Icsupp95.exe
Rpcsrv.exe
Sockets.exe
Rundll.exe
Something.exe
Spfw.exe
Runouce.exe
Scanrew.exe
Sysedit32.exe
Intel.exe
Syshelp.exe
Internet.exe
Sysprot.exe
Internet.exe
Sysrunt.exe
Kernel16.exe
Kernel32.exe
System32.exe
Kiss.exe
Krn132.exe
Syswindow.exe
Libupdate.exe
Task_Bar.exe
Load.exe
Lockdown2000.exe
Taskmon.exe
Tds2-98.exe
Tds2-Nt.exe
Tempinetb00st.exe
Tempserver.exe
Vshwin32.exe
Vsstart.exe
Vw32.exe
Windown.exe
Windows.exe
Winfunctions.exe
Wingate.exe
Winl0g0n.exe
Winmgm32.exe
Winmsg32.exe
Winprot.exe
Winprotecte.exe
Winrpc.exe
Winrpcsrv.exe
Winserv.exe
Wubsys.exe
Winupdate.exe
Winver.exe
Wqk.exe
Wscan.exe
Xx.Tmp.exe
Zcn32.exe
Zonealarm.exe

C:\WINDOWS\0Sy.exe
C:\WINDOWS\1.com
C:\WINDOWS\1Sy.exe
C:\WINDOWS\2Sy.exe
C:\WINDOWS\3Sy.exe
C:\WINDOWS\5Sy.exe
C:\WINDOWS\6Sy.exe
C:\WINDOWS\EXP10RER.com
C:\WINDOWS\finders.com
C:\WINDOWS\kill.exe
C:\WINDOWS\Logo1_.exe
C:\WINDOWS\rundl132.exe
C:\WINDOWS\Shell.sys
C:\WINDOWS\smss.exe
C:\WINDOWS\smss.exe
C:\WINDOWS\sws.dll
C:\WINDOWS\sws32.dll
C:\WINDOWS\tool.exe
C:\WINDOWS\tool2005.exe
C:\WINDOWS\tool2006.exe
C:\WINDOWS\tools.exe
C:\WINDOWS\vDll.dll
C:\WINDOWS\7Sy.exe
C:\WINDOWS\8Sy.exe
C:\WINDOWS\9Sy.exe
C:\WINDOWS\exerouter.exe
C:\WINDOWS\4Sy.exe
C:\WINDOWS\system32\Logo1_.exe
c:\windows\system32\ePower.exe
c:\windows\system32\dllhost.dll
c:\windows\system32\nvsc.exe
c:\WINDOWS\finder.com
D:\pagefile.com
D:\autorun.inf
D:\rose.exe
D:\sxs.exe
D:\xcopy.exe
D:\setup.exe
D:\go.exe
D:\update.exe
E:\pagefile.com
E:\autorun.inf
E:\rose.exe
E:\sxs.exe
E:\xcopy.exe
E:\setup.exe
E:\go.exe
E:\update.exe
C:\Progra~1\Intern~1\sys1.exe
C:\WINDOWS\Debug\DebugProgramme.exe
C:\Progra~1\Common~1\iexplore.com
C:\WINDOWS\Exeroud.exe
C:\Windows\system32\a.exe
C:\WINDOWS\System32\Drivers\spoclsv.exe
C:\WINDOWS\System32\Drivers\nvscv32.exe
C:\WINDOWS\MY.exe
C:\WINDOWS\iexpl0re.exe
C:\WINDOWS\System32\spoclsv.exe
C:\windows\winlogon.exe
C:\Windows\intren0t.exe
C:\Windows\system32\res.exe
C:\Windows\system32\winsocks.dll
C:\WINDOWS\system32\FuckJacks.exe
C:\WINDOWS\system32\SVCH0ST.exe

@echo off
echo.&echo 正在删除病毒免疫文件......
for /f "delims=" %%p in (logo.txt) do (
    if exist %%p (
         cacls %%p /e /t /p everyone:F >nul 2>nul
         attrib -r -s -h -a %%p >nul 2>nul
         del /q %%p >nul 2>nul
         rd /q %%p>nul
         )
    )

@ECHO %dbg% OFF
::Code by qasa Copyright@qknet 11:36 2007-2-11
::E-mail:qknet@21cn.com
title 自动设置优化服务    作者:qasa
if "%1"=="/?" (
   echo.&echo 请在新建Server.ini加入你要设置的服务，格式如下：
   echo ^<服务名^>^|^<1^|2^|3^>^|^<注释^>
   echo 1 为自动；2 为手动；3为已禁用
   echo.&echo Eg:&echo      w32time^|3
   echo.&echo 上面的意思是Windows Time服务已设置禁用。
   echo 注释可不填。
   goto :eof
   )
mode con cols=60 lines=15&color c
if not exist server.ini (
   echo 你还没有服务配置文件-- Server.ini，请检查! ! !
   echo.&echo 请在Server.ini加入你要设置的服务，格式如下：
   echo ^<服务名^>^|^<1^|2^|3^>^|^<注释^>
   echo 1 为自动；2 为手动；3为已禁用
   echo.&echo Eg:&echo      w32time^|3
   echo.&echo 上面的意思是Windows Time服务已设置禁用。
   echo 注释可不填。
   pause>nul
   cd.>Server.ini
   goto :eof
   )
echo                 请稍候，正在为你设置服务......
for /f "tokens=1,2 delims=|" %%i in (server.ini) do (
    if %%j equ 3 sc config %%i start= disabled >nul 2>nul
    if %%j equ 2 sc config %%i start= demand >nul 2>nul
    if %%j equ 1 sc config %%i start= auto >nul 2>nul
    )
echo.&echo.&echo.&echo.
echo                 *****************************
echo                 **    服务设置完毕! ! !    **
echo                 *****************************
echo.&set/p a=                建议重启生效! ! !按 R 键重启:
if /i %a% equ r shutdown -r -t 0
exit /b

AeLookupSvc|1
Alerter|3
ALG|3
AppMgmt|2
AudioSrv|1
BITS|3
Browser|3
CiSvc|3
ClipSrv|3
COMSysApp|2
CryptSvc|2
DcomLaunch|1
Dfs|2
Dhcp|2
dmadmin|2
dmserver|1
Dnscache|2
ERSvc|3
Eventlog|1
EventSystem|2
helpsvc|3
HidServ|3
HTTPFilter|2
ImapiService|3
IsmServ|3
kdc|3
lanmanserver|3
lanmanworkstation|1
LicenseService|3
LmHosts|3
Messenger|3
mnmsrvc|3
MSDTC|3
MSIServer|2
NetDDE|3
NetDDEdsdm|3
Netlogon|3
Netman|2
Nla|3
NtFrs|2
NtLmSsp|3
NtmsSvc|2
ose|2
PlugPlay|1
PolicyAgent|1
ProtectedStorage|1
RasAuto|2
RasMan|2
RDSessMgr|3
remoteAccess|3
remoteRegistry|3
RpcLocator|3
RpcSs|1
RSoPProv|2
sacsvr|3
SamSs|1
SCardSvr|3
Schedule|1
seclogon|1
SENS|1
SharedAccess|2
ShellHWDetection|1
Spooler|3
stisvc|2
swprv|3
SysmonLog|3
TapiSrv|2
TermService|1
Themes|3
TrkSvr|3
TrkWks|3
Tssdis|3
UMWdf|2
UPS|3
vds|2
VSS|3
W32Time|3
WebClient|1
WinHttpAutoProxySvc|2
winmgmt|1
WmdmPmSN|3
Wmi|2
WmiApSrv|3
WZCSVC|3
xmlprov|2

@echo %dbg% off&setlocal enabledelayedexpansion
:: code by qasa copyright@qknet 2:16 2007-3-17
title 自动改IP(自设重启次数)   作者:钟其栋
mode con cols=50 lines=10&color a
if not exist 次数.txt goto st_
if exist c:\ip\key.txt goto OK
if not exist 设置.txt goto do_
set /p sum_=<次数.txt
for /l %%i in (!sum_!,-1,1) do (
   if exist c:\ip\off%%i.txt goto end
   )
exit /b

:st_
del /q c:\ip\*.txt >nul 2>nul
set /p sum_=你准备重启电脑多少次后安装冰点(建议设2次以上)?
echo %sum_% >次数.txt
cd %USERPROFILE%\「开始」菜单\程序\启动\
copy c:\ip\ippp.lnk . >nul 2>nul
cd c:\ip\
echo.&echo 请重启进行系统备份! ! !
ping/n 7 127.1>nul
goto :eof

:do_
setlocal enabledelayedexpansion
set no_=0
cd.>设置.txt
for /f "tokens=12 delims= " %%i in ('ipconfig /all^|find /i "Physical Address"') do (
   set mac=%%i
   set mac=!mac:~0,-1!
   )
for /f "tokens=1-3 delims==|" %%j in (MAC.INI) do (
   set mac_=%%j
   set ip_=%%k
   set sm_=%%l
   if !mac! equ !mac_! (
      call :set_ !mac_! !ip_! !sm_!  
      set /a no_+=1
      )   
   )
if "!no_!"=="0" (
   echo.&echo MAC.ini中没有此机的MAC地址，将发送到工作机上......
   echo %date% %time%新发现的MAC地址：>>NewMAC.ini&echo !mac! >>NewMAC.ini
   echo %date% %time%新发现的MAC地址：>>\\游戏主机\full$\NewMAC.ini&echo !mac! >>\\游戏主机\full$\NewMAC.ini
   echo.&echo 已经发送到工作机! ! !
   del /q c:\ip\次数.txt
   )
goto :eof

:set_
set /p w=<次数.txt
if %w% equ 1 cd.>c:\ip\key.txt&&start shutdown -r -t 90 -c 现在是第1次重启_最后一次重启_下次将安装冰点。作者:qasa
if %w% neq 1 start shutdown -r -t 90 -c 现在是第1次重启。
cd.>c:\ip\off2.txt
echo %1 %2 %3
set yy_=%3
echo.&echo 正在为%yy_:~1,3%号设置IP、机号...... 请稍候
for /f "tokens=1-4 delims==|" %%e in (DNS.ini) do (
    set dns1_=%%e
    set dns2_=%%f
    set workgate_=%%g
    set zwym_=%%h
    )
for /f  "tokens=1 delims=" %%s in ('ipconfig /all^|find /i "Ethernet adapter"') do (set ss_=%%s)
set ss_=%ss_:~17,-2%
for /l %%w in (1,1,2) do (
  netsh interface IP Set Address "%ss_%" Static %2 %zwym_% %workgate_% 1 >nul
  )
netsh interface IP Set Dns "%ss_%" static %dns1_% >nul
netsh interface ip add dns "%ss_%"  %dns2_% >nul
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ActiveComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName /v "ComputerName" /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "Hostname"    /t REG_SZ /d %3 /f >nul 2>NUL
REG ADD HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters /v "NV Hostname" /t REG_SZ /d %3 /f >nul 2>NUL
echo.&echo                设置完毕
goto :eof

:end
setlocal EnableDelayedExpansion
set /p summ_=<次数.txt
set /p ss=<次数.txt
set /a sss=ss
for /l %%i in (!summ_!,-1,1) do (
   if exist c:\ip\off%%i.txt (
      set /a a=%%i
      if exist c:\ip\off!sss!.txt (
         start shutdown -r -t 60 -c 现在是第!a!次重启_最后一次重启_下次将安装冰点。作者:qasa
         cd.>c:\ip\key.txt
         goto :eof
         )
      start shutdown -r -t 60 -c 现在是第!a!次重启。
      set/a b=a+1
      cd.>c:\ip\off!b!.txt
      goto :eof
      )
   )
goto :eof

:OK
cd %USERPROFILE%\「开始」菜单\程序\启动\
del /q ippp.lnk
cd c:\ip\
del /q c:\ip\*.txt
start "" df /install
goto :eof