KURVETEGNING
FILE INFORMATION
FILENAME(S): KURVETEGNING
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 19:47:13
APPEARS ON: 2 disk(s)
FILE HASH
238458e837f70976c0b17cd1a1c32110275602601b51b40544f6beefafaf0579
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK 42 | KURVETEGNING | PRG | Curtcool, Frank | 20 | 8 | DOWNLOAD FILE |
| ANNI | KURVETEGNING | PRG | Curtcool, Frank | 20 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 01 00 8F 2A 2A 2A 43 4F 50 59 52 49 |..#....***COPYRI| 00000010: 47 48 54 20 4A 55 53 54 20 52 2E 2D 44 41 54 41 |GHT JUST R.-DATA| 00000020: 2A 2A 2A 00 2C 08 02 00 41 51 B2 31 00 4A 08 0A |***.,...AQ.1.J..| 00000030: 00 97 35 33 32 38 30 2C 35 3A 97 35 33 32 38 31 |..53280,5:.53281| 00000040: 2C 35 3A 99 C7 28 31 34 34 29 00 82 08 64 00 4F |,5:..(144)...d.O| 00000050: 24 B2 22 93 12 20 20 20 92 20 4B 55 52 56 45 54 |$.".. . KURVET| 00000060: 45 47 4E 49 4E 47 20 12 20 20 20 20 20 20 20 20 |EGNING . | 00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 | .| 00000080: 11 22 00 8A 08 6E 00 99 4F 24 00 B9 08 78 00 99 |."...n..O$...x..| 00000090: 22 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............| 000000A0: D5 C9 22 3A 99 22 CA 52 20 43 4F 50 59 52 49 47 |..":.".R COPYRIG| 000000B0: 48 54 20 20 20 31 39 38 33 00 EA 08 82 00 99 22 |HT 1983......"| 000000C0: 20 20 20 4A 55 53 54 20 52 2E 2D 44 41 54 41 20 | JUST R.-DATA | 000000D0: 41 50 53 22 3A 99 22 20 20 20 44 4B 20 38 37 30 |APS":." DK 870| 000000E0: 30 20 20 48 4F 52 53 45 4E 53 00 FD 08 8C 00 A1 |0 HORSENS......| 000000F0: 54 24 3A 8B 54 24 B2 22 22 A7 31 34 30 00 05 09 |T$:.T$."".140...| 00000100: 1A 04 99 4F 24 00 27 09 24 04 99 22 53 4B 52 49 |...O$.'.$.."SKRI| 00000110: 56 20 46 55 4E 4B 54 49 4F 4E 45 4E 20 49 20 42 |V FUNKTIONEN I B| 00000120: 41 53 49 43 20 3A 22 00 45 09 2E 04 9F 31 2C 30 |ASIC :".E....1,0| 00000130: 3A 99 22 11 46 28 58 29 3D 22 3B 3A 84 31 2C 46 |:.".F(X)=";:.1,F| 00000140: 55 24 3A A0 31 00 7D 09 38 04 99 22 93 11 11 31 |U$:.1.}.8.."...1| 00000150: 31 31 30 44 45 46 20 46 4E 20 46 28 58 29 3D 22 |110DEF FN F(X)="| 00000160: 3B C8 28 46 55 24 2C 36 30 29 3A 99 22 46 55 24 |;.(FU$,60):."FU$| 00000170: 3D 22 3B C7 28 33 34 29 3B 46 55 24 3B 00 98 09 |=";.(34);FU$;...| 00000180: 42 04 99 C7 28 33 34 29 3A 99 22 11 11 47 4F 54 |B...(34):."..GOT| 00000190: 4F 31 31 31 30 13 22 3B 00 BD 09 4C 04 97 31 39 |O1110.";...L..19| 000001A0: 38 2C 33 3A 97 36 33 31 2C 31 33 3A 97 36 33 32 |8,3:.631,13:.632| 000001B0: 2C 31 33 3A 97 36 33 33 2C 31 33 3A 80 00 D0 09 |,13:.633,13:....| 000001C0: 56 04 96 20 A5 20 46 28 58 29 B2 BF 20 28 58 29 |V.. . F(X).. (X)| 000001D0: 00 08 0A 5B 04 4F 24 B2 22 93 12 20 20 20 92 20 |...[.O$.".. . | 000001E0: 4B 55 52 56 45 54 45 47 4E 49 4E 47 20 12 20 20 |KURVETEGNING . | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000200: 20 20 20 20 20 92 11 22 00 32 0A 5C 04 99 4F 24 | ..".2.\..O$| 00000210: 3A 96 A5 54 34 28 58 29 B2 B5 28 58 AC 31 45 34 |:..T4(X)..(X.1E4| 00000220: AA 2E 35 29 AD 31 45 34 3A 54 53 B2 C2 28 37 38 |..5).1E4:TS..(78| 00000230: 34 29 00 3E 0A 60 04 86 5A 45 28 31 35 29 00 53 |4).>.`..ZE(15).S| 00000240: 0A 6A 04 81 49 B2 30 A4 31 35 3A 87 5A 45 28 49 |.j..I.0.15:.ZE(I| 00000250: 29 3A 82 00 73 0A 74 04 41 28 31 29 B2 38 3A 41 |):..s.t.A(1).8:A| 00000260: 28 32 29 B2 34 3A 41 28 33 29 B2 33 3A 41 28 34 |(2).4:A(3).3:A(4| 00000270: 29 B2 31 00 8E 0A 7E 04 81 49 B2 31 A4 33 38 3A |).1...~..I.1.38:| 00000280: 41 24 B2 41 24 AA C7 28 31 37 35 29 3A 82 00 AB |A$.A$..(175):...| 00000290: 0A 88 04 99 4F 24 3A 3A 99 22 11 11 46 28 58 29 |....O$::."..F(X)| 000002A0: 3D 22 3B 46 55 24 3B 22 11 11 22 00 BD 0A 92 04 |=";FU$;"..".....| 000002B0: 99 22 11 12 20 31 20 92 20 50 4C 4F 54 00 F1 0A |.".. 1 . PLOT...| 000002C0: 9C 04 8F 2A 50 52 49 4E 54 22 11 12 20 32 20 92 |...*PRINT".. 2 .| 000002D0: 20 50 4C 4F 54 20 4F 47 20 55 44 53 4B 52 49 46 | PLOT OG UDSKRIF| 000002E0: 54 20 50 5D 20 43 42 4D 20 50 52 49 4E 54 45 52 |T P] CBM PRINTER| 000002F0: 22 00 0C 0B A6 04 99 22 11 12 20 32 20 92 20 54 |"......".. 2 . T| 00000300: 41 42 45 4C 56 5B 52 44 49 45 52 22 00 26 0B AB |ABELV[RDIER".&..| 00000310: 04 99 22 11 12 20 33 20 92 20 4E 59 20 46 55 4E |..".. 3 . NY FUN| 00000320: 4B 54 49 4F 4E 22 00 38 0B B0 04 99 22 11 12 20 |KTION".8....".. | 00000330: 34 20 92 20 53 4C 55 54 00 52 0B C4 04 99 22 11 |4 . SLUT.R....".| 00000340: 12 20 20 20 92 20 53 56 41 52 20 4D 45 44 20 54 |. . SVAR MED T| 00000350: 41 4C 00 68 0B CE 04 A1 54 41 24 3A 8B 54 41 24 |AL.h....TA$:.TA$| 00000360: B2 22 22 A7 31 32 33 30 00 77 0B D8 04 8B 54 41 |."".1230.w....TA| 00000370: 24 B2 22 34 22 A7 80 00 92 0B E2 04 91 C5 28 54 |$."4".........(T| 00000380: 41 24 29 89 31 32 37 30 2C 31 36 38 30 2C 31 30 |A$).1270,1680,10| 00000390: 35 30 00 9C 0B EC 04 89 31 32 33 30 00 A2 0B F6 |50......1230....| 000003A0: 04 3A 00 D1 0B 00 05 99 4F 24 3A 99 22 11 20 2A |.:......O$:.". *| 000003B0: 2A 2A 20 50 4C 4F 54 20 41 46 20 46 55 4E 4B 54 |** PLOT AF FUNKT| 000003C0: 49 4F 4E 45 4E 20 46 28 58 29 20 2A 2A 2A 11 11 |IONEN F(X) ***..| 000003D0: 22 00 E7 0B 0A 05 85 22 4D 49 4E 2E 20 56 5B 52 |"......"MIN. V[R| 000003E0: 44 49 20 22 3B 4D 49 00 FD 0B 0F 05 85 22 4D 41 |DI ";MI......"MA| 000003F0: 58 2E 20 56 5B 52 44 49 20 22 3B 4D 41 00 1E 0C |X. V[RDI ";MA...| 00000400: 14 05 53 B2 28 4D 41 AB 4D 49 29 AD 37 35 3A 47 |..S.(MA.MI).75:G| 00000410: 52 B2 A5 46 28 4D 49 29 3A 50 4F B2 AB 31 00 46 |R..F(MI):PO..1.F| 00000420: 0C 1E 05 81 58 B2 4D 49 A4 4D 41 A9 53 3A 59 B2 |....X.MI.MA.S:Y.| 00000430: A5 46 28 58 29 3A 8B B6 28 59 29 B1 47 52 A7 47 |.F(X):..(Y).GR.G| 00000440: 52 B2 B6 28 59 29 00 58 0C 28 05 8B 58 B3 B2 30 |R..(Y).X.(..X..0| 00000450: A7 50 4F B2 50 4F AA 31 00 76 0C 32 05 82 3A 58 |.PO.PO.1.v.2..:X| 00000460: B2 30 3A 50 4F B2 50 4F AA 31 3A 8B 4D 49 B1 B2 |.0:PO.PO.1:.MI..| 00000470: 30 A7 50 4F B2 30 00 A3 0C 3B 05 8F 2A 2A 46 4F |0.PO.0...;..**FO| 00000480: 52 49 49 3D 35 35 32 39 36 54 4F 35 36 32 39 35 |RII=55296TO56295| 00000490: 3A 50 4F 4B 45 49 49 2C 30 3A 4E 45 58 54 2A 2A |:POKEII,0:NEXT**| 000004A0: 2A 2A 2A 00 D0 0C 3C 05 99 22 93 11 11 11 11 11 |***...<.."......| 000004B0: 11 11 11 11 11 11 11 22 3B 41 24 3B 22 58 22 3B |.......";A$;"X";| 000004C0: 22 13 22 3B 3A 8B 54 53 B3 B1 31 A7 31 33 39 30 |".";:.TS..1.1390| 000004D0: 00 E9 0C 46 05 58 B2 50 4F 3A 81 59 B2 30 A4 34 |...F.X.PO:.Y.0.4| 000004E0: 39 3A 8D 31 38 39 30 3A 82 00 0A 0D 50 05 50 4C |9:.1890:....P.PL| 000004F0: B2 B6 28 4D 49 29 3A 46 41 B2 32 34 AD 47 52 3A |..(MI):FA.24.GR:| 00000500: 8B 4D 49 B1 30 A7 50 4C B2 30 00 3E 0D 5A 05 50 |.MI.0.PL.0.>.Z.P| 00000510: B2 B5 28 B6 28 50 4F AD 32 29 29 3A 99 A3 50 AA |..(.(PO.2)):..P.| 00000520: 31 29 3B B5 28 47 52 29 AA B5 28 28 47 52 AB B5 |1);.(GR)..((GR..| 00000530: 28 47 52 29 29 AC 31 30 30 29 AD 31 30 30 00 76 |(GR)).100).100.v| 00000540: 0D 64 05 99 22 11 11 11 11 11 22 3B A3 50 AA 31 |.d..".....";.P.1| 00000550: 29 3B B5 28 47 52 AD 32 29 AA B5 28 28 47 52 AD |);.(GR.2)..((GR.| 00000560: 32 AB B5 28 47 52 AD 32 29 29 AC 31 30 30 29 AD |2..(GR.2)).100).| 00000570: 31 30 30 AC 54 53 00 8A 0D 6E 05 99 22 11 11 11 |100.TS...n.."...| 00000580: 11 22 3B A3 50 AA 31 29 3B 30 00 C3 0D 78 05 99 |.";.P.1);0...x..| 00000590: 22 11 11 11 11 11 11 22 3B A3 50 AA 31 29 3B AB |"......";.P.1);.| 000005A0: 28 B5 28 47 52 AD 32 29 AA B5 28 28 47 52 AD 32 |(.(GR.2)..((GR.2| 000005B0: AB B5 28 47 52 AD 32 29 29 AC 31 30 30 29 AD 31 |..(GR.2)).100).1| 000005C0: 30 30 29 00 F6 0D 82 05 99 22 11 11 11 11 11 22 |00)......"....."| 000005D0: 3B A3 50 AA 31 29 3B AB 28 B5 28 47 52 29 AA B5 |;.P.1);.(.(GR)..| 000005E0: 28 28 47 52 AB B5 28 47 52 29 29 AC 31 30 30 29 |((GR..(GR)).100)| 000005F0: AD 31 30 30 29 3B 00 12 0E 8C 05 58 B2 AB 31 3A |.100);.....X..1:| 00000600: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............| 00000610: 22 3B 00 44 0E 96 05 99 22 1D 22 3B B5 28 4D 49 |";.D....".";.(MI| 00000620: 29 AA B5 28 28 4D 49 AB B5 28 4D 49 29 29 AC 31 |)..((MI..(MI)).1| 00000630: 30 30 29 AD 31 30 30 3B 3A 8B 4D 49 B1 B2 30 A7 |00).100;:.MI..0.| 00000640: 31 34 35 30 00 78 0E A0 05 99 A3 B6 28 50 4F AD |1450.x......(PO.| 00000650: 34 AB 31 29 29 3B B5 28 4D 49 AD 32 29 AA B5 28 |4.1));.(MI.2)..(| 00000660: 28 4D 49 AD 32 AB B5 28 4D 49 AD 32 29 29 AC 31 |(MI.2..(MI.2)).1| 00000670: 30 30 29 AD 31 30 30 3B 00 B7 0E AA 05 99 A3 50 |00).100;.......P| 00000680: 4F AD 32 AA 28 33 39 AB 50 4F AD 32 29 AD 32 AB |O.2.(39.PO.2).2.| 00000690: 32 2E 35 29 3B B5 28 4D 41 AD 32 29 AA B5 28 28 |2.5);.(MA.2)..((| 000006A0: 4D 41 AD 32 AB B5 28 4D 41 AD 32 29 29 AC 31 30 |MA.2..(MA.2)).10| 000006B0: 30 29 AD 31 30 30 3B 00 E2 0E B4 05 99 A3 33 35 |0).100;.......35| 000006C0: 29 3B B5 28 4D 41 29 AA B5 28 28 4D 41 AB B5 28 |);.(MA)..((MA..(| 000006D0: 4D 41 29 29 AC 31 30 30 29 AD 31 30 30 3B 22 13 |MA)).100).100;".| 000006E0: 22 3B 00 0A 0F BE 05 81 58 30 B2 4D 49 A4 4D 41 |";......X0.MI.MA| 000006F0: A9 53 3A 59 B2 B5 28 A5 46 28 58 30 29 AC 46 41 |.S:Y..(.F(X0).FA| 00000700: AA 32 35 29 3A 58 B2 58 AA 31 00 24 0F C8 05 8D |.25):X.X.1.$....| 00000710: 31 38 39 30 3A 82 3A 8B 54 41 24 B2 22 32 22 A7 |1890:.:.TA$."2".| 00000720: 31 35 32 30 00 43 0F D2 05 99 22 11 54 52 59 4B |1520.C....".TRYK| 00000730: 20 50 5D 20 54 49 4C 46 5B 4C 44 49 47 20 54 41 | P] TILF[LDIG TA| 00000740: 53 54 22 00 57 0F DC 05 A1 54 24 3A 8B 54 24 B2 |ST".W....T$:.T$.| 00000750: 22 22 A7 31 35 30 30 00 61 0F E6 05 89 31 31 36 |"".1500.a....116| 00000760: 30 00 80 0F F0 05 8F 20 2A 2A 55 44 53 4B 52 49 |0...... **UDSKRI| 00000770: 46 54 20 50 5D 20 50 52 49 4E 54 45 52 20 2A 2A |FT P] PRINTER **| 00000780: 00 A0 0F FA 05 9F 36 2C 34 2C 36 3A 98 36 2C C7 |......6,4,6:.6,.| 00000790: 28 32 33 29 3A A0 36 3A 9F 34 2C 34 3A 4E B2 30 |(23):.6:.4,4:N.0| 000007A0: 00 BD 0F 04 06 98 34 2C 22 50 4C 4F 54 20 41 46 |......4,"PLOT AF| 000007B0: 20 46 55 4E 4B 54 49 4F 4E 22 3A 98 34 00 D5 0F | FUNKTION":.4...| 000007C0: 0E 06 98 34 2C 22 46 28 58 29 3D 22 46 55 24 3A |...4,"F(X)="FU$:| 000007D0: 98 34 3A 98 34 00 FA 0F 18 06 98 34 2C 22 54 41 |.4:.4......4,"TA| 000007E0: 42 45 4C 3A 20 20 20 46 52 41 20 58 20 3D 22 4D |BEL: FRA X ="M| 000007F0: 49 22 20 54 49 4C 20 22 4D 41 00 00 10 22 06 3A |I" TIL "MA...".:| 00000800: 00 20 10 2C 06 98 34 2C 22 20 20 20 20 20 20 20 |. .,..4," | 00000810: 20 20 4D 45 44 20 53 54 45 50 20 50 5D 20 22 53 | MED STEP P] "S| 00000820: 00 2D 10 36 06 98 34 3A 98 34 3A 98 34 00 47 10 |.-.6..4:.4:.4.G.| 00000830: 40 06 81 41 44 B2 33 32 37 36 38 A4 33 34 37 36 |@..AD.32768.3476| 00000840: 37 3A 4E B2 4E AA 31 00 77 10 4A 06 50 B2 C2 28 |7:N.N.1.w.J.P..(| 00000850: 41 44 29 3A 8B 41 44 B2 33 32 38 31 30 A7 99 22 |AD):.AD.32810.."| 00000860: 13 1D 1D 1D 1D 1D 1D 1D 50 52 49 4E 54 45 52 2D |........PRINTER-| 00000870: 52 55 54 49 4E 45 22 00 92 10 54 06 8B 28 50 B1 |RUTINE"...T..(P.| 00000880: 34 34 AF 50 B3 35 38 29 B0 50 B2 33 32 A7 31 36 |44.P.58).P.32.16| 00000890: 35 30 00 AF 10 5E 06 8B 50 B1 39 36 AF 50 B3 31 |50...^..P.96.P.1| 000008A0: 32 38 A7 50 B2 50 AA 36 34 3A 89 31 36 35 30 00 |28.P.P.64:.1650.| 000008B0: C6 10 68 06 8B 50 B1 31 32 37 A7 50 B2 50 AB 36 |..h..P.127.P.P.6| 000008C0: 34 3A 4D 4D B2 31 00 EB 10 72 06 42 24 B2 C7 28 |4:MM.1...r.B$..(| 000008D0: 50 29 3A 8B 4D 4D B2 31 A7 42 24 B2 22 12 22 AA |P):.MM.1.B$.".".| 000008E0: 42 24 AA 22 92 22 3A 4D 4D B2 30 00 0E 11 7C 06 |B$.".":MM.0...|.| 000008F0: 5A 24 B2 5A 24 AA 42 24 3A 8B 4E B2 38 30 A7 98 |Z$.Z$.B$:.N.80..| 00000900: 34 2C 5A 24 3A 5A 24 B2 22 22 3A 4E B2 30 00 22 |4,Z$:Z$."":N.0."| 00000910: 11 86 06 82 3A A0 34 3A 99 22 13 22 3A 89 31 34 |....:.4:.".":.14| 00000920: 39 30 00 3B 11 90 06 8F 20 2A 2A 20 54 41 42 45 |90.;.... ** TABE| 00000930: 4C 56 5B 52 44 49 45 52 20 2A 2A 00 54 11 9A 06 |LV[RDIER **.T...| 00000940: 99 4F 24 3A 99 22 11 54 41 42 45 4C 56 5B 52 44 |.O$:.".TABELV[RD| 00000950: 49 45 52 22 00 66 11 A4 06 85 22 11 53 54 41 52 |IER".f....".STAR| 00000960: 54 20 20 22 3B 41 00 78 11 A6 06 85 22 11 53 4C |T ";A.x....".SL| 00000970: 55 54 20 20 20 22 3B 45 00 8A 11 A8 06 85 22 11 |UT ";E......".| 00000980: 53 50 52 49 4E 47 20 22 3B 53 00 99 11 AA 06 8B |SPRING ";S......| 00000990: 53 B3 B2 30 A7 31 37 30 34 00 C6 11 AE 06 8F 2A |S..0.1704......*| 000009A0: 49 4E 50 55 54 22 11 55 44 53 4B 52 49 46 54 20 |INPUT".UDSKRIFT | 000009B0: 50 5D 20 50 52 49 4E 54 45 52 20 28 4A 2F 4E 29 |P] PRINTER (J/N)| 000009C0: 20 22 3B 41 4E 24 00 D0 11 B3 06 89 31 37 34 30 | ";AN$......1740| 000009D0: 00 F7 11 B8 06 8F 2A 2A 49 46 41 4E 24 3C 3E 22 |......**IFAN$<>"| 000009E0: 4A 22 54 48 45 4E 50 52 49 4E 54 22 93 22 3A 47 |J"THENPRINT".":G| 000009F0: 4F 54 4F 31 37 34 30 00 16 12 C2 06 9F 36 2C 34 |OTO1740......6,4| 00000A00: 2C 36 3A 98 36 2C C7 28 32 38 29 3A A0 36 3A 9F |,6:.6,.(28):.6:.| 00000A10: 34 2C 34 3A 9D 34 00 39 12 CC 06 99 22 93 54 41 |4,4:.4.9....".TA| 00000A20: 42 45 4C 56 5B 52 44 49 45 52 20 46 4F 52 20 46 |BELV[RDIER FOR F| 00000A30: 55 4E 4B 54 49 4F 4E 45 4E 00 4B 12 D6 06 99 22 |UNKTIONEN.K...."| 00000A40: 46 28 58 29 3D 22 46 55 24 3A 99 00 73 12 E0 06 |F(X)="FU$:..s...| 00000A50: 99 22 54 41 42 45 4C 4F 4D 52 5D 44 45 3A 20 46 |."TABELOMR]DE: F| 00000A60: 52 41 20 58 20 3D 20 22 41 22 20 20 54 49 4C 20 |RA X = "A" TIL | 00000A70: 20 22 45 00 95 12 EA 06 99 22 20 20 20 20 20 20 | "E......" | 00000A80: 20 20 20 20 20 20 20 4D 45 44 20 53 54 45 50 20 | MED STEP | 00000A90: 50 5D 20 22 53 00 9D 12 F4 06 99 3A 99 00 C0 12 |P] "S......:....| 00000AA0: FE 06 99 22 20 58 2D 56 5B 52 44 49 45 52 20 20 |..." X-V[RDIER | 00000AB0: 20 20 20 20 20 20 20 59 2D 56 5B 52 44 49 45 52 | Y-V[RDIER| 00000AC0: 00 C6 12 08 07 3A 00 E0 12 12 07 4A 55 B2 30 3A |.....:.....JU.0:| 00000AD0: 81 58 B2 41 A4 45 A9 53 3A 4A 55 B2 4A 55 AA 31 |.X.A.E.S:JU.JU.1| 00000AE0: 00 12 13 1C 07 58 B2 A5 54 34 28 58 29 3A 58 24 |.....X..T4(X):X$| 00000AF0: B2 22 20 22 AA C8 28 C4 28 58 29 AA 22 20 20 20 |." "..(.(X)." | 00000B00: 20 20 20 20 20 20 20 20 20 22 2C 31 33 29 AA 22 | ",13)."| 00000B10: 20 22 00 1A 13 1D 07 A1 41 24 00 2F 13 1E 07 8B | "......A$./....| 00000B20: 41 24 B2 22 22 B0 54 53 B2 30 A7 31 38 33 30 00 |A$."".TS.0.1830.| 00000B30: 43 13 21 07 8B C6 28 41 24 29 B2 31 33 33 A7 31 |C.!...(A$).133.1| 00000B40: 36 38 30 00 56 13 26 07 99 58 24 3B A5 54 34 28 |680.V.&..X$;.T4(| 00000B50: A5 46 28 58 29 29 00 93 13 28 07 8B 4A 55 B3 B1 |.F(X))...(..JU..| 00000B60: 31 30 AF 4A 55 B3 B1 33 30 AF 4A 55 B3 B1 35 30 |10.JU..30.JU..50| 00000B70: AF 4A 55 B3 B1 37 30 AF 4A 55 B3 B1 39 30 AF 4A |.JU..70.JU..90.J| 00000B80: 55 B3 B1 31 31 30 AF 4A 55 B3 B1 31 33 30 A7 31 |U..110.JU..130.1| 00000B90: 38 34 30 00 A7 13 2A 07 A1 54 24 3A 8B 54 24 B2 |840...*..T$:.T$.| 00000BA0: 22 22 A7 31 38 33 34 00 CB 13 2C 07 99 22 93 20 |"".1834...,..". | 00000BB0: 58 2D 56 5B 52 44 49 45 52 20 20 20 20 20 20 20 |X-V[RDIER | 00000BC0: 20 20 59 2D 56 5B 52 44 49 45 52 00 D1 13 30 07 | Y-V[RDIER...0.| 00000BD0: 82 00 EA 13 3A 07 8B 41 4E 24 B2 22 4A 22 A7 98 |....:..AN$."J"..| 00000BE0: 34 3A A0 34 3A 89 31 31 36 30 00 F4 13 44 07 89 |4:.4:.1160...D..| 00000BF0: 31 34 39 30 00 FA 13 4E 07 3A 00 00 14 58 07 3A |1490...N.:...X.:| 00000C00: 00 18 14 62 07 8F 2A 2A 50 55 4E 4B 54 42 45 52 |...b..**PUNKTBER| 00000C10: 45 47 4E 49 4E 47 2A 2A 00 3A 14 6C 07 41 44 B2 |EGNING**.:.l.AD.| 00000C20: 31 30 32 34 AA B5 28 28 34 39 AB 59 29 AD 32 29 |1024..((49.Y).2)| 00000C30: AC 34 30 AA B5 28 58 AD 32 29 00 40 14 76 07 3A |.40..(X.2).@.v.:| 00000C40: 00 69 14 80 07 5A 30 B2 C2 28 41 44 29 3A 81 49 |.i...Z0..(AD):.I| 00000C50: B2 30 A4 31 35 3A 8B 5A 30 B2 5A 45 28 49 29 B0 |.0.15:.Z0.ZE(I).| 00000C60: 54 53 B2 30 A7 50 30 B2 49 00 7A 14 8A 07 82 3A |TS.0.P0.I.z....:| 00000C70: 50 31 B2 31 3A 50 39 B2 50 30 00 9B 14 94 07 8B |P1.1:P9.P0......| 00000C80: 59 AD 32 B3 B1 B5 28 59 AD 32 29 AF 58 AD 32 B2 |Y.2...(Y.2).X.2.| 00000C90: B5 28 58 AD 32 29 A7 50 31 B2 32 00 BC 14 9E 07 |.(X.2).P1.2.....| 00000CA0: 8B 59 AD 32 B2 B5 28 59 AD 32 29 AF 58 AD 32 B3 |.Y.2..(Y.2).X.2.| 00000CB0: B1 B5 28 58 AD 32 29 A7 50 31 B2 34 00 DE 14 A8 |..(X.2).P1.4....| 00000CC0: 07 8B 59 AD 32 B3 B1 B5 28 59 AD 32 29 AF 58 AD |..Y.2...(Y.2).X.| 00000CD0: 32 B3 B1 B5 28 58 AD 32 29 A7 50 31 B2 38 00 EE |2...(X.2).P1.8..| 00000CE0: 14 B2 07 57 25 B2 30 3A 81 49 B2 31 A4 34 00 0D |...W%.0:.I.1.4..| 00000CF0: 15 BC 07 8B 50 39 B1 B2 41 28 49 29 A7 50 39 B2 |....P9..A(I).P9.| 00000D00: 50 39 AB 41 28 49 29 3A 89 32 30 30 30 00 19 15 |P9.A(I):.2000...| 00000D10: C6 07 82 3A 89 32 30 32 30 00 31 15 D0 07 8B 41 |...:.2020.1....A| 00000D20: 28 49 29 B2 50 31 AF 50 39 B1 B2 30 A7 57 25 B2 |(I).P1.P9..0.W%.| 00000D30: 31 00 3B 15 DA 07 89 31 39 39 30 00 52 15 E4 07 |1.;....1990.R...| 00000D40: 8B 57 25 B2 54 53 A7 50 32 B2 50 30 3A 89 32 30 |.W%.TS.P2.P0:.20| 00000D50: 34 30 00 5F 15 EE 07 50 32 B2 50 30 AA 50 31 00 |40._...P2.P0.P1.| 00000D60: 7F 15 F8 07 97 28 41 44 AA 35 34 32 37 32 29 2C |.....(AD.54272),| 00000D70: 54 53 3A 97 41 44 2C 5A 45 28 50 32 29 3A 8E 00 |TS:.AD,ZE(P2):..| 00000D80: C1 15 02 08 83 33 32 2C 31 32 33 2C 31 32 36 2C |.....32,123,126,| 00000D90: 39 37 2C 31 30 38 2C 39 38 2C 31 32 37 2C 32 35 |97,108,98,127,25| 00000DA0: 32 2C 31 32 34 2C 32 35 35 2C 32 32 36 2C 32 33 |2,124,255,226,23| 00000DB0: 36 2C 32 32 35 2C 32 35 34 2C 32 35 31 2C 31 36 |6,225,254,251,16| 00000DC0: 30 00 00 FF |0... |
..#....***COPYRIGHT JUST R.-DATA***.,...
AQ.1.J....53280,5:.53281,5:.G(144)...D.O
$.".. . KURVETEGNING .
.."...N..O$...X.."...............
UI":."JR COPYRIGHT 1983......" JUST
R.-DATA APS":." DK 8700 HORSENS......
T$:.T$."".140......O$.'.$.."SKRIV FUNKTI
ONEN I BASIC :".E....1,0:.".F(X)=";:.1,F
U$: 1.}.8.."...1110DEF FN F(X)=";H(FU$,6
0):."FU$=";G(34);FU$;...B..G(34):."..GOT
O1110.";...L..198,3:.631,13:.632,13:.633
,13:..P.V.. . F(X).. (X)...[.O$.".. .
KURVETEGNING . .."
.2.\..O$:..T4(X)..(X.1E4..5).1E4:TS.B(78
4).>.`..ZE(15).S.J..I.0.15:.ZE(I):..S.T.
A(1).8:A(2).4:A(3).3:A(4).1...~..I.1.38:
A$.A$.G(175):.......O$::."..F(X)=";FU$;"
.."......".. 1 . PLOT......*PRINT".. 2 .
PLOT OG UDSKRIFT P] CBM PRINTER"......"
.. 2 . TABELV[RDIER".&....".. 3 . NY FUN
KTION".8....".. 4 . SLUT.R.D..".. . SV
AR MED TAL.H.N..TA$:.TA$."".1230.W.X..TA
$."4"........E(TA$).1270,1680,1050......
1230.....:.Q....O$:.". *** PLOT AF FUNKT
IONEN F(X) ***.."......"MIN. V[RDI ";MI.
....."MAX. V[RDI ";MA.....S.(MA.MI).75:G
R..F(MI):PO..1.F....X.MI.MA.S:Y..F(X):..
(Y).GR.GR..(Y).X.(..X..0.PO.PO.1.V.2..:X
.0:PO.PO.1:.MI..0.PO.0...;..**FORII=5529
6TO56295:POKEII,0:NEXT*****.P.<.."......
.......";A$;"X";".";:.TS..1.1390...F.X.P
O:.Y.0.49:.1890:....P.PL..(MI):FA.24.GR:
.MI.0.PL.0.>.Z.P..(.(PO.2)):..P.1);.(GR)
..((GR..(GR)).100).100.V.D..".....";.P.1
);.(GR.2)..((GR.2..(GR.2)).100).100.TS..
.N.."....";.P.1);0.C.X.."......";.P.1);.
(.(GR.2)..((GR.2..(GR.2)).100).100).....
.".....";.P.1);.(.(GR)..((GR..(GR)).100)
.100);.....X..1:."..............";.D....
".";.(MI)..((MI..(MI)).100).100;:.MI..0.
1450.X. ....(PO.4.1));.(MI.2)..((MI.2..(
MI.2)).100).100;.......PO.2.(39.PO.2).2.
2.5);.(MA.2)..((MA.2..(MA.2)).100).100;.
......35);.(MA)..((MA..(MA)).100).100;".
";......X0.MI.MA.S:Y..(.F(X0).FA.25):X.X
.1.$.H..1890:.:.TA$."2".1520.C.R..".TRYK
P] TILF[LDIG TAST".W....T$:.T$."".1500.
A....1160...... **UDSKRIFT P] PRINTER **
. ....6,4,6:.6,G(23): 6:.4,4:N.0......4,
"PLOT AF FUNKTION":.4.U....4,"F(X)="FU$:
.4:.4......4,"TABEL: FRA X ="MI" TIL "
MA...".:. .,..4," MED STEP P] "S
.-.6..4:.4:.4.G.@..AD.32768.34767:N.N.1.
W.J.P.B(AD):.AD.32810.."........PRINTER-
RUTINE"...T..(P.44.P.58).P.32.1650...^..
P.96.P.128.P.P.64:.1650.F.H..P.127.P.P.6
4:MM.1...R.B$.G(P):.MM.1.B$.".".B$.".":M
M.0...|.Z$.Z$.B$:.N.80..4,Z$:Z$."":N.0."
....: 4:.".":.1490.;.... ** TABELV[RDIER
**.T....O$:.".TABELV[RDIER".F....".STAR
T ";A.X....".SLUT ";E......".SPRING "
;S......S..0.1704.F....*INPUT".UDSKRIFT
P] PRINTER (J/N) ";AN$.P....1740......**
IFAN$<>"J"THENPRINT".":GOTO1740...B..6,4
,6:.6,G(28): 6:.4,4:.4.9.L..".TABELV[RDI
ER FOR FUNKTIONEN.K.V.."F(X)="FU$:..S...
."TABELOMR]DE: FRA X = "A" TIL "E.....
." MED STEP P] "S......:....
..." X-V[RDIER Y-V[RDIER.F...:..
...JU.0:.X.A.E.S:JU.JU.1.....X..T4(X):X$
." ".H(D(X)." ",13)." "......
A$./....A$."".TS.0.1830.C.!..F(A$).133.1
680.V.&..X$;.T4(.F(X))...(..JU..10.JU..3
0.JU..50.JU..70.JU..90.JU..110.JU..130.1
840...*..T$:.T$."".1834.K.,..". X-V[RDIE
R Y-V[RDIER.Q.0.....:..AN$."J"..
4: 4:.1160...D..1490...N.:...X.:...B..**
PUNKTBEREGNING**.:.L.AD.1024..((49.Y).2)
.40..(X.2).@.V.:.I...Z0.B(AD):.I.0.15:.Z
0.ZE(I).TS.0.P0.I.Z....:P1.1:P9.P0......
Y.2...(Y.2).X.2..(X.2).P1.2......Y.2..(Y
.2).X.2...(X.2).P1.4......Y.2...(Y.2).X.
2...(X.2).P1.8.....W%.0:.I.1.4......P9..
A(I).P9.P9.A(I):.2000...F..:.2020.1.P..A
(I).P1.P9..0.W%.1.;.Z..1990.R....W%.TS.P
2.P0:.2040._...P2.P0.P1.....(AD.54272),
TS:.AD,ZE(P2):..A....32,123,126,97,108,9
8,127,252,124,255,226,236,225,254,251,16
0...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL