> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 4D 08 6E 00 8F 20 2A 20 |*******.M.n.. * |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 73 08 | *.s.|
00000050: 78 00 8F 20 2A 20 20 20 20 20 20 20 20 54 20 4F |x.. * T O|
00000060: 20 4E 20 44 20 45 20 4D 20 4F 20 20 20 20 20 20 | N D E M O |
00000070: 20 20 2A 00 99 08 82 00 8F 20 2A 20 20 20 20 20 | *...... * |
00000080: 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | -------------|
00000090: 20 20 20 20 20 20 20 20 2A 00 BF 08 8C 00 8F 20 | *...... |
000000A0: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.|
000000C0: E5 08 96 00 8F 20 2A 20 20 42 59 20 20 20 54 4F |..... * BY TO|
000000D0: 42 49 41 53 20 20 20 20 20 20 20 20 4E 49 43 4F |BIAS NICO|
000000E0: 4C 20 20 20 2A 00 0B 09 A0 00 8F 20 2A 20 20 20 |L *...... * |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000100: 20 20 20 20 20 20 20 20 20 20 2A 00 31 09 AA 00 | *.1...|
00000110: 8F 20 2A 20 20 20 20 20 20 20 4E 45 55 57 49 45 |. * NEUWIE|
00000120: 53 45 4E 53 54 52 41 53 53 45 20 32 30 20 20 20 |SENSTRASSE 20 |
00000130: 2A 00 57 09 B4 00 8F 20 2A 20 20 20 20 20 20 20 |*.W.... * |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 20 20 20 20 20 20 2A 00 7D 09 BE 00 8F 20 2A 20 | *.}.... * |
00000160: 20 20 20 20 20 20 36 30 30 30 20 20 46 52 41 4D | 6000 FRAM|
00000170: 4B 46 55 52 54 20 20 37 31 20 20 20 2A 00 A3 09 |KFURT 71 *...|
00000180: C8 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |... * |
00000190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001A0: 20 20 2A 00 C9 09 D2 00 8F 20 2A 2A 2A 2A 2A 2A | *...... ******|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 CF 09 DC 00 20 00 |*********..... .|
000001D0: F5 09 E6 00 8F 20 2A 2A 2A 2A 2A 2A 20 42 49 4C |..... ****** BIL|
000001E0: 44 53 43 48 49 52 4D 41 55 46 42 41 55 20 20 2A |DSCHIRMAUFBAU *|
000001F0: 2A 2A 2A 2A 2A 00 12 0A F0 00 99 20 22 93 11 11 |*****...... "...|
00000200: 11 11 11 20 20 20 20 20 20 20 54 4F 4E 44 45 4D |... TONDEM|
00000210: 4F 22 00 29 0A FA 00 99 20 22 20 20 20 20 20 20 |O".).... " |
00000220: 20 2D 2D 2D 2D 2D 2D 2D 22 00 49 0A 04 01 99 20 | -------".I.... |
00000230: 22 11 11 11 20 50 4F 54 20 58 20 3D 20 4C 41 55 |"... POT X = LAU|
00000240: 54 53 54 41 45 52 4B 45 22 00 66 0A 0E 01 99 20 |TSTAERKE".f.... |
00000250: 22 11 11 11 20 50 4F 54 20 59 20 3D 20 54 4F 4E |"... POT Y = TON|
00000260: 48 4F 45 48 45 22 00 6C 0A 18 01 20 00 92 0A 22 |HOEHE".l... ..."|
00000270: 01 8F 20 2A 2A 2A 2A 2A 2A 2A 20 57 45 52 54 45 |.. ******* WERTE|
00000280: 20 41 55 53 4C 45 53 45 4E 20 20 2A 2A 2A 2A 2A | AUSLESEN *****|
00000290: 2A 2A 00 A0 0A 2C 01 97 20 35 36 33 33 33 2C 31 |**...,.. 56333,1|
000002A0: 00 B0 0A 36 01 97 20 35 36 33 32 30 2C 31 39 31 |...6.. 56320,191|
000002B0: 00 CB 0A 40 01 4C 20 B2 20 B5 20 28 C2 20 28 35 |...@.L . . (. (5|
000002C0: 34 32 39 37 29 20 AD 20 31 37 29 00 DD 0A 4A 01 |4297) . 17)...J.|
000002D0: 54 20 B2 20 C2 20 28 35 34 32 39 38 29 00 ED 0A |T . . (54298)...|
000002E0: 54 01 97 20 35 36 33 32 30 2C 31 32 37 00 FD 0A |T.. 56320,127...|
000002F0: 5E 01 97 20 35 36 33 33 33 2C 31 32 39 00 03 0B |^.. 56333,129...|
00000300: 68 01 20 00 29 0B 72 01 8F 20 2A 2A 2A 2A 2A 2A |h. .).r.. ******|
00000310: 2A 2A 20 54 4F 4E 20 45 52 5A 45 55 47 45 4E 20 |** TON ERZEUGEN |
00000320: 20 2A 2A 2A 2A 2A 2A 2A 2A 00 37 0B 7C 01 97 20 | ********.7.|.. |
00000330: 35 34 32 39 36 2C 4C 00 47 0B 86 01 97 20 35 34 |54296,L.G.... 54|
00000340: 32 37 39 2C 32 30 30 00 55 0B 90 01 97 20 35 34 |279,200.U.... 54|
00000350: 32 38 30 2C 54 00 65 0B 9A 01 97 20 35 34 32 38 |280,T.e.... 5428|
00000360: 35 2C 32 34 30 00 74 0B A4 01 97 20 35 34 32 38 |5,240.t.... 5428|
00000370: 33 2C 31 37 00 7A 0B AE 01 20 00 A0 0B B8 01 8F |3,17.z... ......|
00000380: 20 2A 2A 2A 2A 2A 2A 20 57 45 52 54 45 20 44 41 | ****** WERTE DA|
00000390: 52 53 54 45 4C 4C 45 4E 20 20 2A 2A 2A 2A 2A 2A |RSTELLEN ******|
000003A0: 00 BD 0B C2 01 99 20 22 13 11 11 11 11 11 11 11 |...... "........|
000003B0: 11 11 11 11 11 11 11 11 11 11 11 11 22 00 D7 0B |............"...|
000003C0: CC 01 99 20 22 20 20 20 20 20 20 20 20 20 20 20 |... " |
000003D0: 20 20 20 20 20 20 22 00 ED 0B D6 01 99 20 22 91 | "...... ".|
000003E0: 20 4C 20 3D 22 4C 2C 22 54 20 3D 22 54 00 F3 0B | L ="L,"T ="T...|
000003F0: E0 01 20 00 19 0C EA 01 8F 20 2A 2A 2A 2A 2A 2A |.. ...... ******|
00000400: 2A 2A 2A 20 52 55 45 43 4B 53 50 52 55 4E 47 20 |*** RUECKSPRUNG |
00000410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 23 0C F4 01 89 20 |*********.#.... |
00000420: 32 39 30 00 29 0C FE 01 20 00 2F 0C 08 02 20 00 |290.)... ./... .|
00000430: 35 0C 12 02 20 00 5B 0C 1C 02 8F 20 2A 2A 2A 2A |5... .[.... ****|
00000440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 81 0C 26 02 |***********...&.|
00000460: 8F 20 2A 2A 2A 20 41 45 4E 44 45 52 55 4E 47 45 |. *** AENDERUNGE|
00000470: 4E 20 46 55 45 52 20 56 43 2D 32 30 20 20 2A 2A |N FUER VC-20 **|
00000480: 2A 00 A7 0C 30 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...0.. ********|
00000490: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004A0: 2A 2A 2A 2A 2A 2A 2A 00 AD 0C 3A 02 8F 00 D2 0C |*******...:.....|
000004B0: 44 02 8F 20 44 49 45 20 5A 45 49 4C 45 4E 20 33 |D.. DIE ZEILEN 3|
000004C0: 30 30 2D 33 35 30 20 55 4E 44 20 33 38 30 2D 34 |00-350 UND 380-4|
000004D0: 32 30 00 E2 0C 4E 02 8F 20 4C 4F 45 53 43 48 45 |20...N.. LOESCHE|
000004E0: 4E 2E 00 E8 0C 58 02 8F 00 FC 0C 62 02 8F 20 4E |N....X.....b.. N|
000004F0: 45 55 20 45 49 4E 47 45 42 45 4E 3A 00 02 0D 6C |EU EINGEBEN:...l|
00000500: 02 8F 00 22 0D 76 02 8F 20 33 30 30 20 4C 3D 49 |...".v.. 300 L=I|
00000510: 4E 54 28 50 45 45 4B 28 33 36 38 37 32 29 2F 31 |NT(PEEK(36872)/1|
00000520: 37 29 00 48 0D 80 02 8F 20 33 31 30 20 54 3D 49 |7).H.... 310 T=I|
00000530: 4E 54 28 28 50 45 45 4B 28 33 36 38 37 33 29 2A |NT((PEEK(36873)*|
00000540: 2E 39 38 35 29 2F 32 29 00 57 0D 8A 02 8F 20 20 |.985)/2).W.... |
00000550: 20 20 20 2B 31 32 38 00 6E 0D 94 02 8F 20 33 38 | +128.n.... 38|
00000560: 30 20 50 4F 4B 45 20 33 36 38 37 38 2C 4C 00 85 |0 POKE 36878,L..|
00000570: 0D 9E 02 8F 20 33 39 30 20 50 4F 4B 45 20 33 36 |.... 390 POKE 36|
00000580: 38 37 36 2C 54 00 00 00 |876,T... |
..'.D.. *******************************.
M.N.. * *.S.
X.. * T O N D E M O *.....
. * ------------- *......
* *...... *
BY TOBIAS NICOL *... .. *
*.1.... *
NEUWIESENSTRASSE 20 *.W.... *
*.}.... * 60
00 FRAMKFURT 71 *...H.. *
*.I.R.. **************
*****************.O... ...... ****** BIL
DSCHIRMAUFBAU ******...... "......
TONDEMO".).... " -------".I....
"... POT X = LAUTSTAERKE".F.... "... POT
Y = TONHOEHE".L... ...".. ******* WERTE
AUSLESEN *******. .,.. 56333,1...6.. 5
6320,191.K.@.L . . (B (54297) . 17)...J.
T . B (54298)...T.. 56320,127...^.. 5633
3,129...H. .).R.. ******** TON ERZEUGEN
********.7.|.. 54296,L.G.... 54279,200.
U.... 54280,T.E.... 54285,240.T.... 5428
3,17.Z... . .... ****** WERTE DARSTELLEN
******...B.. "....................".W.
L.. " "...V.. ". L ="L,"
T ="T..... ...... ********* RUECKSPRUNG
*********.#.... 290.)... ./... .5... .[.
... *******************************...&.
. *** AENDERUNGEN FUER VC-20 ***...0..
*******************************...:...R.
D.. DIE ZEILEN 300-350 UND 380-420...N..
LOESCHEN....X.....B.. NEU EINGEBEN:...L
...".V.. 300 L=INT(PEEK(36872)/17).H....
310 T=INT((PEEK(36873)*.985)/2).W....
+128.N.... 380 POKE 36878,L...... 390
POKE 36876,T...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL