home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frostbyte's 1980s DOS Shareware Collection
/
floppyshareware.zip
/
floppyshareware
/
GLEN
/
IS.ZIP
/
TEST.BAT
< prev
Wrap
DOS Batch File
|
1988-10-26
|
9KB
|
419 lines
rem test.bat - test the IS batch file utility
echo off
echo **************************************************
echo.
echo This is the test batch file for the IS utility, it
echo uses drive a: and drive c: so be sure there is a
echo diskette in drive a:
echo.
echo If there is no drive c:, just find and replace all
echo occurences of '(c)' with '(a)' or '(b)' as needed.
echo.
echo **************************************************
pause
echo **************************************************
echo **************************************************
:start1
echo IS ABC eq ABC
IS ABC eq ABC
if errorlevel 2 goto err1
if errorlevel 1 goto no1
echo **** YES ****
goto end1
:err1
echo !!! ERR !!!
goto end1
:no1
echo --- NO ---
:end1
pause
echo **************************************************
echo **************************************************
:start2
echo IS ABC eq abc
IS ABC eq abc
if errorlevel 2 goto err2
if errorlevel 1 goto no2
echo **** YES ****
goto end2
:err2
echo !!! ERR !!!
goto end2
:no2
echo --- NO ---
:end2
pause
echo **************************************************
echo **************************************************
:start3
echo IS "INPUT(Answer Y/n: )" eq n
IS "INPUT(Answer Y/n: )" eq n
if errorlevel 2 goto err3
if errorlevel 1 goto no3
echo **** YES ****
goto end3
:err3
echo !!! ERR !!!
goto end3
:no3
echo --- NO ---
:end3
pause
echo **************************************************
echo **************************************************
:start4
echo IS filesize(test.bat) gt 1000
IS filesize(test.bat) gt 1000
if errorlevel 2 goto err4
if errorlevel 1 goto no4
echo **** YES ****
goto end4
:err4
echo !!! ERR !!!
goto end4
:no4
echo --- NO ---
:end4
pause
echo **************************************************
echo **************************************************
:start5
echo IS filedate(test.bat) gt 10-20-88
IS filedate(test.bat) gt 10-20-88
if errorlevel 2 goto err5
if errorlevel 1 goto no5
echo **** YES ****
goto end5
:err5
echo !!! ERR !!!
goto end5
:no5
echo --- NO ---
:end5
pause
echo **************************************************
echo **************************************************
:start6
echo IS 1000 gt 999
IS 1000 gt 999
if errorlevel 2 goto err6
if errorlevel 1 goto no6
echo **** YES ****
goto end6
:err6
echo !!! ERR !!!
goto end6
:no6
echo --- NO ---
:end6
pause
echo **************************************************
echo **************************************************
:start7
echo IS 999 gt 1000
IS 999 gt 1000
if errorlevel 2 goto err7
if errorlevel 1 goto no7
echo **** YES ****
goto end7
:err7
echo !!! ERR !!!
goto end7
:no7
echo --- NO ---
:end7
pause
echo **************************************************
echo **************************************************
:start8
echo IS systime gt 02:00
IS systime gt 02:00
if errorlevel 2 goto err8
if errorlevel 1 goto no8
echo **** YES ****
goto end8
:err8
echo !!! ERR !!!
goto end8
:no8
echo --- NO ---
:end8
pause
echo **************************************************
echo **************************************************
:start9
echo IS systime lt 02:00
IS systime lt 02:00
if errorlevel 2 goto err9
if errorlevel 1 goto no9
echo **** YES ****
goto end9
:err9
echo !!! ERR !!!
goto end9
:no9
echo --- NO ---
:end9
pause
echo **************************************************
echo **************************************************
:start10
echo IS filedate(test.bat) eq sysdate
IS filedate(test.bat) eq sysdate
if errorlevel 2 goto err10
if errorlevel 1 goto no10
echo **** YES ****
goto end10
:err10
echo !!! ERR !!!
goto end10
:no10
echo --- NO ---
:end10
pause
echo **************************************************
echo **************************************************
:start11
echo IS sysdate eq 11-06-88
IS sysdate eq 11-06-88
if errorlevel 2 goto err11
if errorlevel 1 goto no11
echo **** YES ****
goto end11
:err11
echo !!! ERR !!!
goto end11
:no11
echo --- NO ---
:end11
pause
echo **************************************************
echo **************************************************
:start12
echo IS %config% eq c:\config.sys
IS %config% eq c:\config.sys
if errorlevel 2 goto err12
if errorlevel 1 goto no12
echo **** YES ****
goto end12
:err12
echo !!! ERR !!!
goto end12
:no12
echo --- NO ---
:end12
pause
echo **************************************************
echo **************************************************
:start13
echo IS disksize(c) gt disksize(a)
IS disksize(c) gt disksize(a)
if errorlevel 2 goto err13
if errorlevel 1 goto no13
echo **** YES ****
goto end13
:err13
echo !!! ERR !!!
goto end13
:no13
echo --- NO ---
:end13
pause
echo **************************************************
echo **************************************************
:start14
echo IS diskfree(c) gt disksize(a)
IS diskfree(c) gt disksize(a)
if errorlevel 2 goto err14
if errorlevel 1 goto no14
echo **** YES ****
goto end14
:err14
echo !!! ERR !!!
goto end14
:no14
echo --- NO ---
:end14
pause
echo **************************************************
echo **************************************************
:start15
echo IS disksize(c) eq disksize(c)
IS disksize(c) eq disksize(c)
if errorlevel 2 goto err15
if errorlevel 1 goto no15
echo **** YES ****
goto end15
:err15
echo !!! ERR !!!
goto end15
:no15
echo --- NO ---
:end15
pause
echo **************************************************
echo **************************************************
:start16
echo IS diskfree(a) lt diskfree(c)
IS diskfree(a) lt diskfree(c)
if errorlevel 2 goto err16
if errorlevel 1 goto no16
echo **** YES ****
goto end16
:err16
echo !!! ERR !!!
goto end16
:no16
echo --- NO ---
:end16
pause
echo **************************************************
echo **************************************************
:start17
echo IS diskfree(c) gt 4000000
IS diskfree(c) gt 4000000
if errorlevel 2 goto err17
if errorlevel 1 goto no17
echo **** YES ****
goto end17
:err17
echo !!! ERR !!!
goto end17
:no17
echo --- NO ---
:end17
pause
echo **************************************************
echo **************************************************
:start18
echo IS disksize(c) gt 20000000
IS disksize(c) gt 20000000
if errorlevel 2 goto err18
if errorlevel 1 goto no18
echo **** YES ****
goto end18
:err18
echo !!! ERR !!!
goto end18
:no18
echo --- NO ---
:end18
pause
echo **************************************************
echo **************************************************
:start19
echo IS disksize(c) gt 22000000
IS disksize(c) gt 22000000
if errorlevel 2 goto err19
if errorlevel 1 goto no19
echo **** YES ****
goto end19
:err19
echo !!! ERR !!!
goto end19
:no19
echo --- NO ---
:end19
pause
echo **************************************************
echo **************************************************
:start20
echo IS diskfree(c) gt 5000000
IS diskfree(c) gt 5000000
if errorlevel 2 goto err20
if errorlevel 1 goto no20
echo **** YES ****
goto end20
:err20
echo !!! ERR !!!
goto end20
:no20
echo --- NO ---
:end20
pause
echo **************************************************
echo **************************************************
:start21
echo IS disksize(a) gt 300000
IS disksize(a) gt 300000
if errorlevel 2 goto err21
if errorlevel 1 goto no21
echo **** YES ****
goto end21
:err21
echo !!! ERR !!!
goto end21
:no21
echo --- NO ---
:end21
pause
echo **************************************************
echo **************************************************
:start22
echo IS disksize(a) gt 370000
IS disksize(a) gt 370000
if errorlevel 2 goto err22
if errorlevel 1 goto no22
echo **** YES ****
goto end22
:err22
echo !!! ERR !!!
goto end22
:no22
echo --- NO ---
:end22
pause
echo **************************************************
echo **************************************************
:start23
echo IS diskfree(a) eq disksize(a)
IS diskfree(a) eq disksize(a)
if errorlevel 2 goto err23
if errorlevel 1 goto no23
echo **** YES ****
goto end23
:err23
echo !!! ERR !!!
goto end23
:no23
echo --- NO ---
:end23
pause
echo **************************************************
echo **************************************************
:start24
echo IS diskfree(a) lt filesize(IS.EXE)
IS diskfree(a) lt filesize(IS.EXE)
if errorlevel 2 goto err24
if errorlevel 1 goto no24
echo **** YES ****
goto end24
:err24
echo !!! ERR !!!
goto end24
:no24
echo --- NO ---
:end24
pause
echo **************************************************
echo **************************************************
:start25
echo IS "Perfect!!!" gt OK!!!!!!!!
IS "Perfect!!!" gt OK!!!!!!!!
if errorlevel 2 goto err25
if errorlevel 1 goto no25
echo **** YES ****
goto end25
:err25
echo !!! ERR !!!
goto end25
:no25
echo --- NO ---
:end25
pause
GOTO VERY_END
:VERY_END
echo **************************************************