中国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