Submitted to the Fall, 1987 RSX SIG DECUS tape by: Joseph E. Kulaga Chemical Tecnology Division Argonne National Laboratory 9700 S. Cass Ave. Argonne, IL 60439 (312) 972 - 4327 This collection of software adds two features to DEC's FMS-11 forms software (versions 2.0 and 2.1), namely, run-time video attribute control and read-with-timeout for single character option fields. Files in this distribution: FDVTIO.SLP -- code modifications to be applied to the FDVTIO.MAC source distributed with the form driver package. Use SLP to apply these changes. FMVID.MAC -- routine to modify video attributes FRVID.MAC -- routine to retrieve video attributes FSTMO.MAC -- routine to set the timeout period FSDEFC.MAC -- routine to set default input character for response after timeout DECUS.TEX -- draft version of paper submitted to the Fall '87 DECUS Proceedings in LaTeX format A sample FORTRAN code sequence for these routines: call fmvid (impure, 'FIELDA', 12) ! set video attribute of field ! FIELDA to bold & blinking call fsdefc ('1') ! set default character to '1' call fstmo (10) ! set time out to 10 sec call fget (Iopt, term, 'DSPOPT') ! read option field c .. Waiting for response or timeout. When we fall through, test value. if (Iopt .eq. '0') then c ........... code for Iopt = '0' else if (Iopt .eq. '1') then c ........... code for Iopt = '1' else if (Iopt .eq. '2') then c ........... code for Iopt = '2' : : : : : : endif