PROGRAM FOREGROUND C C PROGRAM WILL PRINT "HELLO FROM THE FOREGROUND" C EVERY FIVE SECONDS C C The following programs are used in the RT-11 User and RT-11 C Programmer self paced instruction courses for RT-11 V4.They are also C similar to programs used in the Programming with RT-11 series for C RT-11 V5.0 or later. The name of the files are as specified in the C self paced course. C C The code is supplied as a service as Digital does not supply these C on diskette. C Any copyright is the property of Digital Equipment Corporartion C C INTEGER*2 TIME(2) DATA TIME/0,300/ 100 CALL PRINT('HELLO FROM THE FOREGROUND') IF(ITWAIT(TIME).NE.0)STOP 'NO Q.ELEMENTS' !WAIT FOR C FIVE SECONDS GOTO 100 !PRINT AGAIN END