RosettaCodeData/Task/Terminal-control-Positional-read/BBC-BASIC/terminal-control-positional-read-2.basic

      PRINT TAB(2,5) "Here"
      PRINT TAB(2,5);                         : REM Position cursor over character to read
      A%=&87:char%=((USR&FFF4)AND&FF00)DIV256 : REM Ask operating system to read character
      PRINT ''"Character at column 3 row 6 was CHR$(";char%;")"