ZEICHENPROGRAMM 
FILE INFORMATION
FILENAME(S): ZEICHENPROGRAMM 
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-10-20 14:32:02
APPEARS ON: 1 disk(s)
FILE HASH
8cb598aab1d7810100bfbdbc2fca318fb8cee1046ebfae77195baaa583f10a3e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| STONYSOFT 128 PD | ZEICHENPROGRAMM  | PRG | Treasure Chest - Klaus Der Suhler | 28 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 8F 20 5A 45 49 43 48 45 4E 50 |....d.. ZEICHENP| 00000010: 52 4F 47 52 41 4D 4D 00 2F 08 6E 00 8F 20 46 55 |ROGRAMM./.n.. FU| 00000020: 4E 4B 54 49 4F 4E 20 59 20 3D 20 46 28 58 29 00 |NKTION Y = F(X).| 00000030: 5E 08 78 00 8F 20 42 45 49 20 41 4C 4C 45 4E 20 |^.x.. BEI ALLEN | 00000040: 49 4E 50 55 54 2D 41 4E 57 45 49 53 55 4E 47 45 |INPUT-ANWEISUNGE| 00000050: 4E 20 4B 4F 45 4E 4E 45 4E 20 41 55 43 48 00 89 |N KOENNEN AUCH..| 00000060: 08 82 00 8F 20 20 20 20 4D 41 54 48 45 4D 41 54 |.... MATHEMAT| 00000070: 49 53 43 48 45 20 41 55 53 44 52 55 45 43 4B 45 |ISCHE AUSDRUECKE| 00000080: 20 57 49 45 20 5A 2E 42 2E 00 B6 08 8C 00 8F 20 | WIE Z.B....... | 00000090: 20 20 20 58 2A 53 49 4E 28 58 29 20 4F 44 45 52 | X*SIN(X) ODER| 000000A0: 20 FF 2F 32 20 45 49 4E 47 45 47 45 42 45 4E 20 | ./2 EINGEGEBEN | 000000B0: 57 45 52 44 45 4E 00 D4 08 96 00 8F 20 46 4F 52 |WERDEN...... FOR| 000000C0: 54 53 45 54 5A 55 4E 47 3A 20 43 20 44 52 55 45 |TSETZUNG: C DRUE| 000000D0: 43 4B 45 4E 00 DE 08 C8 00 99 20 22 93 22 00 1B |CKEN...... "."..| 000000E0: 09 D2 00 99 20 22 57 45 52 44 45 4E 20 45 52 4B |.... "WERDEN ERK| 000000F0: 4C 41 45 52 55 4E 47 45 4E 20 5A 55 4D 20 50 52 |LAERUNGEN ZUM PR| 00000100: 4F 47 52 41 4D 4D 20 20 20 20 20 20 20 20 47 45 |OGRAMM GE| 00000110: 57 55 45 4E 53 43 48 54 20 3F 22 00 21 09 DC 00 |WUENSCHT ?".!...| 00000120: 99 00 42 09 E6 00 99 20 22 4A 41 3A 20 20 20 20 |..B.... "JA: | 00000130: 20 54 41 53 54 45 20 4A 20 44 52 55 45 43 4B 45 | TASTE J DRUECKE| 00000140: 4E 22 00 63 09 F0 00 99 20 22 4E 45 49 4E 3A 20 |N".c.... "NEIN: | 00000150: 20 20 54 41 53 54 45 20 4E 20 44 52 55 45 43 4B | TASTE N DRUECK| 00000160: 45 4E 22 00 8C 09 FA 00 A1 20 52 24 20 3A 20 8B |EN"...... R$ : .| 00000170: 20 52 24 20 B3 B1 20 22 4A 22 20 AF 20 52 24 20 | R$ .. "J" . R$ | 00000180: B3 B1 20 22 4E 22 20 A7 20 32 35 30 00 A2 09 04 |.. "N" . 250....| 00000190: 01 8B 20 52 24 20 B2 20 22 4E 22 20 A7 20 31 30 |.. R$ . "N" . 10| 000001A0: 36 30 00 AC 09 2C 01 99 20 22 93 22 00 D8 09 36 |60...,.. "."...6| 000001B0: 01 99 20 22 44 41 53 20 50 52 4F 47 52 41 4D 4D |.. "DAS PROGRAMM| 000001C0: 20 5A 45 49 43 48 4E 45 54 20 45 49 4E 45 20 46 | ZEICHNET EINE F| 000001D0: 55 4E 4B 54 49 4F 4E 22 00 04 0A 40 01 99 20 22 |UNKTION"...@.. "| 000001E0: 59 20 3D 20 46 28 58 29 20 5A 57 49 53 43 48 45 |Y = F(X) ZWISCHE| 000001F0: 4E 20 47 52 45 4E 5A 45 4E 20 58 31 20 55 4E 44 |N GRENZEN X1 UND| 00000200: 20 58 32 22 00 0E 0A 4A 01 99 20 3A 20 99 00 51 | X2"...J.. : ..Q| 00000210: 0A 54 01 99 20 22 41 4D 20 41 4E 46 41 4E 47 20 |.T.. "AM ANFANG | 00000220: 57 45 52 44 45 4E 20 44 49 45 20 46 55 4E 4B 54 |WERDEN DIE FUNKT| 00000230: 49 4F 4E 20 55 4E 44 20 44 49 45 20 20 20 47 52 |ION UND DIE GR| 00000240: 45 4E 5A 45 4E 20 45 49 4E 47 45 47 45 42 45 4E |ENZEN EINGEGEBEN| 00000250: 22 00 57 0A 5E 01 99 00 83 0A 68 01 99 20 22 45 |".W.^.....h.. "E| 00000260: 53 20 4B 4F 45 4E 4E 45 4E 20 4E 49 43 48 54 20 |S KOENNEN NICHT | 00000270: 4E 55 52 20 5A 41 48 4C 45 4E 20 53 4F 4E 44 45 |NUR ZAHLEN SONDE| 00000280: 52 4E 22 00 B2 0A 72 01 99 20 22 41 55 43 48 20 |RN"...r.. "AUCH | 00000290: 4D 41 54 48 45 4D 41 54 49 53 43 48 45 20 41 55 |MATHEMATISCHE AU| 000002A0: 53 44 52 55 45 43 4B 45 20 57 49 45 20 5A 2E 42 |SDRUECKE WIE Z.B| 000002B0: 2E 22 00 DE 0A 7C 01 99 20 22 58 2A 53 49 4E 28 |."...|.. "X*SIN(| 000002C0: 58 29 20 4F 44 45 52 20 FF 2F 32 20 45 49 4E 47 |X) ODER ./2 EING| 000002D0: 45 47 45 42 45 4E 20 57 45 52 44 45 4E 22 00 E4 |EGEBEN WERDEN"..| 000002E0: 0A 86 01 99 00 29 0B 90 01 99 20 22 44 49 45 53 |.....).... "DIES| 000002F0: 45 20 45 49 4E 47 41 42 45 4E 20 4D 55 45 53 53 |E EINGABEN MUESS| 00000300: 45 4E 20 4D 49 54 20 27 52 45 54 55 52 4E 27 20 |EN MIT 'RETURN' | 00000310: 20 20 20 20 41 42 47 45 53 43 48 4C 4F 53 53 45 | ABGESCHLOSSE| 00000320: 4E 20 57 45 52 44 45 4E 22 00 2F 0B 9A 01 99 00 |N WERDEN"./.....| 00000330: 5D 0B A4 01 99 20 22 45 53 20 57 45 52 44 45 4E |].... "ES WERDEN| 00000340: 20 44 49 45 20 41 43 48 53 45 4E 20 44 45 53 20 | DIE ACHSEN DES | 00000350: 4B 4F 4F 52 44 49 4E 41 54 45 4E 2D 22 00 99 0B |KOORDINATEN-"...| 00000360: AE 01 99 20 22 53 59 53 54 45 4D 53 20 47 45 5A |... "SYSTEMS GEZ| 00000370: 45 49 43 48 4E 45 54 2C 20 44 49 45 20 49 4D 20 |EICHNET, DIE IM | 00000380: 42 45 52 45 49 43 48 20 44 45 52 20 20 4B 55 52 |BEREICH DER KUR| 00000390: 56 45 20 4C 49 45 47 45 4E 00 A3 0B B8 01 99 20 |VE LIEGEN...... | 000003A0: 3A 20 99 00 E4 0B C2 01 99 20 22 42 45 49 20 50 |: ....... "BEI P| 000003B0: 52 4F 47 52 41 4D 4D 53 54 4F 50 3A 20 5A 55 52 |ROGRAMMSTOP: ZUR| 000003C0: 20 46 4F 52 54 53 45 54 5A 55 4E 47 20 44 49 45 | FORTSETZUNG DIE| 000003D0: 20 20 20 54 41 53 54 45 20 43 20 44 52 55 45 43 | TASTE C DRUEC| 000003E0: 4B 45 4E 22 00 01 0C CC 01 A1 20 52 24 20 3A 20 |KEN"...... R$ : | 000003F0: 8B 20 52 24 20 B3 B1 20 22 43 22 20 A7 20 34 36 |. R$ .. "C" . 46| 00000400: 30 00 0B 0C D6 01 99 20 22 93 22 00 33 0C E0 01 |0...... ".".3...| 00000410: 99 20 22 42 45 49 53 50 49 45 4C 20 46 55 45 52 |. "BEISPIEL FUER| 00000420: 20 44 49 45 20 44 41 54 45 4E 45 49 4E 47 41 42 | DIE DATENEINGAB| 00000430: 45 3A 22 00 4D 0C EA 01 99 20 22 11 11 59 28 58 |E:".M.... "..Y(X| 00000440: 29 20 3D 20 58 2F 28 31 2B 58 2A 58 29 00 5E 0C |) = X/(1+X*X).^.| 00000450: F4 01 99 20 22 11 58 31 20 3D 20 2D 35 22 00 6F |... ".X1 = -5".o| 00000460: 0C FE 01 99 20 22 11 58 32 20 3D 20 31 30 22 00 |.... ".X2 = 10".| 00000470: AD 0C 08 02 99 20 22 11 11 11 11 11 53 4F 4C 4C |..... ".....SOLL| 00000480: 45 4E 20 44 49 45 20 45 52 4B 4C 41 45 52 55 4E |EN DIE ERKLAERUN| 00000490: 47 45 4E 20 57 49 45 44 45 52 48 4F 4C 54 20 20 |GEN WIEDERHOLT | 000004A0: 20 20 20 20 57 45 52 44 45 4E 20 3F 22 00 CE 0C | WERDEN ?"...| 000004B0: 12 02 99 20 22 11 54 41 53 54 45 20 4A 20 42 5A |... ".TASTE J BZ| 000004C0: 57 2E 20 4E 20 44 52 55 45 43 4B 45 4E 22 00 F7 |W. N DRUECKEN"..| 000004D0: 0C 1C 02 A1 20 52 24 20 3A 20 8B 20 52 24 20 B3 |.... R$ : . R$ .| 000004E0: B1 20 22 4A 22 20 AF 20 52 24 20 B3 B1 20 22 4E |. "J" . R$ .. "N| 000004F0: 22 20 A7 20 35 34 30 00 0C 0D 26 02 8B 20 52 24 |" . 540...&.. R$| 00000500: 20 B2 20 22 4A 22 20 A7 20 33 30 30 00 2B 0D 24 | . "J" . 300.+.$| 00000510: 04 99 20 22 93 11 45 49 4E 47 41 42 45 20 44 45 |.. "..EINGABE DE| 00000520: 52 20 46 55 4E 4B 54 49 4F 4E 22 00 40 0D 2E 04 |R FUNKTION".@...| 00000530: 85 20 22 11 59 28 58 29 20 3D 20 22 3B 20 41 24 |. ".Y(X) = "; A$| 00000540: 00 65 0D 38 04 99 20 22 11 11 45 49 4E 47 41 42 |.e.8.. "..EINGAB| 00000550: 45 20 44 45 52 20 55 4E 54 45 52 45 4E 20 47 52 |E DER UNTEREN GR| 00000560: 45 4E 5A 45 22 00 78 0D 42 04 85 20 22 11 58 31 |ENZE".x.B.. ".X1| 00000570: 20 3D 20 22 3B 20 42 24 00 9C 0D 4C 04 99 20 22 | = "; B$...L.. "| 00000580: 11 11 45 49 4E 47 41 42 45 20 44 45 52 20 4F 42 |..EINGABE DER OB| 00000590: 45 52 45 4E 20 47 52 45 4E 5A 45 22 00 AF 0D 56 |EREN GRENZE"...V| 000005A0: 04 85 20 22 11 58 32 20 3D 20 22 3B 20 43 24 00 |.. ".X2 = "; C$.| 000005B0: B9 0D 60 04 99 20 22 93 22 00 D9 0D 6A 04 99 20 |..`.. "."...j.. | 000005C0: 31 32 33 30 3B 20 22 44 45 46 20 46 4E 59 28 58 |1230; "DEF FNY(X| 000005D0: 29 20 3D 20 22 3B 20 41 24 00 F1 0D 74 04 99 20 |) = "; A$...t.. | 000005E0: 31 32 34 30 3B 20 22 58 31 20 3D 20 22 3B 20 42 |1240; "X1 = "; B| 000005F0: 24 00 09 0E 7E 04 99 20 31 32 35 30 3B 20 22 58 |$...~.. 1250; "X| 00000600: 32 20 3D 20 22 3B 20 43 24 00 1A 0E 88 04 99 20 |2 = "; C$...... | 00000610: 22 52 55 4E 20 31 32 33 30 22 00 28 0E 92 04 97 |"RUN 1230".(....| 00000620: 20 36 32 33 2C 20 31 39 00 38 0E 9C 04 81 20 49 | 623, 19.8.... I| 00000630: 20 B2 20 31 20 A4 20 35 00 49 0E A6 04 3A 97 20 | . 1 . 5.I...:. | 00000640: 36 32 33 AA 49 2C 20 31 33 00 4F 0E B0 04 82 00 |623.I, 13.O.....| 00000650: 5C 0E BA 04 97 20 31 35 38 2C 20 36 00 62 0E C4 |\.... 158, 6.b..| 00000660: 04 80 00 78 0E EC 04 99 20 22 11 42 49 54 54 45 |...x.... ".BITTE| 00000670: 20 57 41 52 54 45 4E 22 00 8C 0E F6 04 44 58 20 | WARTEN".....DX | 00000680: B2 20 28 58 32 AB 58 31 29 AD 37 35 00 BF 0E 00 |. (X2.X1).75....| 00000690: 05 58 30 20 B2 20 31 45 33 30 20 3A 20 59 30 20 |.X0 . 1E30 : Y0 | 000006A0: B2 20 31 45 33 30 20 3A 20 59 31 20 B2 20 31 45 |. 1E30 : Y1 . 1E| 000006B0: 33 30 20 3A 20 59 32 20 B2 20 AB 31 45 33 30 00 |30 : Y2 . .1E30.| 000006C0: D1 0E 0A 05 4E 20 B2 20 30 20 3A 20 4B 20 B2 20 |....N . 0 : K . | 000006D0: 30 00 EF 0E 14 05 81 20 49 20 B2 20 58 31 20 A4 |0...... I . X1 .| 000006E0: 20 58 32 AA 30 2E 31 AC 44 58 20 A9 20 44 58 00 | X2.0.1.DX . DX.| 000006F0: FE 0E 1E 05 3A 5A 20 B2 20 A5 59 28 49 29 00 15 |....:Z . .Y(I)..| 00000700: 0F 28 05 3A 8B 20 5A 20 B1 20 59 32 20 A7 20 59 |.(.:. Z . Y2 . Y| 00000710: 32 20 B2 20 5A 00 2C 0F 32 05 3A 8B 20 5A 20 B3 |2 . Z.,.2.:. Z .| 00000720: 20 59 31 20 A7 20 59 31 20 B2 20 5A 00 3B 0F 3C | Y1 . Y1 . Z.;.<| 00000730: 05 3A 4E 20 B2 20 4E AA 30 2E 35 00 61 0F 46 05 |.:N . N.0.5.a.F.| 00000740: 3A 8B 20 B6 28 49 29 20 B3 20 58 30 20 A7 20 58 |:. .(I) . X0 . X| 00000750: 30 20 B2 20 B6 28 49 29 20 3A 20 4E 58 20 B2 20 |0 . .(I) : NX . | 00000760: 4E 00 7E 0F 50 05 3A 8B 20 B6 28 5A 29 20 B3 20 |N.~.P.:. .(Z) . | 00000770: 59 30 20 A7 20 59 30 20 B2 20 B6 28 5A 29 00 84 |Y0 . Y0 . .(Z)..| 00000780: 0F 5A 05 82 00 9A 0F 64 05 44 59 20 B2 20 28 59 |.Z.....d.DY . (Y| 00000790: 32 AB 59 31 29 AD 32 32 2E 35 00 A4 0F 6E 05 99 |2.Y1).22.5...n..| 000007A0: 20 22 93 22 00 B9 0F 78 05 8B 20 58 30 20 B1 20 | "."...x.. X0 . | 000007B0: 44 58 20 A7 20 31 35 30 30 00 C7 0F 82 05 4E 20 |DX . 1500.....N | 000007C0: B2 20 B5 28 4E 58 29 00 DC 0F 8C 05 8B 20 4E 20 |. .(NX)...... N | 000007D0: B3 B1 20 4E 58 20 A7 20 31 34 37 30 00 ED 0F 96 |.. NX . 1470....| 000007E0: 05 81 20 49 20 B2 20 31 20 A4 20 32 33 00 FC 0F |.. I . 1 . 23...| 000007F0: A0 05 3A 99 A3 4E 29 3B 20 22 C8 22 00 02 10 AA |..:..N); "."....| 00000800: 05 82 00 0D 10 B4 05 89 20 31 35 30 30 00 1E 10 |........ 1500...| 00000810: BE 05 81 20 49 20 B2 20 31 20 A4 20 32 33 00 2F |... I . 1 . 23./| 00000820: 10 C8 05 3A 99 A3 4E AA 31 29 3B 20 22 C7 22 00 |...:..N.1); ".".| 00000830: 35 10 D2 05 82 00 43 10 DC 05 4D 20 B2 20 59 32 |5.....C...M . Y2| 00000840: AD 44 59 00 59 10 E6 05 8B 20 59 30 20 B3 B2 20 |.DY.Y.... Y0 .. | 00000850: 44 59 20 A7 20 31 35 34 30 00 74 10 F0 05 8B 20 |DY . 1540.t.... | 00000860: B4 28 59 32 29 20 B2 20 B4 28 59 31 29 20 A7 20 |.(Y2) . .(Y1) . | 00000870: 31 36 33 30 00 8D 10 FA 05 4D 20 B2 20 B6 28 59 |1630.....M . .(Y| 00000880: 32 AD 28 59 32 AB 59 31 29 29 AC 32 33 00 9B 10 |2.(Y2.Y1)).23...| 00000890: 04 06 4D 31 20 B2 20 B5 28 4D 29 00 A5 10 0E 06 |..M1 . .(M).....| 000008A0: 99 20 22 13 22 00 B6 10 18 06 81 20 49 20 B2 20 |. "."...... I . | 000008B0: 31 20 A4 20 4D 31 00 BD 10 22 06 3A 99 00 C3 10 |1 . M1...".:....| 000008C0: 2C 06 82 00 DB 10 36 06 8B 20 4D AB 4D 31 20 B3 |,.....6.. M.M1 .| 000008D0: 20 30 2E 35 20 A7 20 31 36 32 30 00 0C 11 40 06 | 0.5 . 1620...@.| 000008E0: 99 20 22 1D C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |. ".............| 000008F0: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................| 00000900: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 13 22 00 17 11 4A |..........."...J| 00000910: 06 89 20 31 36 33 30 00 48 11 54 06 99 20 22 1D |.. 1630.H.T.. ".| 00000920: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................| 00000930: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................| 00000940: C4 C4 C4 C4 C4 C4 13 22 00 66 11 5E 06 81 20 49 |.......".f.^.. I| 00000950: 20 B2 20 58 31 20 A4 20 58 32 AA 30 2E 31 AC 44 | . X1 . X2.0.1.D| 00000960: 58 20 A9 20 44 58 00 76 11 68 06 3A 46 31 20 B2 |X . DX.v.h.:F1 .| 00000970: 20 A5 59 28 49 29 00 89 11 72 06 3A 46 32 20 B2 | .Y(I)...r.:F2 .| 00000980: 20 A5 59 28 49 AA 44 58 29 00 9B 11 7C 06 3A 5A | .Y(I.DX)...|.:Z| 00000990: 31 20 B2 20 4D AB 46 31 AD 44 59 00 AD 11 86 06 |1 . M.F1.DY.....| 000009A0: 3A 5A 32 20 B2 20 4D AB 46 32 AD 44 59 00 BD 11 |:Z2 . M.F2.DY...| 000009B0: 90 06 3A 44 31 20 B2 20 B5 28 5A 31 29 00 CD 11 |..:D1 . .(Z1)...| 000009C0: 9A 06 3A 44 32 20 B2 20 B5 28 5A 32 29 00 D8 11 |..:D2 . .(Z2)...| 000009D0: A4 06 3A 99 20 22 13 22 00 E5 11 AE 06 3A 4B 20 |..:. ".".....:K | 000009E0: B2 20 4B AA 31 00 FA 11 B8 06 3A 8B 20 44 31 20 |. K.1.....:. D1 | 000009F0: B2 20 30 20 A7 20 31 37 36 30 00 0C 12 C2 06 3A |. 0 . 1760.....:| 00000A00: 81 20 4A 20 B2 20 31 20 A4 20 44 31 00 14 12 CC |. J . 1 . D1....| 00000A10: 06 3A 20 99 00 1D 12 D6 06 3A 82 20 4A 00 34 12 |.: ......:. J.4.| 00000A20: E0 06 3A 8B 20 44 31 20 B3 B1 20 44 32 20 A7 20 |..:. D1 .. D2 . | 00000A30: 31 38 34 30 00 5C 12 EA 06 3A 8B 20 5A 31 AB 44 |1840.\...:. Z1.D| 00000A40: 31 20 B3 20 30 2E 35 20 AF 20 5A 32 AB 44 32 20 |1 . 0.5 . Z2.D2 | 00000A50: B3 20 30 2E 35 20 A7 20 31 38 33 30 00 86 12 F4 |. 0.5 . 1830....| 00000A60: 06 3A 8B 20 5A 31 AB 44 31 20 B1 B2 20 30 2E 35 |.:. Z1.D1 .. 0.5| 00000A70: 20 AF 20 5A 32 AB 44 32 20 B1 B2 20 30 2E 35 20 | . Z2.D2 .. 0.5 | 00000A80: A7 20 31 38 32 30 00 AF 12 FE 06 3A 8B 20 5A 31 |. 1820.....:. Z1| 00000A90: AB 44 31 20 B1 B2 20 30 2E 35 20 AF 20 5A 32 AB |.D1 .. 0.5 . Z2.| 00000AA0: 44 32 20 B3 20 30 2E 35 20 A7 20 31 38 31 30 00 |D2 . 0.5 . 1810.| 00000AB0: C7 12 08 07 3A 99 A3 4B 29 3B 20 22 BF 22 20 3A |....:..K); "." :| 00000AC0: 20 89 20 31 39 35 30 00 E1 12 12 07 3A 99 A3 4B | . 1950.....:..K| 00000AD0: 29 3B 20 22 12 BF 92 22 20 3A 20 89 20 31 39 35 |); "..." : . 195| 00000AE0: 30 00 F9 12 1C 07 3A 99 A3 4B 29 3B 20 22 A2 22 |0.....:..K); "."| 00000AF0: 20 3A 20 89 20 31 39 35 30 00 13 13 26 07 3A 99 | : . 1950...&.:.| 00000B00: A3 4B 29 3B 20 22 12 A2 92 22 20 3A 20 89 20 31 |.K); "..." : . 1| 00000B10: 39 35 30 00 2D 13 30 07 3A 8B 20 5A 31 AB 44 31 |950.-.0.:. Z1.D1| 00000B20: 20 B3 20 30 2E 35 20 A7 20 31 38 36 30 00 45 13 | . 0.5 . 1860.E.| 00000B30: 3A 07 3A 99 A3 4B 29 3B 20 22 BB 22 20 3A 20 89 |:.:..K); "." : .| 00000B40: 20 31 38 37 30 00 54 13 44 07 3A 99 A3 4B 29 3B | 1870.T.D.:..K);| 00000B50: 20 22 BE 22 00 5F 13 4E 07 3A 99 20 22 13 22 00 | "."._.N.:. ".".| 00000B60: 74 13 58 07 3A 8B 20 44 32 20 B2 20 30 20 A7 20 |t.X.:. D2 . 0 . | 00000B70: 31 39 32 30 00 86 13 62 07 3A 81 20 4A 20 B2 20 |1920...b.:. J . | 00000B80: 31 20 A4 20 44 32 00 8E 13 6C 07 3A 20 99 00 97 |1 . D2...l.: ...| 00000B90: 13 76 07 3A 82 20 4A 00 B1 13 80 07 3A 8B 20 5A |.v.:. J.....:. Z| 00000BA0: 32 AB 44 32 20 B3 20 30 2E 35 20 A7 20 31 39 34 |2.D2 . 0.5 . 194| 00000BB0: 30 00 C9 13 8A 07 3A 99 A3 4B 29 3B 20 22 AC 22 |0.....:..K); "."| 00000BC0: 20 3A 20 89 20 31 39 35 30 00 D8 13 94 07 3A 99 | : . 1950.....:.| 00000BD0: A3 4B 29 3B 20 22 BC 22 00 E6 13 9E 07 3A 49 20 |.K); ".".....:I | 00000BE0: B2 20 49 AA 44 58 00 EE 13 A8 07 82 20 49 00 0C |. I.DX...... I..| 00000BF0: 14 B2 07 A1 20 52 24 20 3A 20 8B 20 52 24 20 B3 |.... R$ : . R$ .| 00000C00: B1 20 22 43 22 20 A7 20 31 39 37 30 00 16 14 BC |. "C" . 1970....| 00000C10: 07 99 20 22 13 22 00 27 14 C6 07 81 20 49 20 B2 |.. ".".'.... I .| 00000C20: 20 31 20 A4 20 32 31 00 2E 14 D0 07 3A 99 00 34 | 1 . 21.....:..4| 00000C30: 14 DA 07 82 00 56 14 E4 07 99 20 22 58 31 20 3D |.....V.... "X1 =| 00000C40: 22 3B 20 58 31 3B 20 A6 35 29 3B 20 22 58 32 20 |"; X1; .5); "X2 | 00000C50: 3D 22 3B 20 58 32 00 78 14 EE 07 99 20 22 59 31 |="; X2.x.... "Y1| 00000C60: 20 3D 22 3B 20 59 31 3B 20 A6 35 29 3B 20 22 59 | ="; Y1; .5); "Y| 00000C70: 32 20 3D 22 3B 20 59 32 00 96 14 F8 07 A1 20 52 |2 ="; Y2...... R| 00000C80: 24 20 3A 20 8B 20 52 24 20 B3 B1 20 22 43 22 20 |$ : . R$ .. "C" | 00000C90: A7 20 32 30 34 30 00 9C 14 02 08 80 00 00 00 45 |. 2040.........E| 00000CA0: AD |. |
....D.. ZEICHENPROGRAMM./.N.. FUNKTION Y = F(X).^.X.. BEI ALLEN INPUT-ANWEISUNGE N KOENNEN AUCH...... MATHEMATISCHE AU SDRUECKE WIE Z.B....... X*SIN(X) ODER ./2 EINGEGEBEN WERDEN.T.... FORTSETZUNG : C DRUECKEN...H.. "."...R.. "WERDEN ERK LAERUNGEN ZUM PROGRAMM GEWUENSCHT ?".!.....B.... "JA: TASTE J DRUECKE N".C.... "NEIN: TASTE N DRUECKEN"..... . R$ : . R$ .. "J" . R$ .. "N" . 250.... .. R$ . "N" . 1060...,.. ".".X.6.. "DAS PROGRAMM ZEICHNET EINE FUNKTION"...@.. " Y = F(X) ZWISCHEN GRENZEN X1 UND X2"...J .. : ..Q.T.. "AM ANFANG WERDEN DIE FUNKT ION UND DIE GRENZEN EINGEGEBEN".W.^... ..H.. "ES KOENNEN NICHT NUR ZAHLEN SONDE RN"...R.. "AUCH MATHEMATISCHE AUSDRUECKE WIE Z.B."...|.. "X*SIN(X) ODER ./2 EING EGEBEN WERDEN".......).... "DIESE EINGAB EN MUESSEN MIT 'RETURN' ABGESCHLOSSE N WERDEN"./.....].... "ES WERDEN DIE ACH SEN DES KOORDINATEN-"...... "SYSTEMS GEZ EICHNET, DIE IM BEREICH DER KURVE LIEGE N...... : ....B.. "BEI PROGRAMMSTOP: ZUR FORTSETZUNG DIE TASTE C DRUECKEN"...L .. R$ : . R$ .. "C" . 460...V.. ".".3... . "BEISPIEL FUER DIE DATENEINGABE:".M... . "..Y(X) = X/(1+X*X).^.... ".X1 = -5".O .... ".X2 = 10"...... ".....SOLLEN DIE E RKLAERUNGEN WIEDERHOLT WERDEN ?".N. ... ".TASTE J BZW. N DRUECKEN"...... R$ : . R$ .. "J" . R$ .. "N" . 540...&.. R$ . "J" . 300.+.$.. "..EINGABE DER FUNKTI ON".@.... ".Y(X) = "; A$.E.8.. "..EINGAB E DER UNTEREN GRENZE".X.B.. ".X1 = "; B$ ...L.. "..EINGABE DER OBEREN GRENZE"...V .. ".X2 = "; C$...`.. ".".Y.J.. 1230; "D EF FNY(X) = "; A$...T.. 1240; "X1 = "; B $...~.. 1250; "X2 = "; C$...... "RUN 123 0".(.... 623, 19.8.... I . 1 . 5.I...:. 623.I, 13.O.....\.... 158, 6.B.D...X.... ".BITTE WARTEN".....DX . (X2.X1).75.... .X0 . 1E30 : Y0 . 1E30 : Y1 . 1E30 : Y2 . .1E30.Q...N . 0 : K . 0...... I . X1 . X2.0.1.DX . DX.....:Z . .Y(I)...(.:. Z . Y2 . Y2 . Z.,.2.:. Z . Y1 . Y1 . Z.;.< .:N . N.0.5.A.F.:. .(I) . X0 . X0 . .(I) : NX . N.~.P.:. .(Z) . Y0 . Y0 . .(Z).. .Z.....D.DY . (Y2.Y1).22.5...N.. "."...X .. X0 . DX . 1500.G...N . .(NX)...... N .. NX . 1470...... I . 1 . 23... .:..N); "H"............ 1500...... I . 1 . 23./ .H.:..N.1); "G".5.R...C...M . Y2.DY.Y... . Y0 .. DY . 1540.T.... .(Y2) . .(Y1) . 1630.....M . .(Y2.(Y2.Y1)).23.....M1 . . (M)...... "."...... I . 1 . M1...".:..C. ,.....6.. M.M1 . 0.5 . 1620...@.. ".FFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF."...J .. 1630.H.T.. ".DDDDDDDDDDDDDDDDDDDDDDDD DDDDDDDDDDDDDD.".F.^.. I . X1 . X2.0.1.D X . DX.V.H.:F1 . .Y(I)...R.:F2 . .Y(I.DX )...|.:Z1 . M.F1.DY.....:Z2 . M.F2.DY... ..:D1 . .(Z1).M...:D2 . .(Z2).X...:. "." .....:K . K.1.....:. D1 . 0 . 1760...B.: . J . 1 . D1...L.: ....V.:. J.4...:. D1 .. D2 . 1840.\...:. Z1.D1 . 0.5 . Z2.D2 . 0.5 . 1830.....:. Z1.D1 .. 0.5 . Z2.D2 .. 0.5 . 1820.....:. Z1.D1 .. 0.5 . Z2. D2 . 0.5 . 1810.G...:..K); "." : . 1950. ....:..K); "..." : . 1950.....:..K); "." : . 1950...&.:..K); "..." : . 1950.-.0. :. Z1.D1 . 0.5 . 1860.E.:.:..K); "." : . 1870.T.D.:..K); "."._.N.:. ".".T.X.:. D 2 . 0 . 1920...B.:. J . 1 . D2...L.: ... .V.:. J.....:. Z2.D2 . 0.5 . 1940.I...:. .K); "." : . 1950.X...:..K); ".".....:I . I.DX...... I...... R$ : . R$ .. "C" . 1970...... ".".'.F.. I . 1 . 21...P.:..4 .Z...V.... "X1 ="; X1; .5); "X2 ="; X2.X .... "Y1 ="; Y1; .5); "Y2 ="; Y2...... R $ : . R$ .. "C" . 2040.........E.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL