LAG
FILE INFORMATION
FILENAME(S): LAG
FILE TYPE(S): PRG
FILE SIZE: 8.2K
FIRST SEEN: 2025-11-30 21:22:59
APPEARS ON: 1 disk(s)
FILE HASH
6643bb5cee19a98b13ba7dd31f1037fcf88de22f15b395c6d3d0b4c1b711123c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 53 2 | LAG | PRG | DuncanTwain | 10 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 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 2A 2A 2A 2A 2A 00 4D 08 14 00 8F 20 2A 20 |*******.M.... * |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 73 08 | *.s.|
00000050: 1E 00 8F 20 2A 20 20 20 20 45 53 56 20 4C 41 47 |... * ESV LAG|
00000060: 45 52 56 45 52 57 41 4C 54 55 4E 47 20 20 20 20 |ERVERWALTUNG |
00000070: 20 20 2A 00 99 08 28 00 8F 20 2A 20 20 20 20 20 | *...(.. * |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 2A 00 BF 08 32 00 8F 20 | *...2.. |
000000A0: 2A 20 56 45 52 53 49 4F 4E 3A 31 2E 30 20 20 44 |* VERSION:1.0 D|
000000B0: 41 54 55 4D 3A 38 33 2F 30 36 2F 31 35 20 2A 00 |ATUM:83/06/15 *.|
000000C0: E5 08 3C 00 8F 20 2A 20 20 20 20 20 20 20 20 20 |..<.. * |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000E0: 20 20 20 20 2A 00 0B 09 46 00 8F 20 2A 20 50 52 | *...F.. * PR|
000000F0: 4F 47 52 41 4D 4D 49 45 52 45 52 3A 20 4C 2E 46 |OGRAMMIERER: L.F|
00000100: 41 53 43 48 41 4C 45 4B 20 20 2A 00 31 09 50 00 |ASCHALEK *.1.P.|
00000110: 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |. * |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000130: 2A 00 57 09 5A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*.W.Z.. ********|
00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000150: 2A 2A 2A 2A 2A 2A 2A 00 6F 09 64 00 8B 53 46 B2 |*******.o.d..SF.|
00000160: 30 A7 9F 31 35 2C 38 2C 31 35 2C 22 55 3A 22 00 |0..15,8,15,"U:".|
00000170: 7E 09 6E 00 81 49 B2 30 A4 39 39 39 3A 82 00 A0 |~.n..I.0.999:...|
00000180: 09 73 00 8B 53 46 B2 30 A7 53 46 B2 31 3A 93 22 |.s..SF.0.SF.1:."|
00000190: 30 3A 53 4F 52 54 2E 43 30 58 58 22 2C 38 2C 31 |0:SORT.C0XX",8,1|
000001A0: 00 BA 09 74 00 84 31 35 2C 4B 45 2C 4B 45 24 3A |...t..15,KE,KE$:|
000001B0: 8B 4B 45 A7 99 4B 45 24 3A 90 00 E6 09 78 00 4B |.KE..KE$:....x.K|
000001C0: 4E 24 B2 22 4C 41 47 45 52 22 3A 4B 4C B2 31 30 |N$."LAGER":KL.10|
000001D0: 34 3A 4B 43 B2 31 35 3A 4B 44 B2 32 3A 4B 55 B2 |4:KC.15:KD.2:KU.|
000001E0: 38 3A 44 52 B2 34 00 FE 09 82 00 4B 41 B2 31 30 |8:DR.4.....KA.10|
000001F0: 3A 86 41 24 28 33 30 30 29 2C 53 28 33 29 00 12 |:.A$(300),S(3)..|
00000200: 0A 8C 00 8D 36 30 30 3A 8B 4B 45 A7 99 4B 45 24 |....600:.KE..KE$|
00000210: 3A 90 00 39 0A 96 00 4B 4D B2 53 34 3A 86 20 4B |:..9...KM.S4:. K|
00000220: 24 28 4B 41 29 2C 4D 28 33 29 2C 42 45 24 28 4B |$(KA),M(3),BE$(K|
00000230: 41 29 2C 4C 45 28 4B 41 29 00 55 0A A0 00 4D 28 |A),LE(KA).U...M(|
00000240: 31 29 B2 53 31 3A 4D 28 32 29 B2 53 32 3A 4D 28 |1).S1:M(2).S2:M(|
00000250: 33 29 B2 53 33 00 72 0A AA 00 81 49 B2 30 A4 4B |3).S3.r....I.0.K|
00000260: 41 3A 87 20 4C 45 28 49 29 2C 42 45 24 28 49 29 |A:. LE(I),BE$(I)|
00000270: 3A 82 00 80 0A B4 00 43 52 24 B2 C7 28 31 33 29 |:......CR$..(13)|
00000280: 00 8A 0A BE 00 89 31 30 30 30 00 9C 0A C7 00 8F |......1000......|
00000290: 20 46 4F 52 4D 41 54 20 52 45 41 4C 00 C9 0A C8 | FORMAT REAL....|
000002A0: 00 58 24 B2 C4 28 B5 28 31 30 30 AC 58 AA 2E 35 |.X$..(.(100.X..5|
000002B0: 29 29 3A 58 53 24 B2 C8 28 58 24 2C 31 29 3A 58 |)):XS$..(X$,1):X|
000002C0: 24 B2 CA 28 58 24 2C 32 29 00 E5 0A D2 00 8B C3 |$..(X$,2).......|
000002D0: 28 58 24 29 B3 33 A7 58 24 B2 22 30 22 AA 58 24 |(X$).3.X$."0".X$|
000002E0: 3A 89 32 31 30 00 20 0B DC 00 58 24 B2 C9 28 22 |:.210. ...X$..("|
000002F0: 20 20 20 20 20 20 20 20 20 20 20 22 AA 58 53 24 | ".XS$|
00000300: AA C8 28 58 24 2C C3 28 58 24 29 AB 32 29 AA 22 |..(X$,.(X$).2)."|
00000310: 2E 22 AA C9 28 58 24 2C 32 29 2C 31 31 29 3A 8E |."..(X$,2),11):.|
00000320: 00 35 0B F9 00 8F 20 46 4F 52 4D 41 54 20 49 4E |.5.... FORMAT IN|
00000330: 54 45 47 45 52 00 61 0B FA 00 58 24 B2 C4 28 B5 |TEGER.a...X$..(.|
00000340: 28 58 29 29 3A 58 53 24 B2 C8 28 58 24 2C 31 29 |(X)):XS$..(X$,1)|
00000350: 3A 58 24 B2 C9 28 58 24 2C C3 28 58 24 29 AB 31 |:X$..(X$,.(X$).1|
00000360: 29 00 7E 0B 04 01 58 24 B2 58 53 24 AA C9 28 22 |).~...X$.XS$..("|
00000370: 30 30 30 30 30 22 AA 58 24 2C 35 29 3A 8E 00 90 |00000".X$,5):...|
00000380: 0B 2B 01 8F 20 46 49 4E 44 20 52 45 43 4F 52 44 |.+.. FIND RECORD|
00000390: 00 C7 0B 2C 01 9F 4B 44 2C 4B 55 2C 4B 44 2C 4B |...,..KD,KU,KD,K|
000003A0: 4E 24 AA 22 4B 45 59 2C 4C 2C 22 AA C7 28 31 30 |N$."KEY,L,"..(10|
000003B0: 29 3A 84 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 |):.KC,KE,KE$:.KE|
000003C0: A7 8D 39 39 39 3A 8E 00 DD 0B 36 01 4B 31 25 B2 |..999:....6.K1%.|
000003D0: 31 3A 4B 32 25 B2 4B 4D 3A 4B 5A B2 30 00 F4 0B |1:K2%.KM:KZ.0...|
000003E0: 40 01 8B 4B 31 25 B1 4B 32 25 A7 4B 52 B2 30 3A |@..K1%.K2%.KR.0:|
000003F0: 89 33 39 30 00 25 0C 45 01 4B 52 B2 B5 28 28 4B |.390.%.E.KR..((K|
00000400: 31 25 AA 4B 32 25 AA 31 29 AD 32 29 3A 4B 5A B2 |1%.K2%.1).2):KZ.|
00000410: 4B 5A AA 31 3A 8B 4B 5A B1 31 31 A7 4B 52 B2 30 |KZ.1:.KZ.11.KR.0|
00000420: 3A 89 33 39 30 00 3F 0C 46 01 8B 4B 52 B3 31 B0 |:.390.?.F..KR.1.|
00000430: 4B 52 B1 4B 4D A7 4B 52 B2 30 3A 89 33 39 30 00 |KR.KM.KR.0:.390.|
00000440: 6A 0C 4A 01 98 4B 43 2C 22 50 22 AA C7 28 4B 44 |j.J..KC,"P"..(KD|
00000450: 29 AA C7 28 4B 52 AF 32 35 35 29 AA C7 28 4B 52 |)..(KR.255)..(KR|
00000460: AD 32 35 36 29 AA C7 28 30 29 00 84 0C 4F 01 84 |.256)..(0)...O..|
00000470: 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 |KC,KE,KE$:.KE..9|
00000480: 39 39 3A 8E 00 AA 0C 54 01 84 4B 44 2C 4B 30 24 |99:....T..KD,K0$|
00000490: 2C 4B 52 24 3A 84 4B 43 2C 4B 45 2C 4B 45 24 3A |,KR$:.KC,KE,KE$:|
000004A0: 8B 4B 45 A7 8D 39 39 39 3A 8E 00 CF 0C 5E 01 8B |.KE..999:....^..|
000004B0: C3 28 4B 30 24 29 B1 C3 28 4B 4B 24 29 A7 4B 30 |.(K0$)..(KK$).K0|
000004C0: 24 B2 C8 28 4B 30 24 2C C3 28 4B 4B 24 29 29 00 |$..(K0$,.(KK$)).|
000004D0: EA 0C 68 01 8B 4B 30 24 B1 4B 4B 24 A7 4B 32 25 |..h..K0$.KK$.K2%|
000004E0: B2 4B 52 AB 31 3A 89 33 32 30 00 05 0D 6D 01 8B |.KR.1:.320...m..|
000004F0: 4B 30 24 B3 4B 4B 24 A7 4B 31 25 B2 4B 52 AA 31 |K0$.KK$.K1%.KR.1|
00000500: 3A 89 33 32 30 00 11 0D 72 01 8F 20 46 4F 55 4E |:.320...r.. FOUN|
00000510: 44 00 25 0D 7C 01 4B 54 B2 4B 52 3A 4B 52 B2 C5 |D.%.|.KT.KR:KR..|
00000520: 28 4B 52 24 29 00 30 0D 86 01 8D 39 39 39 3A 8E |(KR$).0....999:.|
00000530: 00 42 0D 8F 01 8F 20 52 45 41 44 20 52 45 43 4F |.B.... READ RECO|
00000540: 52 44 00 78 0D 90 01 8B 4B 52 B3 31 B0 4B 52 B1 |RD.x....KR.1.KR.|
00000550: 4B 4D A7 4B 45 B2 32 3A 4B 45 24 B2 C4 28 4B 52 |KM.KE.2:KE$..(KR|
00000560: 29 AA 22 20 4E 49 43 48 54 20 56 4F 52 48 41 4E |)." NICHT VORHAN|
00000570: 44 45 4E 20 21 22 3A 8E 00 AF 0D 95 01 9F 4B 44 |DEN !":.......KD|
00000580: 2C 4B 55 2C 4B 44 2C 4B 4E 24 AA 22 44 41 54 2C |,KU,KD,KN$."DAT,|
00000590: 4C 2C 22 AA C7 28 4B 4C 29 3A 84 4B 43 2C 4B 45 |L,"..(KL):.KC,KE|
000005A0: 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 3A 8E 00 |,KE$:.KE..999:..|
000005B0: DA 0D 9A 01 98 4B 43 2C 22 50 22 AA C7 28 4B 44 |.....KC,"P"..(KD|
000005C0: 29 AA C7 28 4B 52 AF 32 35 35 29 AA C7 28 4B 52 |)..(KR.255)..(KR|
000005D0: AD 32 35 36 29 AA C7 28 30 29 00 F4 0D 9F 01 84 |.256)..(0)......|
000005E0: 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 |KC,KE,KE$:.KE..9|
000005F0: 39 39 3A 8E 00 20 0E A4 01 81 4B B2 30 A4 4B 41 |99:.. ....K.0.KA|
00000600: 3A 84 4B 44 2C 4B 24 28 4B 29 3A 84 4B 43 2C 4B |:.KD,K$(K):.KC,K|
00000610: 45 2C 4B 45 24 3A 8B 4B 45 A7 4B B2 4B 41 AA 31 |E,KE$:.KE.K.KA.1|
00000620: 00 38 0E B8 01 82 3A 84 4B 43 2C 4B 45 2C 4B 45 |.8....:.KC,KE,KE|
00000630: 24 3A 8D 39 39 39 3A 8E 00 4B 0E F3 01 8F 20 57 |$:.999:..K.... W|
00000640: 52 49 54 45 20 52 45 43 4F 52 44 00 82 0E F4 01 |RITE RECORD.....|
00000650: 9F 4B 44 2C 4B 55 2C 4B 44 2C 4B 4E 24 AA 22 44 |.KD,KU,KD,KN$."D|
00000660: 41 54 2C 4C 2C 22 AA C7 28 4B 4C 29 3A 84 4B 43 |AT,L,"..(KL):.KC|
00000670: 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 |,KE,KE$:.KE..999|
00000680: 3A 8E 00 AD 0E FE 01 98 4B 43 2C 22 50 22 AA C7 |:.......KC,"P"..|
00000690: 28 4B 44 29 AA C7 28 4B 52 AF 32 35 35 29 AA C7 |(KD)..(KR.255)..|
000006A0: 28 4B 52 AD 32 35 36 29 AA C7 28 30 29 00 D1 0E |(KR.256)..(0)...|
000006B0: 03 02 84 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 |...KC,KE,KE$:.KE|
000006C0: B3 B1 35 30 AF 4B 45 B3 B1 30 A7 8D 39 39 39 3A |..50.KE..0..999:|
000006D0: 8E 00 0A 0F 08 02 4B 24 B2 22 22 3A 81 4B B2 30 |......K$."":.K.0|
000006E0: A4 4B 41 3A 4B 24 B2 4B 24 AA 4B 24 28 4B 29 AA |.KA:K$.K$.K$(K).|
000006F0: C7 28 31 33 29 3A 82 3A 98 4B 44 2C 4B 24 3B 3A |.(13):.:.KD,K$;:|
00000700: 84 4B 43 2C 4B 45 2C 4B 45 24 00 15 0F 12 02 8D |.KC,KE,KE$......|
00000710: 39 39 39 3A 8E 00 2D 0F 57 02 8F 20 52 45 41 44 |999:..-.W.. READ|
00000720: 20 53 59 53 54 45 4D 20 44 41 54 45 4E 00 48 0F | SYSTEM DATEN.H.|
00000730: 58 02 9F 4B 44 2C 4B 55 2C 4B 44 2C 22 53 59 53 |X..KD,KU,KD,"SYS|
00000740: 44 41 54 2C 55 2C 52 22 00 62 0F 5D 02 84 4B 43 |DAT,U,R".b.]..KC|
00000750: 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 |,KE,KE$:.KE..999|
00000760: 3A 8E 00 76 0F 62 02 84 4B 44 2C 53 30 24 2C 53 |:..v.b..KD,S0$,S|
00000770: 31 24 2C 53 32 24 00 A2 0F 6C 02 84 4B 44 2C 53 |1$,S2$...l..KD,S|
00000780: 33 24 2C 53 34 24 2C 53 35 24 2C 53 36 24 2C 53 |3$,S4$,S5$,S6$,S|
00000790: 37 24 2C 53 38 24 2C 53 39 24 2C 53 41 24 2C 53 |7$,S8$,S9$,SA$,S|
000007A0: 42 24 00 B6 0F 76 02 84 4B 44 2C 53 43 24 2C 53 |B$...v..KD,SC$,S|
000007B0: 44 24 2C 53 45 24 00 D4 0F 80 02 84 4B 44 2C 53 |D$,SE$......KD,S|
000007C0: 28 31 29 2C 53 28 32 29 2C 53 28 33 29 3A 8F 20 |(1),S(2),S(3):. |
000007D0: 4D 57 53 54 00 F5 0F 8A 02 84 4B 44 2C 53 34 2C |MWST......KD,S4,|
000007E0: 53 35 3A 8F 20 4C 41 47 45 52 2C 4B 55 4E 44 45 |S5:. LAGER,KUNDE|
000007F0: 4E 20 4D 41 58 00 00 10 94 02 8D 39 39 39 3A 8E |N MAX......999:.|
00000800: 00 19 10 BB 02 8F 20 57 52 49 54 45 20 53 59 53 |...... WRITE SYS|
00000810: 54 45 4D 20 44 41 54 45 4E 00 37 10 BC 02 9F 4B |TEM DATEN.7....K|
00000820: 44 2C 4B 55 2C 4B 44 2C 22 40 30 3A 53 59 53 44 |D,KU,KD,"@0:SYSD|
00000830: 41 54 2C 55 2C 57 22 00 51 10 C1 02 84 4B 43 2C |AT,U,W".Q....KC,|
00000840: 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 3A |KE,KE$:.KE..999:|
00000850: 8E 00 72 10 C6 02 98 4B 44 2C 53 30 24 3B 43 52 |..r....KD,S0$;CR|
00000860: 24 3B 53 31 24 3B 43 52 24 3B 53 32 24 3B 43 52 |$;S1$;CR$;S2$;CR|
00000870: 24 3B 00 C3 10 D0 02 98 4B 44 2C 53 33 24 3B 43 |$;......KD,S3$;C|
00000880: 52 24 3B 53 34 24 3B 43 52 24 3B 53 35 24 3B 43 |R$;S4$;CR$;S5$;C|
00000890: 52 24 3B 53 36 24 3B 43 52 24 3B 53 37 24 3B 43 |R$;S6$;CR$;S7$;C|
000008A0: 52 24 3B 53 38 24 3B 43 52 24 3B 53 39 24 3B 43 |R$;S8$;CR$;S9$;C|
000008B0: 52 24 3B 53 41 24 3B 43 52 24 3B 53 42 24 3B 43 |R$;SA$;CR$;SB$;C|
000008C0: 52 24 3B 00 E4 10 DA 02 98 4B 44 2C 53 43 24 3B |R$;......KD,SC$;|
000008D0: 43 52 24 3B 53 44 24 3B 43 52 24 3B 53 45 24 3B |CR$;SD$;CR$;SE$;|
000008E0: 43 52 24 3B 00 0F 11 E4 02 98 4B 44 2C 53 28 31 |CR$;......KD,S(1|
000008F0: 29 3B 43 52 24 3B 53 28 32 29 3B 43 52 24 3B 53 |);CR$;S(2);CR$;S|
00000900: 28 33 29 3B 43 52 24 3B 3A 8F 20 4D 57 53 54 00 |(3);CR$;:. MWST.|
00000910: 39 11 EE 02 98 4B 44 2C 53 34 3B 43 52 24 3B 53 |9....KD,S4;CR$;S|
00000920: 35 3B 43 52 24 3B 3A 8F 20 4C 41 47 45 52 2C 4B |5;CR$;:. LAGER,K|
00000930: 55 4E 44 45 4E 20 4D 41 58 00 44 11 F8 02 8D 39 |UNDEN MAX.D....9|
00000940: 39 39 3A 8E 00 5B 11 1F 03 8F 20 53 4F 52 54 49 |99:..[.... SORTI|
00000950: 45 52 45 20 52 45 4B 4F 52 44 53 00 87 11 20 03 |ERE REKORDS... .|
00000960: 8D 38 30 33 3A 8B 4B 45 B3 B1 30 AF 4B 45 B3 B1 |.803:.KE..0.KE..|
00000970: 35 30 A7 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 |50.M$.".".KE$.".|
00000980: 22 3A 8D 32 38 30 30 00 8D 11 21 03 8E 00 C4 11 |":.2800...!.....|
00000990: 23 03 9F 4B 44 2C 4B 55 2C 4B 44 2C 4B 4E 24 AA |#..KD,KU,KD,KN$.|
000009A0: 22 44 41 54 2C 4C 2C 22 AA C7 28 4B 4C 29 3A 84 |"DAT,L,"..(KL):.|
000009B0: 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 |KC,KE,KE$:.KE..9|
000009C0: 39 39 3A 8E 00 DA 11 25 03 41 24 28 30 29 B2 22 |99:....%.A$(0)."|
000009D0: 22 3A 81 4B 52 B2 31 A4 4B 4D 00 05 12 2A 03 98 |":.KR.1.KM...*..|
000009E0: 4B 43 2C 22 50 22 AA C7 28 4B 44 29 AA C7 28 4B |KC,"P"..(KD)..(K|
000009F0: 52 AF 32 35 35 29 AA C7 28 4B 52 AD 32 35 36 29 |R.255)..(KR.256)|
00000A00: AA C7 28 30 29 00 1F 12 2F 03 84 4B 43 2C 4B 45 |..(0).../..KC,KE|
00000A10: 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 3A 8E 00 |,KE$:.KE..999:..|
00000A20: 41 12 34 03 84 4B 44 2C 4B 30 24 3A 84 4B 43 2C |A.4..KD,K0$:.KC,|
00000A30: 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 3A |KE,KE$:.KE..999:|
00000A40: 8E 00 68 12 3E 03 41 24 28 4B 52 29 B2 4B 30 24 |..h.>.A$(KR).K0$|
00000A50: AA 43 52 24 AA C9 28 22 20 20 20 20 22 AA C4 28 |.CR$..(" "..(|
00000A60: 4B 52 29 2C 34 29 3A 82 00 87 12 48 03 81 49 B2 |KR),4):....H..I.|
00000A70: 4B 4D AA 31 A4 33 30 30 3A 41 24 28 49 29 B2 C7 |KM.1.300:A$(I)..|
00000A80: 28 32 35 35 29 3A 82 00 90 12 4D 03 8D 39 39 39 |(255):....M..999|
00000A90: 00 9F 12 52 03 9E 28 31 32 AC 34 30 39 36 29 00 |...R..(12.4096).|
00000AA0: AC 12 57 03 98 4B 43 2C 22 49 30 22 00 E3 12 5C |..W..KC,"I0"...\|
00000AB0: 03 9F 4B 44 2C 4B 55 2C 4B 44 2C 4B 4E 24 AA 22 |..KD,KU,KD,KN$."|
00000AC0: 4B 45 59 2C 4C 2C 22 AA C7 28 31 30 29 3A 84 4B |KEY,L,"..(10):.K|
00000AD0: 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 |C,KE,KE$:.KE..99|
00000AE0: 39 3A 8E 00 F0 12 61 03 81 4B 52 B2 31 A4 4B 4D |9:....a..KR.1.KM|
00000AF0: 00 1B 13 66 03 98 4B 43 2C 22 50 22 AA C7 28 4B |...f..KC,"P"..(K|
00000B00: 44 29 AA C7 28 4B 52 AF 32 35 35 29 AA C7 28 4B |D)..(KR.255)..(K|
00000B10: 52 AD 32 35 36 29 AA C7 28 30 29 00 3F 13 6B 03 |R.256)..(0).?.k.|
00000B20: 84 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 B3 B1 |.KC,KE,KE$:.KE..|
00000B30: 30 AF 4B 45 B3 B1 35 30 A7 8D 39 39 39 3A 8E 00 |0.KE..50..999:..|
00000B40: 73 13 70 03 98 4B 44 2C 41 24 28 4B 52 29 3B 43 |s.p..KD,A$(KR);C|
00000B50: 52 24 3B 3A 84 4B 43 2C 4B 45 2C 4B 45 24 3A 8B |R$;:.KC,KE,KE$:.|
00000B60: 4B 45 B3 B1 30 AF 4B 45 B3 B1 35 30 A7 8D 39 39 |KE..0.KE..50..99|
00000B70: 39 3A 8E 00 9E 13 7A 03 82 3A 8D 39 39 39 3A 4D |9:....z..:.999:M|
00000B80: 24 B2 22 12 C4 41 54 45 4E 20 53 4F 52 54 49 45 |$."..ATEN SORTIE|
00000B90: 52 54 20 21 92 22 3A 8D 32 38 30 30 3A 8E 00 BE |RT !.":.2800:...|
00000BA0: 13 83 03 8F 20 52 45 41 44 20 4B 45 59 28 4B 54 |.... READ KEY(KT|
00000BB0: 29 20 3D 3E 20 52 45 54 55 52 4E 20 4B 52 00 F3 |) => RETURN KR..|
00000BC0: 13 84 03 8B 53 46 A7 53 46 B2 30 3A 4D 24 B2 22 |....SF.SF.0:M$."|
00000BD0: 12 53 4F 52 54 49 45 52 45 20 C4 41 54 45 4E 20 |.SORTIERE .ATEN |
00000BE0: 21 92 22 3A 8D 32 38 30 30 3A 8D 38 30 30 3A 89 |!.":.2800:.800:.|
00000BF0: 39 30 30 00 2A 14 89 03 9F 4B 44 2C 4B 55 2C 4B |900.*....KD,KU,K|
00000C00: 44 2C 4B 4E 24 AA 22 4B 45 59 2C 4C 2C 22 AA C7 |D,KN$."KEY,L,"..|
00000C10: 28 31 30 29 3A 84 4B 43 2C 4B 45 2C 4B 45 24 3A |(10):.KC,KE,KE$:|
00000C20: 8B 4B 45 A7 8D 39 39 39 3A 8E 00 56 14 8E 03 98 |.KE..999:..V....|
00000C30: 4B 43 2C 22 50 22 AA C7 28 4B 44 29 AA C7 28 4B |KC,"P"..(KD)..(K|
00000C40: 54 20 AF 32 35 35 29 AA C7 28 4B 54 AD 32 35 36 |T .255)..(KT.256|
00000C50: 29 AA C7 28 30 29 00 70 14 98 03 84 4B 43 2C 4B |)..(0).p....KC,K|
00000C60: 45 2C 4B 45 24 3A 8B 4B 45 A7 8D 39 39 39 3A 8E |E,KE$:.KE..999:.|
00000C70: 00 96 14 A2 03 84 4B 44 2C 4B 30 24 2C 4B 52 24 |......KD,K0$,KR$|
00000C80: 3A 84 4B 43 2C 4B 45 2C 4B 45 24 3A 8B 4B 45 A7 |:.KC,KE,KE$:.KE.|
00000C90: 8D 39 39 39 3A 8E 00 B0 14 AC 03 8D 39 39 39 3A |.999:.......999:|
00000CA0: 4B 52 B2 C5 28 4B 52 24 29 3A 8D 34 30 30 3A 8E |KR..(KR$):.400:.|
00000CB0: 00 C8 14 E7 03 A0 4B 44 3A A0 4B 43 3A 9F 4B 43 |......KD:.KC:.KC|
00000CC0: 2C 4B 55 2C 4B 43 3A 8E 00 E3 14 E8 03 8F 20 4C |,KU,KC:....... L|
00000CD0: 41 47 45 52 20 50 52 4F 47 52 41 4D 4D 20 53 54 |AGER PROGRAMM ST|
00000CE0: 41 52 54 00 F9 14 ED 03 99 C7 28 31 34 29 3B C7 |ART.......(14);.|
00000CF0: 28 38 29 3B 22 93 9E 22 3B 00 2A 15 F2 03 99 22 |(8);"..";.*...."|
00000D00: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000D10: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000D20: B8 B8 B8 B8 B8 B8 B8 B8 22 3B 00 5F 15 FC 03 99 |........";._....|
00000D30: 22 3E 3E 3E 12 56 31 2E 30 92 3E 3E 3E 20 20 CC |">>>.V1.0.>>> .|
00000D40: 41 47 45 52 42 45 41 52 42 45 49 54 55 4E 47 20 |AGERBEARBEITUNG |
00000D50: 20 3C 3C 12 38 33 30 36 31 35 92 3C 3C 22 3B 00 | <<.830615.<<";.|
00000D60: 8F 15 06 04 99 22 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |....."..........|
00000D70: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000D80: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 22 00 |..............".|
00000D90: B1 15 10 04 99 2C 22 D2 45 4B 4F 52 44 53 2E 2E |.....,".EKORDS..|
00000DA0: 2E 22 3B 3A 58 B2 4B 4D 3A 8D 32 35 30 3A 99 58 |.";:X.KM:.250:.X|
00000DB0: 24 00 D8 15 15 04 99 2C 22 11 12 C4 D2 D5 C3 CB |$......,".......|
00000DC0: C5 D2 A0 C2 C9 D4 D4 C5 A0 C1 D5 D3 D3 C3 C8 C1 |................|
00000DD0: CC D4 C5 CE A0 21 92 22 00 EC 15 16 04 A1 51 24 |.....!."......Q$|
00000DE0: 3A 8B 51 24 B2 22 22 A7 31 30 34 36 00 14 16 17 |:.Q$."".1046....|
00000DF0: 04 99 22 91 22 2C 22 20 20 20 20 20 20 20 20 20 |.."."," |
00000E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E10: 20 20 20 22 00 1C 16 1A 04 99 3A 99 00 3A 16 24 | "......:..:.$|
00000E20: 04 99 2C 22 31 A4 A4 C1 52 54 49 4B 45 4C 20 42 |..,"1...RTIKEL B|
00000E30: 45 41 52 42 45 49 54 45 4E 22 00 40 16 29 04 99 |EARBEITEN".@.)..|
00000E40: 00 5B 16 2E 04 99 2C 22 32 A4 A4 DA 55 47 41 4E |.[....,"2...UGAN|
00000E50: 47 20 45 49 4E 47 45 42 45 4E 22 00 61 16 33 04 |G EINGEBEN".a.3.|
00000E60: 99 00 7C 16 38 04 99 2C 22 33 A4 A4 C1 42 47 41 |..|.8..,"3...BGA|
00000E70: 4E 47 20 45 49 4E 47 45 42 45 4E 22 00 82 16 3D |NG EINGEBEN"...=|
00000E80: 04 99 00 9F 16 42 04 99 2C 22 34 A4 A4 CC 49 53 |.....B..,"4...IS|
00000E90: 54 45 4E 20 41 55 53 44 52 55 43 4B 45 4E 22 00 |TEN AUSDRUCKEN".|
00000EA0: A5 16 47 04 99 00 BD 16 4B 04 99 2C 22 5F A4 A4 |..G.....K..,"_..|
00000EB0: CD 45 4E 55 45 20 C1 55 46 52 55 46 22 00 CF 16 |.ENUE .UFRUF"...|
00000EC0: 4C 04 8B 53 46 A7 53 46 B2 30 3A 8D 38 30 30 00 |L..SF.SF.0:.800.|
00000ED0: D9 16 60 04 8D 32 37 30 30 00 F5 16 6A 04 51 B2 |..`..2700...j.Q.|
00000EE0: B6 28 B5 28 C5 28 51 24 29 29 29 3A 8B 51 B1 34 |.(.(.(Q$))):.Q.4|
00000EF0: A7 31 31 32 30 00 06 17 74 04 8B 51 24 B2 22 5F |.1120...t..Q$."_|
00000F00: 22 A7 39 30 30 30 00 3C 17 79 04 8B 51 B3 31 B0 |".9000.<.y..Q.1.|
00000F10: 51 B1 34 A7 4D 24 B2 22 12 DA 41 48 4C 20 5A 57 |Q.4.M$."..AHL ZW|
00000F20: 49 53 43 48 45 4E 20 30 20 55 4E 44 20 34 92 22 |ISCHEN 0 UND 4."|
00000F30: 3A 8D 32 38 30 30 3A 89 31 30 30 30 00 57 17 7E |:.2800:.1000.W.~|
00000F40: 04 91 51 8D 32 30 30 30 2C 33 30 30 30 2C 34 30 |..Q.2000,3000,40|
00000F50: 30 30 2C 35 30 30 30 00 62 17 88 04 89 20 31 30 |00,5000.b.... 10|
00000F60: 30 30 00 87 17 D0 07 8F 20 41 52 54 49 4B 45 4C |00...... ARTIKEL|
00000F70: 20 53 55 43 48 45 4E 2F 45 49 4E 47 45 42 45 4E | SUCHEN/EINGEBEN|
00000F80: 20 45 54 43 2E 2E 2E 00 B9 17 DA 07 99 22 93 B8 | ETC........."..|
00000F90: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000FA0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000FB0: B8 B8 B8 B8 B8 B8 B8 22 3B 00 F2 17 E4 07 99 22 |.......";......"|
00000FC0: 3E 20 C1 52 54 49 4B 45 4C 3A 20 12 D3 92 55 43 |> .RTIKEL: ...UC|
00000FD0: 48 45 4E 2F 12 C1 92 45 4E 44 45 52 4E 2F 12 CE |HEN/...ENDERN/..|
00000FE0: 92 45 55 2F 12 CC 92 4F 45 53 43 48 45 4E 20 3C |.EU/...OESCHEN <|
00000FF0: 22 3B 00 22 18 EE 07 99 22 B9 B9 B9 B9 B9 B9 B9 |";."....".......|
00001000: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001010: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001020: B9 22 00 44 18 F8 07 99 2C 22 DA 55 52 55 45 43 |.".D....,".URUEC|
00001030: 4B 20 5A 55 4D 20 CD 45 4E 55 45 20 4D 49 54 20 |K ZUM .ENUE MIT |
00001040: 12 5F 92 22 00 54 18 02 08 8D 32 35 30 30 3A 8D |._.".T....2500:.|
00001050: 32 36 30 30 00 6C 18 0C 08 8D 32 37 30 30 3A 8B |2600.l....2700:.|
00001060: C3 28 51 24 29 B1 31 A7 32 30 36 30 00 84 18 0D |.(Q$).1.2060....|
00001070: 08 8B 51 24 B2 22 53 22 A7 8D 32 31 30 30 3A 89 |..Q$."S"..2100:.|
00001080: 32 30 30 30 00 9C 18 0E 08 8B 51 24 B2 22 41 22 |2000......Q$."A"|
00001090: A7 8D 32 33 30 30 3A 89 32 30 30 30 00 B4 18 0F |..2300:.2000....|
000010A0: 08 8B 51 24 B2 22 4E 22 A7 8D 32 32 30 30 3A 89 |..Q$."N"..2200:.|
000010B0: 32 30 30 30 00 C2 18 10 08 8B 51 24 B2 22 5F 22 |2000......Q$."_"|
000010C0: A7 8E 00 DA 18 11 08 8B 51 24 B2 22 4C 22 A7 8D |........Q$."L"..|
000010D0: 32 34 30 30 3A 89 32 30 30 30 00 F9 18 12 08 8B |2400:.2000......|
000010E0: 51 24 B2 22 3E 22 A7 4B 54 B2 4B 54 AA 31 3A 8D |Q$.">".KT.KT.1:.|
000010F0: 39 30 30 3A 89 32 30 30 30 00 18 19 13 08 8B 51 |900:.2000......Q|
00001100: 24 B2 22 3C 22 A7 4B 54 B2 4B 54 AB 31 3A 8D 39 |$."<".KT.KT.1:.9|
00001110: 30 30 3A 89 32 30 30 30 00 47 19 16 08 4D 24 B2 |00:.2000.G...M$.|
00001120: 22 12 53 2C 41 2C 4E 2C 4C 20 4F 44 45 52 20 30 |".S,A,N,L ODER 0|
00001130: 20 45 49 4E 47 45 42 45 4E 92 22 3A 8D 32 38 30 | EINGEBEN.":.280|
00001140: 30 3A 89 32 30 36 30 00 56 19 34 08 99 22 13 11 |0:.2060.V.4.."..|
00001150: 11 11 11 11 11 22 00 8C 19 39 08 8B 53 46 A7 53 |....."...9..SF.S|
00001160: 46 B2 30 3A 4D 24 B2 22 12 53 4F 52 54 49 45 52 |F.0:M$.".SORTIER|
00001170: 45 20 C4 41 54 45 4E 20 21 92 22 3A 8D 32 38 30 |E .ATEN !.":.280|
00001180: 30 3A 8D 38 30 30 3A 89 32 31 30 30 00 A5 19 3E |0:.800:.2100...>|
00001190: 08 99 A3 38 29 3B 3A 85 4B 4B 24 3A 4A 31 B2 C3 |...8);:.KK$:J1..|
000011A0: 28 4B 4B 24 29 00 CC 19 43 08 4A 30 B2 4A 31 3A |(KK$)...C.J0.J1:|
000011B0: 81 49 B2 31 A4 4A 31 3A 8B CA 28 4B 4B 24 2C 49 |.I.1.J1:..(KK$,I|
000011C0: 2C 31 29 B2 22 A4 22 A7 4A 30 B2 49 00 E7 19 44 |,1).".".J0.I...D|
000011D0: 08 82 3A 8B 4A 30 B3 4A 31 A7 4B 4B 24 B2 C8 28 |..:.J0.J1.KK$..(|
000011E0: 4B 4B 24 2C 4A 30 29 00 FE 19 48 08 8B C3 28 4B |KK$,J0)...H...(K|
000011F0: 4B 24 29 B1 4C 45 28 30 29 A7 32 31 30 30 00 11 |K$).LE(0).2100..|
00001200: 1A 52 08 8B C3 28 4B 4B 24 29 B2 30 A7 32 31 30 |.R...(KK$).0.210|
00001210: 30 00 35 1A 5C 08 8D 33 30 30 3A 8B 4B 45 A7 4D |0.5.\..300:.KE.M|
00001220: 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 3A 8D 32 |$.".".KE$.".":.2|
00001230: 38 30 30 3A 8E 00 68 1A 66 08 8B 4B 52 B2 30 A7 |800:..h.f..KR.0.|
00001240: 4D 24 B2 22 12 22 AA 4B 4B 24 AA 22 20 4E 49 43 |M$.".".KK$." NIC|
00001250: 48 54 20 56 4F 52 48 41 4E 44 45 4E 20 21 92 22 |HT VORHANDEN !."|
00001260: 3A 8D 32 38 30 30 3A 8E 00 8C 1A 70 08 8D 34 30 |:.2800:....p..40|
00001270: 30 3A 8B 4B 45 A7 4D 24 B2 22 12 22 AA 4B 45 24 |0:.KE.M$.".".KE$|
00001280: AA 22 92 22 3A 8D 32 38 30 30 3A 8E 00 92 1A 7A |.".":.2800:....z|
00001290: 08 8E 00 A5 1A 98 08 8F 20 4E 45 55 20 45 49 4E |........ NEU EIN|
000012A0: 47 45 42 45 4E 00 B4 1A A2 08 99 22 13 11 11 11 |GEBEN......"....|
000012B0: 11 11 11 22 00 CD 1A AC 08 99 A3 38 29 3B 3A 85 |...".......8);:.|
000012C0: 4B 4B 24 3A 4A 31 B2 C3 28 4B 4B 24 29 00 F4 1A |KK$:J1..(KK$)...|
000012D0: B1 08 4A 30 B2 4A 31 3A 81 49 B2 31 A4 4A 31 3A |..J0.J1:.I.1.J1:|
000012E0: 8B CA 28 4B 4B 24 2C 49 2C 31 29 B2 22 A4 22 A7 |..(KK$,I,1).".".|
000012F0: 4A 30 B2 49 00 0F 1B B2 08 82 3A 8B 4A 30 B3 4A |J0.I......:.J0.J|
00001300: 31 A7 4B 4B 24 B2 C8 28 4B 4B 24 2C 4A 30 29 00 |1.KK$..(KK$,J0).|
00001310: 26 1B B6 08 8B C3 28 4B 4B 24 29 B1 4C 45 28 30 |&.....(KK$).LE(0|
00001320: 29 A7 32 32 31 30 00 39 1B C0 08 8B C3 28 4B 4B |).2210.9.....(KK|
00001330: 24 29 B2 30 A7 32 32 31 30 00 67 1B CA 08 8D 33 |$).0.2210.g....3|
00001340: 30 30 3A 8B 4B 45 B3 B1 30 AF 4B 45 B3 B1 35 30 |00:.KE..0.KE..50|
00001350: A7 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 3A |.M$.".".KE$.".":|
00001360: 8D 32 38 30 30 3A 8E 00 9B 1B D4 08 8B 4B 52 B3 |.2800:.......KR.|
00001370: B1 30 A7 4D 24 B2 22 12 22 AA 4B 4B 24 AA 22 20 |.0.M$.".".KK$." |
00001380: 53 43 48 4F 4E 20 56 4F 52 48 41 4E 44 45 4E 20 |SCHON VORHANDEN |
00001390: 21 92 22 3A 8D 32 38 30 30 3A 8E 00 B4 1B DE 08 |!.":.2800:......|
000013A0: 4B 24 28 30 29 B2 4B 4B 24 3A 4B 4B 24 B2 22 2A |K$(0).KK$:KK$."*|
000013B0: 2A 2A 2A 22 00 D8 1B E8 08 8D 33 30 30 3A 8B 4B |***"......300:.K|
000013C0: 45 A7 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 |E.M$.".".KE$."."|
000013D0: 3A 8D 32 38 30 30 3A 8E 00 12 1C ED 08 8B 4B 52 |:.2800:.......KR|
000013E0: B2 30 AF 4B 4D B2 33 30 30 A7 4D 24 B2 22 12 4B |.0.KM.300.M$.".K|
000013F0: 45 49 4E 20 D3 50 45 49 43 48 45 52 50 4C 41 54 |EIN .PEICHERPLAT|
00001400: 5A 20 21 92 22 3A 8D 32 38 30 30 3A 4B 52 B2 30 |Z !.":.2800:KR.0|
00001410: 3A 8E 00 36 1C F2 08 8B 4B 52 B2 30 A7 53 34 B2 |:..6....KR.0.S4.|
00001420: 53 34 AA 31 3A 4B 4D B2 53 34 3A 4B 52 B2 53 34 |S4.1:KM.S4:KR.S4|
00001430: 3A 4B 54 B2 53 34 00 40 1C F4 08 8D 32 39 30 30 |:KT.S4.@....2900|
00001440: 00 69 1C F7 08 53 46 B2 31 3A 8D 35 30 30 3A 8B |.i...SF.1:.500:.|
00001450: 4B 45 A7 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 |KE.M$.".".KE$.".|
00001460: 22 3A 8D 32 38 30 30 3A 8E 00 6F 1C F8 08 8E 00 |":.2800:..o.....|
00001470: 7D 1C FC 08 8F 20 41 45 4E 44 45 52 4E 00 8C 1C |}.... AENDERN...|
00001480: 06 09 99 22 13 11 11 11 11 11 11 22 00 A5 1C 10 |..."......."....|
00001490: 09 99 A3 38 29 3B 3A 85 4B 4B 24 3A 4A 31 B2 C3 |...8);:.KK$:J1..|
000014A0: 28 4B 4B 24 29 00 CC 1C 15 09 4A 30 B2 4A 31 3A |(KK$).....J0.J1:|
000014B0: 81 49 B2 31 A4 4A 31 3A 8B CA 28 4B 4B 24 2C 49 |.I.1.J1:..(KK$,I|
000014C0: 2C 31 29 B2 22 A4 22 A7 4A 30 B2 49 00 E7 1C 16 |,1).".".J0.I....|
000014D0: 09 82 3A 8B 4A 30 B3 4A 31 A7 4B 4B 24 B2 C8 28 |..:.J0.J1.KK$..(|
000014E0: 4B 4B 24 2C 4A 30 29 00 FE 1C 1A 09 8B C3 28 4B |KK$,J0).......(K|
000014F0: 4B 24 29 B1 4C 45 28 30 29 A7 32 33 31 30 00 11 |K$).LE(0).2310..|
00001500: 1D 24 09 8B C3 28 4B 4B 24 29 B2 30 A7 32 33 31 |.$...(KK$).0.231|
00001510: 30 00 35 1D 2E 09 8D 33 30 30 3A 8B 4B 45 A7 4D |0.5....300:.KE.M|
00001520: 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 3A 8D 32 |$.".".KE$.".":.2|
00001530: 38 30 30 3A 8E 00 68 1D 38 09 8B 4B 52 B2 30 A7 |800:..h.8..KR.0.|
00001540: 4D 24 B2 22 12 22 AA 4B 4B 24 AA 22 20 4E 49 43 |M$.".".KK$." NIC|
00001550: 48 54 20 56 4F 52 48 41 4E 44 45 4E 20 21 92 22 |HT VORHANDEN !."|
00001560: 3A 8D 32 38 30 30 3A 8E 00 8C 1D 42 09 8D 34 30 |:.2800:....B..40|
00001570: 30 3A 8B 4B 45 A7 4D 24 B2 22 12 22 AA 4B 45 24 |0:.KE.M$.".".KE$|
00001580: AA 22 92 22 3A 8D 32 38 30 30 3A 8E 00 A1 1D 47 |.".":.2800:....G|
00001590: 09 8D 32 36 30 30 3A 46 30 B2 31 3A 8D 32 39 30 |..2600:F0.1:.290|
000015A0: 30 00 C5 1D 4C 09 8D 35 30 30 3A 8B 4B 45 A7 4D |0...L..500:.KE.M|
000015B0: 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 3A 8D 32 |$.".".KE$.".":.2|
000015C0: 38 30 30 3A 8E 00 CB 1D 56 09 8E 00 DA 1D 60 09 |800:....V.....`.|
000015D0: 8F 20 4C 4F 45 53 43 48 45 4E 00 E9 1D 6A 09 99 |. LOESCHEN...j..|
000015E0: 22 13 11 11 11 11 11 11 22 00 02 1E 74 09 99 A3 |"......."...t...|
000015F0: 38 29 3B 3A 85 4B 4B 24 3A 4A 31 B2 C3 28 4B 4B |8);:.KK$:J1..(KK|
00001600: 24 29 00 29 1E 79 09 4A 30 B2 4A 31 3A 81 49 B2 |$).).y.J0.J1:.I.|
00001610: 31 A4 4A 31 3A 8B CA 28 4B 4B 24 2C 49 2C 31 29 |1.J1:..(KK$,I,1)|
00001620: B2 22 A4 22 A7 4A 30 B2 49 00 44 1E 7A 09 82 3A |.".".J0.I.D.z..:|
00001630: 8B 4A 30 B3 4A 31 A7 4B 4B 24 B2 C8 28 4B 4B 24 |.J0.J1.KK$..(KK$|
00001640: 2C 4A 30 29 00 5B 1E 7E 09 8B C3 28 4B 4B 24 29 |,J0).[.~...(KK$)|
00001650: B1 4C 45 28 30 29 A7 32 34 31 30 00 6E 1E 88 09 |.LE(0).2410.n...|
00001660: 8B C3 28 4B 4B 24 29 B2 30 A7 32 34 31 30 00 92 |..(KK$).0.2410..|
00001670: 1E 92 09 8D 33 30 30 3A 8B 4B 45 A7 4D 24 B2 22 |....300:.KE.M$."|
00001680: 12 22 AA 4B 45 24 AA 22 92 22 3A 8D 32 38 30 30 |.".KE$.".":.2800|
00001690: 3A 8E 00 C5 1E 9C 09 8B 4B 52 B2 30 A7 4D 24 B2 |:.......KR.0.M$.|
000016A0: 22 12 22 AA 4B 4B 24 AA 22 20 4E 49 43 48 54 20 |".".KK$." NICHT |
000016B0: 56 4F 52 48 41 4E 44 45 4E 20 21 92 22 3A 8D 32 |VORHANDEN !.":.2|
000016C0: 38 30 30 3A 8E 00 E9 1E A6 09 4B 24 28 30 29 B2 |800:......K$(0).|
000016D0: 22 2A 2A 2A 2A 22 3A 81 49 B2 31 A4 4B 41 3A 4B |"****":.I.1.KA:K|
000016E0: 24 28 49 29 B2 22 22 3A 82 00 12 1F B0 09 53 46 |$(I)."":......SF|
000016F0: B2 31 3A 8D 35 30 30 3A 8B 4B 45 A7 4D 24 B2 22 |.1:.500:.KE.M$."|
00001700: 12 22 AA 4B 45 24 AA 22 92 22 3A 8D 32 38 30 30 |.".KE$.".":.2800|
00001710: 3A 8E 00 18 1F BA 09 8E 00 3A 1F C4 09 8F 20 50 |:........:.... P|
00001720: 52 49 4E 54 20 42 45 5A 45 49 43 48 4E 55 4E 47 |RINT BEZEICHNUNG|
00001730: 20 4F 4E 20 53 43 52 45 45 4E 00 49 1F C9 09 99 | ON SCREEN.I....|
00001740: 22 13 11 11 11 11 11 11 22 00 5F 1F CE 09 81 49 |"......."._....I|
00001750: B2 30 A4 4B 41 3A 99 42 45 24 28 49 29 3A 82 00 |.0.KA:.BE$(I):..|
00001760: 65 1F D8 09 8E 00 80 1F 28 0A 8F 20 50 52 49 4E |e.......(.. PRIN|
00001770: 54 20 44 41 54 41 20 4F 4E 20 53 43 52 45 45 4E |T DATA ON SCREEN|
00001780: 00 8F 1F 32 0A 99 22 13 11 11 11 11 11 11 22 00 |...2..".......".|
00001790: A2 1F 3C 0A 81 49 B2 30 A4 4B 41 3A 99 A3 31 30 |..<..I.0.KA:..10|
000017A0: 29 3B 00 BA 1F 46 0A 58 B2 C5 28 4B 24 28 49 29 |);...F.X..(K$(I)|
000017B0: 29 3A 58 24 B2 4B 24 28 49 29 00 CC 1F 4B 0A 8B |):X$.K$(I)...K..|
000017C0: 49 B2 37 B0 49 B2 38 A7 32 36 36 30 00 DE 1F 50 |I.7.I.8.2660...P|
000017D0: 0A 8B 4C 45 28 49 29 B2 36 A7 8D 32 35 30 00 F1 |..LE(I).6..250..|
000017E0: 1F 5A 0A 8B 4C 45 28 49 29 B2 31 31 A7 8D 32 30 |.Z..LE(I).11..20|
000017F0: 30 00 03 20 64 0A 99 22 12 22 58 24 22 92 22 3A |0.. d.."."X$".":|
00001800: 82 3A 8E 00 22 20 8C 0A 99 22 13 11 11 11 11 11 |.:.." ..."......|
00001810: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001820: 11 22 00 2C 20 8E 0A 51 24 B2 22 22 00 50 20 96 |."., ..Q$."".P .|
00001830: 0A 99 22 C5 49 4E 47 41 42 45 20 3F 20 20 20 20 |..".INGABE ? |
00001840: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001850: 00 70 20 A0 0A 85 22 91 C5 49 4E 47 41 42 45 20 |.p ..."..INGABE |
00001860: 22 3B 51 24 3A 8B 51 24 B2 22 22 89 32 37 32 30 |";Q$:.Q$."".2720|
00001870: 00 76 20 AA 0A 8E 00 94 20 F0 0A 99 22 13 11 11 |.v ..... ..."...|
00001880: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001890: 11 11 11 22 00 9D 20 FA 0A 99 2C 4D 24 00 A7 20 |...".. ...,M$.. |
000018A0: 04 0B 54 31 B2 54 49 00 BB 20 0E 0B 8B 54 49 AB |..T1.TI.. ...TI.|
000018B0: 54 31 B3 31 38 30 89 32 38 33 30 00 E7 20 18 0B |T1.180.2830.. ..|
000018C0: 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |.". |
000018D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018E0: 20 20 20 20 20 20 22 00 ED 20 22 0B 8E 00 05 21 | ".. "....!|
000018F0: 54 0B 8F 20 45 49 4E 47 41 42 45 20 44 45 52 20 |T.. EINGABE DER |
00001900: 44 41 54 45 4E 00 15 21 59 0B 99 22 13 11 11 11 |DATEN..!Y.."....|
00001910: 11 11 11 11 22 00 21 21 5E 0B 81 49 B2 31 A4 4B |....".!!^..I.1.K|
00001920: 41 00 4B 21 63 0B 99 A3 38 29 3B 22 20 20 20 20 |A.K!c...8);" |
00001930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001940: 20 20 20 20 20 20 20 20 20 20 22 00 70 21 64 0B | ".p!d.|
00001950: 99 22 91 22 42 45 24 28 49 29 3A 8B 46 30 B2 31 |."."BE$(I):.F0.1|
00001960: A7 99 22 91 22 3B A3 31 30 29 3B 4B 24 28 49 29 |..".";.10);K$(I)|
00001970: 00 81 21 65 0B 99 22 91 22 A3 38 29 3B 3A 85 58 |..!e..".".8);:.X|
00001980: 24 00 8D 21 68 0B 58 B2 C5 28 58 24 29 00 9F 21 |$..!h.X..(X$)..!|
00001990: 6D 0B 8B 49 B2 37 B0 49 B2 38 A7 32 39 36 30 00 |m..I.7.I.8.2960.|
000019A0: B1 21 72 0B 8B 4C 45 28 49 29 B2 36 A7 8D 32 35 |.!r..LE(I).6..25|
000019B0: 30 00 C4 21 7C 0B 8B 4C 45 28 49 29 B2 31 31 A7 |0..!|..LE(I).11.|
000019C0: 8D 32 30 30 00 E2 21 86 0B 8B 49 B2 36 A7 8B 58 |.200..!...I.6..X|
000019D0: B3 31 B0 58 B1 33 A7 99 22 91 91 22 3A 89 32 39 |.1.X.3.."..":.29|
000019E0: 31 35 00 FF 21 90 0B 8B C3 28 58 24 29 B1 4C 45 |15..!....(X$).LE|
000019F0: 28 49 29 A7 99 22 91 91 22 3A 89 32 39 31 35 00 |(I).."..":.2915.|
00001A00: 2E 22 95 0B 4A 31 B2 C3 28 58 24 29 3A 4A 30 B2 |."..J1..(X$):J0.|
00001A10: 4A 31 3A 81 4A B2 31 A4 4A 31 3A 8B CA 28 58 24 |J1:.J.1.J1:..(X$|
00001A20: 2C 4A 2C 31 29 B2 22 A4 22 A7 4A 30 B2 4A 00 47 |,J,1).".".J0.J.G|
00001A30: 22 96 0B 82 3A 8B 4A 30 B3 4A 31 A7 58 24 B2 C8 |"...:.J0.J1.X$..|
00001A40: 28 58 24 2C 4A 30 29 00 5D 22 9A 0B 4B 24 28 49 |(X$,J0).]"..K$(I|
00001A50: 29 B2 58 24 3A 82 3A 46 30 B2 30 3A 8E 00 73 22 |).X$:.:F0.0:..s"|
00001A60: B8 0B 8F 20 5A 55 47 41 4E 47 20 45 49 4E 47 45 |... ZUGANG EINGE|
00001A70: 42 45 4E 00 A5 22 C2 0B 99 22 93 B8 B8 B8 B8 B8 |BEN.."..."......|
00001A80: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001A90: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001AA0: B8 B8 B8 22 3B 00 D6 22 CC 0B 99 22 3E 3E 3E 3E |...";.."...">>>>|
00001AB0: 3E 3E 3E 3E 3E 3E 3E 3E 20 20 CC 41 47 45 52 2D |>>>>>>>> .AGER-|
00001AC0: DA 55 47 41 4E 47 20 20 3C 3C 3C 3C 3C 3C 3C 3C |.UGANG <<<<<<<<|
00001AD0: 3C 3C 3C 3C 22 3B 00 06 23 D6 0B 99 22 B9 B9 B9 |<<<<";..#..."...|
00001AE0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001AF0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001B00: B9 B9 B9 B9 B9 22 00 28 23 E0 0B 99 2C 22 DA 55 |.....".(#...,".U|
00001B10: 52 55 45 43 4B 20 5A 55 4D 20 CD 45 4E 55 45 20 |RUECK ZUM .ENUE |
00001B20: 4D 49 54 20 12 5F 92 22 00 37 23 EA 0B 99 22 13 |MIT ._.".7#...".|
00001B30: 11 11 11 11 11 11 22 00 4B 23 F4 0B 85 22 C4 41 |......".K#...".A|
00001B40: 54 55 4D 20 20 20 22 3B 44 41 24 00 5B 23 F9 0B |TUM ";DA$.[#..|
00001B50: 99 22 13 11 11 11 11 11 11 11 22 00 8C 23 FE 0B |."........"..#..|
00001B60: 85 22 CE 55 4D 4D 45 52 20 20 22 3B 4B 4B 24 3A |.".UMMER ";KK$:|
00001B70: 4B 4B 24 B2 C8 28 4B 4B 24 2C 34 29 3A 8B C8 28 |KK$..(KK$,4):..(|
00001B80: 4B 4B 24 2C 31 29 B2 22 5F 22 A7 8E 00 B4 23 FF |KK$,1)."_"....#.|
00001B90: 0B 8D 33 30 30 3A 8B 4B 45 A7 4D 24 B2 22 12 22 |..300:.KE.M$."."|
00001BA0: AA 4B 45 24 AA 22 92 22 3A 8D 32 38 30 30 3A 89 |.KE$.".":.2800:.|
00001BB0: 33 30 36 35 00 DC 23 00 0C 8D 34 30 30 3A 8B 4B |3065..#...400:.K|
00001BC0: 45 A7 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 |E.M$.".".KE$."."|
00001BD0: 3A 8D 32 38 30 30 3A 89 33 30 36 35 00 EC 23 01 |:.2800:.3065..#.|
00001BE0: 0C 99 A3 31 30 29 3B 4B 24 28 31 29 00 0F 24 02 |...10);K$(1)..$.|
00001BF0: 0C 85 22 CD 45 4E 47 45 20 20 20 22 3B 4D 45 24 |..".ENGE ";ME$|
00001C00: 3A 8B C5 28 4D 45 24 29 B2 30 A7 33 30 36 35 00 |:..(ME$).0.3065.|
00001C10: 42 24 03 0C 58 B2 C5 28 4B 24 28 32 29 29 AA C5 |B$..X..(K$(2))..|
00001C20: 28 4D 45 24 29 3A 8D 32 35 30 3A 4B 24 28 32 29 |(ME$):.250:K$(2)|
00001C30: B2 58 24 3A 4B 24 28 37 29 B2 C8 28 44 41 24 2C |.X$:K$(7)..(DA$,|
00001C40: 36 29 00 6A 24 04 0C 8D 35 30 30 3A 8B 4B 45 A7 |6).j$...500:.KE.|
00001C50: 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 3A 8D |M$.".".KE$.".":.|
00001C60: 32 38 30 30 3A 89 33 30 36 35 00 74 24 08 0C 89 |2800:.3065.t$...|
00001C70: 33 30 36 35 00 8A 24 A0 0F 8F 20 41 42 47 41 4E |3065..$... ABGAN|
00001C80: 47 20 45 49 4E 47 45 42 45 4E 00 BC 24 AA 0F 99 |G EINGEBEN..$...|
00001C90: 22 93 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |"...............|
00001CA0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001CB0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 3B 00 ED 24 B4 |..........";..$.|
00001CC0: 0F 99 22 3E 3E 3E 3E 3E 3E 3E 3E 3E 3E 3E 3E 20 |..">>>>>>>>>>>> |
00001CD0: 20 CC 41 47 45 52 2D C1 42 47 41 4E 47 20 20 3C | .AGER-.BGANG <|
00001CE0: 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 22 3B 00 1D 25 |<<<<<<<<<<<";..%|
00001CF0: BE 0F 99 22 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |..."............|
00001D00: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001D10: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 22 00 3F 25 |............".?%|
00001D20: C8 0F 99 2C 22 DA 55 52 55 45 43 4B 20 5A 55 4D |...,".URUECK ZUM|
00001D30: 20 CD 45 4E 55 45 20 4D 49 54 20 12 5F 92 22 00 | .ENUE MIT ._.".|
00001D40: 4E 25 D2 0F 99 22 13 11 11 11 11 11 11 22 00 62 |N%...".......".b|
00001D50: 25 DC 0F 85 22 C4 41 54 55 4D 20 20 20 22 3B 44 |%...".ATUM ";D|
00001D60: 41 24 00 72 25 E1 0F 99 22 13 11 11 11 11 11 11 |A$.r%...".......|
00001D70: 11 22 00 A3 25 E6 0F 85 22 CE 55 4D 4D 45 52 20 |."..%...".UMMER |
00001D80: 20 22 3B 4B 4B 24 3A 4B 4B 24 B2 C8 28 4B 4B 24 | ";KK$:KK$..(KK$|
00001D90: 2C 34 29 3A 8B C8 28 4B 4B 24 2C 31 29 B2 22 5F |,4):..(KK$,1)."_|
00001DA0: 22 A7 8E 00 CB 25 E7 0F 8D 33 30 30 3A 8B 4B 45 |"....%...300:.KE|
00001DB0: A7 4D 24 B2 22 12 22 AA 4B 45 24 AA 22 92 22 3A |.M$.".".KE$.".":|
00001DC0: 8D 32 38 30 30 3A 89 34 30 36 35 00 F3 25 E8 0F |.2800:.4065..%..|
00001DD0: 8D 34 30 30 3A 8B 4B 45 A7 4D 24 B2 22 12 22 AA |.400:.KE.M$.".".|
00001DE0: 4B 45 24 AA 22 92 22 3A 8D 32 38 30 30 3A 89 34 |KE$.".":.2800:.4|
00001DF0: 30 36 35 00 03 26 E9 0F 99 A3 31 30 29 3B 4B 24 |065..&....10);K$|
00001E00: 28 31 29 00 2C 26 EA 0F 85 22 CD 45 4E 47 45 20 |(1).,&...".ENGE |
00001E10: 20 20 22 3B 4D 45 24 3A 4D 45 B2 C5 28 4D 45 24 | ";ME$:ME..(ME$|
00001E20: 29 3A 8B 4D 45 B2 30 A7 34 30 36 35 00 56 26 EC |):.ME.0.4065.V&.|
00001E30: 0F 85 22 D2 41 42 41 54 54 20 20 22 3B 52 42 24 |..".ABATT ";RB$|
00001E40: 3A 52 42 B2 C5 28 52 42 24 29 3A 8B 52 42 B1 35 |:RB..(RB$):.RB.5|
00001E50: 30 A7 34 30 36 35 00 8C 26 F0 0F 58 B2 C5 28 4B |0.4065..&..X..(K|
00001E60: 24 28 31 30 29 29 AA C5 28 4B 24 28 35 29 29 AC |$(10))..(K$(5)).|
00001E70: 4D 45 AC 28 31 AB 52 42 AD 31 30 30 29 3A 8D 32 |ME.(1.RB.100):.2|
00001E80: 30 30 3A 4B 24 28 31 30 29 B2 58 24 00 AC 26 F2 |00:K$(10).X$..&.|
00001E90: 0F 58 B2 C5 28 4B 24 28 39 29 29 AA 4D 45 3A 8D |.X..(K$(9)).ME:.|
00001EA0: 32 35 30 3A 4B 24 28 39 29 B2 58 24 00 DB 26 F5 |250:K$(9).X$..&.|
00001EB0: 0F 58 B2 C5 28 4B 24 28 32 29 29 AB 4D 45 3A 8D |.X..(K$(2)).ME:.|
00001EC0: 32 35 30 3A 4B 24 28 32 29 B2 58 24 3A 4B 24 28 |250:K$(2).X$:K$(|
00001ED0: 38 29 B2 C8 28 44 41 24 2C 36 29 00 03 27 F6 0F |8)..(DA$,6)..'..|
00001EE0: 8D 35 30 30 3A 8B 4B 45 A7 4D 24 B2 22 12 22 AA |.500:.KE.M$.".".|
00001EF0: 4B 45 24 AA 22 92 22 3A 8D 32 38 30 30 3A 89 34 |KE$.".":.2800:.4|
00001F00: 30 36 35 00 0D 27 FA 0F 89 34 30 36 35 00 22 27 |065..'...4065."'|
00001F10: 88 13 8F 20 4C 49 53 54 45 4E 20 44 52 55 43 4B |... LISTEN DRUCK|
00001F20: 45 4E 00 54 27 92 13 99 22 93 B8 B8 B8 B8 B8 B8 |EN.T'...".......|
00001F30: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001F40: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001F50: B8 B8 22 3B 00 85 27 9C 13 99 22 3E 3E 3E 3E 3E |..";..'...">>>>>|
00001F60: 3E 3E 3E 3E 3E 20 CC 49 53 54 45 4E 20 41 55 53 |>>>>> .ISTEN AUS|
00001F70: 44 52 55 43 4B 45 4E 20 3C 3C 3C 3C 3C 3C 3C 3C |DRUCKEN <<<<<<<<|
00001F80: 3C 3C 3C 22 3B 00 B5 27 A6 13 99 22 B9 B9 B9 B9 |<<<";..'..."....|
00001F90: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001FA0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001FB0: B9 B9 B9 B9 22 00 D9 27 B0 13 99 2C 22 DA 55 52 |...."..'...,".UR|
00001FC0: 55 FF 43 4B FF 5A 55 4D 20 CD 45 4E 55 45 E0 5A |U.CK.ZUM .ENUE.Z|
00001FD0: DE ED FF FF FF FF FF FF 32 FF 07 FF 66 FF 7E 86 |........2...f.~.|
00001FE0: 00 C5 8B 0B 89 FF FB FF 2B 71 DF 31 7B FF B3 FF |........+q.1{...|
00001FF0: 22 E6 FF 4D FF FF 9F E2 32 A4 BE A4 FF 75 FF FF |"..M....2....u..|
00002000: 75 37 55 52 5D 46 FF FF DE FF 80 01 FF 4C 4E FF |u7UR]F.......LN.|
00002010: FF FF FF F6 36 37 03 FF 3B 61 E1 31 61 FF B3 FF |....67..;a.1a...|
00002020: FF FF EF FF FF 9D C8 FF 88 7C FF FF FF E7 FF FF |.........|......|
00002030: 17 FF FF FF FF FF 7C 52 3A 04 FF 37 FF FF FF FF |......|R:..7....|
00002040: 80 FF FF 7E 77 FF FF 2E FF FF FF FF FF 2A FF FF |...~w........*..|
00002050: 5A FF FF 26 FF FF 6F B7 FF 75 FF FF 31 FF 71 B5 |Z..&..o..u..1.q.|
00002060: B4 B3 FF FF FF E7 FF E9 69 FF FF 66 E7 FF FF A0 |........i..f....|
00002070: FF E5 88 8D FF A9 8F 10 30 3A FF 66 4E F0 C0 58 |........0:.fN..X|
00002080: 19 81 FF FF 7A FF FF D5 40 C1 0E FF FF C0 C8 81 |....z...@.......|
00002090: 06 FF FF FF FF FF FF 98 FF 00 FF AD FF FF FF FF |................|
000020A0: FF FF A7 39 7B 33 03 FF FF 7B 43 09 00 F7 FF FF |...9{3...{C.....|
000020B0: FF 38 F3 83 CE FF 65 0F 68 FF 64 4A 88 80 00 |.8....e.h.dJ... |
..'.... *******************************.
M.... * *.S.
... * ESV LAGERVERWALTUNG *...(.
. * *...2..
* VERSION:1.0 DATUM:83/06/15 *...<.. *
*...F.. * PR
OGRAMMIERER: L.FASCHALEK *.1.P.. *
*.W.Z.. ********
***********************.O.D..SF.0..15,8,
15,"U:".~.N..I.0.999:.. .S..SF.0.SF.1:."
0:SORT.C0XX",8,1...T..15,KE,KE$:.KE..KE$
:....X.KN$."LAGER":KL.104:KC.15:KD.2:KU.
8:DR.4.....KA.10:.A$(300),S(3)......600:
.KE..KE$:..9...KM.S4:. K$(KA),M(3),BE$(K
A),LE(KA).U. .M(1).S1:M(2).S2:M(3).S3.R.
...I.0.KA:. LE(I),BE$(I):......CR$.G(13)
......1000...G.. FORMAT REAL.I.H.X$.D(.(
100.X..5)):XS$.H(X$,1):X$.J(X$,2)...R..C
(X$).3.X$."0".X$:.210. ...X$.I("
".XS$.H(X$,C(X$).2).".".I(X$,2),11):.
.5.... FORMAT INTEGER.A...X$.D(.(X)):XS$
.H(X$,1):X$.I(X$,C(X$).1).~...X$.XS$.I("
00000".X$,5):....+.. FIND RECORD.G.,..KD
,KU,KD,KN$."KEY,L,".G(10):.KC,KE,KE$:.KE
..999:....6.K1%.1:K2%.KM:KZ.0...@..K1%.K
2%.KR.0:.390.%.E.KR..((K1%.K2%.1).2):KZ.
KZ.1:.KZ.11.KR.0:.390.?.F..KR.1.KR.KM.KR
.0:.390.J.J..KC,"P".G(KD).G(KR.255).G(KR
.256).G(0)...O..KC,KE,KE$:.KE..999:....T
..KD,K0$,KR$:.KC,KE,KE$:.KE..999:..O.^..
C(K0$).C(KK$).K0$.H(K0$,C(KK$))...H..K0$
.KK$.K2%.KR.1:.320...M..K0$.KK$.K1%.KR.1
:.320...R.. FOUND.%.|.KT.KR:KR.E(KR$).0.
...999:..B.... READ RECORD.X....KR.1.KR.
KM.KE.2:KE$.D(KR)." NICHT VORHANDEN !":.
......KD,KU,KD,KN$."DAT,L,".G(KL):.KC,KE
,KE$:.KE..999:..Z....KC,"P".G(KD).G(KR.2
55).G(KR.256).G(0)......KC,KE,KE$:.KE..9
99:.. ....K.0.KA:.KD,K$(K):.KC,KE,KE$:.K
E.K.KA.1.8....:.KC,KE,KE$:.999:..K.... W
RITE RECORD......KD,KU,KD,KN$."DAT,L,".G
(KL):.KC,KE,KE$:.KE..999:.......KC,"P".G
(KD).G(KR.255).G(KR.256).G(0).Q....KC,KE
,KE$:.KE..50.KE..0..999:......K$."":.K.0
.KA:K$.K$.K$(K).G(13):.:.KD,K$;:.KC,KE,K
E$......999:..-.W.. READ SYSTEM DATEN.H.
X..KD,KU,KD,"SYSDAT,U,R".B.]..KC,KE,KE$:
.KE..999:..V.B..KD,S0$,S1$,S2$...L..KD,S
3$,S4$,S5$,S6$,S7$,S8$,S9$,SA$,SB$...V..
KD,SC$,SD$,SE$.T....KD,S(1),S(2),S(3):.
MWST......KD,S4,S5:. LAGER,KUNDEN MAX...
...999:....... WRITE SYSTEM DATEN.7....K
D,KU,KD,"@0:SYSDAT,U,W".Q.A..KC,KE,KE$:.
KE..999:..R.F..KD,S0$;CR$;S1$;CR$;S2$;CR
$;.C.P..KD,S3$;CR$;S4$;CR$;S5$;CR$;S6$;C
R$;S7$;CR$;S8$;CR$;S9$;CR$;SA$;CR$;SB$;C
R$;...Z..KD,SC$;CR$;SD$;CR$;SE$;CR$;....
..KD,S(1);CR$;S(2);CR$;S(3);CR$;:. MWST.
9....KD,S4;CR$;S5;CR$;:. LAGER,KUNDEN MA
X.D....999:..[.... SORTIERE REKORDS... .
.803:.KE..0.KE..50.M$.".".KE$.".":.2800.
..!...D.#..KD,KU,KD,KN$."DAT,L,".G(KL):.
KC,KE,KE$:.KE..999:..Z.%.A$(0)."":.KR.1.
KM...*..KC,"P".G(KD).G(KR.255).G(KR.256)
.G(0).../..KC,KE,KE$:.KE..999:..A.4..KD,
K0$:.KC,KE,KE$:.KE..999:..H.>.A$(KR).K0$
.CR$.I(" ".D(KR),4):....H..I.KM.1.300
:A$(I).G(255):....M..999...R..(12.4096).
..W..KC,"I0"...\..KD,KU,KD,KN$."KEY,L,".
G(10):.KC,KE,KE$:.KE..999:....A..KR.1.KM
...F..KC,"P".G(KD).G(KR.255).G(KR.256).G
(0).?.K..KC,KE,KE$:.KE..0.KE..50..999:..
S.P..KD,A$(KR);CR$;:.KC,KE,KE$:.KE..0.KE
..50..999:....Z..:.999:M$.".DATEN SORTIE
RT !.":.2800:....... READ KEY(KT) => RET
URN KR......SF.SF.0:M$.".SORTIERE DATEN
!.":.2800:.800:.900.*....KD,KU,KD,KN$."K
EY,L,".G(10):.KC,KE,KE$:.KE..999:..V....
KC,"P".G(KD).G(KT .255).G(KT.256).G(0).P
....KC,KE,KE$:.KE..999:.......KD,K0$,KR$
:.KC,KE,KE$:.KE..999:.......999:KR.E(KR$
):.400:..H... KD: KC:.KC,KU,KC:....... L
AGER PROGRAMM START......G(14);G(8);".."
;.*...."................................
........";._....">>>.V1.0.>>> LAGERBEAR
BEITUNG <<.830615.<<";......"..........
.............................."......,"R
EKORDS...";:X.KM:.250:.X$.X....,"..DRUCK
ER BITTE AUSSCHALTEN !."......Q$:.Q$."".
1046......".","
"......:..:.$..,"1..ARTIKEL BEARBEITE
N".@.)...[....,"2..ZUGANG EINGEBEN".A.3.
..|.8..,"3..ABGANG EINGEBEN"...=.....B..
,"4..LISTEN AUSDRUCKEN"...G.....K..,"_..
MENUE AUFRUF".O.L..SF.SF.0:.800.Y.`..270
0...J.Q..(.(E(Q$))):.Q.4.1120...T..Q$."_
".9000.<.Y..Q.1.Q.4.M$.".ZAHL ZWISCHEN 0
UND 4.":.2800:.1000.W.~..Q.2000,3000,40
00,5000.B.... 1000...P.. ARTIKEL SUCHEN/
EINGEBEN ETC......Z.."..................
.......................";......"> ARTIKE
L: .S.UCHEN/.A.ENDERN/.N.EU/.L.OESCHEN <
";."...."...............................
.........".D....,"ZURUECK ZUM MENUE MIT
._.".T....2500:.2600.L....2700:.C(Q$).1.
2060......Q$."S"..2100:.2000......Q$."A"
..2300:.2000......Q$."N"..2200:.2000.B..
..Q$."_"...Z....Q$."L"..2400:.2000......
Q$.">".KT.KT.1:.900:.2000......Q$."<".KT
.KT.1:.900:.2000.G...M$.".S,A,N,L ODER 0
EINGEBEN.":.2800:.2060.V.4.."......."..
.9..SF.SF.0:M$.".SORTIERE DATEN !.":.280
0:.800:.2100...>...8);:.KK$:J1.C(KK$).L.
C.J0.J1:.I.1.J1:.J(KK$,I,1).".".J0.I...D
..:.J0.J1.KK$.H(KK$,J0)...H..C(KK$).LE(0
).2100...R..C(KK$).0.2100.5.\..300:.KE.M
$.".".KE$.".":.2800:..H.F..KR.0.M$.".".K
K$." NICHT VORHANDEN !.":.2800:....P..40
0:.KE.M$.".".KE$.".":.2800:....Z........
NEU EINGEBEN......".......".M.....8);:.
KK$:J1.C(KK$).....J0.J1:.I.1.J1:.J(KK$,I
,1).".".J0.I......:.J0.J1.KK$.H(KK$,J0).
&....C(KK$).LE(0).2210.9....C(KK$).0.221
0.G.J..300:.KE..0.KE..50.M$.".".KE$.".":
.2800:....T..KR..0.M$.".".KK$." SCHON VO
RHANDEN !.":.2800:......K$(0).KK$:KK$."*
***".X....300:.KE.M$.".".KE$.".":.2800:.
......KR.0.KM.300.M$.".KEIN SPEICHERPLAT
Z !.":.2800:KR.0:..6....KR.0.S4.S4.1:KM.
S4:KR.S4:KT.S4.@....2900.I...SF.1:.500:.
KE.M$.".".KE$.".":.2800:..O.....}.... AE
NDERN......".......".......8);:.KK$:J1.C
(KK$).L...J0.J1:.I.1.J1:.J(KK$,I,1).".".
J0.I......:.J0.J1.KK$.H(KK$,J0)......C(K
K$).LE(0).2310...$..C(KK$).0.2310.5....3
00:.KE.M$.".".KE$.".":.2800:..H.8..KR.0.
M$.".".KK$." NICHT VORHANDEN !.":.2800:.
...B..400:.KE.M$.".".KE$.".":.2800:....G
..2600:F0.1:.2900.E.L..500:.KE.M$.".".KE
$.".":.2800:..K.V...Z.`.. LOESCHEN...J..
"......."...T...8);:.KK$:J1.C(KK$).).Y.J
0.J1:.I.1.J1:.J(KK$,I,1).".".J0.I.D.Z..:
.J0.J1.KK$.H(KK$,J0).[.~..C(KK$).LE(0).2
410.N....C(KK$).0.2410......300:.KE.M$."
.".KE$.".":.2800:..E....KR.0.M$.".".KK$.
" NICHT VORHANDEN !.":.2800:......K$(0).
"****":.I.1.KA:K$(I)."":......SF.1:.500:
.KE.M$.".".KE$.".":.2800:........:.D.. P
RINT BEZEICHNUNG ON SCREEN.I.I..".......
"._.N..I.0.KA:.BE$(I):..E.X.....(.. PRIN
T DATA ON SCREEN...2.."......."...<..I.0
.KA:..10);...F.X.E(K$(I)):X$.K$(I).L.K..
I.7.I.8.2660...P..LE(I).6..250...Z..LE(I
).11..200.. D.."."X$".":.:.." ..."......
................."., ..Q$."".P ..."EINGA
BE ? ".P ..".EINGABE
";Q$:.Q$."".2720.V ..... ..."...........
...........".. ...,M$.. ..T1.TI.. ...TI.
T1.180.2830.. ...".
".. "....!T.. EINGABE DER
DATEN..!Y.."........".!!^..I.1.KA.K!C...
8);" ".P!D.
."."BE$(I):.F0.1..".";.10);K$(I)..!E..".
".8);:.X$..!H.X.E(X$)..!M..I.7.I.8.2960.
.!R..LE(I).6..250.D!|..LE(I).11..200..!.
..I.6..X.1.X.3.."..":.2915..!...C(X$).LE
(I).."..":.2915.."..J1.C(X$):J0.J1:.J.1.
J1:.J(X$,J,1).".".J0.J.G"...:.J0.J1.X$.H
(X$,J0).]"..K$(I).X$:.:F0.0:..S"... ZUGA
NG EINGEBEN.."B.."......................
...................";.V"L..">>>>>>>>>>>>
LAGER-ZUGANG <<<<<<<<<<<<";..#V.."...
.....................................".(
#...,"ZURUECK ZUM MENUE MIT ._.".7#...".
......".K#..."DATUM ";DA$.[#..."......
.."..#..."NUMMER ";KK$:KK$.H(KK$,4):.H(
KK$,1)."_"....#...300:.KE.M$.".".KE$."."
:.2800:.3065..#...400:.KE.M$.".".KE$."."
:.2800:.3065..#....10);K$(1)..$..."MENGE
";ME$:.E(ME$).0.3065.B$..X.E(K$(2)).E
(ME$):.250:K$(2).X$:K$(7).H(DA$,6).J$...
500:.KE.M$.".".KE$.".":.2800:.3065.T$...
3065..$ .. ABGANG EINGEBEN..$...".......
..................................";..$.
..">>>>>>>>>>>> LAGER-ABGANG <<<<<<<<<
<<<";..%..."............................
............".?%H..,"ZURUECK ZUM MENUE M
IT ._.".N%R..".......".B%..."DATUM ";D
A$.R%..."........"..%..."NUMMER ";KK$:K
K$.H(KK$,4):.H(KK$,1)."_"...K%...300:.KE
.M$.".".KE$.".":.2800:.4065..%...400:.KE
.M$.".".KE$.".":.2800:.4065..&....10);K$
(1).,&..."MENGE ";ME$:ME.E(ME$):.ME.0.
4065.V&..."RABATT ";RB$:RB.E(RB$):.RB.5
0.4065..&..X.E(K$(10)).E(K$(5)).ME.(1.RB
.100):.200:K$(10).X$..&..X.E(K$(9)).ME:.
250:K$(9).X$..&..X.E(K$(2)).ME:.250:K$(2
).X$:K$(8).H(DA$,6)..'...500:.KE.M$.".".
KE$.".":.2800:.4065..'...4065."'... LIST
EN DRUCKEN.T'...".......................
..................";..'...">>>>>>>>>> LI
STEN AUSDRUCKEN <<<<<<<<<<<";..'..."....
....................................".Y'
...,"ZURU.CK.ZUM MENUE.Z........2...F.~.
.E......+Q.1{..."..M....2....U..U7UR]F..
.....LN.....67..;A.1A.........H..|......
......|R:..7.......~W........*..Z..&..O.
.U..1.Q.........I..F... ........0:.FN..X
....Z..U@A....H....................9{3..
.{C......8..N.E.H.DJ...
> CLICK IMAGE PREVIEW FOR FULL MODAL