GRAFIK-80.DEMO 2

00000000: 01 1C 1E 1C 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 00 3B  |**************.;|
00000020: 1C 6E 00 8F 20 2A 20 20  20 20 20 20 20 20 20 20  |.n.. *          |
00000030: 20 20 20 20 20 20 20 20  20 20 2A 00 58 1C 78 00  |          *.X.x.|
00000040: 8F 20 2A 20 20 47 52 41  46 49 4B 2D 38 30 2D 44  |. *  GRAFIK-80-D|
00000050: 45 4D 4F 20 32 20 20 2A  00 75 1C 82 00 8F 20 2A  |EMO 2  *.u.... *|
00000060: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000070: 20 20 20 20 2A 00 92 1C  8C 00 8F 20 2A 2A 2A 2A  |    *...... ****|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000090: 2A 2A 00 98 1C 96 00 3A  00 E9 1C A0 00 99 20 C7  |**.....:...... .|
000000A0: 28 31 34 32 29 20 C7 28  31 31 29 3A 8F 20 47 52  |(142) .(11):. GR|
000000B0: 4F 53 53 2F 47 52 41 46  49 4B 5A 45 49 43 48 45  |OSS/GRAFIKZEICHE|
000000C0: 4E 53 41 54 5A 20 45 49  4E 53 43 48 41 4C 54 45  |NSATZ EINSCHALTE|
000000D0: 4E 20 55 4E 44 20 53 48  49 46 54 20 43 3D 20 41  |N UND SHIFT C= A|
000000E0: 42 53 43 48 41 4C 54 45  4E 00 EF 1C AA 00 3A 00  |BSCHALTEN.....:.|
000000F0: 78 1D B4 00 8B 20 CE 09  28 32 29 20 B2 20 34 30  |x.... ..(2) . 40|
00000100: 20 A7 20 99 20 C7 28 37  29 22 41 55 46 20 38 30  | . . .(7)"AUF 80|
00000110: 2D 5A 45 49 43 48 45 4E  2D 42 49 4C 44 53 43 48  |-ZEICHEN-BILDSCH|
00000120: 49 52 4D 20 55 4D 53 43  48 41 4C 54 45 4E 20 55  |IRM UMSCHALTEN U|
00000130: 4E 44 20 54 41 53 54 45  20 44 52 55 45 43 4B 45  |ND TASTE DRUECKE|
00000140: 4E 20 21 22 3A A1 F9 20  41 24 3A 8F 20 53 4F 4E  |N !":.. A$:. SON|
00000150: 44 45 52 42 45 48 41 4E  44 4C 55 4E 47 20 46 55  |DERBEHANDLUNG FU|
00000160: 45 52 20 34 30 2D 5A 45  49 43 48 45 4E 2D 42 49  |ER 40-ZEICHEN-BI|
00000170: 4C 44 53 43 48 49 52 4D  00 7E 1D BE 00 3A 00 10  |LDSCHIRM.~...:..|
00000180: 1E C8 00 FE 02 31 35 3A  9E 20 D1 28 22 43 44 44  |.....15:. .("CDD|
00000190: 41 22 29 2C 2C 32 35 3A  FE 09 20 54 53 3A 8F 20  |A"),,25:.. TS:. |
000001A0: 57 45 52 54 20 56 4F 4E  20 52 45 47 49 53 54 45  |WERT VON REGISTE|
000001B0: 52 20 32 35 20 49 4E 20  56 41 52 49 41 42 4C 45  |R 25 IN VARIABLE|
000001C0: 20 54 53 20 48 4F 4C 45  4E 20 28 54 53 20 3D 20  | TS HOLEN (TS = |
000001D0: 54 45 53 54 56 41 52 49  41 42 4C 45 20 46 55 45  |TESTVARIABLE FUE|
000001E0: 52 20 56 45 52 53 49 4F  4E 20 44 45 53 20 56 44  |R VERSION DES VD|
000001F0: 43 2D 43 48 49 50 53 2C  20 55 4D 20 50 52 4F 47  |C-CHIPS, UM PROG|
00000200: 52 41 4D 4D 20 41 4E 5A  55 50 41 53 53 45 4E 29  |RAMM ANZUPASSEN)|
00000210: 00 16 1E D2 00 3A 00 6D  1E DC 00 FE 25 3A DE 20  |.....:.m....%:. |
00000220: 35 2C 31 3A E7 20 36 2C  37 3A E7 20 35 2C 38 3A  |5,1:. 6,7:. 5,8:|
00000230: 8F 20 44 4F 50 50 45 4C  54 45 20 47 45 53 43 48  |. DOPPELTE GESCH|
00000240: 57 49 4E 44 49 47 4B 45  49 54 2C 20 47 45 4C 42  |WINDIGKEIT, GELB|
00000250: 45 20 5A 45 49 43 48 45  4E 2C 20 42 4C 41 55 45  |E ZEICHEN, BLAUE|
00000260: 52 20 48 49 4E 54 45 52  47 52 55 4E 44 00 73 1E  |R HINTERGRUND.s.|
00000270: E6 00 3A 00 A0 1E F0 00  E0 2C 33 32 2C 33 2C C7  |..:......,32,3,.|
00000280: 28 32 29 AA C7 28 37 29  AA 22 44 45 4D 4F 20 32  |(2)..(7)."DEMO 2|
00000290: 20 28 5A 55 20 47 52 41  46 49 4B 2D 38 30 29 22  | (ZU GRAFIK-80)"|
000002A0: 00 B0 1E FA 00 E0 2C 31  2C 35 2C C7 28 31 33 29  |......,1,5,.(13)|
000002B0: 00 B6 1E 04 01 3A 00 14  1F 0E 01 99 20 22 44 49  |.....:...... "DI|
000002C0: 45 20 45 52 57 45 49 54  45 52 55 4E 47 20 27 47  |E ERWEITERUNG 'G|
000002D0: 52 41 46 49 4B 2D 38 30  27 20 4D 55 53 53 20 47  |RAFIK-80' MUSS G|
000002E0: 45 4C 41 44 45 4E 20 55  4E 44 20 49 4E 49 54 49  |ELADEN UND INITI|
000002F0: 41 4C 49 53 49 45 52 54  20 57 45 52 44 45 4E 2C  |ALISIERT WERDEN,|
00000300: 20 44 41 4D 49 54 20 44  49 45 20 42 45 2D 22 C7  | DAMIT DIE BE-".|
00000310: 28 31 33 29 00 72 1F 18  01 99 20 22 46 45 48 4C  |(13).r.... "FEHL|
00000320: 45 20 5A 55 52 20 48 4F  43 48 41 55 46 4C 4F 45  |E ZUR HOCHAUFLOE|
00000330: 53 45 4E 44 45 4E 20 47  52 41 46 49 4B 20 20 41  |SENDEN GRAFIK  A|
00000340: 55 46 20 44 45 4D 20 38  30 2D 5A 45 49 43 48 45  |UF DEM 80-ZEICHE|
00000350: 4E 2D 42 49 4C 44 53 43  48 49 52 4D 20 20 5A 55  |N-BILDSCHIRM  ZU|
00000360: 52 20 56 45 52 46 55 45  47 55 4E 47 22 C7 28 31  |R VERFUEGUNG".(1|
00000370: 33 29 00 D0 1F 22 01 99  20 22 53 54 45 48 45 4E  |3)...".. "STEHEN|
00000380: 2E 20 4C 45 47 45 4E 20  53 49 45 20 44 41 5A 55  |. LEGEN SIE DAZU|
00000390: 20 45 49 4E 45 20 44 49  53 4B 45 54 54 45 20 45  | EINE DISKETTE E|
000003A0: 49 4E 2C 20 41 55 46 20  44 45 52 20 42 45 52 45  |IN, AUF DER BERE|
000003B0: 49 54 53 20 20 44 41 53  20 4D 41 53 43 48 49 4E  |ITS  DAS MASCHIN|
000003C0: 45 4E 50 52 4F 47 52 41  4D 4D 22 C7 28 31 33 29  |ENPROGRAMM".(13)|
000003D0: 00 2E 20 2C 01 99 20 22  27 47 52 41 46 49 4B 2D  |.. ,.. "'GRAFIK-|
000003E0: 38 30 2E 4D 27 20 20 41  42 47 45 53 50 45 49 43  |80.M'  ABGESPEIC|
000003F0: 48 45 52 54 20 20 49 53  54 2C 20 44 41 53 20 20  |HERT  IST, DAS  |
00000400: 56 4F 4D 20 20 47 45 4E  45 52 49 45 52 55 4E 47  |VOM  GENERIERUNG|
00000410: 53 50 52 4F 47 52 41 4D  4D 20 20 45 52 5A 45 55  |SPROGRAMM  ERZEU|
00000420: 47 54 20 57 49 52 44 2E  22 C7 28 31 33 29 00 69  |GT WIRD.".(13).i|
00000430: 20 36 01 99 20 C7 28 32  29 22 44 52 55 45 43 4B  | 6.. .(2)"DRUECK|
00000440: 45 4E 20 53 49 45 20 44  41 4E 4E 20 44 49 45 20  |EN SIE DANN DIE |
00000450: 52 45 54 55 52 4E 2D 20  4F 44 45 52 20 45 4E 54  |RETURN- ODER ENT|
00000460: 45 52 2D 54 41 53 54 45  22 00 6F 20 40 01 3A 00  |ER-TASTE".o @.:.|
00000470: 8F 20 4A 01 EB 3A A1 F9  20 41 24 3A EC 20 FC 20  |. J..:.. A$:. . |
00000480: 41 24 B2 C7 28 31 33 29  3A 99 20 C7 28 37 29 00  |A$..(13):. .(7).|
00000490: 95 20 54 01 3A 00 FF 20  5E 01 FE 11 20 22 47 52  |. T.:.. ^... "GR|
000004A0: 41 46 49 4B 2D 38 30 2E  4D 22 2C 91 20 42 31 35  |AFIK-80.M",. B15|
000004B0: 3A 9E 20 D1 28 22 31 33  30 30 22 29 20 3A 8F 20  |:. .("1300") :. |
000004C0: 22 47 52 41 46 49 4B 2D  38 30 2E 4D 22 20 28 4D  |"GRAFIK-80.M" (M|
000004D0: 41 53 43 48 49 4E 45 4E  43 4F 44 45 20 56 4F 4E  |ASCHINENCODE VON|
000004E0: 20 22 47 52 41 46 49 4B  2D 38 30 22 29 20 4C 41  | "GRAFIK-80") LA|
000004F0: 44 45 4E 20 55 4E 44 20  53 54 41 52 54 45 4E 00  |DEN UND STARTEN.|
00000500: 6E 21 68 01 8F 20 4E 55  4E 20 57 49 52 44 20 4E  |n!h.. NUN WIRD N|
00000510: 4F 43 48 20 53 49 43 48  45 52 48 45 49 54 53 48  |OCH SICHERHEITSH|
00000520: 41 4C 42 45 52 20 44 41  53 20 50 52 4F 47 52 41  |ALBER DAS PROGRA|
00000530: 4D 4D 20 41 4E 20 44 49  45 20 4A 45 57 45 49 4C  |MM AN DIE JEWEIL|
00000540: 49 47 45 20 56 45 52 53  49 4F 4E 20 20 20 20 20  |IGE VERSION     |
00000550: 20 20 20 20 20 20 44 45  53 20 56 44 43 2D 43 48  |      DES VDC-CH|
00000560: 49 50 53 20 41 4E 47 45  50 41 53 53 54 3A 00 DB  |IPS ANGEPASST:..|
00000570: 21 72 01 8B 20 54 53 B2  37 31 20 A7 20 97 20 36  |!r.. TS.71 . . 6|
00000580: 37 35 32 2C 37 31 3A 97  20 36 37 38 39 2C 31 33  |752,71:. 6789,13|
00000590: 35 3A D5 20 97 20 36 37  35 32 2C 36 34 3A 97 20  |5:. . 6752,64:. |
000005A0: 36 37 38 39 2C 31 32 38  3A 8F 20 44 49 45 20 54  |6789,128:. DIE T|
000005B0: 45 53 54 56 41 52 49 41  42 4C 45 20 54 53 20 57  |ESTVARIABLE TS W|
000005C0: 55 52 44 45 20 49 4E 20  5A 45 49 4C 45 20 32 30  |URDE IN ZEILE 20|
000005D0: 30 20 45 52 52 45 43 48  4E 45 54 00 06 22 7C 01  |0 ERRECHNET.."|.|
000005E0: 9E 20 D1 28 22 31 33 30  33 22 29 3A 8F 20 47 52  |. .("1303"):. GR|
000005F0: 41 46 49 4B 2D 38 30 20  49 4E 49 54 49 41 4C 49  |AFIK-80 INITIALI|
00000600: 53 49 45 52 45 4E 00 0C  22 86 01 3A 00 3F 22 90  |SIEREN.."..:.?".|
00000610: 01 DE 20 36 2C 31 3A 8F  20 48 4F 43 48 41 55 46  |.. 6,1:. HOCHAUF|
00000620: 4C 4F 45 53 45 4E 44 45  20 56 44 43 2D 47 52 41  |LOESENDE VDC-GRA|
00000630: 46 49 4B 20 45 49 4E 53  43 48 41 4C 54 45 4E 00  |FIK EINSCHALTEN.|
00000640: 84 22 9A 01 9E 20 D1 28  22 43 44 43 43 22 29 2C  |."... .("CDCC"),|
00000650: 31 35 AC 31 36 AA 30 2C  32 36 3A 8F 20 57 45 49  |15.16.0,26:. WEI|
00000660: 53 53 45 20 50 55 4E 4B  54 45 20 41 55 46 20 53  |SSE PUNKTE AUF S|
00000670: 43 48 57 41 52 5A 45 4D  20 48 49 4E 54 45 52 47  |CHWARZEM HINTERG|
00000680: 52 55 4E 44 00 8A 22 A4  01 3A 00 C8 22 AE 01 81  |RUND.."..:.."...|
00000690: 20 46 B2 31 20 A4 20 37  30 30 3A 8F 20 37 30 30  | F.1 . 700:. 700|
000006A0: 20 5A 55 46 41 45 4C 4C  49 47 20 50 4F 53 49 54  | ZUFAELLIG POSIT|
000006B0: 49 4F 4E 49 45 52 54 45  20 50 55 4E 4B 54 45 20  |IONIERTE PUNKTE |
000006C0: 5A 45 49 43 48 4E 45 4E  00 E1 22 B8 01 3A E5 2C  |ZEICHNEN.."..:.,|
000006D0: BB 28 31 29 AC 36 34 30  2C BB 28 31 29 AC 32 30  |.(1).640,.(1).20|
000006E0: 30 00 E7 22 C2 01 82 00  ED 22 CC 01 3A 00 09 23  |0.."....."..:..#|
000006F0: D6 01 99 20 C7 28 37 29  3A 8F 20 4B 4C 49 4E 47  |... .(7):. KLING|
00000700: 45 4C 5A 45 49 43 48 45  4E 00 0F 23 E0 01 3A 00  |ELZEICHEN..#..:.|
00000710: 1F 23 EA 01 81 20 46 B2  30 20 A4 20 33 32 30 00  |.#... F.0 . 320.|
00000720: 61 23 F4 01 3A 59 B2 B5  28 BB 28 31 29 AC 32 30  |a#..:Y..(.(1).20|
00000730: 30 29 3A 8F 20 50 4F 53  49 54 49 4F 4E 20 44 45  |0):. POSITION DE|
00000740: 52 20 27 4C 55 45 43 4B  45 27 20 49 4E 20 44 45  |R 'LUECKE' IN DE|
00000750: 52 20 4C 49 4E 49 45 20  45 52 52 45 43 48 4E 45  |R LINIE ERRECHNE|
00000760: 4E 00 E6 23 FE 01 3A E5  2C 46 2C 30 20 A4 20 46  |N..#..:.,F,0 . F|
00000770: 2C 32 30 30 3A E5 20 30  2C 46 2C 59 3A E5 20 31  |,200:. 0,F,Y:. 1|
00000780: 2C 36 34 30 AB 46 2C 30  A4 36 34 30 AB 46 2C 32  |,640.F,0.640.F,2|
00000790: 30 30 3A E5 30 2C 36 34  30 AB 46 2C 59 3A 8F 20  |00:.0,640.F,Y:. |
000007A0: 4C 49 4E 4B 53 20 55 4E  44 20 52 45 43 48 54 53  |LINKS UND RECHTS|
000007B0: 20 4A 45 20 45 49 4E 45  20 4C 49 4E 49 45 20 5A  | JE EINE LINIE Z|
000007C0: 45 49 43 48 4E 45 4E 20  55 4E 44 20 44 41 42 45  |EICHNEN UND DABE|
000007D0: 49 20 45 49 4E 45 20 27  4C 55 45 43 4B 45 27 20  |I EINE 'LUECKE' |
000007E0: 4C 41 53 53 45 4E 00 EC  23 08 02 82 00 F2 23 12  |LASSEN..#.....#.|
000007F0: 02 3A 00 25 24 1C 02 FE  0B 20 31 3A 99 20 C7 28  |.:.%$.... 1:. .(|
00000800: 37 29 3A 8F 20 4B 55 52  5A 45 20 50 41 55 53 45  |7):. KURZE PAUSE|
00000810: 2C 20 44 41 4E 4E 20 4B  4C 49 4E 47 45 4C 5A 45  |, DANN KLINGELZE|
00000820: 49 43 48 45 4E 00 2B 24  26 02 3A 00 9D 24 30 02  |ICHEN.+$&.:..$0.|
00000830: 81 20 46 B2 30 20 A4 20  33 32 30 3A 8F 20 4C 41  |. F.0 . 320:. LA|
00000840: 4E 47 53 41 4D 45 52 20  41 42 42 41 55 20 44 45  |NGSAMER ABBAU DE|
00000850: 52 20 47 52 41 46 49 4B  20 44 55 52 43 48 20 4E  |R GRAFIK DURCH N|
00000860: 41 43 48 20 49 4E 4E 45  4E 20 47 45 48 45 4E 44  |ACH INNEN GEHEND|
00000870: 45 53 20 4C 4F 45 53 43  48 45 4E 20 56 4F 4E 20  |ES LOESCHEN VON |
00000880: 52 45 43 48 54 45 43 4B  2D 55 4D 52 49 53 53 45  |RECHTECK-UMRISSE|
00000890: 4E 20 4D 49 54 54 45 4C  53 20 42 4F 58 00 FD 24  |N MITTELS BOX..$|
000008A0: 3A 02 E1 20 30 2C 46 2C  32 30 30 AB 46 AD 33 2E  |:.. 0,F,200.F.3.|
000008B0: 32 2C 36 34 30 AB 46 2C  46 AD 33 2E 32 3A 8F 20  |2,640.F,F.3.2:. |
000008C0: 33 2E 32 20 3D 20 36 34  30 20 28 50 55 4E 4B 54  |3.2 = 640 (PUNKT|
000008D0: 45 20 49 4E 20 58 2D 52  49 43 48 54 55 4E 47 29  |E IN X-RICHTUNG)|
000008E0: 20 2F 20 32 30 30 20 28  50 55 4E 4B 54 45 20 49  | / 200 (PUNKTE I|
000008F0: 4E 20 59 2D 52 49 43 48  54 55 4E 47 29 00 03 25  |N Y-RICHTUNG)..%|
00000900: 44 02 82 00 09 25 4E 02  3A 00 3A 25 58 02 E7 20  |D....%N.:.:%X.. |
00000910: 36 2C 37 3A E7 20 35 2C  38 3A DE 20 35 3A 8F 20  |6,7:. 5,8:. 5:. |
00000920: 48 4F 43 48 41 55 46 4C  4F 45 53 55 4E 47 20 41  |HOCHAUFLOESUNG A|
00000930: 55 53 53 43 48 41 4C 54  45 4E 00 92 25 62 02 99  |USSCHALTEN..%b..|
00000940: 20 C7 28 37 29 22 44 45  52 20 4C 41 4E 47 53 41  | .(7)"DER LANGSA|
00000950: 4D 45 20 41 42 42 41 55  20 44 45 52 20 47 52 41  |ME ABBAU DER GRA|
00000960: 46 49 4B 20 57 49 52 44  20 44 55 52 43 48 20 4E  |FIK WIRD DURCH N|
00000970: 55 52 20 33 20 42 41 53  49 43 2D 42 45 46 45 48  |UR 3 BASIC-BEFEH|
00000980: 4C 45 20 42 45 57 49 52  4B 54 20 3A 22 C7 28 31  |LE BEWIRKT :".(1|
00000990: 33 29 00 A9 25 6C 02 99  20 22 46 4F 52 20 49 3D  |3)..%l.. "FOR I=|
000009A0: 30 20 54 4F 20 33 32 30  22 00 D2 25 76 02 99 20  |0 TO 320"..%v.. |
000009B0: A3 34 29 22 42 4F 58 20  30 2C 49 2C 32 30 30 2D  |.4)"BOX 0,I,200-|
000009C0: 49 2F 33 2E 32 2C 36 34  30 2D 49 2C 49 2F 33 2E  |I/3.2,640-I,I/3.|
000009D0: 32 22 00 E1 25 80 02 99  20 22 4E 45 58 54 20 49  |2"..%... "NEXT I|
000009E0: 22 00 F2 25 8A 02 FE 0B  20 32 30 3A 99 20 C7 28  |"..%.... 20:. .(|
000009F0: 37 29 00 12 26 94 02 DE  36 2C 31 3A 9E 20 D1 28  |7)..&...6,1:. .(|
00000A00: 22 43 44 43 43 22 29 2C  31 33 AC 31 36 AA 32 2C  |"CDCC"),13.16.2,|
00000A10: 32 36 00 26 26 9E 02 81  20 46 B2 30 20 A4 20 31  |26.&&... F.0 . 1|
00000A20: 35 30 20 A9 20 32 00 3F  26 A8 02 3A E1 2C 46 AC  |50 . 2.?&..:.,F.|
00000A30: 33 2E 35 2C 46 2C 46 AA  32 30 2C 46 AA 31 30 00  |3.5,F,F.20,F.10.|
00000A40: 47 26 B2 02 82 20 46 00  62 26 BC 02 E1 2C 46 AC  |G&... F.b&...,F.|
00000A50: 33 2E 35 2C 46 2C 46 AA  32 30 2C 46 AA 31 30 2C  |3.5,F,F.20,F.10,|
00000A60: 2C 31 00 68 26 C6 02 3A  00 78 26 D0 02 99 20 C7  |,1.h&..:.x&... .|
00000A70: 28 37 29 3A FE 0B 20 35  00 7E 26 DA 02 3A 00 92  |(7):.. 5.~&..:..|
00000A80: 26 E4 02 DE 20 35 3A E7  20 36 2C 37 3A E7 20 35  |&... 5:. 6,7:. 5|
00000A90: 2C 38 00 D8 26 EE 02 99  20 22 44 49 45 20 4C 45  |,8..&... "DIE LE|
00000AA0: 54 5A 54 45 20 47 52 41  46 49 4B 20 57 55 52 44  |TZTE GRAFIK WURD|
00000AB0: 45 20 4D 49 54 20 46 4F  4C 47 45 4E 44 45 4E 20  |E MIT FOLGENDEN |
00000AC0: 42 45 46 45 48 4C 45 4E  20 45 52 5A 45 55 47 54  |BEFEHLEN ERZEUGT|
00000AD0: 20 3A 22 C7 28 31 33 29  00 F6 26 F8 02 99 20 22  | :".(13)..&... "|
00000AE0: 46 4F 52 20 49 3D 30 20  54 4F 20 31 35 30 20 53  |FOR I=0 TO 150 S|
00000AF0: 54 45 50 20 32 22 00 19  27 02 03 99 20 A3 34 29  |TEP 2"..'... .4)|
00000B00: 22 42 4F 58 20 31 2C 49  2A 33 2E 35 2C 49 2C 49  |"BOX 1,I*3.5,I,I|
00000B10: 2B 32 30 2C 49 2B 31 30  22 00 28 27 0C 03 99 20  |+20,I+10".('... |
00000B20: 22 4E 45 58 54 20 49 22  00 4B 27 16 03 99 20 22  |"NEXT I".K'... "|
00000B30: 42 4F 58 20 31 2C 49 2A  33 2E 35 2C 49 2C 49 2B  |BOX 1,I*3.5,I,I+|
00000B40: 32 30 2C 49 2B 31 30 2C  2C 31 22 00 81 27 20 03  |20,I+10,,1"..' .|
00000B50: 99 20 C7 28 31 33 29 22  4E 41 45 43 48 53 54 45  |. .(13)"NAECHSTE|
00000B60: 53 20 42 49 4C 44 3A 20  53 49 4E 55 53 2D 20 55  |S BILD: SINUS- U|
00000B70: 4E 44 20 4B 4F 53 49 4E  55 53 2D 4B 55 52 56 45  |ND KOSINUS-KURVE|
00000B80: 22 00 8B 27 2A 03 FE 0B  20 32 30 00 91 27 34 03  |"..'*... 20..'4.|
00000B90: 3A 00 B1 27 3E 03 DE 20  36 2C 31 3A 9E 20 D1 28  |:..'>.. 6,1:. .(|
00000BA0: 22 43 44 43 43 22 29 2C  37 AC 31 36 AA 32 2C 32  |"CDCC"),7.16.2,2|
00000BB0: 36 00 BC 27 48 03 99 20  C7 28 37 29 00 D2 27 52  |6..'H.. .(7)..'R|
00000BC0: 03 81 20 46 B2 30 20 A4  20 36 34 30 20 A9 20 2E  |.. F.0 . 640 . .|
00000BD0: 35 35 00 EA 27 5C 03 3A  E5 2C 46 2C BF 28 46 AD  |55..'\.:.,F,.(F.|
00000BE0: 35 30 29 AC 39 30 AA 31  30 30 00 F2 27 66 03 82  |50).90.100..'f..|
00000BF0: 20 46 00 F8 27 70 03 3A  00 07 28 7A 03 FE 0B 20  | F..'p.:..(z... |
00000C00: 31 3A 99 C7 28 37 29 00  0D 28 84 03 3A 00 23 28  |1:..(7)..(..:.#(|
00000C10: 8E 03 81 20 46 B2 30 20  A4 20 36 34 30 20 A9 20  |... F.0 . 640 . |
00000C20: 2E 35 35 00 3B 28 98 03  3A E5 2C 46 2C BE 28 46  |.55.;(..:.,F,.(F|
00000C30: AD 35 30 29 AC 39 30 AA  31 30 30 00 43 28 A2 03  |.50).90.100.C(..|
00000C40: 82 20 46 00 49 28 AC 03  3A 00 52 28 B6 03 FE 0B  |. F.I(..:.R(....|
00000C50: 20 35 00 58 28 C0 03 3A  00 66 28 CA 03 DE 20 35  | 5.X(..:.f(... 5|
00000C60: 3A E7 20 35 2C 38 00 B4  28 D4 03 99 20 22 4E 55  |:. 5,8..(... "NU|
00000C70: 4E 20 57 45 52 44 45 4E  20 4D 45 48 52 45 52 45  |N WERDEN MEHRERE|
00000C80: 20 46 55 4E 4B 54 49 4F  4E 53 4B 55 52 56 45 4E  | FUNKTIONSKURVEN|
00000C90: 20 53 43 48 45 49 4E 42  41 52 20 47 4C 45 49 43  | SCHEINBAR GLEIC|
00000CA0: 48 5A 45 49 54 49 47 20  47 45 5A 45 49 43 48 4E  |HZEITIG GEZEICHN|
00000CB0: 45 54 2E 22 00 C4 28 DE  03 99 20 C7 28 37 29 3A  |ET."..(... .(7):|
00000CC0: FE 0B 20 33 00 CA 28 E8  03 3A 00 EB 28 F2 03 DE  |.. 3..(..:..(...|
00000CD0: 20 36 2C 31 3A 9E 20 D1  28 22 43 44 43 43 22 29  | 6,1:. .("CDCC")|
00000CE0: 2C 31 33 AC 31 36 AA 30  2C 32 36 00 F1 28 FC 03  |,13.16.0,26..(..|
00000CF0: 3A 00 07 29 06 04 81 20  46 B2 30 20 A4 20 36 34  |:..)... F.0 . 64|
00000D00: 30 20 A9 20 2E 35 35 00  20 29 10 04 3A E5 2C 46  |0 . .55. )..:.,F|
00000D10: 2C BF 28 46 AD 32 30 30  29 AC 39 30 AA 31 30 30  |,.(F.200).90.100|
00000D20: 00 38 29 1A 04 3A E5 2C  46 2C BE 28 46 AD 38 30  |.8)..:.,F,.(F.80|
00000D30: 29 AC 39 30 AA 31 30 30  00 50 29 24 04 3A E5 2C  |).90.100.P)$.:.,|
00000D40: 46 2C BF 28 46 AD 38 30  29 AC 39 30 AA 31 30 30  |F,.(F.80).90.100|
00000D50: 00 69 29 2E 04 3A E5 2C  46 2C BE 28 46 AD 32 30  |.i)..:.,F,.(F.20|
00000D60: 30 29 AC 39 30 AA 31 30  30 00 7F 29 38 04 3A E5  |0).90.100..)8.:.|
00000D70: 2C 46 2C BA 28 46 AD 32  30 30 29 AC 32 30 30 00  |,F,.(F.200).200.|
00000D80: 97 29 42 04 3A E5 2C 46  2C BF 28 46 AD 36 30 29  |.)B.:.,F,.(F.60)|
00000D90: AC 39 30 AA 31 30 30 00  B2 29 4C 04 3A E5 2C 46  |.90.100..)L.:.,F|
00000DA0: 2C 28 AB BF 28 46 AD 38  30 29 29 AC 39 30 AA 31  |,(..(F.80)).90.1|
00000DB0: 30 30 00 CD 29 56 04 3A  E5 2C 46 2C 28 AB BE 28  |00..)V.:.,F,(..(|
00000DC0: 46 AD 38 30 29 29 AC 39  30 AA 31 30 30 00 E5 29  |F.80)).90.100..)|
00000DD0: 60 04 3A E5 2C 46 2C BF  28 46 AD 32 30 30 29 AC  |`.:.,F,.(F.200).|
00000DE0: 35 AA 31 30 30 00 ED 29  6A 04 82 20 46 00 F3 29  |5.100..)j.. F..)|
00000DF0: 74 04 3A 00 FE 29 7E 04  99 20 C7 28 37 29 00 04  |t.:..)~.. .(7)..|
00000E00: 2A 88 04 3A 00 13 2A 92  04 81 20 46 B2 31 20 A4  |*..:..*... F.1 .|
00000E10: 20 31 30 00 2C 2A 9C 04  DF 2C BB 28 54 49 29 AC  | 10.,*...,.(TI).|
00000E20: 36 34 30 2C BB 28 31 29  AC 32 30 30 00 32 2A A6  |640,.(1).200.2*.|
00000E30: 04 82 00 38 2A B0 04 3A  00 4C 2A BA 04 99 20 C7  |...8*..:.L*... .|
00000E40: 28 37 29 3A FE 0B 20 35  3A DE 20 35 00 9C 2A C4  |(7):.. 5:. 5..*.|
00000E50: 04 99 20 22 45 53 20 46  4F 4C 47 45 4E 20 45 49  |.. "ES FOLGEN EI|
00000E60: 4E 49 47 45 20 47 52 41  46 49 4B 45 4E 2C 20 44  |NIGE GRAFIKEN, D|
00000E70: 49 45 20 4D 49 54 20 57  45 4E 49 47 45 4E 20 42  |IE MIT WENIGEN B|
00000E80: 41 53 49 43 2D 5A 45 49  4C 45 4E 20 45 52 5A 45  |ASIC-ZEILEN ERZE|
00000E90: 55 47 54 20 57 45 52 44  45 4E 2E 22 00 A5 2A CE  |UGT WERDEN."..*.|
00000EA0: 04 FE 0B 20 35 00 AB 2A  D8 04 3A 00 CB 2A E2 04  |... 5..*..:..*..|
00000EB0: DE 20 36 2C 31 3A 9E 20  D1 28 22 43 44 43 43 22  |. 6,1:. .("CDCC"|
00000EC0: 29 2C 37 AC 31 36 AA 32  2C 32 36 00 D1 2A EC 04  |),7.16.2,26..*..|
00000ED0: 3A 00 E6 2A F6 04 E2 2C  33 32 30 2C 31 30 30 2C  |:..*...,320,100,|
00000EE0: 31 33 30 2C 31 30 00 FB  2A 00 05 E2 2C 33 32 30  |130,10..*...,320|
00000EF0: 2C 31 30 30 2C 31 33 30  2C 35 30 00 14 2B 0A 05  |,100,130,50..+..|
00000F00: E2 2C 31 32 30 2C 34 30  2C 34 30 2C 31 38 2C 2C  |.,120,40,40,18,,|
00000F10: 2C 2C 34 35 00 2B 2B 14  05 E2 2C 35 32 30 2C 34  |,,45.++...,520,4|
00000F20: 30 2C 34 30 2C 2C 2C 2C  2C 39 30 00 46 2B 1E 05  |0,40,,,,,90.F+..|
00000F30: E2 2C 31 32 30 2C 31 34  30 2C 34 30 2C 31 38 2C  |.,120,140,40,18,|
00000F40: 2C 2C 2C 31 32 30 00 60  2B 28 05 E2 2C 35 32 30  |,,,120.`+(..,520|
00000F50: 2C 31 34 30 2C 34 30 2C  31 38 2C 2C 2C 2C 36 30  |,140,40,18,,,,60|
00000F60: 00 66 2B 32 05 3A 00 7B  2B 3C 05 99 20 C7 28 37  |.f+2.:.{+<.. .(7|
00000F70: 29 3A FE 0B 20 31 30 3A  DE 20 35 00 85 2B 46 05  |):.. 10:. 5..+F.|
00000F80: E7 20 35 2C 38 00 C3 2B  50 05 99 20 22 46 4F 4C  |. 5,8..+P.. "FOL|
00000F90: 47 45 4E 44 45 20 42 45  46 45 48 4C 45 20 48 41  |GENDE BEFEHLE HA|
00000FA0: 42 45 4E 20 44 49 45 20  4C 45 54 5A 54 45 20 47  |BEN DIE LETZTE G|
00000FB0: 52 41 46 49 4B 20 47 45  5A 45 49 43 48 4E 45 54  |RAFIK GEZEICHNET|
00000FC0: 20 3A 22 00 CF 2B 5A 05  99 20 C7 28 31 33 29 00  | :"..+Z.. .(13).|
00000FD0: EF 2B 64 05 99 20 22 43  49 52 43 4C 45 20 31 2C  |.+d.. "CIRCLE 1,|
00000FE0: 33 32 30 2C 31 30 30 2C  31 33 30 2C 31 30 22 00  |320,100,130,10".|
00000FF0: 0F 2C 6E 05 99 20 22 43  49 52 43 4C 45 20 31 2C  |.,n.. "CIRCLE 1,|
00001000: 33 32 30 2C 31 30 30 2C  31 33 30 2C 35 30 22 00  |320,100,130,50".|
00001010: 33 2C 78 05 99 20 22 43  49 52 43 4C 45 20 31 2C  |3,x.. "CIRCLE 1,|
00001020: 31 32 30 2C 34 30 2C 34  30 2C 31 38 2C 2C 2C 2C  |120,40,40,18,,,,|
00001030: 34 35 22 00 55 2C 82 05  99 20 22 43 49 52 43 4C  |45".U,... "CIRCL|
00001040: 45 20 31 2C 35 32 30 2C  34 30 2C 34 30 2C 2C 2C  |E 1,520,40,40,,,|
00001050: 2C 2C 39 30 22 00 7B 2C  8C 05 99 20 22 43 49 52  |,,90".{,... "CIR|
00001060: 43 4C 45 20 31 2C 31 32  30 2C 31 34 30 2C 34 30  |CLE 1,120,140,40|
00001070: 2C 31 38 2C 2C 2C 2C 31  32 30 22 00 A0 2C 96 05  |,18,,,,120"..,..|
00001080: 99 20 22 43 49 52 43 4C  45 20 31 2C 35 32 30 2C  |. "CIRCLE 1,520,|
00001090: 31 34 30 2C 34 30 2C 31  38 2C 2C 2C 2C 36 30 22  |140,40,18,,,,60"|
000010A0: 00 AB 2C A0 05 99 C7 28  31 33 29 00 F5 2C AA 05  |..,....(13)..,..|
000010B0: 99 22 44 45 52 20 43 49  52 43 4C 45 2D 42 45 46  |."DER CIRCLE-BEF|
000010C0: 45 48 4C 20 49 53 54 20  41 4C 53 4F 20 49 4E 20  |EHL IST ALSO IN |
000010D0: 53 45 48 52 20 56 49 45  4C 46 41 45 4C 54 49 47  |SEHR VIELFAELTIG|
000010E0: 45 52 20 57 45 49 53 45  20 56 45 52 57 45 4E 44  |ER WEISE VERWEND|
000010F0: 42 41 52 2E 22 00 FF 2C  B4 05 FE 0B 20 31 30 00  |BAR."..,.... 10.|
00001100: 05 2D BE 05 3A 00 25 2D  C8 05 DE 20 36 2C 31 3A  |.-..:.%-... 6,1:|
00001110: 9E 20 D1 28 22 43 44 43  43 22 29 2C 37 AC 31 36  |. .("CDCC"),7.16|
00001120: AA 32 2C 32 36 00 2B 2D  D2 05 3A 00 3F 2D DC 05  |.2,26.+-..:.?-..|
00001130: 81 20 46 B2 31 20 A4 20  36 34 30 20 A9 20 38 00  |. F.1 . 640 . 8.|
00001140: 57 2D E6 05 3A E5 2C 46  2C 35 30 20 A4 20 31 34  |W-..:.,F,50 . 14|
00001150: 30 2C 46 AD 33 2E 32 00  5D 2D F0 05 82 00 63 2D  |0,F.3.2.]-....c-|
00001160: FA 05 3A 00 74 2D 04 06  99 20 C7 28 37 29 3A FE  |..:.t-... .(7):.|
00001170: 0B 20 31 30 00 7C 2D 0E  06 DE 20 35 00 B4 2D 18  |. 10.|-... 5..-.|
00001180: 06 99 20 22 46 4F 4C 47  45 4E 44 45 20 42 45 46  |.. "FOLGENDE BEF|
00001190: 45 48 4C 45 20 5A 45 49  43 48 4E 45 54 45 4E 20  |EHLE ZEICHNETEN |
000011A0: 44 49 45 20 4C 45 54 5A  54 45 20 47 52 41 46 49  |DIE LETZTE GRAFI|
000011B0: 4B 20 3A 22 00 C0 2D 22  06 99 20 C7 28 31 33 29  |K :"..-".. .(13)|
000011C0: 00 DE 2D 2C 06 99 20 22  46 4F 52 20 49 3D 31 20  |..-,.. "FOR I=1 |
000011D0: 54 4F 20 36 34 30 20 53  54 45 50 20 38 22 00 02  |TO 640 STEP 8"..|
000011E0: 2E 36 06 99 20 A3 34 29  22 44 52 41 57 20 31 2C  |.6.. .4)"DRAW 1,|
000011F0: 49 2C 35 30 20 54 4F 20  31 34 30 2C 49 2F 33 2E  |I,50 TO 140,I/3.|
00001200: 32 22 00 0F 2E 40 06 99  20 22 4E 45 58 54 22 00  |2"...@.. "NEXT".|
00001210: 1F 2E 4A 06 99 C7 28 37  29 3A FE 0B 20 31 30 00  |..J...(7):.. 10.|
00001220: 25 2E 54 06 3A 00 42 2E  5E 06 DE 20 36 2C 31 3A  |%.T.:.B.^.. 6,1:|
00001230: 9E 20 D1 28 22 43 44 43  43 22 29 2C 37 AC 31 36  |. .("CDCC"),7.16|
00001240: AA 32 00 48 2E 68 06 3A  00 5C 2E 72 06 81 20 46  |.2.H.h.:.\.r.. F|
00001250: B2 31 20 A4 20 36 33 39  20 A9 20 34 00 80 2E 7C  |.1 . 639 . 4...||
00001260: 06 3A E5 2C 46 2C 34 30  20 A4 20 31 30 30 AC BF  |.:.,F,40 . 100..|
00001270: 28 46 AD 33 30 29 AA 33  30 30 2C 46 AD 33 2E 32  |(F.30).300,F.3.2|
00001280: 00 86 2E 86 06 82 00 8C  2E 90 06 3A 00 9C 2E 9A  |...........:....|
00001290: 06 99 C7 28 37 29 3A FE  0B 20 31 30 00 A4 2E A4  |...(7):.. 10....|
000012A0: 06 DE 20 35 00 DC 2E AE  06 99 20 22 46 4F 4C 47  |.. 5...... "FOLG|
000012B0: 45 4E 44 45 20 42 45 46  45 48 4C 45 20 5A 45 49  |ENDE BEFEHLE ZEI|
000012C0: 43 48 4E 45 54 45 4E 20  44 49 45 20 4C 45 54 5A  |CHNETEN DIE LETZ|
000012D0: 54 45 20 47 52 41 46 49  4B 20 3A 22 00 E8 2E B8  |TE GRAFIK :"....|
000012E0: 06 99 20 C7 28 31 33 29  00 06 2F C2 06 99 20 22  |.. .(13)../... "|
000012F0: 46 4F 52 20 49 3D 31 20  54 4F 20 36 33 39 20 53  |FOR I=1 TO 639 S|
00001300: 54 45 50 20 34 22 00 38  2F CC 06 99 20 A3 34 29  |TEP 4".8/... .4)|
00001310: 22 44 52 41 57 20 31 2C  49 2C 34 30 20 54 4F 20  |"DRAW 1,I,40 TO |
00001320: 31 30 30 2A 53 49 4E 28  49 2F 33 30 29 2B 33 30  |100*SIN(I/30)+30|
00001330: 30 2C 49 2F 33 2E 32 22  00 45 2F D6 06 99 20 22  |0,I/3.2".E/... "|
00001340: 4E 45 58 54 22 00 4B 2F  E0 06 3A 00 71 2F EA 06  |NEXT".K/..:.q/..|
00001350: FE 0B 20 31 30 3A DE 20  36 2C 31 3A 9E 20 D1 28  |.. 10:. 6,1:. .(|
00001360: 22 43 44 43 43 22 29 2C  37 AC 31 36 AA 32 2C 32  |"CDCC"),7.16.2,2|
00001370: 36 00 77 2F F4 06 3A 00  8B 2F FE 06 81 20 46 B2  |6.w/..:../... F.|
00001380: 31 20 A4 20 33 31 39 20  A9 20 33 00 BD 2F 08 07  |1 . 319 . 3../..|
00001390: 3A E5 2C 46 AC 32 2C 34  30 AC BE 28 46 AD 33 30  |:.,F.2,40..(F.30|
000013A0: 29 AA 31 30 30 20 A4 20  31 30 30 AC BF 28 46 AD  |).100 . 100..(F.|
000013B0: 33 30 29 AA 33 30 30 2C  46 AD 31 2E 36 00 C3 2F  |30).300,F.1.6../|
000013C0: 12 07 82 00 C9 2F 1C 07  3A 00 DD 2F 26 07 99 20  |...../..:../&.. |
000013D0: C7 28 37 29 3A FE 0B 20  35 3A DE 20 35 00 15 30  |.(7):.. 5:. 5..0|
000013E0: 30 07 99 20 22 46 4F 4C  47 45 4E 44 45 20 42 45  |0.. "FOLGENDE BE|
000013F0: 46 45 48 4C 45 20 5A 45  49 43 48 4E 45 54 45 4E  |FEHLE ZEICHNETEN|
00001400: 20 44 49 45 20 4C 45 54  5A 54 45 20 47 52 41 46  | DIE LETZTE GRAF|
00001410: 49 4B 20 3A 22 00 21 30  3A 07 99 20 C7 28 31 33  |IK :".!0:.. .(13|
00001420: 29 00 3F 30 44 07 99 20  22 46 4F 52 20 49 3D 31  |).?0D.. "FOR I=1|
00001430: 20 54 4F 20 33 31 39 20  53 54 45 50 20 33 22 00  | TO 319 STEP 3".|
00001440: 81 30 4E 07 99 20 A3 34  29 22 44 52 41 57 20 31  |.0N.. .4)"DRAW 1|
00001450: 2C 49 2A 32 2C 34 30 2A  43 4F 53 28 49 2F 33 30  |,I*2,40*COS(I/30|
00001460: 29 2B 31 30 30 20 54 4F  20 31 30 30 2A 53 49 4E  |)+100 TO 100*SIN|
00001470: 28 49 2F 33 30 29 2B 33  30 30 2C 49 2F 31 2E 36  |(I/30)+300,I/1.6|
00001480: 22 00 8E 30 58 07 99 20  22 4E 45 58 54 22 00 94  |"..0X.. "NEXT"..|
00001490: 30 62 07 3A 00 AF 30 6C  07 99 20 C7 28 31 33 29  |0b.:..0l.. .(13)|
000014A0: 3A 8F 20 32 20 4C 45 45  52 5A 45 49 4C 45 4E 00  |:. 2 LEERZEILEN.|
000014B0: D8 30 76 07 99 20 22 2A  2A 2A 2A 20 45 4E 44 45  |.0v.. "**** ENDE|
000014C0: 20 44 45 53 20 44 45 4D  4F 50 52 4F 47 52 41 4D  | DES DEMOPROGRAM|
000014D0: 4D 53 20 2A 2A 2A 2A 22  00 DE 30 80 07 80 00 00  |MS ****"..0.....|
000014E0: 00                                                |.               |

....D.. **********************.;.N.. *  
                  *.X.X.. *  GRAFIK-80-D
EMO 2  *.U.... *                    *...
... **********************.....:... .. G
(142) G(11):. GROSS/GRAFIKZEICHENSATZ EI
NSCHALTEN UND SHIFT C= ABSCHALTEN.....:.
X.... N.(2) . 40 . . G(7)"AUF 80-ZEICHEN
-BILDSCHIRM UMSCHALTEN UND TASTE DRUECKE
N !":.. A$:. SONDERBEHANDLUNG FUER 40-ZE
ICHEN-BILDSCHIRM.~...:...H...15:. Q("CDD
A"),,25:.. TS:. WERT VON REGISTER 25 IN 
VARIABLE TS HOLEN (TS = TESTVARIABLE FUE
R VERSION DES VDC-CHIPS, UM PROGRAMM ANZ
UPASSEN)...R.:.M....%:. 5,1:. 6,7:. 5,8:
. DOPPELTE GESCHWINDIGKEIT, GELBE ZEICHE
N, BLAUER HINTERGRUND.S...:. ....,32,3,G
(2).G(7)."DEMO 2 (ZU GRAFIK-80)"......,1
,5,G(13).....:...... "DIE ERWEITERUNG 'G
RAFIK-80' MUSS GELADEN UND INITIALISIERT
 WERDEN, DAMIT DIE BE-"G(13).R.... "FEHL
E ZUR HOCHAUFLOESENDEN GRAFIK  AUF DEM 8
0-ZEICHEN-BILDSCHIRM  ZUR VERFUEGUNG"G(1
3).P.".. "STEHEN. LEGEN SIE DAZU EINE DI
SKETTE EIN, AUF DER BEREITS  DAS MASCHIN
ENPROGRAMM"G(13).. ,.. "'GRAFIK-80.M'  A
BGESPEICHERT  IST, DAS  VOM  GENERIERUNG
SPROGRAMM  ERZEUGT WIRD."G(13).I 6.. G(2
)"DRUECKEN SIE DANN DIE RETURN- ODER ENT
ER-TASTE".O @.:.. J..:.. A$:. . A$.G(13)
:. G(7).. T.:.. ^... "GRAFIK-80.M",. B15
:. Q("1300") :. "GRAFIK-80.M" (MASCHINEN
CODE VON "GRAFIK-80") LADEN UND STARTEN.
N!H.. NUN WIRD NOCH SICHERHEITSHALBER DA
S PROGRAMM AN DIE JEWEILIGE VERSION     
      DES VDC-CHIPS ANGEPASST:..!R.. TS.
