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

BLOK DIAGRAM

FILE INFORMATION

FILENAME(S): BLOK DIAGRAM

FILE TYPE(S): PRG

FILE SIZE: 2.3K

FIRST SEEN: 2025-11-30 21:26:21

APPEARS ON: 1 disk(s)

FILE HASH

393cf1cafc9196afded2d3cdecbc6293054b26b282d08e838bff72f1f4c5215b

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ZCP SOFTWARE A BLOK DIAGRAM PRG DuncanTwain 25 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 22 08 F8 2A 8F 23  2A 2A 2A 2A 2A 2A 2A 2A  |.."..*.#********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 00 2D 08 02 2B 8F  20 44 41 54 41 00 4E 08  |**.-..+. DATA.N.|
00000030: 0C 2B 8F 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.+.*************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 84  |**************..|
00000050: 08 16 2B 97 35 33 32 38  31 2C 31 35 3A 85 22 93  |..+.53281,15:.".|
00000060: 90 11 4C 41 41 44 54 20  55 20 56 41 4E 41 46 20  |..LAADT U VANAF |
00000070: 43 41 53 53 45 54 54 45  3F 20 28 4A 2F 4E 29 3A  |CASSETTE? (J/N):|
00000080: 22 3B 51 24 00 99 08 20  2B 8B 20 51 24 B2 22 4A  |";Q$... +. Q$."J|
00000090: 22 20 A7 20 31 32 34 32  30 00 B8 08 2A 2B 99 22  |" . 12420...*+."|
000000A0: 93 11 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 12 1C  |................|
000000B0: 47 52 41 46 49 45 4B 22  00 EA 08 34 2B 99 22 11  |GRAFIEK"...4+.".|
000000C0: 90 56 45 52 54 49 43 41  41 4C 20 5A 49 4A 4E 20  |.VERTICAAL ZIJN |
000000D0: 31 39 20 45 45 4E 48 45  44 45 4E 20 42 45 53 43  |19 EENHEDEN BESC|
000000E0: 48 52 49 4B 42 41 41 52  2E 22 00 0C 09 3E 2B 99  |HRIKBAAR."...>+.|
000000F0: 22 11 1F 49 4E 50 55 54  57 41 41 52 44 45 20 50  |"..INPUTWAARDE P|
00000100: 45 52 20 45 45 4E 48 49  45 44 2E 22 00 1F 09 48  |ER EENHIED."...H|
00000110: 2B 85 22 45 45 4E 48 49  45 44 3A 22 3B 55 57 00  |+."EENHIED:";UW.|
00000120: 45 09 52 2B 85 22 11 1C  4E 41 41 4D 20 56 4F 4F  |E.R+."..NAAM VOO|
00000130: 52 20 48 4F 52 49 5A 4F  4E 54 41 4C 45 20 41 53  |R HORIZONTALE AS|
00000140: 22 3B 4E 48 24 00 71 09  5C 2B 99 22 93 11 90 55  |";NH$.q.\+."...U|
00000150: 20 57 45 52 4B 54 20 4D  45 54 20 45 45 4E 20 54  | WERKT MET EEN T|
00000160: 4F 54 20 5A 45 53 20 4B  4F 4C 4F 4D 4D 45 4E 2E  |OT ZES KOLOMMEN.|
00000170: 22 00 8C 09 66 2B 85 22  11 48 4F 45 56 45 45 4C  |"...f+.".HOEVEEL|
00000180: 20 57 49 4C 54 20 55 3A  22 3B 4E 44 00 B8 09 70  | WILT U:";ND...p|
00000190: 2B 99 22 11 11 1E 55 20  57 45 52 4B 54 20 4D 45  |+."...U WERKT ME|
000001A0: 54 20 45 45 4E 20 54 4F  54 20 44 52 49 45 20 42  |T EEN TOT DRIE B|
000001B0: 4C 4F 4B 4B 45 4E 2E 22  00 D3 09 7A 2B 85 22 11  |LOKKEN."...z+.".|
000001C0: 48 4F 45 56 45 45 4C 20  57 49 4C 54 20 55 3A 22  |HOEVEEL WILT U:"|
000001D0: 3B 4E 42 00 E4 09 84 2B  81 20 49 B2 30 20 A4 20  |;NB....+. I.0 . |
000001E0: 4E 42 AB 31 00 16 0A 8E  2B 99 22 11 1E 4E 41 41  |NB.1....+."..NAA|
000001F0: 4D 20 56 4F 4F 52 20 56  45 52 54 49 43 41 4C 45  |M VOOR VERTICALE|
00000200: 20 41 53 22 3B 49 AA 31  3B 3A 85 20 4E 56 24 28  | AS";I.1;:. NV$(|
00000210: 49 29 3A 82 20 49 00 24  0A 98 2B 86 20 48 48 28  |I):. I.$..+. HH(|
00000220: 32 2C 36 29 00 3B 0A A2  2B 99 22 93 22 3B 3A 81  |2,6).;..+.".";:.|
00000230: 20 49 B2 30 20 A4 20 4E  42 AB 31 00 4A 0A AC 2B  | I.0 . NB.1.J..+|
00000240: 81 20 4A B2 31 20 A4 20  4E 44 00 75 0A B6 2B 99  |. J.1 . ND.u..+.|
00000250: 22 11 49 4E 50 55 54 20  42 4C 4F 4B 22 3B 49 AA  |".INPUT BLOK";I.|
00000260: 31 3B 22 57 41 41 52 44  45 22 3B 4A 3B 22 3A 22  |1;"WAARDE";J;":"|
00000270: 3B 3A 85 20 54 00 A3 0A  C0 2B 8B 20 B5 28 54 AD  |;:. T....+. .(T.|
00000280: 55 57 29 B1 31 39 20 A7  20 99 22 11 57 41 41 52  |UW).19 . .".WAAR|
00000290: 44 45 20 54 45 20 48 4F  4F 47 2E 22 3A 89 31 31  |DE TE HOOG.":.11|
000002A0: 31 39 30 00 B7 0A CA 2B  48 48 28 49 2C 4A 29 B2  |190....+HH(I,J).|
000002B0: 54 3A 82 20 4A 2C 49 00  D8 0A E0 2E 8F 23 2A 2A  |T:. J,I......#**|
000002C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A  00 E6 0A EA 2E 8F 20 47  |********...... G|
000002E0: 52 41 46 49 45 4B 00 F4  0A F4 2E 8F 20 47 52 41  |RAFIEK...... GRA|
000002F0: 46 49 45 4B 00 15 0B FE  2E 8F 2A 2A 2A 2A 2A 2A  |FIEK......******|
00000300: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000310: 2A 2A 2A 2A 2A 00 3F 0B  08 2F 97 20 35 33 32 38  |*****.?../. 5328|
00000320: 31 2C 30 3A 99 20 22 93  95 11 11 11 11 11 11 11  |1,0:. ".........|
00000330: 11 11 11 11 11 11 11 11  11 11 11 11 11 22 3B 00  |.............";.|
00000340: 4E 0B 12 2F 46 24 B2 22  1D 1D 1D 1D 1D 22 00 90  |N../F$."....."..|
00000350: 0B 1C 2F 81 20 49 B2 31  20 A4 20 34 3A 99 20 46  |../. I.1 . 4:. F|
00000360: 24 3B 22 DF 12 20 20 20  20 20 20 20 20 20 20 20  |$;"..           |
00000370: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000380: 20 20 DF 22 3A 46 24 B2  46 24 AA 22 1D 22 3A 82  |  .":F$.F$.".":.|
00000390: 00 CC 0B 26 2F 99 22 13  1D 1D 1D 1D 1D 05 AF AF  |...&/.".........|
000003A0: AF AF AF AF AF AF AF AF  AF AF AF AF AF AF AF AF  |................|
000003B0: AF AF AF AF AF AF AF AF  AF AF AF AF 22 3A 8F 20  |............":. |
000003C0: 33 30 20 4B 41 52 41 4B  54 45 52 53 00 E6 0B 30  |30 KARAKTERS...0|
000003D0: 2F 81 20 49 B2 31 20 A4  20 31 39 3A 99 22 1D 1D  |/. I.1 . 19:."..|
000003E0: 1D 1D 1D CC 22 3B 00 0D  0C 3A 2F 99 22 20 20 20  |....";...:/."   |
000003F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000400: 20 20 20 20 20 20 20 20  A4 A4 22 3A 82 00 30 0C  |        ..":..0.|
00000410: 44 2F 99 22 13 22 3B 3A  81 20 49 B2 31 20 A4 20  |D/.".";:. I.1 . |
00000420: 34 3A 99 22 11 11 11 11  1D 1D 1D 1D 1D 1D 22 3B  |4:."..........";|
00000430: 00 65 0C 4E 2F 99 22 A4  A4 A4 A4 A4 A4 A4 A4 A4  |.e.N/.".........|
00000440: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000450: A4 A4 A4 22 3A 82 3A 8F  20 32 38 20 4B 41 52 41  |...":.:. 28 KARA|
00000460: 4B 54 45 52 53 00 B3 0C  58 2F 46 31 24 B2 22 13  |KTERS...X/F1$.".|
00000470: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00000480: 11 11 11 11 22 3A 46 24  B2 22 1D 1D 1D 1D 1D 1D  |....":F$."......|
00000490: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
000004A0: 1D 1D 1D 1D 1D 1D 1D 1D  22 3A 4B 4F 24 B2 22 9E  |........":KO$.".|
000004B0: 1E 9C 22 00 D9 0C 62 2F  99 22 13 11 11 11 11 11  |.."...b/."......|
000004C0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000004D0: 11 11 11 22 3B 4E 48 24  3B 00 15 0D 6C 2F 81 20  |...";NH$;...l/. |
000004E0: 48 B2 30 20 A4 20 4E 42  AB 31 3A 99 22 13 11 9D  |H.0 . NB.1:."...|
000004F0: 9D 9D 9D 9D 9D 9D 22 3B  CA 28 46 24 2C 31 2C 32  |......";.(F$,1,2|
00000500: AC 28 48 AA 31 29 29 3B  CA 28 4B 4F 24 2C 48 AA  |.(H.1));.(KO$,H.|
00000510: 31 2C 31 29 3B 00 3E 0D  76 2F 54 54 24 B2 4E 56  |1,1);.>.v/TT$.NV|
00000520: 24 28 48 29 AA 22 20 2A  22 AA C4 28 55 57 29 3A  |$(H)." *"..(UW):|
00000530: 81 20 49 B2 31 20 A4 20  C3 28 54 54 24 29 00 5A  |. I.1 . .(TT$).Z|
00000540: 0D 80 2F 99 20 CA 28 54  54 24 2C 49 2C 31 29 3B  |../. .(TT$,I,1);|
00000550: 22 9D 11 22 3B 3A 82 49  2C 48 00 84 0D 8A 2F 99  |"..";:.I,H..../.|
00000560: 22 13 1D 1D 1D 11 11 11  11 31 35 9D 9D 11 11 11  |"........15.....|
00000570: 11 11 31 30 9D 9D 11 11  11 11 11 35 9D 11 11 11  |..10.......5....|
00000580: 11 11 30 22 00 AC 0D 94  2F 46 33 24 B2 46 31 24  |..0"..../F3$.F1$|
00000590: 3A 81 20 48 B2 30 20 A4  20 4E 42 AB 31 3A 99 20  |:. H.0 . NB.1:. |
000005A0: CA 28 4B 4F 24 2C 48 AA  31 2C 31 29 00 D2 0D 9E  |.(KO$,H.1,1)....|
000005B0: 2F 46 32 24 B2 C8 28 46  24 2C 38 AA 34 AC 28 4E  |/F2$..(F$,8.4.(N|
000005C0: 44 AB 31 29 AA 48 29 3A  99 20 46 31 24 3B 46 32  |D.1).H):. F1$;F2|
000005D0: 24 3B 00 FF 0D A8 2F 81  20 49 B2 4E 44 20 A4 20  |$;..../. I.ND . |
000005E0: 31 20 A9 AB 31 3A 8B 20  B5 28 48 48 28 48 2C 49  |1 ..1:. .(HH(H,I|
000005F0: 29 AD 55 57 29 B2 30 20  A7 20 31 32 32 37 30 00  |).UW).0 . 12270.|
00000600: 1B 0E B2 2F 81 20 4A B2  31 20 A4 20 B5 28 48 48  |.../. J.1 . .(HH|
00000610: 28 48 2C 49 29 AD 55 57  29 AA 48 00 39 0E BC 2F  |(H,I).UW).H.9../|
00000620: 8B 20 B5 28 48 48 28 48  2C 49 29 AD 55 57 29 B2  |. .(HH(H,I).UW).|
00000630: 30 20 A7 20 31 32 32 37  30 00 66 0E C6 2F 8B 20  |0 . 12270.f../. |
00000640: 4A B2 31 20 A7 20 99 22  95 12 20 DF 22 3B CA 28  |J.1 . .".. .";.(|
00000650: 4B 4F 24 2C 48 AA 31 2C  31 29 3B 22 A5 20 92 91  |KO$,H.1,1);". ..|
00000660: 9D 9D 9D 9D 22 3B 00 82  0E D0 2F 8B 20 4A B1 31  |....";..../. J.1|
00000670: 20 A7 20 99 22 A7 20 12  20 20 92 91 9D 9D 9D 9D  | . .". .  ......|
00000680: 22 3B 00 AF 0E D5 2F 8F  20 4B 41 52 41 4B 54 45  |";..../. KARAKTE|
00000690: 52 53 20 5A 49 4A 4E 20  22 A7 2E 20 2E 12 2E A5  |RS ZIJN ".. ....|
000006A0: 2E 20 2E 92 2E 91 2E 9D  2E 9D 2E 9D 9D 22 3B 00  |. ...........";.|
000006B0: B7 0E DA 2F 82 20 4A 00  C4 0E E4 2F 99 22 A7 DF  |.../. J..../."..|
000006C0: 12 20 DF 22 00 ED 0E EE  2F 99 3A 46 32 24 B2 C8  |. ."..../.:F2$..|
000006D0: 28 46 32 24 2C C3 28 46  32 24 29 AB 34 29 3A 99  |(F2$,.(F2$).4):.|
000006E0: 20 46 31 24 3B 46 32 24  3B 3A 82 20 49 00 FD 0E  | F1$;F2$;:. I...|
000006F0: F8 2F 46 31 24 B2 46 31  24 AA 22 11 22 00 21 0F  |./F1$.F1$.".".!.|
00000700: 02 30 46 32 24 B2 C8 28  46 24 2C 39 AA 34 AC 28  |.0F2$..(F$,9.4.(|
00000710: 4E 44 AB 31 29 29 3A 99  20 46 33 24 3B 46 32 24  |ND.1)):. F3$;F2$|
00000720: 3B 00 29 0F 0C 30 82 20  48 00 3F 0F 16 30 81 20  |;.)..0. H.?..0. |
00000730: 49 B2 31 20 A4 20 4E 44  3A 99 20 46 33 24 3B 00  |I.1 . ND:. F3$;.|
00000740: 69 0F 20 30 46 32 24 B2  C8 28 46 24 2C 39 AA 34  |i. 0F2$..(F$,9.4|
00000750: AC 28 49 AB 31 29 29 3A  99 20 46 32 24 3B 3A 81  |.(I.1)):. F2$;:.|
00000760: 20 4A B2 31 20 A4 20 4E  42 00 8D 0F 2A 30 8B 20  | J.1 . NB...*0. |
00000770: 4A B1 31 20 B0 20 48 48  28 32 2C 49 AB 31 29 B2  |J.1 . HH(2,I.1).|
00000780: 30 20 A7 20 99 20 22 95  12 DF 9D 22 3B 00 9F 0F  |0 . . "....";...|
00000790: 34 30 99 20 22 11 1D 22  3B 3A 82 20 4A 2C 49 00  |40. "..";:. J,I.|
000007A0: B8 0F 3E 30 A1 20 41 24  3A 8B 20 41 24 B2 22 22  |..>0. A$:. A$.""|
000007B0: 20 A7 20 31 32 33 35 30  00 F2 0F 48 30 85 20 22  | . 12350...H0. "|
000007C0: 93 11 05 57 49 4C 54 20  55 20 44 41 54 41 20 57  |...WILT U DATA W|
000007D0: 45 47 53 43 48 52 49 4A  56 45 4E 20 28 4A 2F 4E  |EGSCHRIJVEN (J/N|
000007E0: 29 3A 22 3B 51 24 3A 8B  20 51 24 B2 22 4E 22 A7  |):";Q$:. Q$."N".|
000007F0: 20 80 00 2C 10 52 30 85  20 22 11 50 4F 53 49 54  | ..,.R0. ".POSIT|
00000800: 49 45 20 54 41 50 45 20  43 4F 52 52 45 43 54 2C  |IE TAPE CORRECT,|
00000810: 54 48 45 4E 20 12 52 45  54 55 52 4E 92 2D 2D 22  |THEN .RETURN.--"|
00000820: 3B 51 24 3A 52 24 B2 C7  28 31 33 29 00 42 10 5C  |;Q$:R$..(13).B.\|
00000830: 30 9F 20 31 2C 31 2C 31  2C 22 47 52 41 46 49 45  |0. 1,1,1,"GRAFIE|
00000840: 4B 22 00 5F 10 66 30 98  31 2C 4E 42 3B 52 24 3B  |K"._.f0.1,NB;R$;|
00000850: 4E 44 3B 52 24 3B 4E 48  24 3B 52 24 3B 55 57 00  |ND;R$;NH$;R$;UW.|
00000860: 96 10 70 30 81 20 49 B2  30 20 A4 20 4E 42 AB 31  |..p0. I.0 . NB.1|
00000870: 3A 98 31 2C 4E 56 24 28  49 29 3A 81 20 4A B2 30  |:.1,NV$(I):. J.0|
00000880: 20 A4 20 4E 44 3A 98 31  2C 48 48 28 49 2C 4A 29  | . ND:.1,HH(I,J)|
00000890: 3A 82 20 4A 2C 49 00 9F  10 7A 30 A0 31 3A 80 00  |:. J,I...z0.1:..|
000008A0: E1 10 84 30 85 22 93 11  50 4F 53 49 54 49 45 20  |...0."..POSITIE |
000008B0: 54 41 50 45 20 43 4F 52  52 45 43 54 20 54 48 45  |TAPE CORRECT THE|
000008C0: 4E 20 12 52 45 54 55 52  4E 92 2D 2D 22 3B 51 24  |N .RETURN.--";Q$|
000008D0: 3A 86 20 4E 56 24 28 32  29 2C 48 48 28 32 2C 36  |:. NV$(2),HH(2,6|
000008E0: 29 00 F7 10 8E 30 9F 20  31 2C 31 2C 30 2C 22 47  |)....0. 1,1,0,"G|
000008F0: 52 41 46 49 45 4B 22 00  0B 11 98 30 84 31 2C 4E  |RAFIEK"....0.1,N|
00000900: 42 2C 4E 44 2C 4E 48 24  2C 55 57 00 42 11 A2 30  |B,ND,NH$,UW.B..0|
00000910: 81 20 49 B2 30 20 A4 20  4E 42 AB 31 3A 84 31 2C  |. I.0 . NB.1:.1,|
00000920: 4E 56 24 28 49 29 3A 81  20 4A B2 30 20 A4 20 4E  |NV$(I):. J.0 . N|
00000930: 44 3A 84 31 2C 48 48 28  49 2C 4A 29 3A 82 20 4A  |D:.1,HH(I,J):. J|
00000940: 2C 49 00 51 11 AC 30 A0  31 3A 89 20 31 32 30 30  |,I.Q..0.1:. 1200|
00000950: 30 00 5D 11 B6 30 89 20  31 32 34 37 30 00 00 00  |0.]..0. 12470...|
.."..*.#**************************.-..+.
 DATA.N..+.***************************..
..+.53281,15:."...LAADT U VANAF CASSETTE
? (J/N):";Q$... +. Q$."J" . 12420...*+."
................GRAFIEK"...4+."..VERTICA
AL ZIJN 19 EENHEDEN BESCHRIKBAAR."...>+.
"..INPUTWAARDE PER EENHIED."...H+."EENHI
ED:";UW.E.R+."..NAAM VOOR HORIZONTALE AS
";NH$.Q.\+."...U WERKT MET EEN TOT ZES K
OLOMMEN."...F+.".HOEVEEL WILT U:";ND...P
+."...U WERKT MET EEN TOT DRIE BLOKKEN."
.S.Z+.".HOEVEEL WILT U:";NB....+. I.0 . 
NB.1....+."..NAAM VOOR VERTICALE AS";I.1
;:. NV$(I):. I.$..+. HH(2,6).;..+.".";:.
 I.0 . NB.1.J..+. J.1 . ND.U..+.".INPUT 
BLOK";I.1;"WAARDE";J;":";:. T....+. .(T.
UW).19 . .".WAARDE TE HOOG.":.11190...J+
HH(I,J).T:. J,I.X....#******************
********...... GRAFIEK...... GRAFIEK....
..***************************.?../. 5328
1,0:. "......................";.N../F$."
....."..../. I.1 . 4:. F$;"..           
                  .":F$.F$.".":..L.&/.".
....................................":. 
30 KARAKTERS...0/. I.1 . 19:.".....L";..
.:/."                           ..":..0.
D/.".";:. I.1 . 4:."..........";.E.N/.".
...........................":.:. 28 KARA
KTERS...X/F1$.".....................":F$
."..............................":KO$.".
..".Y.B/.".........................";NH$
;...L/. H.0 . NB.1:.".........";J(F$,1,2
.(H.1));J(KO$,H.1,1);.>.V/TT$.NV$(H)." *
".D(UW):. I.1 . C(TT$).Z../. J(TT$,I,1);
"..";:.I,H..../."........15.......10....
...5......0"..../F3$.F1$:. H.0 . NB.1:. 
J(KO$,H.1,1).R../F2$.H(F$,8.4.(ND.1).H):
. F1$;F2$;..../. I.ND . 1 ..1:. .(HH(H,I
).UW).0 . 12270..../. J.1 . .(HH(H,I).UW
).H.9../. .(HH(H,I).UW).0 . 12270.F.F/. 
J.1 . .".. .";J(KO$,H.1,1);". ......";..
.P/. J.1 . .". .  ......";...U/. KARAKTE
RS ZIJN ".. ..... ...........";...Z/. J.
D../."... ."..../.:F2$.H(F2$,C(F2$).4):.
 F1$;F2$;:. I..../F1$.F1$.".".!..0F2$.H(
F$,9.4.(ND.1)):. F3$;F2$;.)..0. H.?..0. 
I.1 . ND:. F3$;.I. 0F2$.H(F$,9.4.(I.1)):
. F2$;:. J.1 . NB...*0. J.1 . HH(2,I.1).
0 . . "....";...40. "..";:. J,I...>0. A$
:. A$."" . 12350...H0. "...WILT U DATA W
EGSCHRIJVEN (J/N):";Q$:. Q$."N". ..,.R0.
 ".POSITIE TAPE CORRECT,THEN .RETURN.--"
;Q$:R$.G(13).B.\0. 1,1,1,"GRAFIEK"._.F0.
1,NB;R$;ND;R$;NH$;R$;UW...P0. I.0 . NB.1
:.1,NV$(I):. J.0 . ND:.1,HH(I,J):. J,I..
.Z0 1:.....0."..POSITIE TAPE CORRECT THE
N .RETURN.--";Q$:. NV$(2),HH(2,6)....0. 
1,1,0,"GRAFIEK"....0.1,NB,ND,NH$,UW.B..0
. I.0 . NB.1:.1,NV$(I):. J.0 . ND:.1,HH(
I,J):. J,I.Q..0 1:. 12000.]..0. 12470...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL