(HP50g) HpPascal and contrast of the screen

[Gilles59]

(10-27-2017 05:53 PM)DavidM Wrote:  Based on the code samples, the following may do what you need. I would recommend trying this on an emulated system first, of course:

Code:

function GetContrast: byte;
begin
   asm
      LC(5) #101
      D1=C
      A=DAT1 B
      LC(2) #1F
      A=A&C B
      C=R1 A
      D1=C
      DAT1=A B
   end;
end;

I get an error at compilation phase : Unknown instruction in " A=A&C B "