> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 05 00 97 35 33 32 38 30 2C 34 3A 97 |.."....53280,4:.|
00000010: 35 33 32 38 31 2C 31 35 3A 99 22 90 22 3A 8D 35 |53281,15:.".":.5|
00000020: 30 30 00 2F 08 0A 00 99 C7 28 31 34 37 29 3B 00 |00./.....(147);.|
00000030: 65 08 14 00 81 54 B2 31 A4 32 31 3A 99 22 2E 2E |e....T.1.21:."..|
00000040: 2C 2C 2E 2E 2C 2C 1F 2E 2E 2C 2C 2E 2E 2C 2C 90 |,,..,,...,,..,,.|
00000050: 2E 2E 2C 2C 2E 2E 2C 2C 22 3A 82 3A 8F 20 32 34 |..,,..,,":.:. 24|
00000060: 20 44 4F 54 53 00 81 08 28 00 56 B2 35 33 32 34 | DOTS...(.V.5324|
00000070: 38 3A 97 56 AA 32 31 2C 34 3A 97 56 AA 34 31 2C |8:.V.21,4:.V.41,|
00000080: 32 00 97 08 32 00 97 56 AA 34 2C 32 35 35 3A 97 |2...2..V.4,255:.|
00000090: 56 AA 35 2C 32 32 35 00 A4 08 3C 00 97 32 30 34 |V.5,225...<..204|
000000A0: 32 2C 31 33 00 AA 08 46 00 80 00 B2 08 64 00 43 |2,13...F.....d.C|
000000B0: B2 38 00 BE 08 69 00 81 59 B2 30 A4 32 30 00 CA |.8...i..Y.0.20..|
000000C0: 08 6E 00 81 58 B2 31 A4 32 34 00 DF 08 78 00 50 |.n..X.1.24...x.P|
000000D0: B2 C2 28 31 30 32 33 AA 58 AA 34 30 AC 59 29 00 |..(1023.X.40.Y).|
000000E0: F7 08 82 00 43 B2 43 AB 31 3A 8B 50 B2 34 32 A7 |....C.C.1:.P.42.|
000000F0: 51 B2 51 AA 32 AE 43 00 17 09 8C 00 8B 43 B2 30 |Q.Q.2.C......C.0|
00000100: A7 43 B2 38 3A 47 B2 47 AA 31 3A 97 38 33 31 AA |.C.8:G.G.1:.831.|
00000110: 47 2C 51 3A 51 B2 30 00 1E 09 96 00 82 58 00 25 |G,Q:Q.0......X.%|
00000120: 09 A0 00 82 59 00 2B 09 AA 00 80 00 39 09 C8 00 |....Y.+.....9...|
00000130: 99 22 13 22 3B 3A 4A B2 30 00 6B 09 D2 00 81 54 |.".";:J.0.k....T|
00000140: B2 30 A4 36 32 3A 53 24 B2 C4 28 C2 28 38 33 32 |.0.62:S$..(.(832|
00000150: AA 54 29 29 3A 4C B2 C3 28 53 24 29 3A 4A B2 4A |.T)):L..(S$):J.J|
00000160: AA 31 3A 8B 4A B1 33 A7 4A B2 31 00 8C 09 DC 00 |.1:.J.3.J.1.....|
00000170: 99 A3 4A AC 35 AB 4C AA 32 33 29 3B 3A 99 53 24 |..J.5.L.23);:.S$|
00000180: 3B 3A 8B 4A B3 33 A7 99 22 2C 22 3B 00 97 09 E6 |;:.J.3..",";....|
00000190: 00 8B 4A B2 33 A7 99 00 9E 09 F0 00 82 54 00 A4 |..J.3........T..|
000001A0: 09 FA 00 80 00 C7 09 F4 01 99 22 93 20 20 20 20 |..........". |
000001B0: 20 20 20 20 20 20 20 20 49 4E 53 54 52 55 43 54 | INSTRUCT|
000001C0: 49 4F 4E 53 22 3A 99 00 F3 09 F9 01 99 22 41 46 |IONS":......."AF|
000001D0: 54 45 52 20 54 48 45 20 47 52 49 44 20 49 53 20 |TER THE GRID IS |
000001E0: 50 55 54 20 4F 4E 20 54 48 45 20 53 43 52 45 45 |PUT ON THE SCREE|
000001F0: 4E 2C 22 00 22 0A FE 01 99 22 55 53 45 20 54 48 |N,"."...."USE TH|
00000200: 45 20 45 44 49 54 49 4E 47 20 4B 45 59 53 20 54 |E EDITING KEYS T|
00000210: 4F 20 4D 4F 56 45 20 54 48 45 20 43 55 52 53 4F |O MOVE THE CURSO|
00000220: 52 22 00 4E 0A 03 02 99 22 4F 4E 54 4F 20 54 48 |R".N...."ONTO TH|
00000230: 45 20 47 52 49 44 2E 20 20 54 59 50 45 20 41 4E |E GRID. TYPE AN|
00000240: 20 27 2A 27 20 57 48 45 52 45 56 45 52 22 00 77 | '*' WHEREVER".w|
00000250: 0A 08 02 99 22 59 4F 55 20 57 41 4E 54 20 54 4F |...."YOU WANT TO|
00000260: 20 46 49 4C 4C 20 49 4E 20 41 20 44 4F 54 20 4F | FILL IN A DOT O|
00000270: 4E 20 59 4F 55 52 22 00 A1 0A 0D 02 99 22 53 50 |N YOUR"......"SP|
00000280: 52 49 54 45 2E 20 20 57 48 45 4E 20 59 4F 55 20 |RITE. WHEN YOU |
00000290: 48 41 56 45 20 59 4F 55 52 20 53 50 52 49 54 45 |HAVE YOUR SPRITE|
000002A0: 22 00 CE 0A 12 02 99 22 52 45 41 44 59 20 46 4F |"......"READY FO|
000002B0: 52 20 56 49 45 57 49 4E 47 2C 20 4D 4F 56 45 20 |R VIEWING, MOVE |
000002C0: 54 48 45 20 43 55 52 53 4F 52 20 54 4F 22 00 FA |THE CURSOR TO"..|
000002D0: 0A 17 02 99 22 54 48 45 20 4C 49 4E 45 20 44 49 |...."THE LINE DI|
000002E0: 52 45 43 54 4C 59 20 55 4E 44 45 52 20 54 48 45 |RECTLY UNDER THE|
000002F0: 20 47 52 49 44 20 41 4E 44 22 00 27 0B 1C 02 99 | GRID AND".'....|
00000300: 22 54 59 50 45 20 27 52 55 4E 20 31 30 30 27 2E |"TYPE 'RUN 100'.|
00000310: 20 20 54 48 45 20 53 50 52 49 54 45 20 57 49 4C | THE SPRITE WIL|
00000320: 4C 20 46 4F 52 4D 22 00 53 0B 21 02 99 22 49 4E |L FORM".S.!.."IN|
00000330: 20 54 48 45 20 4C 4F 57 45 52 20 52 49 47 48 54 | THE LOWER RIGHT|
00000340: 20 48 41 4E 44 20 50 41 52 54 20 4F 46 20 59 4F | HAND PART OF YO|
00000350: 55 52 22 00 83 0B 26 02 99 22 53 43 52 45 45 4E |UR"...&.."SCREEN|
00000360: 2E 20 20 54 48 45 20 43 4F 4D 50 55 54 45 52 20 |. THE COMPUTER |
00000370: 57 49 4C 4C 20 50 52 49 4E 54 20 27 52 45 41 44 |WILL PRINT 'READ|
00000380: 59 27 22 00 B2 0B 2B 02 99 22 59 4F 55 20 43 41 |Y'"...+.."YOU CA|
00000390: 4E 20 4D 4F 56 45 20 42 41 43 4B 20 55 50 20 4F |N MOVE BACK UP O|
000003A0: 4E 20 54 4F 20 54 48 45 20 47 52 49 44 20 41 4E |N TO THE GRID AN|
000003B0: 44 22 00 DC 0B 30 02 99 22 4D 41 4B 45 20 43 4F |D"...0.."MAKE CO|
000003C0: 52 52 45 43 54 49 4F 4E 53 20 41 4E 44 20 52 55 |RRECTIONS AND RU|
000003D0: 4E 20 49 54 20 41 47 41 49 4E 2E 22 00 08 0C 35 |N IT AGAIN."...5|
000003E0: 02 99 22 42 45 20 43 41 52 45 46 55 4C 20 26 20 |.."BE CAREFUL & |
000003F0: 4E 4F 54 20 4D 4F 56 45 20 54 48 45 20 43 55 52 |NOT MOVE THE CUR|
00000400: 53 4F 52 20 54 4F 4F 22 00 33 0C 3A 02 99 22 4C |SOR TOO".3.:.."L|
00000410: 4F 57 20 4F 52 20 59 4F 55 20 4D 41 59 20 53 43 |OW OR YOU MAY SC|
00000420: 52 4F 4C 4C 20 59 4F 55 52 20 47 52 49 44 20 41 |ROLL YOUR GRID A|
00000430: 4E 44 22 00 4D 0C 3F 02 99 22 53 50 52 49 54 45 |ND".M.?.."SPRITE|
00000440: 20 50 41 54 54 45 52 4E 20 55 50 2E 22 00 60 0C | PATTERN UP.".`.|
00000450: 44 02 A1 43 24 3A 8B 43 24 B2 22 22 A7 35 38 30 |D..C$:.C$."".580|
00000460: 00 8A 0C 49 02 99 22 93 57 48 45 4E 20 59 4F 55 |...I..".WHEN YOU|
00000470: 20 48 41 56 45 20 54 48 45 20 53 48 41 50 45 20 | HAVE THE SHAPE |
00000480: 59 4F 55 20 57 41 4E 54 2C 22 00 B9 0C 4E 02 99 |YOU WANT,"...N..|
00000490: 22 4D 4F 56 45 20 54 48 45 20 43 55 52 53 4F 52 |"MOVE THE CURSOR|
000004A0: 20 54 4F 20 54 48 45 20 46 49 52 53 54 20 4C 49 | TO THE FIRST LI|
000004B0: 4E 45 20 42 45 4C 4F 57 22 00 E7 0C 53 02 99 22 |NE BELOW"...S.."|
000004C0: 54 48 45 20 47 52 49 44 20 41 4E 44 20 54 59 50 |THE GRID AND TYP|
000004D0: 45 20 27 52 55 4E 20 32 30 30 27 2E 20 20 54 48 |E 'RUN 200'. TH|
000004E0: 45 20 44 41 54 41 22 00 15 0D 58 02 99 22 57 49 |E DATA"...X.."WI|
000004F0: 4C 4C 20 50 52 49 4E 54 20 4F 55 54 20 49 4E 20 |LL PRINT OUT IN |
00000500: 32 31 20 52 4F 57 53 20 4F 46 20 33 20 43 4F 4C |21 ROWS OF 3 COL|
00000510: 55 4D 4E 53 22 00 44 0D 5D 02 99 22 4F 4E 20 54 |UMNS".D.].."ON T|
00000520: 48 45 20 52 49 47 48 54 20 48 41 4E 44 20 50 4F |HE RIGHT HAND PO|
00000530: 52 54 49 4F 4E 20 4F 46 20 54 48 45 20 53 43 52 |RTION OF THE SCR|
00000540: 45 45 4E 22 00 6E 0D 62 02 99 22 41 4E 44 20 59 |EEN".n.b.."AND Y|
00000550: 4F 55 20 43 41 4E 20 43 4F 50 59 20 54 48 45 20 |OU CAN COPY THE |
00000560: 44 41 54 41 20 44 4F 57 4E 20 46 4F 52 22 00 99 |DATA DOWN FOR"..|
00000570: 0D 67 02 99 22 49 4E 43 4C 55 53 49 4F 4E 20 49 |.g.."INCLUSION I|
00000580: 4E 20 59 4F 55 52 20 50 52 4F 47 52 41 4D 53 20 |N YOUR PROGRAMS |
00000590: 56 49 41 20 44 41 54 41 22 00 AE 0D 6C 02 99 22 |VIA DATA"...l.."|
000005A0: 53 54 41 54 45 4D 45 4E 54 53 2E 22 3A 99 00 DA |STATEMENTS.":...|
000005B0: 0D 71 02 99 22 59 4F 55 20 43 41 4E 20 43 52 45 |.q.."YOU CAN CRE|
000005C0: 41 54 45 20 4D 55 4C 54 49 43 4F 4C 4F 52 20 53 |ATE MULTICOLOR S|
000005D0: 50 52 49 54 45 53 20 42 59 22 00 03 0E 76 02 99 |PRITES BY"...v..|
000005E0: 22 45 4E 54 45 52 49 4E 47 20 4D 55 4C 54 49 43 |"ENTERING MULTIC|
000005F0: 4F 4C 4F 52 20 4D 4F 44 45 20 57 49 54 48 20 54 |OLOR MODE WITH T|
00000600: 48 45 22 00 1D 0E 7B 02 99 22 41 50 50 52 4F 50 |HE"...{.."APPROP|
00000610: 52 49 41 54 45 20 50 4F 4B 45 53 3A 22 00 45 0E |RIATE POKES:".E.|
00000620: 80 02 99 22 20 20 20 50 4F 4B 45 20 35 33 32 37 |..." POKE 5327|
00000630: 36 2C 50 45 45 4B 28 35 33 32 37 36 29 4F 52 28 |6,PEEK(53276)OR(|
00000640: 32 5E 53 4E 29 00 6B 0E 85 02 99 22 20 20 20 57 |2^SN).k...." W|
00000650: 48 45 52 45 20 53 4E 3D 53 50 52 49 54 45 20 4E |HERE SN=SPRITE N|
00000660: 55 4D 42 45 52 20 30 2D 37 2E 22 00 94 0E 8A 02 |UMBER 0-7.".....|
00000670: 99 22 53 45 54 20 41 4C 4C 20 53 50 52 49 54 45 |."SET ALL SPRITE|
00000680: 53 20 54 4F 20 4D 55 4C 54 49 43 4F 4C 4F 52 20 |S TO MULTICOLOR |
00000690: 42 59 3A 22 00 AC 0E 8F 02 99 22 20 20 20 50 4F |BY:"......" PO|
000006A0: 4B 45 35 33 32 37 36 2C 32 35 35 22 00 D9 0E 94 |KE53276,255"....|
000006B0: 02 99 22 4D 55 4C 54 49 43 4F 4C 4F 52 20 4D 4F |.."MULTICOLOR MO|
000006C0: 44 45 20 43 41 4E 20 42 45 20 54 55 52 4E 45 44 |DE CAN BE TURNED|
000006D0: 20 4F 46 46 20 42 59 3A 22 00 EF 0E 99 02 99 22 | OFF BY:"......"|
000006E0: 20 20 20 50 4F 4B 45 35 33 32 37 36 2C 30 22 00 | POKE53276,0".|
000006F0: 1E 0F 9E 02 99 22 43 4F 4C 4F 52 20 49 53 20 43 |....."COLOR IS C|
00000700: 4F 4E 54 52 4F 4C 4C 45 44 20 42 59 20 54 48 45 |ONTROLLED BY THE|
00000710: 20 42 49 54 20 50 41 54 54 45 52 4E 3A 22 00 38 | BIT PATTERN:".8|
00000720: 0F A3 02 99 22 20 20 20 30 30 3D 53 43 52 45 45 |...." 00=SCREE|
00000730: 4E 20 43 4F 4C 4F 52 22 00 63 0F A8 02 99 22 20 |N COLOR".c...." |
00000740: 20 20 30 2A 3D 4D 55 4C 54 49 43 4F 4C 4F 52 20 | 0*=MULTICOLOR |
00000750: 52 45 47 49 53 54 45 52 20 30 20 28 35 33 32 38 |REGISTER 0 (5328|
00000760: 35 29 22 00 86 0F AD 02 99 22 20 20 20 2A 30 3D |5)"......" *0=|
00000770: 53 50 52 49 54 45 20 43 4F 4C 4F 52 20 52 45 47 |SPRITE COLOR REG|
00000780: 49 53 54 45 52 22 00 B1 0F B2 02 99 22 20 20 20 |ISTER"......" |
00000790: 2A 2A 3D 4D 55 4C 54 49 43 4F 4C 4F 52 20 52 45 |**=MULTICOLOR RE|
000007A0: 47 49 53 54 45 52 20 31 20 28 35 33 32 38 36 29 |GISTER 1 (53286)|
000007B0: 22 00 D2 0F B7 02 99 22 20 20 20 54 48 45 20 43 |"......" THE C|
000007C0: 4F 4C 4F 52 53 20 41 52 45 20 30 20 54 4F 20 31 |OLORS ARE 0 TO 1|
000007D0: 35 22 00 E5 0F BC 02 A1 43 24 3A 8B 43 24 B2 22 |5"......C$:.C$."|
000007E0: 22 A7 37 30 30 00 EB 0F C6 02 8E 00 00 00 |".700......... |
.."....53280,4:.53281,15:.".":.500./....
G(147);.E....T.1.21:."..,,..,,...,,..,,.
..,,..,,":.:. 24 DOTS...(.V.53248:.V.21,
4:.V.41,2...2..V.4,255:.V.5,225...<..204
2,13...F.....D.C.8...I..Y.0.20.J.N..X.1.
24...X.P.B(1023.X.40.Y).....C.C.1:.P.42.
Q.Q.2.C......C.0.C.8:G.G.1:.831.G,Q:Q.0.
.....X.%. ..Y.+.....9.H..".";:J.0.K.R..T
.0.62:S$.D(B(832.T)):L.C(S$):J.J.1:.J.3.
J.1.......J.5.L.23);:.S$;:.J.3..",";....
..J.3........T.......G....".
INSTRUCTIONS":......."AFTER THE GRID IS
PUT ON THE SCREEN,"."...."USE THE EDITIN
G KEYS TO MOVE THE CURSOR".N...."ONTO TH
E GRID. TYPE AN '*' WHEREVER".W...."YOU
WANT TO FILL IN A DOT ON YOUR"......"SP
RITE. WHEN YOU HAVE YOUR SPRITE".N...."
READY FOR VIEWING, MOVE THE CURSOR TO"..
...."THE LINE DIRECTLY UNDER THE GRID AN
D".'...."TYPE 'RUN 100'. THE SPRITE WIL
L FORM".S.!.."IN THE LOWER RIGHT HAND PA
RT OF YOUR"...&.."SCREEN. THE COMPUTER
WILL PRINT 'READY'"...+.."YOU CAN MOVE B
ACK UP ON TO THE GRID AND"...0.."MAKE CO
RRECTIONS AND RUN IT AGAIN."...5.."BE CA
REFUL & NOT MOVE THE CURSOR TOO".3.:.."L
OW OR YOU MAY SCROLL YOUR GRID AND".M.?.
."SPRITE PATTERN UP.".`.D..C$:.C$."".580
...I..".WHEN YOU HAVE THE SHAPE YOU WANT
,"...N.."MOVE THE CURSOR TO THE FIRST LI
NE BELOW"...S.."THE GRID AND TYPE 'RUN 2
00'. THE DATA"...X.."WILL PRINT OUT IN
21 ROWS OF 3 COLUMNS".D.].."ON THE RIGHT
HAND PORTION OF THE SCREEN".N.B.."AND Y
OU CAN COPY THE DATA DOWN FOR"...G.."INC
LUSION IN YOUR PROGRAMS VIA DATA"...L.."
STATEMENTS.":..Z.Q.."YOU CAN CREATE MULT
ICOLOR SPRITES BY"...V.."ENTERING MULTIC
OLOR MODE WITH THE"...{.."APPROPRIATE PO
KES:".E...." POKE 53276,PEEK(53276)OR(
2^SN).K...." WHERE SN=SPRITE NUMBER 0-
7."......"SET ALL SPRITES TO MULTICOLOR
BY:"......" POKE53276,255".Y...."MULTI
COLOR MODE CAN BE TURNED OFF BY:"......"
POKE53276,0"......"COLOR IS CONTROLLE
D BY THE BIT PATTERN:".8...." 00=SCREE
N COLOR".C...." 0*=MULTICOLOR REGISTER
0 (53285)"......" *0=SPRITE COLOR REG
ISTER"......" **=MULTICOLOR REGISTER 1
(53286)".R...." THE COLORS ARE 0 TO 1
5"......C$:.C$."".700...F.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL