Re: Hex Code for Position Cursor

This won't help at all for Position Cursor, but maybe you will find it useful for Reverse Image. Years ago I wrote an order entry program (RPG/400) with the following code & comments in the *INZSR subroutine...

(I don't know if the newsgroup will use a proportional font, so things may not line up properly.)


**************************************************************
*
* NORMAL VIDEO - 20H - 0010 0000
* REVERSE IMAGE - 21H - 0010 0001
* HIGH INTENSITY - 22H - 0010 0010
* UNDERSCORE - 24H - 0010 0100
* BLINK - 28H - 0010 1000
*
* COMBINATIONS CAN BE ACHIEVED BY LOGICALLY ORing ATTRIBUTES
* EXAMPLE : FOR HIGH INTENSITY/REVERSE IMAGE, COMBINE
* REVERSE IMAGE - 21H - 0010 0001
* HIGH INTENSITY - 22H - 0010 0010
* --------------------------------
* REVERSE/HIGH - 23H - 0010 0011
* WHICH IS BITON ' 2 67'
*
*
C BITOFF '01234567' ATRRI 1
C BITON '257' ATRRI
*
C BITOFF '01234567' ATRHB 1
C BITON '246' ATRHB
*
C BITOFF '01234567' ATRHI 1
C BITON '26' ATRHI
*
C BITOFF '01234567' ATRNO 1
C BITON '2' ATRNO
*
C BITOFF '01234567' ATRHU 1
C BITON '256' ATRHU
*
C BITOFF '01234567' ATRHR 1
C BITON '267' ATRHR