Terminal control/Positional read

From Rosetta Code
Revision as of 20:09, 16 December 2010 by rosettacode>Gerard Schildberger (→‎{{header|REXX}}: delerted previous entry, re-added language.)
Terminal control/Positional read is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.

Determine the character displayed on the screen at column 3, row 6 and store that character in a variable.

BASIC

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 LET c$ = SCREEN$(5,2)</lang>

REXX

The REXX doesn't have any cursor or screen management tools, but some REXX interpreters have
added the functionality via different methods.

Below is one example PC/REXX has implemented: <lang rexx> /*REXX program demonstrates reading a char at specific screen location.*/


/*──────────────────────────────────────────────────────────────────────*/ /*─────────────────────examples are for PC/REXX only.───────────────────*/ /*──────────────────────────────────────────────────────────────────────*/


row=20 /*point to row twenty. */ col=55 /*point co column fifty-five. */ howMany=3 /*read a trio of characters. */

stuff=scrread(row,col,howMany) /*this'll do it. */


other=scrRead(40,55,2) /*same thing, but for row forty. */ </lang>