LBL and END handling on the PX41CX and in PX41CX_Interface.xls

[krischik]

(11-15-2024 07:57 PM)Pierre Wrote:  By email it would have been simpler and faster (with possible attachments)

While I would prefer a proper bug tracker. With me bugs per E-Mail often get overlooked if I don't fix them right away.

Anyway, I noticed two bugs in the „Valid Keys“ part of the „Data“ sheet. The Bugs are in the ENTER row and the last row. I have the correct map here:

Code:

   ---
   --  Assignment key codes  => User Key Code
   HP41_Key_Map : array (HP41_Byte_Code range 16#00# .. 16#4c#) of Integer := [
      16#01# => 11,     --  Σ+
      16#11# => 12,     --  1/x
      16#21# => 13,     --  √x
      16#31# => 14,     --  log
      16#41# => 15,     --  ln
      16#02# => 21,     --  x⇋y
      16#12# => 22,     --  R↓
      16#22# => 23,     --  sin
      16#32# => 24,     --  cos
      16#42# => 25,     --  tan
      16#13# => 32,     --  XEQ
      16#23# => 33,     --  STO
      16#33# => 34,     --  RCL
      16#43# => 35,     --  SST
      16#04# => 41,     --  ENTER
      16#24# => 42,     --  CHS
      16#34# => 43,     --  EEX
      16#44# => 44,     --  ←
      16#05# => 51,     --  -
      16#15# => 52,     --  7
      16#25# => 53,     --  8
      16#35# => 54,     --  9
      16#06# => 61,     --  +
      16#16# => 62,     --  4
      16#26# => 63,     --  5
      16#36# => 64,     --  6
      16#07# => 71,     --  ×
      16#17# => 72,     --  1
      16#27# => 73,     --  2
      16#37# => 74,     --  3
      16#08# => 81,     --  ÷
      16#18# => 82,     --  0
      16#28# => 83,     --  .
      16#38# => 84,     --  R/S
      16#09# => -11,    --  INV Σ+
      16#19# => -12,    --  INV 1/x
      16#29# => -13,    --  INV √x
      16#39# => -14,    --  INV log
      16#49# => -15,    --  INV ln
      16#0A# => -21,    --  INV x⇋y
      16#1A# => -22,    --  INV R↓
      16#2A# => -23,    --  INV sin
      16#3A# => -24,    --  INV cos
      16#4A# => -25,    --  INV tan
      16#1B# => -32,    --  INV XEQ
      16#2B# => -33,    --  INV STO
      16#3B# => -34,    --  INV RCL
      16#4B# => -35,    --  INV SST
      16#0C# => -41,    --  INV ENTER
      16#2C# => -42,    --  INV CHS
      16#3C# => -43,    --  INV EEX
      16#4C# => -44,    --  INV ←
      16#0D# => -51,    --  INV -
      16#1D# => -52,    --  INV 7
      16#2D# => -53,    --  INV 8
      16#3D# => -54,    --  INV 9
      16#0E# => -61,    --  INV +
      16#1E# => -62,    --  INV 4
      16#2E# => -63,    --  INV 5
      16#3E# => -64,    --  INV 6
      16#0F# => -71,    --  INV ×
      16#1F# => -72,    --  INV 1
      16#2F# => -73,    --  INV 2
      16#3F# => -74,    --  INV 3
      16#10# => -81,    --  INV ÷
      16#20# => -82,    --  INV 0
      16#30# => -83,    --  INV .
      16#40# => -84,    --  INV R/S
      others => 0];

Interestingly the SwissMicros website has a bug here as well. hp41cx-prog-handbook.pdf has the correct mappings.

Now, lets see how to send an E-Mail.