_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SPIROGRAPH 2.2

FILE INFORMATION

FILENAME(S): SPIROGRAPH 2.2

FILE TYPE(S): PRG

FILE SIZE: 6.6K

FIRST SEEN: 2025-11-30 21:06:22

APPEARS ON: 1 disk(s)

FILE HASH

7c1a98673af2b46519b7b952283bd9a5e0392986891a5264662e451a0caf3a11

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TELETRON 8 1 SPIROGRAPH 2.2 PRG DuncanTwain 22 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 11 08 64 00 8F 20  48 4F 4F 46 44 20 50 52  |....d.. HOOFD PR|
00000010: 47 00 35 08 6E 00 8F 20  50 52 4F 47 52 41 4D 4D  |G.5.n.. PROGRAMM|
00000020: 41 20 44 41 54 20 4F 50  20 31 35 32 30 20 50 4C  |A DAT OP 1520 PL|
00000030: 4F 54 54 45 52 00 57 08  78 00 8F 20 45 45 4E 20  |OTTER.W.x.. EEN |
00000040: 43 49 52 4B 45 4C 20 54  45 4B 45 4E 54 20 45 4E  |CIRKEL TEKENT EN|
00000050: 20 4F 50 20 44 49 45 00  7A 08 82 00 8F 20 45 4E  | OP DIE.z.... EN|
00000060: 20 4F 50 20 44 49 45 20  43 49 52 4B 45 4C 20 57  | OP DIE CIRKEL W|
00000070: 45 45 52 20 45 45 4E 20  32 45 00 9F 08 8C 00 8F  |EER EEN 2E......|
00000080: 20 43 49 52 4B 45 4C 20  43 4F 4E 53 54 52 55 45  | CIRKEL CONSTRUE|
00000090: 45 52 44 2C 20 4E 45 54  20 41 4C 53 20 49 4E 00  |ERD, NET ALS IN.|
000000A0: C0 08 96 00 8F 20 44 45  20 4D 49 44 44 45 4C 20  |..... DE MIDDEL |
000000B0: 45 45 55 57 45 4E 20 57  45 52 44 20 54 4F 45 2D  |EEUWEN WERD TOE-|
000000C0: 00 E4 08 A0 00 8F 20 47  45 50 41 53 54 20 4F 4D  |...... GEPAST OM|
000000D0: 20 5A 4F 20 44 45 20 50  4C 41 4E 45 45 54 20 42  | ZO DE PLANEET B|
000000E0: 41 4E 45 4E 00 F8 08 AA  00 8F 20 54 45 20 56 45  |ANEN...... TE VE|
000000F0: 52 4B 4C 41 52 45 4E 2E  00 FE 08 B4 00 8F 00 22  |RKLAREN........"|
00000100: 09 BE 00 8F 20 42 52 2E  20 48 41 41 4B 20 4A 2E  |.... BR. HAAK J.|
00000110: 4A 41 4E 53 4C 41 41 4E  20 31 30 20 41 4C 4D 45  |JANSLAAN 10 ALME|
00000120: 4C 4F 00 47 09 C8 00 54  52 B2 FF AD 31 38 30 20  |LO.G...TR...180 |
00000130: 3A 20 8F 20 47 45 45 46  54 20 47 52 41 44 45 4E  |: . GEEFT GRADEN|
00000140: 20 2D 3E 20 52 41 44 00  4D 09 D2 00 3A 00 6A 09  | -> RAD.M...:.j.|
00000150: DC 00 8D 20 31 30 30 30  30 3A 20 8F 20 52 45 53  |... 10000: . RES|
00000160: 45 54 20 50 4C 4F 54 54  45 52 00 83 09 E6 00 8D  |ET PLOTTER......|
00000170: 20 32 30 30 30 3A 20 8F  20 55 49 54 4C 45 47 20  | 2000: . UITLEG |
00000180: 50 52 47 00 A5 09 F0 00  8D 20 32 33 39 30 3A 20  |PRG...... 2390: |
00000190: 8F 20 49 4E 47 45 56 45  4E 20 56 41 4E 20 57 41  |. INGEVEN VAN WA|
000001A0: 41 52 44 45 4E 00 C1 09  FA 00 8D 20 35 30 30 30  |ARDEN...... 5000|
000001B0: 3A 20 8F 20 55 49 54 56  4F 45 52 45 4E 20 50 52  |: . UITVOEREN PR|
000001C0: 47 00 D6 09 04 01 99 22  93 4E 4F 47 20 45 45 4E  |G......".NOG EEN|
000001D0: 53 20 3F 20 22 3B 00 E2  09 0E 01 8D 20 31 31 30  |S ? ";...... 110|
000001E0: 30 30 00 F1 09 18 01 42  24 B2 C8 28 42 24 2C 31  |00.....B$..(B$,1|
000001F0: 29 00 04 0A 22 01 8B 20  42 24 B2 22 4A 22 20 A7  |)...".. B$."J" .|
00000200: 20 32 34 30 00 17 0A 2C  01 8B 20 42 24 B2 22 4E  | 240...,.. B$."N|
00000210: 22 20 A7 20 33 32 30 00  21 0A 36 01 89 20 32 36  |" . 320.!.6.. 26|
00000220: 30 00 6B 0A 40 01 99 22  11 57 41 43 48 54 20 54  |0.k.@..".WACHT T|
00000230: 4F 54 20 41 4C 4C 45 53  20 47 45 27 52 45 53 45  |OT ALLES GE'RESE|
00000240: 54 27 20 49 53 20 45 4E  20 53 54 41 52 54 20 20  |T' IS EN START  |
00000250: 20 50 41 53 20 44 41 41  52 4E 41 20 45 45 4E 20  | PAS DAARNA EEN |
00000260: 41 4E 44 45 52 20 50 52  47 2E 22 00 77 0A 4A 01  |ANDER PRG.".w.J.|
00000270: 8D 20 31 30 30 30 30 00  7D 0A 54 01 80 00 8E 0A  |. 10000.}.T.....|
00000280: D0 07 8F 20 50 52 47 20  55 49 54 4C 45 47 00 B7  |... PRG UITLEG..|
00000290: 0A DA 07 97 35 33 32 38  30 2C 30 3A 97 35 33 32  |....53280,0:.532|
000002A0: 38 31 2C 30 3A 99 22 93  99 22 3B C7 28 38 29 3B  |81,0:."..";.(8);|
000002B0: C7 28 31 34 32 29 3B 00  E7 0A DF 07 99 22 53 50  |.(142);......"SP|
000002C0: 49 52 4F 47 52 41 50 48  20 32 2E 32 20 20 20 20  |IROGRAPH 2.2    |
000002D0: 20 20 20 20 20 44 4F 4F  52 3A 20 42 52 41 4C 44  |     DOOR: BRALD|
000002E0: 54 20 48 41 41 4B 22 00  10 0B E4 07 99 22 44 49  |T HAAK"......"DI|
000002F0: 54 20 50 52 4F 47 52 41  4D 4D 41 20 54 45 4B 45  |T PROGRAMMA TEKE|
00000300: 4E 54 20 4F 50 20 44 45  20 50 4C 4F 54 54 45 52  |NT OP DE PLOTTER|
00000310: 00 3B 0B EE 07 99 22 42  59 5A 4F 4E 44 45 52 45  |.;...."BYZONDERE|
00000320: 20 46 49 47 55 52 45 4E  2E 20 5A 45 20 4C 49 4A  | FIGUREN. ZE LIJ|
00000330: 4B 45 4E 20 57 45 4C 20  57 41 54 00 69 0B F8 07  |KEN WEL WAT.i...|
00000340: 99 22 4F 50 20 53 50 49  52 4F 47 52 41 50 48 20  |."OP SPIROGRAPH |
00000350: 28 54 4D 29 20 46 49 47  55 52 45 4E 20 4D 41 41  |(TM) FIGUREN MAA|
00000360: 52 20 48 45 42 42 45 4E  22 00 95 0B 02 08 99 22  |R HEBBEN"......"|
00000370: 4F 4F 4B 20 42 45 54 45  4B 45 4E 49 53 20 56 4F  |OOK BETEKENIS VO|
00000380: 4F 52 20 48 45 54 20 49  4E 5A 49 43 48 54 20 49  |OR HET INZICHT I|
00000390: 4E 20 44 45 22 00 BC 0B  0C 08 99 22 47 45 53 43  |N DE"......"GESC|
000003A0: 48 49 45 44 45 4E 49 53  20 56 41 4E 20 44 45 20  |HIEDENIS VAN DE |
000003B0: 57 45 54 45 4E 53 43 48  41 50 2E 22 00 E9 0B 16  |WETENSCHAP."....|
000003C0: 08 99 22 11 49 4E 20 44  45 20 4D 49 44 44 45 4C  |..".IN DE MIDDEL|
000003D0: 20 45 45 55 57 45 4E 20  48 49 45 4C 44 45 4E 20  | EEUWEN HIELDEN |
000003E0: 44 45 20 57 45 54 45 4E  2D 00 17 0C 20 08 99 22  |DE WETEN-... .."|
000003F0: 53 43 48 41 50 50 45 52  53 20 4E 4F 47 20 56 41  |SCHAPPERS NOG VA|
00000400: 53 54 20 41 41 4E 20 45  45 4E 20 57 45 52 45 4C  |ST AAN EEN WEREL|
00000410: 44 20 42 45 45 4C 44 00  3D 0C 2A 08 99 22 4D 45  |D BEELD.=.*.."ME|
00000420: 54 20 44 45 20 41 41 52  44 45 20 49 4E 20 48 45  |T DE AARDE IN HE|
00000430: 54 20 4D 49 44 44 45 4C  50 55 4E 54 2E 00 68 0C  |T MIDDELPUNT..h.|
00000440: 34 08 99 22 41 4C 4C 45  20 50 4C 41 4E 45 54 45  |4.."ALLE PLANETE|
00000450: 4E 20 42 45 48 4F 4F 52  44 45 4E 20 56 4F 4C 47  |N BEHOORDEN VOLG|
00000460: 45 4E 53 20 44 49 45 22  00 94 0C 3E 08 99 22 54  |ENS DIE"...>.."T|
00000470: 48 45 4F 52 49 45 20 49  4E 20 43 49 52 4B 45 4C  |HEORIE IN CIRKEL|
00000480: 56 4F 52 4D 49 47 45 20  42 41 4E 45 4E 20 4F 4D  |VORMIGE BANEN OM|
00000490: 20 44 45 22 00 B2 0C 48  08 99 22 41 41 52 44 45  | DE"...H.."AARDE|
000004A0: 20 48 45 45 4E 20 54 45  20 44 52 41 41 49 45 4E  | HEEN TE DRAAIEN|
000004B0: 2E 22 00 E0 0C 52 08 99  22 44 45 20 57 41 41 52  |."...R.."DE WAAR|
000004C0: 4E 45 4D 49 4E 47 45 4E  20 56 41 4E 20 44 45 20  |NEMINGEN VAN DE |
000004D0: 53 54 45 52 52 45 4E 4B  55 4E 44 49 47 45 4E 22  |STERRENKUNDIGEN"|
000004E0: 00 03 0D 5C 08 99 22 53  50 52 41 4B 45 4E 20 44  |...\.."SPRAKEN D|
000004F0: 45 5A 45 20 54 48 45 4F  52 49 45 20 54 45 47 45  |EZE THEORIE TEGE|
00000500: 4E 2E 22 00 31 0D 66 08  99 22 11 4F 4D 20 54 4F  |N.".1.f..".OM TO|
00000510: 43 48 20 56 41 53 54 20  54 45 20 48 4F 55 44 45  |CH VAST TE HOUDE|
00000520: 4E 20 41 41 4E 20 44 45  20 48 45 54 20 49 44 45  |N AAN DE HET IDE|
00000530: 45 00 5C 0D 70 08 99 22  56 41 4E 20 49 44 45 41  |E.\.p.."VAN IDEA|
00000540: 4C 45 20 43 49 52 4B 45  4C 53 20 47 49 4E 47 20  |LE CIRKELS GING |
00000550: 4D 45 4E 20 43 49 52 4B  45 4C 2D 22 00 84 0D 7A  |MEN CIRKEL-"...z|
00000560: 08 99 22 42 41 4E 45 4E  20 4F 50 20 44 45 20 43  |.."BANEN OP DE C|
00000570: 49 52 4B 45 4C 42 41 4E  45 4E 20 43 52 45 45 52  |IRKELBANEN CREER|
00000580: 45 4E 2C 22 00 B3 0D 84  08 99 22 44 45 20 5A 2E  |EN,"......"DE Z.|
00000590: 47 2E 4E 2E 20 45 50 49  43 59 43 45 4C 53 2E 20  |G.N. EPICYCELS. |
000005A0: 4F 50 20 44 45 5A 45 20  57 49 4A 5A 45 20 4F 4E  |OP DEZE WIJZE ON|
000005B0: 54 2D 22 00 E2 0D 8E 08  99 22 53 54 4F 4E 44 45  |T-"......"STONDE|
000005C0: 4E 20 48 45 45 4C 20 49  4E 47 45 57 49 4B 4B 45  |N HEEL INGEWIKKE|
000005D0: 4C 44 45 20 42 41 41 4E  50 41 54 52 4F 4E 45 4E  |LDE BAANPATRONEN|
000005E0: 2E 22 00 F9 0D 98 08 99  22 11 44 52 55 4B 20 4F  |."......".DRUK O|
000005F0: 50 20 52 45 54 55 52 4E  22 00 0C 0E A2 08 97 31  |P RETURN"......1|
00000600: 39 38 2C 30 3A 92 20 31  39 38 2C 31 00 3A 0E AC  |98,0:. 198,1.:..|
00000610: 08 99 22 93 44 41 54 20  4D 45 4E 20 4F 50 20 44  |..".DAT MEN OP D|
00000620: 45 5A 45 20 57 49 4A 5A  45 20 44 45 20 54 48 45  |EZE WIJZE DE THE|
00000630: 4F 52 49 45 20 47 4F 45  44 22 00 64 0E B6 08 99  |ORIE GOED".d....|
00000640: 22 4B 52 45 45 47 20 49  53 20 47 45 45 4E 20 57  |"KREEG IS GEEN W|
00000650: 4F 4E 44 45 52 20 57 41  4E 54 20 4D 45 54 20 54  |ONDER WANT MET T|
00000660: 57 45 45 22 00 92 0E C0  08 99 22 43 49 52 4B 45  |WEE"......"CIRKE|
00000670: 4C 53 20 49 53 20 5A 45  4C 46 53 20 42 49 4A 4E  |LS IS ZELFS BIJN|
00000680: 41 20 45 45 4E 20 56 49  45 52 4B 41 4E 54 20 54  |A EEN VIERKANT T|
00000690: 45 22 00 DC 0E CA 08 99  22 4D 41 4B 45 4E 2E 20  |E"......"MAKEN. |
000006A0: 4F 4E 54 48 4F 55 44 3A  20 48 45 54 20 46 45 52  |ONTHOUD: HET FER|
000006B0: 51 55 45 4E 54 49 45 20  56 45 52 53 43 48 49 4C  |QUENTIE VERSCHIL|
000006C0: 20 42 45 50 41 41 4C 54  20 48 45 54 20 41 41 4E  | BEPAALT HET AAN|
000006D0: 54 41 4C 20 4C 55 53 53  45 4E 2E 22 00 0B 0F D4  |TAL LUSSEN."....|
000006E0: 08 99 22 11 49 4B 20 5A  41 4C 20 42 45 53 4C 55  |..".IK ZAL BESLU|
000006F0: 49 54 45 4E 20 44 4F 4F  52 20 45 45 4E 20 41 41  |ITEN DOOR EEN AA|
00000700: 4E 54 41 4C 20 56 4F 4F  52 2D 22 00 24 0F DE 08  |NTAL VOOR-".$...|
00000710: 99 22 42 45 45 4C 44 45  4E 20 54 45 20 47 45 56  |."BEELDEN TE GEV|
00000720: 45 4E 2E 22 00 52 0F E8  08 99 22 11 43 49 52 4B  |EN.".R....".CIRK|
00000730: 45 4C 2D 31 3A 20 53 54  52 41 41 4C 3D 20 33 2C  |EL-1: STRAAL= 3,|
00000740: 20 46 45 52 51 2E 3D 20  31 2C 46 41 53 45 3D 34  | FERQ.= 1,FASE=4|
00000750: 35 22 00 7F 0F F2 08 99  22 43 49 52 4B 45 4C 2D  |5"......"CIRKEL-|
00000760: 32 3A 20 53 54 52 41 41  4C 3D 20 31 2C 20 46 45  |2: STRAAL= 1, FE|
00000770: 52 51 2E 3D 20 36 2C 46  41 53 45 3D 20 30 22 00  |RQ.= 6,FASE= 0".|
00000780: AD 0F FC 08 99 22 11 43  49 52 4B 45 4C 2D 31 3A  |.....".CIRKEL-1:|
00000790: 20 53 54 52 41 41 4C 3D  20 35 2C 20 46 45 52 51  | STRAAL= 5, FERQ|
000007A0: 2E 3D 20 33 2C 46 41 53  45 3D 20 30 22 00 DA 0F  |.= 3,FASE= 0"...|
000007B0: 06 09 99 22 43 49 52 4B  45 4C 2D 32 3A 20 53 54  |..."CIRKEL-2: ST|
000007C0: 52 41 41 4C 3D 20 32 2C  20 46 45 52 51 2E 3D 20  |RAAL= 2, FERQ.= |
000007D0: 35 2C 46 41 53 45 3D 20  30 22 00 08 10 10 09 99  |5,FASE= 0"......|
000007E0: 22 11 43 49 52 4B 45 4C  2D 31 3A 20 53 54 52 41  |".CIRKEL-1: STRA|
000007F0: 41 4C 3D 31 35 2C 20 46  45 52 51 2E 3D 20 31 2C  |AL=15, FERQ.= 1,|
00000800: 46 41 53 45 3D 20 30 22  00 35 10 1A 09 99 22 43  |FASE= 0".5...."C|
00000810: 49 52 4B 45 4C 2D 32 3A  20 53 54 52 41 41 4C 3D  |IRKEL-2: STRAAL=|
00000820: 20 31 2C 20 46 45 52 51  2E 3D 2D 35 2C 46 41 53  | 1, FERQ.=-5,FAS|
00000830: 45 3D 20 30 22 00 62 10  24 09 99 22 43 49 52 4B  |E= 0".b.$.."CIRK|
00000840: 45 4C 2D 33 3A 20 53 54  52 41 41 4C 3D 20 31 2C  |EL-3: STRAAL= 1,|
00000850: 20 46 45 52 51 2E 3D 31  35 2C 46 41 53 45 3D 20  | FERQ.=15,FASE= |
00000860: 30 22 00 90 10 2E 09 99  22 11 43 49 52 4B 45 4C  |0"......".CIRKEL|
00000870: 2D 31 3A 20 53 54 52 41  41 4C 3D 36 2E 38 2C 46  |-1: STRAAL=6.8,F|
00000880: 45 52 51 2E 3D 20 31 2C  46 41 53 45 3D 20 30 22  |ERQ.= 1,FASE= 0"|
00000890: 00 BD 10 38 09 99 22 43  49 52 4B 45 4C 2D 32 3A  |...8.."CIRKEL-2:|
000008A0: 20 53 54 52 41 41 4C 3D  20 31 2C 20 46 45 52 51  | STRAAL= 1, FERQ|
000008B0: 2E 3D 2D 33 2C 46 41 53  45 3D 20 30 22 00 DC 10  |.=-3,FASE= 0"...|
000008C0: 42 09 99 22 11 53 55 43  43 45 53 2C 20 44 52 55  |B..".SUCCES, DRU|
000008D0: 4B 20 4F 50 20 52 45 54  55 52 4E 22 00 F1 10 4C  |K OP RETURN"...L|
000008E0: 09 97 31 39 38 2C 30 3A  92 20 31 39 38 2C 31 3A  |..198,0:. 198,1:|
000008F0: 8E 00 F7 10 56 09 3A 00  0D 11 60 09 8F 20 49 4E  |....V.:...`.. IN|
00000900: 47 45 56 45 4E 20 57 41  41 52 44 45 4E 00 13 11  |GEVEN WAARDEN...|
00000910: 6A 09 3A 00 44 11 74 09  99 22 93 48 4F 45 56 45  |j.:.D.t..".HOEVE|
00000920: 45 4C 20 43 49 52 4B 45  4C 20 4E 49 56 4F 27 53  |EL CIRKEL NIVO'S|
00000930: 20 22 3B 3A 8D 20 31 31  30 30 30 3A 41 4E B2 C5  | ";:. 11000:AN..|
00000940: 28 42 24 29 00 56 11 7E  09 8B 20 41 4E B3 32 20  |(B$).V.~.. AN.2 |
00000950: A7 20 32 34 32 30 00 5C  11 88 09 3A 00 62 11 92  |. 2420.\...:.b..|
00000960: 09 99 00 71 11 9C 09 81  20 5A B2 31 20 A4 20 41  |...q.... Z.1 . A|
00000970: 4E 00 9A 11 A6 09 3A 20  99 22 53 54 52 41 41 4C  |N.....: ."STRAAL|
00000980: 20 56 45 52 48 4F 55 44  49 4E 47 20 43 49 52 4B  | VERHOUDING CIRK|
00000990: 45 4C 22 3B 5A 3B 22 20  22 3B 00 B4 11 B0 09 3A  |EL";Z;" ";.....:|
000009A0: 20 8D 20 31 31 30 30 30  3A 53 52 28 5A 29 B2 C5  | . 11000:SR(Z)..|
000009B0: 28 42 24 29 00 BC 11 BA  09 82 20 5A 00 DC 11 C4  |(B$)...... Z....|
000009C0: 09 8F 20 49 4E 56 4F 45  52 20 43 49 52 4B 45 4C  |.. INVOER CIRKEL|
000009D0: 20 46 52 45 51 55 45 4E  54 49 45 53 00 E2 11 CE  | FREQUENTIES....|
000009E0: 09 3A 00 27 12 D8 09 99  22 93 4F 4E 54 48 4F 55  |.:.'....".ONTHOU|
000009F0: 44 3A 20 4E 45 47 41 54  49 45 56 45 20 46 52 45  |D: NEGATIEVE FRE|
00000A00: 51 55 45 4E 54 49 45 53  20 47 45 56 45 4E 20 45  |QUENTIES GEVEN E|
00000A10: 45 4E 4F 4D 47 45 4B 45  45 52 44 45 20 44 52 41  |ENOMGEKEERDE DRA|
00000A20: 41 49 4E 47 21 11 22 00  36 12 E2 09 81 20 5A B2  |AING!.".6.... Z.|
00000A30: 31 20 A4 20 41 4E 00 67  12 EC 09 3A 20 99 22 57  |1 . AN.g...: ."W|
00000A40: 41 54 20 5A 49 4A 4E 20  44 45 20 56 45 52 48 4F  |AT ZIJN DE VERHO|
00000A50: 55 44 49 47 45 4E 20 56  41 4E 20 44 45 20 52 4F  |UDIGEN VAN DE RO|
00000A60: 54 41 54 49 45 2D 22 00  93 12 F6 09 3A 20 99 22  |TATIE-".....: ."|
00000A70: 53 4E 45 4C 48 45 44 45  4E 20 56 2E 44 2E 20 43  |SNELHEDEN V.D. C|
00000A80: 49 52 4B 45 4C 20 28 4E  4F 2E 22 3B 5A 3B 22 29  |IRKEL (NO.";Z;")|
00000A90: 20 22 3B 00 AD 12 00 0A  3A 20 8D 20 31 31 30 30  | ";.....: . 1100|
00000AA0: 30 3A 46 45 28 5A 29 B2  C5 28 42 24 29 00 B5 12  |0:FE(Z)..(B$)...|
00000AB0: 0A 0A 82 20 5A 00 BB 12  14 0A 3A 00 E7 12 1E 0A  |... Z.....:.....|
00000AC0: 8B 20 46 45 28 31 29 B2  30 20 A7 20 99 22 46 45  |. FE(1).0 . ."FE|
00000AD0: 52 51 55 45 4E 54 49 45  20 3C 3E 20 30 20 21 22  |RQUENTIE <> 0 !"|
00000AE0: 3A 89 20 32 35 33 30 00  ED 12 28 0A 3A 00 03 13  |:. 2530...(.:...|
00000AF0: 32 0A 8F 20 49 4E 56 4F  45 52 20 56 41 4E 20 46  |2.. INVOER VAN F|
00000B00: 41 53 45 00 09 13 3C 0A  3A 00 38 13 46 0A 99 22  |ASE...<.:.8.F.."|
00000B10: 93 56 4F 45 52 20 4E 55  20 44 45 20 46 41 53 45  |.VOER NU DE FASE|
00000B20: 20 49 4E 2E 20 44 41 54  20 49 53 20 44 45 20 48  | IN. DAT IS DE H|
00000B30: 4F 45 4B 20 44 49 45 22  00 69 13 50 0A 99 22 44  |OEK DIE".i.P.."D|
00000B40: 45 20 43 49 52 4B 45 4C  20 56 4F 4F 52 20 48 45  |E CIRKEL VOOR HE|
00000B50: 45 46 54 20 4F 50 20 44  45 20 41 4E 44 45 52 45  |EFT OP DE ANDERE|
00000B60: 20 43 49 52 4B 45 4C 22  3B 00 92 13 5A 0A 99 22  | CIRKEL";...Z.."|
00000B70: 42 49 4A 20 48 45 54 20  44 4F 4F 52 4C 4F 50 45  |BIJ HET DOORLOPE|
00000B80: 4E 20 56 41 4E 20 5A 49  4A 4E 20 42 41 41 4E 2E  |N VAN ZIJN BAAN.|
00000B90: 11 22 00 A1 13 64 0A 81  20 5A B2 31 20 A4 20 41  |."...d.. Z.1 . A|
00000BA0: 4E 00 CC 13 6E 0A 3A 20  99 22 57 41 54 20 49 53  |N...n.: ."WAT IS|
00000BB0: 20 44 45 20 46 41 53 45  20 28 4E 4F 2E 22 5A 22  | DE FASE (NO."Z"|
00000BC0: 29 2C 28 30 2D 33 36 30  29 20 22 3B 00 E6 13 78  |),(0-360) ";...x|
00000BD0: 0A 3A 20 8D 20 31 31 30  30 30 3A 46 41 28 5A 29  |.: . 11000:FA(Z)|
00000BE0: B2 C5 28 42 24 29 00 EE  13 82 0A 82 20 5A 00 F4  |..(B$)...... Z..|
00000BF0: 13 8C 0A 3A 00 2B 14 96  0A 8F 20 44 49 53 50 4C  |...:.+.... DISPL|
00000C00: 41 59 20 49 4E 56 4F 45  52 20 45 4E 20 56 52 41  |AY INVOER EN VRA|
00000C10: 41 47 20 4F 46 20 44 49  54 20 20 20 20 20 20 20  |AG OF DIT       |
00000C20: 20 20 20 4A 55 49 53 54  20 49 53 00 31 14 A0 0A  |   JUIST IS.1...|
00000C30: 3A 00 45 14 AA 0A 99 22  93 4F 56 45 52 5A 49 43  |:.E....".OVERZIC|
00000C40: 48 54 3A 11 22 00 54 14  B4 0A 81 20 5A B2 31 20  |HT:.".T.... Z.1 |
00000C50: A4 20 41 4E 00 90 14 BE  0A 3A 20 99 22 43 49 52  |. AN.....: ."CIR|
00000C60: 4B 45 4C 22 3B 5A 3B 22  52 3D 22 53 52 28 5A 29  |KEL";Z;"R="SR(Z)|
00000C70: 3B A3 31 36 29 3B 22 46  3D 22 46 45 28 5A 29 3B  |;.16);"F="FE(Z);|
00000C80: A3 32 34 29 3B 22 46 41  3D 22 3B 46 41 28 5A 29  |.24);"FA=";FA(Z)|
00000C90: 00 98 14 C8 0A 82 20 5A  00 9E 14 D2 0A 3A 00 BD  |...... Z.....:..|
00000CA0: 14 DC 0A 99 22 11 49 53  20 44 49 54 20 4A 55 49  |....".IS DIT JUI|
00000CB0: 53 54 20 22 3B 3A 8D 20  31 31 30 30 30 00 CC 14  |ST ";:. 11000...|
00000CC0: E6 0A 42 24 B2 C8 28 42  24 2C 31 29 00 E0 14 F0  |..B$..(B$,1)....|
00000CD0: 0A 8B 20 42 24 B2 22 4E  22 20 A7 20 32 34 32 30  |.. B$."N" . 2420|
00000CE0: 00 E6 14 FA 0A 3A 00 FB  14 04 0B 99 22 93 50 45  |.....:......".PE|
00000CF0: 4E 20 4B 4C 45 55 52 45  4E 3A 22 00 14 15 0E 0B  |N KLEUREN:".....|
00000D00: 99 22 11 30 2D 5A 57 41  52 54 20 20 20 31 2D 42  |.".0-ZWART   1-B|
00000D10: 4C 41 55 57 00 2C 15 18  0B 99 22 32 2D 52 4F 4F  |LAUW.,...."2-ROO|
00000D20: 44 20 20 20 20 33 2D 47  52 4F 45 4E 00 51 15 22  |D    3-GROEN.Q."|
00000D30: 0B 99 22 11 55 57 20 4B  45 55 5A 45 20 22 3B 3A  |..".UW KEUZE ";:|
00000D40: 8D 31 31 30 30 30 3A 43  B2 B6 28 C5 28 42 24 29  |.11000:C..(.(B$)|
00000D50: 29 00 62 15 2C 0B 8B 20  43 B1 34 20 A7 20 32 38  |).b.,.. C.4 . 28|
00000D60: 32 30 00 73 15 36 0B 43  24 B2 C9 28 C4 28 43 29  |20.s.6.C$..(.(C)|
00000D70: 2C 31 29 00 79 15 40 0B  3A 00 93 15 4A 0B 8F 20  |,1).y.@.:...J.. |
00000D80: 57 49 4A 5A 45 20 56 41  4E 20 41 46 42 45 45 4C  |WIJZE VAN AFBEEL|
00000D90: 44 45 4E 00 99 15 54 0B  3A 00 DA 15 5E 0B 99 22  |DEN...T.:...^.."|
00000DA0: 11 57 49 4C 54 20 55 20  44 45 20 45 50 49 43 59  |.WILT U DE EPICY|
00000DB0: 43 45 4C 53 20 55 49 54  4C 45 47 20 4F 4F 4B 20  |CELS UITLEG OOK |
00000DC0: 41 46 47 45 44 52 55 4B  54 48 45 42 42 45 4E 20  |AFGEDRUKTHEBBEN |
00000DD0: 28 4A 2F 4E 29 20 3F 20  22 3B 00 01 16 68 0B 8D  |(J/N) ? ";...h..|
00000DE0: 20 31 31 30 30 30 3A 8B  20 C8 28 42 24 2C 31 29  | 11000:. .(B$,1)|
00000DF0: B2 22 4A 22 20 A7 20 54  B2 31 3A 89 20 32 39 34  |."J" . T.1:. 294|
00000E00: 35 00 43 16 72 0B 99 22  11 57 49 4C 54 20 55 20  |5.C.r..".WILT U |
00000E10: 45 45 4E 20 4E 49 45 55  57 20 56 45 4C 20 56 4F  |EEN NIEUW VEL VO|
00000E20: 4F 52 20 44 45 5A 45 20  54 45 4B 45 4E 49 4E 47  |OR DEZE TEKENING|
00000E30: 20 28 4A 2F 4E 29 20 3F  20 22 3B 3A 8D 20 31 31  | (J/N) ? ";:. 11|
00000E40: 30 30 30 00 5B 16 77 0B  8B 20 C8 28 42 24 2C 31  |000.[.w.. .(B$,1|
00000E50: 29 B2 22 4A 22 20 A7 20  54 B2 32 00 74 16 7C 0B  |)."J" . T.2.t.|.|
00000E60: 8B 20 C8 28 42 24 2C 31  29 B3 B1 22 4A 22 20 A7  |. .(B$,1).."J" .|
00000E70: 20 54 B2 30 00 7A 16 7E  0B 3A 00 BC 16 81 0B 99  | T.0.z.~.:......|
00000E80: 22 11 57 49 4C 54 20 55  20 45 45 4E 20 45 45 4E  |".WILT U EEN EEN|
00000E90: 20 43 45 4E 54 52 41 41  4C 20 4B 52 55 49 53 20  | CENTRAAL KRUIS |
00000EA0: 41 46 47 45 42 45 45 4C  44 20 28 4A 2F 4E 29 20  |AFGEBEELD (J/N) |
00000EB0: 3F 20 22 3B 3A 8D 20 31  31 30 30 30 00 D4 16 86  |? ";:. 11000....|
00000EC0: 0B 8B 20 C8 28 42 24 2C  31 29 B2 22 4A 22 20 A7  |.. .(B$,1)."J" .|
00000ED0: 20 4B B2 31 00 ED 16 8B  0B 8B 20 C8 28 42 24 2C  | K.1...... .(B$,|
00000EE0: 31 29 B3 B1 22 4A 22 20  A7 20 4B B2 30 00 F3 16  |1).."J" . K.0...|
00000EF0: 90 0B 3A 00 2A 17 9A 0B  99 22 11 41 46 42 45 45  |..:.*....".AFBEE|
00000F00: 4C 44 49 4E 47 53 20 53  43 48 41 41 4C 20 28 31  |LDINGS SCHAAL (1|
00000F10: 2D 31 30 30 25 29 20 22  3B 3A 8D 20 31 31 30 30  |-100%) ";:. 1100|
00000F20: 30 3A 53 48 B2 C5 28 42  24 29 00 4E 17 9F 0B 53  |0:SH..(B$).N...S|
00000F30: 48 B2 B6 28 53 48 29 3A  8B 20 53 48 B1 31 30 30  |H..(SH):. SH.100|
00000F40: 20 B0 20 53 48 B2 30 20  A7 20 32 39 37 30 00 54  | . SH.0 . 2970.T|
00000F50: 17 A0 0B 3A 00 8B 17 A4  0B 99 22 11 4E 41 55 57  |...:......".NAUW|
00000F60: 4B 45 55 52 49 47 48 45  49 44 53 20 47 52 41 41  |KEURIGHEIDS GRAA|
00000F70: 44 20 28 31 2D 32 35 29  20 22 3B 3A 8D 20 31 31  |D (1-25) ";:. 11|
00000F80: 30 30 30 3A 4E B2 C5 28  42 24 29 00 AC 17 A9 0B  |000:N..(B$).....|
00000F90: 4E B2 B6 28 4E 29 AA 31  3A 8B 20 4E B1 32 36 20  |N..(N).1:. N.26 |
00000FA0: B0 20 4E B3 32 20 A7 20  32 39 38 30 00 B6 17 AA  |. N.2 . 2980....|
00000FB0: 0B 4D B2 4E AD 32 00 BC  17 AB 0B 3A 00 CE 17 AE  |.M.N.2.....:....|
00000FC0: 0B 99 22 93 43 4F 4E 54  52 4F 4C 45 3A 22 00 E3  |..".CONTROLE:"..|
00000FD0: 17 B8 0B 99 22 11 50 45  4E 20 4B 4C 45 55 52 3A  |....".PEN KLEUR:|
00000FE0: 22 3B 43 00 01 18 C2 0B  99 22 11 41 46 42 45 45  |";C......".AFBEE|
00000FF0: 4C 44 49 4E 47 53 20 53  43 48 41 41 4C 22 3B 53  |LDINGS SCHAAL";S|
00001000: 48 00 23 18 C7 0B 99 22  11 4E 41 55 57 4B 45 55  |H.#....".NAUWKEU|
00001010: 52 49 47 48 45 49 44 53  20 47 52 41 41 44 22 3B  |RIGHEIDS GRAAD";|
00001020: 4E AB 31 00 34 18 CC 0B  8B 20 54 B2 30 20 A7 20  |N.1.4.... T.0 . |
00001030: 33 30 36 30 00 45 18 D6  0B 8B 20 54 B2 31 20 A7  |3060.E.... T.1 .|
00001040: 20 33 30 35 30 00 74 18  E0 0B 99 22 11 54 45 4B  | 3050.t....".TEK|
00001050: 45 4E 49 4E 47 20 4B 4F  4D 54 20 4F 50 20 45 45  |ENING KOMT OP EE|
00001060: 4E 20 4E 49 45 55 57 20  56 45 4C 2E 22 3A 89 20  |N NIEUW VEL.":. |
00001070: 33 30 36 30 00 AD 18 EA  0B 99 22 11 42 45 48 41  |3060......".BEHA|
00001080: 4C 56 45 20 44 45 20 54  45 4B 45 4E 49 4E 47 20  |LVE DE TEKENING |
00001090: 57 4F 52 44 54 20 4F 4F  4B 20 44 45 20 55 49 54  |WORDT OOK DE UIT|
000010A0: 4C 45 47 20 56 45 52 4D  45 4C 44 2E 22 00 BE 18  |LEG VERMELD."...|
000010B0: F4 0B 8B 20 4B B2 30 20  A7 20 33 30 36 35 00 EC  |... K.0 . 3065..|
000010C0: 18 F5 0B 99 22 11 45 52  20 57 4F 52 44 54 20 45  |....".ER WORDT E|
000010D0: 45 4E 20 43 45 4E 54 52  41 41 4C 20 4B 52 55 49  |EN CENTRAAL KRUI|
000010E0: 53 20 41 46 47 45 44 52  55 4B 54 22 00 0B 19 F9  |S AFGEDRUKT"....|
000010F0: 0B 99 22 11 49 53 20 44  49 54 20 4A 55 49 53 54  |..".IS DIT JUIST|
00001100: 20 22 3B 3A 8D 20 31 31  30 30 30 00 1A 19 FE 0B  | ";:. 11000.....|
00001110: 42 24 B2 C8 28 42 24 2C  31 29 00 2E 19 08 0C 8B  |B$..(B$,1)......|
00001120: 20 42 24 B2 22 4E 22 20  A7 20 32 38 32 30 00 34  | B$."N" . 2820.4|
00001130: 19 12 0C 8E 00 4E 19 88  13 8F 20 52 45 4B 45 4E  |.....N.... REKEN|
00001140: 20 45 4E 20 54 45 4B 45  4E 20 44 45 45 4C 00 54  | EN TEKEN DEEL.T|
00001150: 19 92 13 3A 00 6F 19 9C  13 8F 20 50 4C 4F 54 54  |...:.o.... PLOTT|
00001160: 45 52 20 49 4E 54 49 41  4C 49 53 41 54 49 45 00  |ER INTIALISATIE.|
00001170: 75 19 A6 13 3A 00 96 19  B0 13 9F 20 34 2C 36 2C  |u...:...... 4,6,|
00001180: 30 20 3A 20 8F 20 50 52  49 4E 54 20 41 53 43 49  |0 : . PRINT ASCI|
00001190: 49 20 44 41 54 41 00 B4  19 BA 13 9F 20 31 2C 36  |I DATA...... 1,6|
000011A0: 2C 31 20 3A 20 8F 20 50  4C 4F 54 20 58 2D 59 20  |,1 : . PLOT X-Y |
000011B0: 44 41 54 41 00 CA 19 C4  13 9F 20 32 2C 36 2C 32  |DATA...... 2,6,2|
000011C0: 20 3A 20 8F 20 4B 4C 45  55 52 00 DE 19 CE 13 98  | : . KLEUR......|
000011D0: 32 2C 22 31 22 3A 20 8F  20 42 4C 41 55 57 00 E4  |2,"1": . BLAUW..|
000011E0: 19 D8 13 3A 00 FB 19 E2  13 8F 20 53 54 41 52 54  |...:...... START|
000011F0: 20 4D 45 44 45 44 45 4C  49 4E 47 00 01 1A EC 13  | MEDEDELING.....|
00001200: 3A 00 12 1A F6 13 8B 20  54 B2 30 20 A7 20 35 32  |:...... T.0 . 52|
00001210: 39 30 00 35 1A 00 14 8B  20 54 B2 32 20 A7 20 98  |90.5.... T.2 . .|
00001220: 34 2C 22 53 50 49 52 4F  47 52 41 50 48 22 3A 89  |4,"SPIROGRAPH":.|
00001230: 20 35 32 39 30 00 59 1A  0A 14 98 34 3A 98 34 3A  | 5290.Y....4:.4:|
00001240: 98 34 2C 22 45 50 49 43  59 43 45 4C 20 43 4F 4E  |.4,"EPICYCEL CON|
00001250: 53 54 52 55 43 54 49 45  22 00 89 1A 14 14 98 34  |STRUCTIE"......4|
00001260: 3A 98 34 2C 22 44 49 54  20 50 52 4F 47 52 41 4D  |:.4,"DIT PROGRAM|
00001270: 4D 41 20 43 4F 4E 53 54  52 55 45 45 52 44 20 45  |MA CONSTRUEERD E|
00001280: 45 4E 20 46 49 47 55 55  52 00 B7 1A 1E 14 98 34  |EN FIGUUR......4|
00001290: 2C 22 44 49 45 20 4F 50  20 47 45 42 4F 55 57 44  |,"DIE OP GEBOUWD|
000012A0: 20 47 45 44 41 43 48 54  20 4B 41 4E 20 57 4F 52  | GEDACHT KAN WOR|
000012B0: 44 45 4E 20 55 49 54 00  E6 1A 28 14 98 34 2C 22  |DEN UIT...(..4,"|
000012C0: 4D 45 45 52 44 45 52 45  20 43 49 52 4B 45 4C 53  |MEERDERE CIRKELS|
000012D0: 20 44 49 45 20 45 45 4E  20 53 41 4D 45 4E 47 45  | DIE EEN SAMENGE|
000012E0: 53 54 45 4C 44 45 00 03  1B 32 14 98 34 2C 22 42  |STELDE...2..4,"B|
000012F0: 45 57 45 47 49 4E 47 20  55 49 54 56 4F 45 52 45  |EWEGING UITVOERE|
00001300: 4E 2E 22 00 34 1B 3C 14  98 34 3A 98 34 2C 22 45  |N.".4.<..4:.4,"E|
00001310: 52 20 5A 49 4A 4E 20 49  4E 20 44 45 5A 45 20 46  |R ZIJN IN DEZE F|
00001320: 49 47 55 55 52 22 3B 41  4E 3B 22 43 49 52 4B 45  |IGUUR";AN;"CIRKE|
00001330: 4C 53 2E 22 00 5E 1B 46  14 98 34 2C 22 4D 45 54  |LS.".^.F..4,"MET|
00001340: 20 41 4C 53 20 4F 4E 44  45 52 4C 49 4E 47 45 4E  | ALS ONDERLINGEN|
00001350: 20 56 45 52 48 4F 55 44  49 4E 47 45 4E 22 00 64  | VERHOUDINGEN".d|
00001360: 1B 50 14 3A 00 76 1B 5A  14 98 32 2C 22 32 22 3A  |.P.:.v.Z..2,"2":|
00001370: 8F 20 52 4F 4F 44 00 85  1B 64 14 81 20 5A B2 31  |. ROOD...d.. Z.1|
00001380: 20 A4 20 41 4E 00 C0 1B  6E 14 3A 20 98 34 2C 22  | . AN...n.: .4,"|
00001390: 43 2D 22 3B 5A 3B 22 53  54 52 41 41 4C 22 3B 53  |C-";Z;"STRAAL";S|
000013A0: 52 28 5A 29 3B 22 46 45  52 51 2E 22 3B 46 45 28  |R(Z);"FERQ.";FE(|
000013B0: 5A 29 3B 22 46 41 53 45  3A 22 3B 46 41 28 5A 29  |Z);"FASE:";FA(Z)|
000013C0: 00 C8 1B 78 14 82 20 5A  00 CF 1B 82 14 98 34 00  |...x.. Z......4.|
000013D0: D5 1B 8C 14 3A 00 F0 1B  96 14 8F 20 49 4E 49 54  |....:...... INIT|
000013E0: 49 41 4C 49 53 45 45 52  20 50 4C 4F 54 54 45 52  |IALISEER PLOTTER|
000013F0: 00 F6 1B A0 14 3A 00 0A  1C AA 14 98 32 2C 43 24  |.....:......2,C$|
00001400: 20 3A 20 8F 20 4B 4C 45  55 52 00 15 1C AB 14 98  | : . KLEUR......|
00001410: 31 2C 22 48 22 00 1B 1C  B4 14 3A 00 27 1C B5 14  |1,"H".....:.'...|
00001420: 8F 20 4B 52 55 49 53 00  38 1C B6 14 8B 20 4B B2  |. KRUIS.8.... K.|
00001430: 30 20 A7 20 35 33 34 30  00 3E 1C B7 14 3A 00 52  |0 . 5340.>...:.R|
00001440: 1C B8 14 98 31 2C 22 4D  22 2C 32 32 39 2C AB 32  |....1,"M",229,.2|
00001450: 33 39 00 66 1C B9 14 98  31 2C 22 44 22 2C 32 34  |39.f....1,"D",24|
00001460: 39 2C AB 32 33 39 00 7A  1C BA 14 98 31 2C 22 4D  |9,.239.z....1,"M|
00001470: 22 2C 32 33 39 2C AB 32  32 39 00 8E 1C BB 14 98  |",239,.229......|
00001480: 31 2C 22 44 22 2C 32 33  39 2C AB 32 34 39 00 94  |1,"D",239,.249..|
00001490: 1C BE 14 3A 00 A9 1C C8  14 8F 20 53 54 41 52 54  |...:...... START|
000014A0: 20 42 45 52 4B 45 4E 45  4E 00 AF 1C D2 14 3A 00  | BERKENEN.....:.|
000014B0: D1 1C DC 14 53 52 B2 30  3A 46 45 B2 30 3A 20 8F  |....SR.0:FE.0: .|
000014C0: 20 53 52 20 4D 41 58 20  45 4E 20 46 45 20 54 4F  | SR MAX EN FE TO|
000014D0: 54 00 E0 1C E6 14 81 20  5A B2 31 20 A4 20 41 4E  |T...... Z.1 . AN|
000014E0: 00 01 1D F0 14 3A 20 53  52 B2 53 52 AA 53 52 28  |.....: SR.SR.SR(|
000014F0: 5A 29 3A 46 45 B2 46 45  AA B6 28 46 45 28 5A 29  |Z):FE.FE..(FE(Z)|
00001500: 29 00 09 1D FA 14 82 20  5A 00 0F 1D 04 15 3A 00  |)...... Z.....:.|
00001510: 39 1D 0E 15 5A B2 30 3A  53 B2 B5 28 31 AA 28 41  |9...Z.0:S..(1.(A|
00001520: 4E AC 41 4E AC 31 30 30  30 30 AD 53 48 29 AD BA  |N.AN.10000.SH)..|
00001530: 28 46 45 29 29 AD 31 30  30 00 3F 1D 18 15 3A 00  |(FE)).100.?...:.|
00001540: 50 1D 22 15 8F 20 5A 3D  30 20 54 4F 20 33 36 30  |P.".. Z=0 TO 360|
00001550: 00 60 1D 2C 15 3A 20 58  43 B2 30 3A 59 43 B2 30  |.`.,.: XC.0:YC.0|
00001560: 00 71 1D 36 15 3A 20 81  20 58 B2 31 20 A4 20 41  |.q.6.: . X.1 . A|
00001570: 4E 00 9B 1D 40 15 3A 20  20 58 43 B2 58 43 AA 53  |N...@.:  XC.XC.S|
00001580: 52 28 58 29 AC BF 28 5A  AC 54 52 AC 46 45 28 58  |R(X)..(Z.TR.FE(X|
00001590: 29 AA 46 41 28 58 29 AC  54 52 29 00 C5 1D 4A 15  |).FA(X).TR)...J.|
000015A0: 3A 20 20 59 43 B2 59 43  AA 53 52 28 58 29 AC BE  |:  YC.YC.SR(X)..|
000015B0: 28 5A AC 54 52 AC 46 45  28 58 29 AA 46 41 28 58  |(Z.TR.FE(X).FA(X|
000015C0: 29 AC 54 52 29 00 CF 1D  54 15 3A 20 82 20 58 00  |).TR)...T.: . X.|
000015D0: D5 1D 5E 15 3A 00 FA 1D  68 15 8F 20 56 45 52 54  |..^.:...h.. VERT|
000015E0: 41 4C 45 4E 20 58 2D 59  20 4E 41 41 52 20 50 4C  |ALEN X-Y NAAR PL|
000015F0: 4F 54 54 45 52 20 50 55  4E 54 00 0D 1E 72 15 3A  |OTTER PUNT...r.:|
00001600: 20 58 43 B2 58 43 AC 53  48 AD 31 30 30 00 20 1E  | XC.XC.SH.100. .|
00001610: 7C 15 3A 20 59 43 B2 59  43 AC 53 48 AD 31 30 30  ||.: YC.YC.SH.100|
00001620: 00 3B 1E 86 15 3A 20 58  43 B2 58 43 AA 53 52 20  |.;...: XC.XC.SR |
00001630: 3A 20 8F 20 41 42 53 20  50 4F 53 00 4A 1E 90 15  |: . ABS POS.J...|
00001640: 3A 20 59 43 B2 59 43 AA  53 52 00 6D 1E 9A 15 3A  |: YC.YC.SR.m...:|
00001650: 20 58 43 B2 58 43 AD 53  52 AC 32 33 39 3A 20 8F  | XC.XC.SR.239: .|
00001660: 20 58 59 2D 3E 20 50 4C  4F 54 54 45 52 00 80 1E  | XY-> PLOTTER...|
00001670: A4 15 3A 20 59 43 B2 59  43 AD 53 52 AC 32 33 39  |..: YC.YC.SR.239|
00001680: 00 86 1E AE 15 3A 00 9C  1E AF 15 8F 20 58 43 2C  |.....:...... XC,|
00001690: 59 43 20 49 53 20 4E 55  20 50 4F 53 00 B4 1E B1  |YC IS NU POS....|
000016A0: 15 8F 20 43 4F 4E 54 52  4F 4C 45 20 53 54 41 50  |.. CONTROLE STAP|
000016B0: 20 47 52 2E 00 BA 1E B2  15 3A 00 CD 1E B3 15 3A  | GR......:.....:|
000016C0: 20 8B 20 5A B2 30 20 A7  20 35 35 37 39 00 EB 1E  | . Z.0 . 5579...|
000016D0: B4 15 3A 20 56 58 B2 B6  28 58 56 AB 58 43 29 3A  |..: VX..(XV.XC):|
000016E0: 56 59 B2 B6 28 59 56 AB  59 43 29 00 0B 1F B5 15  |VY..(YV.YC).....|
000016F0: 3A 20 8B 20 28 56 58 B1  4E 29 20 AF 20 28 56 59  |: . (VX.N) . (VY|
00001700: B1 4E 29 20 A7 20 53 B2  53 AD 32 00 2B 1F B6 15  |.N) . S.S.2.+...|
00001710: 3A 20 8B 20 28 56 58 B3  4D 29 20 AF 20 28 56 59  |: . (VX.M) . (VY|
00001720: B3 4D 29 20 A7 20 53 B2  53 AC 32 00 3D 1F CB 15  |.M) . S.S.2.=...|
00001730: 3A 20 58 56 B2 58 43 3A  59 56 B2 59 43 00 4B 1F  |: XV.XC:YV.YC.K.|
00001740: CC 15 8F 20 50 4C 4F 54  54 45 4E 00 51 1F D6 15  |... PLOTTEN.Q...|
00001750: 3A 00 65 1F E0 15 3A 20  8B 20 5A B3 B1 30 20 A7  |:.e...: . Z..0 .|
00001760: 20 35 36 32 30 00 79 1F  EA 15 3A 20 98 31 2C 22  | 5620.y...: .1,"|
00001770: 4D 22 3B 58 43 2C AB 59  43 00 8D 1F F4 15 3A 20  |M";XC,.YC.....: |
00001780: 98 31 2C 22 44 22 3B 58  43 2C AB 59 43 00 A0 1F  |.1,"D";XC,.YC...|
00001790: FE 15 8B 20 5A B1 33 36  30 20 A7 20 35 36 37 30  |... Z.360 . 5670|
000017A0: 00 B1 1F 03 16 5A B2 5A  AA 53 3A 89 20 35 34 32  |.....Z.Z.S:. 542|
000017B0: 30 00 B7 1F 08 16 3A 00  C3 1F 12 16 8F 20 4B 4C  |0.....:...... KL|
000017C0: 41 41 52 00 C9 1F 1C 16  3A 00 DB 1F 26 16 98 31  |AAR.....:...&..1|
000017D0: 2C 22 4D 22 2C 30 2C AB  34 38 30 00 E3 1F 30 16  |,"M",0,.480...0.|
000017E0: A0 20 32 00 EB 1F 3A 16  A0 20 31 00 F3 1F 44 16  |. 2...:.. 1...D.|
000017F0: A0 20 34 00 F9 1F 4E 16  8E 00 FF 1F 0F 27 3A 00  |. 4...N......':.|
00001800: 1B 20 10 27 8F 20 50 4C  4F 54 54 45 52 20 52 45  |. .'. PLOTTER RE|
00001810: 53 45 54 20 52 4F 55 54  49 4E 45 00 2C 20 1A 27  |SET ROUTINE., .'|
00001820: 9F 37 2C 36 2C 37 3A 98  37 3A A0 37 00 32 20 24  |.7,6,7:.7:.7.2 $|
00001830: 27 8E 00 38 20 2E 27 3A  00 4C 20 F8 2A 8F 20 49  |'..8 .':.L .*. I|
00001840: 4E 50 55 54 20 52 4F 55  54 49 4E 45 00 52 20 02  |NPUT ROUTINE.R .|
00001850: 2B 3A 00 61 20 0C 2B 42  24 B2 22 22 3A 4C 4C B2  |+:.a .+B$."":LL.|
00001860: 30 00 88 20 16 2B 99 22  AF 9D 22 3B 3A A1 20 41  |0.. .+."..";:. A|
00001870: 24 3A 99 22 20 9D 22 3B  3A 8B 20 41 24 B2 22 22  |$:." .";:. A$.""|
00001880: 20 A7 20 31 31 30 33 30  00 8E 20 20 2B 3A 00 AC  | . 11030..  +:..|
00001890: 20 2A 2B 8F 20 43 4F 4E  54 52 4F 4C 45 20 57 41  | *+. CONTROLE WA|
000018A0: 54 20 42 49 4E 4E 45 4E  4B 4F 4D 54 00 B2 20 34  |T BINNENKOMT.. 4|
000018B0: 2B 3A 00 CA 20 3E 2B 8B  20 41 24 B2 C7 28 31 33  |+:.. >+. A$..(13|
000018C0: 29 20 A7 20 99 22 20 22  3A 8E 00 FC 20 48 2B 8B  |) . ." ":... H+.|
000018D0: 20 41 24 B3 B1 C7 28 31  34 38 29 20 AF 20 41 24  | A$...(148) . A$|
000018E0: B3 B1 C7 28 32 30 29 20  AF 20 41 24 B3 B1 C7 28  |...(20) . A$...(|
000018F0: 31 35 37 29 20 A7 20 31  31 31 36 30 00 02 21 52  |157) . 11160..!R|
00001900: 2B 3A 00 14 21 5C 2B 8F  20 44 45 4C 45 54 45 20  |+:..!\+. DELETE |
00001910: 43 48 41 52 00 1A 21 66  2B 3A 00 4D 21 70 2B 8B  |CHAR..!f+:.M!p+.|
00001920: 20 4C 4C B1 30 20 A7 20  4C 4C B2 4C 4C AB 31 3A  | LL.0 . LL.LL.1:|
00001930: 42 24 B2 C8 28 42 24 2C  4C 4C 29 3A 99 22 20 9D  |B$..(B$,LL):." .|
00001940: 9D 20 9D 22 3B 3A 89 20  31 31 30 33 30 00 53 21  |. .";:. 11030.S!|
00001950: 7A 2B 3A 00 72 21 84 2B  8F 20 54 4F 45 56 4F 45  |z+:.r!.+. TOEVOE|
00001960: 47 45 4E 20 43 48 52 20  41 41 4E 20 53 54 52 49  |GEN CHR AAN STRI|
00001970: 4E 47 00 78 21 8E 2B 3A  00 8C 21 98 2B 8B 20 4C  |NG.x!.+:..!.+. L|
00001980: 4C B1 31 39 20 A7 20 31  31 30 33 30 00 CB 21 A2  |L.19 . 11030..!.|
00001990: 2B 41 B2 C5 28 41 24 29  3A 8B 20 41 B3 B1 30 20  |+A..(A$):. A..0 |
000019A0: B0 20 41 24 B2 22 30 22  20 B0 20 41 24 B2 22 2D  |. A$."0" . A$."-|
000019B0: 22 20 B0 20 41 24 B2 22  2E 22 20 B0 20 41 24 B2  |" . A$."." . A$.|
000019C0: 22 20 22 20 A7 20 31 31  31 39 30 00 E9 21 AC 2B  |" " . 11190..!.+|
000019D0: 8B 20 41 24 B3 22 41 22  20 B0 20 41 24 B1 22 5A  |. A$."A" . A$."Z|
000019E0: 22 20 A7 20 31 31 30 33  30 00 0B 22 B6 2B 99 41  |" . 11030..".+.A|
000019F0: 24 3B 3A 42 24 B2 42 24  AA 41 24 3A 4C 4C B2 4C  |$;:B$.B$.A$:LL.L|
00001A00: 4C AA 31 3A 89 20 31 31  30 33 30 00 11 22 C0 2B  |L.1:. 11030..".+|
00001A10: 3A 00 2C 22 CA 2B 8F 20  45 49 4E 44 45 20 49 4E  |:.,".+. EINDE IN|
00001A20: 56 4F 45 52 20 52 4F 55  54 49 4E 45 00 32 22 D4  |VOER ROUTINE.2".|
00001A30: 2B 3A 00 00 00                                    |+:...           |
....D.. HOOFD PRG.5.N.. PROGRAMMA DAT OP
 1520 PLOTTER.W.X.. EEN CIRKEL TEKENT EN
 OP DIE.Z.... EN OP DIE CIRKEL WEER EEN 
2E...... CIRKEL CONSTRUEERD, NET ALS IN.
..... DE MIDDEL EEUWEN WERD TOE-... .. G
EPAST OM ZO DE PLANEET BANEN...... TE VE
RKLAREN........".... BR. HAAK J.JANSLAAN
 10 ALMELO.G.H.TR...180 : . GEEFT GRADEN
 -> RAD.M.R.:.J.... 10000: . RESET PLOTT
ER...... 2000: . UITLEG PRG...... 2390: 
. INGEVEN VAN WAARDEN.A.... 5000: . UITV
OEREN PRG.V....".NOG EENS ? ";...... 110
00.....B$.H(B$,1)...".. B$."J" . 240...,
.. B$."N" . 320.!.6.. 260.K.@..".WACHT T
OT ALLES GE'RESET' IS EN START   PAS DAA
RNA EEN ANDER PRG.".W.J.. 10000.}.T.....
P.. PRG UITLEG...Z..53280,0:.53281,0:.".
.";G(8);G(142);......"SPIROGRAPH 2.2    
     DOOR: BRALDT HAAK"......"DIT PROGRA
MMA TEKENT OP DE PLOTTER.;...."BYZONDERE
 FIGUREN. ZE LIJKEN WEL WAT.I...."OP SPI
ROGRAPH (TM) FIGUREN MAAR HEBBEN"......"
OOK BETEKENIS VOOR HET INZICHT IN DE"...
..."GESCHIEDENIS VAN DE WETENSCHAP."....
..".IN DE MIDDEL EEUWEN HIELDEN DE WETEN
-... .."SCHAPPERS NOG VAST AAN EEN WEREL
D BEELD.=.*.."MET DE AARDE IN HET MIDDEL
PUNT..H.4.."ALLE PLANETEN BEHOORDEN VOLG
ENS DIE"...>.."THEORIE IN CIRKELVORMIGE 
BANEN OM DE"...H.."AARDE HEEN TE DRAAIEN
."...R.."DE WAARNEMINGEN VAN DE STERRENK
UNDIGEN"...\.."SPRAKEN DEZE THEORIE TEGE
N.".1.F..".OM TOCH VAST TE HOUDEN AAN DE
 HET IDEE.\.P.."VAN IDEALE CIRKELS GING 
MEN CIRKEL-"...Z.."BANEN OP DE CIRKELBAN
EN CREEREN,"......"DE Z.G.N. EPICYCELS. 
OP DEZE WIJZE ONT-"......"STONDEN HEEL I
NGEWIKKELDE BAANPATRONEN."......".DRUK O
P RETURN"......198,0:. 198,1.:....".DAT 
MEN OP DEZE WIJZE DE THEORIE GOED".D....
"KREEG IS GEEN WONDER WANT MET TWEE"....
.."CIRKELS IS ZELFS BIJNA EEN VIERKANT T
E"...J.."MAKEN. ONTHOUD: HET FERQUENTIE 
VERSCHIL BEPAALT HET AANTAL LUSSEN."...T
..".IK ZAL BESLUITEN DOOR EEN AANTAL VOO
R-".$...."BEELDEN TE GEVEN.".R....".CIRK
EL-1: STRAAL= 3, FERQ.= 1,FASE=45".....
"CIRKEL-2: STRAAL= 1, FERQ.= 6,FASE= 0".
.....".CIRKEL-1: STRAAL= 5, FERQ.= 3,FAS
E= 0".Z...."CIRKEL-2: STRAAL= 2, FERQ.= 
5,FASE= 0"......".CIRKEL-1: STRAAL=15, F
ERQ.= 1,FASE= 0".5...."CIRKEL-2: STRAAL=
 1, FERQ.=-5,FASE= 0".B.$.."CIRKEL-3: ST
RAAL= 1, FERQ.=15,FASE= 0"......".CIRKEL
-1: STRAAL=6.8,FERQ.= 1,FASE= 0"...8.."C
IRKEL-2: STRAAL= 1, FERQ.=-3,FASE= 0"...
B..".SUCCES, DRUK OP RETURN"...L..198,0:
. 198,1:....V.:...`.. INGEVEN WAARDEN...
J.:.D.T..".HOEVEEL CIRKEL NIVO'S ";:. 11
000:AN.E(B$).V.~.. AN.2 . 2420.\...:.B..
...Q.... Z.1 . AN.....: ."STRAAL VERHOUD
ING CIRKEL";Z;" ";.....: . 11000:SR(Z).E
(B$)...... Z...D.. INVOER CIRKEL FREQUEN
TIES...N.:.'.X..".ONTHOUD: NEGATIEVE FRE
QUENTIES GEVEN EENOMGEKEERDE DRAAING!.".
6.... Z.1 . AN.G...: ."WAT ZIJN DE VERHO
UDIGEN VAN DE ROTATIE-".....: ."SNELHEDE
N V.D. CIRKEL (NO.";Z;") ";.....: . 1100
0:FE(Z).E(B$)...... Z.....:...... FE(1).
0 . ."FERQUENTIE <> 0 !":. 2530...(.:...
2.. INVOER VAN FASE...<.:.8.F..".VOER NU
 DE FASE IN. DAT IS DE HOEK DIE".I.P.."D
E CIRKEL VOOR HEEFT OP DE ANDERE CIRKEL"
;...Z.."BIJ HET DOORLOPEN VAN ZIJN BAAN.
."...D.. Z.1 . AN.L.N.: ."WAT IS DE FASE
 (NO."Z"),(0-360) ";...X.: . 11000:FA(Z)
.E(B$)...... Z.....:.+.... DISPLAY INVOE
R EN VRAAG OF DIT          JUIST IS.1. .
:.E....".OVERZICHT:.".T.... Z.1 . AN....
.: ."CIRKEL";Z;"R="SR(Z);.16);"F="FE(Z);
.24);"FA=";FA(Z)...H.. Z...R.:......".IS
 DIT JUIST ";:. 11000.L...B$.H(B$,1)....
.. B$."N" . 2420.....:......".PEN KLEURE
N:"......".0-ZWART   1-BLAUW.,...."2-ROO
D    3-GROEN.Q."..".UW KEUZE ";:.11000:C
..(E(B$)).B.,.. C.4 . 2820.S.6.C$.I(D(C)
,1).Y.@.:...J.. WIJZE VAN AFBEELDEN...T.
:.Z.^..".WILT U DE EPICYCELS UITLEG OOK 
AFGEDRUKTHEBBEN (J/N) ? ";...H.. 11000:.
 H(B$,1)."J" . T.1:. 2945.C.R..".WILT U 
EEN NIEUW VEL VOOR DEZE TEKENING (J/N) ?
 ";:. 11000.[.W.. H(B$,1)."J" . T.2.T.|.
. H(B$,1).."J" . T.0.Z.~.:......".WILT U
 EEN EEN CENTRAAL KRUIS AFGEBEELD (J/N) 
? ";:. 11000.T.... H(B$,1)."J" . K.1....
.. H(B$,1).."J" . K.0.....:.*....".AFBEE
LDINGS SCHAAL (1-100%) ";:. 11000:SH.E(B
$).N...SH..(SH):. SH.100 . SH.0 . 2970.T
. .:......".NAUWKEURIGHEIDS GRAAD (1-25)
 ";:. 11000:N.E(B$).....N..(N).1:. N.26 
. N.2 . 2980.....M.N.2.....:.N....".CONT
ROLE:"......".PEN KLEUR:";C...B..".AFBEE
LDINGS SCHAAL";SH.#.G..".NAUWKEURIGHEIDS
 GRAAD";N.1.4.L.. T.0 . 3060.E.V.. T.1 .
 3050.T....".TEKENING KOMT OP EEN NIEUW 
VEL.":. 3060......".BEHALVE DE TEKENING 
WORDT OOK DE UITLEG VERMELD."...... K.0 
. 3065......".ER WORDT EEN CENTRAAL KRUI
S AFGEDRUKT"......".IS DIT JUIST ";:. 11
000.....B$.H(B$,1)...... B$."N" . 2820.4
.....N.... REKEN EN TEKEN DEEL.T...:.O..
.. PLOTTER INTIALISATIE.U...:...... 4,6,
0 : . PRINT ASCII DATA...... 1,6,1 : . P
LOT X-Y DATA.J.D.. 2,6,2 : . KLEUR...N..
2,"1": . BLAUW...X.:...... START MEDEDEL
ING.....:...... T.0 . 5290.5.... T.2 . .
4,"SPIROGRAPH":. 5290.Y....4:.4:.4,"EPIC
YCEL CONSTRUCTIE"......4:.4,"DIT PROGRAM
MA CONSTRUEERD EEN FIGUUR......4,"DIE OP
 GEBOUWD GEDACHT KAN WORDEN UIT...(..4,"
MEERDERE CIRKELS DIE EEN SAMENGESTELDE..
.2..4,"BEWEGING UITVOEREN.".4.<..4:.4,"E
R ZIJN IN DEZE FIGUUR";AN;"CIRKELS.".^.F
..4,"MET ALS ONDERLINGEN VERHOUDINGEN".D
.P.:.V.Z..2,"2":. ROOD...D.. Z.1 . AN...
N.: .4,"C-";Z;"STRAAL";SR(Z);"FERQ.";FE(
Z);"FASE:";FA(Z).H.X.. Z.O....4.U...:...
... INITIALISEER PLOTTER... .:......2,C$
 : . KLEUR......1,"H".....:.'.... KRUIS.
8.... K.0 . 5340.>...:.R....1,"M",229,.2
39.F....1,"D",249,.239.Z....1,"M",239,.2
29......1,"D",239,.249.....:...H.. START
 BERKENEN...R.:.Q...SR.0:FE.0: . SR MAX 
EN FE TOT...... Z.1 . AN.....: SR.SR.SR(
Z):FE.FE..(FE(Z))...... Z.....:.9...Z.0:
S..(1.(AN.AN.10000.SH)..(FE)).100.?...:.
P.".. Z=0 TO 360.`.,.: XC.0:YC.0.Q.6.: .
 X.1 . AN...@.:  XC.XC.SR(X)..(Z.TR.FE(X
).FA(X).TR).E.J.:  YC.YC.SR(X)..(Z.TR.FE
(X).FA(X).TR).O.T.: . X.U.^.:...H.. VERT
ALEN X-Y NAAR PLOTTER PUNT...R.: XC.XC.S
H.100. .|.: YC.YC.SH.100.;...: XC.XC.SR 
: . ABS POS.J...: YC.YC.SR.M...: XC.XC.S
R.239: . XY-> PLOTTER.....: YC.YC.SR.239
.....:...... XC,YC IS NU POS...... CONTR
OLE STAP GR......:.M...: . Z.0 . 5579...
..: VX..(XV.XC):VY..(YV.YC).....: . (VX.
N) . (VY.N) . S.S.2.+...: . (VX.M) . (VY
.M) . S.S.2.=.K.: XV.XC:YV.YC.K.L.. PLOT
TEN.Q.V.:.E...: . Z..0 . 5620.Y...: .1,"
M";XC,.YC.....: .1,"D";XC,.YC. .... Z.36
0 . 5670.....Z.Z.S:. 5420.....:.C.... KL
AAR.I...:...&..1,"M",0,.480...0.  2...:.
  1...D.  4...N......':.. .'. PLOTTER RE
SET ROUTINE., .'.7,6,7:.7: 7.2 $'..8 .':
.L .*. INPUT ROUTINE.R .+:.A .+B$."":LL.
0.. .+."..";:. A$:." .";:. A$."" . 11030
..  +:.. *+. CONTROLE WAT BINNENKOMT.. 4
+:.J >+. A$.G(13) . ." ":... H+. A$..G(1
48) . A$..G(20) . A$..G(157) . 11160..!R
+:..!\+. DELETE CHAR..!F+:.M!P+. LL.0 . 
LL.LL.1:B$.H(B$,LL):." .. .";:. 11030.S!
Z+:.R!.+. TOEVOEGEN CHR AAN STRING.X!.+:
..!.+. LL.19 . 11030.K!.+A.E(A$):. A..0 
. A$."0" . A$."-" . A$."." . A$." " . 11
190..!.+. A$."A" . A$."Z" . 11030..".+.A
$;:B$.B$.A$:LL.LL.1:. 11030..".+:.,"J+. 
EINDE INVOER ROUTINE.2"T+:...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL