@echo off
　　:head
　　cls
　　echo.
　　echo -------------------------------------------------------------------------------
　　echo僅win7可用，請以管理員身份運行，未以管理員身份運行請退出重新以管理員身份運行
　　echo --by HKKKYY
　　echo -------------------------------------------------------------------------------
　　echo 請選擇 A,B,C,D,W:
　　choice /n /c ABCDW /m "A.配置無線路由器，B讀取無線路由配置，C.打開無線路由器，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 不存在配置信息或配置錯誤，請重新配置路由器
　　:help
　　echo.
　　echo 幫助信息!
　　echo 開啟internet共享：
　　echo.
　　echo 1.打開網(wǎng)絡和共享中心
　　echo 2.左邊的更改適配器設置
　　echo 3.在連接到internet的網(wǎng)絡適配器上右擊
　　echo 4.選擇 屬性
　　echo 5.選擇最右邊的 共享
　　echo 6.允許其他網(wǎng)絡用戶連接 打勾
　　echo 7.選擇無線網(wǎng)絡連接*(Microsoft Virtual WiFi Miniport Adapter)
　　echo 8.一路確認，設置完成!
　　echo.
　　echo 更多問題，請發(fā)送至郵箱：183229003@qq.com
　　pause
　　goto head
　　:creat
　　echo ---------------------------------------------
　　set /p ssid=請輸入無線網(wǎng)絡名稱，按回車結束：
　　set /p key=請輸入無線網(wǎng)絡密碼，按回車結束(密碼為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 路由配置成功，是否打開無線路由功能?(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 請重新配置路由并檢查您的計算機是否有虛擬無線網(wǎng)卡
　　if errorlevel 0 goto now
　　goto head
　　:now
　　cls
　　echo.
　　echo 無線路由開啟功能已開啟。。。
　　echo.
　　echo ---------------------------------------------------------
　　echo ssid為%ssid%，密碼為%key%
　　echo --by HKKKYY
　　echo ---------------------------------------------------------
　　echo.
　　choice /n /c TSX /m "關閉無線路由功能請按T，設置定時關機請按S，網(wǎ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=請輸入自動關機的時長，如一小時后關機，輸入3600，取消自動關機請輸入0：
　　if %time% equ 0 shutdown /a & goto now
　　shutdown /s /t %time%
　　if errorlevel 1 echo 設置失敗，請確認輸入正確，或者先取消此前的設置 & pause & goto now
　　if errorlevel 0 echo %time%秒后關機 & 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 您的計算機當前無法連接到internet & pause & goto now
　　if %ping1% neq 0 echo 請將您當前的網(wǎng)絡連接共享到Microsoft Virtual WiFi 網(wǎng)絡適配器 & pause & goto now
　　echo.
　　echo ----------------------------------------------------------------------
　　echo 網(wǎng)絡連接正常，若還無法連接到網(wǎng)絡，請將問題發(fā)送至郵箱：183229003@qq.com
　　echo ----------------------------------------------------------------------
　　pause
　　goto now
　　:exit