71 . . 6752,71:. 6789,135:U . 6752,64:. 
6789,128:. DIE TESTVARIABLE TS WURDE IN 
ZEILE 200 ERRECHNET.."|.. Q("1303"):. GR
AFIK-80 INITIALISIEREN.."..:.?"... 6,1:.
 HOCHAUFLOESENDE VDC-GRAFIK EINSCHALTEN.
."... Q("CDCC"),15.16.0,26:. WEISSE PUNK
TE AUF SCHWARZEM HINTERGRUND.."..:.H"...
 F.1 . 700:. 700 ZUFAELLIG POSITIONIERTE
 PUNKTE ZEICHNEN.."..:.,.(1).640,.(1).20
0.."B...."L.:..#V.. G(7):. KLINGELZEICHE
N..#..:..#... F.0 . 320.A#..:Y..(.(1).20
0):. POSITION DER 'LUECKE' IN DER LINIE 
ERRECHNEN..#..:.,F,0 . F,200:. 0,F,Y:. 1
,640.F,0.640.F,200:.0,640.F,Y:. LINKS UN
D RECHTS JE EINE LINIE ZEICHNEN UND DABE
I EINE 'LUECKE' LASSEN..#.....#..:.%$...
. 1:. G(7):. KURZE PAUSE, DANN KLINGELZE
ICHEN.+$&.:..$0.. F.0 . 320:. LANGSAMER 
ABBAU DER GRAFIK DURCH NACH INNEN GEHEND
ES LOESCHEN VON RECHTECK-UMRISSEN MITTEL
S BOX..$:.. 0,F,200.F.3.2,640.F,F.3.2:. 
3.2 = 640 (PUNKTE IN X-RICHTUNG) / 200 (
PUNKTE IN Y-RICHTUNG)..%D....%N.:.:%X.. 
6,7:. 5,8:. 5:. HOCHAUFLOESUNG AUSSCHALT
EN..%B.. G(7)"DER LANGSAME ABBAU DER GRA
FIK WIRD DURCH NUR 3 BASIC-BEFEHLE BEWIR
KT :"G(13)..%L.. "FOR I=0 TO 320".R%V.. 
.4)"BOX 0,I,200-I/3.2,640-I,I/3.2"..%...
 "NEXT I"..%.... 20:. G(7)..&...6,1:. Q(
"CDCC"),13.16.2,26.&&... F.0 . 150 . 2.?
&..:.,F.3.5,F,F.20,F.10.G&... F.B&...,F.
3.5,F,F.20,F.10,,1.H&F.:.X&P.. G(7):.. 5
.~&Z.:..&... 5:. 6,7:. 5,8.X&... "DIE LE
TZTE GRAFIK WURDE MIT FOLGENDEN BEFEHLEN
 ERZEUGT :"G(13)..&... "FOR I=0 TO 150 S
TEP 2"..'... .4)"BOX 1,I*3.5,I,I+20,I+10
".('... "NEXT I".K'... "BOX 1,I*3.5,I,I+
20,I+10,,1"..' .. G(13)"NAECHSTES BILD: 
SINUS- UND KOSINUS-KURVE"..'*... 20..'4.
:..'>.. 6,1:. Q("CDCC"),7.16.2,26..'H.. 
G(7).R'R.. F.0 . 640 . .55..'\.:.,F,.(F.
50).90.100..'F.. F..'P.:..(Z... 1:.G(7).
.(..:.#(... F.0 . 640 . .55.;(..:.,F,.(F
.50).90.100.C(... F.I(..:.R(.... 5.X(..:
.F(J.. 5:. 5,8..(T.. "NUN WERDEN MEHRERE
 FUNKTIONSKURVEN SCHEINBAR GLEICHZEITIG 
GEZEICHNET.".D(... G(7):.. 3.J(..:..(...
 6,1:. Q("CDCC"),13.16.0,26..(..:..)... 
F.0 . 640 . .55. )..:.,F,.(F.200).90.100
.8)..:.,F,.(F.80).90.100.P)$.:.,F,.(F.80
).90.100.I)..:.,F,.(F.200).90.100.)8.:.
,F,.(F.200).200..)B.:.,F,.(F.60).90.100.
.)L.:.,F,(..(F.80)).90.100.M)V.:.,F,(..(
F.80)).90.100..)`.:.,F,.(F.200).5.100..)
J.. F..)T.:..)~.. G(7)..*..:..*... F.1 .
 10.,*...,.(TI).640,.(1).200.2*....8*..:
.L*... G(7):.. 5:. 5..*D.. "ES FOLGEN EI
NIGE GRAFIKEN, DIE MIT WENIGEN BASIC-ZEI
LEN ERZEUGT WERDEN."..*N... 5..*X.:.K*..
. 6,1:. Q("CDCC"),7.16.2,26.Q*..:..*...,
320,100,130,10..*...,320,100,130,50..+..
.,120,40,40,18,,,,45.++...,520,40,40,,,,
,90.F+...,120,140,40,18,,,,120.`+(..,520
,140,40,18,,,,60.F+2.:.{+<.. G(7):.. 10:
. 5..+F.. 5,8.C+P.. "FOLGENDE BEFEHLE HA
BEN DIE LETZTE GRAFIK GEZEICHNET :".O+Z.
. G(13)..+D.. "CIRCLE 1,320,100,130,10".
.,N.. "CIRCLE 1,320,100,130,50".3,X.. "C
IRCLE 1,120,40,40,18,,,,45".U,... "CIRCL
E 1,520,40,40,,,,,90".{,... "CIRCLE 1,12
0,140,40,18,,,,120". ,... "CIRCLE 1,520,
140,40,18,,,,60".., ..G(13)..,..."DER CI
RCLE-BEFEHL IST ALSO IN SEHR VIELFAELTIG
ER WEISE VERWENDBAR."..,.... 10..-..:.%-
H.. 6,1:. Q("CDCC"),7.16.2,26.+-R.:.?-..
. F.1 . 640 . 8.W-..:.,F,50 . 140,F.3.2.
]-....C-..:.T-... G(7):.. 10.|-... 5..-.
.. "FOLGENDE BEFEHLE ZEICHNETEN DIE LETZ
TE GRAFIK :"..-".. G(13)..-,.. "FOR I=1 
TO 640 STEP 8"...6.. .4)"DRAW 1,I,50 TO 
140,I/3.2"...@.. "NEXT"...J..G(7):.. 10.
%.T.:.B.^.. 6,1:. Q("CDCC"),7.16.2.H.H.:
.\.R.. F.1 . 639 . 4...|.:.,F,40 . 100..
(F.30).300,F.3.2...........:......G(7):.
. 10...... 5...... "FOLGENDE BEFEHLE ZEI
CHNETEN DIE LETZTE GRAFIK :"...... G(13)
../B.. "FOR I=1 TO 639 STEP 4".8/L.. .4)
"DRAW 1,I,40 TO 100*SIN(I/30)+300,I/3.2"
.E/V.. "NEXT".K/..:.Q/.... 10:. 6,1:. Q(
"CDCC"),7.16.2,26.W/..:../... F.1 . 319 
. 3../..:.,F.2,40..(F.30).100 . 100..(F.
30).300,F.1.6.C/....I/..:../&.. G(7):.. 
5:. 5..00.. "FOLGENDE BEFEHLE ZEICHNETEN
 DIE LETZTE GRAFIK :".!0:.. G(13).?0D.. 
"FOR I=1 TO 319 STEP 3"..0N.. .4)"DRAW 1
,I*2,40*COS(I/30)+100 TO 100*SIN(I/30)+3
00,I/1.6"..0X.. "NEXT"..0B.:..0L.. G(13)
:. 2 LEERZEILEN.X0V.. "**** ENDE DES DEM
OPROGRAMMS ****"..0......

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL