The Museum of HP Calculators


Initialize and Random Number Common Routines for the HP-41C/CV/CX

This program is Copyright © HP and is used here by permission. It was originally printed in the Games Pac. This program was uploaded by Chris Johnson.

This program is supplied without representation or warranty of any kind. Chris Johnson, Hewlett Packard and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.

Documentation Information (CD or source code)
How to get this Program to your Calculator (via HP-IL, disk, wand, and fingers)
Download Binary (.raw) program for disk or PC HP-IL Card download
Download Hexadecimal (.dat) program for Serial Port download

Program Listing

LINE  KEYS
 01 LBL "INI"
 02 SF 21
 03 DEG
 04 "SEED ?"
 05 PROMPT
 06 SIN
 07 ABS
 08 RTN
 09 LBL "RNDM"
 10 RCL 00
 11 9821
 12 *
 13 .211327
 14 +
 15 FRC
 16 STO 00
 17 RTN
 18 LBL "RNDMW"
 19 XEQ "RNDM"
 20 *
 21 INT
 22 RTN
 23 LBL "SIZE?"
 24 FIX 00
 25 "SIZE>="
 26 ARCL X
 27 1
 28 -
 29 SF 25
 30 RCL IND X
 31 RTN
 32 LBL "P"
 33 CF 21
 34 FS? 55
 35 SF 21
 36 AVIEW
 37 FC? 55
 38 PSE
 39 PSE
 40 RTN
 41 LBL "BOOM"
 42 TONE 05
 43 TONE 05
 44 TONE 05
 45 TONE 04
 46 RTN
 47 END

Go back to the HP-41 software library
Go back to the general software library
Go back to the main exhibit hall