Terminal control/Preserve screen: Difference between revisions
Content added Content deleted
| Line 308: | Line 308: | ||
For those REXXes that don't have the '''scrsize''' BIF, the '''SCRSIZE.REX''' REXX program is included here ──► [[SCRSIZE.REX]]. <br><br> |
For those REXXes that don't have the '''scrsize''' BIF, the '''SCRSIZE.REX''' REXX program is included here ──► [[SCRSIZE.REX]]. <br><br> |
||
=={{header|Ring}}== |
|||
{{incorrect|Ring|char(33) is not escape}} |
|||
<lang ring> |
|||
# Project : Terminal control/Preserve screen |
|||
load "stdlib.ring" |
|||
see char(33) + "[?1049h\" + char(33) + "[H" + nl |
|||
see "Alternate screen buffer" + nl |
|||
for i = 5 to 1 step -1 |
|||
see "going back in " + i + "..." + nl |
|||
sleep(1) |
|||
next |
|||
see char(33) + "[?1049l" + nl |
|||
</lang> |
|||
Output: |
|||
<pre> |
|||
![?1049h\![H |
|||
Alternate screen buffer |
|||
going back in 5... |
|||
going back in 4... |
|||
going back in 3... |
|||
going back in 2... |
|||
going back in 1... |
|||
![?1049l |
|||
</pre> |
|||
=={{header|Scala}}== |
=={{header|Scala}}== |
||