SmileBASIC, 55 bytes
TMREAD OUT H,M,
CLS?H,"-"*M?(H+1)MOD 24,"-"*(60-M)EXEC.
Explanation:
TMREAD OUT HOUR,MINUTE,
CLS
PRINT HOUR,"-"*MINUTE
PRINT (HOUR+1) MOD 24,"-"*(60-MINUTE)
EXEC 0 'runs the code stored in slot 0 (the default)
Note: SmileBASIC only has 50 columns of text, so it won't look good...
12Me21
- 6.8k
- 1
- 23
- 40