> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..).... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 08 02 00 8F 20 |*********.Q.... |
00000030: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 2A 00 79 08 03 00 8F 20 2A 20 50 4C 4F 54 54 45 |*.y.... * PLOTTE|
00000060: 4E 20 42 45 4C 49 45 42 49 47 45 52 20 46 55 4E |N BELIEBIGER FUN|
00000070: 4B 54 49 4F 4E 45 4E 20 2A 00 A1 08 04 00 8F 20 |KTIONEN *...... |
00000080: 2A 20 4D 49 54 20 44 45 4D 20 50 52 49 4E 54 45 |* MIT DEM PRINTE|
00000090: 52 2F 50 4C 4F 54 54 45 52 20 20 31 35 32 30 20 |R/PLOTTER 1520 |
000000A0: 2A 00 C9 08 05 00 8F 20 2A 20 20 20 20 20 20 20 |*...... * |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 20 20 20 20 20 20 2A 00 F1 08 06 00 8F 20 | *...... |
000000D0: 2A 20 20 48 45 49 4D 4F 20 50 4F 4E 4E 41 54 48 |* HEIMO PONNATH|
000000E0: 20 20 48 41 4D 42 55 52 47 20 31 39 38 35 20 20 | HAMBURG 1985 |
000000F0: 2A 00 19 09 07 00 8F 20 2A 20 20 20 20 20 20 20 |*...... * |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 20 20 20 20 20 2A 00 41 09 08 00 8F 20 | *.A.... |
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000140: 2A 00 4A 09 09 00 89 20 32 35 00 71 09 0A 00 8F |*.J.... 25.q....|
00000150: 20 2B 2B 2B 2B 2B 2B 2B 2B 20 55 50 20 43 55 52 | ++++++++ UP CUR|
00000160: 53 4F 52 20 53 45 54 5A 45 4E 20 2B 2B 2B 2B 2B |SOR SETZEN +++++|
00000170: 2B 00 8D 09 0F 00 97 32 31 31 2C 53 50 3A 97 32 |+......211,SP:.2|
00000180: 31 34 2C 5A 3A 9E 35 38 36 34 30 3A 8E 00 B4 09 |14,Z:.58640:....|
00000190: 14 00 8F 20 2B 2B 2B 2B 2B 2B 2B 2B 20 48 41 55 |... ++++++++ HAU|
000001A0: 50 54 50 52 4F 47 52 41 4D 4D 20 54 45 49 4C 20 |PTPROGRAMM TEIL |
000001B0: 31 20 2B 2B 00 CE 09 19 00 99 C7 28 31 34 37 29 |1 ++.......(147)|
000001C0: 3A 5A B2 31 30 3A 53 50 B2 31 3A 8D 31 35 00 FD |:Z.10:SP.1:.15..|
000001D0: 09 1E 00 99 22 49 4D 20 50 52 4F 47 52 41 4D 4D |...."IM PROGRAMM|
000001E0: 20 42 45 46 49 4E 44 45 54 20 53 49 43 48 20 44 | BEFINDET SICH D|
000001F0: 49 45 20 46 55 4E 4B 54 49 4F 4E 3A 22 00 21 0A |IE FUNKTION:".!.|
00000200: 23 00 4B B2 31 3A 8D 39 30 3A 4B B2 30 3A 99 3A |#.K.1:.90:K.0:.:|
00000210: 99 22 59 3D 20 22 46 24 3A 5A B2 31 38 3A 8D 31 |."Y= "F$:Z.18:.1|
00000220: 35 00 5E 0A 28 00 99 C7 28 31 38 29 22 41 22 C7 |5.^.(...(18)"A".|
00000230: 28 31 34 36 29 22 4C 54 45 20 4F 44 45 52 20 22 |(146)"LTE ODER "|
00000240: C7 28 31 38 29 22 4E 22 C7 28 31 34 36 29 22 45 |.(18)"N".(146)"E|
00000250: 55 45 20 46 55 4E 4B 54 49 4F 4E 20 3F 22 00 7A |UE FUNKTION ?".z|
00000260: 0A 2D 00 A1 41 24 3A 8B 41 24 B3 B1 22 41 22 AF |.-..A$:.A$.."A".|
00000270: 41 24 B3 B1 22 4E 22 A7 34 35 00 89 0A 32 00 8B |A$.."N".45...2..|
00000280: 41 24 B2 22 41 22 A7 38 35 00 B0 0A 37 00 8F 20 |A$."A".85...7.. |
00000290: 2B 2B 20 4E 45 55 45 20 46 55 4E 4B 54 49 4F 4E |++ NEUE FUNKTION|
000002A0: 20 49 4E 53 20 50 52 4F 47 52 41 4D 4D 20 2B 2B | INS PROGRAMM ++|
000002B0: 00 E5 0A 3C 00 5A B2 32 30 3A 53 50 B2 33 3A 8D |...<.Z.20:SP.3:.|
000002C0: 31 35 3A 99 22 4E 45 55 45 20 46 55 4E 4B 54 49 |15:."NEUE FUNKTI|
000002D0: 4F 4E 3A 22 3A 85 22 59 3D 20 22 3B 46 24 3A 97 |ON:":."Y= ";F$:.|
000002E0: 36 34 36 2C 36 00 0E 0B 41 00 99 C7 28 31 34 37 |646,6...A...(147|
000002F0: 29 C7 28 31 37 29 C7 28 31 37 29 22 39 30 46 24 |).(17).(17)"90F$|
00000300: 3D 22 C7 28 33 34 29 46 24 C7 28 33 34 29 00 35 |=".(34)F$.(34).5|
00000310: 0B 46 00 99 22 39 35 44 45 46 46 4E 41 28 58 29 |.F.."95DEFFNA(X)|
00000320: 3D 22 46 24 3A 99 22 52 55 4E 38 35 22 3A 99 C7 |="F$:."RUN85":..|
00000330: 28 31 39 29 3B 00 5A 0B 4B 00 97 36 33 31 2C 31 |(19);.Z.K..631,1|
00000340: 33 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 |3:.632,13:.633,1|
00000350: 33 3A 97 31 39 38 2C 33 3A 80 00 81 0B 50 00 8F |3:.198,3:....P..|
00000360: 20 2B 2B 2B 2B 2B 2B 2B 2B 20 48 41 55 50 54 50 | ++++++++ HAUPTP|
00000370: 52 4F 47 52 41 4D 4D 20 54 45 49 4C 20 32 20 2B |ROGRAMM TEIL 2 +|
00000380: 2B 00 95 0B 55 00 99 C7 28 31 34 37 29 3A 97 36 |+...U...(147):.6|
00000390: 34 36 2C 31 34 00 A4 0B 5A 00 46 24 B2 22 58 5E |46,14...Z.F$."X^|
000003A0: 32 2F 32 22 00 B5 0B 5F 00 96 A5 41 28 58 29 B2 |2/2"..._...A(X).|
000003B0: 58 AE 32 AD 32 00 C0 0B 64 00 8B 4B B2 31 A7 8E |X.2.2...d..K.1..|
000003C0: 00 E6 0B 69 00 8F 20 2B 2B 2B 2B 20 56 41 52 49 |...i.. ++++ VARI|
000003D0: 41 42 4C 45 20 55 4E 44 20 46 55 4E 4B 54 49 4F |ABLE UND FUNKTIO|
000003E0: 4E 45 4E 20 2B 2B 00 02 0C 6E 00 96 A5 54 28 58 |NEN ++...n...T(X|
000003F0: 29 B2 B5 28 34 37 39 AD 28 58 4F AB 58 55 29 AC |)..(479.(XO.XU).|
00000400: 58 29 00 3A 0C 73 00 58 B2 30 3A 5A B2 30 3A 53 |X).:.s.X.0:Z.0:S|
00000410: 50 B2 30 3A 58 55 B2 AB 31 3A 58 4F B2 35 3A 59 |P.0:XU..1:XO.5:Y|
00000420: 55 B2 AB 31 3A 59 4F B2 35 3A 59 4D B2 36 3A 58 |U..1:YO.5:YM.6:X|
00000430: 41 B2 58 55 3A 58 45 B2 58 4F 00 6E 0C 78 00 58 |A.XU:XE.XO.n.x.X|
00000440: 31 B2 30 3A 58 32 B2 30 3A 59 31 B2 30 3A 59 32 |1.0:X2.0:Y1.0:Y2|
00000450: B2 30 3A 44 B2 31 35 30 3A 44 59 B2 2E 31 3A 49 |.0:D.150:DY..1:I|
00000460: B2 31 30 3A 4D B2 31 30 3A 44 58 B2 2E 32 00 78 |.10:M.10:DX..2.x|
00000470: 0C 7D 00 41 24 B2 22 22 00 9E 0C 82 00 8F 20 2B |.}.A$.""...... +|
00000480: 2B 2B 20 50 4C 4F 54 54 45 52 4B 41 4E 41 45 4C |++ PLOTTERKANAEL|
00000490: 45 20 4F 45 46 46 4E 45 4E 20 2B 2B 2B 2B 00 C1 |E OEFFNEN ++++..|
000004A0: 0C 87 00 9F 31 2C 36 2C 31 3A 9F 34 2C 36 3A 9F |....1,6,1:.4,6:.|
000004B0: 32 2C 36 2C 32 3A 9F 33 2C 36 2C 33 3A 98 32 2C |2,6,2:.3,6,3:.2,|
000004C0: 33 00 E7 0C 8C 00 8F 20 2B 2B 2B 2B 2B 20 50 41 |3...... +++++ PA|
000004D0: 52 41 4D 45 54 45 52 45 49 4E 47 41 42 45 4E 20 |RAMETEREINGABEN |
000004E0: 2B 2B 2B 2B 2B 2B 2B 00 09 0D 91 00 5A B2 30 3A |+++++++.....Z.0:|
000004F0: 53 50 B2 30 3A 8D 31 35 3A 99 22 46 55 4E 4B 54 |SP.0:.15:."FUNKT|
00000500: 49 4F 4E 20 59 3D 22 46 24 00 3F 0D 96 00 5A B2 |ION Y="F$.?...Z.|
00000510: 32 3A 8D 31 35 3A 99 22 28 46 41 4C 4C 53 20 53 |2:.15:."(FALLS S|
00000520: 49 45 20 4D 49 54 20 55 4E 53 54 45 54 49 47 4B |IE MIT UNSTETIGK|
00000530: 45 49 54 45 4E 20 52 45 43 48 4E 45 4E 2C 22 00 |EITEN RECHNEN,".|
00000540: 6C 0D 9B 00 99 22 44 41 4E 4E 20 56 45 52 4D 45 |l...."DANN VERME|
00000550: 49 44 45 4E 20 53 49 45 20 45 53 2C 20 44 49 45 |IDEN SIE ES, DIE|
00000560: 20 50 4F 4C 53 54 45 4C 4C 45 4E 22 00 9A 0D A0 | POLSTELLEN"....|
00000570: 00 99 22 41 4C 53 20 50 41 52 41 4D 45 54 45 52 |.."ALS PARAMETER|
00000580: 20 28 58 55 2C 58 4F 2C 45 56 54 4C 2E 58 41 20 | (XU,XO,EVTL.XA |
00000590: 4F 44 45 52 20 58 45 29 20 22 00 C9 0D A5 00 99 |ODER XE) "......|
000005A0: 22 5A 55 20 56 45 52 57 45 4E 44 45 4E 2E 20 44 |"ZU VERWENDEN. D|
000005B0: 20 53 4F 4C 4C 54 45 20 44 41 4E 4E 20 4B 4C 45 | SOLLTE DANN KLE|
000005C0: 49 4E 20 53 45 49 4E 2E 22 00 EA 0D AA 00 5A B2 |IN SEIN.".....Z.|
000005D0: 37 3A 53 50 B2 31 30 3A 8D 31 35 3A 99 22 58 55 |7:SP.10:.15:."XU|
000005E0: 20 55 4E 44 20 58 4F 20 3D 22 00 0C 0E AF 00 5A | UND XO =".....Z|
000005F0: B2 31 34 3A 53 50 B2 31 30 3A 8D 31 35 3A 99 22 |.14:SP.10:.15:."|
00000600: 59 55 20 55 4E 44 20 59 4F 20 3D 22 00 47 0E B4 |YU UND YO =".G..|
00000610: 00 5A B2 31 36 3A 53 50 B2 30 3A 8D 31 35 3A 99 |.Z.16:SP.0:.15:.|
00000620: 22 53 50 45 5A 2E 20 5A 45 49 43 48 45 4E 42 45 |"SPEZ. ZEICHENBE|
00000630: 52 45 49 43 48 20 47 45 57 55 45 4E 53 43 48 54 |REICH GEWUENSCHT|
00000640: 28 4A 2F 4E 29 3F 22 00 75 0E B6 00 5A B2 32 32 |(J/N)?".u...Z.22|
00000650: 3A 53 50 B2 31 30 3A 8D 31 35 3A 99 22 53 43 48 |:SP.10:.15:."SCH|
00000660: 52 49 54 54 57 45 49 54 45 20 28 44 3D 43 41 2E |RITTWEITE (D=CA.|
00000670: 31 35 30 29 22 00 8E 0E B9 00 5A B2 37 3A 53 50 |150)".....Z.7:SP|
00000680: B2 32 35 3A 8D 31 35 3A 85 58 55 2C 58 4F 00 CC |.25:.15:.XU,XO..|
00000690: 0E BE 00 59 4D B2 B5 28 39 39 38 AC 28 58 4F AB |...YM..(998.(XO.|
000006A0: 58 55 29 AD 34 37 39 29 3A 5A B2 39 3A 53 50 B2 |XU).479):Z.9:SP.|
000006B0: 33 3A 8D 31 35 3A 99 22 59 55 20 4D 49 4E 49 4D |3:.15:."YU MINIM|
000006C0: 55 4D 20 3D 20 22 2C AB 59 4D AD 32 00 02 0F C3 |UM = ",.YM.2....|
000006D0: 00 5A B2 31 30 3A 53 50 B2 33 3A 8D 31 35 3A 99 |.Z.10:SP.3:.15:.|
000006E0: 22 59 4F 20 4D 41 58 49 4D 55 4D 20 3D 20 22 2C |"YO MAXIMUM = ",|
000006F0: 59 4D AD 32 3A 5A B2 31 31 3A 53 50 B2 30 3A 8D |YM.2:Z.11:SP.0:.|
00000700: 31 35 00 46 0F C8 00 99 22 28 44 49 45 20 53 55 |15.F...."(DIE SU|
00000710: 4D 4D 45 20 41 55 53 20 C2 59 55 C2 20 55 4E 44 |MME AUS .YU. UND|
00000720: 20 59 4F 20 44 41 52 46 20 22 59 4D 3A 99 22 20 | YO DARF "YM:." |
00000730: 4E 49 43 48 54 20 55 45 42 45 52 53 43 48 52 45 |NICHT UEBERSCHRE|
00000740: 49 54 45 4E 21 29 00 70 0F CD 00 5A B2 31 34 3A |ITEN!).p...Z.14:|
00000750: 53 50 B2 32 35 3A 8D 31 35 3A 85 59 55 2C 59 4F |SP.25:.15:.YU,YO|
00000760: 3A 8B 28 59 4F AB 59 55 29 B1 59 4D A7 32 30 35 |:.(YO.YU).YM.205|
00000770: 00 9C 0F D2 00 5A B2 31 36 3A 53 50 B2 33 36 3A |.....Z.16:SP.36:|
00000780: 8D 31 35 3A 85 41 24 3A 8B 41 24 B3 B1 22 4A 22 |.15:.A$:.A$.."J"|
00000790: AF 41 24 B3 B1 22 4E 22 A7 32 31 30 00 B9 0F D7 |.A$.."N".210....|
000007A0: 00 8B 41 24 B2 22 4E 22 A7 58 41 B2 58 55 3A 58 |..A$."N".XA.XU:X|
000007B0: 45 B2 58 4F 3A 89 32 33 32 00 E5 0F DC 00 5A B2 |E.XO:.232.....Z.|
000007C0: 31 38 3A 53 50 B2 33 3A 8D 31 35 3A 99 22 28 58 |18:SP.3:.15:."(X|
000007D0: 41 20 3E 20 58 55 20 55 4E 44 20 58 45 20 3C 20 |A > XU UND XE < |
000007E0: 58 4F 20 21 22 00 18 10 E1 00 5A B2 32 30 3A 53 |XO !".....Z.20:S|
000007F0: 50 B2 31 30 3A 8D 31 35 3A 99 22 58 41 20 55 4E |P.10:.15:."XA UN|
00000800: 44 20 58 45 20 3D 22 3A 53 50 B2 32 35 3A 8D 31 |D XE =":SP.25:.1|
00000810: 35 3A 85 58 41 2C 58 45 00 2E 10 E6 00 8B 58 41 |5:.XA,XE......XA|
00000820: B3 58 55 20 B0 58 45 B1 58 4F A7 32 32 35 00 44 |.XU .XE.XO.225.D|
00000830: 10 E8 00 5A B2 32 32 3A 53 50 B2 33 32 3A 8D 31 |...Z.22:SP.32:.1|
00000840: 35 3A 85 44 00 6A 10 EB 00 8F 20 2B 2B 2B 20 50 |5:.D.j.... +++ P|
00000850: 4C 4F 54 54 45 4E 20 41 4E 46 41 4E 47 53 57 45 |LOTTEN ANFANGSWE|
00000860: 52 54 45 20 2B 2B 2B 2B 2B 2B 00 93 10 F0 00 98 |RTE ++++++......|
00000870: 31 2C 22 48 22 3A 98 31 2C 22 4D 22 2C A5 54 28 |1,"H":.1,"M",.T(|
00000880: AB 58 55 29 2C AB A5 54 28 59 4F 29 3A 98 31 2C |.XU),..T(YO):.1,|
00000890: 22 49 22 00 C7 10 F5 00 58 31 B2 A5 54 28 58 55 |"I".....X1..T(XU|
000008A0: 29 AA 31 3A 58 32 B2 A5 54 28 58 4F 29 AB 31 3A |).1:X2..T(XO).1:|
000008B0: 59 31 B2 A5 54 28 59 4F 29 AB 31 3A 59 32 B2 A5 |Y1..T(YO).1:Y2..|
000008C0: 54 28 59 55 29 AA 31 00 ED 10 FA 00 8F 20 2B 2B |T(YU).1...... ++|
000008D0: 2B 20 50 4C 4F 54 54 45 4E 20 4B 4F 4F 52 44 49 |+ PLOTTEN KOORDI|
000008E0: 4E 41 54 45 4E 53 59 53 54 45 4D 20 2B 00 21 11 |NATENSYSTEM +.!.|
000008F0: FF 00 98 31 2C 22 52 22 2C 30 2C 59 31 3A 98 31 |...1,"R",0,Y1:.1|
00000900: 2C 22 4A 22 2C 30 2C 59 32 3A 98 31 2C 22 52 22 |,"J",0,Y2:.1,"R"|
00000910: 2C 58 32 2C 30 3A 98 31 2C 22 4A 22 2C 58 31 2C |,X2,0:.1,"J",X1,|
00000920: 30 00 47 11 04 01 8F 20 2B 2B 2B 20 50 4C 4F 54 |0.G.... +++ PLOT|
00000930: 54 45 4E 20 53 4B 41 4C 49 45 52 55 4E 47 20 2B |TEN SKALIERUNG +|
00000940: 2B 2B 2B 2B 2B 2B 2B 00 59 11 09 01 44 59 B2 28 |+++++++.Y...DY.(|
00000950: 58 4F AB 58 55 29 AD 34 37 00 84 11 0E 01 81 49 |XO.XU).47......I|
00000960: B2 58 55 AA 31 A4 58 4F AB 31 3A 4D B2 B5 28 49 |.XU.1.XO.1:M..(I|
00000970: 29 3A 98 31 2C 22 52 22 2C A5 54 28 4D 29 2C A5 |):.1,"R",.T(M),.|
00000980: 54 28 30 29 00 9D 11 13 01 98 31 2C 22 4A 22 2C |T(0)......1,"J",|
00000990: A5 54 28 4D 29 2C A5 54 28 AB 44 59 29 00 A4 11 |.T(M),.T(.DY)...|
000009A0: 18 01 82 49 00 CF 11 1D 01 81 49 B2 59 55 AA 31 |...I......I.YU.1|
000009B0: A4 59 4F AB 31 3A 4D B2 B5 28 49 29 3A 98 31 2C |.YO.1:M..(I):.1,|
000009C0: 22 52 22 2C A5 54 28 30 29 2C A5 54 28 4D 29 00 |"R",.T(0),.T(M).|
000009D0: E7 11 22 01 98 31 2C 22 4A 22 2C A5 54 28 44 59 |.."..1,"J",.T(DY|
000009E0: 29 2C A5 54 28 4D 29 00 F3 11 27 01 82 49 3A 98 |),.T(M)...'..I:.|
000009F0: 32 2C 30 00 19 12 2C 01 8F 20 2A 2A 2A 20 50 4C |2,0...,.. *** PL|
00000A00: 4F 54 54 45 4E 20 46 55 4E 4B 54 49 4F 4E 20 2B |OTTEN FUNKTION +|
00000A10: 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 42 12 31 01 8B A5 |+++++++++.B.1...|
00000A20: 54 28 A5 41 28 58 41 29 29 B1 59 31 A7 98 31 2C |T(.A(XA)).Y1..1,|
00000A30: 22 52 22 2C A5 54 28 58 41 29 2C 59 31 3A 89 33 |"R",.T(XA),Y1:.3|
00000A40: 32 30 00 6B 12 36 01 8B A5 54 28 A5 41 28 58 41 |20.k.6...T(.A(XA|
00000A50: 29 29 B3 59 32 A7 98 31 2C 22 52 22 2C A5 54 28 |)).Y2..1,"R",.T(|
00000A60: 58 41 29 2C 59 32 3A 89 33 32 30 00 88 12 3B 01 |XA),Y2:.320...;.|
00000A70: 98 31 2C 22 52 22 2C A5 54 28 58 41 29 2C A5 54 |.1,"R",.T(XA),.T|
00000A80: 28 A5 41 28 58 41 29 29 00 9F 12 40 01 81 58 B2 |(.A(XA))...@..X.|
00000A90: 58 41 A4 58 45 A9 28 58 4F AB 58 55 29 AD 44 00 |XA.XE.(XO.XU).D.|
00000AA0: C6 12 45 01 8B A5 54 28 A5 41 28 58 29 29 B1 59 |..E...T(.A(X)).Y|
00000AB0: 31 A7 98 31 2C 22 52 22 2C A5 54 28 58 29 2C 59 |1..1,"R",.T(X),Y|
00000AC0: 31 3A 89 33 34 30 00 ED 12 4A 01 8B A5 54 28 A5 |1:.340...J...T(.|
00000AD0: 41 28 58 29 29 B3 59 32 A7 98 31 2C 22 52 22 2C |A(X)).Y2..1,"R",|
00000AE0: A5 54 28 58 29 2C 59 32 3A 89 33 34 30 00 08 13 |.T(X),Y2:.340...|
00000AF0: 4F 01 98 31 2C 22 4A 22 2C A5 54 28 58 29 2C A5 |O..1,"J",.T(X),.|
00000B00: 54 28 A5 41 28 58 29 29 00 0F 13 54 01 82 58 00 |T(.A(X))...T..X.|
00000B10: 23 13 59 01 8B 28 58 4F AB 58 55 29 B1 32 35 A7 |#.Y..(XO.XU).25.|
00000B20: 34 30 35 00 49 13 5E 01 8F 20 2B 2B 2B 20 50 4C |405.I.^.. +++ PL|
00000B30: 4F 54 54 45 4E 20 45 49 4E 48 45 49 54 45 4E 5A |OTTEN EINHEITENZ|
00000B40: 41 48 4C 45 4E 20 2B 2B 2B 00 65 13 63 01 98 32 |AHLEN +++.e.c..2|
00000B50: 2C 33 3A 98 33 2C 30 3A 44 58 B2 28 58 4F AB 58 |,3:.3,0:DX.(XO.X|
00000B60: 55 29 AD 32 38 00 9B 13 68 01 81 49 B2 58 55 AA |U).28...h..I.XU.|
00000B70: 31 A4 58 4F AB 31 3A 4D B2 B5 28 49 29 3A 98 31 |1.XO.1:M..(I):.1|
00000B80: 2C 22 4D 22 2C A5 54 28 AB 58 55 29 2C AB A5 54 |,"M",.T(.XU),..T|
00000B90: 28 59 4F 29 3A 98 31 2C 22 49 22 00 BD 13 6D 01 |(YO):.1,"I"...m.|
00000BA0: 98 31 2C 22 52 22 2C A5 54 28 4D 29 2C A5 54 28 |.1,"R",.T(M),.T(|
00000BB0: AB 44 58 29 3A 8B 4D B2 30 A7 33 37 35 00 C7 13 |.DX):.M.0.375...|
00000BC0: 72 01 98 34 2C 4D 3B 00 CE 13 77 01 82 49 00 04 |r..4,M;...w..I..|
00000BD0: 14 7C 01 81 49 B2 59 55 AA 31 A4 59 4F AB 31 3A |.|..I.YU.1.YO.1:|
00000BE0: 4D B2 B5 28 49 29 3A 98 31 2C 22 4D 22 2C A5 54 |M..(I):.1,"M",.T|
00000BF0: 28 AB 58 55 29 2C AB A5 54 28 59 4F 29 3A 98 31 |(.XU),..T(YO):.1|
00000C00: 2C 22 49 22 00 25 14 81 01 98 31 2C 22 52 22 2C |,"I".%....1,"R",|
00000C10: A5 54 28 44 58 29 2C A5 54 28 4D 29 3A 8B 4D B2 |.T(DX),.T(M):.M.|
00000C20: 30 A7 33 39 35 00 2F 14 86 01 98 34 2C 4D 3B 00 |0.395./....4,M;.|
00000C30: 36 14 8B 01 82 49 00 5C 14 90 01 8F 20 2B 2B 2B |6....I.\.... +++|
00000C40: 20 50 4C 4F 54 54 45 4E 20 46 55 4E 4B 54 49 4F | PLOTTEN FUNKTIO|
00000C50: 4E 53 4E 41 4D 45 20 2B 2B 2B 2B 2B 00 65 14 95 |NSNAME +++++.e..|
00000C60: 01 98 32 2C 32 00 94 14 9A 01 98 31 2C 22 4D 22 |..2,2......1,"M"|
00000C70: 2C A5 54 28 AB 58 55 29 2C AB A5 54 28 59 4F 29 |,.T(.XU),..T(YO)|
00000C80: 3A 98 31 2C 22 49 22 3A 98 31 2C 22 52 22 2C 58 |:.1,"I":.1,"R",X|
00000C90: 31 2C 59 32 00 CC 14 9F 01 98 31 2C 22 4A 22 2C |1,Y2......1,"J",|
00000CA0: 58 32 2C 59 32 3A 98 31 2C 22 4A 22 2C 58 32 2C |X2,Y2:.1,"J",X2,|
00000CB0: 59 31 3A 98 31 2C 22 4A 22 2C 58 31 2C 59 31 3A |Y1:.1,"J",X1,Y1:|
00000CC0: 98 31 2C 22 4A 22 2C 58 31 2C 59 32 00 F4 14 A4 |.1,"J",X1,Y2....|
00000CD0: 01 98 34 3A 98 34 3A 98 32 2C 31 3A 98 33 2C 31 |..4:.4:.2,1:.3,1|
00000CE0: 3A 98 34 2C 22 59 20 3D 20 22 46 24 3A 98 34 3A |:.4,"Y = "F$:.4:|
00000CF0: 98 32 2C 30 00 1A 15 A9 01 8F 20 2B 2B 2B 20 50 |.2,0...... +++ P|
00000D00: 4C 4F 54 54 45 52 4B 41 4E 41 45 4C 45 20 53 43 |LOTTERKANAELE SC|
00000D10: 48 4C 49 45 53 53 45 4E 20 2B 00 2A 15 AE 01 A0 |HLIESSEN +.*....|
00000D20: 31 3A A0 32 3A A0 33 3A A0 34 00 30 15 B3 01 80 |1:.2:.3:.4.0....|
00000D30: 00 00 00 |... |
..).... ********************************
*.Q.... *
*.Y.... * PLOTTEN BELIEBIGER FUNKTIONEN
*...... * MIT DEM PRINTER/PLOTTER 1520
*.I.... *
*...... * HEIMO PONNATH HAMBURG 1985
*...... *
*.A.... ********************************
*.J.... 25.Q.... ++++++++ UP CURSOR SETZ
EN ++++++......211,SP:.214,Z:.58640:....
... ++++++++ HAUPTPROGRAMM TEIL 1 ++.N..
..G(147):Z.10:SP.1:.15......"IM PROGRAMM
BEFINDET SICH DIE FUNKTION:".!.#.K.1:.9
0:K.0:.:."Y= "F$:Z.18:.15.^.(..G(18)"A"G
(146)"LTE ODER "G(18)"N"G(146)"EUE FUNKT
ION ?".Z.-..A$:.A$.."A".A$.."N".45...2..
A$."A".85...7.. ++ NEUE FUNKTION INS PRO
GRAMM ++...<.Z.20:SP.3:.15:."NEUE FUNKTI
ON:":."Y= ";F$:.646,6...A..G(147)G(17)G(
17)"90F$="G(34)F$G(34).5.F.."95DEFFNA(X)
="F$:."RUN85":.G(19);.Z.K..631,13:.632,1
3:.633,13:.198,3:....P.. ++++++++ HAUPTP
ROGRAMM TEIL 2 ++...U..G(147):.646,14...
Z.F$."X^2/2"..._...A(X).X.2.2...D..K.1..
...I.. ++++ VARIABLE UND FUNKTIONEN ++..
.N...T(X)..(479.(XO.XU).X).:.S.X.0:Z.0:S
P.0:XU..1:XO.5:YU..1:YO.5:YM.6:XA.XU:XE.
XO.N.X.X1.0:X2.0:Y1.0:Y2.0:D.150:DY..1:I
.10:M.10:DX..2.X.}.A$.""...... +++ PLOTT
ERKANAELE OEFFNEN ++++.A....1,6,1:.4,6:.
2,6,2:.3,6,3:.2,3...... +++++ PARAMETERE
INGABEN +++++++.....Z.0:SP.0:.15:."FUNKT
ION Y="F$.?...Z.2:.15:."(FALLS SIE MIT U
NSTETIGKEITEN RECHNEN,".L...."DANN VERME
IDEN SIE ES, DIE POLSTELLEN"... .."ALS P
ARAMETER (XU,XO,EVTL.XA ODER XE) ".I....
"ZU VERWENDEN. D SOLLTE DANN KLEIN SEIN.
".....Z.7:SP.10:.15:."XU UND XO =".....Z
.14:SP.10:.15:."YU UND YO =".G...Z.16:SP
.0:.15:."SPEZ. ZEICHENBEREICH GEWUENSCHT
(J/N)?".U...Z.22:SP.10:.15:."SCHRITTWEIT
E (D=CA.150)".....Z.7:SP.25:.15:.XU,XO.L
...YM..(998.(XO.XU).479):Z.9:SP.3:.15:."
YU MINIMUM = ",.YM.2...C.Z.10:SP.3:.15:.
"YO MAXIMUM = ",YM.2:Z.11:SP.0:.15.F.H..
"(DIE SUMME AUS BYUB UND YO DARF "YM:."
NICHT UEBERSCHREITEN!).P.M.Z.14:SP.25:.1
5:.YU,YO:.(YO.YU).YM.205...R.Z.16:SP.36:
.15:.A$:.A$.."J".A$.."N".210...W..A$."N"
.XA.XU:XE.XO:.232.....Z.18:SP.3:.15:."(X
A > XU UND XE < XO !".....Z.20:SP.10:.15
:."XA UND XE =":SP.25:.15:.XA,XE......XA
.XU .XE.XO.225.D...Z.22:SP.32:.15:.D.J..
.. +++ PLOTTEN ANFANGSWERTE ++++++......
1,"H":.1,"M",.T(.XU),..T(YO):.1,"I".G...
X1..T(XU).1:X2..T(XO).1:Y1..T(YO).1:Y2..
T(YU).1...... +++ PLOTTEN KOORDINATENSYS
TEM +.!....1,"R",0,Y1:.1,"J",0,Y2:.1,"R"
,X2,0:.1,"J",X1,0.G.... +++ PLOTTEN SKAL
IERUNG ++++++++.Y...DY.(XO.XU).47......I
.XU.1.XO.1:M..(I):.1,"R",.T(M),.T(0)....
..1,"J",.T(M),.T(.DY)......I.O....I.YU.1
.YO.1:M..(I):.1,"R",.T(0),.T(M)..."..1,"
J",.T(DY),.T(M)...'..I:.2,0...,.. *** PL
OTTEN FUNKTION ++++++++++.B.1...T(.A(XA)
).Y1..1,"R",.T(XA),Y1:.320.K.6...T(.A(XA
)).Y2..1,"R",.T(XA),Y2:.320...;..1,"R",.
T(XA),.T(.A(XA))...@..X.XA.XE.(XO.XU).D.
F.E...T(.A(X)).Y1..1,"R",.T(X),Y1:.340..
.J...T(.A(X)).Y2..1,"R",.T(X),Y2:.340...
O..1,"J",.T(X),.T(.A(X))...T..X.#.Y..(XO
.XU).25.405.I.^.. +++ PLOTTEN EINHEITENZ
AHLEN +++.E.C..2,3:.3,0:DX.(XO.XU).28...
H..I.XU.1.XO.1:M..(I):.1,"M",.T(.XU),..T
(YO):.1,"I"...M..1,"R",.T(M),.T(.DX):.M.
0.375.G.R..4,M;.N.W..I...|..I.YU.1.YO.1:
M..(I):.1,"M",.T(.XU),..T(YO):.1,"I".%..
..1,"R",.T(DX),.T(M):.M.0.395./....4,M;.
6....I.\.... +++ PLOTTEN FUNKTIONSNAME +
++++.E....2,2......1,"M",.T(.XU),..T(YO)
:.1,"I":.1,"R",X1,Y2.L....1,"J",X2,Y2:.1
,"J",X2,Y1:.1,"J",X1,Y1:.1,"J",X1,Y2....
..4:.4:.2,1:.3,1:.4,"Y = "F$:.4:.2,0....
.. +++ PLOTTERKANAELE SCHLIESSEN +.*...
1: 2: 3: 4.0.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL