00000000: 00 80 58 58 58 58 0D 58 58 58 58 0D 58 58 58 58 |..XXXX.XXXX.XXXX|
00000010: 0D 40 56 49 44 45 4F 20 49 4E 54 45 52 46 41 43 |.@VIDEO INTERFAC|
00000020: 45 20 43 4F 4E 54 52 4F 4C 4C 45 52 20 28 56 49 |E CONTROLLER (VI|
00000030: 43 29 0D 3D 56 49 43 0D 3D 56 49 43 20 43 48 49 |C).=VIC.=VIC CHI|
00000040: 50 0D 3D 36 35 36 36 0D 4C 4F 43 41 54 49 4F 4E |P.=6566.LOCATION|
00000050: 53 20 35 33 32 34 38 20 54 48 52 55 20 35 34 32 |S 53248 THRU 542|
00000060: 37 31 0D 54 48 49 53 20 43 48 49 50 20 48 41 53 |71.THIS CHIP HAS|
00000070: 20 54 48 45 20 52 41 53 54 45 52 20 52 45 47 49 | THE RASTER REGI|
00000080: 53 54 45 52 0D 54 48 49 53 20 43 48 49 50 20 48 |STER.THIS CHIP H|
00000090: 41 4E 44 4C 45 53 20 53 50 52 49 54 45 53 0D 43 |ANDLES SPRITES.C|
000000A0: 41 4E 27 54 20 55 53 45 20 41 20 4C 49 47 48 54 |AN'T USE A LIGHT|
000000B0: 50 45 4E 20 57 49 54 48 4F 55 54 20 49 54 0D 49 |PEN WITHOUT IT.I|
000000C0: 54 20 48 41 4E 44 4C 45 53 20 41 4C 4C 20 56 49 |T HANDLES ALL VI|
000000D0: 44 45 4F 0D 5C 0D 40 54 48 45 20 43 4F 4C 4F 52 |DEO.\.@THE COLOR|
000000E0: 20 4F 46 20 54 48 45 20 43 55 52 53 4F 52 0D 3D | OF THE CURSOR.=|
000000F0: 43 55 52 53 4F 52 20 43 4F 4C 4F 52 0D 3D 54 45 |CURSOR COLOR.=TE|
00000100: 58 54 20 43 4F 4C 4F 52 0D 3D 2E 0D 4D 45 4D 4F |XT COLOR.=..MEMO|
00000110: 52 59 20 4C 4F 43 41 54 49 4F 4E 20 36 34 36 20 |RY LOCATION 646 |
00000120: 48 4F 4C 44 53 2E 2E 2E 0D 50 4F 4B 45 20 54 48 |HOLDS....POKE TH|
00000130: 49 53 20 4C 4F 43 41 54 49 4F 4E 20 54 4F 20 43 |IS LOCATION TO C|
00000140: 48 41 4E 47 45 2E 2E 2E 0D 44 4F 4E 27 54 20 4D |HANGE....DON'T M|
00000150: 41 4B 45 20 49 54 20 54 48 45 20 53 41 4D 45 20 |AKE IT THE SAME |
00000160: 41 53 20 35 33 32 38 31 21 0D 49 54 27 53 20 41 |AS 53281!.IT'S A|
00000170: 20 43 4F 4C 4F 52 20 52 45 47 49 53 54 45 52 0D | COLOR REGISTER.|
00000180: 4E 4F 54 20 46 4F 52 20 54 48 45 20 42 41 43 4B |NOT FOR THE BACK|
00000190: 47 52 4F 55 4E 44 20 4F 52 20 42 4F 52 44 45 52 |GROUND OR BORDER|
000001A0: 0D 5C 0D 40 52 45 56 45 52 53 45 20 56 49 44 45 |.\.@REVERSE VIDE|
000001B0: 4F 0D 3D 52 45 56 45 52 53 45 0D 3D 2E 0D 3D 50 |O.=REVERSE.=..=P|
000001C0: 52 49 4E 54 49 4E 47 20 52 45 56 45 52 53 45 20 |RINTING REVERSE |
000001D0: 56 49 44 45 4F 0D 27 50 4F 4B 45 20 31 39 39 5E |VIDEO.'POKE 199^|
000001E0: 31 27 20 43 41 55 53 45 53 2E 2E 2E 0D 50 4F 4B |1' CAUSES....POK|
000001F0: 45 20 31 39 39 5E 31 20 54 4F 20 41 43 54 55 41 |E 199^1 TO ACTUA|
00000200: 4C 4C 59 20 53 45 45 20 43 48 52 24 28 33 32 29 |LLY SEE CHR$(32)|
00000210: 0D 43 48 52 24 28 31 34 36 29 20 48 41 53 20 54 |.CHR$(146) HAS T|
00000220: 48 45 20 4F 50 50 4F 53 49 54 45 20 45 46 46 45 |HE OPPOSITE EFFE|
00000230: 43 54 0D 43 48 52 24 28 31 38 29 20 48 41 53 20 |CT.CHR$(18) HAS |
00000240: 53 41 4D 45 20 45 46 46 45 43 54 0D 53 59 4D 42 |SAME EFFECT.SYMB|
00000250: 4F 4C 49 5A 45 44 20 42 59 20 41 20 52 45 56 45 |OLIZED BY A REVE|
00000260: 52 53 45 44 20 52 0D 5C 0D 40 53 43 52 45 45 4E |RSED R.\.@SCREEN|
00000270: 20 4D 45 4D 4F 52 59 0D 3D 53 43 52 45 45 4E 0D | MEMORY.=SCREEN.|
00000280: 3D 56 49 44 45 4F 20 4D 41 54 52 49 58 0D 3D 2E |=VIDEO MATRIX.=.|
00000290: 0D 31 4B 20 4D 45 4D 4F 52 59 20 43 48 55 4E 4B |.1K MEMORY CHUNK|
000002A0: 20 4A 55 53 54 20 42 45 46 4F 52 45 20 42 41 53 | JUST BEFORE BAS|
000002B0: 49 43 0D 53 54 41 52 54 53 20 41 54 20 4C 4F 43 |IC.STARTS AT LOC|
000002C0: 41 54 49 4F 4E 20 31 30 32 34 0D 31 30 30 30 20 |ATION 1024.1000 |
000002D0: 42 59 54 45 53 20 4C 41 52 47 45 0D 50 4F 4B 45 |BYTES LARGE.POKE|
000002E0: 20 31 30 32 34 5E 31 20 50 52 49 4E 54 53 20 41 | 1024^1 PRINTS A|
000002F0: 4E 20 27 41 27 20 41 54 20 48 4F 4D 45 0D 43 41 |N 'A' AT HOME.CA|
00000300: 4E 27 54 20 53 45 45 20 41 4E 59 54 48 49 4E 47 |N'T SEE ANYTHING|
00000310: 20 57 49 54 48 4F 55 54 20 49 54 0D 5C 0D 40 43 | WITHOUT IT.\.@C|
00000320: 48 52 24 28 31 34 32 29 0D 3D 43 4F 44 45 20 31 |HR$(142).=CODE 1|
00000330: 34 32 0D 3D 31 34 32 0D 3D 43 48 41 52 41 43 54 |42.=142.=CHARACT|
00000340: 45 52 20 31 34 32 0D 43 4F 44 45 20 57 49 54 48 |ER 142.CODE WITH|
00000350: 20 4F 50 50 4F 53 49 54 45 20 45 46 46 45 43 54 | OPPOSITE EFFECT|
00000360: 20 4F 46 20 43 54 52 4C 2D 4E 0D 48 41 53 20 54 | OF CTRL-N.HAS T|
00000370: 48 45 20 53 41 4D 45 20 45 46 46 45 43 54 20 41 |HE SAME EFFECT A|
00000380: 53 20 50 4F 4B 45 35 33 32 37 32 5E 32 31 0D 43 |S POKE53272^21.C|
00000390: 4D 44 52 2D 53 48 49 46 54 20 54 4F 47 47 4C 45 |MDR-SHIFT TOGGLE|
000003A0: 53 20 54 48 49 53 0D 41 4C 4C 4F 57 53 20 55 53 |S THIS.ALLOWS US|
000003B0: 45 20 4F 46 20 54 48 45 20 4D 4F 53 54 20 47 52 |E OF THE MOST GR|
000003C0: 41 50 48 49 43 53 0D 54 48 49 53 20 43 4F 44 45 |APHICS.THIS CODE|
000003D0: 20 53 57 49 54 43 48 45 53 20 54 4F 20 55 50 50 | SWITCHES TO UPP|
000003E0: 45 52 43 41 53 45 0D 5C 0D 40 43 48 52 24 28 38 |ERCASE.\.@CHR$(8|
000003F0: 29 0D 3D 38 0D 3D 43 4F 44 45 20 38 0D 3D 43 48 |).=8.=CODE 8.=CH|
00000400: 41 52 41 43 54 45 52 20 38 0D 54 48 45 20 4F 50 |ARACTER 8.THE OP|
00000410: 50 4F 53 49 54 45 20 4F 46 20 43 48 52 24 28 39 |POSITE OF CHR$(9|
00000420: 29 0D 4C 4F 4F 4B 53 20 4C 49 4B 45 20 41 20 52 |).LOOKS LIKE A R|
00000430: 45 56 45 52 53 45 44 20 4E 0D 52 45 43 4F 4D 4D |EVERSED N.RECOMM|
00000440: 45 4E 44 45 44 20 46 4F 52 20 4C 4F 41 44 53 54 |ENDED FOR LOADST|
00000450: 41 52 20 50 52 4F 47 52 41 4D 53 0D 44 49 53 41 |AR PROGRAMS.DISA|
00000460: 42 4C 45 53 20 53 48 49 46 54 2D 43 4D 44 52 0D |BLES SHIFT-CMDR.|
00000470: 4C 4F 43 4B 53 20 49 4E 20 54 48 45 20 43 55 52 |LOCKS IN THE CUR|
00000480: 52 45 4E 54 20 43 41 53 45 0D 5C 0D 40 53 59 53 |RENT CASE.\.@SYS|
00000490: 20 36 34 37 33 38 0D 3D 53 59 53 36 34 37 33 38 | 64738.=SYS64738|
000004A0: 0D 3D 36 34 37 33 38 0D 3D 2E 0D 4D 4F 53 54 20 |.=64738.=..MOST |
000004B0: 43 4F 4D 4D 4F 4E 20 43 4F 44 45 20 46 4F 52 20 |COMMON CODE FOR |
000004C0: 53 59 53 54 45 4D 20 52 45 53 45 54 0D 4E 4F 54 |SYSTEM RESET.NOT|
000004D0: 20 52 45 43 4F 4D 4D 45 4E 44 45 44 20 42 59 20 | RECOMMENDED BY |
000004E0: 4C 4F 41 44 53 54 41 52 0D 44 49 53 41 42 4C 45 |LOADSTAR.DISABLE|
000004F0: 53 20 59 4F 55 52 20 46 41 53 54 4C 4F 41 44 20 |S YOUR FASTLOAD |
00000500: 43 41 52 54 52 49 44 47 45 0D 44 4F 45 53 20 4E |CARTRIDGE.DOES N|
00000510: 4F 54 20 43 4C 45 41 52 20 4D 45 4D 4F 52 59 0D |OT CLEAR MEMORY.|
00000520: 53 59 53 20 48 45 52 45 20 54 4F 20 52 45 53 45 |SYS HERE TO RESE|
00000530: 54 20 43 4F 4D 50 55 54 45 52 0D 5C 0D 40 48 49 |T COMPUTER.\.@HI|
00000540: 47 48 20 52 45 53 4F 4C 55 54 49 4F 4E 20 53 43 |GH RESOLUTION SC|
00000550: 52 45 45 4E 0D 3D 48 49 47 48 20 52 45 53 4F 4C |REEN.=HIGH RESOL|
00000560: 55 54 49 4F 4E 20 44 49 53 50 4C 41 59 0D 3D 48 |UTION DISPLAY.=H|
00000570: 49 52 45 53 0D 3D 48 49 52 45 53 20 53 43 52 45 |IRES.=HIRES SCRE|
00000580: 45 4E 0D 54 41 4B 45 53 20 38 30 30 30 20 42 59 |EN.TAKES 8000 BY|
00000590: 54 45 53 20 54 4F 20 53 45 45 20 49 54 0D 50 4F |TES TO SEE IT.PO|
000005A0: 4B 45 20 35 33 32 36 35 5E 50 45 45 4B 28 35 33 |KE 53265^PEEK(53|
000005B0: 32 36 35 29 4F 52 33 32 0D 36 34 5E 30 30 30 20 |265)OR32.64^000 |
000005C0: 28 58 5E 59 29 20 4C 4F 43 41 54 49 4F 4E 53 0D |(X^Y) LOCATIONS.|
000005D0: 54 57 4F 20 43 4F 4C 4F 52 53 20 46 4F 52 20 45 |TWO COLORS FOR E|
000005E0: 41 43 48 20 38 58 38 20 53 45 43 54 49 4F 4E 0D |ACH 8X8 SECTION.|
000005F0: 33 32 30 20 58 20 32 30 30 20 52 45 53 4F 4C 55 |320 X 200 RESOLU|
00000600: 54 49 4F 4E 0D 5C 0D 40 4D 4F 56 45 20 53 43 52 |TION.\.@MOVE SCR|
00000610: 45 45 4E 20 4D 45 4D 4F 52 59 0D 3D 4D 4F 56 45 |EEN MEMORY.=MOVE|
00000620: 20 53 43 52 45 45 4E 0D 3D 4D 4F 56 45 53 20 53 | SCREEN.=MOVES S|
00000630: 43 52 45 45 4E 0D 3D 4D 4F 56 45 53 20 53 43 52 |CREEN.=MOVES SCR|
00000640: 45 45 4E 20 4D 45 4D 4F 52 59 0D 50 4F 4B 45 20 |EEN MEMORY.POKE |
00000650: 35 33 32 37 32 5E 28 50 45 45 4B 28 35 33 32 37 |53272^(PEEK(5327|
00000660: 32 29 41 4E 44 31 35 29 4F 52 41 44 0D 41 46 54 |2)AND15)ORAD.AFT|
00000670: 45 52 57 41 52 44 53 5E 20 50 4F 4B 45 36 34 38 |ERWARDS^ POKE648|
00000680: 5E 41 44 2F 32 35 36 0D 49 54 20 4D 4F 56 45 53 |^AD/256.IT MOVES|
00000690: 20 53 4F 4D 45 54 48 49 4E 47 0D 49 54 27 53 20 | SOMETHING.IT'S |
000006A0: 52 49 47 48 54 20 49 4E 20 46 52 4F 4E 54 20 4F |RIGHT IN FRONT O|
000006B0: 46 20 59 4F 55 52 20 4E 4F 53 45 0D 53 43 52 45 |F YOUR NOSE.SCRE|
000006C0: 45 4E 28 53 29 0D 5C 0D 40 4C 45 54 0D 3D 2E 0D |EN(S).\.@LET.=..|
000006D0: 3D 2E 0D 3D 2E 0D 54 48 45 20 43 2D 36 34 27 53 |=..=..THE C-64'S|
000006E0: 20 4F 42 53 4F 4C 45 54 45 20 42 41 53 49 43 20 | OBSOLETE BASIC |
000006F0: 43 4F 4D 4D 41 4E 44 0D 54 48 45 20 43 4F 4D 4D |COMMAND.THE COMM|
00000700: 41 4E 44 20 57 4F 52 4B 53 20 42 55 54 20 49 53 |AND WORKS BUT IS|
00000710: 4E 27 54 20 4E 45 45 44 45 44 0D 55 53 45 44 20 |N'T NEEDED.USED |
00000720: 54 4F 20 41 53 53 49 47 4E 20 56 41 4C 55 45 53 |TO ASSIGN VALUES|
00000730: 20 54 4F 20 56 41 52 49 41 42 4C 45 53 0D 54 48 | TO VARIABLES.TH|
00000740: 45 20 45 51 55 41 4C 20 53 49 47 4E 20 49 53 20 |E EQUAL SIGN IS |
00000750: 45 4E 4F 55 47 48 0D 46 4F 52 47 45 54 20 54 48 |ENOUGH.FORGET TH|
00000760: 49 53 20 43 4F 4D 4D 41 4E 44 0D 5C 0D 40 45 4E |IS COMMAND.\.@EN|
00000770: 44 0D |D. |
..XXXX.XXXX.XXXX.@VIDEO INTERFACE CONTRO
LLER (VIC).=VIC.=VIC CHIP.=6566.LOCATION
S 53248 THRU 54271.THIS CHIP HAS THE RAS
TER REGISTER.THIS CHIP HANDLES SPRITES.C
AN'T USE A LIGHTPEN WITHOUT IT.IT HANDLE
S ALL VIDEO.\.@THE COLOR OF THE CURSOR.=
CURSOR COLOR.=TEXT COLOR.=..MEMORY LOCAT
ION 646 HOLDS....POKE THIS LOCATION TO C
HANGE....DON'T MAKE IT THE SAME AS 53281
!.IT'S A COLOR REGISTER.NOT FOR THE BACK
GROUND OR BORDER.\.@REVERSE VIDEO.=REVER
SE.=..=PRINTING REVERSE VIDEO.'POKE 199^
1' CAUSES....POKE 199^1 TO ACTUALLY SEE
CHR$(32).CHR$(146) HAS THE OPPOSITE EFFE
CT.CHR$(18) HAS SAME EFFECT.SYMBOLIZED B
Y A REVERSED R.\.@SCREEN MEMORY.=SCREEN.
=VIDEO MATRIX.=..1K MEMORY CHUNK JUST BE
FORE BASIC.STARTS AT LOCATION 1024.1000
BYTES LARGE.POKE 1024^1 PRINTS AN 'A' AT
HOME.CAN'T SEE ANYTHING WITHOUT IT.\.@C
HR$(142).=CODE 142.=142.=CHARACTER 142.C
ODE WITH OPPOSITE EFFECT OF CTRL-N.HAS T
HE SAME EFFECT AS POKE53272^21.CMDR-SHIF
T TOGGLES THIS.ALLOWS USE OF THE MOST GR
APHICS.THIS CODE SWITCHES TO UPPERCASE.\
.@CHR$(8).=8.=CODE 8.=CHARACTER 8.THE OP
POSITE OF CHR$(9).LOOKS LIKE A REVERSED
N.RECOMMENDED FOR LOADSTAR PROGRAMS.DISA
BLES SHIFT-CMDR.LOCKS IN THE CURRENT CAS
E.\.@SYS 64738.=SYS64738.=64738.=..MOST
COMMON CODE FOR SYSTEM RESET.NOT RECOMME
NDED BY LOADSTAR.DISABLES YOUR FASTLOAD
CARTRIDGE.DOES NOT CLEAR MEMORY.SYS HERE
TO RESET COMPUTER.\.@HIGH RESOLUTION SC
REEN.=HIGH RESOLUTION DISPLAY.=HIRES.=HI
RES SCREEN.TAKES 8000 BYTES TO SEE IT.PO
KE 53265^PEEK(53265)OR32.64^000 (X^Y) LO
CATIONS.TWO COLORS FOR EACH 8X8 SECTION.
320 X 200 RESOLUTION.\.@MOVE SCREEN MEMO
RY.=MOVE SCREEN.=MOVES SCREEN.=MOVES SCR
EEN MEMORY.POKE 53272^(PEEK(53272)AND15)
ORAD.AFTERWARDS^ POKE648^AD/256.IT MOVES
SOMETHING.IT'S RIGHT IN FRONT OF YOUR N
OSE.SCREEN(S).\.@LET.=..=..=..THE C-64'S
OBSOLETE BASIC COMMAND.THE COMMAND WORK
S BUT ISN'T NEEDED.USED TO ASSIGN VALUES
TO VARIABLES.THE EQUAL SIGN IS ENOUGH.F
ORGET THIS COMMAND.\.@END.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL