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

GRAPHIC TUT NO 2

FILE INFORMATION

FILENAME(S): GRAPHIC TUT NO 2

FILE TYPE(S): PRG

FILE SIZE: 2.3K

FIRST SEEN: 2025-11-30 21:15:26

APPEARS ON: 1 disk(s)

FILE HASH

b89c84c2c69fce12a2a71396f05bd91b3a6a5b659796d1124593caacf2efc43a

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
VERVOLG PONZO GRAPHIC TUT NO 2 PRG DuncanTwain 14 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 21 08 01 00 8F 22  14 14 14 14 14 14 14 20  |..!...."....... |
00000010: 50 4F 4E 5A 30 2A 38 33  2A 57 41 54 45 52 4C 4F  |PONZ0*83*WATERLO|
00000020: 4F 00 4E 08 05 00 56 B2  35 33 32 34 38 3A 97 56  |O.N...V.53248:.V|
00000030: AA 33 32 2C 31 32 3A 97  56 AA 33 33 2C 31 35 3A  |.32,12:.V.33,15:|
00000040: 99 22 90 22 3A 97 56 AA  32 32 2C 32 30 30 00 87  |.".":.V.22,200..|
00000050: 08 0A 00 99 22 90 22 3A  99 22 93 11 11 11 11 11  |....".":."......|
00000060: 49 46 20 59 4F 55 20 12  53 54 4F 50 92 20 41 4E  |IF YOU .STOP. AN|
00000070: 44 20 43 48 41 4E 47 45  20 54 48 45 20 45 51 55  |D CHANGE THE EQU|
00000080: 41 54 49 4F 4E 53 22 00  B7 08 14 00 99 22 11 49  |ATIONS"......".I|
00000090: 4E 20 4C 49 4E 45 53 20  32 32 30 30 20 54 4F 20  |N LINES 2200 TO |
000000A0: 32 33 30 30 20 59 4F 55  20 43 41 4E 20 12 52 55  |2300 YOU CAN .RU|
000000B0: 4E 92 20 41 4E 44 22 00  DB 08 1E 00 99 22 11 53  |N. AND"......".S|
000000C0: 45 45 20 59 4F 55 52 20  4F 57 4E 20 43 55 52 56  |EE YOUR OWN CURV|
000000D0: 45 20 50 4C 4F 54 54 45  44 21 22 00 FF 08 28 00  |E PLOTTED!"...(.|
000000E0: 99 22 11 11 11 11 48 49  54 20 12 52 45 54 55 52  |."....HIT .RETUR|
000000F0: 4E 92 20 54 4F 20 50 52  4F 43 45 45 44 2E 22 00  |N. TO PROCEED.".|
00000100: 19 09 2D 00 99 22 11 11  48 49 54 20 12 51 92 20  |..-.."..HIT .Q. |
00000110: 54 4F 20 51 55 49 54 2E  22 00 2C 09 32 00 A1 41  |TO QUIT.".,.2..A|
00000120: 24 3A 8B 41 24 B3 B1 22  22 A7 35 30 00 3E 09 3C  |$:.A$.."".50.>.<|
00000130: 00 A1 41 24 3A 8B 41 24  B2 22 22 A7 36 30 00 50  |..A$:.A$."".60.P|
00000140: 09 46 00 8B 41 24 B2 22  51 22 A7 20 37 30 30 30  |.F..A$."Q". 7000|
00000150: 00 85 09 D0 07 97 35 36  2C 37 AC 31 36 AA 31 35  |......56,7.16.15|
00000160: 3A 97 35 35 2C 30 3A 9C  3A 8D 32 33 39 30 3A 89  |:.55,0:.:.2390:.|
00000170: 32 30 33 30 3A 8F 20 49  4E 49 54 49 41 4C 49 5A  |2030:. INITIALIZ|
00000180: 41 54 49 4F 4E 00 BC 09  DA 07 58 31 B2 B5 28 58  |ATION.....X1..(X|
00000190: AD 46 29 AC 46 3A 59 31  B2 B5 28 59 AD 46 29 AC  |.F).F:Y1..(Y.F).|
000001A0: 47 3A 42 59 B2 48 49 AA  58 31 AA 59 31 AA 59 3A  |G:BY.HI.X1.Y1.Y:|
000001B0: 42 49 B2 48 AB B5 28 58  AB 58 31 29 00 D2 09 E4  |BI.H..(X.X1)....|
000001C0: 07 97 42 59 2C C2 28 42  59 29 B0 50 28 42 49 29  |..BY,.(BY).P(BI)|
000001D0: 3A 8E 00 FA 09 EE 07 8F  20 50 41 52 41 4D 45 54  |:....... PARAMET|
000001E0: 52 49 43 20 45 51 55 41  54 49 4F 4E 53 20 49 4E  |RIC EQUATIONS IN|
000001F0: 20 32 32 30 30 2D 32 33  30 30 00 1C 0A 20 08 56  | 2200-2300... .V|
00000200: B2 35 33 32 34 38 3A 8F  20 56 49 44 45 4F 20 43  |.53248:. VIDEO C|
00000210: 48 49 50 20 4C 4F 43 41  54 49 4F 4E 00 40 0A 2A  |HIP LOCATION.@.*|
00000220: 08 48 49 B2 38 31 39 32  3A 8F 20 48 49 52 45 53  |.HI.8192:. HIRES|
00000230: 20 53 43 52 45 45 4E 20  4C 4F 43 41 54 49 4F 4E  | SCREEN LOCATION|
00000240: 00 68 0A 34 08 4D 4C B2  33 32 35 31 32 3A 8F 20  |.h.4.ML.32512:. |
00000250: 4D 41 43 48 49 4E 45 20  4C 41 4E 47 55 41 47 45  |MACHINE LANGUAGE|
00000260: 20 52 4F 55 54 49 4E 45  00 95 0A 3E 08 85 22 93  | ROUTINE...>..".|
00000270: 11 11 11 43 4C 45 41 52  20 47 41 52 42 41 47 45  |...CLEAR GARBAGE|
00000280: 20 46 52 4F 4D 20 38 31  39 32 20 20 20 59 9D 9D  | FROM 8192   Y..|
00000290: 9D 22 3B 5A 24 00 A6 0A  3F 08 8B 5A 24 B2 22 4E  |.";Z$...?..Z$."N|
000002A0: 22 A7 32 31 33 30 00 CD  0A 40 08 99 22 C3 C3 C3  |".2130...@.."...|
000002B0: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
000002C0: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 22 00 F3 0A  |............"...|
000002D0: 41 08 99 22 46 4F 52 49  3D 30 54 4F 38 31 39 31  |A.."FORI=0TO8191|
000002E0: 3A 50 4F 4B 45 38 31 39  32 2B 49 2C 30 3A 4E 45  |:POKE8192+I,0:NE|
000002F0: 58 54 22 00 20 0B 42 08  99 22 C3 C3 C3 C3 C3 C3  |XT". .B.."......|
00000300: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000310: C3 C3 C3 C3 C3 C3 C3 C3  C3 22 3A 8D 36 30 30 30  |.........":.6000|
00000320: 00 51 0B 52 08 85 22 11  50 49 58 45 4C 20 4F 4E  |.Q.R..".PIXEL ON|
00000330: 20 43 4F 4C 4F 55 52 28  30 2D 31 35 29 20 20 20  | COLOUR(0-15)   |
00000340: 30 9D 9D 9D 22 3B 50 31  3A 50 31 B2 50 31 AF 31  |0...";P1:P1.P1.1|
00000350: 35 00 91 0B 57 08 85 22  11 50 49 58 45 4C 20 4F  |5...W..".PIXEL O|
00000360: 46 46 28 42 41 43 4B 47  52 4F 55 4E 44 29 43 4F  |FF(BACKGROUND)CO|
00000370: 4C 4F 55 52 28 30 2D 31  35 29 20 20 20 31 9D 9D  |LOUR(0-15)   1..|
00000380: 9D 22 3B 50 30 3A 50 43  B2 50 31 AC 31 36 AA 50  |.";P0:PC.P1.16.P|
00000390: 30 00 BF 0B 59 08 99 22  C3 C3 C3 C3 C3 C3 C3 C3  |0...Y.."........|
000003A0: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
000003B0: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 22 00  |..............".|
000003C0: EF 0B 5A 08 99 22 46 4F  52 49 3D 30 54 4F 39 39  |..Z.."FORI=0TO99|
000003D0: 39 3A 50 4F 4B 45 31 30  32 34 2B 49 2C 22 50 31  |9:POKE1024+I,"P1|
000003E0: 22 2A 31 36 2B 22 50 30  22 3A 4E 45 58 54 22 00  |"*16+"P0":NEXT".|
000003F0: 23 0C 5B 08 99 22 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |#.[.."..........|
00000400: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000410: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 22 3A 8D 36  |............":.6|
00000420: 30 30 30 00 5E 0C 5C 08  99 22 93 11 11 11 48 49  |000.^.\.."....HI|
00000430: 54 20 41 20 4B 45 59 20  54 4F 20 44 49 53 43 4F  |T A KEY TO DISCO|
00000440: 4E 54 49 4E 55 45 20 50  4C 4F 54 2E 22 3A 81 49  |NTINUE PLOT.":.I|
00000450: B2 30 A4 31 30 30 30 3A  82 3A 99 22 93 22 00 7C  |.0.1000:.:.".".||
00000460: 0C 66 08 97 56 AA 31 37  2C 35 39 3A 97 56 AA 32  |.f..V.17,59:.V.2|
00000470: 34 2C 32 35 3A 8F 20 48  49 52 45 53 00 93 0C 70  |4,25:. HIRES...p|
00000480: 08 8B C8 28 5A 24 2C 31  29 B2 22 59 22 A7 8D 32  |...(Z$,1)."Y"..2|
00000490: 33 37 30 00 C9 0C 7A 08  97 31 37 34 2C 30 3A 97  |370...z..174,0:.|
000004A0: 31 37 35 2C 34 3A 97 31  37 36 2C 50 43 3A 97 31  |175,4:.176,PC:.1|
000004B0: 37 37 2C 34 3A 9E 20 4D  4C 3A 8F 20 50 49 58 45  |77,4:. ML:. PIXE|
000004C0: 4C 20 43 4F 4C 4F 55 52  53 00 CF 0C 84 08 3A 00  |L COLOURS.....:.|
000004D0: F7 0C 8E 08 8F 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.....***********|
000004E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000004F0: 2A 2A 2A 2A 2A 2A 2A 00  2C 0D 98 08 54 30 B2 30  |*******.,...T0.0|
00000500: 3A 54 31 B2 31 30 30 30  3A 53 43 B2 32 AC FF AD  |:T1.1000:SC.2...|
00000510: 54 31 3A 8F 20 4D 49 4E  2C 4D 41 58 20 41 4E 44  |T1:. MIN,MAX AND|
00000520: 20 53 43 41 4C 45 20 46  4F 52 20 54 00 5A 0D A2  | SCALE FOR T.Z..|
00000530: 08 58 30 B2 30 3A 58 31  B2 33 32 30 3A 59 30 B2  |.X0.0:X1.320:Y0.|
00000540: 30 3A 59 31 B2 32 30 30  3A 8F 20 4D 49 4E 2C 4D  |0:Y1.200:. MIN,M|
00000550: 41 58 20 46 4F 52 20 58  2C 59 00 A3 0D AC 08 41  |AX FOR X,Y.....A|
00000560: B2 28 58 31 AA 58 30 29  AD 32 3A 42 B2 28 58 31  |.(X1.X0).2:B.(X1|
00000570: AB 58 30 29 AD 32 3A 43  B2 28 59 31 AA 59 30 29  |.X0).2:C.(Y1.Y0)|
00000580: AD 32 3A 44 B2 28 59 31  AB 59 30 29 AD 32 3A 50  |.2:D.(Y1.Y0).2:P|
00000590: B2 33 3A 51 B2 35 3A 8F  20 50 41 52 41 4D 45 54  |.3:Q.5:. PARAMET|
000005A0: 45 52 53 00 BA 0D B6 08  81 54 B2 54 30 20 A4 20  |ERS......T.T0 . |
000005B0: 54 31 3A 54 54 B2 54 AC  53 43 00 CC 0D C0 08 58  |T1:TT.T.SC.....X|
000005C0: B2 41 AA 42 AC BF 28 50  AC 54 54 29 00 DE 0D CA  |.A.B..(P.TT)....|
000005D0: 08 59 B2 43 AA 44 AC BE  28 51 AC 54 54 29 00 FB  |.Y.C.D..(Q.TT)..|
000005E0: 0D D4 08 8D 32 30 31 30  3A A1 42 24 3A 8B 42 24  |....2010:.B$:.B$|
000005F0: B2 22 22 A7 20 82 3A 99  22 93 22 00 0C 0E DE 08  |."". .:.".".....|
00000600: 8B 42 24 B3 B1 22 22 A7  32 33 31 30 00 12 0E E8  |.B$.."".2310....|
00000610: 08 3A 00 39 0E F2 08 8F  2A 2A 2A 2A 2A 2A 2A 2A  |.:.9....********|
00000620: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000630: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 4D 0E FC 08 A1 41  |*********.M....A|
00000640: 24 3A 8B 41 24 B2 22 22  A7 32 33 30 30 00 6A 0E  |$:.A$."".2300.j.|
00000650: 06 09 97 56 AA 31 37 2C  32 37 3A 97 56 AA 32 34  |...V.17,27:.V.24|
00000660: 2C 32 31 3A 99 22 93 22  3A 8A 00 83 0E 10 09 56  |,21:.".":......V|
00000670: B2 35 33 32 34 38 3A 48  49 B2 38 31 39 32 3A 99  |.53248:HI.8192:.|
00000680: 22 93 22 00 A1 0E 1A 09  97 56 AA 31 37 2C 35 39  |"."......V.17,59|
00000690: 3A 97 56 AA 32 34 2C 32  35 3A 8F 20 48 49 52 45  |:.V.24,25:. HIRE|
000006A0: 53 00 BC 0E 2E 09 A1 41  24 3A 8B 41 24 B2 22 22  |S......A$:.A$.""|
000006B0: A7 32 33 35 30 3A 8F 20  57 41 49 54 00 D9 0E 38  |.2350:. WAIT...8|
000006C0: 09 97 56 AA 31 37 2C 32  37 3A 97 56 AA 32 34 2C  |..V.17,27:.V.24,|
000006D0: 32 31 3A 99 22 93 22 3A  8E 00 E2 0E 42 09 99 22  |21:.".":....B.."|
000006E0: 93 22 00 0B 0F 4C 09 97  31 37 34 2C 30 3A 97 31  |."...L..174,0:.1|
000006F0: 37 35 2C 33 32 3A 97 31  37 36 2C 30 3A 97 31 37  |75,32:.176,0:.17|
00000700: 37 2C 33 32 3A 9E 20 4D  4C 3A 8E 00 39 0F 56 09  |7,32:. ML:..9.V.|
00000710: 4D 4C B2 37 AC 34 30 39  36 AA 31 35 AC 32 35 36  |ML.7.4096.15.256|
00000720: 3A 97 35 33 32 38 31 2C  31 35 3A 97 35 33 32 38  |:.53281,15:.5328|
00000730: 30 2C 31 32 3A 99 22 90  22 00 60 0F 60 09 81 49  |0,12:.".".`.`..I|
00000740: B2 30 A4 31 36 3A 87 58  3A 97 4D 4C AA 49 2C 58  |.0.16:.X:.ML.I,X|
00000750: 3A 82 3A 46 B2 38 3A 47  B2 33 31 32 3A 48 B2 37  |:.:F.8:G.312:H.7|
00000760: 00 76 0F 6A 09 81 49 B2  30 A4 37 3A 50 28 49 29  |.v.j..I.0.7:P(I)|
00000770: B2 32 AE 49 3A 82 00 7C  0F 74 09 8E 00 C3 0F 7E  |.2.I:..|.t.....~|
00000780: 09 83 20 31 36 35 2C 31  37 36 2C 31 36 36 2C 31  |.. 165,176,166,1|
00000790: 37 37 2C 31 36 30 2C 30  2C 31 34 35 2C 31 37 34  |77,160,0,145,174|
000007A0: 2C 32 30 30 2C 32 30 38  2C 32 35 31 2C 32 33 30  |,200,208,251,230|
000007B0: 2C 31 37 35 2C 32 30 32  2C 32 30 38 2C 32 34 36  |,175,202,208,246|
000007C0: 2C 39 36 00 C9 0F 88 09  3A 00 ED 0F 92 09 8F 20  |,96.....:...... |
000007D0: 52 4F 55 54 49 4E 45 20  41 54 20 24 37 46 4F 4F  |ROUTINE AT $7FOO|
000007E0: 20 46 49 4C 4C 53 20 4D  45 4D 4F 52 59 00 10 10  | FILLS MEMORY...|
000007F0: 9C 09 8F 20 57 49 54 48  20 41 20 50 52 45 53 43  |... WITH A PRESC|
00000800: 52 49 42 45 44 20 46 49  4C 4C 20 42 59 54 45 2E  |RIBED FILL BYTE.|
00000810: 00 34 10 A6 09 8F 20 50  4F 4B 45 20 31 37 34 2F  |.4.... POKE 174/|
00000820: 31 37 35 2C 53 54 41 52  54 49 4E 47 20 41 44 44  |175,STARTING ADD|
00000830: 52 45 53 53 00 4D 10 B0  09 8F 20 50 4F 4B 45 20  |RESS.M.... POKE |
00000840: 31 37 36 2C 46 49 4C 4C  20 42 59 54 45 00 6C 10  |176,FILL BYTE.l.|
00000850: BA 09 8F 20 50 4F 4B 45  20 31 37 37 2C 4E 55 4D  |... POKE 177,NUM|
00000860: 42 45 52 20 4F 46 20 50  41 47 45 53 00 91 10 C4  |BER OF PAGES....|
00000870: 09 8F 20 53 59 53 20 4D  4C 20 54 4F 20 46 49 4C  |.. SYS ML TO FIL|
00000880: 4C 20 50 41 47 45 53 20  4F 46 20 4D 45 4D 4F 52  |L PAGES OF MEMOR|
00000890: 59 00 A5 10 70 17 99 22  11 48 49 54 20 41 20 4B  |Y...p..".HIT A K|
000008A0: 45 59 2E 2E 22 00 BA 10  71 17 A1 41 24 3A 8B 41  |EY.."...q..A$:.A|
000008B0: 24 B3 B1 22 22 A7 36 30  30 31 00 CE 10 72 17 A1  |$.."".6001...r..|
000008C0: 41 24 3A 8B 41 24 B2 22  22 A7 36 30 30 32 00 F0  |A$:.A$."".6002..|
000008D0: 10 73 17 99 22 91 20 20  20 20 20 20 20 20 20 20  |.s..".          |
000008E0: 20 20 20 20 20 20 20 20  20 20 20 20 91 22 3A 8E  |            .":.|
000008F0: 00 F6 10 58 1B 8F 00 3C  11 76 1B 8F 50 52 49 4E  |...X...<.v..PRIN|
00000900: 54 22 93 11 11 11 4C 4F  41 44 22 43 48 52 24 28  |T"....LOAD"CHR$(|
00000910: 33 34 29 22 3E 47 52 41  50 48 49 43 53 2D 33 22  |34)">GRAPHICS-3"|
00000920: 43 48 52 24 28 33 34 29  22 2C 38 22 3A 50 52 49  |CHR$(34)",8":PRI|
00000930: 4E 54 22 11 11 11 11 52  55 4E 13 22 00 00 00     |NT"....RUN."... |
..!...."....... PONZ0*83*WATERLOO.N...V.
53248:.V.32,12:.V.33,15:.".":.V.22,200..
....".":."......IF YOU .STOP. AND CHANGE
 THE EQUATIONS"......".IN LINES 2200 TO 
2300 YOU CAN .RUN. AND"......".SEE YOUR 
OWN CURVE PLOTTED!"...(.."....HIT .RETUR
N. TO PROCEED."...-.."..HIT .Q. TO QUIT.
".,.2..A$:.A$.."".50.>.<..A$:.A$."".60.P
.F..A$."Q". 7000...P..56,7.16.15:.55,0:.
:.2390:.2030:. INITIALIZATION...Z.X1..(X
.F).F:Y1..(Y.F).G:BY.HI.X1.Y1.Y:BI.H..(X
.X1).R....BY,B(BY).P(BI):....... PARAMET
RIC EQUATIONS IN 2200-2300... .V.53248:.
 VIDEO CHIP LOCATION.@.*.HI.8192:. HIRES
 SCREEN LOCATION.H.4.ML.32512:. MACHINE 
LANGUAGE ROUTINE...>.."....CLEAR GARBAGE
 FROM 8192   Y...";Z$...?..Z$."N".2130.M
.@.."CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC"...
A.."FORI=0TO8191:POKE8192+I,0:NEXT". .B.
."CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC":.6000
.Q.R..".PIXEL ON COLOUR(0-15)   0...";P1
:P1.P1.15...W..".PIXEL OFF(BACKGROUND)CO
LOUR(0-15)   1...";P0:PC.P1.16.P0...Y.."
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC".
..Z.."FORI=0TO999:POKE1024+I,"P1"*16+"P0
":NEXT".#.[.."CCCCCCCCCCCCCCCCCCCCCCCCCC
CCCCCCCCCCCC":.6000.^.\.."....HIT A KEY 
TO DISCONTINUE PLOT.":.I.0.1000:.:.".".|
.F..V.17,59:.V.24,25:. HIRES...P..H(Z$,1
)."Y"..2370.I.Z..174,0:.175,4:.176,PC:.1
77,4:. ML:. PIXEL COLOURS.O...:......***
*******************************.,...T0.0
:T1.1000:SC.2...T1:. MIN,MAX AND SCALE F
OR T.Z...X0.0:X1.320:Y0.0:Y1.200:. MIN,M
AX FOR X,Y.....A.(X1.X0).2:B.(X1.X0).2:C
.(Y1.Y0).2:D.(Y1.Y0).2:P.3:Q.5:. PARAMET
ERS......T.T0 . T1:TT.T.SC.L...X.A.B..(P
.TT)...J.Y.C.D..(Q.TT)...T..2010:.B$:.B$
."". .:."."......B$.."".2310.....:.9....
*********************************.M....A
$:.A$."".2300.J....V.17,27:.V.24,21:."."
:......V.53248:HI.8192:."."......V.17,59
:.V.24,25:. HIRES......A$:.A$."".2350:. 
WAIT.Y.8..V.17,27:.V.24,21:.".":....B.."
."...L..174,0:.175,32:.176,0:.177,32:. M
L:..9.V.ML.7.4096.15.256:.53281,15:.5328
0,12:.".".`.`..I.0.16:.X:.ML.I,X:.:F.8:G
.312:H.7.V.J..I.0.7:P(I).2.I:..|.T...C.~
.. 165,176,166,177,160,0,145,174,200,208
,251,230,175,202,208,246,96.I...:...... 
ROUTINE AT $7FOO FILLS MEMORY...... WITH
 A PRESCRIBED FILL BYTE..4.... POKE 174/
175,STARTING ADDRESS.M.... POKE 176,FILL
 BYTE.L.... POKE 177,NUMBER OF PAGES...D
.. SYS ML TO FILL PAGES OF MEMORY...P.."
.HIT A KEY.."...Q..A$:.A$.."".6001.N.R..
A$:.A$."".6002...S..".                  
    .":....X...<.V..PRINT"....LOAD"CHR$(
34)">GRAPHICS-3"CHR$(34)",8":PRINT"....R
UN."...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL