F'X
FILE INFORMATION
FILENAME(S): F'X
FILE TYPE(S): PRG
FILE SIZE: 4.3K
FIRST SEEN: 2025-11-30 01:07:57
APPEARS ON: 2 disk(s)
FILE HASH
ce0456ee7440efbdde32c12f87d3e4e47ec4a079421679494c31305568ab2581
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | F'X | PRG | Treasure Chest - Wolfgang Rauprich | 32 | 7 | DOWNLOAD FILE |
| L EHRNEN | F'X | PRG | Treasure Chest - Wolfgang Rauprich | 32 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3B 08 0A 00 8F 20 50 52 4F 47 52 41 4D 4D |..;.... PROGRAMM|
00000010: 20 41 42 4C 45 49 54 55 4E 47 20 28 20 45 49 4E | ABLEITUNG ( EIN|
00000020: 47 41 42 45 3A 46 28 58 29 20 2C 20 41 55 53 47 |GABE:F(X) , AUSG|
00000030: 41 42 45 3A 46 27 28 58 29 20 29 00 60 08 14 00 |ABE:F'(X) ).`...|
00000040: 8F 20 28 43 29 20 36 2E 32 2E 31 39 38 32 20 42 |. (C) 6.2.1982 B|
00000050: 59 20 54 48 4F 4D 41 53 20 47 41 57 4C 49 43 4B |Y THOMAS GAWLICK|
00000060: 00 77 08 1E 00 8F 20 56 45 52 53 49 4F 4E 20 38 |.w.... VERSION 8|
00000070: 2E 32 2E 31 39 38 32 00 8D 08 1F 00 97 35 33 32 |.2.1982......532|
00000080: 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 C1 08 |80,0:.53281,0...|
00000090: 20 00 99 22 93 9A 12 20 20 20 20 20 20 20 20 44 | .."... D|
000000A0: 49 46 46 45 52 45 4E 54 49 41 54 49 4F 4E 53 50 |IFFERENTIATIONSP|
000000B0: 52 4F 47 52 41 4D 4D 20 20 20 20 20 20 20 20 9E |ROGRAMM .|
000000C0: 22 00 E8 08 23 00 85 22 44 52 55 43 4B 45 52 20 |"...#.."DRUCKER |
000000D0: 20 20 4E 9D 9D 9D 22 3B 41 24 3A 9F 34 2C 34 AA | N...";A$:.4,4.|
000000E0: 28 41 24 B2 22 4E 22 29 00 12 09 28 00 4D B2 31 |(A$."N")...(.M.1|
000000F0: 36 3A 8F 20 48 4F 45 43 48 53 54 45 20 56 45 52 |6:. HOECHSTE VER|
00000100: 53 43 48 41 43 48 54 45 4C 55 4E 47 53 54 49 45 |SCHACHTELUNGSTIE|
00000110: 46 45 00 48 09 32 00 86 46 24 28 4D 29 2C 46 53 |FE.H.2..F$(M),FS|
00000120: 24 28 4D 29 2C 46 55 24 28 4D 29 2C 46 56 24 28 |$(M),FU$(M),FV$(|
00000130: 4D 29 2C 46 31 24 28 4D 29 2C 4F 28 4D 29 3A 5A |M),F1$(M),O(M):Z|
00000140: 24 B2 22 2B 2D 2A 2F 5E 00 66 09 33 00 87 46 5A |$."+-*/^.f.3..FZ|
00000150: 3A 86 58 24 28 46 5A 29 2C 58 53 24 28 46 5A 29 |:.X$(FZ),XS$(FZ)|
00000160: 2C 4C 28 46 5A 29 00 72 09 34 00 81 49 B2 31 A4 |,L(FZ).r.4..I.1.|
00000170: 46 5A 00 84 09 35 00 87 58 24 28 49 29 2C 58 53 |FZ...5..X$(I),XS|
00000180: 24 28 49 29 00 96 09 36 00 4C 28 49 29 B2 C3 28 |$(I)...6.L(I)..(|
00000190: 58 24 28 49 29 29 00 9C 09 37 00 82 00 A4 09 3C |X$(I))...7.....<|
000001A0: 00 5A B2 30 00 BB 09 41 00 99 22 11 47 49 42 20 |.Z.0...A..".GIB |
000001B0: 46 28 58 29 20 45 49 4E 20 3A 11 00 C6 09 46 00 |F(X) EIN :....F.|
000001C0: 85 46 24 28 30 29 00 CF 09 50 00 8D 31 37 30 00 |.F$(0)...P..170.|
000001D0: E4 09 5A 00 98 34 2C 22 46 28 58 29 20 3D 22 46 |..Z..4,"F(X) ="F|
000001E0: 24 28 30 29 00 FA 09 5F 00 98 34 2C 22 46 27 28 |$(0)..._..4,"F'(|
000001F0: 58 29 3D 22 46 53 24 28 30 29 00 05 0A 64 00 98 |X)="FS$(0)...d..|
00000200: 34 3A 89 36 30 00 24 0A 6E 00 8F 20 41 42 4C 45 |4:.60.$.n.. ABLE|
00000210: 49 54 55 4E 47 53 2D 55 4E 54 45 52 50 52 4F 47 |ITUNGS-UNTERPROG|
00000220: 52 41 4D 4D 00 4C 0A 78 00 8F 20 45 49 4E 47 41 |RAMM.L.x.. EINGA|
00000230: 42 45 20 3A 20 5A 20 56 45 52 53 43 48 41 43 48 |BE : Z VERSCHACH|
00000240: 54 45 4C 55 4E 47 53 54 49 45 46 45 00 61 0A 82 |TELUNGSTIEFE.a..|
00000250: 00 8F 20 46 24 28 5A 29 20 46 55 4E 4B 54 49 4F |.. F$(Z) FUNKTIO|
00000260: 4E 00 78 0A 8C 00 8F 20 46 53 24 28 5A 29 20 41 |N.x.... FS$(Z) A|
00000270: 42 4C 45 49 54 55 4E 47 00 7E 0A 96 00 8F 00 8B |BLEITUNG.~......|
00000280: 0A AA 00 46 24 B2 46 24 28 5A 29 00 9B 0A B4 00 |...F$.F$(Z).....|
00000290: 53 24 B2 46 24 3A 8D 32 30 31 30 00 D7 0A C8 00 |S$.F$:.2010.....|
000002A0: 8B 50 B2 31 B0 50 B2 4C A7 31 30 30 30 3A 8F 20 |.P.1.P.L.1000:. |
000002B0: 5A 45 49 43 48 45 4E 20 41 4D 20 41 4E 46 41 4E |ZEICHEN AM ANFAN|
000002C0: 47 20 42 5A 57 2E 20 45 4E 44 45 20 55 4E 5A 55 |G BZW. ENDE UNZU|
000002D0: 4C 41 45 53 53 49 47 00 E4 0A 04 01 8B 50 B2 30 |LAESSIG......P.0|
000002E0: A7 37 30 30 00 05 0B 18 01 8F 20 46 3D 55 23 56 |.700...... F=U#V|
000002F0: 20 2C 20 42 45 52 45 43 48 4E 45 20 55 27 20 55 | , BERECHNE U' U|
00000300: 4E 44 20 56 27 00 32 0B 22 01 4F 28 5A 29 B2 4F |ND V'.2.".O(Z).O|
00000310: 3A 46 55 24 28 5A 29 B2 C8 28 46 24 2C 50 AB 31 |:FU$(Z)..(F$,P.1|
00000320: 29 3A 46 56 24 28 5A 29 B2 CA 28 46 24 2C 50 AA |):FV$(Z)..(F$,P.|
00000330: 31 29 00 60 0B 2C 01 5A B2 5A AA 31 3A 46 24 28 |1).`.,.Z.Z.1:F$(|
00000340: 5A 29 B2 46 55 24 28 5A AB 31 29 3A 8D 31 37 30 |Z).FU$(Z.1):.170|
00000350: 3A 46 31 24 28 5A AB 31 29 B2 46 53 24 28 5A 29 |:F1$(Z.1).FS$(Z)|
00000360: 00 7E 0B 36 01 46 24 28 5A 29 B2 46 56 24 28 5A |.~.6.F$(Z).FV$(Z|
00000370: AB 31 29 3A 8D 31 37 30 3A 5A B2 5A AB 31 00 B7 |.1):.170:Z.Z.1..|
00000380: 0B 40 01 46 55 24 B2 46 55 24 28 5A 29 3A 46 56 |.@.FU$.FU$(Z):FV|
00000390: 24 B2 46 56 24 28 5A 29 3A 46 31 24 B2 46 31 24 |$.FV$(Z):F1$.F1$|
000003A0: 28 5A 29 3A 46 32 24 B2 46 53 24 28 5A AA 31 29 |(Z):F2$.FS$(Z.1)|
000003B0: 3A 4F B2 4F 28 5A 29 00 D2 0B 4A 01 91 4F 89 33 |:O.O(Z)...J..O.3|
000003C0: 35 30 2C 33 35 30 2C 34 30 30 2C 34 30 30 2C 35 |50,350,400,400,5|
000003D0: 34 30 00 02 0C 54 01 8F 20 46 3D 55 2B 56 20 42 |40...T.. F=U+V B|
000003E0: 5A 57 2E 20 46 3D 55 2D 56 20 2C 20 46 27 3D 55 |ZW. F=U-V , F'=U|
000003F0: 27 2B 56 27 20 42 5A 57 2E 20 46 27 3D 55 27 2D |'+V' BZW. F'=U'-|
00000400: 56 27 00 35 0C 5E 01 8B 46 31 24 B3 B1 22 30 22 |V'.5.^..F1$.."0"|
00000410: A7 8B 46 32 24 B3 B1 22 30 22 A7 46 53 24 28 5A |..F2$.."0".FS$(Z|
00000420: 29 B2 46 31 24 AA CA 28 5A 24 2C 4F 2C 31 29 AA |).F1$..(Z$,O,1).|
00000430: 46 32 24 3A 8E 00 50 0C 68 01 8B 46 31 24 B3 B1 |F2$:..P.h..F1$..|
00000440: 22 30 22 A7 46 53 24 28 5A 29 B2 46 31 24 3A 8E |"0".FS$(Z).F1$:.|
00000450: 00 77 0C 72 01 8B 46 32 24 B3 B1 22 30 22 A7 46 |.w.r..F2$.."0".F|
00000460: 53 24 28 5A 29 B2 CA 28 5A 24 2C 32 2C 4F AB 31 |S$(Z)..(Z$,2,O.1|
00000470: 29 AA 46 32 24 3A 8E 00 88 0C 7C 01 46 53 24 28 |).F2$:....|.FS$(|
00000480: 5A 29 B2 22 30 22 3A 8E 00 C5 0C 86 01 8F 20 46 |Z)."0":....... F|
00000490: 3D 55 2A 56 20 42 5A 57 2E 46 3D 55 2F 56 20 2C |=U*V BZW.F=U/V ,|
000004A0: 20 46 27 3D 55 27 2A 56 2B 55 2A 56 27 20 42 5A | F'=U'*V+U*V' BZ|
000004B0: 57 2E 20 46 27 3D 28 55 27 2A 56 2D 55 2A 56 27 |W. F'=(U'*V-U*V'|
000004C0: 29 2F 56 5E 32 00 E3 0C 90 01 8B 46 31 24 B2 22 |)/V^2......F1$."|
000004D0: 30 22 A7 54 B2 30 3A 46 53 24 B2 46 31 24 3A 89 |0".T.0:FS$.F1$:.|
000004E0: 34 34 30 00 EB 0C 9A 01 54 B2 31 00 05 0D A4 01 |440.....T.1.....|
000004F0: 8B 46 31 24 B2 22 31 22 A7 46 53 24 B2 46 56 24 |.F1$."1".FS$.FV$|
00000500: 3A 89 34 34 30 00 2A 0D A9 01 53 24 B2 46 31 24 |:.440.*...S$.F1$|
00000510: 3A 8D 32 30 30 30 3A 8B 4F B3 33 A7 46 31 24 B2 |:.2000:.O.3.F1$.|
00000520: 22 28 22 AA 46 31 24 AA 22 29 00 57 0D AC 01 46 |"(".F1$.").W...F|
00000530: 46 24 B2 46 56 24 3A 53 24 B2 46 46 24 3A 8D 32 |F$.FV$:S$.FF$:.2|
00000540: 30 30 30 3A 8B 4F B3 33 A7 46 46 24 B2 22 28 22 |000:.O.3.FF$."("|
00000550: AA 46 46 24 AA 22 29 00 70 0D AE 01 46 53 24 B2 |.FF$.").p...FS$.|
00000560: 46 31 24 AA 22 2A 22 AA 46 46 24 3A 89 34 34 30 |F1$."*".FF$:.440|
00000570: 00 81 0D B8 01 8B 46 32 24 B2 22 30 22 A7 34 38 |......F2$."0".48|
00000580: 30 00 AE 0D BD 01 46 46 24 B2 46 31 24 3A 53 24 |0.....FF$.F1$:S$|
00000590: B2 46 31 24 3A 8D 32 30 30 30 3A 8B 4F B3 33 A7 |.F1$:.2000:.O.3.|
000005A0: 46 46 24 B2 22 28 22 AA 46 46 24 AA 22 29 00 E9 |FF$."(".FF$.")..|
000005B0: 0D C2 01 54 B2 54 AA 31 3A 46 53 24 B2 CA 28 46 |...T.T.1:FS$..(F|
000005C0: 53 24 2C 31 AB 28 54 B2 31 29 29 AA CA 28 5A 24 |S$,1.(T.1))..(Z$|
000005D0: 2C 4F 28 5A 29 AB 32 2C 31 AA 28 28 54 B2 31 29 |,O(Z).2,1.((T.1)|
000005E0: AF 4F 28 5A 29 B2 33 29 29 00 07 0E CC 01 8B 46 |.O(Z).3))......F|
000005F0: 32 24 B2 22 31 22 A7 46 53 24 B2 46 53 24 AA 46 |2$."1".FS$.FS$.F|
00000600: 55 24 3A 89 34 38 30 00 2C 0E D1 01 53 24 B2 46 |U$:.480.,...S$.F|
00000610: 55 24 3A 8D 32 30 30 30 3A 8B 4F B3 33 A7 46 55 |U$:.2000:.O.3.FU|
00000620: 24 B2 22 28 22 AA 46 55 24 AA 22 29 00 51 0E D6 |$."(".FU$.").Q..|
00000630: 01 53 24 B2 46 32 24 3A 8D 32 30 30 30 3A 8B 4F |.S$.F2$:.2000:.O|
00000640: B3 33 A7 46 32 24 B2 22 28 22 AA 46 32 24 AA 22 |.3.F2$."(".F2$."|
00000650: 29 00 69 0E DB 01 46 53 24 B2 46 53 24 AA 46 55 |).i...FS$.FS$.FU|
00000660: 24 AA 22 2A 22 AA 46 32 24 00 81 0E E0 01 8B 46 |$."*".F2$......F|
00000670: 53 24 B2 22 30 22 B0 4F 28 5A 29 B2 33 A7 35 31 |S$."0".O(Z).3.51|
00000680: 30 00 99 0E EA 01 8B 54 B2 32 A7 46 53 24 B2 22 |0......T.2.FS$."|
00000690: 28 22 AA 46 53 24 AA 22 29 00 BE 0E EF 01 53 24 |(".FS$.").....S$|
000006A0: B2 46 56 24 3A 8D 32 30 30 30 3A 8B 4F B3 33 A7 |.FV$:.2000:.O.3.|
000006B0: 46 56 24 B2 22 28 22 AA 46 56 24 AA 22 29 00 D6 |FV$."(".FV$.")..|
000006C0: 0E F4 01 46 53 24 B2 46 53 24 AA 22 2F 22 AA 46 |...FS$.FS$."/".F|
000006D0: 56 24 AA 22 5E 32 00 E5 0E FE 01 46 53 24 28 5A |V$."^2.....FS$(Z|
000006E0: 29 B2 46 53 24 00 EB 0E 08 02 8E 00 27 0F 12 02 |).FS$.......'...|
000006F0: 8F 20 46 3D 55 5E 56 20 2C 20 46 27 3D 56 2A 55 |. F=U^V , F'=V*U|
00000700: 27 2A 55 5E 28 56 2D 31 29 20 42 5A 57 2E 20 46 |'*U^(V-1) BZW. F|
00000710: 27 3D 55 5E 56 2A 28 55 27 2F 55 2A 56 2B 4C 4E |'=U^V*(U'/U*V+LN|
00000720: 28 55 29 2A 56 27 29 00 39 0F 1C 02 8B 46 32 24 |(U)*V').9....F2$|
00000730: B3 B1 22 30 22 A7 36 31 30 00 53 0F 26 02 8B 46 |.."0".610.S.&..F|
00000740: 31 24 B2 22 30 22 A7 46 53 24 28 5A 29 B2 46 31 |1$."0".FS$(Z).F1|
00000750: 24 3A 8E 00 6C 0F 30 02 8B 46 31 24 B2 22 31 22 |$:..l.0..F1$."1"|
00000760: A7 46 53 24 B2 22 22 3A 89 35 39 30 00 91 0F 3A |.FS$."":.590...:|
00000770: 02 53 24 B2 46 31 24 3A 8D 32 30 30 30 3A 8B 4F |.S$.F1$:.2000:.O|
00000780: B3 33 A7 46 31 24 B2 22 28 22 AA 46 31 24 AA 22 |.3.F1$."(".F1$."|
00000790: 29 00 A0 0F 44 02 46 53 24 B2 46 31 24 AA 22 2A |)...D.FS$.F1$."*|
000007A0: 00 BE 0F 4E 02 8B 46 56 24 B3 B1 22 31 22 A7 46 |...N..FV$.."1".F|
000007B0: 53 24 B2 46 56 24 AA 22 2A 22 AA 46 53 24 00 DD |S$.FV$."*".FS$..|
000007C0: 0F 53 02 8B C8 28 46 56 24 2C 31 29 B2 22 28 22 |.S...(FV$,1)."("|
000007D0: A7 46 56 24 B2 CA 28 46 56 24 2C 32 29 00 F1 0F |.FV$..(FV$,2)...|
000007E0: 54 02 46 32 24 B2 C4 28 C5 28 46 56 24 29 AB 31 |T.F2$..(.(FV$).1|
000007F0: 29 00 15 10 55 02 8B C8 28 46 32 24 2C 31 29 B2 |)...U...(F2$,1).|
00000800: 22 20 22 A7 46 32 24 B2 CA 28 46 32 24 2C 32 29 |" ".F2$..(F2$,2)|
00000810: 3A 89 35 39 39 00 28 10 56 02 46 32 24 B2 22 28 |:.599.(.V.F2$."(|
00000820: 22 AA 46 32 24 AA 22 29 00 46 10 57 02 8B 46 32 |".F2$.").F.W..F2|
00000830: 24 B2 22 31 22 A7 46 53 24 28 5A 29 B2 46 53 24 |$."1".FS$(Z).FS$|
00000840: AA 46 55 24 3A 8E 00 64 10 58 02 8B 46 32 24 B2 |.FU$:..d.X..F2$.|
00000850: 22 30 22 A7 46 53 24 28 5A 29 B2 46 53 24 AA 22 |"0".FS$(Z).FS$."|
00000860: 31 22 3A 8E 00 81 10 5D 02 46 53 24 28 5A 29 B2 |1":....].FS$(Z).|
00000870: 46 53 24 AA 46 55 24 AA 22 5E 22 AA 46 32 24 3A |FS$.FU$."^".F2$:|
00000880: 8E 00 8D 10 62 02 46 46 24 B2 46 55 24 00 B2 10 |....b.FF$.FU$...|
00000890: 6C 02 53 24 B2 46 46 24 3A 8D 32 30 30 30 3A 8B |l.S$.FF$:.2000:.|
000008A0: 4F B3 33 A7 46 46 24 B2 22 28 22 AA 46 46 24 AA |O.3.FF$."(".FF$.|
000008B0: 22 29 00 D7 10 76 02 53 24 B2 46 31 24 3A 8D 32 |")...v.S$.F1$:.2|
000008C0: 30 30 30 3A 8B 4F B3 33 A7 46 31 24 B2 22 28 22 |000:.O.3.F1$."("|
000008D0: AA 46 31 24 AA 22 29 00 FC 10 80 02 53 24 B2 46 |.F1$.").....S$.F|
000008E0: 56 24 3A 8D 32 30 30 30 3A 8B 4F B3 33 A7 46 56 |V$:.2000:.O.3.FV|
000008F0: 24 B2 22 28 22 AA 46 56 24 AA 22 29 00 21 11 8A |$."(".FV$.").!..|
00000900: 02 53 24 B2 46 32 24 3A 8D 32 30 30 30 3A 8B 4F |.S$.F2$:.2000:.O|
00000910: B3 33 A7 46 32 24 B2 22 28 22 AA 46 32 24 AA 22 |.3.F2$."(".F2$."|
00000920: 29 00 5D 11 94 02 46 53 24 B2 46 24 28 5A 29 AA |).]...FS$.F$(Z).|
00000930: 22 2A 28 22 3A 8B 46 31 24 B3 B1 22 30 22 A7 46 |"*(":.F1$.."0".F|
00000940: 53 24 B2 46 53 24 AA 46 31 24 AA 22 2F 22 AA 46 |S$.FS$.F1$."/".F|
00000950: 46 24 AA 22 2A 22 AA 46 56 24 AA 22 2B 00 76 11 |F$."*".FV$."+.v.|
00000960: 99 02 46 53 24 B2 46 53 24 AA 22 4C 4E 28 22 AA |..FS$.FS$."LN(".|
00000970: 46 55 24 AA 22 29 00 94 11 9E 02 8B 46 32 24 B2 |FU$.")......F2$.|
00000980: 22 31 22 A7 46 53 24 28 5A 29 B2 46 53 24 AA 22 |"1".FS$(Z).FS$."|
00000990: 29 22 3A 8E 00 B1 11 A8 02 46 53 24 28 5A 29 B2 |)":......FS$(Z).|
000009A0: 46 53 24 AA 22 2A 22 AA 46 32 24 AA 22 29 22 3A |FS$."*".F2$.")":|
000009B0: 8E 00 D5 11 B2 02 8F 20 46 3D 46 28 55 29 20 2C |....... F=F(U) ,|
000009C0: 20 53 55 43 48 45 20 46 55 4E 4B 54 49 4F 4E 53 | SUCHE FUNKTIONS|
000009D0: 4E 41 4D 45 4E 00 E1 11 BC 02 81 49 B2 31 A4 46 |NAMEN......I.1.F|
000009E0: 5A 00 FF 11 C6 02 8B C8 28 46 24 2C 4C 28 49 29 |Z.......(F$,L(I)|
000009F0: 29 B3 B1 58 24 28 49 29 A7 82 3A 89 39 31 30 00 |)..X$(I)..:.910.|
00000A00: 22 12 D0 02 49 49 B2 49 3A 49 B2 46 5A 3A 82 3A |"...II.I:I.FZ:.:|
00000A10: 8B C9 28 46 24 2C 31 29 B3 B1 22 29 22 A7 31 30 |..(F$,1)..")".10|
00000A20: 30 30 00 34 12 DA 02 8F 20 42 45 52 45 43 48 4E |00.4.... BERECHN|
00000A30: 45 20 55 27 00 40 12 DF 02 4F 28 5A 29 B2 49 49 |E U'.@...O(Z).II|
00000A40: 00 73 12 E4 02 5A B2 5A AA 31 3A 46 24 28 5A 29 |.s...Z.Z.1:F$(Z)|
00000A50: B2 CA 28 46 24 2C 4C 28 49 49 29 AA 31 2C 4C AB |..(F$,L(II).1,L.|
00000A60: 4C 28 49 49 29 AB 31 29 3A 8D 31 37 30 3A 5A B2 |L(II).1):.170:Z.|
00000A70: 5A AB 31 00 99 12 EE 02 46 24 B2 46 24 28 5A 29 |Z.1.....F$.F$(Z)|
00000A80: 3A 46 55 24 B2 46 24 28 5A AA 31 29 3A 46 31 24 |:FU$.F$(Z.1):F1$|
00000A90: B2 46 53 24 28 5A AA 31 29 00 B3 12 F8 02 8B 46 |.FS$(Z.1)......F|
00000AA0: 31 24 B2 22 30 22 A7 46 53 24 28 5A 29 B2 22 30 |1$."0".FS$(Z)."0|
00000AB0: 22 3A 8E 00 D8 12 02 03 53 24 B2 46 31 24 3A 8D |":......S$.F1$:.|
00000AC0: 32 30 30 30 3A 8B 4F B3 33 A7 46 31 24 B2 22 28 |2000:.O.3.F1$."(|
00000AD0: 22 AA 46 31 24 AA 22 29 00 ED 12 16 03 4F B2 4F |".F1$.").....O.O|
00000AE0: 28 5A 29 3A 8B 4F B1 31 30 A7 38 35 30 00 FE 12 |(Z):.O.10.850...|
00000AF0: 20 03 8F 20 46 27 3D 55 27 2A 47 28 55 29 00 2F | .. F'=U'*G(U)./|
00000B00: 13 2A 03 46 53 24 B2 58 53 24 28 4F 29 AA 46 55 |.*.FS$.XS$(O).FU|
00000B10: 24 AA 22 29 22 3A 8B 46 31 24 B3 B1 22 31 22 A7 |$.")":.F1$.."1".|
00000B20: 46 53 24 B2 46 31 24 AA 22 2A 22 AA 46 53 24 00 |FS$.F1$."*".FS$.|
00000B30: 45 13 34 03 8B 4F B1 36 A7 46 53 24 B2 46 53 24 |E.4..O.6.FS$.FS$|
00000B40: AA 22 5E 32 29 00 56 13 3E 03 46 53 24 28 5A 29 |."^2).V.>.FS$(Z)|
00000B50: B2 46 53 24 3A 8E 00 67 13 48 03 8F 20 46 27 3D |.FS$:..g.H.. F'=|
00000B60: 55 27 2F 47 28 55 29 00 8E 13 52 03 46 53 24 B2 |U'/G(U)...R.FS$.|
00000B70: 58 53 24 28 4F 29 AA 46 55 24 AA 22 29 22 3A 46 |XS$(O).FU$.")":F|
00000B80: 53 24 B2 46 31 24 AA 22 2F 22 AA 46 53 24 00 A6 |S$.F1$."/".FS$..|
00000B90: 13 5C 03 8B 4F B3 B1 31 39 A7 46 53 24 B2 46 53 |.\..O..19.FS$.FS|
00000BA0: 24 AA 22 5E 32 29 00 B7 13 66 03 46 53 24 28 5A |$."^2)...f.FS$(Z|
00000BB0: 29 B2 46 53 24 3A 8E 00 EB 13 84 03 8F 20 42 45 |).FS$:....... BE|
00000BC0: 48 41 4E 44 4C 45 20 4B 4C 41 4D 4D 45 52 41 55 |HANDLE KLAMMERAU|
00000BD0: 53 44 52 55 45 43 4B 45 20 2C 20 58 20 55 4E 44 |SDRUECKE , X UND|
00000BE0: 20 4B 4F 4E 53 54 41 4E 54 45 4E 00 0E 14 8E 03 | KONSTANTEN.....|
00000BF0: 8B C8 28 46 24 2C 31 29 B3 B1 22 28 22 B0 C9 28 |..(F$,1).."("..(|
00000C00: 46 24 2C 31 29 B3 B1 22 29 22 A7 39 33 30 00 3B |F$,1)..")".930.;|
00000C10: 14 93 03 53 24 B2 CA 28 46 24 2C 32 2C C3 28 46 |...S$..(F$,2,.(F|
00000C20: 24 29 AB 32 29 3A 8D 33 30 30 30 3A 8B 4E A7 46 |$).2):.3000:.N.F|
00000C30: 53 24 28 5A 29 B2 22 30 22 3A 8E 00 5A 14 98 03 |S$(Z)."0":..Z...|
00000C40: 46 24 28 5A 29 B2 CA 28 46 24 2C 32 2C C3 28 46 |F$(Z)..(F$,2,.(F|
00000C50: 24 29 AB 32 29 3A 89 31 37 30 00 73 14 A2 03 8B |$).2):.170.s....|
00000C60: 46 24 B2 22 58 22 A7 46 53 24 28 5A 29 B2 22 31 |F$."X".FS$(Z)."1|
00000C70: 22 3A 8E 00 84 14 AC 03 46 53 24 28 5A 29 B2 22 |":......FS$(Z)."|
00000C80: 30 22 3A 8E 00 B1 14 E8 03 99 22 3F 53 59 4E 54 |0":......."?SYNT|
00000C90: 41 58 20 45 52 52 4F 52 20 49 4E 20 46 4F 52 4D |AX ERROR IN FORM|
00000CA0: 55 4C 41 20 3A 22 3A 99 22 12 22 46 24 3A 89 36 |ULA :":."."F$:.6|
00000CB0: 30 00 E6 14 D0 07 8F 20 53 55 43 48 45 20 52 45 |0...... SUCHE RE|
00000CC0: 43 48 45 4E 5A 45 49 43 48 45 4E 20 4D 49 54 20 |CHENZEICHEN MIT |
00000CD0: 4E 49 45 44 52 49 47 53 54 45 52 20 50 52 49 4F |NIEDRIGSTER PRIO|
00000CE0: 52 49 54 41 45 54 00 04 15 D1 07 8F 20 45 49 4E |RITAET...... EIN|
00000CF0: 47 41 42 45 20 3A 20 53 24 20 53 55 43 48 53 54 |GABE : S$ SUCHST|
00000D00: 52 49 4E 47 00 35 15 D2 07 8F 20 41 55 53 47 41 |RING.5.... AUSGA|
00000D10: 42 45 20 3A 20 50 20 49 4E 44 45 58 20 44 45 53 |BE : P INDEX DES|
00000D20: 20 52 45 43 48 45 4E 5A 45 49 43 48 45 4E 53 20 | RECHENZEICHENS |
00000D30: 49 4E 20 53 24 00 5E 15 D3 07 8F 20 20 20 20 20 |IN S$.^.... |
00000D40: 20 20 20 20 20 20 4F 20 41 52 54 20 44 45 53 20 | O ART DES |
00000D50: 52 45 43 48 45 4E 5A 45 49 43 48 45 4E 53 00 83 |RECHENZEICHENS..|
00000D60: 15 D4 07 8F 20 20 20 20 20 20 20 20 20 20 20 4C |.... L|
00000D70: 20 4C 41 45 4E 47 45 20 44 45 53 20 53 54 52 49 | LAENGE DES STRI|
00000D80: 4E 47 53 00 9C 15 DA 07 4C B2 C3 28 53 24 29 3A |NGS.....L..(S$):|
00000D90: 50 B2 30 3A 4F B2 36 3A 4B 4C B2 30 00 A7 15 EE |P.0:O.6:KL.0....|
00000DA0: 07 81 49 B2 31 A4 4C 00 B8 15 F8 07 4B 24 B2 CA |..I.1.L.....K$..|
00000DB0: 28 53 24 2C 49 2C 31 29 00 DA 15 02 08 4B 4C B2 |(S$,I,1).....KL.|
00000DC0: 4B 4C AA 28 4B 24 B2 22 29 22 29 3A 4B 4C B2 4B |KL.(K$.")"):KL.K|
00000DD0: 4C AB 28 4B 24 B2 22 28 22 29 00 09 16 0C 08 8B |L.(K$."(")......|
00000DE0: 4B 4C B3 B1 30 A7 32 31 30 30 3A 8F 20 4B 4C 41 |KL..0.2100:. KLA|
00000DF0: 4D 4D 45 52 41 55 53 44 52 55 45 43 4B 45 20 55 |MMERAUSDRUECKE U|
00000E00: 45 42 45 52 4C 45 53 45 4E 00 2D 16 16 08 8B 4B |EBERLESEN.-....K|
00000E10: 24 B2 22 2B 22 B0 4B 24 B2 22 2D 22 A7 50 B2 49 |$."+".K$."-".P.I|
00000E20: 3A 4F B2 31 AB 28 4B 24 B2 22 2D 22 29 00 56 16 |:O.1.(K$."-").V.|
00000E30: 20 08 8B 4B 24 B2 22 2A 22 B0 4B 24 B2 22 2F 22 | ..K$."*".K$."/"|
00000E40: A7 8B 4F B1 32 A7 50 B2 49 3A 4F B2 33 AB 28 4B |..O.2.P.I:O.3.(K|
00000E50: 24 B2 22 2F 22 29 00 6F 16 2A 08 8B 4B 24 B2 22 |$."/").o.*..K$."|
00000E60: 5E 22 A7 8B 4F B1 34 A7 50 B2 49 3A 4F B2 35 00 |^"..O.4.P.I:O.5.|
00000E70: 75 16 34 08 82 00 A1 16 3E 08 8B 4B 4C A7 31 30 |u.4.....>..KL.10|
00000E80: 30 30 3A 8F 20 5A 41 48 4C 20 44 45 52 20 27 28 |00:. ZAHL DER '(|
00000E90: 27 20 3C 3E 20 5A 41 48 4C 20 44 45 52 20 27 29 |' <> ZAHL DER ')|
00000EA0: 27 00 A7 16 52 08 8E 00 CB 16 B8 0B 8F 20 54 45 |'...R........ TE|
00000EB0: 53 54 45 20 2C 20 4F 42 20 54 45 52 4D 20 45 49 |STE , OB TERM EI|
00000EC0: 4E 45 20 5A 41 48 4C 20 49 53 54 00 E3 16 C2 0B |NE ZAHL IST.....|
00000ED0: 8F 20 45 49 4E 47 41 42 45 20 3A 20 53 24 20 54 |. EINGABE : S$ T|
00000EE0: 45 52 4D 00 2A 17 CC 0B 8F 20 41 55 53 47 41 42 |ERM.*.... AUSGAB|
00000EF0: 45 20 3A 20 4E 20 20 2D 31 20 46 55 45 52 20 5A |E : N -1 FUER Z|
00000F00: 41 48 4C 45 4E 20 2C 20 30 20 46 55 45 52 20 5A |AHLEN , 0 FUER Z|
00000F10: 55 53 41 4D 4D 45 4E 47 45 53 45 54 5A 54 45 20 |USAMMENGESETZTE |
00000F20: 41 55 53 44 52 55 45 43 4B 45 00 39 17 D6 0B 81 |AUSDRUECKE.9....|
00000F30: 49 B2 31 A4 C3 28 53 24 29 00 4A 17 E0 0B 4B 24 |I.1..(S$).J...K$|
00000F40: B2 CA 28 53 24 2C 49 2C 31 29 00 66 17 EA 0B 8B |..(S$,I,1).f....|
00000F50: 4B 24 B1 22 2F 22 A7 8B 4B 24 B3 22 3A 22 A7 82 |K$."/"..K$.":"..|
00000F60: 3A 4E B2 31 3A 8E 00 7A 17 F4 0B 8B 4B 24 B2 22 |:N.1:..z....K$."|
00000F70: 2D 22 A7 82 3A 4E B2 31 3A 8E 00 84 17 FE 0B 4E |-"..:N.1:......N|
00000F80: B2 30 3A 8E 00 9E 17 A0 0F 8F 20 45 52 4C 41 55 |.0:....... ERLAU|
00000F90: 42 54 45 20 46 55 4E 4B 54 49 4F 4E 45 4E 00 A6 |BTE FUNKTIONEN..|
00000FA0: 17 AA 0F 83 31 39 00 B6 17 B4 0F 83 20 53 49 4E |....19...... SIN|
00000FB0: 28 2C 43 4F 53 28 00 CB 17 BE 0F 83 20 43 4F 53 |(,COS(...... COS|
00000FC0: 28 2C 28 2D 31 29 2A 53 49 4E 28 00 DD 17 C8 0F |(,(-1)*SIN(.....|
00000FD0: 83 20 53 49 4E 48 28 2C 43 4F 53 48 28 00 F4 17 |. SINH(,COSH(...|
00000FE0: D2 0F 83 20 43 4F 53 48 28 2C 28 2D 31 29 2A 53 |... COSH(,(-1)*S|
00000FF0: 49 4E 48 28 00 04 18 DC 0F 83 20 45 58 50 28 2C |INH(...... EXP(,|
00001000: 45 58 50 28 00 17 18 E6 0F 83 20 53 51 52 28 2C |EXP(...... SQR(,|
00001010: 2E 35 2F 53 51 52 28 00 2A 18 F0 0F 83 20 54 41 |.5/SQR(.*.... TA|
00001020: 4E 28 2C 28 31 2B 54 41 4E 28 00 42 18 FA 0F 83 |N(,(1+TAN(.B....|
00001030: 20 43 4F 54 28 2C 28 2D 31 29 2A 28 31 2B 43 4F | COT(,(-1)*(1+CO|
00001040: 54 28 00 57 18 04 10 83 20 54 41 4E 48 28 2C 28 |T(.W.... TANH(,(|
00001050: 31 2D 54 41 4E 48 28 00 71 18 0E 10 83 20 43 4F |1-TANH(.q.... CO|
00001060: 54 48 28 2C 28 2D 31 29 2A 28 31 2D 43 4F 54 48 |TH(,(-1)*(1-COTH|
00001070: 28 00 87 18 18 10 83 20 41 52 43 53 49 4E 28 2C |(...... ARCSIN(,|
00001080: 53 51 52 28 31 2D 28 00 A2 18 22 10 83 20 41 52 |SQR(1-(...".. AR|
00001090: 43 43 4F 53 28 2C 28 2D 31 29 2F 53 51 52 28 31 |CCOS(,(-1)/SQR(1|
000010A0: 2D 28 00 B5 18 2C 10 83 20 41 52 43 54 41 4E 28 |-(...,.. ARCTAN(|
000010B0: 2C 28 31 2B 28 00 CD 18 36 10 83 20 41 52 43 43 |,(1+(...6.. ARCC|
000010C0: 4F 54 28 2C 28 2D 31 29 2F 28 31 2B 28 00 E3 18 |OT(,(-1)/(1+(...|
000010D0: 40 10 83 20 41 52 53 49 4E 48 28 2C 53 51 52 28 |@.. ARSINH(,SQR(|
000010E0: 31 2B 28 00 FB 18 4A 10 83 20 41 52 43 4F 53 48 |1+(...J.. ARCOSH|
000010F0: 28 2C 28 2D 31 29 2F 28 31 2B 28 00 0E 19 54 10 |(,(-1)/(1+(...T.|
00001100: 83 20 41 52 54 41 4E 48 28 2C 28 31 2D 28 00 21 |. ARTANH(,(1-(.!|
00001110: 19 5E 10 83 20 41 52 43 4F 54 48 28 2C 28 31 2D |.^.. ARCOTH(,(1-|
00001120: 28 00 2D 19 68 10 83 20 4C 4E 28 2C 28 00 00 00 |(.-.h.. LN(,(...|
..;.... PROGRAMM ABLEITUNG ( EINGABE:F(X
) , AUSGABE:F'(X) ).`.... (C) 6.2.1982 B
Y THOMAS GAWLICK.W.... VERSION 8.2.1982.
.....53280,0:.53281,0.A. .."... D
IFFERENTIATIONSPROGRAMM ."...#.."
DRUCKER N...";A$:.4,4.(A$."N")...(.M.1
6:. HOECHSTE VERSCHACHTELUNGSTIEFE.H.2..
F$(M),FS$(M),FU$(M),FV$(M),F1$(M),O(M):Z
$."+-*/^.F.3..FZ:.X$(FZ),XS$(FZ),L(FZ).R
.4..I.1.FZ...5..X$(I),XS$(I)...6.L(I).C(
X$(I))...7.....<.Z.0...A..".GIB F(X) EIN
:..F.F..F$(0).O.P..170...Z..4,"F(X) ="F
$(0)..._..4,"F'(X)="FS$(0)...D..4:.60.$.
N.. ABLEITUNGS-UNTERPROGRAMM.L.X.. EINGA
BE : Z VERSCHACHTELUNGSTIEFE.A.... F$(Z)
FUNKTION.X.... FS$(Z) ABLEITUNG.~......
...F$.F$(Z).....S$.F$:.2010.W.H..P.1.P.L
.1000:. ZEICHEN AM ANFANG BZW. ENDE UNZU
LAESSIG......P.0.700...... F=U#V , BEREC
HNE U' UND V'.2.".O(Z).O:FU$(Z).H(F$,P.1
):FV$(Z).J(F$,P.1).`.,.Z.Z.1:F$(Z).FU$(Z
.1):.170:F1$(Z.1).FS$(Z).~.6.F$(Z).FV$(Z
.1):.170:Z.Z.1...@.FU$.FU$(Z):FV$.FV$(Z)
:F1$.F1$(Z):F2$.FS$(Z.1):O.O(Z).R.J..O.3
50,350,400,400,540...T.. F=U+V BZW. F=U-
V , F'=U'+V' BZW. F'=U'-V'.5.^..F1$.."0"
..F2$.."0".FS$(Z).F1$.J(Z$,O,1).F2$:..P.
H..F1$.."0".FS$(Z).F1$:..W.R..F2$.."0".F
S$(Z).J(Z$,2,O.1).F2$:....|.FS$(Z)."0":.
.E.... F=U*V BZW.F=U/V , F'=U'*V+U*V' BZ
W. F'=(U'*V-U*V')/V^2......F1$."0".T.0:F
S$.F1$:.440.....T.1......F1$."1".FS$.FV$
:.440.*...S$.F1$:.2000:.O.3.F1$."(".F1$.
").W...FF$.FV$:S$.FF$:.2000:.O.3.FF$."("
.FF$.").P...FS$.F1$."*".FF$:.440......F2
$."0".480.....FF$.F1$:S$.F1$:.2000:.O.3.
FF$."(".FF$.")...B.T.T.1:FS$.J(FS$,1.(T.
1)).J(Z$,O(Z).2,1.((T.1).O(Z).3))...L..F
2$."1".FS$.FS$.FU$:.480.,.Q.S$.FU$:.2000
:.O.3.FU$."(".FU$.").Q.V.S$.F2$:.2000:.O
.3.F2$."(".F2$.").I...FS$.FS$.FU$."*".F2
$......FS$."0".O(Z).3.510......T.2.FS$."
(".FS$.").....S$.FV$:.2000:.O.3.FV$."(".
FV$.").V...FS$.FS$."/".FV$."^2.....FS$(Z
).FS$.......'.... F=U^V , F'=V*U'*U^(V-1
) BZW. F'=U^V*(U'/U*V+LN(U)*V').9....F2$
.."0".610.S.&..F1$."0".FS$(Z).F1$:..L.0.
.F1$."1".FS$."":.590...:.S$.F1$:.2000:.O
.3.F1$."(".F1$."). .D.FS$.F1$."*...N..FV
$.."1".FS$.FV$."*".FS$...S..H(FV$,1)."("
.FV$.J(FV$,2)...T.F2$.D(E(FV$).1)...U..H
(F2$,1)." ".F2$.J(F2$,2):.599.(.V.F2$."(
".F2$.").F.W..F2$."1".FS$(Z).FS$.FU$:..D
.X..F2$."0".FS$(Z).FS$."1":....].FS$(Z).
FS$.FU$."^".F2$:....B.FF$.FU$...L.S$.FF$
:.2000:.O.3.FF$."(".FF$.").W.V.S$.F1$:.2
000:.O.3.F1$."(".F1$.").....S$.FV$:.2000
:.O.3.FV$."(".FV$.").!...S$.F2$:.2000:.O
.3.F2$."(".F2$.").]...FS$.F$(Z)."*(":.F1
$.."0".FS$.FS$.F1$."/".FF$."*".FV$."+.V.
..FS$.FS$."LN(".FU$.")......F2$."1".FS$(
Z).FS$.")":......FS$(Z).FS$."*".F2$.")":
..U.... F=F(U) , SUCHE FUNKTIONSNAMEN...
...I.1.FZ...F..H(F$,L(I))..X$(I)..:.910.
".P.II.I:I.FZ:.:.I(F$,1)..")".1000.4.Z..
BERECHNE U'.@...O(Z).II.S...Z.Z.1:F$(Z)
.J(F$,L(II).1,L.L(II).1):.170:Z.Z.1.....
F$.F$(Z):FU$.F$(Z.1):F1$.FS$(Z.1)......F
1$."0".FS$(Z)."0":..X...S$.F1$:.2000:.O.
3.F1$."(".F1$.").....O.O(Z):.O.10.850...
.. F'=U'*G(U)./.*.FS$.XS$(O).FU$.")":.F
1$.."1".FS$.F1$."*".FS$.E.4..O.6.FS$.FS$
."^2).V.>.FS$(Z).FS$:..G.H.. F'=U'/G(U).
..R.FS$.XS$(O).FU$.")":FS$.F1$."/".FS$..
.\..O..19.FS$.FS$."^2)...F.FS$(Z).FS$:..
..... BEHANDLE KLAMMERAUSDRUECKE , X UND
KONSTANTEN......H(F$,1).."(".I(F$,1).."
)".930.;...S$.J(F$,2,C(F$).2):.3000:.N.F
S$(Z)."0":..Z...F$(Z).J(F$,2,C(F$).2):.1
70.S....F$."X".FS$(Z)."1":......FS$(Z)."
0":......."?SYNTAX ERROR IN FORMULA :":.
"."F$:.60...P.. SUCHE RECHENZEICHEN MIT
NIEDRIGSTER PRIORITAET...Q.. EINGABE : S
$ SUCHSTRING.5.R.. AUSGABE : P INDEX DES
RECHENZEICHENS IN S$.^.S.. O
ART DES RECHENZEICHENS...T.. L
LAENGE DES STRINGS...Z.L.C(S$):P.0:O.6:
KL.0......I.1.L.....K$.J(S$,I,1).Z...KL.
KL.(K$.")"):KL.KL.(K$."(")......KL..0.21
00:. KLAMMERAUSDRUECKE UEBERLESEN.-....K
$."+".K$."-".P.I:O.1.(K$."-").V. ..K$."*
".K$."/"..O.2.P.I:O.3.(K$."/").O.*..K$."
^"..O.4.P.I:O.5.U.4.....>..KL.1000:. ZAH
L DER '(' <> ZAHL DER ')'...R...K.... TE
STE , OB TERM EINE ZAHL IST...B.. EINGAB
E : S$ TERM.*.L.. AUSGABE : N -1 FUER Z
AHLEN , 0 FUER ZUSAMMENGESETZTE AUSDRUEC
KE.9.V..I.1.C(S$).J...K$.J(S$,I,1).F....
K$."/"..K$.":"..:N.1:..Z....K$."-"..:N.1
:......N.0:.... .. ERLAUBTE FUNKTIONEN..
....19...... SIN(,COS(.K.... COS(,(-1)*S
IN(...H.. SINH(,COSH(...R.. COSH(,(-1)*S
INH(...... EXP(,EXP(...... SQR(,.5/SQR(.
*.... TAN(,(1+TAN(.B.... COT(,(-1)*(1+CO
T(.W.... TANH(,(1-TANH(.Q.... COTH(,(-1)
*(1-COTH(...... ARCSIN(,SQR(1-(...".. AR
CCOS(,(-1)/SQR(1-(...,.. ARCTAN(,(1+(.M.
6.. ARCCOT(,(-1)/(1+(...@.. ARSINH(,SQR(
1+(...J.. ARCOSH(,(-1)/(1+(...T.. ARTANH
(,(1-(.!.^.. ARCOTH(,(1-(.-.H.. LN(,(...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL