home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1997 July
/
VPR9707A.ISO
/
OLS
/
Win32
/
Wbat128p
/
WBAT128P.LZH
/
SAMPLE
/
SAMPLE.BAT
< prev
next >
Wrap
DOS Batch File
|
1995-06-11
|
2KB
|
77 lines
@echo off
:/ --------------------------------------------------------------
:/ WinBatchEhサンプルバッチ - SAMPLE.BAT
:/ 一般的な(?)サンプル。
:/ 途中でDOS上かWinBatchEh上かの分岐を行なっている。
:/
:/ Author : Yohei Shimizu
:/ Version: 1.01
:/ Date : 1995/06/11
:/
:/ History: 1.0 1995/05/24
:/ Initial Version
:/ 1.01 1995/06/11
:/ 無視すると無限ループになるのを修正^^;
:/ --------------------------------------------------------------
echo %0 - WinBatchEhのためのサンプルバッチファイルです。
echo.
echo これから実行を行います。
echo まずは普通のバッチファイルです。
pause
cls
echo 環境変数PATHは %PATH% と設定されてます。
echo.
echo カレントドライブ及びディレクトリは次のようになっています。
cd
echo.
if exist \command.com echo このディレクトリのルートに \COMMAND.COM が存在します。
if not exist \command.com echo このディレクトリのルートには \COMMAND.COM が存在しません。
echo.
echo では、WinBatchEhらしい(?)バッチの実行に移ります。
pause
if WINBATCH==YES goto START
echo.
echo この続きはWinBatchEh上でのみ実行可能です。WinBatchEh上で実行してみてください。
echo 何かキーを押すとバッチを終了します。
pause>nul
goto END
:START
:LOOP
messagebox=0x0044 とりあえず邪魔なのでバッチ内容表示ウィンドウを最小化してよいですか?
if not errorlevel 7 batwnd off
messagebox=0x0123 ついでにバッチ実行ウィンドウも非表示にしますか?
if errorlevel 3 goto NEXT
messagebox=0x0232 え? キャンセルって、もしかしてバッチを中止するのでしょうか?
if %ERRORLEVEL%==3 goto QUIT
if %ERRORLEVEL%==4 goto LOOP
set COUNT=.
:MUSI
echo 無視しないでくださいよ~~~~~~~~~~~~~~~~~~~~~~~~~~~~
set COUNT=%COUNT%.
if not %COUNT%==......................... goto MUSI
messagebeep 0x0000
messagebeep 0x0010
messagebeep 0x0020
messagebeep 0x0030
messagebeep 0x0040
goto LOOP
:NEXT
if not errorlevel 7 execwnd off
messagebox 今度は電卓を起動してみます。電卓が終了するまでバッチには戻ってきません。
calc.exe
messagebox もう一度電卓を起動してみます。今度はフルスクリーンで起動させます。
exec=SW_MAXIMIZE calc.exe
messagebox さらに電卓を起動してみます。今回はアイコン状態で起動させて、すぐにバッチに戻ってきます。
start=SW_SHOWMINIMIZED calc.exe
messagebox バッチに戻ってきました。電卓は使わないなら終了させてあげてください:-)
:QUIT
messagebox サンプルバッチ%0はこれで終了です。お疲れさまでした。
:END