_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

BILDUMSCHR.-ROUT

FILE INFORMATION

FILENAME(S): BILDUMSCHR.-ROUT

FILE TYPE(S): PRG

FILE SIZE: 1.1K

FIRST SEEN: 2025-12-01 13:57:50

APPEARS ON: 1 disk(s)

FILE HASH

1213e8b52b96d6135109c22c52320746bcbe36643c212e901345e3d4a8e216f0

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
S BILDUMSCHR.-ROUT PRG HOL2001, Misc 17 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 22 08 00 00 8F 20  42 49 4C 44 20 4C 41 44  |..".... BILD LAD|
00000010: 45 4E 2C 4D 49 54 20 52  55 4E 20 53 54 41 52 54  |EN,MIT RUN START|
00000020: 45 4E 00 46 08 01 00 8F  20 4D 49 54 54 45 4C 53  |EN.F.... MITTELS|
00000030: 20 52 55 4E 2F 53 54 4F  50 20 41 55 53 53 53 43  | RUN/STOP AUSSSC|
00000040: 48 41 4C 54 45 4E 00 72  08 02 00 8F 20 50 4F 4B  |HALTEN.r.... POK|
00000050: 45 20 32 34 35 36 35 2C  39 36 20 49 4D 20 44 49  |E 24565,96 IM DI|
00000060: 45 52 4B 54 4D 4F 44 55  53 20 45 49 4E 47 45 42  |ERKTMODUS EINGEB|
00000070: 45 4E 00 B7 08 03 00 8F  44 45 4E 20 42 45 52 45  |EN......DEN BERE|
00000080: 49 43 48 20 56 4F 4E 20  48 45 58 20 34 30 30 30  |ICH VON HEX 4000|
00000090: 2D 36 34 30 30 28 3D 42  49 4C 44 29 4D 49 54 20  |-6400(=BILD)MIT |
000000A0: 45 49 4E 45 4D 20 4D 4F  4E 49 54 4F 52 20 53 50  |EINEM MONITOR SP|
000000B0: 45 49 43 48 45 52 4E 00  FA 08 04 00 8F 44 41 53  |EICHERN......DAS|
000000C0: 20 53 4F 20 47 45 53 50  45 49 43 48 45 52 54 45  | SO GESPEICHERTE|
000000D0: 20 42 49 4C 44 20 4B 41  4E 4E 20 4A 45 54 5A 54  | BILD KANN JETZT|
000000E0: 20 49 4E 4E 45 52 48 41  4C 42 20 45 49 4E 45 53  | INNERHALB EINES|
000000F0: 20 50 52 47 41 52 41 4D  4D 53 00 3C 09 05 00 8F  | PRGARAMMS.<....|
00000100: 20 41 42 53 4F 4C 55 54  20 47 45 4C 41 44 45 4E  | ABSOLUT GELADEN|
00000110: 20 57 45 52 44 45 4E 20  55 4E 44 20 4D 49 54 20  | WERDEN UND MIT |
00000120: 53 59 53 20 32 34 35 31  33 20 44 41 52 47 45 53  |SYS 24513 DARGES|
00000130: 54 45 4C 4C 54 20 57 45  52 44 45 4E 00 84 09 06  |TELLT WERDEN....|
00000140: 00 8F 20 41 55 53 53 43  48 41 4C 54 45 4E 3A 50  |.. AUSSCHALTEN:P|
00000150: 4F 4B 45 35 33 32 37 32  2C 32 31 3A 50 4F 4B 45  |OKE53272,21:POKE|
00000160: 35 36 35 37 36 2C 31 35  31 3A 50 4F 4B 45 35 33  |56576,151:POKE53|
00000170: 32 36 35 2C 32 37 3A 50  4F 4B 45 35 33 32 37 30  |265,27:POKE53270|
00000180: 2C 32 30 30 00 AA 09 0A  00 8F 20 2A 2A 2A 2A 2A  |,200...... *****|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 D0 09 14 00 8F  |**********......|
000001B0: 20 2A 20 20 20 42 49 4C  44 55 4D 53 43 48 52 45  | *   BILDUMSCHRE|
000001C0: 49 42 45 2D 52 4F 55 54  49 4E 45 20 20 20 20 2A  |IBE-ROUTINE    *|
000001D0: 00 F6 09 1E 00 8F 20 2A  20 20 20 20 20 20 20 20  |...... *        |
000001E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001F0: 20 20 20 20 20 2A 00 1C  0A 28 00 8F 20 2A 20 20  |     *...(.. *  |
00000200: 20 20 4B 4F 41 4C 41 20  2D 20 50 41 49 4E 54 20  |  KOALA - PAINT |
00000210: 4D 41 47 49 43 20 20 20  20 20 20 2A 00 42 0A 32  |MAGIC      *.B.2|
00000220: 00 8F 20 2A 20 20 20 20  20 20 20 20 20 20 20 20  |.. *            |
00000230: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000240: 20 2A 00 68 0A 37 00 8F  20 2A 2A 2A 2A 2A 2A 2A  | *.h.7.. *******|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000260: 2A 2A 2A 2A 2A 2A 2A 2A  00 78 0A 3C 00 8B 20 41  |********.x.<.. A|
00000270: B2 31 20 A7 20 31 33 30  00 AD 0A 46 00 99 22 93  |.1 . 130...F..".|
00000280: 9E 11 12 20 20 42 49 4C  44 55 4D 53 43 48 52 45  |...  BILDUMSCHRE|
00000290: 49 42 45 52 4F 55 54 49  4E 45 20 20 20 20 20 20  |IBEROUTINE      |
000002A0: 20 20 20 20 20 20 20 20  20 20 20 92 22 00 F5 0A  |           ."...|
000002B0: 50 00 99 22 20 20 51 55  45 4C 4C 44 49 53 4B 45  |P.."  QUELLDISKE|
000002C0: 54 54 45 20 45 49 4E 4C  45 47 45 4E 20 2C 20 44  |TTE EINLEGEN , D|
000002D0: 41 4E 4E 20 42 49 4C 44  2D 20 20 20 20 11 20 4B  |ANN BILD-    . K|
000002E0: 45 4E 4E 5A 49 46 46 45  52 20 45 49 4E 47 45 42  |ENNZIFFER EINGEB|
000002F0: 45 4E 20 21 22 00 02 0B  5A 00 85 22 11 11 22 3B  |EN !"...Z.."..";|
00000300: 4B 24 00 1B 0B 64 00 8B  20 4B 24 B3 22 41 22 B0  |K$...d.. K$."A".|
00000310: 20 4B 24 B1 22 5A 22 A7  20 35 30 00 2E 0B 6E 00  | K$."Z". 50...n.|
00000320: 97 20 35 35 2C 30 3A 97  20 35 36 2C 39 36 00 4A  |. 55,0:. 56,96.J|
00000330: 0B 78 00 41 B2 31 3A 93  22 3F 50 49 43 20 22 AA  |.x.A.1:."?PIC ".|
00000340: 4B 24 AA 22 2A 22 2C 38  2C 31 00 50 0B 82 00 3A  |K$."*",8,1.P...:|
00000350: 00 56 0B 8C 00 3A 00 89  0B 96 00 99 22 11 12 20  |.V...:......".. |
00000360: 20 42 49 4C 44 55 4D 53  43 48 52 45 49 42 45 52  | BILDUMSCHREIBER|
00000370: 4F 55 54 49 4E 45 20 20  20 20 20 20 20 20 20 20  |OUTINE          |
00000380: 20 20 20 20 20 20 20 92  22 00 CB 0B A0 00 99 22  |       ."......"|
00000390: 20 5A 49 45 4C 44 49 53  4B 20 45 49 4E 4C 45 47  | ZIELDISK EINLEG|
000003A0: 45 4E 20 2C 20 44 41 4E  4E 20 47 45 57 55 45 4E  |EN , DANN GEWUEN|
000003B0: 53 43 48 54 45 4E 20 20  20 11 4E 41 4D 45 4E 20  |SCHTEN   .NAMEN |
000003C0: 45 49 4E 47 45 42 45 4E  20 21 22 00 D8 0B AA 00  |EINGEBEN !".....|
000003D0: 85 22 11 20 22 3B 4E 24  00 EE 0B B4 00 9F 20 31  |.". ";N$...... 1|
000003E0: 2C 38 2C 31 2C 4E 24 AA  22 2C 50 2C 57 22 00 03  |,8,1,N$.",P,W"..|
000003F0: 0C BE 00 98 31 2C C7 28  31 34 32 29 3B C7 28 36  |....1,.(142);.(6|
00000400: 33 29 3B 00 24 0C C8 00  81 20 49 B2 31 36 32 37  |3);.$.... I.1627|
00000410: 30 20 A4 20 31 36 33 38  33 3A 98 31 2C C7 28 30  |0 . 16383:.1,.(0|
00000420: 29 3B 3A 82 00 48 0C D2  00 81 20 49 B2 32 34 35  |);:..H.... I.245|
00000430: 37 36 20 A4 20 33 32 37  36 37 3A 98 31 2C C7 28  |76 . 32767:.1,.(|
00000440: C2 28 49 29 29 3B 3A 82  00 6C 0C DC 00 81 20 49  |.(I));:..l.... I|
00000450: B2 33 32 35 37 36 20 A4  20 33 33 35 39 39 3A 98  |.32576 . 33599:.|
00000460: 31 2C C7 28 C2 28 49 29  29 3B 3A 82 00 74 0C E6  |1,.(.(I));:..t..|
00000470: 00 A0 20 31 00 00 00                              |.. 1...         |
..".... BILD LADEN,MIT RUN STARTEN.F....
 MITTELS RUN/STOP AUSSSCHALTEN.R.... POK
E 24565,96 IM DIERKTMODUS EINGEBEN......
DEN BEREICH VON HEX 4000-6400(=BILD)MIT 
EINEM MONITOR SPEICHERN......DAS SO GESP
EICHERTE BILD KANN JETZT INNERHALB EINES
 PRGARAMMS.<.... ABSOLUT GELADEN WERDEN 
UND MIT SYS 24513 DARGESTELLT WERDEN....
.. AUSSCHALTEN:POKE53272,21:POKE56576,15
1:POKE53265,27:POKE53270,200...... *****
**************************.P.... *   BIL
DUMSCHREIBE-ROUTINE    *...... *        
                     *...(.. *    KOALA 
- PAINT MAGIC      *.B.2.. *            
                 *.H.7.. ***************
****************.X.<.. A.1 . 130...F..".
...  BILDUMSCHREIBEROUTINE              
   ."...P.."  QUELLDISKETTE EINLEGEN , D
ANN BILD-    . KENNZIFFER EINGEBEN !"...
Z.."..";K$...D.. K$."A". K$."Z". 50...N.
. 55,0:. 56,96.J.X.A.1:."?PIC ".K$."*",8
,1.P...:.V...:......"..  BILDUMSCHREIBER
OUTINE                 .".K. .." ZIELDIS
K EINLEGEN , DANN GEWUENSCHTEN   .NAMEN 
EINGEBEN !".X....". ";N$...... 1,8,1,N$.
",P,W"......1,G(142);G(63);.$.H.. I.1627
0 . 16383:.1,G(0);:..H.R.. I.24576 . 327
67:.1,G(B(I));:..L.... I.32576 . 33599:.
1,G(B(I));:..T...  1...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL