CAFETARIA

00000000: 01 08 1A 08 1E 00 8D 31  30 30 30 3A 8F 49 4E 49  |.......1000:.INI|
00000010: 54 49 41 4C 49 53 45 52  45 4E 00 2A 08 28 00 8D  |TIALISEREN.*.(..|
00000020: 32 30 30 30 3A 8F 4D 45  4E 55 00 63 08 32 00 99  |2000:.MENU.c.2..|
00000030: 48 24 3B C8 28 56 54 24  2C 31 35 29 3A 85 22 CB  |H$;.(VT$,15):.".|
00000040: C5 D5 DA C5 2D CE D5 CD  CD C5 D2 3A 20 22 3B 4B  |....-......: ";K|
00000050: 45 55 5A 45 3A 4B 45 55  5A 45 B2 B5 28 4B 45 55  |EUZE:KEUZE..(KEU|
00000060: 5A 45 29 00 8D 08 3C 00  8B 4B 45 55 5A 45 B3 30  |ZE)...<..KEUZE.0|
00000070: 20 B0 28 4B 45 55 5A 45  B1 4E 4B 20 AF 4B 45 55  | .(KEUZE.NK .KEU|
00000080: 5A 45 B3 B1 39 39 29 20  A7 20 89 35 30 00 B4 08  |ZE..99) . .50...|
00000090: 46 00 8B 4B 45 55 5A 45  B2 39 39 20 A7 20 8D 35  |F..KEUZE.99 . .5|
000000A0: 30 30 30 3A 20 89 31 32  30 3A 8F 45 49 4E 44 53  |000: .120:.EINDS|
000000B0: 41 4C 44 4F 00 ED 08 50  00 99 48 24 3B C8 28 56  |ALDO...P..H$;.(V|
000000C0: 54 24 2C 31 37 29 3A 85  22 D4 C1 C6 C5 CC 2D CE  |T$,17):.".....-.|
000000D0: D5 CD CD C5 D2 3A 20 22  3B 54 41 46 45 4C 3A 54  |.....: ";TAFEL:T|
000000E0: 41 46 45 4C B2 B5 28 54  41 46 45 4C 29 00 0A 09  |AFEL..(TAFEL)...|
000000F0: 5A 00 8B 54 41 46 45 4C  B3 31 20 B0 54 41 46 45  |Z..TAFEL.1 .TAFE|
00000100: 4C B1 4E 54 20 A7 20 89  38 30 00 29 09 64 00 8B  |L.NT . .80.).d..|
00000110: 4B 45 55 5A 45 B2 30 20  A7 20 8D 33 30 30 30 3A  |KEUZE.0 . .3000:|
00000120: 8F 52 45 4B 45 4E 49 4E  47 00 4B 09 6E 00 8B 4B  |.REKENING.K.n..K|
00000130: 45 55 5A 45 B3 B1 30 20  A7 20 8D 34 30 30 30 3A  |EUZE..0 . .4000:|
00000140: 8F 42 45 53 54 45 4C 4C  49 4E 47 00 66 09 78 00  |.BESTELLING.f.x.|
00000150: 8B 4B 45 55 5A 45 B3 B1  39 39 20 B0 4F 4B B2 30  |.KEUZE..99 .OK.0|
00000160: 20 A7 20 89 34 30 00 6C  09 82 00 80 00 7F 09 E8  | . .40.l........|
00000170: 03 8F 49 4E 49 54 49 41  4C 49 53 45 52 45 4E 00  |..INITIALISEREN.|
00000180: B3 09 ED 03 48 24 B2 22  13 22 3A 20 43 4C 24 B2  |....H$.".": CL$.|
00000190: 22 93 22 3A 20 56 54 24  B2 22 11 11 11 11 11 11  |".": VT$."......|
000001A0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000001B0: 11 11 22 00 BE 09 F2 03  99 C7 28 31 34 29 00 C9  |..".......(14)..|
000001C0: 09 F7 03 8D 31 30 30 30  30 00 F8 09 FC 03 87 4E  |....10000......N|
000001D0: 4B 3A 20 86 54 28 4E 54  2C 4E 4B 29 2C 41 52 54  |K: .T(NT,NK),ART|
000001E0: 24 28 4E 4B 29 2C 50 52  59 53 28 4E 4B 29 2C 4F  |$(NK),PRYS(NK),O|
000001F0: 4D 5A 45 54 28 4E 4B 29  00 23 0A 06 04 81 49 B2  |MZET(NK).#....I.|
00000200: 31 20 A4 4E 4B 3A 87 41  52 54 24 28 49 29 2C 50  |1 .NK:.ART$(I),P|
00000210: 52 59 53 28 49 29 3A 4F  4D 5A 45 54 28 49 29 B2  |RYS(I):OMZET(I).|
00000220: 30 3A 82 00 46 0A 10 04  81 49 B2 31 20 A4 4E 54  |0:..F....I.1 .NT|
00000230: 3A 81 4A B2 30 20 A4 4E  4B 3A 54 28 49 2C 4A 29  |:.J.0 .NK:T(I,J)|
00000240: B2 30 3A 82 3A 82 00 4C  0A 1A 04 8E 00 66 0A 4C  |.0:.:..L.....f.L|
00000250: 04 83 31 36 3A 8F 41 41  4E 54 41 4C 20 41 52 54  |..16:.AANTAL ART|
00000260: 49 4B 45 4C 45 4E 00 77  0A 56 04 83 4B 4F 46 46  |IKELEN.w.V..KOFF|
00000270: 49 45 2C 31 2E 33 35 00  86 0A 60 04 83 54 48 45  |IE,1.35...`..THE|
00000280: 45 2C 31 2E 31 30 00 9E  0A 6A 04 83 44 49 56 2E  |E,1.10...j..DIV.|
00000290: 4C 49 4D 4F 4E 41 44 45  53 2C 31 2E 35 30 00 AD  |LIMONADES,1.50..|
000002A0: 0A 74 04 83 4D 45 4C 4B  2C 31 2E 32 35 00 C7 0A  |.t..MELK,1.25...|
000002B0: 7E 04 83 52 4F 44 45 2F  57 49 54 54 45 20 57 49  |~..RODE/WITTE WI|
000002C0: 4A 4E 2C 32 2E 32 35 00  E0 0A 88 04 83 4D 41 52  |JN,2.25......MAR|
000002D0: 54 49 4E 49 2F 53 48 45  52 52 59 2C 32 2E 37 35  |TINI/SHERRY,2.75|
000002E0: 00 FA 0A 92 04 83 52 4F  44 45 2F 57 49 54 54 45  |......RODE/WITTE|
000002F0: 20 50 4F 52 54 2C 32 2E  37 35 00 14 0B 9C 04 83  | PORT,2.75......|
00000300: 42 49 4E 4E 45 4E 4C 2E  47 45 44 45 53 54 2E 2C  |BINNENL.GEDEST.,|
00000310: 31 2E 38 30 00 2E 0B A6  04 83 42 55 49 54 45 4E  |1.80......BUITEN|
00000320: 4C 2E 47 45 44 45 53 54  2E 2C 33 2E 37 35 00 49  |L.GEDEST.,3.75.I|
00000330: 0B B0 04 83 42 45 4C 45  47 44 45 20 42 52 4F 4F  |....BELEGDE BROO|
00000340: 44 4A 45 53 2C 32 2E 30  30 00 60 0B BA 04 83 4B  |DJES,2.00.`....K|
00000350: 52 4F 4B 45 54 2D 42 52  4F 4F 44 2C 32 2E 32 35  |ROKET-BROOD,2.25|
00000360: 00 7A 0B C4 04 83 44 49  56 2E 20 55 49 54 53 4D  |.z....DIV. UITSM|
00000370: 49 4A 54 45 52 2C 34 2E  37 35 00 90 0B CE 04 83  |IJTER,4.75......|
00000380: 44 49 56 2E 20 53 4F 45  50 45 4E 2C 32 2E 35 30  |DIV. SOEPEN,2.50|
00000390: 00 A9 0B D8 04 83 42 49  45 46 53 54 55 4B 20 42  |......BIEFSTUK B|
000003A0: 52 4F 4F 44 2C 38 2E 38  35 00 BE 0B E2 04 83 48  |ROOD,8.85......H|
000003B0: 41 4C 56 45 20 48 41 41  4E 2C 37 2E 38 35 00 D1  |ALVE HAAN,7.85..|
000003C0: 0B EC 04 83 44 41 47 4D  45 4E 55 2C 31 34 2E 37  |....DAGMENU,14.7|
000003D0: 35 00 DB 0B D0 07 8F 4D  45 4E 55 00 E4 0B DA 07  |5......MENU.....|
000003E0: 99 43 4C 24 00 F0 0B E4  07 41 52 B2 4E 4B AD 32  |.CL$.....AR.NK.2|
000003F0: 00 28 0C EE 07 81 49 B2  31 20 A4 41 52 3A 99 49  |.(....I.1 .AR:.I|
00000400: 3B A3 33 29 3B 41 52 54  24 28 49 29 3B A3 31 39  |;.3);ART$(I);.19|
00000410: 29 3B 49 AA 41 52 3B A3  32 33 29 3B 41 52 54 24  |);I.AR;.23);ART$|
00000420: 28 49 AA 41 52 29 3A 82  00 49 0C F8 07 8B 41 52  |(I.AR):..I....AR|
00000430: B3 B1 B5 28 41 52 29 20  A7 99 4E 4B 3B A3 34 29  |...(AR) ..NK;.4)|
00000440: 3B 41 52 54 24 28 4E 4B  29 00 60 0C 02 08 81 49  |;ART$(NK).`....I|
00000450: B2 31 20 A4 33 39 3A 99  22 3D 22 3B 3A 82 3A 99  |.1 .39:."=";:.:.|
00000460: 00 8B 0C 0C 08 99 22 20  30 3D D2 C5 CB C5 CE C9  |......" 0=......|
00000470: CE C7 22 3B A3 32 30 29  3B 22 39 39 3D CB C1 D3  |..";.20);"99=...|
00000480: 20 C1 C6 D3 CC D5 C9 D4  C5 CE 22 00 A2 0C 16 08  | .........".....|
00000490: 81 49 B2 31 20 A4 33 39  3A 99 22 3D 22 3B 3A 82  |.I.1 .39:."=";:.|
000004A0: 3A 99 00 A8 0C 20 08 8E  00 B6 0C B8 0B 8F 52 45  |:.... ........RE|
000004B0: 4B 45 4E 49 4E 47 00 DE  0C C2 0B 99 43 4C 24 3B  |KENING......CL$;|
000004C0: 22 D2 C5 CB C5 CE C9 CE  C7 20 D6 CF CF D2 20 D4  |"........ .... .|
000004D0: C1 C6 C5 CC 20 22 3B 54  41 46 45 4C 3A 99 00 0E  |.... ";TAFEL:...|
000004E0: 0D CC 0B 8B 54 28 54 41  46 45 4C 2C 30 29 B2 30  |....T(TAFEL,0).0|
000004F0: 20 A7 99 22 C7 C5 C5 CE  20 C2 C5 D3 D4 C5 CC CC  | ..".... .......|
00000500: C9 CE C7 20 C7 C5 D0 CC  C1 C1 D4 D3 D4 22 00 39  |... .........".9|
00000510: 0D D6 0B 8B 54 28 54 41  46 45 4C 2C 30 29 B3 B1  |....T(TAFEL,0)..|
00000520: 30 20 A7 20 8D 33 31 30  30 3A 8F 50 52 49 4E 54  |0 . .3100:.PRINT|
00000530: 20 42 45 44 52 41 47 45  4E 00 67 0D E0 0B 99 48  | BEDRAGEN.g....H|
00000540: 24 3B C8 28 56 54 24 2C  32 33 29 3B 22 D4 CF C5  |$;.(VT$,23);"...|
00000550: D4 D3 20 D3 D0 C1 D4 C9  C5 20 D6 CF CF D2 20 D6  |.. ...... .... .|
00000560: C5 D2 D6 CF CC C7 22 00  80 0D EA 0B A1 41 24 3A  |......"......A$:|
00000570: 8B 41 24 B3 B1 22 20 22  20 A7 20 89 33 30 35 30  |.A$.." " . .3050|
00000580: 00 86 0D F4 0B 8E 00 9C  0D 1C 0C 8F 42 45 44 52  |............BEDR|
00000590: 41 47 45 4E 20 50 52 49  4E 54 45 4E 00 A6 0D 26  |AGEN PRINTEN...&|
000005A0: 0C 53 4F 4D B2 30 00 B3  0D 30 0C 81 49 B2 31 20  |.SOM.0...0..I.1 |
000005B0: A4 4E 4B 00 CB 0D 3A 0C  8B 54 28 54 41 46 45 4C  |.NK...:..T(TAFEL|
000005C0: 2C 49 29 B2 30 20 A7 33  31 34 30 00 F8 0D 3C 0C  |,I).0 .3140...<.|
000005D0: 42 45 44 52 41 47 B2 54  28 54 41 46 45 4C 2C 49  |BEDRAG.T(TAFEL,I|
000005E0: 29 AC 50 52 59 53 28 49  29 3A 53 4F 4D B2 53 4F  |).PRYS(I):SOM.SO|
000005F0: 4D AA 42 45 44 52 41 47  00 17 0E 3F 0C 58 B2 42  |M.BEDRAG...?.X.B|
00000600: 45 44 52 41 47 3A 20 8D  37 30 30 30 3A 42 45 44  |EDRAG: .7000:BED|
00000610: 52 41 47 24 B2 58 24 00  4B 0E 42 0C 99 54 28 54  |RAG$.X$.K.B..T(T|
00000620: 41 46 45 4C 2C 49 29 3B  A3 34 29 3B 41 52 54 24  |AFEL,I);.4);ART$|
00000630: 28 49 29 3B A3 33 35 AB  C3 28 42 45 44 52 41 47  |(I);.35..(BEDRAG|
00000640: 24 29 29 3B 42 45 44 52  41 47 24 00 51 0E 44 0C  |$));BEDRAG$.Q.D.|
00000650: 82 00 68 0E 4E 0C 81 49  B2 31 20 A4 33 39 3A 99  |..h.N..I.1 .39:.|
00000660: 22 2D 22 3B 3A 82 3A 99  00 81 0E 53 0C 58 B2 53  |"-";:.:....S.X.S|
00000670: 4F 4D 3A 20 8D 37 30 30  30 3A 53 4F 4D 24 B2 58  |OM: .7000:SOM$.X|
00000680: 24 00 A7 0E 58 0C 99 A3  32 30 29 3B 22 D4 CF D4  |$...X...20);"...|
00000690: C1 C1 CC 3A 22 3B A3 33  35 AB C3 28 53 4F 4D 24  |...:";.35..(SOM$|
000006A0: 29 29 3B 53 4F 4D 24 00  C3 0E 62 0C 81 49 B2 30  |));SOM$...b..I.0|
000006B0: 20 A4 4E 4B 3A 54 28 54  41 46 45 4C 2C 49 29 B2  | .NK:T(TAFEL,I).|
000006C0: 30 3A 82 00 C9 0E 6C 0C  8E 00 D9 0E A0 0F 8F 42  |0:....l........B|
000006D0: 45 53 54 45 4C 4C 49 4E  47 00 FF 0E AA 0F 99 48  |ESTELLING......H|
000006E0: 24 3B C8 28 56 54 24 2C  31 39 29 3A 85 22 C1 C1  |$;.(VT$,19):."..|
000006F0: CE D4 C1 CC 3A 20 20 20  20 20 20 20 22 3B 4E 00  |....:       ";N.|
00000700: 4C 0F B4 0F 54 28 54 41  46 45 4C 2C 30 29 B2 31  |L...T(TAFEL,0).1|
00000710: 3A 54 28 54 41 46 45 4C  2C 4B 45 55 5A 45 29 B2  |:T(TAFEL,KEUZE).|
00000720: 54 28 54 41 46 45 4C 2C  4B 45 55 5A 45 29 AA 4E  |T(TAFEL,KEUZE).N|
00000730: 3A 4F 4D 5A 45 54 28 4B  45 55 5A 45 29 B2 4F 4D  |:OMZET(KEUZE).OM|
00000740: 5A 45 54 28 4B 45 55 5A  45 29 AA 4E 00 52 0F BE  |ZET(KEUZE).N.R..|
00000750: 0F 8E 00 61 0F 88 13 8F  45 49 4E 44 53 41 4C 44  |...a....EINDSALD|
00000760: 4F 00 6F 0F 92 13 4F 4B  B2 31 3A 99 43 4C 24 00  |O.o...OK.1:.CL$.|
00000770: 90 0F 9C 13 81 49 B2 31  20 A4 4E 54 3A 8B 54 28  |.....I.1 .NT:.T(|
00000780: 49 2C 30 29 B3 B1 30 20  A7 99 49 3A 4F 4B B2 30  |I,0)..0 ..I:OK.0|
00000790: 00 96 0F A6 13 82 00 AD  0F B0 13 8B 4F 4B 20 A7  |............OK .|
000007A0: 20 8D 35 35 30 30 3A 20  89 35 30 38 30 00 E6 0F  | .5500: .5080...|
000007B0: BA 13 99 22 C2 CF D6 C5  CE D3 D4 C1 C1 CE C4 C5  |..."............|
000007C0: 20 D4 C1 C6 C5 CC 28 D3  29 20 CD CF C5 D4 C5 CE  | .....(.) ......|
000007D0: 20 C5 C5 D2 D3 D4 20 CE  CF C7 20 20 C1 C6 D2 C5  | ..... ...  ....|
000007E0: CB C5 CE C5 CE 22 00 14  10 C4 13 99 48 24 3B C8  |....."......H$;.|
000007F0: 28 56 54 24 2C 32 33 29  3B 22 D4 CF C5 D4 D3 20  |(VT$,23);"..... |
00000800: D3 D0 C1 D4 C9 C5 20 D6  CF CF D2 20 D6 C5 D2 D6  |...... .... ....|
00000810: CF CC C7 22 00 2D 10 CE  13 A1 41 24 3A 8B 41 24  |...".-....A$:.A$|
00000820: B3 B1 22 20 22 20 A7 20  89 35 30 37 30 00 33 10  |.." " . .5070.3.|
00000830: D8 13 8E 00 40 10 7C 15  8F 54 4F 54 41 4C 45 4E  |....@.|..TOTALEN|
00000840: 00 5C 10 86 15 99 43 4C  24 3B 22 C5 C9 CE C4 D2  |.\....CL$;".....|
00000850: C5 D3 D5 CC D4 C1 C1 D4  3A 22 3A 99 00 66 10 90  |........:":..f..|
00000860: 15 53 4F 4D B2 30 00 73  10 9A 15 81 49 B2 31 20  |.SOM.0.s....I.1 |
00000870: A4 4E 4B 00 9E 10 A4 15  42 45 44 52 41 47 B2 4F  |.NK.....BEDRAG.O|
00000880: 4D 5A 45 54 28 49 29 AC  50 52 59 53 28 49 29 3A  |MZET(I).PRYS(I):|
00000890: 53 4F 4D B2 53 4F 4D AA  42 45 44 52 41 47 00 BD  |SOM.SOM.BEDRAG..|
000008A0: 10 A9 15 58 B2 42 45 44  52 41 47 3A 20 8D 37 30  |...X.BEDRAG: .70|
000008B0: 30 30 3A 42 45 44 52 41  47 24 B2 58 24 00 EF 10  |00:BEDRAG$.X$...|
000008C0: AE 15 99 4F 4D 5A 45 54  28 49 29 3B A3 35 29 3B  |...OMZET(I);.5);|
000008D0: 41 52 54 24 28 49 29 3B  A3 33 35 AB C3 28 42 45  |ART$(I);.35..(BE|
000008E0: 44 52 41 47 24 29 29 3B  42 45 44 52 41 47 24 00  |DRAG$));BEDRAG$.|
000008F0: F5 10 B8 15 82 00 0C 11  C2 15 81 49 B2 31 20 A4  |...........I.1 .|
00000900: 33 39 3A 99 22 2D 22 3B  3A 82 3A 99 00 25 11 C7  |39:."-";:.:..%..|
00000910: 15 58 B2 53 4F 4D 3A 20  8D 37 30 30 30 3A 53 4F  |.X.SOM: .7000:SO|
00000920: 4D 24 B2 58 24 00 51 11  CC 15 99 A3 31 30 29 3B  |M$.X$.Q.....10);|
00000930: 22 D4 CF D4 C1 CC C5 20  CF CD DA C5 D4 3A 22 3B  |"...... .....:";|
00000940: A3 33 35 AB C3 28 53 4F  4D 24 29 29 3B 53 4F 4D  |.35..(SOM$));SOM|
00000950: 24 00 57 11 D6 15 8E 00  7F 11 58 1B 8F 42 45 44  |$.W.......X..BED|
00000960: 52 41 47 20 56 4F 52 4D  45 4E 3B 49 4E 56 4F 45  |RAG VORMEN;INVOE|
00000970: 52 20 58 2C 20 55 49 54  56 4F 45 52 20 58 24 00  |R X, UITVOER X$.|
00000980: 94 11 62 1B 58 24 B2 CA  28 C4 28 31 30 30 AC 58  |..b.X$..(.(100.X|
00000990: 29 2C 32 29 00 B3 11 67  1B 8B C3 28 58 24 29 B3  |),2)...g...(X$).|
000009A0: 33 20 A7 58 24 B2 22 30  22 AA 58 24 3A 20 89 37  |3 .X$."0".X$: .7|
000009B0: 30 31 35 00 D4 11 6C 1B  58 24 B2 C8 28 58 24 2C  |015...l.X$..(X$,|
000009C0: C3 28 58 24 29 AB 32 29  AA 22 2E 22 AA C9 28 58  |.(X$).2)."."..(X|
000009D0: 24 2C 32 29 00 DA 11 76  1B 8E 00 EA 11 10 27 8F  |$,2)...v......'.|
000009E0: 20 49 4E 4C 45 49 44 49  4E 47 00 1E 12 1A 27 99  | INLEIDING....'.|
000009F0: 43 4C 24 22 D5 20 48 45  45 46 54 20 47 45 41 55  |CL$". HEEFT GEAU|
00000A00: 54 4F 4D 41 54 49 53 45  45 52 44 20 49 4E 20 D5  |TOMATISEERD IN .|
00000A10: 57 20 43 41 46 45 54 41  52 49 41 22 3A 99 00 4D  |W CAFETARIA":..M|
00000A20: 12 24 27 99 22 C2 49 4A  20 45 4C 4B 45 20 42 45  |.$'.".IJ ELKE BE|
00000A30: 53 54 45 4C 4C 49 4E 47  20 54 49 4B 54 20 D5 20  |STELLING TIKT . |
00000A40: 53 4F 4F 52 54 2C 41 41  4E 54 41 4C 22 00 69 12  |SOORT,AANTAL".i.|
00000A50: 2E 27 99 22 45 4E 20 54  41 46 45 4C 4E 55 4D 4D  |.'."EN TAFELNUMM|
00000A60: 45 52 20 49 4E 2E 22 3A  99 00 97 12 38 27 99 22  |ER IN.":....8'."|
00000A70: C2 49 4A 20 48 45 54 20  41 46 52 45 4B 45 4E 45  |.IJ HET AFREKENE|
00000A80: 4E 20 57 4F 52 44 54 20  56 4F 4F 52 20 45 45 4E  |N WORDT VOOR EEN|
00000A90: 20 54 41 46 45 4C 22 00  C4 12 42 27 99 22 44 45  | TAFEL"...B'."DE|
00000AA0: 20 52 45 4B 45 4E 49 4E  47 20 47 45 4D 41 41 4B  | REKENING GEMAAK|
00000AB0: 54 2C 20 45 4E 20 4E 41  20 53 4C 55 49 54 49 4E  |T, EN NA SLUITIN|
00000AC0: 47 53 2D 22 00 E7 12 4C  27 99 22 54 49 4A 44 20  |GS-"...L'."TIJD |
00000AD0: 57 4F 52 44 54 20 44 45  20 4B 41 53 20 4F 50 47  |WORDT DE KAS OPG|
00000AE0: 45 4D 41 41 4B 54 22 00  F3 12 51 27 4D 41 58 B2  |EMAAKT"...Q'MAX.|
00000AF0: 31 30 30 00 04 13 56 27  99 48 24 C8 28 56 54 24  |100...V'.H$.(VT$|
00000B00: 2C 31 36 29 00 25 13 60  27 85 22 C8 4F 45 56 45  |,16).%.`'.".OEVE|
00000B10: 45 4C 20 54 41 46 45 4C  53 20 56 41 4E 44 41 41  |EL TAFELS VANDAA|
00000B20: 47 22 3B 41 24 00 49 13  6A 27 4E 54 B2 B5 28 C5  |G";A$.I.j'NT..(.|
00000B30: 28 41 24 29 29 3A 8B 4E  54 B3 31 B0 4E 54 B1 4D  |(A$)):.NT.1.NT.M|
00000B40: 41 58 A7 89 31 30 30 37  30 00 63 13 6F 27 99 3A  |AX..10070.c.o'.:|
00000B50: 99 22 C5 56 45 4E 20 47  45 44 55 4C 44 20 2E 2E  |.".VEN GEDULD ..|
00000B60: 2E 2E 22 00 69 13 74 27  8E 00 00 00              |..".i.t'....    |

.......1000:.INITIALISEREN.*.(..2000:.ME
NU.C.2..H$;H(VT$,15):."KEUZE-NUMMER: ";K
EUZE:KEUZE..(KEUZE)...<..KEUZE.0 .(KEUZE
.NK .KEUZE..99) . .50...F..KEUZE.99 . .5
000: .120:.EINDSALDO...P..H$;H(VT$,17):.
"TAFEL-NUMMER: ";TAFEL:TAFEL..(TAFEL)...
Z..TAFEL.1 .TAFEL.NT . .80.).D..KEUZE.0 
. .3000:.REKENING.K.N..KEUZE..0 . .4000:
.BESTELLING.F.X..KEUZE..99 .OK.0 . .40.L
.........INITIALISEREN.....H$.".": CL$.
".": VT$."........................".....
.G(14).I....10000......NK: .T(NT,NK),ART
$(NK),PRYS(NK),OMZET(NK).#....I.1 .NK:.A
RT$(I),PRYS(I):OMZET(I).0:..F....I.1 .NT
:.J.0 .NK:T(I,J).0:.:..L.....F.L..16:.AA
NTAL ARTIKELEN.W.V..KOFFIE,1.35...`..THE
E,1.10...J..DIV.LIMONADES,1.50...T..MELK
,1.25.G.~..RODE/WITTE WIJN,2.25......MAR
TINI/SHERRY,2.75......RODE/WITTE PORT,2.
75......BINNENL.GEDEST.,1.80......BUITEN
L.GEDEST.,3.75.I....BELEGDE BROODJES,2.0
0.`....KROKET-BROOD,2.25.Z.D..DIV. UITSM
IJTER,4.75...N..DIV. SOEPEN,2.50...X..BI
EFSTUK BROOD,8.85......HALVE HAAN,7.85.Q
....DAGMENU,14.75...P..MENU...Z..CL$....
.AR.NK.2.(....I.1 .AR:.I;.3);ART$(I);.19
);I.AR;.23);ART$(I.AR):..I....AR...(AR) 
..NK;.4);ART$(NK).`....I.1 .39:."=";:.:.
......" 0=REKENING";.20);"99=KAS AFSLUIT
EN"......I.1 .39:."=";:.:.... ........RE
KENING...B..CL$;"REKENING VOOR TAFEL ";T
AFEL:....L..T(TAFEL,0).0 .."GEEN BESTELL
ING GEPLAATST".9.V..T(TAFEL,0)..0 . .310
0:.PRINT BEDRAGEN.G....H$;H(VT$,23);"TOE
TS SPATIE VOOR VERVOLG"......A$:.A$.." "
 . .3050............BEDRAGEN PRINTEN...&
.SOM.0...0..I.1 .NK.K.:..T(TAFEL,I).0 .3
140...<.BEDRAG.T(TAFEL,I).PRYS(I):SOM.SO
M.BEDRAG...?.X.BEDRAG: .7000:BEDRAG$.X$.
K.B..T(TAFEL,I);.4);ART$(I);.35.C(BEDRAG
$));BEDRAG$.Q.D...H.N..I.1 .39:."-";:.:.
...S.X.SOM: .7000:SOM$.X$...X...20);"TOT
AAL:";.35.C(SOM$));SOM$.C.B..I.0 .NK:T(T
AFEL,I).0:..I.L...Y. ..BESTELLING......H
$;H(VT$,19):."AANTAL:       ";N.L...T(TA
FEL,0).1:T(TAFEL,KEUZE).T(TAFEL,KEUZE).N
:OMZET(KEUZE).OMZET(KEUZE).N.R.....A....
EINDSALDO.O...OK.1:.CL$......I.1 .NT:.T(
I,0)..0 ..I:OK.0............OK . .5500: 
.5080......"BOVENSTAANDE TAFEL(S) MOETEN
 EERST NOG  AFREKENEN"...D..H$;H(VT$,23)
;"TOETS SPATIE VOOR VERVOLG".-.N..A$:.A$
.." " . .5070.3.X...@.|..TOTALEN.\....CL
$;"EINDRESULTAAT:":..F...SOM.0.S....I.1 
.NK.....BEDRAG.OMZET(I).PRYS(I):SOM.SOM.
BEDRAG.....X.BEDRAG: .7000:BEDRAG$.X$...
...OMZET(I);.5);ART$(I);.35.C(BEDRAG$));
BEDRAG$.........B..I.1 .39:."-";:.:..%.G
.X.SOM: .7000:SOM$.X$.Q.L...10);"TOTALE 
OMZET:";.35.C(SOM$));SOM$.W.V....X..BED
RAG VORMEN;INVOER X, UITVOER X$...B.X$.J
(D(100.X),2)...G..C(X$).3 .X$."0".X$: .7
015.T.L.X$.H(X$,C(X$).2).".".I(X$,2).Z.V
......'. INLEIDING....'.CL$"U HEEFT GEAU
TOMATISEERD IN UW CAFETARIA":..M.$'."BIJ
 ELKE BESTELLING TIKT U SOORT,AANTAL".I.
.'."EN TAFELNUMMER IN.":....8'."BIJ HET 
AFREKENEN WORDT VOOR EEN TAFEL".D.B'."DE
 REKENING GEMAAKT, EN NA SLUITINGS-"...L
'."TIJD WORDT DE KAS OPGEMAAKT"...Q'MAX.
100...V'.H$H(VT$,16).%.`'."HOEVEEL TAFEL
S VANDAAG";A$.I.J'NT..(E(A$)):.NT.1.NT.M
AX..10070.C.O'.:."EVEN GEDULD ....".I.T'
....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL