Ligar ou desligar a emissão de um sinal sonoro durante a digitação.
SET ALARM ON | OFF
SET BELL ON | OFF
Quando ligado (ON) emite um som estridente nas seguintes circunstâncias:
Na digitação de um caractere na última posição de um GET.
Caso o retorno da condição testada pelo VALID seja falso (.F.).
O exemplo a seguir mostra-nos a utilização deste comando para provocar um estridor ao chegar o final do campo de digitação ou quando var_cad estiver vazia.
PROG
SET BELL ON
var_cad = ""
@ 10,10 SAY "Digite seu nome " GET var_cad PIC REP("!",10) VALID .NOT. EMPTY(var_cad)
READ
@ ... GET, BEEP, SET CONFIRM, SET CURSOR e CHR( ).