PAG 91 V.B 2

00000000: 01 08 4E 08 00 00 8F 20  2D 2D 28 43 29 20 44 49  |..N.... --(C) DI|
00000010: 47 49 43 4F 4D 20 53 4F  46 54 57 41 52 45 2C 54  |GICOM SOFTWARE,T|
00000020: 41 50 45 20 42 30 31 20  2D 2D 20 20 20 20 20 20  |APE B01 --      |
00000030: 20 20 20 41 41 4E 47 45  50 41 53 54 20 56 4F 4F  |   AANGEPAST VOO|
00000040: 52 20 43 4F 4D 4D 4F 44  4F 52 45 20 36 34 00 69  |R COMMODORE 64.i|
00000050: 08 0A 00 8F 20 2A 2A 2A  20 50 45 52 54 20 4D 45  |.... *** PERT ME|
00000060: 54 48 4F 44 45 20 2A 2A  2A 00 8F 08 14 00 86 20  |THODE ***...... |
00000070: 41 28 32 35 2C 34 29 2C  42 28 32 35 2C 34 29 2C  |A(25,4),B(25,4),|
00000080: 43 28 32 35 2C 33 29 2C  53 28 32 36 2C 32 29 00  |C(25,3),S(26,2).|
00000090: 99 08 1E 00 89 20 38 38  30 00 B8 08 28 00 8F 20  |..... 880...(.. |
000000A0: 2A 2A 2A 20 57 41 41 52  53 43 48 59 4E 4C 59 4B  |*** WAARSCHYNLYK|
000000B0: 48 45 49 44 20 2A 2A 2A  00 D0 08 32 00 4D 20 B2  |HEID ***...2.M .|
000000C0: 20 B6 20 28 20 45 AD 31  2E 34 31 34 32 31 20 29  | . ( E.1.41421 )|
000000D0: 00 FE 08 3C 00 4D 31 20  B2 20 4D 20 AC 20 28 20  |...<.M1 . M . ( |
000000E0: 32 2E 37 36 35 36 37 32  45 AB 34 20 AA 20 4D 20  |2.765672E.4 . M |
000000F0: AC 20 34 2E 33 30 36 33  38 45 AB 35 20 29 00 35  |. 4.30638E.5 ).5|
00000100: 09 46 00 4D 31 20 B2 20  4D 20 AC 20 28 20 39 2E  |.F.M1 . M . ( 9.|
00000110: 32 37 30 35 32 37 32 45  AB 33 20 AA 20 4D 20 AC  |2705272E.3 . M .|
00000120: 20 28 20 31 2E 35 32 30  31 34 33 45 AB 34 20 AA  | ( 1.520143E.4 .|
00000130: 20 4D 31 29 29 00 6B 09  50 00 4D 31 20 B2 20 4D  | M1)).k.P.M1 . M|
00000140: 20 AC 20 28 20 2E 30 37  30 35 32 33 30 37 38 20  | . ( .070523078 |
00000150: AA 20 4D 20 AC 20 28 20  2E 30 34 32 32 38 32 30  |. M . ( .0422820|
00000160: 31 32 33 20 AA 20 4D 31  20 29 29 00 82 09 5A 00  |123 . M1 ))...Z.|
00000170: 4D 31 B2 31 AB 31 AD 28  28 31 AA 4D 31 29 AE 31  |M1.1.1.((1.M1).1|
00000180: 36 29 00 91 09 64 00 57  B2 28 31 AA 4D 31 29 AD  |6)...d.W.(1.M1).|
00000190: 32 00 A3 09 6E 00 8B 20  45 20 B1 20 30 20 A7 20  |2...n.. E . 0 . |
000001A0: 31 33 30 00 B2 09 78 00  57 B2 28 31 AB 4D 31 29  |130...x.W.(1.M1)|
000001B0: AD 32 00 BE 09 82 00 57  B2 57 AC 31 30 30 00 C4  |.2.....W.W.100..|
000001C0: 09 8C 00 8E 00 E4 09 96  00 8F 20 2A 2A 2A 20 53  |.......... *** S|
000001D0: 55 42 52 4F 55 54 49 4E  45 20 5A 4F 45 4B 45 4E  |UBROUTINE ZOEKEN|
000001E0: 20 2A 2A 2A 00 EC 09 A0  00 46 B2 30 00 F5 09 AA  | ***.....F.0....|
000001F0: 00 58 31 B2 31 00 01 0A  B4 00 58 32 B2 31 AA 4E  |.X1.1.....X2.1.N|
00000200: 31 00 18 0A BE 00 58 33  B2 58 31 AA B5 28 28 58  |1.....X3.X1..((X|
00000210: 32 AB 58 31 29 AD 32 29  00 30 0A C8 00 8B 20 50  |2.X1).2).0.... P|
00000220: 20 B1 20 42 28 58 33 2C  31 29 20 A7 20 32 35 30  | . B(X3,1) . 250|
00000230: 00 48 0A D2 00 8B 20 50  20 B2 20 42 28 58 33 2C  |.H.... P . B(X3,|
00000240: 31 29 20 A7 20 32 39 30  00 5C 0A DC 00 8B 20 58  |1) . 290.\.... X|
00000250: 32 20 B2 20 58 33 20 A7  20 32 38 30 00 66 0A E6  |2 . X3 . 280.f..|
00000260: 00 58 32 B2 58 33 00 70  0A F0 00 89 20 31 39 30  |.X2.X3.p.... 190|
00000270: 00 83 0A FA 00 8B 20 58  31 B2 20 58 33 20 A7 20  |...... X1. X3 . |
00000280: 32 38 30 00 8D 0A 04 01  58 31 B2 58 33 00 97 0A  |280.....X1.X3...|
00000290: 0E 01 89 20 31 39 30 00  9F 0A 18 01 46 B2 31 00  |... 190.....F.1.|
000002A0: A5 0A 22 01 8E 00 C7 0A  2C 01 8F 20 2A 2A 2A 20  |..".....,.. *** |
000002B0: 53 55 42 52 4F 55 54 49  4E 45 20 53 4F 52 54 45  |SUBROUTINE SORTE|
000002C0: 52 45 4E 20 2A 2A 2A 00  D5 0A 36 01 81 20 4A B2  |REN ***...6.. J.|
000002D0: 31 20 A4 20 32 00 F7 0A  40 01 8F 20 2A 2A 20 49  |1 . 2...@.. ** I|
000002E0: 4E 44 45 58 45 4E 20 49  4E 49 54 49 41 4C 49 53  |NDEXEN INITIALIS|
000002F0: 45 52 45 4E 20 2A 2A 00  05 0B 4A 01 81 20 49 B2  |EREN **...J.. I.|
00000300: 31 20 A4 20 4E 00 12 0B  54 01 53 28 49 2C 4A 29  |1 . N...T.S(I,J)|
00000310: B2 49 00 1A 0B 5E 01 82  20 49 00 31 0B 68 01 8F  |.I...^.. I.1.h..|
00000320: 20 2A 2A 2A 20 53 4F 52  54 45 52 45 4E 20 2A 2A  | *** SORTEREN **|
00000330: 2A 00 3F 0B 72 01 81 20  49 B2 32 20 A4 20 4E 00  |*.?.r.. I.2 . N.|
00000340: 48 0B 7C 01 58 31 B2 31  00 51 0B 86 01 58 32 B2  |H.|.X1.1.Q...X2.|
00000350: 49 00 5F 0B 90 01 50 33  B2 53 28 49 2C 4A 29 00  |I._...P3.S(I,J).|
00000360: 76 0B 9A 01 58 33 B2 58  31 AA B5 28 28 58 32 AB  |v...X3.X1..((X2.|
00000370: 58 31 29 AD 32 29 00 85  0B A4 01 50 34 B2 53 28  |X1).2).....P4.S(|
00000380: 58 33 2C 4A 29 00 A3 0B  AE 01 8B 20 41 28 50 33  |X3,J)...... A(P3|
00000390: 2C 4A 29 20 B3 20 41 28  50 34 2C 4A 29 20 A7 20  |,J) . A(P4,J) . |
000003A0: 34 37 30 00 C1 0B B8 01  8B 20 41 28 50 33 2C 4A  |470...... A(P3,J|
000003B0: 29 20 B1 20 41 28 50 34  2C 4A 29 20 A7 20 35 30  |) . A(P4,J) . 50|
000003C0: 30 00 CB 0B C2 01 58 32  B2 58 33 00 D5 0B CC 01  |0.....X2.X3.....|
000003D0: 89 20 35 34 30 00 E9 0B  D6 01 8B 20 58 32 20 B2  |. 540...... X2 .|
000003E0: 20 58 33 20 A7 20 35 34  30 00 F3 0B E0 01 58 32  | X3 . 540.....X2|
000003F0: B2 58 33 00 FD 0B EA 01  89 20 34 31 30 00 11 0C  |.X3...... 410...|
00000400: F4 01 8B 20 58 31 20 B2  20 58 33 20 A7 20 35 34  |... X1 . X3 . 54|
00000410: 30 00 1B 0C FE 01 58 31  B2 58 33 00 25 0C 08 02  |0.....X1.X3.%...|
00000420: 89 20 34 31 30 00 3A 0C  12 02 8F 20 2A 2A 20 57  |. 410.:.... ** W|
00000430: 49 53 53 45 4C 45 4E 20  2A 2A 00 4D 0C 1C 02 8B  |ISSELEN **.M....|
00000440: 20 49 20 B2 20 58 32 20  A7 20 35 38 30 00 63 0C  | I . X2 . 580.c.|
00000450: 26 02 81 20 58 B2 49 20  A4 20 58 32 AA 31 20 A9  |&.. X.I . X2.1 .|
00000460: 20 AB 31 00 77 0C 30 02  53 28 58 2C 4A 29 B2 53  | .1.w.0.S(X,J).S|
00000470: 28 58 AB 31 2C 4A 29 00  7F 0C 3A 02 82 20 58 00  |(X.1,J)...:.. X.|
00000480: 8E 0C 44 02 53 28 58 32  2C 4A 29 B2 50 33 00 96  |..D.S(X2,J).P3..|
00000490: 0C 4E 02 82 20 49 00 9E  0C 58 02 82 20 4A 00 A4  |.N.. I...X.. J..|
000004A0: 0C 62 02 8E 00 C2 0C 6C  02 8F 20 2A 2A 2A 20 53  |.b.....l.. *** S|
000004B0: 55 42 52 4F 55 54 49 4E  45 20 4B 4F 50 20 2D 20  |UBROUTINE KOP - |
000004C0: 49 22 00 CC 0C 76 02 99  22 93 22 3B 00 ED 0C 80  |I"...v..".";....|
000004D0: 02 99 20 A3 31 30 29 22  2A 2A 2A 20 50 45 52 54  |.. .10)"*** PERT|
000004E0: 20 4D 45 54 48 4F 44 45  20 2A 2A 2A 22 00 1A 0D  | METHODE ***"...|
000004F0: 8A 02 99 20 A3 30 30 29  22 56 45 52 57 41 43 48  |... .00)"VERWACH|
00000500: 54 45 20 4B 4F 52 54 53  54 45 20 44 4F 4F 52 4C  |TE KORTSTE DOORL|
00000510: 4F 4F 50 54 59 44 3A 22  3B 42 00 32 0D 94 02 99  |OOPTYD:";B.2....|
00000520: 20 A3 30 30 29 22 50 52  4F 4A 45 43 54 20 22 3B  | .00)"PROJECT ";|
00000530: 42 24 00 38 0D 9E 02 99  00 68 0D A8 02 99 20 A3  |B$.8.....h.... .|
00000540: 30 29 22 4D 59 4C 2D 22  3B 20 A3 30 35 29 22 56  |0)"MYL-"; .05)"V|
00000550: 52 4F 45 47 53 54 45 22  3B 20 A3 31 35 29 22 4C  |ROEGSTE"; .15)"L|
00000560: 41 41 54 53 54 45 22 3B  00 7C 0D B2 02 99 20 A3  |AATSTE";.|.... .|
00000570: 32 34 29 22 53 50 45 4C  49 4E 47 22 00 AA 0D BC  |24)"SPELING"....|
00000580: 02 99 20 A3 30 29 22 50  41 41 4C 22 3B 20 A3 30  |.. .0)"PAAL"; .0|
00000590: 35 29 22 41 41 4E 56 41  4E 47 22 3B 20 A3 31 35  |5)"AANVANG"; .15|
000005A0: 29 22 41 41 4E 56 41 4E  47 22 00 B0 0D C6 02 99  |)"AANVANG"......|
000005B0: 00 B6 0D D0 02 8E 00 D8  0D DA 02 8F 20 2A 2A 2A  |............ ***|
000005C0: 20 53 55 42 52 4F 55 54  49 4E 45 20 4B 4F 50 20  | SUBROUTINE KOP |
000005D0: 2D 20 49 49 20 2A 2A 2A  00 E2 0D E4 02 99 22 93  |- II ***......".|
000005E0: 22 3B 00 02 0E EE 02 99  20 A3 30 36 29 22 2A 2A  |";...... .06)"**|
000005F0: 2A 20 50 52 54 20 4D 45  54 48 4F 44 45 20 2A 2A  |* PRT METHODE **|
00000600: 2A 22 00 2F 0E F8 02 99  20 A3 30 30 29 22 56 45  |*"./.... .00)"VE|
00000610: 52 57 41 43 48 54 45 20  4B 4F 52 54 53 54 45 20  |RWACHTE KORTSTE |
00000620: 44 4F 4F 52 4C 4F 4F 50  54 59 44 3A 22 3B 42 00  |DOORLOOPTYD:";B.|
00000630: 48 0E 02 03 99 20 A3 30  30 29 22 50 52 4F 4A 45  |H.... .00)"PROJE|
00000640: 43 54 3A 20 22 3B 42 24  00 4E 0E 0C 03 99 00 68  |CT: ";B$.N.....h|
00000650: 0E 16 03 99 22 4D 59 4C  50 2E 22 3B A3 30 37 29  |...."MYLP.";.07)|
00000660: 22 56 45 52 57 2E 22 3B  00 85 0E 20 03 99 20 A3  |"VERW.";... .. .|
00000670: 31 33 29 22 56 52 4F 45  47 53 2E 20 20 4C 41 41  |13)"VROEGS.  LAA|
00000680: 54 53 2E 22 3B 00 A1 0E  2A 03 99 20 A3 33 30 29  |TS.";...*.. .30)|
00000690: 22 4B 52 2E 22 20 20 A3  33 34 29 22 54 4F 54 2E  |"KR."  .34)"TOT.|
000006A0: 22 00 B9 0E 34 03 99 22  49 20 20 4A 22 3B A3 30  |"...4.."I  J";.0|
000006B0: 37 29 22 54 59 44 2E 22  3B 00 DB 0E 3E 03 99 20  |7)"TYD.";...>.. |
000006C0: A3 31 33 29 22 41 2E 20  20 45 2E 22 3B 20 A3 32  |.13)"A.  E."; .2|
000006D0: 32 29 22 41 2E 20 20 45  2E 22 3B 00 F6 0E 48 03  |2)"A.  E.";...H.|
000006E0: 99 A3 33 30 29 22 50 41  44 22 3B A3 33 34 29 22  |..30)"PAD";.34)"|
000006F0: 53 50 45 4C 2E 22 00 FC  0E 52 03 99 00 02 0F 5C  |SPEL."...R.....\|
00000700: 03 8E 00 29 0F 66 03 8F  20 2A 2A 2A 20 49 4E 56  |...).f.. *** INV|
00000710: 4F 45 52 45 4E 20 56 41  4E 20 44 45 20 47 45 47  |OEREN VAN DE GEG|
00000720: 45 56 45 4E 53 20 2A 2A  2A 00 33 0F 70 03 99 22  |EVENS ***.3.p.."|
00000730: 93 22 3B 00 4F 0F 7A 03  99 22 2A 2A 2A 20 50 45  |.";.O.z.."*** PE|
00000740: 52 54 20 4D 45 54 48 4F  44 45 20 2A 2A 2A 22 00  |RT METHODE ***".|
00000750: 55 0F 84 03 8C 00 76 0F  8E 03 8F 20 2A 2A 20 49  |U.....v.... ** I|
00000760: 4E 4C 45 5A 45 4E 20 4E  41 41 4D 20 50 52 4F 4A  |NLEZEN NAAM PROJ|
00000770: 45 43 54 20 2A 2A 00 7F  0F 98 03 87 20 42 24 00  |ECT **...... B$.|
00000780: 85 0F A2 03 99 00 A6 0F  AC 03 99 22 4E 41 41 4D  |..........."NAAM|
00000790: 20 56 41 4E 20 48 45 54  20 50 52 4F 4A 45 43 54  | VAN HET PROJECT|
000007A0: 3A 20 22 3B 42 24 00 AC  0F B6 03 99 00 DA 0F C0  |: ";B$..........|
000007B0: 03 99 22 47 45 47 45 56  45 4E 53 20 57 4F 52 44  |.."GEGEVENS WORD|
000007C0: 45 4E 20 49 4E 47 45 4C  45 5A 45 4E 20 45 4E 20  |EN INGELEZEN EN |
000007D0: 56 45 52 57 45 52 4B 54  2E 22 00 E2 0F CA 03 58  |VERWERKT.".....X|
000007E0: B2 31 00 03 10 D4 03 8F  20 2A 2A 20 4D 59 4C 50  |.1...... ** MYLP|
000007F0: 2E 20 28 49 29 2C 20 4D  59 4C 50 2E 20 28 4A 29  |. (I), MYLP. (J)|
00000800: 20 2A 2A 00 17 10 DE 03  87 20 41 28 58 2C 31 29  | **...... A(X,1)|
00000810: 2C 41 28 58 2C 32 29 00  44 10 E8 03 8B 20 28 20  |,A(X,2).D.... ( |
00000820: 41 28 58 2C 31 29 20 B2  20 30 20 29 20 AF 20 28  |A(X,1) . 0 ) . (|
00000830: 20 41 28 58 2C 32 29 20  B2 20 30 20 29 20 A7 20  | A(X,2) . 0 ) . |
00000840: 31 30 36 30 00 7C 10 F2  03 8F 20 2A 2A 20 4B 4F  |1060.|.... ** KO|
00000850: 52 54 53 54 45 20 2C 20  4E 4F 52 4D 41 4C 45 20  |RTSTE , NORMALE |
00000860: 2C 20 4C 41 4E 47 53 54  45 20 20 20 20 20 20 20  |, LANGSTE       |
00000870: 20 20 20 20 20 20 54 59  44 20 2A 2A 00 97 10 FC  |      TYD **....|
00000880: 03 87 20 43 28 58 2C 31  29 2C 43 28 58 2C 32 29  |.. C(X,1),C(X,2)|
00000890: 2C 43 28 58 2C 33 29 00  A1 10 06 04 58 B2 58 AA  |,C(X,3).....X.X.|
000008A0: 31 00 AB 10 10 04 89 20  39 39 30 00 B5 10 1A 04  |1...... 990.....|
000008B0: 4E B2 58 AB 31 00 BF 10  24 04 4E B2 58 AB 31 00  |N.X.1...$.N.X.1.|
000008C0: D8 10 2E 04 8F 20 2A 2A  2A 20 42 45 52 45 4B 45  |..... *** BEREKE|
000008D0: 4E 49 4E 47 20 2A 2A 2A  00 FE 10 38 04 8F 20 2A  |NING ***...8.. *|
000008E0: 2A 20 4F 50 20 4E 55 4C  20 5A 45 54 54 45 4E 20  |* OP NUL ZETTEN |
000008F0: 56 41 4E 20 4D 41 54 52  49 58 20 42 20 2A 00 0D  |VAN MATRIX B *..|
00000900: 11 42 04 81 20 49 B2 31  20 A4 20 32 35 00 1B 11  |.B.. I.1 . 25...|
00000910: 4C 04 81 20 4A B2 31 20  A4 20 34 00 28 11 56 04  |L.. J.1 . 4.(.V.|
00000920: 42 28 49 2C 4A 29 B2 30  00 30 11 60 04 82 20 4A  |B(I,J).0.0.`.. J|
00000930: 00 38 11 6A 04 82 20 49  00 40 11 74 04 53 B2 30  |.8.j.. I.@.t.S.0|
00000940: 00 7D 11 7E 04 8F 20 2A  2A 20 56 45 52 57 41 43  |.}.~.. ** VERWAC|
00000950: 48 54 45 20 54 59 44 20  45 4E 20 53 54 41 4E 44  |HTE TYD EN STAND|
00000960: 41 41 52 44 20 20 20 20  20 20 20 20 20 20 20 20  |AARD            |
00000970: 20 20 44 45 56 49 41 54  49 45 20 2A 2A 00 8B 11  |  DEVIATIE **...|
00000980: 88 04 81 20 49 B2 31 20  A4 20 4E 00 B3 11 92 04  |... I.1 . N.....|
00000990: 41 28 49 2C 33 29 20 B2  20 28 43 28 49 2C 31 29  |A(I,3) . (C(I,1)|
000009A0: AA 34 AC 43 28 49 2C 32  29 AA 43 28 49 2C 33 29  |.4.C(I,2).C(I,3)|
000009B0: 29 AD 36 00 D7 11 9C 04  8F 20 2A 2A 20 41 46 52  |).6...... ** AFR|
000009C0: 4F 4E 44 45 4E 20 4F 50  20 32 20 44 45 43 49 4D  |ONDEN OP 2 DECIM|
000009D0: 41 4C 45 4E 20 2A 2A 00  F7 11 A6 04 41 28 49 2C  |ALEN **.....A(I,|
000009E0: 33 29 B2 B5 28 41 28 49  2C 33 29 AC 31 30 30 AA  |3)..(A(I,3).100.|
000009F0: 2E 35 29 AD 31 30 30 00  16 12 B0 04 41 28 49 2C  |.5).100.....A(I,|
00000A00: 34 29 20 B2 20 28 43 28  49 2C 33 29 AB 43 28 49  |4) . (C(I,3).C(I|
00000A10: 2C 31 29 29 AD 36 00 1E  12 BA 04 82 20 49 00 5D  |,1)).6...... I.]|
00000A20: 12 C4 04 8F 20 2A 2A 20  41 41 4E 52 4F 45 50 45  |.... ** AANROEPE|
00000A30: 4E 20 56 41 4E 20 53 4F  52 54 45 45 52 2D 20 20  |N VAN SORTEER-  |
00000A40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000A50: 53 55 42 52 4F 55 54 49  4E 45 20 2A 2A 00 67 12  |SUBROUTINE **.g.|
00000A60: CE 04 8D 20 33 31 30 00  84 12 D8 04 8F 20 2A 2A  |... 310...... **|
00000A70: 20 4D 59 4C 50 41 41 4C  20 42 45 50 41 4C 49 4E  | MYLPAAL BEPALIN|
00000A80: 47 20 2A 2A 00 9B 12 E2  04 42 28 31 2C 31 29 B2  |G **.....B(1,1).|
00000A90: 41 28 53 28 31 2C 31 29  2C 31 29 00 A4 12 EC 04  |A(S(1,1),1).....|
00000AA0: 4E 31 B2 31 00 B2 12 F6  04 81 20 58 B2 31 20 A4  |N1.1...... X.1 .|
00000AB0: 20 4E 00 D3 12 00 05 8B  20 42 28 4E 31 2C 31 29  | N...... B(N1,1)|
00000AC0: B2 41 28 53 28 58 2C 32  29 2C 32 29 20 A7 20 31  |.A(S(X,2),2) . 1|
00000AD0: 33 31 30 00 DF 12 0A 05  4E 31 B2 4E 31 AA 31 00  |310.....N1.N1.1.|
00000AE0: F7 12 14 05 42 28 4E 31  2C 31 29 B2 41 28 53 28  |....B(N1,1).A(S(|
00000AF0: 58 2C 32 29 2C 32 29 00  FF 12 1E 05 82 20 58 00  |X,2),2)...... X.|
00000B00: 3F 13 28 05 8F 20 2A 2A  20 42 45 50 41 4C 49 4E  |?.(.. ** BEPALIN|
00000B10: 47 20 4B 4F 52 54 53 54  45 20 20 20 20 20 20 20  |G KORTSTE       |
00000B20: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B30: 20 44 4F 4F 52 4C 4F 4F  50 54 59 44 20 2A 2A 00  | DOORLOOPTYD **.|
00000B40: 4D 13 32 05 81 20 49 B2  31 20 A4 20 4E 00 5F 13  |M.2.. I.1 . N._.|
00000B50: 3C 05 50 B2 41 28 53 28  49 2C 31 29 2C 31 29 00  |<.P.A(S(I,1),1).|
00000B60: 69 13 46 05 8D 20 31 36  30 00 AC 13 50 05 8F 20  |i.F.. 160...P.. |
00000B70: 2A 2A 20 49 4E 44 49 45  4E 20 46 3D 31 20 4B 4C  |** INDIEN F=1 KL|
00000B80: 4F 50 54 20 48 45 54 20  20 20 20 20 20 20 20 20  |OPT HET         |
00000B90: 20 20 20 20 20 20 20 20  20 20 20 4E 45 54 57 45  |           NETWE|
00000BA0: 52 4B 20 4E 49 45 54 20  21 20 2A 2A 00 BF 13 5A  |RK NIET ! **...Z|
00000BB0: 05 8B 20 46 20 B2 20 31  20 A7 20 32 35 36 30 00  |.. F . 1 . 2560.|
00000BC0: C9 13 64 05 50 31 B2 58  33 00 DB 13 6E 05 50 B2  |..d.P1.X3...n.P.|
00000BD0: 41 28 53 28 49 2C 31 29  2C 32 29 00 E5 13 78 05  |A(S(I,1),2)...x.|
00000BE0: 8D 20 31 36 30 00 F8 13  82 05 8B 20 46 20 B2 20  |. 160...... F . |
00000BF0: 31 20 A7 20 32 35 36 30  00 02 14 8C 05 50 32 B2  |1 . 2560.....P2.|
00000C00: 58 33 00 1C 14 96 05 42  B2 42 28 50 31 2C 32 29  |X3.....B.B(P1,2)|
00000C10: AA 41 28 53 28 49 2C 31  29 2C 33 29 00 36 14 A0  |.A(S(I,1),3).6..|
00000C20: 05 8B 20 42 28 50 32 2C  32 29 20 B1 B2 20 42 20  |.. B(P2,2) .. B |
00000C30: A7 20 31 34 36 30 00 44  14 AA 05 42 28 50 32 2C  |. 1460.D...B(P2,|
00000C40: 32 29 B2 42 00 4C 14 B4  05 82 20 49 00 72 14 BE  |2).B.L.... I.r..|
00000C50: 05 8F 20 2A 2A 20 42 45  50 41 4C 49 4E 47 20 4C  |.. ** BEPALING L|
00000C60: 41 4E 47 53 54 45 20 44  4F 4F 52 4C 4F 4F 50 54  |ANGSTE DOORLOOPT|
00000C70: 59 44 00 84 14 C8 05 81  20 49 B2 4E 20 A4 20 31  |YD...... I.N . 1|
00000C80: 20 A9 AB 31 00 96 14 D2  05 50 B2 41 28 53 28 49  | ..1.....P.A(S(I|
00000C90: 2C 32 29 2C 32 29 00 A0  14 DC 05 8D 20 31 36 30  |,2),2)...... 160|
00000CA0: 00 B3 14 E6 05 8B 20 46  20 B2 20 31 20 A7 20 32  |...... F . 1 . 2|
00000CB0: 35 36 30 00 BD 14 F0 05  50 31 B2 58 33 00 CF 14  |560.....P1.X3...|
00000CC0: FA 05 50 B2 41 28 53 28  49 2C 32 29 2C 31 29 00  |..P.A(S(I,2),1).|
00000CD0: D9 14 04 06 8D 20 31 36  30 00 EC 14 0E 06 8B 20  |..... 160...... |
00000CE0: 46 20 B2 20 31 20 A7 20  32 35 36 30 00 F6 14 18  |F . 1 . 2560....|
00000CF0: 06 50 32 B2 58 33 00 10  15 22 06 42 B2 42 28 50  |.P2.X3...".B.B(P|
00000D00: 31 2C 33 29 AA 41 28 53  28 49 2C 32 29 2C 33 29  |1,3).A(S(I,2),3)|
00000D10: 00 2A 15 2C 06 8B 20 42  28 50 32 2C 33 29 20 B1  |.*.,.. B(P2,3) .|
00000D20: B2 20 42 20 A7 20 31 36  30 30 00 38 15 36 06 42  |. B . 1600.8.6.B|
00000D30: 28 50 32 2C 33 29 B2 42  00 40 15 40 06 82 20 49  |(P2,3).B.@.@.. I|
00000D40: 00 62 15 4A 06 8F 20 2A  2A 20 42 45 50 41 4C 49  |.b.J.. ** BEPALI|
00000D50: 4E 47 20 4B 52 49 54 49  45 4B 45 20 50 41 44 20  |NG KRITIEKE PAD |
00000D60: 2A 2A 00 70 15 54 06 42  B2 42 28 4E 31 2C 32 29  |**.p.T.B.B(N1,2)|
00000D70: 00 7F 15 5E 06 81 20 49  B2 31 20 A4 20 4E 31 00  |...^.. I.1 . N1.|
00000D80: 93 15 68 06 42 28 49 2C  33 29 B2 42 AB 42 28 49  |..h.B(I,3).B.B(I|
00000D90: 2C 33 29 00 B1 15 72 06  8B 20 B6 28 42 28 49 2C  |,3)...r.. .(B(I,|
00000DA0: 33 29 29 20 B1 20 31 45  AB 33 20 A7 20 31 36 37  |3)) . 1E.3 . 167|
00000DB0: 30 00 C0 15 7C 06 42 28  49 2C 33 29 20 B2 20 30  |0...|.B(I,3) . 0|
00000DC0: 00 D9 15 86 06 42 28 49  2C 34 29 B2 42 28 49 2C  |.....B(I,4).B(I,|
00000DD0: 33 29 AB 42 28 49 2C 32  29 00 F7 15 90 06 8B 20  |3).B(I,2)...... |
00000DE0: B6 28 42 28 49 2C 34 29  29 20 B1 20 31 45 AB 33  |.(B(I,4)) . 1E.3|
00000DF0: 20 A7 20 31 37 30 30 00  06 16 9A 06 42 28 49 2C  | . 1700.....B(I,|
00000E00: 34 29 20 B2 20 30 00 0E  16 A4 06 82 20 49 00 51  |4) . 0...... I.Q|
00000E10: 16 AE 06 8F 20 2A 2A 2A  20 55 49 54 56 4F 45 52  |.... *** UITVOER|
00000E20: 20 56 41 4E 20 50 45 52  54 20 2B 20 20 20 20 20  | VAN PERT +     |
00000E30: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E40: 20 4B 52 49 54 49 45 4B  45 20 50 41 44 20 2A 2A  | KRITIEKE PAD **|
00000E50: 2A 00 71 16 B8 06 8F 20  2A 2A 20 41 41 4E 52 4F  |*.q.... ** AANRO|
00000E60: 45 50 45 4E 20 56 41 4E  20 4B 4F 50 2D 49 20 2A  |EPEN VAN KOP-I *|
00000E70: 2A 00 7B 16 C2 06 8D 20  36 33 30 00 83 16 CC 06  |*.{.... 630.....|
00000E80: 54 B2 30 00 92 16 D6 06  81 20 49 B2 31 20 A4 20  |T.0...... I.1 . |
00000E90: 4E 31 00 AF 16 E0 06 99  20 A3 30 29 42 28 49 2C  |N1...... .0)B(I,|
00000EA0: 31 29 3B 20 A3 30 35 29  42 28 49 2C 32 29 3B 00  |1); .05)B(I,2);.|
00000EB0: CD 16 EA 06 99 20 A3 31  35 29 42 28 49 2C 33 29  |..... .15)B(I,3)|
00000EC0: 3B 20 A3 32 34 29 42 28  49 2C 34 29 3B 00 E5 16  |; .24)B(I,4);...|
00000ED0: F4 06 8B 20 42 28 49 2C  34 29 20 B1 20 30 20 A7  |... B(I,4) . 0 .|
00000EE0: 20 31 38 30 30 00 FA 16  FE 06 99 20 A3 33 31 29  | 1800...... .31)|
00000EF0: 22 4B 52 54 2D 50 41 44  22 3B 00 00 17 08 07 99  |"KRT-PAD";......|
00000F00: 00 0A 17 12 07 54 B2 54  AA 31 00 2F 17 1C 07 8B  |.....T.T.1./....|
00000F10: 20 28 20 54 20 B3 20 38  20 29 20 AF 20 28 20 49  | ( T . 8 ) . ( I|
00000F20: 20 B3 B1 20 4E 31 20 29  20 A7 20 31 39 32 30 00  | .. N1 ) . 1920.|
00000F30: 35 17 26 07 99 00 67 17  30 07 99 22 57 49 4C 54  |5.&...g.0.."WILT|
00000F40: 20 55 20 44 45 20 52 45  53 54 20 56 41 4E 20 44  | U DE REST VAN D|
00000F50: 45 20 47 45 47 45 56 45  4E 53 22 3A 99 22 4A 41  |E GEGEVENS":."JA|
00000F60: 2F 4E 45 45 20 22 3B 00  70 17 3A 07 85 20 41 24  |/NEE ";.p.:.. A$|
00000F70: 00 84 17 44 07 8B 20 54  20 B2 20 4E 31 20 A7 20  |...D.. T . N1 . |
00000F80: 31 39 32 30 00 8E 17 58  07 8D 20 36 33 30 00 96  |1920...X.. 630..|
00000F90: 17 62 07 54 B2 30 00 A1  17 6C 07 89 20 31 39 32  |.b.T.0...l.. 192|
00000FA0: 30 00 AA 17 76 07 49 B2  4E 31 00 B2 17 80 07 82  |0...v.I.N1......|
00000FB0: 20 49 00 D0 17 8A 07 8F  20 2A 2A 20 4D 59 4C 50  | I...... ** MYLP|
00000FC0: 41 4C 45 4E 20 55 49 54  44 52 41 41 49 20 2A 2A  |ALEN UITDRAAI **|
00000FD0: 00 D8 17 94 07 4C B2 30  00 E2 17 9E 07 8D 20 37  |.....L.0...... 7|
00000FE0: 34 30 00 EA 17 A8 07 54  B2 30 00 F8 17 B2 07 81  |40.....T.0......|
00000FF0: 20 49 B2 31 20 A4 20 4E  00 05 18 BC 07 50 B2 41  | I.1 . N.....P.A|
00001000: 28 49 2C 31 29 00 0F 18  C6 07 8D 20 31 36 30 00  |(I,1)...... 160.|
00001010: 19 18 D0 07 50 31 B2 58  33 00 26 18 DA 07 50 B2  |....P1.X3.&...P.|
00001020: 41 28 49 2C 32 29 00 30  18 E4 07 8D 20 31 36 30  |A(I,2).0.... 160|
00001030: 00 3A 18 EE 07 50 32 B2  58 33 00 50 18 F8 07 59  |.:...P2.X3.P...Y|
00001040: 31 B2 42 28 50 31 2C 32  29 AA 41 28 49 2C 33 29  |1.B(P1,2).A(I,3)|
00001050: 00 66 18 02 08 59 32 B2  42 28 50 32 2C 33 29 AB  |.f...Y2.B(P2,3).|
00001060: 41 28 49 2C 33 29 00 82  18 0C 08 8B 20 B6 28 20  |A(I,3)...... .( |
00001070: 59 32 20 29 20 B1 20 31  45 AB 33 20 A7 20 32 30  |Y2 ) . 1E.3 . 20|
00001080: 38 30 00 8D 18 16 08 59  32 20 B2 20 30 00 9F 18  |80.....Y2 . 0...|
00001090: 20 08 59 33 B2 42 28 50  32 2C 33 29 AB 59 31 00  | .Y3.B(P2,3).Y1.|
000010A0: BB 18 2A 08 8B 20 B6 28  20 59 33 20 29 20 B1 20  |..*.. .( Y3 ) . |
000010B0: 31 45 AB 33 20 A7 20 32  31 31 30 00 C6 18 34 08  |1E.3 . 2110...4.|
000010C0: 59 33 20 B2 20 30 00 F0  18 3E 08 99 41 28 49 2C  |Y3 . 0...>..A(I,|
000010D0: 31 29 3B 20 A3 33 29 41  28 49 2C 32 29 3B 20 A3  |1); .3)A(I,2); .|
000010E0: 30 37 29 B5 28 41 28 49  2C 33 29 AA 2E 35 29 3B  |07).(A(I,3)..5);|
000010F0: 00 24 19 48 08 99 20 A3  31 32 29 B5 28 42 28 50  |.$.H.. .12).(B(P|
00001100: 31 2C 32 29 AA 2E 35 29  3B 20 A3 31 36 29 B5 28  |1,2)..5); .16).(|
00001110: 59 31 AA 2E 35 29 3B A3  32 31 29 B5 28 59 32 AA  |Y1..5);.21).(Y2.|
00001120: 2E 35 29 3B 00 3D 19 52  08 99 20 A3 32 35 29 B5  |.5);.=.R.. .25).|
00001130: 28 42 28 50 32 2C 33 29  AA 2E 35 29 3B 00 51 19  |(B(P2,3)..5);.Q.|
00001140: 5C 08 8B 20 59 33 20 B1  20 30 20 A7 20 32 31 37  |\.. Y3 . 0 . 217|
00001150: 30 00 64 19 66 08 53 B2  41 28 49 2C 34 29 AE 32  |0.d.f.S.A(I,4).2|
00001160: 20 AA 20 53 00 73 19 70  08 99 20 A3 33 31 29 22  | . S.s.p.. .31)"|
00001170: 2A 22 3B 00 86 19 7A 08  99 20 A3 33 35 29 B5 28  |*";...z.. .35).(|
00001180: 59 33 AA 2E 35 29 00 90  19 84 08 54 B2 54 AA 31  |Y3..5).....T.T.1|
00001190: 00 B4 19 8E 08 8B 20 28  20 54 20 B3 20 38 20 29  |...... ( T . 8 )|
000011A0: 20 AF 20 28 20 49 20 B3  B1 20 4E 20 29 20 A7 20  | . ( I .. N ) . |
000011B0: 32 32 39 30 00 BA 19 98  08 99 00 F1 19 A2 08 99  |2290............|
000011C0: 22 57 49 4C 54 20 55 20  44 45 20 52 45 53 54 20  |"WILT U DE REST |
000011D0: 56 41 4E 20 44 45 20 47  45 47 45 56 45 4E 53 20  |VAN DE GEGEVENS |
000011E0: 5A 49 45 4E 22 3A 99 22  4A 41 2F 4E 45 45 20 22  |ZIEN":."JA/NEE "|
000011F0: 3B 00 FA 19 AC 08 85 20  41 24 00 15 1A B6 08 8B  |;...... A$......|
00001200: 20 C8 28 41 24 2C 31 29  20 B2 20 22 4E 22 20 A7  | .(A$,1) . "N" .|
00001210: 20 32 32 38 30 00 28 1A  C0 08 8B 20 54 20 B2 20  | 2280.(.... T . |
00001220: 4E 20 A7 20 32 32 39 30  00 32 1A CA 08 8D 20 37  |N . 2290.2.... 7|
00001230: 34 30 00 3A 1A D4 08 54  B2 30 00 45 1A DE 08 89  |40.:...T.0.E....|
00001240: 20 32 32 39 30 00 4D 1A  E8 08 49 B2 4E 00 55 1A  | 2290.M...I.N.U.|
00001250: F2 08 82 20 49 00 72 1A  FC 08 8F 20 2A 2A 20 57  |... I.r.... ** W|
00001260: 41 41 52 53 43 48 59 4E  4C 59 4B 48 45 49 44 20  |AARSCHYNLYKHEID |
00001270: 2A 2A 00 7C 1A 06 09 99  22 93 22 3B 00 9D 1A 10  |**.|....".";....|
00001280: 09 99 20 A3 30 39 29 22  2A 2A 2A 20 50 45 52 54  |.. .09)"*** PERT|
00001290: 20 4D 45 54 48 4F 44 45  20 2A 2A 2A 22 00 A3 1A  | METHODE ***"...|
000012A0: 1A 09 99 00 B4 1A 24 09  99 22 4E 41 41 4D 3A 20  |......$.."NAAM: |
000012B0: 22 3B 42 24 00 BA 1A 2E  09 99 00 E7 1A 38 09 99  |";B$.........8..|
000012C0: 22 56 45 52 57 41 43 48  54 45 20 44 4F 4F 52 4C  |"VERWACHTE DOORL|
000012D0: 4F 4F 50 54 59 44 20 22  3B 42 3B 22 20 2B 2F 2D  |OOPTYD ";B;" +/-|
000012E0: 20 22 3B BA 28 53 29 00  ED 1A 42 09 99 00 20 1B  | ";.(S)...B... .|
000012F0: 4C 09 99 22 57 41 54 20  49 53 20 44 45 20 47 45  |L.."WAT IS DE GE|
00001300: 57 45 4E 53 54 45 20 44  4F 4F 52 4C 4F 4F 50 54  |WENSTE DOORLOOPT|
00001310: 59 44 3A 22 3A 99 22 53  54 4F 50 3D 30 20 22 3B  |YD:":."STOP=0 ";|
00001320: 00 28 1B 56 09 85 20 5A  00 39 1B 60 09 8B 20 5A  |.(.V.. Z.9.`.. Z|
00001330: B2 30 20 A7 20 32 35 36  30 00 4C 1B 6A 09 8B 20  |.0 . 2560.L.j.. |
00001340: 5A 20 B3 20 30 20 A7 20  32 33 31 30 00 5F 1B 74  |Z . 0 . 2310._.t|
00001350: 09 45 B2 28 5A AB 42 29  AD 28 BA 28 53 29 29 00  |.E.(Z.B).(.(S)).|
00001360: 68 1B 7E 09 8D 20 35 30  00 8D 1B 88 09 8F 20 2A  |h.~.. 50...... *|
00001370: 2A 20 55 49 54 56 4F 45  52 20 57 41 41 52 53 43  |* UITVOER WAARSC|
00001380: 48 59 4E 4C 59 4B 48 45  49 44 20 2A 2A 00 97 1B  |HYNLYKHEID **...|
00001390: 92 09 99 22 93 22 3B 00  B7 1B 9C 09 99 A3 30 39  |...".";.......09|
000013A0: 29 22 2A 2A 2A 20 50 45  52 54 20 4D 45 54 48 4F  |)"*** PERT METHO|
000013B0: 44 45 20 2A 2A 2A 22 00  BD 1B A6 09 99 00 CE 1B  |DE ***".........|
000013C0: B0 09 99 22 4E 41 41 4D  3A 20 22 3B 42 24 00 D4  |..."NAAM: ";B$..|
000013D0: 1B BA 09 99 00 01 1C C4  09 99 22 56 45 52 57 41  |.........."VERWA|
000013E0: 43 48 54 45 20 44 4F 4F  52 4C 4F 4F 50 54 59 44  |CHTE DOORLOOPTYD|
000013F0: 20 22 3B 42 3B 22 20 2B  2F 2D 20 22 3B BA 28 53  | ";B;" +/- ";.(S|
00001400: 29 00 20 1C CE 09 99 22  47 45 57 45 4E 53 54 45  |). ...."GEWENSTE|
00001410: 20 44 4F 4F 52 4C 4F 4F  50 54 59 44 20 22 3B 5A  | DOORLOOPTYD ";Z|
00001420: 00 26 1C D8 09 99 00 57  1C E2 09 99 22 57 41 41  |.&.....W...."WAA|
00001430: 52 53 43 48 59 4E 4C 59  4B 48 45 49 44 20 49 4E  |RSCHYNLYKHEID IN|
00001440: 20 50 52 4F 43 20 22 3B  B5 28 57 AC 31 30 30 AA  | PROC ";.(W.100.|
00001450: 2E 35 29 AD 31 30 30 00  62 1C EC 09 89 20 32 33  |.5).100.b.... 23|
00001460: 38 30 00 88 1C F6 09 8F  20 2A 2A 2A 20 57 59 5A  |80...... *** WYZ|
00001470: 49 47 45 4E 20 4D 59 4C  50 41 41 4C 2D 47 45 47  |IGEN MYLPAAL-GEG|
00001480: 45 56 45 4E 53 20 2A 2A  00 92 1C 00 0A 99 22 93  |EVENS **......".|
00001490: 22 3B 00 AE 1C 0A 0A 99  22 2A 2A 2A 20 50 45 52  |";......"*** PER|
000014A0: 54 2D 4D 45 54 48 4F 44  45 20 2A 2A 2A 22 00 C1  |T-METHODE ***"..|
000014B0: 1C 14 0A 99 22 20 20 20  20 57 59 5A 49 47 45 4E  |...."    WYZIGEN|
000014C0: 22 00 C7 1C 1E 0A 99 00  DB 1C 28 0A 8B 20 46 20  |".........(.. F |
000014D0: B3 B1 20 31 20 A7 20 32  36 33 30 00 00 1D 32 0A  |.. 1 . 2630...2.|
000014E0: 99 22 4D 59 4C 50 41 41  4C 20 22 3B 50 3B 22 4B  |."MYLPAAL ";P;"K|
000014F0: 4F 4D 54 20 4E 49 45 54  20 56 4F 4F 52 20 21 22  |OMT NIET VOOR !"|
00001500: 00 06 1D 3C 0A 99 00 3A  1D 46 0A 99 22 57 49 4C  |...<...:.F.."WIL|
00001510: 54 20 55 20 57 59 5A 49  47 49 4E 47 45 4E 20 49  |T U WYZIGINGEN I|
00001520: 4E 20 48 45 54 20 4E 45  54 57 45 52 4B 22 3A 99  |N HET NETWERK":.|
00001530: 22 4A 41 2F 4E 45 45 20  22 3B 00 43 1D 50 0A 85  |"JA/NEE ";.C.P..|
00001540: 20 41 24 00 5E 1D 5A 0A  8B 20 C8 28 41 24 2C 31  | A$.^.Z.. .(A$,1|
00001550: 29 20 B2 20 22 4E 22 20  A7 20 39 30 30 30 00 7D  |) . "N" . 9000.}|
00001560: 1D 64 0A 99 22 57 45 4C  4B 45 20 52 45 47 45 4C  |.d.."WELKE REGEL|
00001570: 20 20 53 54 4F 50 20 3D  20 30 20 22 3B 00 85 1D  |  STOP = 0 ";...|
00001580: 6E 0A 85 20 52 00 98 1D  78 0A 8B 20 52 20 B2 20  |n.. R...x.. R . |
00001590: 30 20 A7 20 31 30 39 30  00 BC 1D 82 0A 8B 20 28  |0 . 1090...... (|
000015A0: 20 52 B1 B2 31 20 29 20  AF 20 28 20 52 20 B3 B2  | R..1 ) . ( R ..|
000015B0: 20 4E AA 31 29 20 A7 20  32 37 32 30 00 D1 1D 8C  | N.1) . 2720....|
000015C0: 0A 99 22 46 4F 55 54 20  4F 50 4E 49 45 55 57 20  |.."FOUT OPNIEUW |
000015D0: 22 00 DC 1D 96 0A 89 20  32 36 36 30 00 EF 1D A0  |"...... 2660....|
000015E0: 0A 8B 20 52 20 B1 20 4E  20 A7 20 32 37 38 30 00  |.. R . N . 2780.|
000015F0: F9 1D AA 0A 4E B2 4E AB  31 00 17 1E B4 0A 99 22  |....N.N.1......"|
00001600: 4F 55 44 45 20 47 45 47  45 56 45 4E 53 20 52 45  |OUDE GEGEVENS RE|
00001610: 47 45 4C 20 22 3B 52 00  3E 1E BE 0A 99 22 4D 59  |GEL ";R.>...."MY|
00001620: 4C 50 28 49 29 20 4D 59  4C 50 28 4A 29 20 3A 22  |LP(I) MYLP(J) :"|
00001630: 3B 41 28 52 2C 31 29 3B  41 28 52 2C 32 29 00 6C  |;A(R,1);A(R,2).l|
00001640: 1E C8 0A 99 22 4B 4F 52  54 53 54 45 20 4E 4F 52  |...."KORTSTE NOR|
00001650: 4D 2E 20 4C 41 4E 47 53  54 45 20 54 59 44 53 44  |M. LANGSTE TYDSD|
00001660: 2E 20 3A 22 3B 43 28 52  2C 31 29 3B 00 7F 1E D2  |. :";C(R,1);....|
00001670: 0A 99 43 28 52 2C 32 29  3B 43 28 52 2C 33 29 00  |..C(R,2);C(R,3).|
00001680: 89 1E DC 0A 4E B2 4E AA  31 00 8F 1E E6 0A 99 00  |....N.N.1.......|
00001690: 95 1E F0 0A 99 00 C9 1E  FA 0A 99 22 4E 49 45 55  |..........."NIEU|
000016A0: 57 45 20 49 4E 56 4F 45  52 20 52 45 47 45 4C 20  |WE INVOER REGEL |
000016B0: 22 3B 52 3A 99 22 4D 59  4C 50 2E 28 49 29 20 4D  |";R:."MYLP.(I) M|
000016C0: 59 4C 50 2E 28 4A 29 22  3B 00 DD 1E 04 0B 85 20  |YLP.(J)";...... |
000016D0: 41 28 52 2C 31 29 2C 41  28 52 2C 32 29 00 FA 1E  |A(R,1),A(R,2)...|
000016E0: 0E 0B 8B 20 41 28 52 2C  31 29 20 B3 20 41 28 52  |... A(R,1) . A(R|
000016F0: 2C 32 29 20 A7 20 32 38  36 30 00 1C 1F 18 0B 99  |,2) . 2860......|
00001700: 22 46 4F 55 54 20 2A 20  4D 59 4C 50 28 49 29 20  |"FOUT * MYLP(I) |
00001710: 3E 20 4D 59 4C 50 28 4A  29 20 2A 22 00 27 1F 22  |> MYLP(J) *".'."|
00001720: 0B 89 20 32 38 31 30 00  56 1F 2C 0B 99 22 52 45  |.. 2810.V.,.."RE|
00001730: 47 45 4C 20 22 3B 52 3B  3A 99 22 4B 4F 52 54 53  |GEL ";R;:."KORTS|
00001740: 54 45 2C 4E 4F 52 4D 2E  2C 4C 41 4E 47 53 54 45  |TE,NORM.,LANGSTE|
00001750: 20 54 59 44 20 22 00 71  1F 36 0B 85 20 43 28 52  | TYD ".q.6.. C(R|
00001760: 2C 31 29 2C 43 28 52 2C  32 29 2C 43 28 52 2C 33  |,1),C(R,2),C(R,3|
00001770: 29 00 8A 1F 40 0B 8B 20  43 28 52 2C 31 29 20 B2  |)...@.. C(R,1) .|
00001780: B1 20 30 20 A7 20 32 39  31 30 00 AA 1F 4A 0B 99  |. 0 . 2910...J..|
00001790: 22 46 4F 55 54 20 2A 20  54 59 44 53 44 55 55 52  |"FOUT * TYDSDUUR|
000017A0: 20 49 53 20 3C 20 30 20  2A 22 00 B5 1F 54 0B 89  | IS < 0 *"...T..|
000017B0: 20 32 38 36 30 00 EA 1F  5E 0B 8B 20 28 43 28 52  | 2860...^.. (C(R|
000017C0: 2C 31 29 20 B3 B2 20 43  28 52 2C 32 29 29 20 AF  |,1) .. C(R,2)) .|
000017D0: 20 28 43 28 52 2C 32 29  20 B3 B2 20 43 28 52 2C  | (C(R,2) .. C(R,|
000017E0: 33 29 29 20 A7 20 32 36  36 30 00 0F 20 68 0B 99  |3)) . 2660.. h..|
000017F0: 22 46 4F 55 54 20 2A 20  53 41 4D 45 4E 48 41 4E  |"FOUT * SAMENHAN|
00001800: 47 20 4B 4C 4F 50 54 20  4E 49 45 54 20 2A 22 00  |G KLOPT NIET *".|
00001810: 1A 20 72 0B 89 20 32 38  36 30 00 34 20 7C 0B 8F  |. r.. 2860.4 |..|
00001820: 20 2A 2A 2A 20 44 41 54  41 20 52 45 47 45 4C 53  | *** DATA REGELS|
00001830: 20 2A 2A 2A 00 46 20 86  0B 83 20 4F 43 45 41 41  | ***.F ... OCEAA|
00001840: 4E 54 4F 43 48 54 00 56  20 90 0B 83 20 31 2C 32  |NTOCHT.V ... 1,2|
00001850: 2C 33 2C 36 2C 39 00 66  20 9A 0B 83 20 31 2C 33  |,3,6,9.f ... 1,3|
00001860: 2C 32 2C 35 2C 38 00 76  20 A4 0B 83 20 32 2C 34  |,2,5,8.v ... 2,4|
00001870: 2C 32 2C 34 2C 36 00 87  20 AE 0B 83 20 33 2C 35  |,2,4,6.. ... 3,5|
00001880: 2C 31 2C 33 2C 31 31 00  98 20 B8 0B 83 20 33 2C  |,1,3,11.. ... 3,|
00001890: 34 2C 32 2C 33 2C 31 30  00 A8 20 C2 0B 83 20 34  |4,2,3,10.. ... 4|
000018A0: 2C 36 2C 34 2C 36 2C 38  00 B9 20 CC 0B 83 20 35  |,6,4,6,8.. ... 5|
000018B0: 2C 36 2C 31 2C 35 2C 31  35 00 C3 20 D6 0B 83 20  |,6,1,5,15.. ... |
000018C0: 30 2C 30 00 C9 20 28 23  80 00 00 00              |0,0.. (#....    |

..N.... --(C) DIGICOM SOFTWARE,TAPE B01 
--         AANGEPAST VOOR COMMODORE 64.I
.... *** PERT METHODE ***...... A(25,4),
B(25,4),C(25,3),S(26,2)...... 880...(.. 
*** WAARSCHYNLYKHEID ***.P.2.M . . ( E.1
.41421 )...<.M1 . M . ( 2.765672E.4 . M 
. 4.30638E.5 ).5.F.M1 . M . ( 9.2705272E
.3 . M . ( 1.520143E.4 . M1)).K.P.M1 . M
 . ( .070523078 . M . ( .0422820123 . M1
 ))...Z.M1.1.1.((1.M1).16)...D.W.(1.M1).
2...N.. E . 0 . 130...X.W.(1.M1).2.....W
.W.100.D.......... *** SUBROUTINE ZOEKEN
 ***... .F.0.....X1.1.....X2.1.N1.....X3
.X1..((X2.X1).2).0.H.. P . B(X3,1) . 250
.H.R.. P . B(X3,1) . 290.\.... X2 . X3 .
 280.F...X2.X3.P.... 190...... X1. X3 . 
280.....X1.X3...... 190.....F.1..."...G.
,.. *** SUBROUTINE SORTEREN ***.U.6.. J.
1 . 2...@.. ** INDEXEN INITIALISEREN **.
..J.. I.1 . N...T.S(I,J).I...^.. I.1.H..
 *** SORTEREN ***.?.R.. I.2 . N.H.|.X1.1
.Q...X2.I._...P3.S(I,J).V...X3.X1..((X2.
X1).2).....P4.S(X3,J)...... A(P3,J) . A(
P4,J) . 470.A.... A(P3,J) . A(P4,J) . 50
0.K.B.X2.X3.U.L.. 540...V.. X2 . X3 . 54
0.....X2.X3...... 410...... X1 . X3 . 54
0.....X1.X3.%.... 410.:.... ** WISSELEN 
**.M.... I . X2 . 580.C.&.. X.I . X2.1 .
 .1.W.0.S(X,J).S(X.1,J)..:.. X...D.S(X2
,J).P3...N.. I...X.. J...B...B.L.. *** S
UBROUTINE KOP - I".L.V..".";...... .10)"
*** PERT METHODE ***"...... .00)"VERWACH
TE KORTSTE DOORLOOPTYD:";B.2.... .00)"PR
OJECT ";B$.8.....H.... .0)"MYL-"; .05)"V
ROEGSTE"; .15)"LAATSTE";.|.... .24)"SPEL
ING"...... .0)"PAAL"; .05)"AANVANG"; .15
)"AANVANG"...F.....P...X.Z.. *** SUBROUT
INE KOP - II ***......".";...... .06)"**
* PRT METHODE ***"./.... .00)"VERWACHTE 
KORTSTE DOORLOOPTYD:";B.H.... .00)"PROJE
CT: ";B$.N.....H...."MYLP.";.07)"VERW.";
... .. .13)"VROEGS.  LAATS.";...*.. .30)
"KR."  .34)"TOT."...4.."I  J";.07)"TYD."
;...>.. .13)"A.  E."; .22)"A.  E.";...H.
..30)"PAD";.34)"SPEL."...R.....\...).F..
 *** INVOEREN VAN DE GEGEVENS ***.3.P.."
.";.O.Z.."*** PERT METHODE ***".U.....V.
... ** INLEZEN NAAM PROJECT **..... B$.
..........."NAAM VAN HET PROJECT: ";B$..
.....Z...."GEGEVENS WORDEN INGELEZEN EN 
VERWERKT."...J.X.1...T.. ** MYLP. (I), M
YLP. (J) **...... A(X,1),A(X,2).D.... ( 
A(X,1) . 0 ) . ( A(X,2) . 0 ) . 1060.|..
.. ** KORTSTE , NORMALE , LANGSTE       
      TYD **...... C(X,1),C(X,2),C(X,3).
....X.X.1...... 990.....N.X.1...$.N.X.1.
X.... *** BEREKENING ***...8.. ** OP NUL
 ZETTEN VAN MATRIX B *...B.. I.1 . 25...
L.. J.1 . 4.(.V.B(I,J).0.0.`.. J.8.J.. I
.@.T.S.0.}.~.. ** VERWACHTE TYD EN STAND
AARD              DEVIATIE **...... I.1 
. N.....A(I,3) . (C(I,1).4.C(I,2).C(I,3)
).6.W.... ** AFRONDEN OP 2 DECIMALEN **.
....A(I,3)..(A(I,3).100..5).100.....A(I,
4) . (C(I,3).C(I,1)).6...... I.].D.. ** 
AANROEPEN VAN SORTEER-                  
SUBROUTINE **.G.N.. 310...X.. ** MYLPAAL
 BEPALING **.....B(1,1).A(S(1,1),1).....
N1.1...... X.1 . N.S.... B(N1,1).A(S(X,2
),2) . 1310.....N1.N1.1.....B(N1,1).A(S(
X,2),2)...... X.?.(.. ** BEPALING KORTST
E                        DOORLOOPTYD **.
M.2.. I.1 . N._.<.P.A(S(I,1),1).I.F.. 16
0...P.. ** INDIEN F=1 KLOPT HET         
           NETWERK NIET ! **...Z.. F . 1
 . 2560.I.D.P1.X3...N.P.A(S(I,1),2)...X.
. 160...... F . 1 . 2560.....P2.X3.....B
.B(P1,2).A(S(I,1),3).6. .. B(P2,2) .. B 
. 1460.D...B(P2,2).B.L.... I.R.... ** BE
PALING LANGSTE DOORLOOPTYD...H.. I.N . 1
 ..1...R.P.A(S(I,2),2). .... 160...... F
 . 1 . 2560.....P1.X3.O...P.A(S(I,2),1).
Y.... 160...... F . 1 . 2560.....P2.X3..
.".B.B(P1,3).A(S(I,2),3).*.,.. B(P2,3) .
. B . 1600.8.6.B(P2,3).B.@.@.. I.B.J.. *
* BEPALING KRITIEKE PAD **.P.T.B.B(N1,2)
..^.. I.1 . N1...H.B(I,3).B.B(I,3)...R.
. .(B(I,3)) . 1E.3 . 1670...|.B(I,3) . 0
.Y...B(I,4).B(I,3).B(I,2)...... .(B(I,4)
) . 1E.3 . 1700.....B(I,4) . 0...... I.Q
.... *** UITVOER VAN PERT +             
         KRITIEKE PAD ***.Q.... ** AANRO
EPEN VAN KOP-I **.{.B.. 630...L.T.0...V.
. I.1 . N1...... .0)B(I,1); .05)B(I,2);.
M.... .15)B(I,3); .24)B(I,4);...... B(I,
4) . 0 . 1800...... .31)"KRT-PAD";......
.....T.T.1./.... ( T . 8 ) . ( I .. N1 )
 . 1920.5.&...G.0.."WILT U DE REST VAN D
E GEGEVENS":."JA/NEE ";.P.:.. A$...D.. T
 . N1 . 1920...X.. 630...B.T.0...L.. 192
0...V.I.N1...... I.P.... ** MYLPALEN UIT
DRAAI **.X...L.0...... 740.....T.0......
 I.1 . N.....P.A(I,1)...F.. 160...P.P1.X
3.&.Z.P.A(I,2).0.... 160.:...P2.X3.P...Y
1.B(P1,2).A(I,3).F...Y2.B(P2,3).A(I,3)..
.... .( Y2 ) . 1E.3 . 2080.....Y2 . 0...
 .Y3.B(P2,3).Y1...*.. .( Y3 ) . 1E.3 . 2
110.F.4.Y3 . 0...>..A(I,1); .3)A(I,2); .
07).(A(I,3)..5);.$.H.. .12).(B(P1,2)..5)
; .16).(Y1..5);.21).(Y2..5);.=.R.. .25).
(B(P2,3)..5);.Q.\.. Y3 . 0 . 2170.D.F.S.
A(I,4).2 . S.S.P.. .31)"*";...Z.. .35).(
Y3..5).....T.T.1...... ( T . 8 ) . ( I .
. N ) . 2290............"WILT U DE REST 
VAN DE GEGEVENS ZIEN":."JA/NEE ";...... 
A$...... H(A$,1) . "N" . 2280.(.... T . 
N . 2290.2.J.. 740.:.T.T.0.E.... 2290.M.
..I.N.U.... I.R.... ** WAARSCHYNLYKHEID 
**.|....".";...... .09)"*** PERT METHODE
 ***".........$.."NAAM: ";B$.........8..
"VERWACHTE DOORLOOPTYD ";B;" +/- ";.(S).
..B... .L.."WAT IS DE GEWENSTE DOORLOOPT
YD:":."STOP=0 ";.(.V.. Z.9.`.. Z.0 . 256
0.L.J.. Z . 0 . 2310._.T.E.(Z.B).(.(S)).
H.~.. 50...... ** UITVOER WAARSCHYNLYKHE
ID **......".";.......09)"*** PERT METHO
DE ***".......N...."NAAM: ";B$.T.......D
.."VERWACHTE DOORLOOPTYD ";B;" +/- ";.(S
). .N.."GEWENSTE DOORLOOPTYD ";Z.&.X...W
...."WAARSCHYNLYKHEID IN PROC ";.(W.100.
.5).100.B.... 2380...... *** WYZIGEN MYL
PAAL-GEGEVENS **......".";......"*** PER
T-METHODE ***".A...."    WYZIGEN".G.....
..(.. F .. 1 . 2630...2.."MYLPAAL ";P;"K
OMT NIET VOOR !"...<...:.F.."WILT U WYZI
GINGEN IN HET NETWERK":."JA/NEE ";.C.P..
 A$.^.Z.. H(A$,1) . "N" . 9000.}.D.."WEL
KE REGEL  STOP = 0 ";...N.. R...X.. R . 
0 . 1090...... ( R..1 ) . ( R .. N.1) . 
2720.Q...."FOUT OPNIEUW "...... 2660... 
.. R . N . 2780.....N.N.1......"OUDE GEG
EVENS REGEL ";R.>...."MYLP(I) MYLP(J) :"
;A(R,1);A(R,2).L.H.."KORTSTE NORM. LANGS
TE TYDSD. :";C(R,1);..R..C(R,2);C(R,3).
....N.N.1.............I...."NIEUWE INVOE
R REGEL ";R:."MYLP.(I) MYLP.(J)";...... 
A(R,1),A(R,2)...... A(R,1) . A(R,2) . 28
60......"FOUT * MYLP(I) > MYLP(J) *".'."
.. 2810.V.,.."REGEL ";R;:."KORTSTE,NORM.
,LANGSTE TYD ".Q.6.. C(R,1),C(R,2),C(R,3
)...@.. C(R,1) .. 0 . 2910...J.."FOUT * 
TYDSDUUR IS < 0 *"...T.. 2860...^.. (C(R
,1) .. C(R,2)) . (C(R,2) .. C(R,3)) . 26
60.. H.."FOUT * SAMENHANG KLOPT NIET *".
. R.. 2860.4 |.. *** DATA REGELS ***.F .
.. OCEAANTOCHT.V ... 1,2,3,6,9.F ... 1,3
,2,5,8.V ... 2,4,2,4,6.. ... 3,5,1,3,11.
. ... 3,4,2,3,10.. B.. 4,6,4,6,8.. L.. 5
,6,1,5,15.C V.. 0,0.I (#....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL