Modify HP48SX program.



#2

Hello everybody,

I wrote this "NUM LOCK" program (HP48SX), I wonder if someone can modify it by using local variable so it works faster (the sequence is 1 2 3 4).

%%HP: T(1)A(D)F(.); « " Enter the password" CLLCD 1 DISP 0 'A' STO 0 'B' STO 0 'C' STO 0 'D' STO 82 'E' STO 83 'F' STO 84 'G' STO 72 'H' STO WHILE 1 1 ==

REPEAT

DO UNTIL KEY END

'Z' STO

0 'N' STO

'B' RCL 'A' STO

'C' RCL 'B' STO

'D' RCL 'C' STO

'Z' RCL 'D' STO

IF 'A' RCL 'E' RCL ==

THEN

'N' INCR

END

IF 'B' RCL 'F' RCL ==

THEN

'N' INCR

END

IF 'C' RCL 'G' RCL ==

THEN

'N' INCR

END

IF 'D' RCL'H' RCL ==

THEN

'N' INCR

END

IF 'N' RCL 4 ==

THEN

" GOOD" CLLCD 3 DISP 1 WAIT

" Enter the password" CLLCD 1 DISP

END END »

Thank you in advance. Best regards, Tal email: td@chem.ch.huji.ac.il



Possibly Related Threads...
Thread Author Replies Views Last Post
  HP Prime: run a program in another program Davi Ribeiro de Oliveira 6 1,348 11-11-2013, 08:28 PM
Last Post: Davi Ribeiro de Oliveira
  HP41 emulator for HP48sx - keyboard overlay needed Doug (NYC) 3 878 12-31-2012, 03:11 PM
Last Post: Allen
  HP48SX seems fully functional won't run SELF TESTS? Bruce Larrabee 5 1,114 07-16-2012, 11:04 PM
Last Post: Luiz C. Vieira (Brazil)
  Did We Miss The 20th Anniv. of the HP48SX? Jake Schwartz 6 1,002 03-19-2010, 05:55 AM
Last Post: Bill Zimmerly
  HP48SX accuracy questioned. Pal G. 3 804 09-10-2009, 09:01 PM
Last Post: hugh steers
  HP48SX LCD problem... Geoff Quickfall 4 849 08-16-2009, 04:35 PM
Last Post: NACHO
  Kermit K95 ver 2.1.3 GUI and the hp48sx Mike Reed 6 1,051 01-28-2008, 11:37 PM
Last Post: Mike Reed
  HP-41 MCODE: Making an MCODE program call another MCODE program Geir Isene 10 1,629 01-13-2008, 05:58 AM
Last Post: Raymond Del Tondo
  HP48SX case removal Ryan 1 402 07-19-2006, 03:58 PM
Last Post: Han
  HP48SX with black LCD (photos inside) Han 3 728 06-02-2006, 04:02 AM
Last Post: Han

Forum Jump: