_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

HP-41C SIMULATOR

FILE INFORMATION

FILENAME(S): HP-41C SIMULATOR

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-12-02 23:21:30

APPEARS ON: 1 disk(s)

FILE HASH

d13eadd8dbb146dc31a42b3036a84399dec1da5fcaf10f77ab95a725e82dcd59

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LK HP-41C SIMULATOR PRG swasti, dinkel 22 8 ⚠ CORRUPT
DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1F 08 64 00 9F 31  35 2C 38 2C 31 35 3A 89  |....d..15,8,15:.|
00000010: 35 33 30 3A 8F 20 4B 41  4C 54 53 54 41 52 54 00  |530:. KALTSTART.|
00000020: 48 08 6E 00 8D 35 35 38  30 3A 89 34 35 31 30 3A  |H.n..5580:.4510:|
00000030: 8F 20 57 41 52 4D 53 54  41 52 54 20 28 45 52 52  |. WARMSTART (ERR|
00000040: 4F 52 20 54 52 41 50 29  00 6D 08 78 00 8F 20 2A  |OR TRAP).m.x.. *|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 00 92 08  |*************...|
00000070: 82 00 8F 20 2A 20 20 20  20 20 48 50 2D 34 31 43  |... *     HP-41C|
00000080: 20 53 55 42 52 4F 55 54  49 4E 45 4E 20 20 20 20  | SUBROUTINEN    |
00000090: 20 2A 00 B7 08 8C 00 8F  22 2A A3 A3 A3 A3 A3 A3  | *......"*......|
000000A0: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
000000B0: A3 A3 A3 A3 A3 A3 2A 00  DC 08 96 00 8F 20 2A 20  |......*...... * |
000000C0: 47 4C 4F 42 41 4C 45 20  56 41 52 49 41 42 4C 45  |GLOBALE VARIABLE|
000000D0: 4E 3A 20 20 20 20 20 20  20 20 20 2A 00 01 09 A0  |N:         *....|
000000E0: 00 8F 22 2A 20 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |.."* ...........|
000000F0: A3 A3 A3 A3 A3 A3 A3 20  20 20 20 20 20 20 20 20  |.......         |
00000100: 2A 00 26 09 AA 00 8F 20  2A 20 20 20 20 20 58 20  |*.&.... *     X |
00000110: 20 20 20 3D 20 20 58 2D  52 45 47 49 53 54 45 52  |   =  X-REGISTER|
00000120: 20 20 20 20 20 2A 00 4B  09 B4 00 8F 20 2A 20 20  |     *.K.... *  |
00000130: 20 20 20 59 20 20 20 20  3D 20 20 59 2D 52 45 47  |   Y    =  Y-REG|
00000140: 49 53 54 45 52 20 20 20  20 20 2A 00 70 09 BE 00  |ISTER     *.p...|
00000150: 8F 20 2A 20 20 20 20 20  5A 20 20 20 20 3D 20 20  |. *     Z    =  |
00000160: 5A 2D 52 45 47 49 53 54  45 52 20 20 20 20 20 2A  |Z-REGISTER     *|
00000170: 00 95 09 C8 00 8F 20 2A  20 20 20 20 20 54 20 20  |...... *     T  |
00000180: 20 20 3D 20 20 54 2D 52  45 47 49 53 54 45 52 20  |  =  T-REGISTER |
00000190: 20 20 20 20 2A 00 BA 09  D2 00 8F 20 2A 20 20 20  |    *...... *   |
000001A0: 20 4C 58 20 20 20 20 3D  20 20 4C 41 53 54 20 58  | LX    =  LAST X|
000001B0: 2D 52 45 47 49 53 54 45  52 2A 00 DF 09 DC 00 8F  |-REGISTER*......|
000001C0: 20 2A 20 20 20 20 44 41  20 28 58 29 3D 20 20 44  | *    DA (X)=  D|
000001D0: 41 54 45 4E 52 45 47 49  53 54 45 52 20 20 2A 00  |ATENREGISTER  *.|
000001E0: 04 0A E6 00 8F 20 2A 20  20 4C 42 25 28 58 2C 59  |..... *  LB%(X,Y|
000001F0: 29 3D 20 20 4C 41 42 45  4C 53 50 45 49 43 48 45  |)=  LABELSPEICHE|
00000200: 52 20 20 2A 00 29 0A F0  00 8F 20 2A 20 20 20 20  |R  *.).... *    |
00000210: 42 45 25 28 58 29 3D 20  20 50 52 47 2E 20 53 50  |BE%(X)=  PRG. SP|
00000220: 45 49 43 48 45 52 20 20  2A 00 4E 0A FA 00 8F 20  |EICHER  *.N.... |
00000230: 2A 20 20 20 20 41 52 20  28 58 29 3D 20 20 41 52  |*    AR (X)=  AR|
00000240: 47 55 4D 45 4E 54 45 20  20 20 20 20 20 2A 00 73  |GUMENTE      *.s|
00000250: 0A 04 01 8F 20 2A 20 20  20 20 50 43 20 20 20 20  |.... *    PC    |
00000260: 3D 20 20 50 52 47 2E 20  5A 41 45 48 4C 45 52 20  |=  PRG. ZAEHLER |
00000270: 20 20 2A 00 98 0A 0E 01  8F 20 2A 20 20 20 20 53  |  *...... *    S|
00000280: 54 25 28 58 29 3D 20 20  58 45 51 20 53 54 41 43  |T%(X)=  XEQ STAC|
00000290: 4B 20 20 20 20 20 20 2A  00 BD 0A 18 01 8F 20 2A  |K      *...... *|
000002A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000002B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 00 C3 0A  |*************...|
000002C0: 22 01 3A 00 E8 0A 2C 01  8F 20 2A 2A 2A 2A 2A 2A  |".:...,.. ******|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A  00 0D 0B 36 01 8F 20 2A  |********...6.. *|
000002F0: 20 20 20 20 20 20 42 45  46 45 48 4C 45 20 49 4E  |      BEFEHLE IN|
00000300: 20 44 41 54 41 20 20 20  20 20 20 20 2A 00 32 0B  | DATA       *.2.|
00000310: 40 01 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |@.. ************|
00000320: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000330: 2A 2A 00 38 0B 4A 01 3A  00 3E 0B 54 01 3A 00 73  |**.8.J.:.>.T.:.s|
00000340: 0B 5E 01 83 20 45 4E 44  20 52 45 47 20 32 31 39  |.^.. END REG 219|
00000350: 2C 2C 41 42 53 2C 2C 41  44 56 2C 2C 41 4F 4E 2C  |,,ABS,,ADV,,AON,|
00000360: 2C 41 4F 46 46 2C 2C 41  52 43 4C 2C 32 2C 41 53  |,AOFF,,ARCL,2,AS|
00000370: 48 46 2C 00 9E 0B 68 01  83 20 41 53 4E 2C 2C 41  |HF,...h.. ASN,,A|
00000380: 53 54 4F 2C 32 2C 41 56  49 45 57 2C 32 2C 42 45  |STO,2,AVIEW,2,BE|
00000390: 45 50 2C 2C 43 41 54 2C  31 2C 43 46 2C 32 00 C3  |EP,,CAT,1,CF,2..|
000003A0: 0B 72 01 83 20 43 48 53  2C 2C 43 4C 41 2C 2C 43  |.r.. CHS,,CLA,,C|
000003B0: 4C 44 2C 2C 43 4C 58 2C  2C 43 4C 50 2C 2C 43 4C  |LD,,CLX,,CLP,,CL|
000003C0: 52 47 2C 00 E9 0B 7C 01  83 20 43 4C 53 54 2C 2C  |RG,...|.. CLST,,|
000003D0: 44 45 47 2C 2C 44 2D 52  2C 2C 44 53 45 2C 32 2C  |DEG,,D-R,,DSE,2,|
000003E0: 45 5E 58 2C 2C 45 4E 44  2C 00 10 0C 86 01 83 20  |E^X,,END,...... |
000003F0: 45 4E 54 45 52 5E 2C 2C  46 41 43 54 2C 2C 46 43  |ENTER^,,FACT,,FC|
00000400: 3F 2C 32 2C 46 43 3F 43  2C 32 2C 46 49 58 2C 31  |?,2,FC?C,2,FIX,1|
00000410: 00 2E 0C 90 01 83 20 46  52 43 2C 2C 46 53 3F 2C  |...... FRC,,FS?,|
00000420: 32 2C 46 53 3F 43 2C 32  2C 47 54 4F 2C 32 00 54  |2,FS?C,2,GTO,2.T|
00000430: 0C 9A 01 83 20 49 4E 54  2C 2C 49 53 47 2C 32 2C  |.... INT,,ISG,2,|
00000440: 4C 42 4C 2C 32 2C 4C 4E  2C 2C 4D 45 41 4E 2C 2C  |LBL,2,LN,,MEAN,,|
00000450: 4D 4F 44 2C 00 79 0C A4  01 83 20 50 2D 52 2C 2C  |MOD,.y.... P-R,,|
00000460: 50 52 4F 4D 50 54 2C 2C  50 53 45 2C 2C 25 2C 2C  |PROMPT,,PSE,,%,,|
00000470: 25 43 48 2C 2C 52 41 44  2C 00 A2 0C AE 01 83 20  |%CH,,RAD,...... |
00000480: 52 43 4C 2C 32 2C 52 2D  44 2C 2C 52 5E 2C 2C 52  |RCL,2,R-D,,R^,,R|
00000490: 44 4E 2C 2C 52 4E 44 2C  2C 52 2D 50 2C 2C 52 54  |DN,,RND,,R-P,,RT|
000004A0: 4E 2C 00 C5 0C B8 01 83  20 53 44 45 56 2C 2C 53  |N,...... SDEV,,S|
000004B0: 46 2C 32 2C 53 49 47 4E  2C 2C 53 51 52 54 2C 2C  |F,2,SIGN,,SQRT,,|
000004C0: 53 54 4F 2C 32 00 E3 0C  C2 01 83 20 53 54 2B 2C  |STO,2...... ST+,|
000004D0: 32 2C 53 54 2D 2C 32 2C  53 54 2A 2C 32 2C 53 54  |2,ST-,2,ST*,2,ST|
000004E0: 2F 2C 32 00 09 0D CC 01  83 20 53 54 4F 50 2C 2C  |/,2...... STOP,,|
000004F0: 54 4F 4E 45 2C 31 2C 56  49 45 57 2C 32 2C 58 3C  |TONE,1,VIEW,2,X<|
00000500: 3E 59 2C 2C 58 3C 3E 2C  31 00 2E 0D D6 01 83 20  |>Y,,X<>,1...... |
00000510: 58 3D 59 3F 2C 2C 58 3E  30 3F 2C 2C 58 3C 59 3F  |X=Y?,,X>0?,,X<Y?|
00000520: 2C 2C 58 3C 30 3F 2C 2C  58 3C 3D 59 3F 2C 00 4F  |,,X<0?,,X<=Y?,.O|
00000530: 0D E0 01 83 20 58 3C 3D  30 3F 2C 2C 58 3C 3E 59  |.... X<=0?,,X<>Y|
00000540: 3F 2C 2C 58 3C 3E 30 3F  2C 2C 58 45 51 2C 32 00  |?,,X<>0?,,XEQ,2.|
00000550: 6D 0D EA 01 83 20 4E 53  51 52 54 2C 2C 59 5E 58  |m.... NSQRT,,Y^X|
00000560: 2C 2C 2B 2C 2C 2D 2C 2C  2A 2C 2C 2F 2C 00 92 0D  |,,+,,-,,*,,/,...|
00000570: F4 01 83 20 31 2F 58 2C  2C 58 5E 32 2C 2C 4C 4F  |... 1/X,,X^2,,LO|
00000580: 47 2C 2C 31 30 5E 58 2C  2C 53 49 4E 2C 2C 43 4F  |G,,10^X,,SIN,,CO|
00000590: 53 2C 00 B6 0D FE 01 83  20 54 41 4E 2C 2C 41 54  |S,...... TAN,,AT|
000005A0: 41 4E 2C 2C 41 53 49 4E  2C 2C 41 43 4F 53 2C 2C  |AN,,ASIN,,ACOS,,|
000005B0: 4C 41 53 54 58 2C 00 BC  0D 08 02 3A 00 E1 0D 12  |LASTX,.....:....|
000005C0: 02 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.. *************|
000005D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000005E0: 2A 00 06 0E 1C 02 8F 20  2A 20 20 20 20 20 20 53  |*...... *      S|
000005F0: 54 52 49 4E FF FF 0D 4D  C8 AD BC AF B9 EC D9 9C  |TRIN...M........|
00000600: B9 D9 9D BA 80 80 80 80  80 80 18 80 1C 1A 09 08  |................|
00000610: FF 80 10 10 10 10 10 10  10 10 10 10 10 10 10 10  |................|
00000620: 10 10 10 10 10 10 10 10  10 10 10 10 10 10 10 18  |................|
00000630: 80 CC 1A C8 00 58 88 B9  1A 58 08 9D BA 8B 40 01  |.....X...X....@.|
00000640: 14 00 80 80 80 80 80 58  FF 88 FF D0 16 08 9D B9  |.......X........|
00000650: D9 9E 08 80 DC 19 99 08  DD BA 8B 40 01 8A 00 80  |...........@....|
00000660: 80 80 80 80 58 FF 88 DD  B9 D9 9D E8 EC D9 E8 9D  |....X...........|
00000670: FF AC FF DD B9 AD 81 FF  19 B9 08 FF 8B 40 00 C0  |.............@..|
00000680: C0 C0 00 80 80 80 58 FF  88 A9 AF E8 BF 9C DA 88  |......X.........|
00000690: B9 DD 9F 9F 9D B9 81 18  19 FF 08 AC E0 8B 48 6E  |..............Hn|
000006A0: FF C4 44 FF 58 FF 80 08  E8 9D D9 DD E8 BA 08 88  |..D.X...........|
000006B0: 6F 1A A8 08 9D E0 8B 40  08 AD AF D9 A6 80 C4 C4  |o......@........|
000006C0: C0 50 01 18 AC E0 8A 58  FF 88 9D E8 E8 AF E0 88  |.P.....X........|
000006D0: D9 E8 9C D8 80 6C 1A 9F  08 9C 96 8B 40 08 BF 9D  |.....l......@...|
000006E0: BF AF E8 FF 88 9F AF EC  DA 00 58 FF 88 9D FF B9  |..........X.....|
000006F0: EC AC                                             |..              |
....D..15,8,15:.530:. KALTSTART.H.N..558
0:.4510:. WARMSTART (ERROR TRAP).M.X.. *
*****************************...... *   
  HP-41C SUBROUTINEN     *......"*......
