AMA
FILE INFORMATION
FILENAME(S): AMA
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-12-02 23:24:23
APPEARS ON: 1 disk(s)
FILE HASH
4b3f193ae0c374ed7a3dec33a90d29bf437f55ce1881061b0f48a299f1442c77
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BUDDY | AMA | PRG | swasti, ernst | 5 | 5 | 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: 40 00 81 20 41 B2 31 20 A4 20 48 AD 34 00 45 10 |@.. A.1 . H.4.E.|
00000800: 41 00 4E 31 28 41 AC 34 AB 33 29 B2 4E 28 58 29 |A.N1(A.4.3).N(X)|
00000810: 3A 4E 31 28 41 AC 34 AB 32 29 B2 4E 4F 28 58 2C |:N1(A.4.2).NO(X,|
00000820: 31 29 AD 34 3A 4E 31 28 41 AC 34 AB 31 29 B2 32 |1).4:N1(A.4.1).2|
00000830: AC 4E 28 58 29 3A 4E 31 28 41 AC 34 29 B2 4E 31 |.N(X):N1(A.4).N1|
00000840: 28 32 29 3A 82 00 4B 10 42 00 8F 00 59 10 43 00 |(2):..K.B...Y.C.|
00000850: 81 20 41 B2 31 20 A4 20 48 00 81 10 44 00 4E 32 |. A.1 . H...D.N2|
00000860: 28 41 29 B2 4E 4F 28 58 2C B5 28 BB 28 31 29 AC |(A).NO(X,.(.(1).|
00000870: 36 29 29 AC 28 B5 28 BB 28 31 29 AC 32 29 AA 31 |6)).(.(.(1).2).1|
00000880: 29 00 A9 10 45 00 4E 33 28 41 29 B2 4E 4F 28 58 |)...E.N3(A).NO(X|
00000890: 2C B5 28 BB 28 31 29 AC 36 29 29 AC 28 B5 28 BB |,.(.(1).6)).(.(.|
000008A0: 28 31 29 AC 32 29 AA 31 29 00 D2 10 46 00 99 22 |(1).2).1)...F.."|
000008B0: 5B 48 4F 4D 45 2C 34 44 4F 57 4E 2C 31 34 52 49 |[HOME,4DOWN,14RI|
000008C0: 47 48 54 5D 22 49 22 5B 31 32 52 49 47 48 54 5D |GHT]"I"[12RIGHT]|
000008D0: 22 45 00 F6 10 47 00 99 22 5B 33 44 4F 57 4E 2C |"E...G.."[3DOWN,|
000008E0: 37 52 49 47 48 54 2C 34 53 50 41 43 45 2C 34 4C |7RIGHT,4SPACE,4L|
000008F0: 45 46 54 5D 22 41 00 FC 10 48 00 82 00 2A 11 49 |EFT]"A...H...*.I|
00000900: 00 81 20 41 B2 31 20 A4 20 48 3A 97 20 42 45 2C |.. A.1 . H:. BE,|
00000910: 4E 31 28 41 29 AF 20 32 35 35 3A 97 42 45 AA 31 |N1(A). 255:.BE.1|
00000920: 2C 4E 31 28 41 29 AD 32 35 36 00 51 11 4A 00 97 |,N1(A).256.Q.J..|
00000930: 20 42 45 AA 32 2C 4E 32 28 41 29 AF 20 32 35 35 | BE.2,N2(A). 255|
00000940: 3A 97 20 42 45 AA 33 2C 4E 32 28 41 29 AD 32 35 |:. BE.3,N2(A).25|
00000950: 36 00 84 11 4B 00 97 20 42 45 AA 34 2C 4E 33 28 |6...K.. BE.4,N3(|
00000960: 41 29 AF 20 32 35 35 3A 97 20 42 45 AA 35 2C 4E |A). 255:. BE.5,N|
00000970: 33 28 41 29 AD 32 35 36 3A 42 45 B2 42 45 AA 36 |3(A).256:BE.BE.6|
00000980: 3A 82 3A 82 00 9B 11 4C 00 8B 20 57 53 28 49 29 |:.:....L.. WS(I)|
00000990: B2 30 20 A7 20 82 3A 89 20 38 30 00 C3 11 4D 00 |.0 . .:. 80...M.|
000009A0: 44 49 B2 42 45 AB 42 42 3A 81 20 41 B2 31 20 A4 |DI.BE.BB:. A.1 .|
000009B0: 20 57 53 28 49 29 3A 81 20 42 B2 30 20 A4 20 44 | WS(I):. B.0 . D|
000009C0: 49 AB 31 00 E1 11 4E 00 97 20 41 AC 44 49 AA 42 |I.1...N.. A.DI.B|
000009D0: 42 AA 42 2C C2 28 42 42 AA 42 29 3A 82 20 42 2C |B.B,.(BB.B):. B,|
000009E0: 41 00 F2 11 4F 00 42 45 B2 41 AC 44 49 AA 42 45 |A...O.BE.A.DI.BE|
000009F0: 3A 82 00 0A 12 50 00 97 20 42 45 2C 32 35 35 3A |:....P.. BE,255:|
00000A00: 97 20 42 45 AA 31 2C 32 35 35 00 40 12 51 00 8D |. BE.1,255.@.Q..|
00000A10: 20 33 30 3A 99 22 42 45 49 20 54 41 53 54 45 4E | 30:."BEI TASTEN|
00000A20: 44 52 55 43 4B 20 57 49 52 44 20 56 4F 52 47 45 |DRUCK WIRD VORGE|
00000A30: 53 54 45 4C 4C 54 21 5B 34 53 50 41 43 45 5D 22 |STELLT![4SPACE]"|
00000A40: 00 56 12 52 00 99 22 5B 44 4F 57 4E 2C 33 37 53 |.V.R.."[DOWN,37S|
00000A50: 50 41 43 45 5D 22 00 6C 12 53 00 A1 20 41 24 3A |PACE]".l.S.. A$:|
00000A60: 8B 20 41 24 B2 22 22 20 A7 20 38 33 00 9D 12 54 |. A$."" . 83...T|
00000A70: 00 8D 20 33 30 3A 99 22 46 31 20 2D 20 53 43 48 |.. 30:."F1 - SCH|
00000A80: 4C 45 43 48 54 20 4B 4F 4D 50 4F 4E 49 45 52 54 |LECHT KOMPONIERT|
00000A90: 2C 20 42 49 54 54 45 20 4E 45 55 21 22 00 CD 12 |, BITTE NEU!"...|
00000AA0: 55 00 99 22 5B 44 4F 57 4E 2C 53 50 41 43 45 5D |U.."[DOWN,SPACE]|
00000AB0: 46 33 20 2D 20 42 49 54 54 20 49 4E 20 42 41 53 |F3 - BITT IN BAS|
00000AC0: 49 43 20 55 4D 57 41 4E 44 45 4C 4E 22 00 FF 12 |IC UMWANDELN"...|
00000AD0: 56 00 99 22 5B 44 4F 57 4E 2C 53 50 41 43 45 5D |V.."[DOWN,SPACE]|
00000AE0: 2B 3D 53 43 48 4E 45 4C 4C 45 52 5B 32 53 50 41 |+=SCHNELLER[2SPA|
00000AF0: 43 45 5D 2D 3D 4C 41 4E 47 53 41 4D 45 52 22 00 |CE]-=LANGSAMER".|
00000B00: 28 13 57 00 53 B2 35 34 32 37 32 3A 42 B2 33 30 |(.W.S.54272:B.30|
00000B10: 30 30 30 3A 81 20 49 B2 30 20 A4 20 32 34 3A 97 |000:. I.0 . 24:.|
00000B20: 20 53 AA 49 2C 30 3A 82 00 4C 13 58 00 97 20 53 | S.I,0:..L.X.. S|
00000B30: AA 36 2C 32 34 30 3A 97 20 53 AA 31 33 2C 32 34 |.6,240:. S.13,24|
00000B40: 30 3A 97 20 53 AA 32 30 2C 32 34 4F 00 77 13 59 |0:. S.20,24O.w.Y|
00000B50: 00 97 20 53 AA 34 2C 33 33 3A 97 20 53 AA 31 31 |.. S.4,33:. S.11|
00000B60: 2C 33 33 3A 97 20 53 AA 31 38 2C 33 33 3A 97 20 |,33:. S.18,33:. |
00000B70: 53 AA 32 34 2C 31 35 00 90 13 5A 00 8B 20 C2 28 |S.24,15...Z.. .(|
00000B80: 42 29 B2 32 35 35 20 A7 20 42 B2 33 30 30 30 30 |B).255 . B.30000|
00000B90: 00 A5 13 5B 00 A1 20 41 24 3A 8B 20 41 24 B2 22 |...[.. A$:. A$."|
00000BA0: 22 A7 20 39 37 00 C6 13 5C 00 8B 20 41 24 B2 22 |". 97...\.. A$."|
00000BB0: 5B 46 31 5D 22 A7 20 97 20 53 AA 32 34 2C 30 3A |[F1]". . S.24,0:|
00000BC0: 59 B2 31 3A 89 39 00 E6 13 5D 00 8B 20 41 24 B2 |Y.1:.9...].. A$.|
00000BD0: 22 5B 46 33 5D 22 A7 20 97 20 53 AA 32 34 2C 30 |"[F3]". . S.24,0|
00000BE0: 3A 89 20 31 30 31 00 0A 14 5E 00 8B 20 41 24 B2 |:. 101...^.. A$.|
00000BF0: 22 2B 22 A7 20 47 45 B2 47 45 AB 31 3A 8B 20 47 |"+". GE.GE.1:. G|
00000C00: 45 B2 30 20 A7 20 47 45 B2 31 00 32 14 5F 00 8B |E.0 . GE.1.2._..|
00000C10: 20 41 24 B2 22 2D 22 A7 20 47 45 B2 47 45 AA 31 | A$."-". GE.GE.1|
00000C20: 3A 8B 20 47 45 B2 32 35 36 20 A7 20 47 45 B2 32 |:. GE.256 . GE.2|
00000C30: 35 35 00 60 14 60 00 99 22 5B 48 4F 4D 45 2C 38 |55.`.`.."[HOME,8|
00000C40: 44 4F 57 4E 2C 33 31 52 49 47 48 54 2C 34 53 50 |DOWN,31RIGHT,4SP|
00000C50: 41 43 45 2C 34 4C 45 46 54 5D 33 30 30 2D 47 45 |ACE,4LEFT]300-GE|
00000C60: 00 94 14 61 00 97 20 53 2C C2 28 42 29 3A 97 20 |...a.. S,.(B):. |
00000C70: 53 AA 31 2C C2 28 42 AA 31 29 3A 97 20 53 AA 37 |S.1,.(B.1):. S.7|
00000C80: 2C C2 28 42 AA 32 29 3A 97 20 53 AA 38 2C C2 28 |,.(B.2):. S.8,.(|
00000C90: 42 AA 33 29 00 B4 14 62 00 97 20 53 AA 31 34 2C |B.3)...b.. S.14,|
00000CA0: C2 28 42 AA 34 29 3A 97 20 53 AA 31 35 2C C2 28 |.(B.4):. S.15,.(|
00000CB0: 42 AA 35 29 00 BE 14 63 00 42 B2 42 AA 36 00 D4 |B.5)...c.B.B.6..|
00000CC0: 14 64 00 81 20 54 B2 31 20 A4 20 47 45 3A 82 3A |.d.. T.1 . GE:.:|
00000CD0: 89 20 39 30 00 F1 14 65 00 41 B2 33 30 30 30 30 |. 90...e.A.30000|
00000CE0: 3A 42 B2 31 30 30 30 3A 97 20 31 30 32 32 2C 47 |:B.1000:. 1022,G|
00000CF0: 45 00 2F 15 66 00 81 20 49 B2 30 20 A4 20 31 30 |E./.f.. I.0 . 10|
00000D00: A9 32 3A 41 31 28 49 AD 53 29 B2 C2 28 41 AA 31 |.2:A1(I.S)..(A.1|
00000D10: 29 AA 32 35 36 AC C2 28 41 AA 31 AA 49 29 3A 8B |).256..(A.1.I):.|
00000D20: 20 C2 28 41 AA 31 29 B2 32 35 35 A7 31 30 36 00 | .(A.1).255.106.|
00000D30: 53 15 67 00 82 3A 99 22 3A 43 4C 52 5D 22 3B 42 |S.g..:.":CLR]";B|
00000D40: 3B 22 5B 4C 45 46 54 5D 44 41 54 41 22 41 31 28 |;"[LEFT]DATA"A1(|
00000D50: 30 29 3B 00 76 15 68 00 81 20 49 B2 31 20 A4 20 |0);.v.h.. I.1 . |
00000D60: 35 3A 99 22 5B 4C 45 46 54 5D 2C 22 41 31 28 31 |5:."[LEFT],"A1(1|
00000D70: 29 3B 3A 82 3B 99 00 8E 15 69 00 99 22 41 3D 22 |);:.;....i.."A="|
00000D80: 41 AA 31 32 22 3A 42 3D 22 42 AA 31 22 3A 00 00 |A.12":B="B.1":..|
00000D90: 00 |. |
..%.... *****************************.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...@.. A.1
. H.4.E.A.N1(A.4.3).N(X):N1(A.4.2).NO(X,
1).4:N1(A.4.1).2.N(X):N1(A.4).N1(2):..K.
B...Y.C.. A.1 . H...D.N2(A).NO(X,.(.(1).
6)).(.(.(1).2).1)...E.N3(A).NO(X,.(.(1).
6)).(.(.(1).2).1).R.F.."[HOME,4DOWN,14RI
GHT]"I"[12RIGHT]"E...G.."[3DOWN,7RIGHT,4
SPACE,4LEFT]"A...H...*.I.. A.1 . H:. BE,
N1(A). 255:.BE.1,N1(A).256.Q.J.. BE.2,N2
(A). 255:. BE.3,N2(A).256...K.. BE.4,N3(
A). 255:. BE.5,N3(A).256:BE.BE.6:.:....L
.. WS(I).0 . .:. 80.C.M.DI.BE.BB:. A.1 .
WS(I):. B.0 . DI.1...N.. A.DI.BB.B,B(BB
.B):. B,A...O.BE.A.DI.BE:....P.. BE,255:
. BE.1,255.@.Q.. 30:."BEI TASTENDRUCK WI
RD VORGESTELLT![4SPACE]".V.R.."[DOWN,37S
PACE]".L.S.. A$:. A$."" . 83...T.. 30:."
F1 - SCHLECHT KOMPONIERT, BITTE NEU!".M.
U.."[DOWN,SPACE]F3 - BITT IN BASIC UMWAN
DELN"...V.."[DOWN,SPACE]+=SCHNELLER[2SPA
CE]-=LANGSAMER".(.W.S.54272:B.30000:. I.
0 . 24:. S.I,0:..L.X.. S.6,240:. S.13,24
0:. S.20,24O.W.Y.. S.4,33:. S.11,33:. S.
18,33:. S.24,15...Z.. B(B).255 . B.30000
...[.. A$:. A$."". 97.F.\.. A$."[F1]". .
S.24,0:Y.1:.9...].. A$."[F3]". . S.24,0
:. 101...^.. A$."+". GE.GE.1:. GE.0 . GE
.1.2._.. A$."-". GE.GE.1:. GE.256 . GE.2
55.`.`.."[HOME,8DOWN,31RIGHT,4SPACE,4LEF
T]300-GE...A.. S,B(B):. S.1,B(B.1):. S.7
,B(B.2):. S.8,B(B.3)...B.. S.14,B(B.4):.
S.15,B(B.5)...C.B.B.6.T.D.. T.1 . GE:.:
. 90...E.A.30000:B.1000:. 1022,GE./.F..
I.0 . 10.2:A1(I.S).B(A.1).256.B(A.1.I):.
B(A.1).255.106.S.G..:.":CLR]";B;"[LEFT]
DATA"A1(0);.V.H.. I.1 . 5:."[LEFT],"A1(1
);:.;....I.."A="A.12":B="B.1":...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL