Terminal control/Preserve screen: Difference between revisions
Content added Content deleted
(Added Forth implementation) |
(Added Wren) |
||
Line 469: | Line 469: | ||
sleep 5 # Wait five seconds |
sleep 5 # Wait five seconds |
||
tput rmcup # Restore the display</lang> |
tput rmcup # Restore the display</lang> |
||
=={{header|Wren}}== |
|||
{{trans|C}} |
|||
<lang ecmascript>import "io" for Stdout |
|||
import "timer" for Timer |
|||
var ESC = "\u001B" |
|||
System.write("%(ESC)[?1049h%(ESC)[H") |
|||
System.print("Alternate screen buffer") |
|||
for (i in 5..1) { |
|||
var s = (i != 1) ? "s" : "" |
|||
System.write("\rGoing back in %(i) second%(s)...") |
|||
Stdout.flush() |
|||
Timer.sleep(1000) |
|||
} |
|||
System.write("%(ESC)[?1049l")</lang> |
|||
=={{header|XPL0}}== |
=={{header|XPL0}}== |