Terminal control/Preserve screen: Difference between revisions
Content deleted Content added
m →{{header|UNIX Shell}}: whitespace |
Added PicoLisp |
||
Line 17: | Line 17: | ||
This task does not admit sample output, but you can demonstrate this solution for yourself using the chrome browser: control-shift-J then copy and paste the above into the command line, and hit enter. |
This task does not admit sample output, but you can demonstrate this solution for yourself using the chrome browser: control-shift-J then copy and paste the above into the command line, and hit enter. |
||
=={{header|PicoLisp}}== |
|||
<lang PicoLisp>#!/usr/bin/picolisp /usr/lib/picolisp/lib.l |
|||
(call 'tput "smcup") |
|||
(prinl "something") |
|||
(wait 3000) |
|||
(call 'tput "rmcup") |
|||
(bye)</lang> |
|||
=={{header|Tcl}}== |
=={{header|Tcl}}== |