Terminal control/Cursor positioning: Difference between revisions
(→REXX: implementation and library.) |
(add language: Retro) |
||
Line 45: | Line 45: | ||
<!-- still need code demonstrating this. Either that, or remove this section. The task seems fine for being non-draft, otherwise. --> |
<!-- still need code demonstrating this. Either that, or remove this section. The task seems fine for being non-draft, otherwise. --> |
||
=={{header|Retro}}== |
|||
<lang Retro>with console' |
|||
10 20 at-xy</lang> |
|||
[[Category:Terminal Control]] |
[[Category:Terminal Control]] |
Revision as of 03:17, 12 October 2010
Move the cursor to column 3, row 6 and display the word "Hello", so that the letter H is in column 3 on row 6.
BASIC
Locomotive Basic
<lang basic> 10 LOCATE 3,6
20 PRINT "Hello"</lang>
ZX Spectrum Basic
<lang basic> 10 REM The top left corner is at position 0,0
20 REM So we subtract one from the coordinates 30 PRINT AT 5,2 "Hello"</lang>
Forth
<lang forth>2 5 at-xy ." Hello"</lang>
Logo
<lang logo>setcursor [2 5] type "Hello</lang> You can also draw positioned text on the turtle graphics window. <lang logo>setpos [20 50] setxy 20 30 ; alternate way to set position label "Hello</lang>
PureBasic
<lang PureBasic>EnableGraphicalConsole(#True) ConsoleLocate(3,6) Print("Hello")</lang>
REXX
The Rexx programming language does not include terminal control as part of the language. However, it might be possible to output ANSI control sequences, and there are various workarounds which are platform specific:
The regina interpreter supports the rexxcurses plugin, which provides the facility to set the cursor position:
Retro
<lang Retro>with console' 10 20 at-xy</lang>