FUNKTIONSPLOTTER
FILE INFORMATION
FILENAME(S): FUNKTIONSPLOTTER
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-02 16:39:35
APPEARS ON: 2 disk(s)
FILE HASH
b4ae3c5b4a406b4681790985232ff731893e923e2bcec430d7afe3211a531a47
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SUPERGRAPHIKBUCH | FUNKTIONSPLOTTER | PRG | swasti, dinkel, Treasure Chest - Plattfuss | 25 | 2 | DOWNLOAD FILE |
| SUPERGRAPHIKBUCH | FUNKTIONSPLOTTER | PRG | DuncanTwain | 25 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 21 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..!.d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 00 41 08 6E 00 8F 20 2A 2A 20 20 20 20 20 20 |*.A.n.. ** |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *|
00000040: 2A 00 61 08 78 00 8F 20 2A 2A 20 20 46 55 4E 4B |*.a.x.. ** FUNK|
00000050: 54 49 4F 4E 45 4E 50 4C 4F 54 54 45 52 20 20 2A |TIONENPLOTTER *|
00000060: 2A 00 81 08 82 00 8F 20 2A 2A 20 20 20 20 20 20 |*...... ** |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *|
00000080: 2A 00 A1 08 8C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...... ********|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000A0: 2A 00 A7 08 96 00 8F 00 AD 08 A0 00 8F 00 C5 08 |*...............|
000000B0: AA 00 8F 20 44 45 46 20 46 4E 20 2D 20 52 4F 55 |... DEF FN - ROU|
000000C0: 54 49 4E 45 3A 00 DD 08 B4 00 8F 20 2A 2A 2A 2A |TINE:...... ****|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E3 08 |*************...|
000000E0: BE 00 8F 00 FB 08 C8 00 8C 3A 86 20 41 24 28 32 |.........:. A$(2|
000000F0: 35 29 3A 99 20 C7 28 31 34 37 29 00 31 09 D2 00 |5):. .(147).1...|
00000100: 99 20 22 47 45 42 45 4E 20 53 49 45 20 45 49 4E |. "GEBEN SIE EIN|
00000110: 45 20 42 45 4C 49 45 42 49 47 45 20 46 55 4E 4B |E BELIEBIGE FUNK|
00000120: 54 49 4F 4E 20 45 49 4E 20 3A 22 3A 99 3A 99 3A |TION EIN :":.:.:|
00000130: 99 00 4E 09 DC 00 8D 20 33 38 30 20 3A 20 8F 20 |..N.... 380 : . |
00000140: 45 49 4E 47 41 42 45 52 4F 55 54 49 4E 45 00 69 |EINGABEROUTINE.i|
00000150: 09 E6 00 41 44 B2 32 36 38 34 AB 31 3A 8F 20 50 |...AD.2684.1:. P|
00000160: 4F 4B 45 2D 53 54 41 52 54 00 95 09 F0 00 81 20 |OKE-START...... |
00000170: 58 B2 31 20 A4 20 32 35 3A 87 20 41 24 28 58 29 |X.1 . 25:. A$(X)|
00000180: 3A 82 20 58 3A 8F 20 44 41 54 45 4E 20 45 49 4E |:. X:. DATEN EIN|
00000190: 4C 45 53 45 4E 00 AC 09 FA 00 81 58 B2 31 A4 C3 |LESEN......X.1..|
000001A0: 28 41 24 29 3A 41 44 B2 41 44 AA 31 00 DD 09 04 |(A$):AD.AD.1....|
000001B0: 01 51 B2 58 3A 81 59 B2 31 A4 32 35 3A 42 24 B2 |.Q.X:.Y.1.25:B$.|
000001C0: 41 24 28 59 29 3A 81 5A B2 31 A4 C3 28 42 24 29 |A$(Y):.Z.1..(B$)|
000001D0: 3A 43 24 B2 CA 28 41 24 2C 58 2C 31 29 00 F9 09 |:C$..(A$,X,1)...|
000001E0: 0E 01 8B 43 24 B2 22 20 22 A7 41 44 B2 41 44 AB |...C$." ".AD.AD.|
000001F0: 31 3A 82 58 3A 89 33 31 30 00 2C 0A 18 01 8B 43 |1:.X:.310.,....C|
00000200: 24 B2 CA 28 42 24 2C 5A 2C 31 29 A7 58 B2 58 AA |$..(B$,Z,1).X.X.|
00000210: 31 3A 82 5A 3A 97 41 44 2C 59 AA 31 36 39 3A 58 |1:.Z:.AD,Y.169:X|
00000220: B2 58 AB 31 3A 82 58 3A 89 33 31 30 00 37 0A 22 |.X.1:.X:.310.7."|
00000230: 01 58 B2 51 3A 82 59 00 48 0A 2C 01 97 41 44 2C |.X.Q:.Y.H.,..AD,|
00000240: C6 28 43 24 29 3A 82 58 00 5F 0A 36 01 97 41 44 |.(C$):.X._.6..AD|
00000250: AA 31 2C 35 38 3A 97 41 44 AA 32 2C 31 34 33 00 |.1,58:.AD.2,143.|
00000260: 71 0A 40 01 8F 20 46 52 45 49 48 41 4C 54 45 52 |q.@.. FREIHALTER|
00000270: 3A 00 BF 0A 4A 01 96 A5 46 28 58 29 B2 30 30 30 |:...J...F(X).000|
00000280: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 |0000000000000000|
00000290: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 |0000000000000000|
000002A0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 |0000000000000000|
000002B0: 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 00 |000000000000000.|
000002C0: D4 0A 54 01 8F 20 32 35 20 46 55 4E 4B 54 49 4F |..T.. 25 FUNKTIO|
000002D0: 4E 45 4E 3A 00 19 0B 5E 01 83 20 2B 2C 2D 2C 2A |NEN:...^.. +,-,*|
000002E0: 2C 2F 2C 5E 2C 41 4E 44 2C 4F 52 2C 3C 2C 3D 2C |,/,^,AND,OR,<,=,|
000002F0: 3E 2C 53 47 4E 2C 49 4E 54 2C 41 42 53 2C 55 53 |>,SGN,INT,ABS,US|
00000300: 52 2C 46 52 45 2C 50 4F 53 2C 53 51 52 2C 52 4E |R,FRE,POS,SQR,RN|
00000310: 44 2C 4C 4F 47 2C 45 58 50 00 34 0B 68 01 83 20 |D,LOG,EXP.4.h.. |
00000320: 43 4F 53 2C 53 49 4E 2C 54 41 4E 2C 41 54 4E 2C |COS,SIN,TAN,ATN,|
00000330: 50 45 45 4B 00 48 0B 72 01 89 20 33 39 30 3A 20 |PEEK.H.r.. 390: |
00000340: 8F 20 57 45 49 54 45 52 00 7C 0B 7C 01 85 20 22 |. WEITER.|.|.. "|
00000350: 46 28 58 29 3D 22 3B 41 24 20 3A 20 8E 20 3A 20 |F(X)=";A$ : . : |
00000360: 8F 20 45 49 4E 47 41 42 45 52 4F 55 54 49 4E 45 |. EINGABEROUTINE|
00000370: 28 5A 55 4D 20 41 55 53 42 41 55 29 00 82 0B 86 |(ZUM AUSBAU)....|
00000380: 01 3A 00 A2 0B 90 01 8F 20 2A 2A 2A 20 4C 4F 45 |.:...... *** LOE|
00000390: 53 43 48 46 4C 41 47 20 53 45 54 5A 45 4E 20 2A |SCHFLAG SETZEN *|
000003A0: 2A 2A 00 A8 0B 9A 01 3A 00 B6 0B A4 01 97 20 35 |**.....:...... 5|
000003B0: 33 32 34 37 2C 30 00 BC 0B AE 01 3A 00 C2 0B B8 |3247,0.....:....|
000003C0: 01 8F 00 DC 0B C2 01 8F 20 20 20 20 20 20 20 2A |........ *|
000003D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FB 0B CC |************....|
000003E0: 01 8F 20 20 2A 2A 2A 2A 20 48 41 55 50 54 50 52 |.. **** HAUPTPR|
000003F0: 4F 47 52 41 4D 4D 20 2A 2A 2A 2A 00 15 0C D6 01 |OGRAMM ****.....|
00000400: 8F 20 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A |. ********|
00000410: 2A 2A 2A 2A 2A 00 1B 0C E0 01 8F 00 52 0C EA 01 |*****.......R...|
00000420: 99 20 3A 20 99 20 22 47 45 42 45 4E 20 53 49 45 |. : . "GEBEN SIE|
00000430: 20 44 49 45 20 46 4F 4C 47 45 4E 44 45 4E 20 50 | DIE FOLGENDEN P|
00000440: 41 52 41 4D 45 54 45 52 20 45 49 4E 3A 22 20 3A |ARAMETER EIN:" :|
00000450: 20 99 00 71 0C F4 01 85 20 22 46 31 20 28 58 2D | ..q.... "F1 (X-|
00000460: 5A 45 52 52 46 41 4B 54 4F 52 29 20 20 22 3B 46 |ZERRFAKTOR) ";F|
00000470: 31 00 90 0C FE 01 85 20 22 46 32 20 28 59 2D 5A |1...... "F2 (Y-Z|
00000480: 45 52 52 46 41 4B 54 4F 52 29 20 20 22 3B 46 32 |ERRFAKTOR) ";F2|
00000490: 00 AE 0C 08 02 85 20 22 41 20 20 28 58 2D 56 45 |...... "A (X-VE|
000004A0: 52 53 43 48 49 45 42 55 4E 47 29 22 3B 41 00 CC |RSCHIEBUNG)";A..|
000004B0: 0C 12 02 85 20 22 42 20 20 28 59 2D 56 45 52 53 |.... "B (Y-VERS|
000004C0: 43 48 49 45 42 55 4E 47 29 22 3B 42 00 F9 0C 1C |CHIEBUNG)";B....|
000004D0: 02 E9 20 30 2C 31 20 3A 20 F6 20 30 2C 31 36 3A |.. 0,1 : . 0,16:|
000004E0: 20 F6 20 31 2C 35 20 3A 20 8F 20 49 4E 49 54 49 | . 1,5 : . INITI|
000004F0: 41 4C 49 53 49 45 52 45 4E 00 23 0D 26 02 8B 20 |ALISIEREN.#.&.. |
00000500: C2 28 35 33 32 34 37 29 B2 30 20 A7 3A EA 20 3A |.(53247).0 .:. :|
00000510: 20 8F 20 47 52 41 50 48 49 4B 20 4C 4F 45 53 43 | . GRAPHIK LOESC|
00000520: 48 45 4E 00 40 0D 30 02 97 20 35 33 32 34 37 2C |HEN.@.0.. 53247,|
00000530: 30 20 3A 20 8F 20 4C 4F 45 53 43 48 46 4C 41 47 |0 : . LOESCHFLAG|
00000540: 00 46 0D 3A 02 8F 00 5D 0D 44 02 8F 20 41 43 48 |.F.:...].D.. ACH|
00000550: 53 45 4E 20 5A 45 49 43 48 4E 45 4E 3A 00 74 0D |SEN ZEICHNEN:.t.|
00000560: 4E 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |N.. ************|
00000570: 2A 2A 2A 2A 00 A4 0D 58 02 8B 20 41 B1 B2 30 20 |****...X.. A..0 |
00000580: AF 20 41 B3 33 32 30 20 A7 3A EC 20 2C 41 2C 30 |. A.320 .:. ,A,0|
00000590: 20 A4 20 41 2C 31 39 39 20 3A 20 8F 20 58 2D 41 | . A,199 : . X-A|
000005A0: 43 48 53 45 00 D4 0D 62 02 8B 20 42 B1 B2 30 20 |CHSE...b.. B..0 |
000005B0: AF 20 42 B3 32 30 30 20 A7 3A EC 20 2C 30 2C 42 |. B.200 .:. ,0,B|
000005C0: 20 A4 20 33 31 39 2C 42 20 3A 20 8F 20 59 2D 41 | . 319,B : . Y-A|
000005D0: 43 48 53 45 00 DA 0D 6C 02 8F 00 F0 0D 76 02 8F |CHSE...l.....v..|
000005E0: 20 5A 45 49 43 48 45 4E 52 4F 55 54 49 4E 45 3A | ZEICHENROUTINE:|
000005F0: 00 06 0E 80 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********|
00000600: 2A 2A 2A 2A 2A 2A 00 26 0E 8A 02 46 4C 25 20 B2 |******.&...FL% .|
00000610: 20 31 20 3A 20 8F 20 41 55 53 53 45 52 48 41 4C | 1 : . AUSSERHAL|
00000620: 42 2D 46 4C 41 47 00 36 0E 94 02 81 20 58 B2 31 |B-FLAG.6.... X.1|
00000630: 20 A4 20 33 31 39 00 4F 0E 9E 02 59 B2 AB 46 32 | . 319.O...Y..F2|
00000640: AC A5 46 28 28 58 AB 41 29 AD 46 31 29 AA 42 00 |..F((X.A).F1).B.|
00000650: 73 0E A8 02 8B 20 59 B3 30 20 B0 20 59 B1 31 39 |s.... Y.0 . Y.19|
00000660: 39 20 A7 20 46 4C 25 B2 31 3A 82 20 58 3A 89 20 |9 . FL%.1:. X:. |
00000670: 37 32 30 00 8E 0E B2 02 8B 20 46 4C 25 B2 30 20 |720...... FL%.0 |
00000680: A7 3A EC 2C 58 31 2C 59 31 20 A4 58 2C 59 00 98 |.:.,X1,Y1 .X,Y..|
00000690: 0E BC 02 46 4C 25 B2 30 00 C3 0E C6 02 58 31 B2 |...FL%.0.....X1.|
000006A0: 58 3A 59 31 B2 59 3A 82 20 58 20 3A 20 8F 20 4C |X:Y1.Y:. X : . L|
000006B0: 45 54 5A 54 45 20 4B 4F 4F 52 44 2E 20 4D 45 52 |ETZTE KOORD. MER|
000006C0: 4B 45 4E 00 F9 0E D0 02 97 20 31 39 38 2C 30 20 |KEN...... 198,0 |
000006D0: 3A 20 92 20 31 39 38 2C 32 35 35 20 3A 20 A1 20 |: . 198,255 : . |
000006E0: 41 24 20 3A 20 E9 20 2C 30 20 3A 20 8F 20 47 52 |A$ : . ,0 : . GR|
000006F0: 41 50 48 49 4B 20 41 55 53 00 14 0F DA 02 8F 20 |APHIK AUS...... |
00000700: 2A 2A 2A 2A 2A 20 20 4D 45 4E 55 45 3A 20 20 2A |***** MENUE: *|
00000710: 2A 2A 2A 2A 00 30 0F E4 02 99 20 22 57 4F 4C 4C |****.0.... "WOLL|
00000720: 45 4E 20 53 49 45 3A 22 20 3A 20 99 20 3A 20 99 |EN SIE:" : . : .|
00000730: 00 4D 0F EE 02 99 20 22 28 31 29 20 41 4E 44 45 |.M.... "(1) ANDE|
00000740: 52 45 20 50 41 52 41 4D 45 54 45 52 22 00 69 0F |RE PARAMETER".i.|
00000750: F8 02 99 20 22 28 32 29 20 41 4E 44 45 52 45 20 |... "(2) ANDERE |
00000760: 46 55 4E 4B 54 49 4F 4E 22 00 8C 0F 02 03 99 20 |FUNKTION"...... |
00000770: 22 28 33 29 20 47 52 41 50 48 49 4B 20 4E 49 43 |"(3) GRAPHIK NIC|
00000780: 48 54 20 4C 4F 45 53 43 48 45 4E 22 00 AA 0F 0C |HT LOESCHEN"....|
00000790: 03 99 20 22 28 34 29 20 47 52 41 50 48 49 4B 20 |.. "(4) GRAPHIK |
000007A0: 53 50 45 49 43 48 45 52 4E 22 00 C4 0F 16 03 99 |SPEICHERN"......|
000007B0: 20 22 28 35 29 20 47 52 41 50 48 49 4B 20 4C 41 | "(5) GRAPHIK LA|
000007C0: 44 45 4E 22 00 D9 0F 20 03 99 20 22 28 36 29 20 |DEN"... .. "(6) |
000007D0: 48 41 52 44 43 4F 50 59 22 00 ED 0F 2A 03 99 20 |HARDCOPY"...*.. |
000007E0: 22 28 37 29 20 42 45 45 4E 44 45 4E 22 00 00 10 |"(7) BEENDEN"...|
000007F0: 34 03 92 20 31 39 38 2C 31 20 3A 20 A1 20 41 24 |4.. 198,1 : . A$|
00000800: 00 2B 10 3E 03 91 20 C5 28 41 24 29 20 89 20 34 |.+.>.. .(A$) . 4|
00000810: 38 30 2C 38 35 30 2C 38 36 30 2C 38 38 30 2C 39 |80,850,860,880,9|
00000820: 37 30 2C 31 30 33 30 2C 38 37 30 00 44 10 48 03 |70,1030,870.D.H.|
00000830: 89 20 38 32 30 3A 20 8F 20 46 45 48 4C 45 49 4E |. 820: . FEHLEIN|
00000840: 47 41 42 45 00 5E 10 52 03 8A 20 3A 20 8F 20 41 |GABE.^.R.. : . A|
00000850: 4E 44 45 52 45 20 46 55 4E 4B 54 49 4F 4E 00 8C |NDERE FUNKTION..|
00000860: 10 5C 03 97 20 32 2C 31 20 3A 20 99 20 22 4F 4B |.\.. 2,1 : . "OK|
00000870: 22 20 3A 20 99 20 3A 20 89 20 38 32 30 3A 20 8F |" : . : . 820: .|
00000880: 20 46 4C 41 47 20 53 45 54 5A 45 4E 00 9E 10 66 | FLAG SETZEN...f|
00000890: 03 80 20 3A 20 8F 20 42 45 45 4E 44 45 4E 00 A4 |.. : . BEENDEN..|
000008A0: 10 70 03 8F 00 BD 10 7A 03 8F 20 47 52 41 50 48 |.p.....z.. GRAPH|
000008B0: 49 4B 20 53 50 45 49 43 48 45 52 4E 3A 00 C3 10 |IK SPEICHERN:...|
000008C0: 84 03 8F 00 DE 10 8E 03 85 20 22 46 49 4C 45 4E |......... "FILEN|
000008D0: 41 4D 45 2C 47 41 22 3B 46 49 24 2C 47 41 00 FE |AME,GA";FI$,GA..|
000008E0: 10 98 03 F8 20 47 43 2C 31 2C 46 49 24 2C 47 41 |.... GC,1,FI$,GA|
000008F0: 20 3A 20 8F 20 53 50 45 49 43 48 45 52 4E 00 11 | : . SPEICHERN..|
00000900: 11 A2 03 99 20 22 4F 4B 22 20 3A 20 89 20 38 32 |.... "OK" : . 82|
00000910: 30 00 17 11 AC 03 8F 00 2C 11 B6 03 8F 20 47 52 |0.......,.... GR|
00000920: 41 50 48 49 4B 20 4C 41 44 45 4E 3A 00 32 11 C0 |APHIK LADEN:.2..|
00000930: 03 8F 00 4D 11 CA 03 85 20 22 46 49 4C 45 4E 41 |...M.... "FILENA|
00000940: 4D 45 2C 47 41 22 3B 46 49 24 2C 47 41 00 69 11 |ME,GA";FI$,GA.i.|
00000950: D4 03 F9 20 47 43 2C 31 2C 46 49 24 2C 47 41 20 |... GC,1,FI$,GA |
00000960: 3A 20 8F 20 4C 41 44 45 4E 00 7B 11 DE 03 E9 20 |: . LADEN.{.... |
00000970: 30 2C 31 20 3A 20 89 20 37 32 30 00 81 11 E8 03 |0,1 : . 720.....|
00000980: 8F 00 91 11 F2 03 8F 20 48 41 52 44 43 4F 50 59 |....... HARDCOPY|
00000990: 3A 00 97 11 FC 03 8F 00 C8 11 06 04 99 20 22 44 |:............ "D|
000009A0: 52 55 43 4B 45 52 20 46 45 52 54 49 47 20 4D 41 |RUCKER FERTIG MA|
000009B0: 43 48 45 4E 20 55 4E 44 20 54 41 53 54 45 20 44 |CHEN UND TASTE D|
000009C0: 52 55 45 43 4B 45 4E 22 00 EB 11 10 04 9F 20 31 |RUECKEN"...... 1|
000009D0: 2C 34 20 3A 20 FA 23 31 20 3A 20 A0 20 31 20 3A |,4 : .#1 : . 1 :|
000009E0: 20 8F 20 48 41 52 44 43 4F 50 59 00 FE 11 1A 04 | . HARDCOPY.....|
000009F0: 99 20 22 4F 4B 22 20 3A 20 89 20 38 32 30 00 00 |. "OK" : . 820..|
00000A00: 00 53 |.S |
..!.D.. *************************.A.N..
** **.A.X.. ** FUNK
TIONENPLOTTER **...... **
**...... ************************
*......... ...E.... DEF FN - ROUTINE:...
... *****************.........H..:. A$(2
5):. G(147).1.R.. "GEBEN SIE EINE BELIEB
IGE FUNKTION EIN :":.:.:..N.... 380 : .
EINGABEROUTINE.I...AD.2684.1:. POKE-STAR
T...... X.1 . 25:. A$(X):. X:. DATEN EIN
LESEN......X.1.C(A$):AD.AD.1.....Q.X:.Y.
1.25:B$.A$(Y):.Z.1.C(B$):C$.J(A$,X,1)...
...C$." ".AD.AD.1:.X:.310.,....C$.J(B$,Z
,1).X.X.1:.Z:.AD,Y.169:X.X.1:.X:.310.7."
.X.Q:.Y.H.,..AD,F(C$):.X._.6..AD.1,58:.A
D.2,143.Q.@.. FREIHALTER:...J...F(X).000
0000000000000000000000000000000000000000
00000000000000000000000.T.T.. 25 FUNKTIO
NEN:...^.. +,-,*,/,^,AND,OR,<,=,>,SGN,IN
T,ABS,USR,FRE,POS,SQR,RND,LOG,EXP.4.H..
COS,SIN,TAN,ATN,PEEK.H.R.. 390: . WEITER
.|.|.. "F(X)=";A$ : . : . EINGABEROUTINE
(ZUM AUSBAU).....:...... *** LOESCHFLAG
SETZEN ***.....:...... 53247,0.....:.B..
.....B.. *************...L.. ****
HAUPTPROGRAMM ****...V.. ********
*****.......R.... : . "GEBEN SIE DIE FOL
GENDEN PARAMETER EIN:" : ..Q.... "F1 (X-
ZERRFAKTOR) ";F1...... "F2 (Y-ZERRFAKTO
R) ";F2...... "A (X-VERSCHIEBUNG)";A.L
.... "B (Y-VERSCHIEBUNG)";B...... 0,1 :
. 0,16: . 1,5 : . INITIALISIEREN.#.&..
B(53247).0 .:. : . GRAPHIK LOESCHEN.@.0.
. 53247,0 : . LOESCHFLAG.F.:...].D.. ACH
SEN ZEICHNEN:.T.N.. ****************...X
.. A..0 . A.320 .:. ,A,0 . A,199 : . X-A
CHSE.T.B.. B..0 . B.200 .:. ,0,B . 319,B
: . Y-ACHSE.Z.L.....V.. ZEICHENROUTINE:
...... ***************.&...FL% . 1 : . A
USSERHALB-FLAG.6.... X.1 . 319.O...Y..F2
..F((X.A).F1).B.S.... Y.0 . Y.199 . FL%.
1:. X:. 720...... FL%.0 .:.,X1,Y1 .X,Y..
...FL%.0.C.F.X1.X:Y1.Y:. X : . LETZTE KO
ORD. MERKEN...P.. 198,0 : . 198,255 : .
A$ : . ,0 : . GRAPHIK AUS...Z.. ***** M
ENUE: *****.0.... "WOLLEN SIE:" : . : .
.M.... "(1) ANDERE PARAMETER".I.... "(2)
ANDERE FUNKTION"...... "(3) GRAPHIK NIC
HT LOESCHEN"...... "(4) GRAPHIK SPEICHER
N".D.... "(5) GRAPHIK LADEN".Y. .. "(6)
HARDCOPY"...*.. "(7) BEENDEN"...4.. 198,
1 : . A$.+.>.. E(A$) . 480,850,860,880,9
70,1030,870.D.H.. 820: . FEHLEINGABE.^.R
.. : . ANDERE FUNKTION...\.. 2,1 : . "OK
" : . : . 820: . FLAG SETZEN...F.. : . B
EENDEN...P.....Z.. GRAPHIK SPEICHERN:.C.
......... "FILENAME,GA";FI$,GA...... GC,
1,FI$,GA : . SPEICHERN...... "OK" : . 82
0.......,.... GRAPHIK LADEN:.2.....M.J..
"FILENAME,GA";FI$,GA.I.T.. GC,1,FI$,GA
: . LADEN.{.... 0,1 : . 720............
HARDCOPY:.......H.... "DRUCKER FERTIG MA
CHEN UND TASTE DRUECKEN"...... 1,4 : .#1
: 1 : . HARDCOPY...... "OK" : . 820..
.S
> CLICK IMAGE PREVIEW FOR FULL MODAL