;$FM FSDEFC Set Default character after timeout for the FMS routines ;. 22-Jan-87 J. E. Kulaga ;. ;. This subroutine sets a default character to be returned by the ;. FMS-11 V2.0 form driver routines after a timeout period on the ;. terminal QIO. (Use routine FSTMO to set the timeout period.) ;. The call: ;. ;. call fsdefc (char) ;. ;. char == default character to be returned ;. .title FSDEFC .ident / V01 / .globl $DCHR$ FSDEFC:: TSTB (R5) ; check number of arguments BGT 1$ ; if char given, proceed to set it RETURN ; if char not given, return 1$: MOVB @2(R5),$DCHR$ ; set user requested default character RETURN ; and return .END