PROGRAMM 3 BAS
FILE INFORMATION
FILENAME(S): PROGRAMM 3 BAS
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-11-02 16:54:37
APPEARS ON: 4 disk(s)
FILE HASH
c70a87f3bde642fc1f83945543fd181a62143827e8349149a686ad8d3abe83f2
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 8 85 | PROGRAMM 3 BAS | PRG | Treasure Chest - Reamigation | 11 | 0 | DOWNLOAD FILE |
| 64 ER 8 85 | PROGRAMM 3 BAS | PRG | BrainSkull, Leopold Zyka, C64er | 11 | 0 | DOWNLOAD FILE |
| 64 ER 8 85 | PROGRAMM 3 BAS | PRG | DuncanTwain | 11 | 0 | DOWNLOAD FILE |
| 64 ER 8 85 | PROGRAMM 3 BAS | PRG | DuncanTwain | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 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 2A 2A 2A 2A 00 51 08 02 00 8F 20 |*********.Q.... | 00000030: 2A 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 20 20 20 | | 00000050: 2A 00 79 08 03 00 8F 20 2A 20 20 20 20 44 45 4D |*.y.... * DEM| 00000060: 4F 2D 50 52 4F 47 52 41 4D 4D 20 5A 55 4D 20 54 |O-PROGRAMM ZUM T| 00000070: 48 45 4D 41 20 20 20 20 2A 00 A1 08 04 00 8F 20 |HEMA *...... | 00000080: 2A 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 20 20 20 20 20 | | 000000A0: 2A 00 C9 08 05 00 8F 20 2A 20 20 20 20 20 20 20 |*...... * | 000000B0: 20 54 45 58 54 20 55 4E 44 20 47 52 41 46 49 4B | TEXT UND GRAFIK| 000000C0: 20 20 20 20 20 20 20 20 2A 00 F1 08 06 00 8F 20 | *...... | 000000D0: 2A 20 20 20 20 20 20 41 55 46 20 45 49 4E 45 4D |* AUF EINEM| 000000E0: 20 42 49 4C 44 53 43 48 49 52 4D 20 20 20 20 20 | BILDSCHIRM | 000000F0: 2A 00 19 09 07 00 8F 20 2A 20 20 20 20 20 20 20 |*...... * | 00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000110: 20 20 20 20 20 20 20 20 2A 00 41 09 08 00 8F 20 | *.A.... | 00000120: 2A 20 20 48 45 49 4D 4F 20 50 4F 4E 4E 41 54 48 |* HEIMO PONNATH| 00000130: 20 20 48 41 4D 42 55 52 47 20 31 39 38 34 20 20 | HAMBURG 1984 | 00000140: 2A 00 69 09 09 00 8F 20 2A 20 20 20 20 20 20 20 |*.i.... * | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 20 20 20 20 20 20 20 2A 00 90 09 0A 00 8F 2A | *......*| 00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000190: 00 CA 09 0F 00 9C 3A 99 C7 28 31 34 37 29 3A 5A |......:..(147):Z| 000001A0: B2 31 30 3A 53 B2 31 30 3A 8D 31 30 30 30 3A 99 |.10:S.10:.1000:.| 000001B0: 22 5A 55 56 4F 52 20 4E 4F 43 48 20 45 49 4E 45 |"ZUVOR NOCH EINE| 000001C0: 20 46 52 41 47 45 3A 22 3A 99 00 F7 09 14 00 85 | FRAGE:":.......| 000001D0: 22 49 53 54 20 48 49 52 45 53 2D 33 20 4B 4F 4D |"IST HIRES-3 KOM| 000001E0: 50 4C 45 54 54 20 47 45 4C 41 44 45 4E 20 28 4A |PLETT GELADEN (J| 000001F0: 2F 4E 29 22 3B 41 24 00 28 0A 19 00 8B 41 24 B2 |/N)";A$.(....A$.| 00000200: 22 4E 22 A7 99 3A 99 C7 28 31 38 29 22 42 52 41 |"N"..:..(18)"BRA| 00000210: 55 43 48 45 4E 20 53 49 45 20 41 42 45 52 21 22 |UCHEN SIE ABER!"| 00000220: C7 28 31 34 36 29 3A 80 00 4B 0A 1E 00 97 35 32 |.(146):..K....52| 00000230: 2C 31 32 38 3A 97 35 36 2C 31 32 38 3A 9E 33 37 |,128:.56,128:.37| 00000240: 34 39 38 3A 99 C7 28 31 34 37 29 00 72 0A 28 00 |498:..(147).r.(.| 00000250: 8F 20 2B 2B 2B 2B 2B 2B 20 53 49 4E 55 53 4B 55 |. ++++++ SINUSKU| 00000260: 52 56 45 20 5A 45 49 43 48 4E 45 4E 20 2B 2B 2B |RVE ZEICHNEN +++| 00000270: 2B 2B 00 B7 0A 2D 00 96 A5 41 28 58 29 B2 BF 28 |++...-...A(X)..(| 00000280: 58 29 3A 58 55 B2 AB 32 AC FF 3A 58 4F B2 32 AC |X):XU..2..:XO.2.| 00000290: FF 3A 59 55 B2 AB 32 2E 35 3A 59 4F B2 32 3A 54 |.:YU..2.5:YO.2:T| 000002A0: 52 53 2C 58 55 2C 58 4F 2C 59 55 2C 59 4F 3A 48 |RS,XU,XO,YU,YO:H| 000002B0: 46 4C 2C 36 2C 31 34 00 F5 0A 32 00 46 55 4E 4B |FL,6,14...2.FUNK| 000002C0: 54 2C 41 2C 58 55 2C 58 4F 3A 54 4C 4E 2C 58 55 |T,A,XU,XO:TLN,XU| 000002D0: 2C 30 2C 58 4F 2C 30 3A 54 4C 4E 2C 30 2C 59 55 |,0,XO,0:TLN,0,YU| 000002E0: 2C 30 2C 59 4F 3A 52 45 43 2C 30 2C 30 2C 33 31 |,0,YO:REC,0,0,31| 000002F0: 39 2C 31 39 39 00 1C 0B 37 00 8F 20 2B 2B 2B 2B |9,199...7.. ++++| 00000300: 2B 2B 20 44 45 52 20 54 45 58 2D 42 45 46 45 48 |++ DER TEX-BEFEH| 00000310: 4C 20 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 43 0B 3C |L ++++++++++.C.<| 00000320: 00 54 45 58 2C 22 44 49 45 53 20 49 53 54 20 45 |.TEX,"DIES IST E| 00000330: 49 4E 45 20 53 49 4E 55 53 4B 55 52 56 45 22 2C |INE SINUSKURVE",| 00000340: 33 2C 38 00 6A 0B 41 00 8F 20 2B 2B 2B 2B 2B 20 |3,8.j.A.. +++++ | 00000350: 42 49 4C 44 53 43 48 49 52 4D 41 55 46 53 50 41 |BILDSCHIRMAUFSPA| 00000360: 4C 54 55 4E 47 20 2B 2B 2B 2B 00 AD 0B 46 00 9E |LTUNG ++++...F..| 00000370: 33 35 32 35 36 3A 9E 33 34 36 34 37 3A 5A B2 32 |35256:.34647:Z.2| 00000380: 31 3A 53 B2 30 3A 8D 31 30 30 30 3A 99 22 57 55 |1:S.0:.1000:."WU| 00000390: 45 4E 53 43 48 45 4E 20 53 49 45 20 45 49 4E 45 |ENSCHEN SIE EINE| 000003A0: 20 53 4B 41 4C 49 45 52 55 4E 47 22 3B 00 C9 0B | SKALIERUNG";...| 000003B0: 4B 00 85 22 28 4A 2F 4E 29 22 3B 41 24 3A 8B 41 |K.."(J/N)";A$:.A| 000003C0: 24 B2 22 4E 22 A7 31 31 35 00 F0 0B 50 00 8F 20 |$."N".115...P.. | 000003D0: 2B 2B 2B 2B 2B 2B 2B 20 53 4B 41 4C 49 45 52 55 |+++++++ SKALIERU| 000003E0: 4E 47 20 20 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |NG ++++++++++++| 000003F0: 00 26 0C 55 00 96 A5 58 28 58 29 B2 B5 28 33 39 |.&.U...X(X)..(39| 00000400: AC 28 58 AA 32 AC FF 29 AD 28 34 AC FF 29 29 3A |.(X.2..).(4..)):| 00000410: 96 A5 59 28 59 29 B2 B5 28 32 34 AC 28 32 AB 59 |..Y(Y)..(24.(2.Y| 00000420: 29 AD 34 2E 35 29 00 5A 0C 5A 00 81 58 B2 AB 36 |).4.5).Z.Z..X..6| 00000430: A4 36 3A 54 4C 4E 2C 58 2C 30 2C 58 2C AB 2E 31 |.6:TLN,X,0,X,..1| 00000440: 3A 58 24 B2 C4 28 58 29 3A 41 B2 A5 59 28 AB 2E |:X$..(X):A..Y(..| 00000450: 33 29 3A 42 B2 A5 58 28 58 29 00 6C 0C 5F 00 54 |3):B..X(X).l._.T| 00000460: 45 58 2C 58 24 2C 41 2C 42 3A 82 58 00 B4 0C 64 |EX,X$,A,B:.X...d| 00000470: 00 54 4C 4E 2C 30 2C 31 2C AB 2E 32 2C 31 3A 54 |.TLN,0,1,..2,1:T| 00000480: 4C 4E 2C 30 2C AB 31 2C AB 2E 32 2C AB 31 3A 41 |LN,0,.1,..2,.1:A| 00000490: B2 A5 59 28 31 29 3A 42 B2 A5 58 28 2E 35 29 3A |..Y(1):B..X(.5):| 000004A0: 54 45 58 2C 22 31 22 2C 41 2C 42 3A 41 B2 A5 59 |TEX,"1",A,B:A..Y| 000004B0: 28 AB 31 29 00 F3 0C 69 00 42 B2 A5 58 28 2E 33 |(.1)...i.B..X(.3| 000004C0: 29 3A 54 45 58 2C 22 2D 31 22 2C 41 2C 42 3A 9C |):TEX,"-1",A,B:.| 000004D0: 3A 85 22 48 41 52 44 43 4F 50 59 20 28 4A 2F 4E |:."HARDCOPY (J/N| 000004E0: 29 22 3B 41 24 3A 8B 41 24 B2 22 4A 22 A7 8D 32 |)";A$:.A$."J"..2| 000004F0: 30 30 30 00 19 0D 6E 00 8F 20 2B 2B 2B 2B 2B 20 |000...n.. +++++ | 00000500: 50 52 4F 47 52 41 4D 4D 45 4E 44 45 20 2B 2B 2B |PROGRAMMENDE +++| 00000510: 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 56 0D 73 00 5A B2 |+++++++++.V.s.Z.| 00000520: 32 31 3A 53 B2 30 3A 8D 31 30 30 30 3A 99 22 47 |21:S.0:.1000:."G| 00000530: 45 42 45 4E 20 53 49 45 20 4E 41 43 48 20 52 45 |EBEN SIE NACH RE| 00000540: 41 44 59 20 45 49 4E 3A 53 59 53 33 35 33 37 37 |ADY EIN:SYS35377| 00000550: 3A 48 4F 46 20 22 00 5C 0D 78 00 80 00 82 0D E7 |:HOF ".\.x......| 00000560: 03 8F 20 2B 2B 2B 2B 2B 2B 20 55 50 20 43 55 52 |.. ++++++ UP CUR| 00000570: 53 4F 52 20 53 45 54 5A 45 4E 20 2B 2B 2B 2B 2B |SOR SETZEN +++++| 00000580: 2B 2B 00 9D 0D E8 03 97 32 31 34 2C 5A 3A 97 32 |++......214,Z:.2| 00000590: 31 31 2C 53 3A 9E 35 38 36 34 30 3A 8E 00 C2 0D |11,S:.58640:....| 000005A0: CF 07 8F 20 2B 2B 2B 2B 2B 2B 2B 20 55 50 20 48 |... +++++++ UP H| 000005B0: 41 52 44 43 4F 50 59 20 2B 2B 2B 2B 2B 2B 2B 2B |ARDCOPY ++++++++| 000005C0: 2B 2B 00 EB 0D D0 07 9E 33 35 33 37 37 3A 9F 31 |++......35377:.1| 000005D0: 2C 34 2C 31 30 3A 98 31 3A A0 31 3A 9E 33 34 38 |,4,10:.1:.1:.348| 000005E0: 36 35 3A 9E 33 35 32 35 36 3A 8E 00 00 00 |65:.35256:.... |
..).... ******************************** *.Q.... * *.Y.... * DEMO-PROGRAMM ZUM THEMA *...... * *.I.... * TEXT UND GRAFIK *...... * AUF EINEM BILDSCHIRM *...... * *.A.... * HEIMO PONNATH HAMBURG 1984 *.I.... * *......********************************* .J....:.G(147):Z.10:S.10:.1000:."ZUVOR N OCH EINE FRAGE:":......."IST HIRES-3 KOM PLETT GELADEN (J/N)";A$.(....A$."N"..:.G (18)"BRAUCHEN SIE ABER!"G(146):..K....52 ,128:.56,128:.37498:.G(147).R.(.. ++++++ SINUSKURVE ZEICHNEN +++++...-...A(X)..( X):XU..2..:XO.2..:YU..2.5:YO.2:TRS,XU,XO ,YU,YO:HFL,6,14...2.FUNKT,A,XU,XO:TLN,XU ,0,XO,0:TLN,0,YU,0,YO:REC,0,0,319,199... 7.. ++++++ DER TEX-BEFEHL ++++++++++.C.< .TEX,"DIES IST EINE SINUSKURVE",3,8.J.A. . +++++ BILDSCHIRMAUFSPALTUNG ++++...F.. 35256:.34647:Z.21:S.0:.1000:."WUENSCHEN SIE EINE SKALIERUNG";.I.K.."(J/N)";A$:.A $."N".115...P.. +++++++ SKALIERUNG ++++ ++++++++.&.U...X(X)..(39.(X.2..).(4..)): ..Y(Y)..(24.(2.Y).4.5).Z.Z..X..6.6:TLN,X ,0,X,..1:X$.D(X):A..Y(..3):B..X(X).L._.T EX,X$,A,B:.X...D.TLN,0,1,..2,1:TLN,0,.1, ..2,.1:A..Y(1):B..X(.5):TEX,"1",A,B:A..Y (.1)...I.B..X(.3):TEX,"-1",A,B:.:."HARDC OPY (J/N)";A$:.A$."J"..2000...N.. +++++ PROGRAMMENDE ++++++++++++.V.S.Z.21:S.0:. 1000:."GEBEN SIE NACH READY EIN:SYS35377 :HOF ".\.X........ ++++++ UP CURSOR SETZ EN +++++++......214,Z:.211,S:.58640:..B. O.. +++++++ UP HARDCOPY ++++++++++...P.. 35377:.1,4,10:.1: 1:.34865:.35256:....
> CLICK IMAGE PREVIEW FOR FULL MODAL