> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 10 27 8F 20 52 45 50 4F 52 54 47 45 |.....'. REPORTGE|
00000010: 4E 45 52 41 54 4F 52 00 25 08 74 27 41 B2 B8 28 |NERATOR.%.t'A..(|
00000020: 30 29 3A 20 9C 00 43 08 D8 27 86 20 54 49 24 28 |0): ..C..'. TI$(|
00000030: 39 39 29 2C 46 45 24 28 39 39 29 2C 54 45 24 28 |99),FE$(99),TE$(|
00000040: 39 39 29 00 61 08 3C 28 97 20 35 33 32 37 32 2C |99).a.<(. 53272,|
00000050: 32 33 3A 20 8F 20 47 52 4F 53 53 2F 4B 4C 45 49 |23: . GROSS/KLEI|
00000060: 4E 00 7F 08 A0 28 97 20 35 33 32 38 30 2C 31 34 |N....(. 53280,14|
00000070: 3A 20 8F 20 52 41 48 4D 45 4E 46 41 52 42 45 00 |: . RAHMENFARBE.|
00000080: 9D 08 04 29 97 20 35 33 32 38 31 2C 31 34 3A 20 |...). 53281,14: |
00000090: 8F 20 48 49 4E 54 45 52 47 52 55 4E 44 00 B5 08 |. HINTERGRUND...|
000000A0: 68 29 99 20 C7 28 33 31 29 3B 3A 20 8F 20 53 43 |h). .(31);: . SC|
000000B0: 48 52 49 46 54 00 C3 08 CC 29 99 20 C7 28 31 34 |HRIFT....). .(14|
000000C0: 37 29 3B 00 FA 08 30 2A 99 20 22 2A 2A 2A 20 20 |7);...0*. "*** |
000000D0: 20 20 20 20 20 20 20 D2 45 50 4F 52 54 47 45 4E | .EPORTGEN|
000000E0: 45 52 41 54 4F 52 20 20 20 20 20 20 20 20 20 20 |ERATOR |
000000F0: 2A 2A 2A 22 3A 20 99 3A 20 99 00 22 09 94 2A 99 |***": .: .."..*.|
00000100: 20 22 2D 3E 20 C8 45 55 54 49 47 45 53 20 C4 41 | "-> .EUTIGES .A|
00000110: 54 55 4D 20 28 D4 D4 2E CD CD 2E CA CA 29 20 3A |TUM (........) :|
00000120: 22 3B 00 2C 09 F8 2A 85 20 44 41 24 00 3A 09 5C |";.,..*. DA$.:.\|
00000130: 2B 99 20 C7 28 31 34 37 29 3B 00 71 09 C0 2B 99 |+. .(147);.q..+.|
00000140: 20 22 2A 2A 2A 20 20 20 20 20 20 20 20 20 D2 45 | "*** .E|
00000150: 50 4F 52 54 47 45 4E 45 52 41 54 4F 52 20 20 20 |PORTGENERATOR |
00000160: 20 20 20 20 20 20 20 2A 2A 2A 22 3A 20 99 3A 20 | ***": .: |
00000170: 99 00 8E 09 24 2C 99 20 22 2D 3E 20 CE 41 4D 45 |....$,. "-> .AME|
00000180: 20 44 45 52 20 C4 41 54 45 49 20 3A 22 3B 00 9B | DER .ATEI :";..|
00000190: 09 88 2C 85 20 44 4E 24 3A 20 99 00 B0 09 EC 2C |..,. DN$: .....,|
000001A0: 8B 20 44 4E 24 B2 22 22 20 A7 20 31 36 38 30 30 |. DN$."" . 16800|
000001B0: 00 BE 09 50 2D 9F 20 31 35 2C 38 2C 31 35 00 DA |...P-. 15,8,15..|
000001C0: 09 B4 2D 9F 20 38 2C 38 2C 30 2C 22 30 3A 22 AA |..-. 8,8,0,"0:".|
000001D0: 44 4E 24 AA 22 2C 53 2C 52 22 00 E6 09 18 2E 9F |DN$.",S,R"......|
000001E0: 20 34 2C 34 2C 37 00 F2 09 7C 2E 8D 20 31 37 33 | 4,4,7...|.. 173|
000001F0: 30 30 00 12 0A E0 2E 99 20 22 2D 3E A0 C1 4E 5A |00...... "->..NZ|
00000200: 41 48 4C 20 44 45 52 20 C6 45 4C 44 45 52 20 3A |AHL DER .ELDER :|
00000210: 22 3B 00 1F 0A 44 2F 85 20 41 46 24 3A 20 99 00 |";...D/. AF$: ..|
00000220: 42 0A A8 2F 8B 20 C5 28 41 46 24 29 B3 31 20 B0 |B../. .(AF$).1 .|
00000230: 20 C5 28 41 46 24 29 B1 39 39 20 A7 20 31 32 30 | .(AF$).99 . 120|
00000240: 30 30 00 50 0A 0C 30 41 46 B2 C5 28 41 46 24 29 |00.P..0AF..(AF$)|
00000250: 00 71 0A 70 30 99 20 22 2D 3E 20 C1 4E 5A 41 48 |.q.p0. "-> .NZAH|
00000260: 4C 20 C4 52 55 43 4B 46 45 4C 44 45 52 20 3A 22 |L .RUCKFELDER :"|
00000270: 3B 00 7E 0A D4 30 85 20 41 44 24 3A 20 99 00 A1 |;.~..0. AD$: ...|
00000280: 0A 38 31 8B 20 C5 28 41 44 24 29 B3 31 20 B0 20 |.81. .(AD$).1 . |
00000290: C5 28 41 44 24 29 B1 41 46 20 A7 20 31 32 34 30 |.(AD$).AF . 1240|
000002A0: 30 00 AF 0A 9C 31 41 44 B2 C5 28 41 44 24 29 00 |0....1AD..(AD$).|
000002B0: BE 0A 00 32 81 20 49 B2 31 20 A4 20 41 44 00 D9 |...2. I.1 . AD..|
000002C0: 0A 64 32 99 20 22 2D 3E 20 D4 49 54 45 4C 20 23 |.d2. "-> .ITEL #|
000002D0: 22 3B 49 3B 22 20 3A 22 3B 00 E6 0A C8 32 85 20 |";I;" :";....2. |
000002E0: 54 49 24 28 49 29 00 0F 0B 2C 33 8B 20 C3 28 54 |TI$(I)...,3. .(T|
000002F0: 49 24 28 49 29 29 B1 32 30 20 A7 20 54 49 24 28 |I$(I)).20 . TI$(|
00000300: 49 29 B2 C8 28 54 49 24 28 49 29 2C 32 30 29 00 |I)..(TI$(I),20).|
00000310: 28 0B 90 33 99 20 22 2D 3E 20 C6 45 4C 44 4E 55 |(..3. "-> .ELDNU|
00000320: 4D 4D 45 52 20 3A 22 3B 00 35 0B F4 33 85 20 46 |MMER :";.5..3. F|
00000330: 45 24 28 49 29 00 3B 0B 58 34 99 00 64 0B BC 34 |E$(I).;.X4..d..4|
00000340: 8B 20 C5 28 46 45 24 28 49 29 29 B3 31 20 B0 20 |. .(FE$(I)).1 . |
00000350: C5 28 46 45 24 28 49 29 29 B1 41 46 20 A7 20 31 |.(FE$(I)).AF . 1|
00000360: 32 39 30 30 00 6A 0B 20 35 82 00 79 0B 84 35 81 |2900.j. 5..y..5.|
00000370: 20 49 B2 31 20 A4 20 37 39 00 85 0B E8 35 98 34 | I.1 . 79....5.4|
00000380: 2C 22 2D 22 3B 00 8B 0B 4C 36 82 00 92 0B B0 36 |,"-";...L6.....6|
00000390: 98 34 00 A8 0B 14 37 98 34 2C 22 C4 C1 D4 D5 CD |.4....7.4,".....|
000003A0: 20 3A 20 22 3B 44 41 24 00 AF 0B 78 37 98 34 00 | : ";DA$...x7.4.|
000003B0: C9 0B DC 37 98 34 2C 22 C4 C1 D4 C5 C9 CE C1 CD |...7.4,"........|
000003C0: C5 20 3A 20 22 3B 44 4E 24 00 D8 0B 40 38 81 20 |. : ";DN$...@8. |
000003D0: 49 B2 31 20 A4 20 37 39 00 E4 0B A4 38 98 34 2C |I.1 . 79....8.4,|
000003E0: 22 2D 22 3B 00 EA 0B 08 39 82 00 F1 0B 6C 39 98 |"-";....9....l9.|
000003F0: 34 00 00 0C D0 39 81 20 49 B2 31 20 A4 20 41 46 |4....9. I.1 . AF|
00000400: 00 0E 0C 34 3A 84 38 2C 54 45 24 28 49 29 00 14 |...4:.8,TE$(I)..|
00000410: 0C 98 3A 82 00 2A 0C FC 3A 8B 20 53 54 20 AF 20 |..:..*..:. ST . |
00000420: 36 34 20 A7 20 45 4F 46 B2 31 00 39 0C 60 3B 81 |64 . EOF.1.9.`;.|
00000430: 20 49 B2 31 20 A4 20 41 44 00 53 0C C4 3B 98 34 | I.1 . AD.S..;.4|
00000440: 2C C7 28 31 36 29 3B 22 30 31 22 3B 54 49 24 28 |,.(16);"01";TI$(|
00000450: 49 29 3B 00 6A 0C 28 3C 98 34 2C C7 28 31 36 29 |I);.j.(<.4,.(16)|
00000460: 3B 22 32 32 22 3B 22 3A 22 3B 00 91 0C 8C 3C 98 |;"22";":";....<.|
00000470: 34 2C C7 28 31 36 29 3B 22 32 35 22 3B C8 28 54 |4,.(16);"25";.(T|
00000480: 45 24 28 C5 28 46 45 24 28 49 29 29 29 2C 35 34 |E$(.(FE$(I))),54|
00000490: 29 00 97 0C F0 3C 82 00 9E 0C 54 3D 98 34 00 B0 |)....<....T=.4..|
000004A0: 0C B8 3D 8B 20 45 4F 46 20 A7 20 31 36 30 30 30 |..=. EOF . 16000|
000004B0: 00 BC 0C 1C 3E 89 20 31 34 38 30 30 00 CB 0C 80 |....>. 14800....|
000004C0: 3E 81 20 49 B2 31 20 A4 20 37 39 00 D7 0C E4 3E |>. I.1 . 79....>|
000004D0: 98 34 2C 22 2D 22 3B 00 DD 0C 48 3F 82 00 E4 0C |.4,"-";...H?....|
000004E0: AC 3F 98 34 00 EC 0C 10 40 A0 20 34 00 F4 0C 74 |.?.4....@. 4...t|
000004F0: 40 A0 20 38 00 FD 0C D8 40 A0 20 31 35 00 09 0D |@. 8....@. 15...|
00000500: 3C 41 89 20 31 31 31 30 30 00 11 0D A0 41 A0 20 |<A. 11100....A. |
00000510: 34 00 19 0D 04 42 A0 20 38 00 22 0D 68 42 A0 20 |4....B. 8.".hB. |
00000520: 31 35 00 2F 0D CC 42 99 20 C7 28 31 34 37 29 00 |15./..B. .(147).|
00000530: 35 0D 30 43 80 00 4D 0D 94 43 84 31 35 2C 46 31 |5.0C..M..C.15,F1|
00000540: 24 2C 46 32 24 2C 46 33 24 2C 46 34 24 00 60 0D |$,F2$,F3$,F4$.`.|
00000550: F8 43 8B 20 C5 28 46 31 24 29 B2 30 20 A7 20 8E |.C. .(F1$).0 . .|
00000560: 00 8D 0D 5C 44 99 20 22 C6 45 48 4C 45 52 3A 20 |...\D. ".EHLER: |
00000570: 22 3B 46 31 24 3B 22 20 22 3B 46 32 24 3B 22 20 |";F1$;" ";F2$;" |
00000580: 22 3B 46 33 24 3B 22 20 22 3B 46 34 24 00 95 0D |";F3$;" ";F4$...|
00000590: C0 44 A0 20 34 00 9D 0D 24 45 A0 20 38 00 A6 0D |.D. 4...$E. 8...|
000005A0: 88 45 A0 20 31 35 00 BA 0D EC 45 81 20 49 B2 31 |.E. 15....E. I.1|
000005B0: 20 A4 20 36 30 30 30 3A 20 82 00 C6 0D 50 46 89 | . 6000: ....PF.|
000005C0: 20 31 31 31 30 30 00 00 00 | 11100... |
.....'. REPORTGENERATOR.%.T'A..(0): ..C.
X'. TI$(99),FE$(99),TE$(99).A.<(. 53272,
23: . GROSS/KLEIN.. (. 53280,14: . RAHM
ENFARBE....). 53281,14: . HINTERGRUND...
H). G(31);: . SCHRIFT.C.L). G(147);...0*
. "*** REPORTGENERATOR
***": .: .."..*. "-> HEUTIGES DATUM (TT.
MM.JJ) :";.,..*. DA$.:.\+. G(147);.Q..+.
"*** REPORTGENERATOR *
**": .: ....$,. "-> NAME DER DATEI :";..
..,. DN$: .....,. DN$."" . 16800...P-. 1
5,8,15.Z..-. 8,8,0,"0:".DN$.",S,R"......
4,4,7...|.. 17300...... "-> ANZAHL DER
FELDER :";...D/. AF$: ..B../. E(AF$).1 .
E(AF$).99 . 12000.P..0AF.E(AF$).Q.P0. "
-> ANZAHL DRUCKFELDER :";.~.T0. AD$: ...
.81. E(AD$).1 . E(AD$).AF . 12400....1AD
.E(AD$)....2. I.1 . AD.Y.D2. "-> TITEL #
";I;" :";...H2. TI$(I)...,3. C(TI$(I)).2
0 . TI$(I).H(TI$(I),20).(..3. "-> FELDNU
MMER :";.5..3. FE$(I).;.X4..D..4. E(FE$(
I)).1 . E(FE$(I)).AF . 12900.J. 5..Y..5.
I.1 . 79....5.4,"-";...L6.....6.4....7.
4,"DATUM : ";DA$...X7.4.I..7.4,"DATEINAM
E : ";DN$.X.@8. I.1 . 79....8.4,"-";....
9....L9.4...P9. I.1 . AF...4:.8,TE$(I)..
..:..*..:. ST . 64 . EOF.1.9.`;. I.1 . A
D.S.D;.4,G(16);"01";TI$(I);.J.(<.4,G(16)
;"22";":";....<.4,G(16);"25";H(TE$(E(FE$
(I))),54)....<....T=.4....=. EOF . 16000
....>. 14800.K..>. I.1 . 79.W..>.4,"-";.
..H?.....?.4....@ 4...T@ 8...X@ 15...
<A. 11100... A 4....B 8.".HB 15./.LB.
G(147).5.0C..M..C.15,F1$,F2$,F3$,F4$.`.
.C. E(F1$).0 . ....\D. "FEHLER: ";F1$;"
";F2$;" ";F3$;" ";F4$....D 4...$E 8...
.E 15....E. I.1 . 6000: ..F.PF. 11100..
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL