BILDER ANSEHEN
FILE INFORMATION
FILENAME(S): BILDER ANSEHEN
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-10-20 14:30:39
APPEARS ON: 1 disk(s)
FILE HASH
7e49aa0612c128f7a040c6463ebdc7f57bb28d9252b27ae2dab79791d9ccc497
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0141GR | BILDER ANSEHEN | PRG | Treasure Chest - Klaus Der Suhler | 1 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 64 00 8B 20 4D B2 30 20 A7 20 4D B2 |..(.d.. M.0 . M.| 00000010: 31 3A 93 20 22 53 48 4F 57 20 50 49 43 2E 35 32 |1:. "SHOW PIC.52| 00000020: 34 38 30 22 2C 38 2C 31 00 4D 08 6E 00 8F 20 2A |480",8,1.M.n.. *| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 72 08 |*************.r.| 00000050: 78 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 |x.. * | 00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000070: 20 2A 00 97 08 82 00 8F 20 2A 20 42 41 53 49 43 | *...... * BASIC| 00000080: 20 44 45 4D 4F 20 5A 55 52 20 20 20 20 20 20 20 | DEMO ZUR | 00000090: 20 20 20 20 20 20 2A 00 BC 08 8C 00 8F 20 2A 20 | *...... * | 000000A0: 22 53 48 4F 57 20 50 49 43 2E 35 32 34 38 30 22 |"SHOW PIC.52480"| 000000B0: 20 2D 20 52 4F 55 54 49 4E 45 20 2A 00 E1 08 96 | - ROUTINE *....| 000000C0: 00 8F 20 2A 20 20 20 20 20 20 20 20 20 20 20 20 |.. * | 000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000E0: 2A 00 06 09 A0 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...... ********| 000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000100: 2A 2A 2A 2A 2A 2A 00 0C 09 AA 00 8F 00 21 09 B4 |******.......!..| 00000110: 00 8F 20 4E 41 4D 45 4E 20 45 49 4E 47 45 42 45 |.. NAMEN EINGEBE| 00000120: 4E 00 27 09 BE 00 8F 00 43 09 C8 00 99 3A 99 3A |N.'.....C....:.:| 00000130: 99 20 22 4E 41 4D 45 20 44 45 53 20 42 49 4C 44 |. "NAME DES BILD| 00000140: 45 53 22 00 63 09 D2 00 99 20 22 28 4F 44 45 52 |ES".c.... "(ODER| 00000150: 20 24 20 46 55 45 52 20 44 49 52 45 43 54 4F 52 | $ FUER DIRECTOR| 00000160: 59 29 22 00 8F 09 DC 00 41 24 B2 22 22 3A 85 20 |Y)".....A$."":. | 00000170: 41 24 3A 85 22 42 49 4C 44 4E 52 2E 22 3B 51 3A |A$:."BILDNR.";Q:| 00000180: 20 8B 20 41 24 B2 22 24 22 20 A7 20 34 35 30 00 | . A$."$" . 450.| 00000190: 95 09 E6 00 8F 00 AF 09 F0 00 8F 20 42 49 4C 44 |........... BILD| 000001A0: 20 4C 41 44 45 4E 20 26 20 5A 45 49 47 45 4E 00 | LADEN & ZEIGEN.| 000001B0: C2 09 04 01 9E 20 35 32 34 38 30 2C 38 2C 41 24 |..... 52480,8,A$| 000001C0: 2C 31 00 C8 09 0E 01 8F 00 E3 09 18 01 8F 20 54 |,1............ T| 000001D0: 41 53 54 45 4E 44 52 55 43 4B 20 41 42 57 41 52 |ASTENDRUCK ABWAR| 000001E0: 54 45 4E 00 E9 09 22 01 8F 00 FF 09 2C 01 A1 20 |TEN...".....,.. | 000001F0: 43 24 3A 8B 43 24 B2 22 22 20 A7 20 33 30 30 00 |C$:.C$."" . 300.| 00000200: 05 0A 36 01 8F 00 21 0A 40 01 8F 20 54 45 58 54 |..6...!.@.. TEXT| 00000210: 4D 4F 44 55 53 20 45 49 4E 53 43 48 41 4C 54 45 |MODUS EINSCHALTE| 00000220: 4E 00 30 0A 4A 01 8B 51 B2 39 A7 45 B2 45 AA 31 |N.0.J..Q.9.E.E.1| 00000230: 00 48 0A 54 01 8F 3A 20 53 59 53 20 35 32 34 38 |.H.T..: SYS 5248| 00000240: 30 2C 38 2C 22 22 2C 30 00 82 0A 5E 01 4F 24 B2 |0,8,"",0...^.O$.| 00000250: C8 28 41 24 2C 33 29 3A 51 B2 51 AA 31 3A 51 24 |.(A$,3):Q.Q.1:Q$| 00000260: B2 C4 28 51 29 3A 45 B2 C3 28 51 24 29 3A 41 24 |..(Q):E..(Q$):A$| 00000270: B2 4F 24 AA CA 28 51 24 2C 32 2C 45 29 3A 99 22 |.O$..(Q$,2,E):."| 00000280: 13 22 00 8B 0A 68 01 89 32 33 30 00 91 0A 72 01 |."...h..230...r.| 00000290: 8F 00 AF 0A 7C 01 8F 20 42 49 4C 44 20 4E 4F 43 |....|.. BILD NOC| 000002A0: 48 20 45 49 4E 4D 41 4C 20 5A 45 49 47 45 4E 00 |H EINMAL ZEIGEN.| 000002B0: B5 0A 86 01 8F 00 C8 0A 90 01 9E 20 35 32 34 38 |........... 5248| 000002C0: 30 2C 38 2C 22 22 2C 31 00 D2 0A 9A 01 89 20 33 |0,8,"",1...... 3| 000002D0: 30 30 00 D8 0A A4 01 8F 00 EF 0A AE 01 8F 20 44 |00............ D| 000002E0: 49 52 45 43 54 4F 52 59 20 5A 45 49 47 45 4E 00 |IRECTORY ZEIGEN.| 000002F0: F5 0A B8 01 8F 00 23 0B C2 01 9F 20 31 2C 38 2C |......#.... 1,8,| 00000300: 30 2C 22 24 22 3A 97 37 38 31 2C 31 3A 9E 36 35 |0,"$":.781,1:.65| 00000310: 34 37 38 3A A1 20 41 24 2C 41 24 3A 5A 24 B2 C7 |478:. A$,A$:Z$..| 00000320: 28 30 29 00 4D 0B CC 01 A1 20 41 24 2C 41 24 2C |(0).M.... A$,A$,| 00000330: 4C 24 2C 48 24 3A 8B 20 53 54 20 A7 20 9E 20 36 |L$,H$:. ST . . 6| 00000340: 35 34 38 34 3A A0 31 3A 89 20 32 30 30 00 69 0B |5484:.1:. 200.i.| 00000350: D1 01 99 C6 28 4C 24 AA 5A 24 29 AA 32 35 36 AC |....(L$.Z$).256.| 00000360: C6 28 48 24 AA 5A 24 29 3B 00 B7 0B D2 01 A1 20 |.(H$.Z$);...... | 00000370: 41 24 2C 42 24 2C 43 24 2C 44 24 2C 45 24 2C 46 |A$,B$,C$,D$,E$,F| 00000380: 24 2C 47 24 2C 48 24 2C 49 24 2C 4A 24 2C 4B 24 |$,G$,H$,I$,J$,K$| 00000390: 2C 4C 24 2C 4D 24 2C 4E 24 2C 4F 24 2C 50 24 2C |,L$,M$,N$,O$,P$,| 000003A0: 51 24 2C 52 24 2C 53 24 2C 54 24 2C 55 24 2C 56 |Q$,R$,S$,T$,U$,V| 000003B0: 24 2C 57 24 2C 58 24 00 EF 0B D3 01 99 20 41 24 |$,W$,X$...... A$| 000003C0: 42 24 43 24 44 24 45 24 46 24 47 24 48 24 49 24 |B$C$D$E$F$G$H$I$| 000003D0: 4A 24 4B 24 4C 24 4D 24 4E 24 4F 24 50 24 51 24 |J$K$L$M$N$O$P$Q$| 000003E0: 52 24 53 24 54 24 55 24 56 24 57 24 58 24 3B 00 |R$S$T$U$V$W$X$;.| 000003F0: 10 0C D6 01 A1 20 41 24 2C 42 24 3A 8B 20 41 24 |..... A$,B$:. A$| 00000400: 20 A7 20 99 20 41 24 42 24 3B 3A 89 20 34 37 30 | . . A$B$;:. 470| 00000410: 00 1E 0C E0 01 99 41 24 3A 89 20 34 36 30 00 2B |......A$:. 460.+| 00000420: 0C EA 01 A0 31 3A 89 20 32 30 30 00 31 0C F4 01 |....1:. 200.1...| 00000430: 8F 00 52 0C FE 01 8F 20 53 59 4E 54 41 58 20 44 |..R.... SYNTAX D| 00000440: 45 53 20 22 53 59 53 2D 42 45 46 45 48 4C 53 22 |ES "SYS-BEFEHLS"| 00000450: 20 3A 00 58 0C 08 02 8F 00 7C 0C 12 02 8F 20 53 | :.X.....|.... S| 00000460: 59 53 20 35 32 34 38 30 2C 47 45 52 41 45 54 2C |YS 52480,GERAET,| 00000470: 22 4E 41 4D 45 22 2C 4D 4F 44 55 53 00 82 0C 1C |"NAME",MODUS....| 00000480: 02 8F 00 9F 0C 26 02 8F 20 47 45 52 41 45 54 20 |.....&.. GERAET | 00000490: 3A 20 47 45 52 41 45 54 45 4E 55 4D 4D 45 52 00 |: GERAETENUMMER.| 000004A0: C4 0C 30 02 8F 20 20 20 20 20 20 20 20 20 20 31 |..0.. 1| 000004B0: 3D 44 41 54 41 53 2E 20 38 3D 46 4C 4F 50 50 59 |=DATAS. 8=FLOPPY| 000004C0: 20 2E 2E 2E 00 CA 0C 3A 02 8F 00 E6 0C 44 02 8F | ......:.....D..| 000004D0: 20 22 4E 41 4D 45 22 20 3A 20 50 52 4F 47 52 41 | "NAME" : PROGRA| 000004E0: 4D 4D 4E 41 4D 45 00 04 0D 4E 02 8F 20 20 20 20 |MMNAME...N.. | 000004F0: 20 20 20 20 20 20 5A 2E 42 2E 20 22 5B 42 5D 54 | Z.B. "[B]T| 00000500: 45 53 54 22 00 28 0D 58 02 8F 20 20 20 20 20 20 |EST".(.X.. | 00000510: 20 20 20 20 57 49 52 44 20 41 4C 53 20 4E 41 4D | WIRD ALS NAM| 00000520: 45 20 4E 55 52 20 22 22 00 4E 0D 62 02 8F 20 20 |E NUR "".N.b.. | 00000530: 20 20 20 20 20 20 20 20 28 4C 45 45 52 53 54 52 | (LEERSTR| 00000540: 49 4E 47 29 20 41 4E 47 45 47 45 42 45 4E 00 72 |ING) ANGEGEBEN.r| 00000550: 0D 6C 02 8F 20 20 20 20 20 20 20 20 20 20 57 49 |.l.. WI| 00000560: 52 44 20 4B 45 49 4E 20 4E 45 55 45 53 20 42 49 |RD KEIN NEUES BI| 00000570: 4C 44 00 98 0D 76 02 8F 20 20 20 20 20 20 20 20 |LD...v.. | 00000580: 20 20 47 45 4C 41 44 45 4E 20 28 55 4D 20 4E 55 | GELADEN (UM NU| 00000590: 52 20 49 4E 20 44 45 4E 00 BD 0D 80 02 8F 20 20 |R IN DEN...... | 000005A0: 20 20 20 20 20 20 20 20 54 45 58 54 2D 2F 47 52 | TEXT-/GR| 000005B0: 41 46 49 4B 4D 4F 44 55 53 20 55 4D 2D 00 D7 0D |AFIKMODUS UM-...| 000005C0: 8A 02 8F 20 20 20 20 20 20 20 20 20 20 5A 55 53 |... ZUS| 000005D0: 43 48 41 4C 54 45 4E 00 DD 0D 94 02 8F 00 FD 0D |CHALTEN.........| 000005E0: 9E 02 8F 20 4D 4F 44 55 53 20 20 3A 20 5A 41 48 |... MODUS : ZAH| 000005F0: 4C 20 56 4F 4E 20 30 20 42 49 53 20 32 00 23 0E |L VON 0 BIS 2.#.| 00000600: A8 02 8F 20 20 20 20 20 20 20 20 20 20 30 3D 54 |... 0=T| 00000610: 45 58 54 4D 4F 44 2E 20 45 49 4E 53 43 48 41 4C |EXTMOD. EINSCHAL| 00000620: 54 45 4E 00 42 0E B2 02 8F 20 40 20 20 20 20 20 |TEN.B.... @ | 00000630: 20 20 20 31 3D 47 52 41 46 49 4B 20 5A 45 49 47 | 1=GRAFIK ZEIG| 00000640: 45 4E 00 66 0E BC 02 8F 20 20 20 20 20 20 20 20 |EN.f.... | 00000650: 20 20 32 3D 41 4C 54 45 4E 20 4D 4F 44 55 53 20 | 2=ALTEN MODUS | 00000660: 42 45 49 42 45 2D 00 8C 0E C6 02 8F 20 20 20 20 |BEIBE-...... | 00000670: 20 20 20 20 20 20 20 20 48 41 4C 54 45 4E 20 28 | HALTEN (| 00000680: 4E 55 52 20 53 49 4E 4E 56 4F 4C 4C 00 B0 0E D0 |NUR SINNVOLL....| 00000690: 02 8F 20 20 20 20 20 20 20 20 20 20 20 20 57 45 |.. WE| 000006A0: 4E 4E 20 41 55 43 48 20 45 49 4E 20 42 49 4C 44 |NN AUCH EIN BILD| 000006B0: 00 D1 0E DA 02 8F 20 20 20 20 20 20 20 20 20 20 |...... | 000006C0: 20 20 47 45 4C 41 44 45 4E 20 57 49 52 44 2C 44 | GELADEN WIRD,D| 000006D0: 41 00 F3 0E E4 02 8F 20 20 20 20 20 20 20 20 20 |A...... | 000006E0: 20 20 20 53 4F 4E 53 54 20 47 41 52 20 4E 49 43 | SONST GAR NIC| 000006F0: 48 54 53 00 0E 0F EE 02 8F 20 20 20 20 20 20 20 |HTS...... | 00000700: 20 20 20 20 20 50 41 53 53 49 45 52 54 29 00 14 | PASSIERT)..| 00000710: 0F F8 02 8F 00 38 0F 02 03 8F 20 45 53 20 49 53 |.....8.... ES IS| 00000720: 54 20 44 41 52 41 55 46 20 5A 55 20 41 43 48 54 |T DARAUF ZU ACHT| 00000730: 45 4E 2C 20 44 41 53 53 00 59 0F 0C 03 8F 20 44 |EN, DASS.Y.... D| 00000740: 41 53 20 42 49 4C 44 20 41 55 43 48 20 57 49 52 |AS BILD AUCH WIR| 00000750: 4B 4C 49 43 48 20 4D 49 54 00 79 0F 16 03 8F 20 |KLICH MIT.y.... | 00000760: 22 41 4D 49 43 41 20 50 41 49 4E 54 22 20 47 45 |"AMICA PAINT" GE| 00000770: 53 50 45 49 43 48 45 52 54 00 9C 0F 20 03 8F 20 |SPEICHERT... .. | 00000780: 57 55 52 44 45 2C 20 53 4F 4E 53 54 20 49 53 54 |WURDE, SONST IST| 00000790: 20 45 49 4E 20 41 42 53 54 55 52 5A 00 B8 0F 2A | EIN ABSTURZ...*| 000007A0: 03 8F 20 44 45 53 20 52 45 43 48 4E 45 52 53 20 |.. DES RECHNERS | 000007B0: 4D 4F 45 47 4C 49 43 48 00 00 00 |MOEGLICH... |
..(.D.. M.0 . M.1:. "SHOW PIC.52480",8,1
.M.N.. ******************************.R.
X.. * *......
* BASIC DEMO ZUR *...... *
"SHOW PIC.52480" - ROUTINE *...... *
*... .. ********
**********************.......!.... NAMEN
EINGEBEN.'.....C.H..:.:. "NAME DES BILD
ES".C.R.. "(ODER $ FUER DIRECTORY)".....
A$."":. A$:."BILDNR.";Q: . A$."$" . 450.
........... BILD LADEN & ZEIGEN.B.... 52
480,8,A$,1.H.......... TASTENDRUCK ABWAR
TEN...".....,.. C$:.C$."" . 300...6...!.
@.. TEXTMODUS EINSCHALTEN.0.J..Q.9.E.E.1
.H.T..: SYS 52480,8,"",0...^.O$.H(A$,3):
Q.Q.1:Q$.D(Q):E.C(Q$):A$.O$.J(Q$,2,E):."
."...H..230...R.....|.. BILD NOCH EINMAL
ZEIGEN.......H.... 52480,8,"",1.R.... 3
00.X.......... DIRECTORY ZEIGEN.......#.
B.. 1,8,0,"$":.781,1:.65478:. A$,A$:Z$.G
(0).M.L.. A$,A$,L$,H$:. ST . . 65484: 1:
. 200.I.Q..F(L$.Z$).256.F(H$.Z$);...R..
A$,B$,C$,D$,E$,F$,G$,H$,I$,J$,K$,L$,M$,N
$,O$,P$,Q$,R$,S$,T$,U$,V$,W$,X$...S.. A$
B$C$D$E$F$G$H$I$J$K$L$M$N$O$P$Q$R$S$T$U$
V$W$X$;...V.. A$,B$:. A$ . . A$B$;:. 470
......A$:. 460.+... 1:. 200.1.....R....
SYNTAX DES "SYS-BEFEHLS" :.X.....|.... S
YS 52480,GERAET,"NAME",MODUS.........&..
GERAET : GERAETENUMMER.D.0.. 1
=DATAS. 8=FLOPPY ....J.:.....D.. "NAME"
: PROGRAMMNAME...N.. Z.B. "[B]T
EST".(.X.. WIRD ALS NAME NUR ""
.N.B.. (LEERSTRING) ANGEGEBEN.R
.L.. WIRD KEIN NEUES BILD...V..
GELADEN (UM NUR IN DEN......
TEXT-/GRAFIKMODUS UM-.W....
ZUSCHALTEN............ MODUS : ZAH
L VON 0 BIS 2.#.... 0=TEXTMOD.
EINSCHALTEN.B.... @ 1=GRAFIK ZEIG
EN.F.... 2=ALTEN MODUS BEIBE-..
.F.. HALTEN (NUR SINNVOLL...P
.. WENN AUCH EIN BILD.Q.Z..
GELADEN WIRD,DA......
SONST GAR NICHTS...... PAS
SIERT).......8.... ES IST DARAUF ZU ACHT
EN, DASS.Y.... DAS BILD AUCH WIRKLICH MI
T.Y.... "AMICA PAINT" GESPEICHERT... ..
WURDE, SONST IST EIN ABSTURZ...*.. DES R
ECHNERS MOEGLICH...
> CLICK IMAGE PREVIEW FOR FULL MODAL