CLOCK

Portability Function: Converts a system time into an 8-character ASCII string.

Module

USE IFPORT

result = CLOCK( )

The result type is character with a length of 8. The result is the current time in the form hh:mm:ss, using a 24-hour clock.

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

USE IFPORT

character(8) whatimeisit

whatimeisit = CLOCK ()

print *, 'The current time is ',whatimeisit