HISTOGRAMME SIM.
FILE INFORMATION
FILENAME(S): HISTOGRAMME SIM.
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-11-30 16:28:47
APPEARS ON: 1 disk(s)
FILE HASH
6109698bb2065ae130cb4107222ee0f447ad178d0ba6706b91f10baf66b24684
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RED WOLFGANG 01 | HISTOGRAMME SIM. | PRG | BrainSkull, Wolfgang Red | 28 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 1E 00 8F 2A 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 2A 2A 2A 00 4F 08 23 00 8F 2A 2A |********.O.#..**| 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 20 2A 2A 00 | **.| 00000050: 76 08 28 00 8F 2A 2A 20 20 20 20 20 20 20 22 48 |v.(..** "H| 00000060: 49 53 54 4F 47 52 41 4D 4D 45 22 20 20 20 20 20 |ISTOGRAMME" | 00000070: 20 20 20 20 2A 2A 00 9D 08 2D 00 8F 2A 2A 20 20 | **...-..** | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 20 20 20 20 20 20 20 20 20 20 20 2A 2A 00 C4 08 | **...| 000000A0: 32 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |2..*************| 000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000C0: 2A 2A 2A 2A 00 CA 08 37 00 8F 00 E6 08 3C 00 8F |****...7.....<..| 000000D0: 20 20 20 20 20 20 53 20 49 20 4D 20 4F 20 4E 20 | S I M O N | 000000E0: 27 20 53 20 20 21 00 EC 08 41 00 8F 00 13 09 46 |' S !...A.....F| 000000F0: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************| 00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000110: 2A 2A 2A 00 19 09 4B 00 8F 00 32 09 50 00 8F 20 |***...K...2.P.. | 00000120: 20 20 20 20 20 45 20 49 20 4E 20 47 20 41 20 42 | E I N G A B| 00000130: 20 45 00 38 09 55 00 8F 00 56 09 64 00 99 22 93 | E.8.U...V.d..".| 00000140: 22 3A 97 35 33 32 38 30 2C 31 32 3A 97 20 35 33 |":.53280,12:. 53| 00000150: 32 38 31 2C 31 32 00 73 09 6E 00 99 C7 28 32 38 |281,12.s.n...(28| 00000160: 29 3A 8F 20 5A 45 49 43 48 45 4E 46 41 52 42 45 |):. ZEICHENFARBE| 00000170: 20 64 09 00 91 09 78 00 99 22 12 20 20 20 20 20 | d....x..". | 00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000190: 22 00 AF 09 82 00 99 22 12 20 48 49 53 54 4F 47 |"......". HISTOG| 000001A0: 52 41 4D 4D 20 5A 45 49 43 48 4E 45 4E 20 22 00 |RAMM ZEICHNEN ".| 000001B0: CD 09 8C 00 99 22 12 20 20 20 20 20 20 20 20 20 |.....". | 000001C0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 D5 09 | "...| 000001D0: 96 00 99 3A 99 00 F8 09 A0 00 85 22 57 49 45 56 |...:......."WIEV| 000001E0: 49 45 4C 45 20 57 45 52 54 45 20 28 4E 20 3C 3D |IELE WERTE (N <=| 000001F0: 20 34 30 29 20 22 3B 4E 00 0E 0A AA 00 86 20 41 | 40) ";N...... A| 00000200: 28 4E 29 3A 4D 58 B2 AB 31 45 31 30 3A 99 00 1C |(N):MX..1E10:...| 00000210: 0A C8 00 81 20 4A B2 31 20 A4 20 4E 00 30 0A D2 |.... J.1 . N.0..| 00000220: 00 99 22 57 45 52 54 22 3B 4A 3B A3 31 30 29 3B |.."WERT";J;.10);| 00000230: 00 50 0A DC 00 85 20 41 28 4A 29 3A 8B 20 41 28 |.P.... A(J):. A(| 00000240: 4A 29 20 B1 4D 58 20 A7 20 4D 58 B2 41 28 4A 29 |J) .MX . MX.A(J)| 00000250: 00 5C 0A E6 00 82 20 4A 3A 64 66 31 00 82 0A 2C |.\.... J:df1...,| 00000260: 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************| 00000270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000280: 2A 2A 00 A8 0A 31 01 8F 2A 2A 20 20 20 20 20 20 |**...1..** | 00000290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002A0: 20 20 20 20 20 20 2A 2A 00 CE 0A 36 01 8F 2A 2A | **...6..**| 000002B0: 20 20 20 20 20 20 47 20 52 20 41 20 50 20 48 20 | G R A P H | 000002C0: 49 20 4B 20 20 20 20 20 20 20 20 20 2A 2A 00 F4 |I K **..| 000002D0: 0A 3B 01 8F 2A 2A 20 20 20 20 20 20 20 20 20 20 |.;..** | 000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002F0: 20 20 2A 2A 00 1A 0B 40 01 8F 2A 2A 2A 2A 2A 2A | **...@..******| 00000300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 25 0B 4A 01 64 |**********.%.J.d| 00000320: 01 20 31 2C 38 00 2B 0B 4F 01 8F 00 46 0B 54 01 |. 1,8.+.O...F.T.| 00000330: 8F 20 20 20 20 20 20 20 20 58 20 2D 20 41 20 43 |. X - A C| 00000340: 20 48 20 53 20 45 00 4C 0B 59 01 8F 00 6B 0B 5E | H S E.L.Y...k.^| 00000350: 01 58 31 B2 32 33 3A 59 31 B2 31 38 30 3A 58 32 |.X1.23:Y1.180:X2| 00000360: B2 33 32 30 3A 59 32 B2 31 38 30 00 80 0B 68 01 |.320:Y2.180...h.| 00000370: 64 03 20 58 31 2C 59 31 2C 58 32 2C 59 32 2C 31 |d. X1,Y1,X2,Y2,1| 00000380: 00 86 0B 6D 01 8F 00 A1 0B 72 01 8F 20 20 20 20 |...m.....r.. | 00000390: 20 20 20 20 59 20 2D 20 41 20 43 20 48 20 53 20 | Y - A C H S | 000003A0: 45 00 A7 0B 77 01 8F 00 C3 0B 7C 01 58 31 B2 33 |E...w.....|.X1.3| 000003B0: 30 3A 59 32 B2 32 30 30 3A 58 32 B2 33 30 3A 59 |0:Y2.200:X2.30:Y| 000003C0: 32 B2 30 00 D8 0B 86 01 64 03 20 58 31 2C 59 31 |2.0.....d. X1,Y1| 000003D0: 2C 58 32 2C 59 32 2C 31 00 DE 0B 8B 01 8F 00 01 |,X2,Y2,1........| 000003E0: 0C 90 01 8F 20 20 20 20 41 43 48 53 45 4E 20 20 |.... ACHSEN | 000003F0: 53 20 4B 20 41 20 4C 20 49 20 45 20 52 20 45 20 |S K A L I E R E | 00000400: 4E 00 07 0C 95 01 8F 00 1B 0C 9A 01 81 20 4A B2 |N............ J.| 00000410: 31 30 20 A4 20 31 20 A9 20 AB 31 00 3D 0C A4 01 |10 . 1 . .1.=...| 00000420: 58 31 B2 32 33 3A 59 31 B2 31 38 30 AB 4A AC 31 |X1.23:Y1.180.J.1| 00000430: 36 3A 58 32 B2 33 30 3A 59 32 B2 59 31 00 52 0C |6:X2.30:Y2.Y1.R.| 00000440: AE 01 64 03 20 58 31 2C 59 32 2C 58 32 2C 59 32 |..d. X1,Y2,X2,Y2| 00000450: 2C 31 00 70 0C B8 01 58 31 B2 32 36 3A 59 31 B2 |,1.p...X1.26:Y1.| 00000460: 59 32 AA 38 3A 58 32 B2 33 30 3A 59 32 B2 59 31 |Y2.8:X2.30:Y2.Y1| 00000470: 00 85 0C C2 01 64 03 20 58 31 2C 59 31 2C 58 32 |.....d. X1,Y1,X2| 00000480: 2C 59 32 2C 31 00 8D 0C CC 01 82 20 4A 00 93 0C |,Y2,1...... J...| 00000490: EF 01 8F 00 B3 0C F4 01 8F 20 20 20 42 20 45 20 |......... B E | 000004A0: 53 20 43 20 48 20 52 20 49 20 46 20 54 20 55 20 |S C H R I F T U | 000004B0: 4E 20 47 00 B9 0C F9 01 8F 00 CD 0C FE 01 64 0B |N G...........d.| 000004C0: 20 31 30 2C 20 36 2C 33 37 2C 31 2C 31 00 E6 0C | 10, 6,37,1,1...| 000004D0: 08 02 64 6F 20 31 2C 31 37 2C 22 01 31 30 30 22 |..do 1,17,".100"| 000004E0: 2C 31 2C 31 2C 37 00 FF 0C 12 02 64 6F 20 35 2C |,1,1,7.....do 5,| 000004F0: 20 39 37 2C 22 01 35 30 22 2C 31 2C 31 2C 38 00 | 97,".50",1,1,8.| 00000500: 14 0D 1C 02 64 0B 20 31 33 2C 31 37 37 2C 34 38 |....d. 13,177,48| 00000510: 2C 31 2C 31 00 1A 0D 21 02 8F 00 38 0D 26 02 8F |,1,1...!...8.&..| 00000520: 20 20 20 48 20 49 20 4C 20 46 20 53 20 4C 20 49 | H I L F S L I| 00000530: 20 4E 20 49 20 45 20 4E 00 3E 0D 2B 02 8F 00 5A | N I E N.>.+...Z| 00000540: 0D 30 02 81 20 58 B2 33 30 20 A4 20 33 32 30 20 |.0.. X.30 . 320 | 00000550: A9 20 31 30 3A 59 B2 31 30 30 00 67 0D 3A 02 64 |. 10:Y.100.g.:.d| 00000560: 02 20 58 2C 59 2C 31 00 79 0D 44 02 59 B2 32 30 |. X,Y,1.y.D.Y.20| 00000570: 3A 64 02 20 58 2C 59 2C 31 00 81 0D 4E 02 82 20 |:d. X,Y,1...N.. | 00000580: 58 00 87 0D 53 02 8F 00 A2 0D 58 02 8F 20 20 20 |X...S.....X.. | 00000590: 20 52 20 45 20 43 20 48 20 54 20 45 20 43 20 4B | R E C H T E C K| 000005A0: 20 45 00 A8 0D 5D 02 8F 00 C8 0D 62 02 42 B2 B5 | E...].....b.B..| 000005B0: 28 32 37 30 AD 4E 29 3A 48 B2 30 2E 35 3A 8F 20 |(270.N):H.0.5:. | 000005C0: 42 3D 42 52 45 49 54 45 00 D6 0D 6C 02 81 20 4A |B=BREITE...l.. J| 000005D0: B2 31 20 A4 20 4E 00 EF 0D 76 02 58 31 B2 28 4A |.1 . N...v.X1.(J| 000005E0: AB 31 29 AC 42 AA 33 30 3A 59 31 B2 31 38 30 00 |.1).B.30:Y1.180.| 000005F0: 11 0E 80 02 58 32 B2 58 31 3A 59 32 B2 B5 28 31 |....X2.X1:Y2..(1| 00000600: 38 30 AB 31 36 30 AC 41 28 4A 29 AD 4D 58 AA 48 |80.160.A(J).MX.H| 00000610: 29 00 26 0E 8A 02 64 03 20 58 31 2C 59 31 2C 58 |).&...d. X1,Y1,X| 00000620: 32 2C 59 32 2C 31 00 44 0E 94 02 58 31 B2 58 32 |2,Y2,1.D...X1.X2| 00000630: 3A 59 31 B2 59 32 3A 58 32 B2 58 31 AA 42 3A 59 |:Y1.Y2:X2.X1.B:Y| 00000640: 32 B2 59 31 00 59 0E 9E 02 64 03 20 58 31 2C 59 |2.Y1.Y...d. X1,Y| 00000650: 31 2C 58 32 2C 59 32 2C 31 00 76 0E A8 02 58 31 |1,X2,Y2,1.v...X1| 00000660: B2 58 32 3A 59 31 B2 59 32 3A 58 32 B2 58 31 3A |.X2:Y1.Y2:X2.X1:| 00000670: 59 32 B2 31 38 30 00 8B 0E B2 02 64 03 20 58 31 |Y2.180.....d. X1| 00000680: 2C 59 31 2C 58 32 2C 59 32 2C 31 00 93 0E BC 02 |,Y1,X2,Y2,1.....| 00000690: 82 20 4A 00 AA 0E 20 03 A1 20 41 24 3A 8B 20 41 |. J... .. A$:. A| 000006A0: 24 B2 22 22 20 A7 20 38 30 30 00 D0 0E 2A 03 8F |$."" . 800...*..| 000006B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006D0: 00 F6 0E 2F 03 8F 2A 2A 20 20 20 20 20 20 20 20 |.../..** | 000006E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000006F0: 20 20 20 20 2A 2A 00 1C 0F 34 03 8F 2A 2A 20 20 | **...4..** | 00000700: 46 31 20 4D 49 54 20 22 43 53 45 54 32 22 20 42 |F1 MIT "CSET2" B| 00000710: 45 4C 45 47 45 4E 20 20 20 20 2A 2A 00 42 0F 39 |ELEGEN **.B.9| 00000720: 03 8F 2A 2A 20 20 20 20 20 20 20 20 20 20 20 20 |..** | 00000730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000740: 2A 2A 00 68 0F 3E 03 8F 2A 2A 2A 2A 2A 2A 2A 2A |**.h.>..********| 00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000760: 2A 2A 2A 2A 2A 2A 2A 2A 00 85 0F 48 03 64 74 31 |********...H.dt1| 00000770: 2C 22 43 53 45 54 32 3A 50 41 55 53 45 35 22 AA |,"CSET2:PAUSE5".| 00000780: C7 28 31 33 29 00 90 0F 52 03 99 22 93 22 3A 99 |.(13)...R..".":.| 00000790: 00 BA 0F 5C 03 99 22 20 44 52 55 45 43 4B 45 20 |...\.." DRUECKE | 000007A0: 46 31 20 55 4D 20 47 52 41 50 48 49 4B 20 46 55 |F1 UM GRAPHIK FU| 000007B0: 45 52 20 35 20 53 45 43 2E 22 00 D0 0F 66 03 99 |ER 5 SEC."...f..| 000007C0: 22 20 44 41 52 5A 55 53 54 45 4C 4C 45 4E 2E 22 |" DARZUSTELLEN."| 000007D0: 00 F6 0F 84 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********| 000007E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000007F0: 2A 2A 2A 2A 2A 2A 00 1C 10 89 03 8F 2A 2A 20 20 |******......** | 00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000810: 20 20 20 20 20 20 20 20 20 20 2A 2A 00 42 10 8E | **.B..| 00000820: 03 8F 2A 2A 20 20 20 46 37 20 3A 50 52 49 4E 54 |..** F7 :PRINT| 00000830: 20 41 28 4A 29 2C 4A 3D 31 20 2D 20 4E 20 20 20 | A(J),J=1 - N | 00000840: 2A 2A 00 68 10 93 03 8F 2A 2A 20 20 20 20 20 20 |**.h....** | 00000850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000860: 20 20 20 20 20 20 2A 2A 00 8E 10 98 03 8F 2A 2A | **......**| 00000870: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000880: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A9 |**************..| 00000890: 10 A2 03 64 74 37 2C 22 47 4F 54 4F 31 30 30 30 |...dt7,"GOTO1000| 000008A0: 22 AA C7 28 31 33 29 3A 99 00 CC 10 AC 03 99 22 |"..(13):......."| 000008B0: 20 44 52 55 45 43 4B 45 20 46 37 20 55 4D 20 45 | DRUECKE F7 UM E| 000008C0: 49 4E 47 41 42 45 57 45 52 54 45 22 00 E1 10 B6 |INGABEWERTE"....| 000008D0: 03 99 22 20 41 55 46 5A 55 4C 49 53 54 45 4E 2E |.." AUFZULISTEN.| 000008E0: 22 00 E9 10 C0 03 99 3A 99 00 EF 10 CA 03 80 00 |"......:........| 000008F0: 0F 11 E8 03 8F 20 20 20 45 20 49 20 4E 20 47 20 |..... E I N G | 00000900: 41 20 42 20 45 20 57 20 45 20 52 20 54 20 45 00 |A B E W E R T E.| 00000910: 18 11 F2 03 99 22 93 22 00 26 11 FC 03 81 20 4A |.....".".&.... J| 00000920: B2 31 20 A4 20 4E 00 40 11 06 04 99 22 20 57 45 |.1 . N.@...." WE| 00000930: 52 54 20 20 22 4A 3B A3 31 30 29 3B 41 28 4A 29 |RT "J;.10);A(J)| 00000940: 00 48 11 10 04 82 20 4A 00 4E 11 1A 04 80 00 00 |.H.... J.N......| 00000950: 00 |. |
..(....*********************************
.O.#..** **.
V.(..** "HISTOGRAMME" **..
.-..** **.D.
2..*********************************.J.7
.....<.. S I M O N ' S !...A.....F
..*********************************...K.
..2.P.. E I N G A B E.8.U...V.D..".
":.53280,12:. 53281,12.S.N..G(28):. ZEIC
HENFARBE D....X..".
"......". HISTOGRAMM ZEICHNEN ".M....".
".U....:.... .."WIEV
IELE WERTE (N <= 40) ";N...... A(N):MX..
1E10:....H.. J.1 . N.0.R.."WERT";J;.10);
.P.... A(J):. A(J) .MX . MX.A(J).\.... J
:DF1...,..******************************
**...1..** **
.N.6..** G R A P H I K **..
.;..** **...@
..********************************.%.J.D
. 1,8.+.O...F.T.. X - A C H S E.L
.Y...K.^.X1.23:Y1.180:X2.320:Y2.180...H.
D. X1,Y1,X2,Y2,1...M.....R.. Y -
A C H S E...W...C.|.X1.30:Y2.200:X2.30:Y
2.0.X...D. X1,Y1,X2,Y2,1............
ACHSEN S K A L I E R E N............ J.
10 . 1 . .1.=...X1.23:Y1.180.J.16:X2.30:
Y2.Y1.R...D. X1,Y2,X2,Y2,1.P...X1.26:Y1.
Y2.8:X2.30:Y2.Y1...B.D. X1,Y1,X2,Y2,1...
L.. J............ B E S C H R I F T U
N G.......M...D. 10, 6,37,1,1.....DO 1,1
7,".100",1,1,7.....DO 5, 97,".50",1,1,8.
....D. 13,177,48,1,1...!...8.&.. H I L
F S L I N I E N.>.+...Z.0.. X.30 . 320
. 10:Y.100.G.:.D. X,Y,1.Y.D.Y.20:D. X,Y,
1...N.. X...S.....X.. R E C H T E C K
E...]...H.B.B..(270.N):H.0.5:. B=BREITE
.V.L.. J.1 . N...V.X1.(J.1).B.30:Y1.180.
....X2.X1:Y2..(180.160.A(J).MX.H).&...D.
X1,Y1,X2,Y2,1.D...X1.X2:Y1.Y2:X2.X1.B:Y
2.Y1.Y...D. X1,Y1,X2,Y2,1.V...X1.X2:Y1.Y
2:X2.X1:Y2.180.....D. X1,Y1,X2,Y2,1.....
. J... .. A$:. A$."" . 800.P.*..********
************************.../..**
**...4..** F1 MIT "
CSET2" BELEGEN **.B.9..**
**.H.>..****************
****************...H.DT1,"CSET2:PAUSE5".
G(13)...R..".":....\.." DRUECKE F1 UM GR
APHIK FUER 5 SEC.".P.F.." DARZUSTELLEN."
......********************************..
....** **.B..
..** F7 :PRINT A(J),J=1 - N **.H....
** **......**
******************************.....DT7,"
GOTO1000".G(13):..L...." DRUECKE F7 UM E
INGABEWERTE"......" AUFZULISTEN."......:
....J........ E I N G A B E W E R T E.
.....".".&.... J.1 . N.@...." WERT "J;.
10);A(J).H.... J.N.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL