param	MAXCOUNT,NOTEN


BENCH:=new BENCH()

// ----------------------------------------
i:=1
BENCH.SET("LOOP")
loop
	i:=i+1
	if i>MAXCOUNT then
		exitloop
	endif
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("LOOP()")
loop(MAXCOUNT)
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("REPEAT")
repeat
	i:=i+1
until(i>MAXCOUNT)
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("WHILE")
while(i<MAXCOUNT)
	i:=i+1
wend
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("NOP")
loop(MAXCOUNT)
	//
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("IF")
loop(MAXCOUNT)
	if i>NOTEN then
		beep
	endif
	i:=i+1
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("ELSE")
loop(MAXCOUNT)
	if i<NOTEN then
	else
		beep
	endif
	i:=i+1
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("CASE")
loop(MAXCOUNT)
	switch(i)
	case 1
		break
	endsw
endloop
BENCH.SAVE()


// ----------------------------------------
BENCH.SET("CALL")
loop(MAXCOUNT)
	call "NOP"
endloop
BENCH.SAVE()


// ----------------------------------------
BENCH.SET("PROC")
loop(MAXCOUNT)
	NOP()
endloop
BENCH.SAVE()

// ----------------------------------------
BENCH.SET("CLASS.PROC")
loop(MAXCOUNT)
	SUB.NOP()
endloop
BENCH.SAVE()