KEGELN
FILE INFORMATION
FILENAME(S): KEGELN
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-11-02 22:11:41
APPEARS ON: 1 disk(s)
FILE HASH
9cdc916a3ba755176222608976116ce2e007ba92e7d839226d5b719f201dea45
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HARRY S PROGR S | KEGELN | PRG | Treasure Chest - ToGuMi | 11 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 00 00 86 41 24 28 31 30 30 29 3A 86 |.. ....A$(100):.|
00000010: 42 24 28 31 30 30 29 3A 86 43 24 28 31 30 30 29 |B$(100):.C$(100)|
00000020: 00 4A 08 01 00 97 35 33 32 38 31 2C 30 3A 97 35 |.J....53281,0:.5|
00000030: 33 32 38 30 2C 30 3A 46 24 B2 22 4B 45 47 45 4C |3280,0:F$."KEGEL|
00000040: 44 41 54 45 4E 22 3A 5A B2 30 00 53 08 02 00 8D |DATEN":Z.0.S....|
00000050: 33 30 30 00 7B 08 0A 00 99 22 9B 93 11 11 11 11 |300.{...."......|
00000060: 53 4F 4C 4C 20 49 43 48 20 44 41 54 45 4E 20 4C |SOLL ICH DATEN L|
00000070: 41 44 45 4E 20 3F 20 4A 2F 4E 22 00 8D 08 0B 00 |ADEN ? J/N".....|
00000080: A1 45 24 3A 8B 45 24 B2 22 22 A7 31 31 00 9C 08 |.E$:.E$."".11...|
00000090: 0C 00 8B 45 24 B2 22 4A 22 A7 31 35 00 AB 08 0D |...E$."J".15....|
000000A0: 00 8B 45 24 B2 22 4E 22 A7 32 30 00 B3 08 0E 00 |..E$."N".20.....|
000000B0: 89 31 31 00 D4 08 0F 00 9F 31 2C 38 2C 32 2C 46 |.11......1,8,2,F|
000000C0: 24 AA 22 2C 53 2C 52 22 3A 84 31 2C 5A 3A 81 58 |$.",S,R":.1,Z:.X|
000000D0: B2 30 A4 5A 00 F9 08 10 00 84 31 2C 41 24 28 58 |.0.Z......1,A$(X|
000000E0: 29 3A 84 31 2C 42 24 28 58 29 3A 84 31 2C 43 24 |):.1,B$(X):.1,C$|
000000F0: 28 58 29 3A 82 58 3A A0 31 00 03 09 11 00 89 20 |(X):.X:.1...... |
00000100: 32 30 30 00 21 09 14 00 85 22 93 11 11 11 11 9B |200.!...."......|
00000110: 1D 1D 1D 1D 44 41 54 55 4D 20 22 3B 41 24 28 5A |....DATUM ";A$(Z|
00000120: 29 00 32 09 1E 00 8B 41 24 28 5A 29 B2 22 22 A7 |).2....A$(Z)."".|
00000130: 32 30 00 46 09 1F 00 8B C3 28 41 24 28 5A 29 29 |20.F.....(A$(Z))|
00000140: B1 31 30 A7 32 30 00 66 09 28 00 85 22 13 11 11 |.10.20.f.(.."...|
00000150: 11 11 11 11 9B 1D 48 4F 4C 5A 5A 41 48 4C 20 22 |......HOLZZAHL "|
00000160: 3B 42 24 28 5A 29 00 79 09 29 00 8B C3 28 42 24 |;B$(Z).y.)...(B$|
00000170: 28 5A 29 29 B1 35 A7 34 30 00 8A 09 32 00 8B 42 |(Z)).5.40...2..B|
00000180: 24 28 5A 29 B2 22 22 A7 34 30 00 A4 09 33 00 42 |$(Z)."".40...3.B|
00000190: B2 C5 28 42 24 28 5A 29 29 3A 8B 42 B1 31 30 30 |..(B$(Z)):.B.100|
000001A0: 30 A7 34 30 00 C5 09 46 00 85 22 13 11 11 11 11 |0.40...F..".....|
000001B0: 11 11 11 11 4B 45 47 45 4C 42 41 48 4E 20 22 3B |....KEGELBAHN ";|
000001C0: 43 24 28 5A 29 00 D9 09 47 00 8B C3 28 43 24 28 |C$(Z)...G...(C$(|
000001D0: 5A 29 29 B1 31 32 A7 37 30 00 EA 09 50 00 8B 43 |Z)).12.70...P..C|
000001E0: 24 28 5A 29 B2 22 22 A7 37 30 00 0F 0A 64 00 99 |$(Z)."".70...d..|
000001F0: 22 11 11 11 11 53 4F 4C 4C 20 49 43 48 20 41 42 |"....SOLL ICH AB|
00000200: 53 50 45 49 43 48 45 52 4E 20 4A 2F 4E 20 22 00 |SPEICHERN J/N ".|
00000210: 22 0A 6E 00 A1 44 24 3A 8B 44 24 B2 22 22 A7 31 |".n..D$:.D$."".1|
00000220: 31 30 00 32 0A 78 00 8B 44 24 B2 22 4A 22 A7 31 |10.2.x..D$."J".1|
00000230: 33 38 00 43 0A 82 00 8B 44 24 B2 22 4E 22 A7 89 |38.C....D$."N"..|
00000240: 32 30 30 00 4C 0A 87 00 89 31 31 30 00 6A 0A 8A |200.L....110.j..|
00000250: 00 9F 31 2C 38 2C 31 35 2C 22 53 3A 4B 45 47 45 |..1,8,15,"S:KEGE|
00000260: 4C 44 41 54 45 4E 22 3A A0 31 00 8B 0A 8C 00 9F |LDATEN":.1......|
00000270: 31 2C 38 2C 32 2C 46 24 AA 22 2C 53 2C 57 22 3A |1,8,2,F$.",S,W":|
00000280: 98 31 2C 5A 3A 81 58 B2 30 A4 5A 00 B0 0A 96 00 |.1,Z:.X.0.Z.....|
00000290: 98 31 2C 41 24 28 58 29 3A 98 31 2C 42 24 28 58 |.1,A$(X):.1,B$(X|
000002A0: 29 3A 98 31 2C 43 24 28 58 29 3A 82 58 3A A0 31 |):.1,C$(X):.X:.1|
000002B0: 00 BA 0A C8 00 5A B2 5A AA 31 00 EB 0A C9 00 99 |.....Z.Z.1......|
000002C0: 22 93 98 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |"...............|
000002D0: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
000002E0: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 22 00 21 0B CA 00 |..........".!...|
000002F0: 99 22 97 C2 9F 20 44 41 54 55 4D 20 20 97 20 20 |."... DATUM . |
00000300: 20 C2 20 9F 48 4F 4C 5A 5A 41 48 4C 97 20 20 C2 | . .HOLZZAHL. .|
00000310: 9F 20 4B 45 47 45 4C 42 41 48 4E 97 20 20 20 C2 |. KEGELBAHN. .|
00000320: 22 00 5C 0B CB 00 81 58 B2 31 A4 32 32 3A 99 22 |".\....X.1.22:."|
00000330: 97 C2 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C2 1D 1D |................|
00000340: 1D 1D 1D 1D 1D 1D 1D 1D 1D C2 1D 1D 1D 1D 1D 1D |................|
00000350: 1D 1D 1D 1D 1D 1D 1D C2 22 3A 82 58 00 68 0B D2 |........":.X.h..|
00000360: 00 99 22 13 11 11 1D 22 00 80 0B D4 00 81 58 B2 |.."...."......X.|
00000370: 4B A4 5A 3A 99 22 9B 1D 1D 22 3B 41 24 28 58 29 |K.Z:."...";A$(X)|
00000380: 00 9A 0B D5 00 8B 58 B3 B1 32 30 AF 58 B3 B1 34 |......X..20.X..4|
00000390: 30 AF 58 B3 B1 36 30 A7 82 58 00 A5 0B DB 00 99 |0.X..60..X......|
000003A0: 22 13 11 11 22 00 DF 0B DC 00 81 58 B2 4B A4 5A |"..."......X.K.Z|
000003B0: 3A 99 22 9B 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |:.".............|
000003C0: 1D 1D 22 3B 42 24 28 58 29 3A 8B 58 B3 B1 32 30 |..";B$(X):.X..20|
000003D0: AF 58 B3 B1 34 30 AF 58 B3 B1 36 30 A7 82 58 00 |.X..40.X..60..X.|
000003E0: EA 0B E5 00 99 22 13 11 11 22 00 33 0C E6 00 81 |....."...".3....|
000003F0: 58 B2 4B A4 5A 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D |X.K.Z:."........|
00000400: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000410: 1D 1D 22 3B 43 24 28 58 29 3A 8B 58 B3 B1 32 30 |..";C$(X):.X..20|
00000420: AF 58 B3 B1 34 30 AF 58 B3 B1 36 30 A7 82 58 3A |.X..40.X..60..X:|
00000430: 4B B2 30 00 46 0C EB 00 A1 47 24 3A 8B 47 24 B2 |K.0.F....G$:.G$.|
00000440: 22 22 A7 32 33 35 00 5A 0C EC 00 8B 58 B2 32 30 |"".235.Z....X.20|
00000450: A7 4B B2 32 31 3A 89 32 30 31 00 6E 0C ED 00 8B |.K.21:.201.n....|
00000460: 58 B2 34 30 A7 4B B2 34 31 3A 89 32 30 31 00 82 |X.40.K.41:.201..|
00000470: 0C EE 00 8B 58 B2 36 30 A7 4B B2 36 31 3A 89 32 |....X.60.K.61:.2|
00000480: 30 31 00 A7 0C EF 00 47 45 B2 30 3A 81 58 B2 30 |01.....GE.0:.X.0|
00000490: A4 28 5A AB 31 29 3A 47 45 B2 47 45 AA C5 28 42 |.(Z.1):GE.GE..(B|
000004A0: 24 28 58 29 29 3A 82 00 D4 0C F0 00 99 22 11 11 |$(X)):......."..|
000004B0: 1D 1D 1D 1D 1D 1D 47 45 53 41 4D 54 44 55 52 43 |......GESAMTDURC|
000004C0: 48 53 43 48 4E 49 54 54 20 3A 20 22 3B B5 28 47 |HSCHNITT : ";.(G|
000004D0: 45 AD 5A 29 00 FA 0C F2 00 99 22 1D 1D 1D 1D 1D |E.Z)......".....|
000004E0: 1D 11 44 41 54 45 4E 20 41 55 46 20 44 52 55 43 |..DATEN AUF DRUC|
000004F0: 4B 45 52 20 3F 20 4A 2F 4E 22 00 0D 0D F3 00 A1 |KER ? J/N"......|
00000500: 47 24 3A 8B 47 24 B2 22 22 A7 32 34 33 00 1D 0D |G$:.G$."".243...|
00000510: F4 00 8B 47 24 B2 22 4A 22 A7 34 30 30 00 25 0D |...G$."J".400.%.|
00000520: FA 00 89 31 30 00 67 0D 2C 01 99 22 93 11 1D 1D |...10.g.,.."....|
00000530: 1D 1D 05 AA 12 20 A9 20 92 A9 20 12 20 20 20 9B |..... . .. . .|
00000540: 92 20 05 12 20 20 20 9B 92 20 05 12 20 20 20 9B |. .. .. .. .|
00000550: 92 20 05 12 20 9B 92 20 20 05 AA 12 20 DF 9B 92 |. .. .. ... ...|
00000560: 20 05 12 20 92 B4 22 00 A1 0D 2D 01 99 22 1D 1D | .. .."...-.."..|
00000570: 1D 1D 9B A7 12 20 20 92 A9 20 05 20 9B 12 20 92 |..... .. . .. .|
00000580: B9 05 20 9B 20 12 20 05 92 20 20 9B 20 12 20 92 |.. . . .. . . .|
00000590: B9 20 20 12 20 92 20 20 AA 12 20 20 DF 20 92 B4 |. . . .. . ..|
000005A0: 22 00 E2 0D 2E 01 99 22 1D 1D 1D 1D 98 A7 12 20 |"......"....... |
000005B0: 20 DF 9B 92 20 05 20 98 12 20 92 B8 05 20 20 98 | ... . .. ... .|
000005C0: 12 20 B5 20 9B 92 20 98 12 20 92 B8 9B 20 20 98 |. . .. .. ... .|
000005D0: 12 20 9B 92 20 20 98 AA 12 20 92 DF 12 20 20 92 |. .. ... ... .|
000005E0: B4 22 00 22 0E 2F 01 99 22 1D 1D 1D 1D 97 A7 12 |."."./..".......|
000005F0: 20 92 DF 12 20 DF 05 92 20 97 12 20 20 20 05 92 | ... ... .. ..|
00000600: 20 97 12 20 B7 20 92 20 12 20 20 20 9B 92 20 97 | .. . . . .. .|
00000610: 12 20 20 20 92 A7 12 20 9B 92 20 97 DF 12 20 92 |. ... .. ... .|
00000620: B4 22 00 4F 0E 30 01 99 22 1D 1D 1D 1D 9B 20 98 |.".O.0.."..... .|
00000630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000640: 20 96 D5 C9 9B 20 98 20 20 9B 20 20 20 20 22 00 | .... . . ".|
00000650: 7F 0E 31 01 99 22 1D 1D 1D 1D 98 20 20 20 20 20 |..1.."..... |
00000660: 9B 20 20 20 20 20 20 20 20 20 20 20 20 20 96 CA |. ..|
00000670: CB 1C 12 B8 92 A2 B9 95 D1 98 20 9B 20 20 22 00 |.......... . ".|
00000680: AE 0E 32 01 99 22 1D 1D 1D 1D 98 20 20 A4 A4 A4 |..2.."..... ...|
00000690: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 20 1C 12 B4 |............ ...|
000006A0: 20 DF 9B 92 20 81 B9 B9 98 20 20 9B 20 22 00 DF | ... .... . "..|
000006B0: 0E 33 01 99 22 1D 1D 1D 1D 98 20 20 95 DA DA DA |.3.."..... ....|
000006C0: 98 20 20 20 20 20 20 20 20 20 20 20 20 20 1C A1 |. ..|
000006D0: DF 12 20 DF 1F 20 98 92 20 9B 20 20 98 20 22 00 |.. .. .. . . ".|
000006E0: 0E 0F 34 01 99 22 1D 1D 1D 1D 9B 20 20 95 DA DA |..4.."..... ...|
000006F0: DA 98 20 20 20 20 20 20 20 20 20 20 20 20 20 96 |.. .|
00000700: BC 1F 12 A9 20 20 92 A9 98 20 20 20 20 22 00 3F |.... ... ".?|
00000710: 0F 35 01 99 22 1D 1D 1D 1D 20 20 95 DA DA DA 98 |.5..".... .....|
00000720: 20 20 20 20 20 20 20 20 20 20 20 20 9B 20 20 1F | . .|
00000730: 12 20 92 A9 22 20 20 20 20 20 20 20 20 20 22 00 |. .." ".|
00000740: 6A 0F 36 01 99 22 1D 1D 1D 1D 20 98 20 A3 A3 A3 |j.6..".... . ...|
00000750: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 81 B8 B8 |............ ...|
00000760: 9B 20 20 20 20 20 96 20 20 22 00 97 0F 40 01 99 |. . "...@..|
00000770: 22 9B 11 11 11 11 20 20 20 20 20 45 49 4E 20 50 |"..... EIN P|
00000780: 52 4F 47 52 41 4D 4D 20 5A 55 52 20 55 45 42 45 |ROGRAMM ZUR UEBE|
00000790: 52 53 49 43 48 54 22 00 B3 0F 41 01 99 22 9B 20 |RSICHT"...A..". |
000007A0: 20 20 20 20 44 45 52 20 4B 45 47 45 4C 44 41 54 | DER KEGELDAT|
000007B0: 45 4E 22 00 D3 0F 4A 01 99 22 11 11 20 20 20 20 |EN"...J..".. |
000007C0: 20 56 4F 4E 20 48 41 52 52 59 20 4B 52 55 45 47 | VON HARRY KRUEG|
000007D0: 45 52 22 00 E6 0F 54 01 A1 41 24 3A 8B 41 24 B2 |ER"...T..A$:.A$.|
000007E0: 22 22 A7 33 34 30 00 EC 0F 5E 01 8E 00 F5 0F 90 |"".340...^......|
000007F0: 01 9F 31 2C 34 00 26 10 91 01 98 31 2C 22 A4 A4 |..1,4.&....1,"..|
00000800: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000810: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000820: A4 A4 A4 A4 A4 22 00 57 10 92 01 98 31 2C 22 44 |.....".W....1,"D|
00000830: 41 54 55 4D 20 20 20 20 20 20 20 20 20 48 4F 4C |ATUM HOL|
00000840: 5A 5A 41 48 4C 20 20 20 20 4B 45 47 45 4C 42 41 |ZZAHL KEGELBA|
00000850: 48 4E 20 20 20 20 22 00 64 10 93 01 98 31 2C C7 |HN ".d....1,.|
00000860: 28 33 32 29 00 9B 10 94 01 81 58 B2 30 A4 5A 3A |(32)......X.0.Z:|
00000870: 98 31 2C 41 24 28 58 29 3B 3A 59 B2 31 34 AB C3 |.1,A$(X);:Y.14..|
00000880: 28 41 24 28 58 29 29 3A 81 48 B2 31 A4 59 3A 98 |(A$(X)):.H.1.Y:.|
00000890: 31 2C C7 28 33 32 29 3B 3A 82 48 00 CB 10 95 01 |1,.(32);:.H.....|
000008A0: 98 31 2C 42 24 28 58 29 3B 3A 59 B2 31 32 AB C3 |.1,B$(X);:Y.12..|
000008B0: 28 42 24 28 58 29 29 3A 81 48 B2 31 A4 59 3A 98 |(B$(X)):.H.1.Y:.|
000008C0: 31 2C C7 28 33 32 29 3B 3A 82 48 00 E4 10 96 01 |1,.(32);:.H.....|
000008D0: 98 31 2C 43 24 28 58 29 3A 82 58 3A 98 31 2C C7 |.1,C$(X):.X:.1,.|
000008E0: 28 33 32 29 00 02 11 97 01 98 31 2C 22 44 55 52 |(32)......1,"DUR|
000008F0: 43 48 53 43 48 4E 49 54 54 20 3A 20 22 3B 47 45 |CHSCHNITT : ";GE|
00000900: AD 5A 00 34 11 98 01 98 31 2C 22 A3 A3 A3 A3 A3 |.Z.4....1,".....|
00000910: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000920: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000930: A3 A3 A3 22 00 3C 11 99 01 89 31 30 00 00 00 |...".<....10... |
.. ....A$(100):.B$(100):.C$(100).J....53
281,0:.53280,0:F$."KEGELDATEN":Z.0.S....
300.{...."......SOLL ICH DATEN LADEN ? J
/N"......E$:.E$."".11......E$."J".15....
..E$."N".20......11.T....1,8,2,F$.",S,R"
:.1,Z:.X.0.Z......1,A$(X):.1,B$(X):.1,C$
(X):.X: 1...... 200.!...."..........DATU
M ";A$(Z).2....A$(Z)."".20.F....C(A$(Z))
.10.20.F.(..".........HOLZZAHL ";B$(Z).Y
.)..C(B$(Z)).5.40...2..B$(Z)."".40...3.B
.E(B$(Z)):.B.1000.40.E.F..".........KEGE
LBAHN ";C$(Z).Y.G..C(C$(Z)).12.70...P..C
$(Z)."".70...D.."....SOLL ICH ABSPEICHER
N J/N ".".N..D$:.D$."".110.2.X..D$."J".1
38.C....D$."N"..200.L....110.J....1,8,15
,"S:KEGELDATEN": 1......1,8,2,F$.",S,W":
.1,Z:.X.0.Z......1,A$(X):.1,B$(X):.1,C$(
X):.X: 1...H.Z.Z.1...I.."..FFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFF".!.J..".B. DA
TUM . B .HOLZZAHL. B. KEGELBAHN. B
".\.K..X.1.22:.".B...........B..........
.B.............B":.X.H.R.."...."...T..X.
K.Z:."...";A$(X)...U..X..20.X..40.X..60.
.X......"..."......X.K.Z:.".............
..";B$(X):.X..20.X..40.X..60..X......"..
.".3....X.K.Z:."........................
..";C$(X):.X..20.X..40.X..60..X:K.0.F...
.G$:.G$."".235.Z....X.20.K.21:.201.N....
X.40.K.41:.201......X.60.K.61:.201.....G
E.0:.X.0.(Z.1):GE.GE.E(B$(X)):..T...."..
......GESAMTDURCHSCHNITT : ";.(GE.Z)....
..".......DATEN AUF DRUCKER ? J/N"......
G$:.G$."".243......G$."J".400.%....10.G.
,.."......... . .. . .. .. .. .. .
. .. .. ... ... .. .."...-.."....... .
. . .. ... . . .. . . .. . . .. . ..
"......"....... ... . .. ... .. . .. .
. ... .. .. ... ... .."."./..".......
... ... .. .. .. . . . .. .. ...
.. ... ..".O.0.."..... .
.UI. . . "..1.."..... .
.JK.......Q. . "...2.."..... ...
............ ... ... .... . "...3.."...
.. .ZZZ. .... .. .. . . ".
..4.."..... .ZZZ. ..... ..
. ".?.5..".... .ZZZ. . .
. .." ".J.6..".... . ...........
.... .... . "...@.."..... EIN P
ROGRAMM ZUR UEBERSICHT"...A..". DER
KEGELDATEN".S.J..".. VON HARRY KRUEG
ER"...T..A$:.A$."".340...^........1,4.&.
...1,"..................................
.....".W....1,"DATUM HOLZZAHL
KEGELBAHN ".D....1,G(32)......X.0.Z:
.1,A$(X);:Y.14.C(A$(X)):.H.1.Y:.1,G(32);
:.H.K....1,B$(X);:Y.12.C(B$(X)):.H.1.Y:.
1,G(32);:.H......1,C$(X):.X:.1,G(32)....
..1,"DURCHSCHNITT : ";GE.Z.4....1,".....
...................................".<..
..10...
> CLICK IMAGE PREVIEW FOR FULL MODAL