TIP: Click on subject to list as thread! ANSI
echo: qedit
to: DAVID ROPER
from: LARRY COOKE
date: 1995-07-13 17:43:00
subject: Hex display in TSE

 Hi David!
 On Tue Jul 11 David Roper wrote the following to George De Bruin:
 DR> Using TSE 2.0 is a dream come true, ....however what I miss the
   > most (besides my mind) from the old Qedit was the ability to
   > see the hex character value wherever the cursor was, on the top
   > row.  What page in the TSE 2.0 books is this feature found on?..
   > or better still, how do you do it?  It "couldn't" be gone :-( ????
   > Peace
 I don't think this was/is mentioned in the docs.  Like you though, I
 missed that feature a lot and was offered the following:
 -------------------------------------------------------------
 /**********************************************************************
   Macros for ToggleShowCurrChar:
   The mShowChar() macro duplicates QEdit's Show Current Character
   feature (which displays the character under the cursor on the command
   line).
   The mToggleShowChar() macro duplicates QEdit's ToggleShowCurChar
   command, which controls the mShowChar() macro.
 **********************************************************************/
 integer DisplayChars = FALSE
 proc mShowChar()
     integer n = CurrChar(),
             y = iif(Query(StatusLineAtTop), 1, Query(ScreenRows)),
             attr = Set(Attr, Query(StatusLineAttr))
     if Query(StatusLineUpdating)
         VGotoXY(74, y)
         PutStr(iif(n " +iif(n == _AT_EOL_, " ", "+ "),
                           Format(n:2:"0":16, "h,", n:-3)))
     endif
     Set(Attr, attr)
 end
 proc mToggleShowChar()
     DisplayChars = NOT DisplayChars
     if DisplayChars == TRUE
         Hook(_AFTER_UPDATE_STATUSLINE_, mShowChar)
     else
         UnHook(mShowChar)
         UpdateDisplay(_STATUSLINE_REFRESH_)
     endif
 end
 -------------------------------------------------------------
 I then added the above to my TSE.UI and also added the following to be
 sure it's loaded automatically:
 -------------------------------------------------------------
 /**********************************************************************
   This macro is called just after the first file is loaded, but before
   the user is given control, and before any hook functions are called.
 **********************************************************************/
 proc Main()
     mToggleShowChar()
 end
 /*********************************************************************/
 -------------------------------------------------------------
 This works great for me here - enjoy!
 Larry
---
---------------
* Origin: Comm-Post BBS * Tucson, AZ * USR DS V.e * (1:300/52)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.