fkmax( ) 函数示例

clear
set compatible off
? 'compatible off'
?
for ncount = 1 to fkmax( )  && 循环次数等于功能键的数目
	? fklabel(ncount)  && 显示可编程的功能键
endfor
set compatible on
?
? 'compatible on'
?
for ncount = 1 to fkmax( )  && 循环次数等于功能键的数目
	? fklabel(ncount)  && 显示可编程的功能键
endfor