......................*...... * GLOBALE 
VARIABLEN:         *... .."* ...........
.......         *.&.... *     X    =  X-
REGISTER     *.K.... *     Y    =  Y-REG
ISTER     *.P.... *     Z    =  Z-REGIST
ER     *...H.. *     T    =  T-REGISTER 
    *...R.. *    LX    =  LAST X-REGISTE
R*...... *    DA (X)=  DATENREGISTER  *.
..... *  LB%(X,Y)=  LABELSPEICHER  *.)..
.. *    BE%(X)=  PRG. SPEICHER  *.N.... 
*    AR (X)=  ARGUMENTE      *.S.... *  
  PC    =  PRG. ZAEHLER   *...... *    S
T%(X)=  XEQ STACK      *...... *********
*********************.C.".:...,.. ******
************************...6.. *      BE
FEHLE IN DATA       *.2.@.. ************
******************.8.J.:.>.T.:.S.^.. END
 REG 219,,ABS,,ADV,,AON,,AOFF,,ARCL,2,AS
HF,...H.. ASN,,ASTO,2,AVIEW,2,BEEP,,CAT,
1,CF,2.C.R.. CHS,,CLA,,CLD,,CLX,,CLP,,CL
RG,...|.. CLST,,DEG,,D-R,,DSE,2,E^X,,END
,...... ENTER^,,FACT,,FC?,2,FC?C,2,FIX,1
...... FRC,,FS?,2,FS?C,2,GTO,2.T.... INT
,,ISG,2,LBL,2,LN,,MEAN,,MOD,.Y.... P-R,,
PROMPT,,PSE,,%,,%CH,,RAD,...... RCL,2,R-
D,,R^,,RDN,,RND,,R-P,,RTN,.E.... SDEV,,S
F,2,SIGN,,SQRT,,STO,2...B.. ST+,2,ST-,2,
ST*,2,ST/,2...L.. STOP,,TONE,1,VIEW,2,X<
>Y,,X<>,1...V.. X=Y?,,X>0?,,X<Y?,,X<0?,,
X<=Y?,.O.... X<=0?,,X<>Y?,,X<>0?,,XEQ,2.
M.... NSQRT,,Y^X,,+,,-,,*,,/,...... 1/X,
,X^2,,LOG,,10^X,,SIN,,COS,...... TAN,,AT
AN,,ASIN,,ACOS,,LASTX,.....:...... *****
*************************...... *      S
TRIN...MH.....Y..Y......................
.........................L.H.X...X....@.
.......X...P....Y..........@........X...
.Y...Y...............@........X.......Z.
..............HN.DD.X.....Y.....O......@
...Y..DD.P.....X........Y..X.L......@...
........Z.X.......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL