00000000: 00 80 5E 55 3A 48 41 43 4B 45 52 0D 0D 0D 20 20 |..^U:HACKER... |
00000010: 20 20 20 20 20 20 20 20 20 20 CC C9 CE C5 20 CC | .... .|
00000020: CF C3 CB C5 D2 2E 36 34 0D 20 20 20 20 20 20 20 |......64. |
00000030: 20 20 20 20 20 20 20 20 20 20 20 42 59 0D 20 20 | BY. |
00000040: 20 20 20 20 20 20 20 20 20 20 C4 4F 4E 41 4C 44 | .ONALD|
00000050: 20 C7 52 41 48 41 4D 0D 0D 0D C3 CF CD CD CF C4 | .RAHAM.........|
00000060: CF D2 C5 20 CD C1 C7 C1 DA C9 CE C5 0D CA 55 4E |... ..........UN|
00000070: 45 20 31 39 38 37 0D 0D 0D 20 20 CC C9 CE C5 20 |E 1987... .... |
00000080: CC CF C3 CB C5 D2 2E 36 34 20 50 52 4F 56 49 44 |.......64 PROVID|
00000090: 45 53 20 41 4E 0D 49 4E 54 45 52 52 55 50 54 2D |ES AN.INTERRUPT-|
000000A0: 44 52 49 56 45 4E 20 52 4F 55 54 49 4E 45 20 54 |DRIVEN ROUTINE T|
000000B0: 48 41 54 20 4C 4F 43 4B 53 0D 41 20 54 45 58 54 |HAT LOCKS.A TEXT|
000000C0: 20 4C 49 4E 45 20 41 54 20 54 48 45 20 54 4F 50 | LINE AT THE TOP|
000000D0: 20 4F 46 20 54 48 45 20 53 43 52 45 45 4E 2C 0D | OF THE SCREEN,.|
000000E0: 50 52 45 56 45 4E 54 49 4E 47 20 49 54 20 46 52 |PREVENTING IT FR|
000000F0: 4F 4D 20 53 43 52 4F 4C 4C 49 4E 47 2E 20 20 D9 |OM SCROLLING. .|
00000100: 4F 55 0D 43 41 4E 20 55 53 45 20 54 48 49 53 20 |OU.CAN USE THIS |
00000110: 52 4F 55 54 49 4E 45 20 49 4E 20 59 4F 55 52 20 |ROUTINE IN YOUR |
00000120: 4F 57 4E 0D 50 52 4F 47 52 41 4D 53 20 54 4F 20 |OWN.PROGRAMS TO |
00000130: 44 49 53 50 4C 41 59 20 4D 45 53 53 41 47 45 53 |DISPLAY MESSAGES|
00000140: 2C 20 43 4F 4D 4D 41 4E 44 0D 50 52 4F 4D 50 54 |, COMMAND.PROMPT|
00000150: 53 2C 20 4F 52 20 4F 54 48 45 52 20 49 4E 46 4F |S, OR OTHER INFO|
00000160: 52 4D 41 54 49 4F 4E 2E 0D 0D 20 20 D7 45 27 56 |RMATION... .E'V|
00000170: 45 20 50 52 4F 56 49 44 45 44 20 54 57 4F 20 45 |E PROVIDED TWO E|
00000180: 58 41 4D 50 4C 45 53 20 4F 46 0D 4C 4F 43 4B 45 |XAMPLES OF.LOCKE|
00000190: 44 20 54 45 58 54 20 4C 49 4E 45 53 2E 20 20 CF |D TEXT LINES. .|
000001A0: 4E 45 20 44 45 4D 4F 20 55 53 45 53 20 54 48 45 |NE DEMO USES THE|
000001B0: 0D CC C9 CE C5 20 CC CF C3 CB C5 D2 2E 36 34 20 |..... .......64 |
000001C0: 52 4F 55 54 49 4E 45 3B 20 54 48 45 20 4F 54 48 |ROUTINE; THE OTH|
000001D0: 45 52 0D 55 53 45 53 20 45 58 49 53 54 49 4E 47 |ER.USES EXISTING|
000001E0: 20 C3 2D 36 34 20 53 43 52 4F 4C 4C 20 52 4F 55 | .-64 SCROLL ROU|
000001F0: 54 49 4E 45 53 2E 0D 28 C3 4F 4E 53 55 4C 54 20 |TINES..(.ONSULT |
00000200: 54 48 45 20 44 45 4D 4F 20 54 4F 20 4C 45 41 52 |THE DEMO TO LEAR|
00000210: 4E 20 48 4F 57 20 54 4F 20 55 53 45 0D 54 48 45 |N HOW TO USE.THE|
00000220: 20 C3 2D 36 34 27 53 20 53 43 52 4F 4C 4C 20 52 | .-64'S SCROLL R|
00000230: 4F 55 54 49 4E 45 53 2E 29 0D 0D 20 20 D4 4F 20 |OUTINES.).. .O |
00000240: 55 53 45 20 C4 4F 4E 41 4C 44 20 C7 52 41 48 41 |USE .ONALD .RAHA|
00000250: 4D 27 53 20 52 4F 55 54 49 4E 45 20 49 4E 0D 59 |M'S ROUTINE IN.Y|
00000260: 4F 55 52 20 4F 57 4E 20 50 52 4F 47 52 41 4D 2C |OUR OWN PROGRAM,|
00000270: 20 46 4F 4C 4C 4F 57 20 54 48 45 53 45 20 53 54 | FOLLOW THESE ST|
00000280: 45 50 53 3A 0D 0D 2D 2D 20 CC 4F 41 44 20 CC 49 |EPS:..-- .OAD .I|
00000290: 4E 45 20 CC 4F 43 4B 45 52 2E 36 34 2E 0D 0D 2D |NE .OCKER.64...-|
000002A0: 2D 20 CC 49 53 54 20 4C 49 4E 45 53 20 30 2D 31 |- .IST LINES 0-1|
000002B0: 31 2E 0D 0D 2D 2D 20 C5 4E 54 45 52 20 CE C5 D7 |1...-- .NTER ...|
000002C0: 2E 0D 0D 2D 2D 20 D0 52 45 53 53 20 D2 C5 D4 D5 |...-- .RESS ....|
000002D0: D2 CE 20 4F 56 45 52 20 4C 49 4E 45 53 20 30 2C |.. OVER LINES 0,|
000002E0: 20 37 2C 20 39 2C 0D 20 20 20 31 30 2C 20 41 4E | 7, 9,. 10, AN|
000002F0: 44 20 31 31 2E 0D 0D 2D 2D 20 D0 55 54 20 59 4F |D 11...-- .UT YO|
00000300: 55 52 20 4D 45 53 53 41 47 45 20 49 4E 20 4C 49 |UR MESSAGE IN LI|
00000310: 4E 45 20 30 2E 0D 0D 2D 2D 20 D3 54 41 52 54 20 |NE 0...-- .TART |
00000320: 59 4F 55 52 20 4F 57 4E 20 50 52 4F 47 52 41 4D |YOUR OWN PROGRAM|
00000330: 20 41 54 20 4C 49 4E 45 20 32 30 2E 0D 0D D3 D9 | AT LINE 20.....|
00000340: D3 20 38 32 38 20 41 43 54 49 56 41 54 45 53 20 |. 828 ACTIVATES |
00000350: CC C9 CE C5 20 CC CF C3 CB C5 D2 2E 36 34 3B 20 |.... .......64; |
00000360: D3 D9 D3 0D 36 35 34 31 38 20 44 45 41 43 54 49 |....65418 DEACTI|
00000370: 56 41 54 45 53 20 49 54 2E 0D 0D 0D C4 C9 D3 CB |VATES IT........|
00000380: 20 C6 C9 CC C5 D3 20 D4 C8 C9 D3 20 D0 D2 CF C7 | ..... .... ....|
00000390: D2 C1 CD 20 D5 D3 C5 D3 3A 0D 0D CC C9 CE C5 20 |... ....:...... |
000003A0: CC CF C3 CB C5 D2 2E 36 34 20 20 20 20 20 D4 2E |.......64 ..|
000003B0: CC C9 CE C5 20 CC CF C3 CB C5 D2 2E 36 34 0D 0D |.... .......64..|
000003C0: 20 20 20 20 20 20 20 20 2A 2A 2A 2A 20 C5 4E 44 | **** .ND|
000003D0: 20 CF 46 20 D4 45 58 54 20 2A 2A 2A 2A 0D | .F .EXT ****. |
..^U:HACKER... LINE LOCKER.64
. BY. DONALD
GRAHAM...COMMODORE MAGAZINE.JUNE 1987..
. LINE LOCKER.64 PROVIDES AN.INTERRUPT-
DRIVEN ROUTINE THAT LOCKS.A TEXT LINE AT
THE TOP OF THE SCREEN,.PREVENTING IT FR
OM SCROLLING. YOU.CAN USE THIS ROUTINE
IN YOUR OWN.PROGRAMS TO DISPLAY MESSAGES
, COMMAND.PROMPTS, OR OTHER INFORMATION.
.. WE'VE PROVIDED TWO EXAMPLES OF.LOCKE
D TEXT LINES. ONE DEMO USES THE.LINE LO
CKER.64 ROUTINE; THE OTHER.USES EXISTING
C-64 SCROLL ROUTINES..(CONSULT THE DEMO
TO LEARN HOW TO USE.THE C-64'S SCROLL R
OUTINES.).. TO USE DONALD GRAHAM'S ROUT
INE IN.YOUR OWN PROGRAM, FOLLOW THESE ST
EPS:..-- LOAD LINE LOCKER.64...-- LIST L
INES 0-11...-- ENTER NEW...-- PRESS RETU
RN OVER LINES 0, 7, 9,. 10, AND 11...-
- PUT YOUR MESSAGE IN LINE 0...-- START
YOUR OWN PROGRAM AT LINE 20...SYS 828 AC
TIVATES LINE LOCKER.64; SYS.65418 DEACTI
VATES IT....DISK FILES THIS PROGRAM USES
:..LINE LOCKER.64 T.LINE LOCKER.64..
**** END OF TEXT ****.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL