(W) UWE SCHWESIG
FILE INFORMATION
FILENAME(S): (W) UWE SCHWESIG
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-10-20 14:30:26
APPEARS ON: 1 disk(s)
FILE HASH
c1243f4be7c4828e3babd04a80cbd961b323347a5369beb74f4e560452c3812f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| INTEREST VERLAG | (W) UWE SCHWESIG | PRG | Treasure Chest - Klaus Der Suhler | 15 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 52 1C 00 00 8F 20 45 52 47 41 45 4E 5A 55 |..R.... ERGAENZU| 00000010: 4E 47 53 50 52 47 2E 20 5A 55 52 20 5A 45 4E 53 |NGSPRG. ZUR ZENS| 00000020: 55 52 45 4E 56 45 52 57 41 4C 54 55 4E 47 20 43 |URENVERWALTUNG C| 00000030: 2D 31 32 38 20 42 59 20 55 57 45 20 53 43 48 57 |-128 BY UWE SCHW| 00000040: 45 53 49 47 20 49 4E 20 4A 41 4E 55 41 52 59 20 |ESIG IN JANUARY | 00000050: 39 33 00 89 1C 01 00 FE 25 3A D9 3A FE 0F 3A 4E |93......%:.:..:N| 00000060: 52 B2 30 3A 9F 36 2C 38 2C 31 35 3A 9F 31 2C 38 |R.0:.6,8,15:.1,8| 00000070: 2C 33 2C 22 23 22 3A 98 36 2C 22 55 31 3A 33 22 |,3,"#":.6,"U1:3"| 00000080: 4E 52 22 2C 31 38 2C 30 22 00 DB 1C 02 00 98 36 |NR",18,0"......6| 00000090: 2C 22 42 2D 50 3A 33 2C 31 34 34 22 3A 56 24 B2 |,"B-P:3,144":V$.| 000000A0: 22 22 3A 81 49 B2 31 A4 31 36 3A A1 23 31 2C 4C |"":.I.1.16:.#1,L| 000000B0: 24 3A 56 24 B2 56 24 AA 4C 24 3A 82 49 3A FE 0F |$:V$.V$.L$:.I:..| 000000C0: 3A 8B 56 24 B3 B1 22 49 4E 54 45 52 45 53 54 2D |:.V$.."INTEREST-| 000000D0: 56 45 52 4C 41 47 21 22 A7 37 35 00 54 1D 03 00 |VERLAG!".75.T...| 000000E0: 49 56 B2 30 3A 9F 31 35 2C 38 2C 31 35 3A 9F 31 |IV.0:.15,8,15:.1| 000000F0: 2C 38 2C 33 2C 22 23 22 3A 98 31 35 2C 22 55 31 |,8,3,"#":.15,"U1| 00000100: 3A 33 22 49 56 22 2C 31 38 2C 30 22 3A 98 31 35 |:3"IV",18,0":.15| 00000110: 2C 22 42 2D 50 3A 33 2C 31 36 32 22 3A A1 23 31 |,"B-P:3,162":.#1| 00000120: 2C 41 24 2C 42 24 2C 43 24 2C 44 24 2C 45 24 3A |,A$,B$,C$,D$,E$:| 00000130: FE 0F 3A 51 24 B2 41 24 AA 42 24 AA 43 24 AA 44 |..:Q$.A$.B$.C$.D| 00000140: 24 AA 45 24 3A 8B 51 24 B3 B1 22 30 31 2E 39 33 |$.E$:.Q$.."01.93| 00000150: 22 A7 37 35 00 5C 1D 04 00 89 33 32 00 62 1D 05 |".75.\....32.b..| 00000160: 00 3A 00 6A 1D 06 00 D7 37 34 00 70 1D 07 00 3A |.:.j....74.p...:| 00000170: 00 97 1D 08 00 FE 0D 23 31 2C 22 5A 2D 31 32 38 |.......#1,"Z-128| 00000180: 2D 57 4F 52 4B 44 41 54 45 20 20 22 3A 84 31 2C |-WORKDATE ":.1,| 00000190: 44 32 24 3A A0 23 31 00 E6 1D 09 00 54 31 24 B2 |D2$:.#1.....T1$.| 000001A0: CA 28 44 32 24 2C 31 2C 32 29 3A 4D 31 24 B2 CA |.(D2$,1,2):M1$..| 000001B0: 28 44 32 24 2C 34 2C 32 29 3A 4A 31 24 B2 CA 28 |(D2$,4,2):J1$..(| 000001C0: 44 32 24 2C 37 2C 34 29 3A 54 31 B2 C5 28 54 31 |D2$,7,4):T1..(T1| 000001D0: 24 29 3A 4D 31 B2 C5 28 4D 31 24 29 3A 4A 31 B2 |$):M1..(M1$):J1.| 000001E0: C5 28 4A 31 24 29 00 F6 1D 0A 00 8B 44 41 24 B2 |.(J1$)......DA$.| 000001F0: 44 32 24 A7 32 32 00 03 1E 0B 00 8B 4A 31 B3 4A |D2$.22......J1.J| 00000200: A7 32 34 00 10 1E 0C 00 8B 4A B1 4A 31 A7 32 34 |.24......J.J1.24| 00000210: 00 1D 1E 0D 00 8B 4A B3 4A 31 A7 32 30 00 2A 1E |......J.J1.20.*.| 00000220: 0E 00 8B 4D 31 B3 4D A7 32 34 00 37 1E 0F 00 8B |...M1.M.24.7....| 00000230: 4D B1 4D 31 A7 32 34 00 44 1E 10 00 8B 4D B3 4D |M.M1.24.D....M.M| 00000240: 31 A7 32 30 00 51 1E 11 00 8B 54 31 B3 54 A7 32 |1.20.Q....T1.T.2| 00000250: 34 00 5E 1E 12 00 8B 54 B1 54 31 A7 32 34 00 6B |4.^....T.T1.24.k| 00000260: 1E 13 00 8B 54 B3 54 31 A7 32 30 00 B6 1E 14 00 |....T.T1.20.....| 00000270: 99 22 93 9F C4 41 54 55 4D 53 45 49 4E 54 52 41 |."...ATUMSEINTRA| 00000280: 47 20 41 55 46 20 C4 49 53 4B 3A 20 22 3B 3A 99 |G AUF .ISK: ";:.| 00000290: 44 32 24 3A 99 22 05 4A 45 54 5A 49 47 45 20 C4 |D2$:.".JETZIGE .| 000002A0: 41 54 55 4D 53 45 49 4E 47 41 42 45 20 3A 20 22 |ATUMSEINGABE : "| 000002B0: 3B 3A 99 44 41 24 00 F4 1E 15 00 99 22 11 11 11 |;:.DA$......"...| 000002C0: 9C C4 41 53 20 D0 52 4F 47 52 41 4D 4D 20 53 50 |..AS .ROGRAMM SP| 000002D0: 45 49 43 48 45 52 54 20 4E 55 52 20 45 49 4E 20 |EICHERT NUR EIN | 000002E0: 41 4B 54 55 45 4C 4C 45 52 45 53 20 C4 41 54 55 |AKTUELLERES .ATU| 000002F0: 4D 20 21 22 00 11 1F 16 00 FE 0B 32 3A 20 8A 22 |M !".......2: ."| 00000300: 57 52 49 54 54 45 4E 20 49 4E 20 20 31 39 39 31 |WRITTEN IN 1991| 00000310: 22 00 19 1F 17 00 8A 31 31 00 60 1F 18 00 99 22 |"......11.`...."| 00000320: 11 9F C4 41 54 55 4D 2E 2E 2E 2E 2E 2E 2E 3A 20 |...ATUM.......: | 00000330: 22 3B 3A 99 44 41 24 3A 99 22 C4 49 53 4B 2D C5 |";:.DA$:.".ISK-.| 00000340: 49 4E 54 52 41 47 3A 20 22 3B 3A 99 44 32 24 3A |INTRAG: ";:.D2$:| 00000350: 46 4C 41 47 24 B2 22 45 52 53 45 54 5A 45 4E 22 |FLAG$."ERSETZEN"| 00000360: 00 B4 1F 19 00 8B 46 4C 41 47 24 B2 22 45 52 53 |......FLAG$."ERS| 00000370: 45 54 5A 45 4E 22 A7 20 20 99 22 11 11 05 C4 41 |ETZEN". ."....A| 00000380: 53 20 41 4B 54 55 45 4C 4C 45 20 C4 41 54 55 4D |S AKTUELLE .ATUM| 00000390: 20 57 49 52 44 20 4A 45 54 5A 54 20 41 55 46 20 | WIRD JETZT AUF | 000003A0: C4 49 53 4B 45 54 54 45 20 56 45 52 4D 45 52 4B |.ISKETTE VERMERK| 000003B0: 54 20 21 22 00 E0 1F 1A 00 8B 46 4C 41 47 24 B2 |T !"......FLAG$.| 000003C0: 22 45 52 53 45 54 5A 45 4E 22 A7 20 20 F2 22 5A |"ERSETZEN". ."Z| 000003D0: 2D 31 32 38 2D 57 4F 52 4B 44 41 54 45 20 20 22 |-128-WORKDATE "| 000003E0: 00 1E 20 1B 00 FE 0D 23 31 2C 22 5A 2D 31 32 38 |.. ....#1,"Z-128| 000003F0: 2D 57 4F 52 4B 44 41 54 45 20 20 22 2C 57 3A 98 |-WORKDATE ",W:.| 00000400: 31 2C 44 41 24 3A A0 23 31 20 3A 8A 22 57 52 49 |1,DA$:.#1 :."WRI| 00000410: 54 54 45 4E 20 49 4E 20 20 31 39 39 31 22 00 24 |TTEN IN 1991".$| 00000420: 20 1C 00 3A 00 2A 20 1D 00 3A 00 32 20 1E 00 FE | ..:.* ..:.2 ...| 00000430: 0B 34 00 3A 20 1F 00 8A 32 32 00 67 20 20 00 8F |.4.: ...22.g ..| 00000440: 20 20 50 52 55 45 46 55 4E 47 20 44 45 53 20 44 | PRUEFUNG DES D| 00000450: 41 54 55 4D 53 20 41 55 46 20 45 49 4E 47 41 42 |ATUMS AUF EINGAB| 00000460: 45 46 45 48 4C 45 52 00 94 20 21 00 8F 20 20 28 |EFEHLER.. !.. (| 00000470: 57 29 20 49 4E 20 31 39 39 30 20 46 4F 52 20 43 |W) IN 1990 FOR C| 00000480: 20 31 32 38 20 42 59 20 55 57 45 20 53 43 48 57 | 128 BY UWE SCHW| 00000490: 45 53 49 47 00 CA 20 22 00 53 50 B2 34 30 3A 41 |ESIG.. ".SP.40:A| 000004A0: B2 33 30 3A 42 B2 33 31 3A 43 B2 32 39 3A E7 30 |.30:B.31:C.29:.0| 000004B0: 2C 31 3A E7 34 2C 31 3A 8B CE 09 28 32 29 B2 38 |,1:.4,1:...(2).8| 000004C0: 30 A7 53 50 B2 38 30 3A FE 25 00 54 21 23 00 99 |0.SP.80:.%.T!#..| 000004D0: C7 28 31 34 29 3A 99 22 C2 49 54 54 45 20 C4 41 |.(14):.".ITTE .A| 000004E0: 54 55 4D 20 49 4E 20 44 45 52 20 C6 4F 52 4D 22 |TUM IN DER .ORM"| 000004F0: 3A 99 22 D4 D4 2E CD CD 2E CA CA CA CA 20 45 49 |:.".......... EI| 00000500: 4E 47 45 42 45 4E 3A 22 3A 41 24 B2 22 22 3A 42 |NGEBEN:":A$."":B| 00000510: 24 B2 22 22 3A 43 24 B2 22 22 3A 44 24 B2 22 22 |$."":C$."":D$.""| 00000520: 3A 45 24 B2 22 22 3A 46 24 B2 22 22 3A 47 24 B2 |:E$."":F$."":G$.| 00000530: 22 22 3A 48 24 B2 22 22 3A 49 24 B2 22 22 3A 4B |"":H$."":I$."":K| 00000540: 24 B2 22 22 3A 44 41 24 B2 22 22 3A 46 4C 41 47 |$."":DA$."":FLAG| 00000550: 24 B2 22 22 00 8A 21 24 00 99 22 11 1C 12 CB 45 |$.""..!$.."....E| 00000560: 49 4E 45 20 C4 4F 50 50 45 4C 50 55 4E 4B 54 45 |INE .OPPELPUNKTE| 00000570: 20 55 4E 44 20 CB 4F 4D 4D 41 53 20 42 45 4E 55 | UND .OMMAS BENU| 00000580: 54 5A 45 4E 20 21 11 11 9E 22 00 A0 21 25 00 97 |TZEN !..."..!%..| 00000590: 32 31 2C 36 34 3A 85 44 41 24 3A 97 32 31 2C 30 |21,64:.DA$:.21,0| 000005A0: 00 A8 21 26 00 99 22 93 00 E7 21 27 00 48 B2 C3 |..!&.."...!'.H..| 000005B0: 28 44 41 24 29 3A 8B 48 B3 B1 31 30 A7 46 24 B2 |(DA$):.H..10.F$.| 000005C0: 22 C4 41 54 55 4D 20 42 49 54 54 45 20 31 30 2D |".ATUM BITTE 10-| 000005D0: 53 54 45 4C 4C 49 47 20 45 49 4E 47 45 42 45 4E |STELLIG EINGEBEN| 000005E0: 20 21 22 3A 89 36 33 00 3E 22 28 00 81 49 B2 31 | !":.63.>"(..I.1| 000005F0: A4 48 3A 42 55 24 B2 CA 28 44 41 24 2C 49 2C 31 |.H:BU$..(DA$,I,1| 00000600: 29 3A 8B 42 55 24 B1 C7 28 35 37 29 B0 42 55 24 |):.BU$..(57).BU$| 00000610: B3 C7 28 34 36 29 A7 46 24 B2 22 C6 41 4C 53 43 |..(46).F$.".ALSC| 00000620: 48 45 20 DA 45 49 43 48 45 4E 20 49 4D 20 C4 41 |HE .EICHEN IM .A| 00000630: 54 55 4D 20 21 22 3A 89 36 33 3A D5 82 49 00 8C |TUM !":.63:..I..| 00000640: 22 29 00 55 24 B2 CA 28 44 41 24 2C 33 2C 31 29 |").U$..(DA$,3,1)| 00000650: 3A 8B 55 24 B2 22 2E 22 B0 55 24 B2 22 2F 22 A7 |:.U$.".".U$."/".| 00000660: 34 32 3A D5 46 24 B2 22 C6 41 4C 53 43 48 45 20 |42:.F$.".ALSCHE | 00000670: DA 45 49 43 48 45 4E 46 4F 4C 47 45 20 49 4D 20 |.EICHENFOLGE IM | 00000680: C4 41 54 55 4D 20 21 22 3A 89 36 33 00 DA 22 2A |.ATUM !":.63.."*| 00000690: 00 57 24 B2 CA 28 44 41 24 2C 36 2C 31 29 3A 8B |.W$..(DA$,6,1):.| 000006A0: 57 24 B2 22 2E 22 B0 57 24 B2 22 2F 22 A7 34 33 |W$.".".W$."/".43| 000006B0: 3A D5 46 24 B2 22 C6 41 4C 53 43 48 45 20 DA 45 |:.F$.".ALSCHE .E| 000006C0: 49 43 48 45 4E 46 4F 4C 47 45 20 49 4D 20 C4 41 |ICHENFOLGE IM .A| 000006D0: 54 55 4D 20 21 22 3A 89 36 33 00 20 23 2B 00 54 |TUM !":.63. #+.T| 000006E0: 24 B2 CA 28 44 41 24 2C 31 2C 32 29 3A 4D 24 B2 |$..(DA$,1,2):M$.| 000006F0: CA 28 44 41 24 2C 34 2C 32 29 3A 4A 24 B2 CA 28 |.(DA$,4,2):J$..(| 00000700: 44 41 24 2C 37 2C 34 29 3A 54 B2 C5 28 54 24 29 |DA$,7,4):T..(T$)| 00000710: 3A 4D B2 C5 28 4D 24 29 3A 4A B2 C5 28 4A 24 29 |:M..(M$):J..(J$)| 00000720: 00 39 23 2C 00 8B 4A B3 31 35 38 33 A7 46 4C 41 |.9#,..J.1583.FLA| 00000730: 47 24 B2 22 31 35 38 32 22 00 9D 23 2D 00 8B 46 |G$."1582"..#-..F| 00000740: 4C 41 47 24 B2 22 31 35 38 32 22 AF 4D B3 31 30 |LAG$."1582".M.10| 00000750: A7 4A 41 24 B2 22 C4 45 52 20 C7 52 45 47 4F 52 |.JA$.".ER .REGOR| 00000760: 49 41 4E 49 53 43 48 45 20 CB 41 4C 45 4E 44 45 |IANISCHE .ALENDE| 00000770: 52 20 47 49 4C 54 20 45 52 53 54 22 AA C7 28 31 |R GILT ERST"..(1| 00000780: 33 29 AA 22 11 53 45 49 54 20 CF 4B 54 4F 42 45 |3).".SEIT .KTOBE| 00000790: 52 20 31 35 38 32 20 21 22 3A 89 36 33 00 D2 23 |R 1582 !":.63..#| 000007A0: 2E 00 46 31 24 B2 22 20 4B 41 4E 4E 20 4D 41 58 |..F1$." KANN MAX| 000007B0: 2E 20 22 3A 46 32 24 B2 22 20 D4 41 47 45 20 48 |. ":F2$." .AGE H| 000007C0: 41 42 45 4E 20 21 22 3A 46 33 24 B2 22 C4 45 52 |ABEN !":F3$.".ER| 000007D0: 20 22 00 FB 23 2F 00 8B 54 B1 42 A7 41 24 B2 22 | "..#/..T.B.A$."| 000007E0: C5 49 4E 20 CD 4F 4E 41 54 22 AA 46 31 24 AA 22 |.IN .ONAT".F1$."| 000007F0: 33 31 22 AA 46 32 24 3A 89 36 33 00 2E 24 30 00 |31".F2$:.63..$0.| 00000800: 8B 54 B1 43 AF 4D 24 B2 22 30 32 22 A7 42 24 B2 |.T.C.M$."02".B$.| 00000810: 46 33 24 AA 22 C6 45 42 52 55 41 52 22 AA 46 31 |F3$.".EBRUAR".F1| 00000820: 24 AA 22 32 39 22 AA 46 32 24 3A 89 36 33 00 5F |$."29".F2$:.63._| 00000830: 24 31 00 8B 54 B1 41 AF 4D 24 B2 22 30 34 22 A7 |$1..T.A.M$."04".| 00000840: 43 24 B2 46 33 24 AA 22 C1 50 52 49 4C 22 AA 46 |C$.F3$.".PRIL".F| 00000850: 31 24 AA 22 33 30 22 AA 46 32 24 3A 89 36 33 00 |1$."30".F2$:.63.| 00000860: 8F 24 32 00 8B 54 B1 41 AF 4D 24 B2 22 30 36 22 |.$2..T.A.M$."06"| 00000870: A7 44 24 B2 46 33 24 AA 22 CA 55 4E 49 22 AA 46 |.D$.F3$.".UNI".F| 00000880: 31 24 AA 22 33 30 22 AA 46 32 24 3A 89 36 33 00 |1$."30".F2$:.63.| 00000890: C4 24 33 00 8B 54 B1 41 AF 4D 24 B2 22 30 39 22 |.$3..T.A.M$."09"| 000008A0: A7 45 24 B2 46 33 24 AA 22 D3 45 50 54 45 4D 42 |.E$.F3$.".EPTEMB| 000008B0: 45 52 22 AA 46 31 24 AA 22 33 30 22 AA 46 32 24 |ER".F1$."30".F2$| 000008C0: 3A 89 36 33 00 F8 24 34 00 8B 54 B1 41 AF 4D 24 |:.63..$4..T.A.M$| 000008D0: B2 22 31 31 22 A7 46 24 B2 46 33 24 AA 22 CE 4F |."11".F$.F3$.".O| 000008E0: 56 45 4D 42 45 52 22 AA 46 31 24 AA 22 33 30 22 |VEMBER".F1$."30"| 000008F0: AA 46 32 24 3A 89 36 33 00 0C 25 35 00 8B 4D 24 |.F2$:.63..%5..M$| 00000900: B2 22 30 32 22 AF 54 B2 43 A7 35 35 00 14 25 36 |."02".T.C.55..%6| 00000910: 00 89 35 37 00 51 25 37 00 8B 4A AD 34 B3 B1 B5 |..57.Q%7..J.4...| 00000920: 28 4A AD 34 29 A7 35 36 3A D5 8B 4A AD 31 30 30 |(J.4).56:..J.100| 00000930: B3 B1 B5 28 4A AD 31 30 30 29 A7 35 39 3A D5 8B |...(J.100).59:..| 00000940: 4A AD 34 30 30 B2 B5 28 4A AD 34 30 30 29 A7 35 |J.400..(J.400).5| 00000950: 39 00 78 25 38 00 47 24 B2 4A 24 AA 22 20 49 53 |9.x%8.G$.J$." IS| 00000960: 54 20 4B 45 49 4E 20 D3 43 48 41 4C 54 4A 41 48 |T KEIN .CHALTJAH| 00000970: 52 20 21 22 3A 89 36 33 00 BF 25 39 00 8B 54 B3 |R !":.63..%9..T.| 00000980: 31 A7 49 24 B2 22 C5 53 20 47 49 42 54 20 4B 45 |1.I$.".S GIBT KE| 00000990: 49 4E 45 4E 20 22 AA 54 24 AA 22 2E 20 D4 41 47 |INEN ".T$.". .AG| 000009A0: 20 45 49 4E 45 53 20 CD 4F 4E 41 54 53 20 21 22 | EINES .ONATS !"| 000009B0: 3A 52 24 B2 22 4D 4F 4E 41 54 22 3A 89 35 38 00 |:R$."MONAT":.58.| 000009C0: 19 26 3A 00 8B 53 50 B2 34 30 A7 8B 4D B3 31 B0 |.&:..SP.40..M.1.| 000009D0: 4D B1 31 32 A7 48 24 B2 22 C5 53 20 47 49 42 54 |M.12.H$.".S GIBT| 000009E0: 20 49 4E 20 55 4E 53 45 52 45 4D 20 CB 41 4C 45 | IN UNSEREM .ALE| 000009F0: 4E 44 45 52 20 4B 45 49 4E 45 4E 20 20 20 20 20 |NDER KEINEN | 00000A00: 20 22 3A 48 31 24 B2 4D 24 AA 22 2E 20 CD 4F 4E | ":H1$.M$.". .ON| 00000A10: 41 54 20 21 22 3A 89 36 33 00 6E 26 3B 00 8B 53 |AT !":.63.n&;..S| 00000A20: 50 B2 38 30 A7 8B 4D B3 31 B0 4D B1 31 32 A7 48 |P.80..M.1.M.12.H| 00000A30: 24 B2 22 C5 53 20 47 49 42 54 20 49 4E 20 55 4E |$.".S GIBT IN UN| 00000A40: 53 45 52 45 4D 20 CB 41 4C 45 4E 44 45 52 20 4B |SEREM .ALENDER K| 00000A50: 45 49 4E 45 4E 20 22 3A 48 31 24 B2 4D 24 AA 22 |EINEN ":H1$.M$."| 00000A60: 2E 20 CD 4F 4E 41 54 20 21 22 3A 89 36 33 00 92 |. .ONAT !":.63..| 00000A70: 26 3C 00 8B 52 31 24 B2 22 4D 4F 4E 41 54 22 A7 |&<..R1$."MONAT".| 00000A80: 36 33 3A D5 8B 52 32 24 B2 22 4A 41 48 52 22 A7 |63:..R2$."JAHR".| 00000A90: 36 33 00 AB 26 3D 00 44 41 24 B2 54 24 AA 22 2E |63..&=.DA$.T$.".| 00000AA0: 22 AA 4D 24 AA 22 2E 22 AA 4A 24 00 B2 26 3E 00 |".M$.".".J$..&>.| 00000AB0: 89 35 00 F5 26 3F 00 E8 3A 99 22 1C C4 49 45 20 |.5..&?..:."..IE | 00000AC0: C5 49 4E 47 41 42 45 20 3D 3E 20 1F 22 AA 44 41 |.INGABE => .".DA| 00000AD0: 24 AA 22 1C 20 3C 3D 20 57 41 52 20 46 41 4C 53 |$.". <= WAR FALS| 00000AE0: 43 48 3A 05 22 3A 99 3A 8B 4A 41 24 B3 B1 22 22 |CH:.":.:.JA$..""| 00000AF0: A7 99 4A 41 24 00 05 27 40 00 8B 41 24 B3 B1 22 |..JA$..'@..A$.."| 00000B00: 22 A7 99 41 24 00 15 27 41 00 8B 42 24 B3 B1 22 |"..A$..'A..B$.."| 00000B10: 22 A7 99 42 24 00 25 27 42 00 8B 43 24 B3 B1 22 |"..B$.%'B..C$.."| 00000B20: 22 A7 99 43 24 00 35 27 43 00 8B 44 24 B3 B1 22 |"..C$.5'C..D$.."| 00000B30: 22 A7 99 44 24 00 45 27 44 00 8B 45 24 B3 B1 22 |"..D$.E'D..E$.."| 00000B40: 22 A7 99 45 24 00 55 27 45 00 8B 46 24 B3 B1 22 |"..E$.U'E..F$.."| 00000B50: 22 A7 99 46 24 00 65 27 46 00 8B 47 24 B3 B1 22 |"..F$.e'F..G$.."| 00000B60: 22 A7 99 47 24 00 86 27 47 00 8B 48 24 B3 B1 22 |"..G$..'G..H$.."| 00000B70: 22 A7 99 48 24 AA 48 31 24 3A D5 8B 49 24 B3 B1 |"..H$.H1$:..I$..| 00000B80: 22 22 A7 99 49 24 00 C4 27 48 00 E0 31 2C 30 2C |""..I$..'H..1,0,| 00000B90: 32 33 2C 22 9E 20 D7 C5 C9 D4 C5 D2 A0 CD C9 D4 |23,". ..........| 00000BA0: A0 D4 C1 D3 D4 C5 CE C4 D2 D5 C3 CB 20 22 2C 31 |............ ",1| 00000BB0: 3A 9E 35 31 36 30 32 3A A1 F9 59 24 3A E8 3A 20 |:.51602:..Y$:.: | 00000BC0: 20 8A 33 34 00 01 28 49 00 8F 20 44 41 53 20 44 | .34..(I.. DAS D| 00000BD0: 41 54 55 4D 20 49 53 54 20 4A 45 54 5A 54 20 49 |ATUM IST JETZT I| 00000BE0: 4E 20 44 45 52 20 56 41 52 49 41 42 4C 45 4E 20 |N DER VARIABLEN | 00000BF0: 44 41 24 20 47 45 53 50 45 49 43 48 45 52 54 20 |DA$ GESPEICHERT | 00000C00: 21 00 0B 28 4A 00 FE 0F 3A D6 82 00 49 28 4B 00 |!..(J...:...I(K.| 00000C10: 99 C7 28 31 34 29 3A 99 22 93 9E 12 20 C6 C1 CC |..(14):."... ...| 00000C20: D3 C3 C8 C5 A0 A0 C4 C9 D3 CB C5 D4 D4 C5 A0 A0 |................| 00000C30: C9 CD A0 A0 CC C1 D5 C6 D7 C5 D2 CB A0 A0 21 21 |..............!!| 00000C40: A0 92 11 11 11 11 11 9F 22 00 BB 28 4C 00 99 22 |........"..(L.."| 00000C50: C2 49 54 54 45 20 44 49 45 20 C9 CE D4 C5 D2 C5 |.ITTE DIE ......| 00000C60: D3 D4 2D DA 45 4E 53 55 52 45 4E 56 45 52 57 41 |..-.ENSURENVERWA| 00000C70: 4C 54 55 4E 47 53 44 49 53 4B 45 54 54 45 20 49 |LTUNGSDISKETTE I| 00000C80: 4E 27 53 20 CC 41 55 46 57 45 52 4B 20 4C 45 47 |N'S .AUFWERK LEG| 00000C90: 45 4E 20 21 11 11 11 22 3A 99 22 98 0F 12 20 D4 |EN !...":."... .| 00000CA0: A0 C1 A0 D3 A0 D4 A0 C5 20 92 22 3A 9E 35 31 36 |........ .":.516| 00000CB0: 30 32 3A A1 F9 59 24 3A E8 3A 8A 00 00 00 |02:..Y$:.:.... |
..R.... ERGAENZUNGSPRG. ZUR ZENSURENVERW ALTUNG C-128 BY UWE SCHWESIG IN JANUARY 93......%:Y:..:NR.0:.6,8,15:.1,8,3,"#":. 6,"U1:3"NR",18,0"......6,"B-P:3,144":V$. "":.I.1.16:.#1,L$:V$.V$.L$:.I:..:.V$.."I NTEREST-VERLAG!".75.T...IV.0:.15,8,15:.1 ,8,3,"#":.15,"U1:3"IV",18,0":.15,"B-P:3, 162":.#1,A$,B$,C$,D$,E$:..:Q$.A$.B$.C$.D $.E$:.Q$.."01.93".75.\....32.B...:.J...W 74.P...:.......#1,"Z-128-WORKDATE ":.1, D2$: #1.....T1$.J(D2$,1,2):M1$.J(D2$,4,2 ):J1$.J(D2$,7,4):T1.E(T1$):M1.E(M1$):J1. E(J1$)......DA$.D2$.22......J1.J.24..... .J.J1.24......J.J1.20.*....M1.M.24.7.... M.M1.24.D....M.M1.20.Q....T1.T.24.^....T .T1.24.K....T.T1.20......"..DATUMSEINTRA G AUF DISK: ";:.D2$:.".JETZIGE DATUMSEIN GABE : ";:.DA$......"....DAS PROGRAMM SP EICHERT NUR EIN AKTUELLERES DATUM !".... ...2: ."WRITTEN IN 1991"......11.`...." ..DATUM.......: ";:.DA$:."DISK-EINTRAG: ";:.D2$:FLAG$."ERSETZEN"......FLAG$."ERS ETZEN". ."...DAS AKTUELLE DATUM WIRD JE TZT AUF DISKETTE VERMERKT !"......FLAG$. "ERSETZEN". ."Z-128-WORKDATE ".. ....# 1,"Z-128-WORKDATE ",W:.1,DA$: #1 :."WRI TTEN IN 1991".$ ..:.* ..:.2 ....4.: ... 22.G .. PRUEFUNG DES DATUMS AUF EINGAB EFEHLER.. !.. (W) IN 1990 FOR C 128 BY UWE SCHWESIG.J ".SP.40:A.30:B.31:C.29:.0 ,1:.4,1:.N.(2).80.SP.80:.%.T!#..G(14):." BITTE DATUM IN DER FORM":."TT.MM.JJJJ EI NGEBEN:":A$."":B$."":C$."":D$."":E$."":F $."":G$."":H$."":I$."":K$."":DA$."":FLAG $.""..!$.."...KEINE DOPPELPUNKTE UND KOM MAS BENUTZEN !...". !%..21,64:.DA$:.21,0 ..!&.."...!'.H.C(DA$):.H..10.F$."DATUM B ITTE 10-STELLIG EINGEBEN !":.63.>"(..I.1 .H:BU$.J(DA$,I,1):.BU$.G(57).BU$.G(46).F $."FALSCHE ZEICHEN IM DATUM !":.63:U.I.. ").U$.J(DA$,3,1):.U$.".".U$."/".42:UF$." FALSCHE ZEICHENFOLGE IM DATUM !":.63.Z"* .W$.J(DA$,6,1):.W$.".".W$."/".43:UF$."FA LSCHE ZEICHENFOLGE IM DATUM !":.63. #+.T $.J(DA$,1,2):M$.J(DA$,4,2):J$.J(DA$,7,4) :T.E(T$):M.E(M$):J.E(J$).9#,..J.1583.FLA G$."1582"..#-..FLAG$."1582".M.10.JA$."DE R GREGORIANISCHE KALENDER GILT ERST".G(1 3).".SEIT OKTOBER 1582 !":.63.R#..F1$." KANN MAX. ":F2$." TAGE HABEN !":F3$."DER "..#/..T.B.A$."EIN MONAT".F1$."31".F2$: .63..$0..T.C.M$."02".B$.F3$."FEBRUAR".F1 $."29".F2$:.63._$1..T.A.M$."04".C$.F3$." APRIL".F1$."30".F2$:.63..$2..T.A.M$."06" .D$.F3$."JUNI".F1$."30".F2$:.63.D$3..T.A .M$."09".E$.F3$."SEPTEMBER".F1$."30".F2$ :.63..$4..T.A.M$."11".F$.F3$."NOVEMBER". F1$."30".F2$:.63..%5..M$."02".T.C.55..%6 ..57.Q%7..J.4...(J.4).56:U.J.100...(J.10 0).59:U.J.400..(J.400).59.X%8.G$.J$." IS T KEIN SCHALTJAHR !":.63..%9..T.1.I$."ES GIBT KEINEN ".T$.". TAG EINES MONATS !" :R$."MONAT":.58..&:..SP.40..M.1.M.12.H$. "ES GIBT IN UNSEREM KALENDER KEINEN ":H1$.M$.". MONAT !":.63.N&;..SP.80..M. 1.M.12.H$."ES GIBT IN UNSEREM KALENDER K EINEN ":H1$.M$.". MONAT !":.63..&<..R1$. "MONAT".63:U.R2$."JAHR".63..&=.DA$.T$.". ".M$.".".J$..&>..5..&?..:.".DIE EINGABE => .".DA$.". <= WAR FALSCH:.":.:.JA$.."" ..JA$..'@..A$..""..A$..'A..B$..""..B$.%' B..C$..""..C$.5'C..D$..""..D$.E'D..E$.." "..E$.U'E..F$..""..F$.E'F..G$..""..G$..' G..H$..""..H$.H1$:U.I$..""..I$.D'H..1,0, 23,". WEITER MIT TASTENDRUCK ",1:.51602: ..Y$:.: .34..(I.. DAS DATUM IST JETZT I N DER VARIABLEN DA$ GESPEICHERT !..(J... :V..I(K..G(14):."... FALSCHE DISKETTE IM LAUFWERK !! ......."..(L.."BITTE DI E INTEREST-ZENSURENVERWALTUNGSDISKETTE I N'S LAUFWERK LEGEN !...":."... T A S T E .":.51602:..Y$:.:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL