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

REPEAT GRAPHIC

FILE INFORMATION

FILENAME(S): REPEAT GRAPHIC

FILE TYPE(S): PRG

FILE SIZE: 456b

FIRST SEEN: 2025-11-30 21:14:04

APPEARS ON: 1 disk(s)

FILE HASH

a851cc6559e825030f81dd0d2c8d4f36c28fc8fedaf0cf49e24be7957b0cec27

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
COMMODORE MCS801 REPEAT GRAPHIC PRG DuncanTwain 19 15 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1F 08 64 00 8F 20  52 45 50 45 41 54 20 47  |....d.. REPEAT G|
00000010: 52 41 50 48 49 43 20 50  52 49 4E 54 49 4E 47 00  |RAPHIC PRINTING.|
00000020: 43 08 6E 00 8F 20 46 53  3B 43 48 52 24 28 4E 29  |C.n.. FS;CHR$(N)|
00000030: 3B 43 48 52 24 28 47 52  41 50 48 49 43 20 44 41  |;CHR$(GRAPHIC DA|
00000040: 54 41 29 00 65 08 78 00  9F 34 2C 34 20 3A 8F 20  |TA).e.x..4,4 :. |
00000050: 50 52 49 4E 54 20 49 4E  20 47 52 41 50 48 49 43  |PRINT IN GRAPHIC|
00000060: 20 4D 4F 44 45 00 77 08  82 00 44 43 24 B2 C7 28  | MODE.w...DC$..(|
00000070: 32 30 29 3A 43 B2 30 00  85 08 8C 00 46 53 24 B2  |20):C.0.....FS$.|
00000080: C7 28 32 38 29 00 B8 08  96 00 98 34 2C C7 28 31  |.(28)......4,.(1|
00000090: 34 29 3B 22 20 20 20 20  20 20 52 45 50 45 41 54  |4);"      REPEAT|
000000A0: 20 47 52 41 50 48 49 43  20 50 52 49 4E 54 49 4E  | GRAPHIC PRINTIN|
000000B0: 47 22 3B C7 28 31 35 29  00 C3 08 A0 00 81 49 B2  |G";.(15)......I.|
000000C0: 30 A4 37 00 E0 08 AA 00  98 34 2C 44 43 24 3B C7  |0.7......4,DC$;.|
000000D0: 28 43 29 3B 3A 8F 20 53  45 54 20 43 4F 4C 4F 52  |(C);:. SET COLOR|
000000E0: 00 05 09 B4 00 50 B2 32  30 AA 32 30 AC 49 AC 32  |.....P.20.20.I.2|
000000F0: 3A 8B 50 B1 32 35 36 A7  4C 4F B2 50 AB 32 35 35  |:.P.256.LO.P.255|
00000100: 3A 89 32 31 30 00 21 09  BE 00 98 34 2C 46 53 24  |:.210.!....4,FS$|
00000110: 3B C7 28 50 29 3B C7 28  32 34 33 29 3A 89 32 33  |;.(P);.(243):.23|
00000120: 30 00 3E 09 C8 00 98 34  2C 46 53 24 3B C7 28 4C  |0.>....4,FS$;.(L|
00000130: 4F 29 3B C7 28 32 34 33  29 3A 89 32 33 30 00 58  |O);.(243):.230.X|
00000140: 09 D2 00 98 34 2C 46 53  24 3B C7 28 32 35 35 29  |....4,FS$;.(255)|
00000150: 3B C7 28 32 34 33 29 3B  00 70 09 DC 00 98 34 2C  |;.(243);.p....4,|
00000160: 46 53 24 3B C7 28 4C 4F  29 3B C7 28 32 34 33 29  |FS$;.(LO);.(243)|
00000170: 00 7A 09 E6 00 43 B2 43  AA 31 00 87 09 F0 00 8B  |.z...C.C.1......|
00000180: 43 B2 31 A7 43 B2 32 00  94 09 FA 00 8B 43 B2 37  |C.1.C.2......C.7|
00000190: A7 43 B2 30 00 9B 09 04  01 82 49 00 A1 09 0E 01  |.C.0......I.....|
000001A0: 3A 00 A8 09 18 01 A0 34  00 C5 09 22 01 9F 31 30  |:......4..."..10|
000001B0: 2C 34 2C 31 30 3A 98 31  30 3A A0 31 30 3A 8F 20  |,4,10:.10:.10:. |
000001C0: 52 45 53 45 54 00 00 00                           |RESET...        |

....D.. REPEAT GRAPHIC PRINTING.C.N.. FS
;CHR$(N);CHR$(GRAPHIC DATA).E.X..4,4 :. 
PRINT IN GRAPHIC MODE.W...DC$.G(20):C.0.
....FS$.G(28)......4,G(14);"      REPEAT
 GRAPHIC PRINTING";G(15).C. ..I.0.7.....
.4,DC$;G(C);:. SET COLOR.....P.20.20.I.2
:.P.256.LO.P.255:.210.!....4,FS$;G(P);G(
243):.230.>.H..4,FS$;G(LO);G(243):.230.X
.R..4,FS$;G(255);G(243);.P....4,FS$;G(LO
);G(243).Z...C.C.1......C.1.C.2......C.7
.C.0......I.....:..... 4.E."..10,4,10:.1
0: 10:. RESET...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL