Category : C Source Code
Archive   : CENVID17.ZIP
Filename : BATLOOPS.BAT

 
Output of file : BATLOOPS.BAT contained in archive : CENVID17.ZIP
@echo off
REM CEnviX1.bat
ECHO BatLoops: Use CEnvi and various methods to loop five times


ECHO ÿ
ECHO LOOP METHOD 1
ECHO THIS METHOD DEMONSTRATES THE CENVI CAPABILITY FOR MATHEMATICAL
ECHO PROCESSING OF VARIABLES, EVEN ENVIRONMENT VARIABLES
PAUSE
set LOOP_COUNT=1
:ABEGIN_LOOP
echo This is pass %LOOP_COUNT% through this loop - 1
cenvi LOOP_COUNT++
if %LOOP_COUNT% == 6 GOTO AEND_LOOP
GOTO ABEGIN_LOOP
:AEND_LOOP


ECHO ÿ
ECHO LOOP METHOD 2
ECHO CENVI WILL SET AN ENVIRONMENT VARIABLE FOR THE PROPER GOTO LABEL
PAUSE
set LOOP_COUNT=1
:BBEGIN_LOOP
echo This is pass %LOOP_COUNT% through this loop - 2
cenvi "LOOP_GOTO = ( LOOP_COUNT++ < 5 ) ? "BBEGIN_LOOP" : "BEND_LOOP""
GOTO %LOOP_GOTO%
:BEND_LOOP


ECHO ÿ
ECHO LOOP METHOD 3
ECHO CENVI SETS AN ENVIRONMENT VARIABLE TO A BATCH FILE STATEMENT
PAUSE
set LOOP_COUNT=1
:CBEGIN_LOOP
echo This is pass %LOOP_COUNT% through this loop - 3
cenvi "LOOP_COMMAND = ( LOOP_COUNT++ < 5 ) ? "GOTO CBEGIN_LOOP" : " ""
%LOOP_COMMAND%

ECHO ÿ
ECHO LOOP METHOD 4
ECHO CENVI WILL EXECUTE CODE FROM SELECTED LINES OF THIS BATCH FILE
PAUSE
cenvi #include "%0,bat,:CODE4"
:CODE4 for ( i = 1; i <= 5; i++ )
:CODE4 printf(" This is pass %d through this loop - 4\n",i)


ECHO ÿ
ECHO LOOP METHOD 5
ECHO CENVI WILL READ SOURCE FROM THIS EXECUTABLE, AND THEN CALL A FUNCTION
PAUSE
cenvi #include "%0,bat,:CODE5" LoopFoo(1,5)
:CODE5 LoopFoo(min,max) {
:CODE5 for ( i = min; i <= max; i++ )
:CODE5 printf(" This is pass %d through this loop - 5\n",i)
:CODE5 }


ECHO ÿ
ECHO LOOP METHOD 6
ECHO THIS METHOD DEMONSTRATES THE USE OF A CMM "EXECUTABLE"; THAT IS, THE
ECHO .BAT EXTENSION ON THE INPUT TELLS CENVI TO CALL main(argc,argv) WITH
ECHO THE COMMAND LINE ARGUMENTS
PAUSE
cenvi %0.bat 1 5
GOTO CENVI_EXIT
main(argc,argv)
{
for ( i = atoi(argv[1]); i <= atoi(argv[2]); i++ )
printf(" This is pass %d through this loop - 6\n",i)
}
:CENVI_EXIT



ECHO ÿ
ECHO LOOP METHOD 7
ECHO CMM SOURCE CODE IS PASSED TO CENVI DIRECTLY ON THE COMMAND LINE
PAUSE
cenvi "for ( i = 1; i <= 5; i++ ) printf(" This is pass %%d through this loop - 7\n",i)"


REM Cleanup up the variables used
set LOOP_COUNT=
set LOOP_GOTO=
set LOOP_COMMAND=
set METHOD_COUNT=


  3 Responses to “Category : C Source Code
Archive   : CENVID17.ZIP
Filename : BATLOOPS.BAT

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/