@echo off
　　:head
　　cls
　　echo.
　　echo -------------------------------------------------------------------------------
　　echo僅win7可用，請(qǐng)以管理員身份運(yùn)行，未以管理員身份運(yùn)行請(qǐng)退出重新以管理員身份運(yùn)行
　　echo --by HKKKYY
　　echo -------------------------------------------------------------------------------
　　echo 請(qǐng)選擇 A,B,C,D,W:
　　choice /n /c ABCDW /m "A.配置無(wú)線路由器，B讀取無(wú)線路由配置，C.打開無(wú)線路由器，D.退出程序，W.幫助信息"
　　if errorlevel 5 goto help
　　if errorlevel 4 goto exit
　　if errorlevel 3 goto start
　　if errorlevel 2 goto load
　　if errorlevel 1 goto creat
　　:error
　　echo.
　　echo 不存在配置信息或配置錯(cuò)誤，請(qǐng)重新配置路由器
　　:help
　　echo.
　　echo 幫助信息!
　　echo 開啟internet共享：
　　echo.
　　echo 1.打開網(wǎng)絡(luò)和共享中心
　　echo 2.左邊的更改適配器設(shè)置
　　echo 3.在連接到internet的網(wǎng)絡(luò)適配器上右擊
　　echo 4.選擇 屬性
　　echo 5.選擇最右邊的 共享
　　echo 6.允許其他網(wǎng)絡(luò)用戶連接 打勾
　　echo 7.選擇無(wú)線網(wǎng)絡(luò)連接*(Microsoft Virtual WiFi Miniport Adapter)
　　echo 8.一路確認(rèn)，設(shè)置完成!
　　echo.
　　echo 更多問(wèn)題，請(qǐng)發(fā)送至郵箱：183229003@qq.com
　　pause
　　goto head
　　:creat
　　echo ---------------------------------------------
　　set /p ssid=請(qǐng)輸入無(wú)線網(wǎng)絡(luò)名稱，按回車結(jié)束：
　　set /p key=請(qǐng)輸入無(wú)線網(wǎng)絡(luò)密碼，按回車結(jié)束(密碼為8位及以上的數(shù)字或字母)：
　　echo %ssid%.%key% >wlan.inf
　　goto load
　　:load
　　if not exist wlan.inf goto error
　　for /f "delims=. tokens=1-2" %%a in (wlan.inf) do set ssid=%%a & set key=%%b
　　netsh wlan set hostednetwork allow %ssid% %key%
　　if not errorlevel 0 goto error
　　echo 路由配置成功，是否打開無(wú)線路由功能?(Y/N)
　　choice /n /c YN /m ":"
　　if errorlevel 2 goto head
　　if errorlevel 1 goto start
　　:start
　　netsh wlan start hostednetwork
　　if errorlevel 1 echo 請(qǐng)重新配置路由并檢查您的計(jì)算機(jī)是否有虛擬無(wú)線網(wǎng)卡
　　if errorlevel 0 goto now
　　goto head
　　:now
　　cls
　　echo.
　　echo 無(wú)線路由開啟功能已開啟。。。
　　echo.
　　echo ---------------------------------------------------------
　　echo ssid為%ssid%，密碼為%key%
　　echo --by HKKKYY
　　echo ---------------------------------------------------------
　　echo.
　　choice /n /c TSX /m "關(guān)閉無(wú)線路由功能請(qǐng)按T，設(shè)置定時(shí)關(guān)機(jī)請(qǐng)按S，網(wǎng)絡(luò)連通測(cè)試請(qǐng)按X"
　　if errorlevel 3 goto test
　　if errorlevel 2 goto shutdown
　　if errorlevel 1 goto stop
　　:stop
　　netsh wlan stop hostednetwork
　　goto head
　　:shutdown
　　set /p time=請(qǐng)輸入自動(dòng)關(guān)機(jī)的時(shí)長(zhǎng)，如一小時(shí)后關(guān)機(jī)，輸入3600，取消自動(dòng)關(guān)機(jī)請(qǐng)輸入0：
　　if %time% equ 0 shutdown /a & goto now
　　shutdown /s /t %time%
　　if errorlevel 1 echo 設(shè)置失敗，請(qǐng)確認(rèn)輸入正確，或者先取消此前的設(shè)置 & pause & goto now
　　if errorlevel 0 echo %time%秒后關(guān)機(jī) & pause & goto now
　　:test
　　cls
　　@ping 218.85.157.99
　　set /a ping2=%errorlevel%
　　@ping 192.168.137.1
　　set /a ping1=%errorlevel%
　　if %ping2% neq 0 echo 您的計(jì)算機(jī)當(dāng)前無(wú)法連接到internet & pause & goto now
　　if %ping1% neq 0 echo 請(qǐng)將您當(dāng)前的網(wǎng)絡(luò)連接共享到Microsoft Virtual WiFi 網(wǎng)絡(luò)適配器 & pause & goto now
　　echo.
　　echo ----------------------------------------------------------------------
　　echo 網(wǎng)絡(luò)連接正常，若還無(wú)法連接到網(wǎng)絡(luò)，請(qǐng)將問(wèn)題發(fā)送至郵箱：183229003@qq.com
　　echo ----------------------------------------------------------------------
　　pause
　　goto now
　　:exit