AM
FILE INFORMATION
FILENAME(S): AM
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-12-02 23:24:23
APPEARS ON: 1 disk(s)
FILE HASH
42f2600eb9dbadad6ffaf02fd673064ff4f37dfa1e8b928df760ffcb67601d19
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BUDDY | AM | PRG | swasti, ernst | 31 | 0 |
⚠ CORRUPT DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 01 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 00 49 08 02 00 8F 20 2A 20 20 20 |*****.I.... * |
00000030: 20 20 20 20 20 41 20 4D 20 41 20 44 20 45 20 55 | A M A D E U|
00000040: 20 53 20 20 20 20 20 20 2A 00 6D 08 03 00 8F 20 | S *.m.... |
00000050: 2A 20 47 45 53 43 48 52 49 45 42 45 4E 20 56 4F |* GESCHRIEBEN VO|
00000060: 4E 3A 20 20 20 20 20 20 20 20 20 20 2A 00 85 08 |N: *...|
00000070: 04 00 8F 20 2A 20 4D 41 52 54 49 4E 20 57 45 52 |... * MARTIN WER|
00000080: 4E 45 43 4B 45 00 A9 08 05 00 8F 20 2A 20 4C 45 |NECKE...... * LE|
00000090: 48 52 48 4F 48 4C 20 38 20 20 20 20 20 20 20 20 |HRHOHL 8 |
000000A0: 20 20 20 20 20 20 20 20 2A 00 CD 08 07 00 8F 20 | *...... |
000000B0: 2A 20 54 45 4C 2E 3A 20 30 32 36 31 2F 37 37 32 |* TEL.: 0261/772|
000000C0: 32 34 20 20 20 20 20 20 20 20 20 20 2A 00 F1 08 |24 *...|
000000D0: 08 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000F0: 2A 00 0F 09 09 00 99 22 5B 43 4C 52 2C 57 48 49 |*......"[CLR,WHI|
00000100: 54 45 5D 22 3A 8B 20 59 B2 31 20 A7 20 31 32 00 |TE]":. Y.1 . 12.|
00000110: 27 09 0A 00 86 20 4E 4F 28 31 35 2C 31 35 29 3A |'.... NO(15,15):|
00000120: 86 20 4E 28 31 35 29 00 42 09 0B 00 86 20 4E 31 |. N(15).B.... N1|
00000130: 28 32 30 29 2C 4E 32 28 32 30 29 2C 4E 33 28 32 |(20),N2(20),N3(2|
00000140: 30 29 00 7D 09 0C 00 42 45 B2 33 30 30 30 30 3A |0).}...BE.30000:|
00000150: 41 B2 BB 28 AB 54 49 29 3A 97 20 35 33 32 38 30 |A..(.TI):. 53280|
00000160: 2C 32 3A 97 20 35 33 32 38 31 2C 30 3A 47 45 B2 |,2:. 53281,0:GE.|
00000170: 31 30 30 3A 97 20 36 35 30 2C 31 32 38 00 AE 09 |100:. 650,128...|
00000180: 0D 00 99 22 5B 43 4C 52 2C 44 4F 57 4E 2C 31 30 |..."[CLR,DOWN,10|
00000190: 53 50 41 43 45 5D 41 20 4D 20 41 20 44 20 45 20 |SPACE]A M A D E |
000001A0: 55 20 53 5B 55 50 2C 53 50 41 43 45 5D 22 00 F0 |U S[UP,SPACE]"..|
000001B0: 09 0E 00 99 22 5B 33 44 4F 57 4E 2C 53 50 41 43 |...."[3DOWN,SPAC|
000001C0: 45 5D 45 49 4E 5A 45 4C 53 54 55 45 43 4B 3A 20 |E]EINZELSTUECK: |
000001D0: 30 5B 37 53 50 41 43 45 5D 54 41 4B 54 3A 5B 32 |0[7SPACE]TAKT:[2|
000001E0: 53 50 41 43 45 5D 30 5B 34 53 50 41 43 45 5D 22 |SPACE]0[4SPACE]"|
000001F0: 00 2B 0A 0F 00 99 22 5B 33 44 4F 57 4E 2C 53 50 |.+...."[3DOWN,SP|
00000200: 41 43 45 5D 4E 4F 54 45 4E 3A 20 30 5B 35 53 50 |ACE]NOTEN: 0[5SP|
00000210: 41 43 45 5D 47 45 53 43 48 57 49 4E 44 49 47 4B |ACE]GESCHWINDIGK|
00000220: 45 49 54 3A 22 33 30 30 AB 47 45 00 62 0A 10 00 |EIT:"300.GE.b...|
00000230: 85 22 5B 32 44 4F 57 4E 5D 41 4E 5A 41 48 4C 20 |."[2DOWN]ANZAHL |
00000240: 45 49 4E 5A 45 4C 53 54 55 45 43 4B 45 5B 31 37 |EINZELSTUECKE[17|
00000250: 53 50 41 43 45 2C 31 37 4C 45 46 54 5D 22 3B 41 |SPACE,17LEFT]";A|
00000260: 45 24 00 70 0A 11 00 41 45 B2 C5 28 41 45 24 29 |E$.p...AE..(AE$)|
00000270: 00 8E 0A 12 00 8B 20 41 45 B3 31 20 B0 20 41 45 |...... AE.1 . AE|
00000280: B1 38 20 A7 20 8D 20 33 30 3A 89 20 31 36 00 D5 |.8 . . 30:. 16..|
00000290: 0A 13 00 81 49 B2 31 A4 41 45 3A 8D 20 33 30 3A |....I.1.AE:. 30:|
000002A0: 99 22 54 41 4B 54 45 20 45 49 4E 5A 45 4C 53 54 |."TAKTE EINZELST|
000002B0: 55 45 43 4B 20 4E 52 2E 20 5B 4C 45 46 54 5D 22 |UECK NR. [LEFT]"|
000002C0: 3B 49 3B 22 5B 39 53 50 41 43 45 2C 31 30 4C 45 |;I;"[9SPACE,10LE|
000002D0: 46 54 5D 22 3B 00 F6 0A 14 00 85 20 54 24 28 49 |FT]";...... T$(I|
000002E0: 29 3A 8B 20 C5 28 54 24 28 49 29 29 B1 38 20 A7 |):. .(T$(I)).8 .|
000002F0: 20 49 B2 49 AB 31 00 08 0B 15 00 54 28 49 29 B2 | I.I.1.....T(I).|
00000300: C5 28 54 24 28 49 29 29 00 0E 0B 16 00 82 00 56 |.(T$(I)).......V|
00000310: 0B 17 00 81 49 B2 31 A4 41 45 3A 8D 33 30 3A 20 |....I.1.AE:.30: |
00000320: 20 99 22 57 49 45 44 45 52 48 4F 4C 55 4E 47 20 | ."WIEDERHOLUNG |
00000330: 53 54 55 45 43 4B 20 4E 52 2E 5B 4C 45 46 54 5D |STUECK NR.[LEFT]|
00000340: 22 49 3B 22 5B 31 30 53 50 41 43 45 2C 31 30 4C |"I;"[10SPACE,10L|
00000350: 45 46 54 5D 22 3B 00 85 0B 18 00 85 20 57 53 24 |EFT]";...... WS$|
00000360: 28 49 29 3A 57 53 28 49 29 B2 C5 28 57 53 24 28 |(I):WS(I)..(WS$(|
00000370: 49 29 29 3A 8B 20 57 53 28 49 29 B1 33 20 A7 20 |I)):. WS(I).3 . |
00000380: 49 B2 49 AB 31 00 8B 0B 19 00 82 00 94 0B 1A 00 |I.I.1...........|
00000390: 8D 20 33 30 00 C5 0B 1B 00 85 22 4E 4F 54 45 4E |. 30......"NOTEN|
000003A0: 20 50 52 4F 20 54 41 4B 54 20 28 31 2D 31 36 29 | PRO TAKT (1-16)|
000003B0: 20 5B 31 35 53 50 41 43 45 2C 38 4C 45 46 54 5D | [15SPACE,8LEFT]|
000003C0: 22 3B 4E 54 24 00 E7 0B 1C 00 4E 54 B2 C5 28 4E |";NT$.....NT..(N|
000003D0: 54 24 29 3A 8B 20 4E 54 B3 31 20 B0 20 4E 54 B1 |T$):. NT.1 . NT.|
000003E0: 31 36 20 A7 20 32 36 00 F0 0B 1D 00 89 20 33 31 |16 . 26...... 31|
000003F0: 00 08 0C 1E 00 99 22 5B 48 4F 4D 45 2C 31 31 44 |......"[HOME,11D|
00000400: 4F 57 4E 5D 22 3B 3A 8E 00 3F 0C 1F 00 8D 20 33 |OWN]";:..?.... 3|
00000410: 30 3A 99 22 5B 32 53 50 41 43 45 5D 45 54 57 41 |0:."[2SPACE]ETWA|
00000420: 53 20 47 45 44 55 4C 44 2C 42 49 54 54 45 21 20 |S GEDULD,BITTE! |
00000430: 53 45 4C 42 53 54 20 4D 4F 5A 41 52 54 20 22 00 |SELBST MOZART ".|
00000440: 70 0C 20 00 99 22 5B 44 4F 57 4E 2C 35 53 50 41 |p. .."[DOWN,5SPA|
00000450: 43 45 5D 4B 4F 4D 50 4F 4E 49 45 52 54 45 20 4E |CE]KOMPONIERTE N|
00000460: 49 43 48 54 20 53 43 48 4E 45 4C 4C 45 52 2E 22 |ICHT SCHNELLER."|
00000470: 00 A2 0C 21 00 8C 3A 81 20 49 B2 30 20 A4 20 31 |...!..:. I.0 . 1|
00000480: 31 3A 87 20 4E 28 49 29 3A 81 20 45 B2 30 20 A4 |1:. N(I):. E.0 .|
00000490: 20 33 3A 87 20 4E 4F 28 49 2C 45 29 3A 82 20 45 | 3:. NO(I,E):. E|
000004A0: 2C 49 00 C1 0C 22 00 83 20 31 31 31 34 2C 35 36 |,I...".. 1114,56|
000004B0: 31 33 2C 36 36 37 36 2C 37 39 33 39 2C 34 34 35 |13,6676,7939,445|
000004C0: 35 00 E0 0C 23 00 83 20 31 32 35 30 2C 35 39 34 |5...#.. 1250,594|
000004D0: 37 2C 37 30 37 32 2C 34 34 35 35 2C 35 30 30 31 |7,7072,4455,5001|
000004E0: 00 FF 0C 24 00 83 20 31 34 30 33 2C 37 30 37 32 |...$.. 1403,7072|
000004F0: 2C 38 34 31 31 2C 35 30 30 31 2C 35 36 31 33 00 |,8411,5001,5613.|
00000500: 1E 0D 25 00 83 20 31 34 38 37 2C 37 34 39 33 2C |..%.. 1487,7493,|
00000510: 34 34 35 35 2C 35 32 39 36 2C 35 39 34 37 00 3D |4455,5296,5947.=|
00000520: 0D 26 00 83 20 31 36 36 39 2C 38 34 31 31 2C 35 |.&.. 1669,8411,5|
00000530: 30 30 31 2C 35 39 34 37 2C 36 36 37 36 00 5C 0D |001,5947,6676.\.|
00000540: 27 00 83 20 31 38 37 33 2C 34 37 32 30 2C 35 36 |'.. 1873,4720,56|
00000550: 31 33 2C 36 36 37 36 2C 37 34 39 33 00 7B 0D 28 |13,6676,7493.{.(|
00000560: 00 83 20 32 31 30 33 2C 35 32 39 38 2C 36 33 30 |.. 2103,5298,630|
00000570: 31 2C 37 34 39 33 2C 38 34 31 31 00 9A 0D 29 00 |1,7493,8411...).|
00000580: 83 20 31 31 38 30 2C 35 39 34 37 2C 37 30 37 32 |. 1180,5947,7072|
00000590: 2C 38 34 31 31 2C 34 37 32 30 00 B9 0D 2A 00 83 |,8411,4720...*..|
000005A0: 20 31 33 32 35 2C 36 36 37 36 2C 37 39 33 39 2C | 1325,6676,7939,|
000005B0: 34 37 32 30 2C 35 32 39 38 00 D8 0D 2B 00 83 20 |4720,5298...+.. |
000005C0: 31 35 37 35 2C 37 39 33 39 2C 34 37 32 30 2C 35 |1575,7939,4720,5|
000005D0: 36 31 33 2C 36 33 30 31 00 F7 0D 2C 00 83 20 31 |613,6301...,.. 1|
000005E0: 37 36 38 2C 34 34 35 35 2C 35 32 39 38 2C 36 33 |768,4455,5298,63|
000005F0: 30 31 2C 37 30 37 32 00 16 0E 2D 00 83 20 31 39 |01,7072...-.. 19|
00000600: 38 35 2C 35 30 30 31 2C 35 39 34 37 2C 37 30 37 |85,5001,5947,707|
00000610: 32 2C 37 39 33 39 00 25 0E 2E 00 81 20 49 B2 31 |2,7939.%.... I.1|
00000620: 20 A4 20 41 45 00 36 0E 2F 00 48 B2 28 4E 54 20 | . AE.6./.H.(NT |
00000630: AF 20 32 35 34 29 00 46 0E 30 00 8B 20 48 B2 30 |. 254).F.0.. H.0|
00000640: 20 A7 20 48 B2 32 00 65 0E 31 00 8B 20 48 B2 36 | . H.2.e.1.. H.6|
00000650: 20 A7 20 4D 4F B2 28 B5 28 BB 28 31 29 AC 32 29 | . MO.(.(.(1).2)|
00000660: AA 31 29 AC 32 00 8D 0E 32 00 8B 20 48 B2 38 20 |.1).2...2.. H.8 |
00000670: B0 20 48 B2 34 20 B0 20 48 B2 31 36 20 A7 20 4D |. H.4 . H.16 . M|
00000680: 4F B2 B5 28 BB 28 31 29 AC 33 29 AA 31 00 B6 0E |O..(.(1).3).1...|
00000690: 33 00 8B 20 48 B2 32 20 B0 20 48 B2 31 30 20 B0 |3.. H.2 . H.10 .|
000006A0: 20 48 B2 31 34 20 A7 20 4D 4F B2 B5 28 BB 28 31 | H.14 . MO..(.(1|
000006B0: 29 AC 32 29 AA 31 00 D2 0E 34 00 8B 20 48 B2 31 |).2).1...4.. H.1|
000006C0: 32 20 A7 20 4D 4F B2 B5 28 BB 28 31 29 AC 34 29 |2 . MO..(.(1).4)|
000006D0: AA 31 00 DC 0E 35 00 42 42 B2 42 45 00 ED 0E 36 |.1...5.BB.BE...6|
000006E0: 00 81 20 45 B2 31 20 A4 20 54 28 49 29 00 FE 0E |.. E.1 . T(I)...|
000006F0: 37 00 58 B2 B5 28 BB 28 31 29 AC 31 32 29 00 0E |7.X..(.(1).12)..|
00000700: 0F 38 00 8B 20 4D 4F B1 31 20 A7 20 36 34 00 24 |.8.. MO.1 . 64.$|
00000710: 0F 39 00 58 32 20 B2 28 B5 28 BB 28 31 29 AC 32 |.9.X2 .(.(.(1).2|
00000720: 29 AA 31 29 00 47 0F 3A 00 81 20 41 B2 31 20 A4 |).1).G.:.. A.1 .|
00000730: 20 48 3A 4E 31 28 41 29 B2 4E 28 58 29 AC 58 32 | H:N1(A).N(X).X2|
00000740: 3A 82 3A 89 20 36 36 00 57 0F 3B 00 8B 20 4D 4F |:.:. 66.W.;.. MO|
00000750: B1 32 20 A7 20 36 31 00 83 0F 3C 00 81 20 41 B2 |.2 . 61...<.. A.|
00000760: 31 20 A4 20 48 3A 4A B2 31 AB 4A 3A 4E 31 28 41 |1 . H:J.1.J:N1(A|
00000770: 29 B2 4E 28 58 29 AC 28 4A AA 31 29 3A 82 3A 89 |).N(X).(J.1):.:.|
00000780: 20 36 36 00 93 0F 3D 00 8B 20 4D 4F B3 34 20 A7 | 66...=.. MO.4 .|
00000790: 20 36 34 00 E4 0F 3E 00 4E 31 28 31 29 B2 4E 28 | 64...>.N1(1).N(|
000007A0: 58 29 3A 4E 31 28 32 29 B2 4E 4F 28 58 2C 31 29 |X):N1(2).NO(X,1)|
000007B0: AD 32 3A 4E 31 28 33 29 B2 32 AC 4E 31 28 31 29 |.2:N1(3).2.N1(1)|
000007C0: 3A 4E 31 28 34 29 B2 4E 31 28 31 29 3A 4E 31 28 |:N1(4).N1(1):N1(|
000007D0: 35 29 B2 4E 31 28 32 29 3A 4E 31 28 36 29 B2 4E |5).N1(2):N1(6).N|
000007E0: 31 28 33 29 00 ED 0F 3F 00 89 20 36 36 00 FD 0F |1(3)...?.. 66...|
000007F0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000800: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000810: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000820: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000830: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000840: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000850: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000860: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000870: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000880: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00000890: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000008A0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000008B0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000008C0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000008D0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000008E0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |.............. |
..%.... *****************************.I.
... * A M A D E U S *.M....
* GESCHRIEBEN VON: *...... * MA
RTIN WERNECKE...... * LEHRHOHL 8
*.M.... * TEL.: 0261/77224
*...... ****************************
*......"[CLR,WHITE]":. Y.1 . 12.'.... NO
(15,15):. N(15).B.... N1(20),N2(20),N3(2
0).}...BE.30000:A..(.TI):. 53280,2:. 532
81,0:GE.100:. 650,128......"[CLR,DOWN,10
SPACE]A M A D E U S[UP,SPACE]"......"[3D
OWN,SPACE]EINZELSTUECK: 0[7SPACE]TAKT:[2
SPACE]0[4SPACE]".+...."[3DOWN,SPACE]NOTE
N: 0[5SPACE]GESCHWINDIGKEIT:"300.GE.B...
."[2DOWN]ANZAHL EINZELSTUECKE[17SPACE,17
LEFT]";AE$.P...AE.E(AE$)...... AE.1 . AE
.8 . . 30:. 16.U....I.1.AE:. 30:."TAKTE
EINZELSTUECK NR. [LEFT]";I;"[9SPACE,10LE
FT]";...... T$(I):. E(T$(I)).8 . I.I.1..
...T(I).E(T$(I)).......V....I.1.AE:.30:
."WIEDERHOLUNG STUECK NR.[LEFT]"I;"[10S
PACE,10LEFT]";...... WS$(I):WS(I).E(WS$(
I)):. WS(I).3 . I.I.1............ 30.E..
.."NOTEN PRO TAKT (1-16) [15SPACE,8LEFT]
";NT$.....NT.E(NT$):. NT.1 . NT.16 . 26.
..... 31......"[HOME,11DOWN]";:..?.... 3
0:."[2SPACE]ETWAS GEDULD,BITTE! SELBST M
OZART ".P. .."[DOWN,5SPACE]KOMPONIERTE N
ICHT SCHNELLER."...!..:. I.0 . 11:. N(I)
:. E.0 . 3:. NO(I,E):. E,I.A.".. 1114,56
13,6676,7939,4455...#.. 1250,5947,7072,4
455,5001...$.. 1403,7072,8411,5001,5613.
..%.. 1487,7493,4455,5296,5947.=.&.. 166
9,8411,5001,5947,6676.\.'.. 1873,4720,56
13,6676,7493.{.(.. 2103,5298,6301,7493,8
411...).. 1180,5947,7072,8411,4720...*..
1325,6676,7939,4720,5298.X.+.. 1575,793
9,4720,5613,6301...,.. 1768,4455,5298,63
01,7072...-.. 1985,5001,5947,7072,7939.%
.... I.1 . AE.6./.H.(NT . 254).F.0.. H.0
. H.2.E.1.. H.6 . MO.(.(.(1).2).1).2...
2.. H.8 . H.4 . H.16 . MO..(.(1).3).1...
3.. H.2 . H.10 . H.14 . MO..(.(1).2).1.R
.4.. H.12 . MO..(.(1).4).1...5.BB.BE...6
.. E.1 . T(I)...7.X..(.(1).12)...8.. MO.
1 . 64.$.9.X2 .(.(.(1).2).1).G.:.. A.1 .
H:N1(A).N(X).X2:.:. 66.W.;.. MO.2 . 61.
..<.. A.1 . H:J.1.J:N1(A).N(X).(J.1):.:.
66...=.. MO.4 . 64...>.N1(1).N(X):N1(2)
.NO(X,1).2:N1(3).2.N1(1):N1(4).N1(1):N1(
5).N1(2):N1(6).N1(3)...?.. 66...........
........................................
........................................
........................................
........................................
........................................
........................................
......
> CLICK IMAGE PREVIEW FOR FULL MODAL