00000000: 53 45 44 20 49 4E 20 42 49 54 4D 41 50 20 4D 4F |SED IN BITMAP MO|
00000010: 44 45 2C 0D 57 49 4E 44 4F 57 20 55 53 41 47 45 |DE,.WINDOW USAGE|
00000020: 20 49 53 20 53 4C 4F 57 20 42 55 54 20 41 43 43 | IS SLOW BUT ACC|
00000030: 45 50 54 41 42 4C 45 2E 0D 0D 20 20 20 20 D4 4F |EPTABLE... .O|
00000040: 20 55 53 45 20 54 48 45 20 4D 45 4D 4F 52 49 5A | USE THE MEMORIZ|
00000050: 45 2F 52 45 53 54 4F 52 45 0D 52 4F 55 54 49 4E |E/RESTORE.ROUTIN|
00000060: 45 53 20 49 4E 20 59 4F 55 52 20 4F 57 4E 20 50 |ES IN YOUR OWN P|
00000070: 52 4F 47 52 41 4D 2C 20 59 4F 55 27 4C 4C 0D 4E |ROGRAM, YOU'LL.N|
00000080: 45 45 44 20 54 4F 20 4B 4E 4F 57 20 54 48 45 20 |EED TO KNOW THE |
00000090: 46 4F 4C 4C 4F 57 49 4E 47 20 53 59 53 54 45 4D |FOLLOWING SYSTEM|
000000A0: 0D 43 41 4C 4C 53 3A 0D 0D D3 D9 D3 20 33 30 37 |.CALLS:..... 307|
000000B0: 32 2C 30 20 3A 20 D2 C5 CD 20 D3 41 56 45 53 20 |2,0 : ... .AVES |
000000C0: 45 56 45 52 59 54 48 49 4E 47 20 4F 4E 0D 20 20 |EVERYTHING ON. |
000000D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 | T|
000000E0: 48 45 20 38 30 2D 43 4F 4C 55 4D 4E 20 53 43 52 |HE 80-COLUMN SCR|
000000F0: 45 45 4E 0D 0D D3 D9 D3 20 33 30 37 32 2C 31 20 |EEN..... 3072,1 |
00000100: 3A 20 D2 C5 CD 20 D2 45 53 54 4F 52 45 53 20 45 |: ... .ESTORES E|
00000110: 56 45 52 59 54 48 49 4E 47 0D 20 20 20 20 20 20 |VERYTHING. |
00000120: 20 20 20 20 20 20 20 4F 4E 20 54 48 45 20 38 30 | ON THE 80|
00000130: 2D 43 4F 4C 55 4D 4E 20 53 43 52 45 45 4E 0D 0D |-COLUMN SCREEN..|
00000140: D3 D9 D3 20 33 30 37 32 2C 32 20 3A 20 D2 C5 CD |... 3072,2 : ...|
00000150: 20 D3 41 56 45 53 20 45 56 45 52 59 54 48 49 4E | .AVES EVERYTHIN|
00000160: 47 20 4F 4E 0D 20 20 20 20 20 20 20 20 20 20 20 |G ON. |
00000170: 20 20 20 20 20 20 54 48 45 20 34 30 2D 43 4F 4C | THE 40-COL|
00000180: 55 4D 4E 20 53 43 52 45 45 4E 0D 0D D3 D9 D3 20 |UMN SCREEN..... |
00000190: 33 30 37 32 2C 33 20 3A 20 D2 C5 CD 20 D2 45 53 |3072,3 : ... .ES|
000001A0: 54 4F 52 45 53 20 45 56 45 52 59 54 48 49 4E 47 |TORES EVERYTHING|
000001B0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 4E |. ON|
000001C0: 20 54 48 45 20 34 30 2D 43 4F 4C 55 4D 4E 20 53 | THE 40-COLUMN S|
000001D0: 43 52 45 45 4E 0D 0D 0D D3 D9 D3 20 33 30 37 32 |CREEN...... 3072|
000001E0: 2C 34 20 3A 20 D2 C5 CD 20 D3 41 56 45 53 20 54 |,4 : ... .AVES T|
000001F0: 48 45 20 47 52 41 50 48 49 43 0D 20 20 20 20 20 |HE GRAPHIC. |
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 53 43 52 45 | SCRE|
00000210: 45 4E 20 41 4E 44 20 43 4F 4C 4F 52 53 0D 0D D3 |EN AND COLORS...|
00000220: D9 D3 20 33 30 37 32 2C 35 20 3A 20 D2 C5 CD 20 |.. 3072,5 : ... |
00000230: D2 45 53 54 4F 52 45 53 20 54 48 45 20 47 52 41 |.ESTORES THE GRA|
00000240: 50 48 49 43 0D 20 20 20 20 20 20 20 20 20 20 20 |PHIC. |
00000250: 20 20 20 20 20 20 53 43 52 45 45 4E 20 41 4E 44 | SCREEN AND|
00000260: 20 43 4F 4C 4F 52 53 0D 0D 20 20 20 20 CE 4F 20 | COLORS.. .O |
00000270: C2 C1 D3 C9 C3 20 4D 45 4D 4F 52 59 20 49 53 20 |..... MEMORY IS |
00000280: 22 53 54 4F 4C 45 4E 22 20 46 52 4F 4D 0D 59 4F |"STOLEN" FROM.YO|
00000290: 55 20 54 4F 20 55 53 45 20 41 53 20 53 54 4F 52 |U TO USE AS STOR|
000002A0: 41 47 45 20 46 4F 52 20 54 48 45 20 57 49 4E 44 |AGE FOR THE WIND|
000002B0: 4F 57 0D 44 41 54 41 2E 20 20 C9 54 27 53 20 55 |OW.DATA. .T'S U|
000002C0: 4E 4C 49 4B 45 4C 59 20 54 48 41 54 20 59 4F 55 |NLIKELY THAT YOU|
000002D0: 27 44 20 42 45 0D 55 53 49 4E 47 20 54 48 45 20 |'D BE.USING THE |
000002E0: 48 49 47 48 2D 52 45 53 20 42 49 54 4D 41 50 20 |HIGH-RES BITMAP |
000002F0: 41 52 45 41 20 49 4E 0D C2 41 4E 4B 20 30 20 28 |AREA IN..ANK 0 (|
00000300: 38 31 39 32 20 2D 20 31 36 31 39 31 29 20 53 4F |8192 - 16191) SO|
00000310: 20 54 48 45 20 38 30 2D 43 4F 4C 55 4D 4E 0D 53 | THE 80-COLUMN.S|
00000320: 43 52 45 45 4E 20 49 53 20 53 54 4F 52 45 44 20 |CREEN IS STORED |
00000330: 54 48 45 52 45 2E 20 20 CE 4F 54 45 20 54 48 41 |THERE. .OTE THA|
00000340: 54 0D 59 4F 55 52 20 38 30 2D 43 4F 4C 55 4D 4E |T.YOUR 80-COLUMN|
00000350: 20 50 52 4F 47 52 41 4D 20 53 48 4F 55 4C 44 20 | PROGRAM SHOULD |
00000360: 45 58 45 43 55 54 45 0D 41 20 C7 D2 C1 D0 C8 C9 |EXECUTE.A ......|
00000370: C3 20 31 20 43 4F 4D 4D 41 4E 44 20 42 45 46 4F |. 1 COMMAND BEFO|
00000380: 52 45 20 59 4F 55 20 54 52 59 0D 54 4F 20 4D 45 |RE YOU TRY.TO ME|
00000390: 4D 4F 52 49 5A 45 20 41 4E 20 38 30 2D 43 4F 4C |MORIZE AN 80-COL|
000003A0: 55 4D 4E 20 53 43 52 45 45 4E 2E 0D C9 53 53 55 |UMN SCREEN...SSU|
000003B0: 49 4E 47 20 54 48 49 53 20 43 4F 4D 4D 41 4E 44 |ING THIS COMMAND|
000003C0: 20 4D 4F 56 45 53 20 54 48 45 20 C2 C1 D3 C9 C3 | MOVES THE .....|
000003D0: 0D 54 45 58 54 20 55 50 20 41 42 4F 56 45 20 54 |.TEXT UP ABOVE T|
000003E0: 48 45 20 48 49 47 48 2D 52 45 53 20 42 49 54 4D |HE HIGH-RES BITM|
000003F0: 41 50 0D 47 52 41 50 48 49 43 20 41 52 45 41 2E |AP.GRAPHIC AREA.|
00000400: 0D 0D 20 20 20 20 D7 48 45 4E 20 59 4F 55 27 52 |.. .HEN YOU'R|
00000410: 45 20 49 4E 20 34 30 2D 43 4F 4C 55 4D 4E 20 4D |E IN 40-COLUMN M|
00000420: 4F 44 45 20 4F 52 0D 4F 4E 45 20 4F 46 20 54 48 |ODE OR.ONE OF TH|
00000430: 45 20 42 49 54 4D 41 50 20 4D 4F 44 45 53 2C 20 |E BITMAP MODES, |
00000440: 54 48 45 52 45 27 53 20 31 36 CB 0D 4F 46 20 38 |THERE'S 16..OF 8|
00000450: 30 2D 43 4F 4C 55 4D 4E 20 56 49 44 45 4F 20 4D |0-COLUMN VIDEO M|
00000460: 45 4D 4F 52 59 20 41 42 53 4F 4C 55 54 45 4C 59 |EMORY ABSOLUTELY|
00000470: 0D 47 4F 49 4E 47 20 54 4F 20 57 41 53 54 45 21 |.GOING TO WASTE!|
00000480: 20 20 D3 4F 2C 20 54 48 41 54 27 53 20 57 48 45 | .O, THAT'S WHE|
00000490: 52 45 0D 54 48 45 20 57 49 4E 44 4F 57 20 44 41 |RE.THE WINDOW DA|
000004A0: 54 41 20 49 53 20 53 54 4F 52 45 44 20 57 48 45 |TA IS STORED WHE|
000004B0: 4E 0D 34 30 2D 43 4F 4C 55 4D 4E 20 4D 4F 44 45 |N.40-COLUMN MODE|
000004C0: 20 49 53 20 41 43 54 49 56 45 2E 0D 0D 20 20 20 | IS ACTIVE... |
000004D0: 20 D4 48 45 20 4D 41 43 48 49 4E 45 20 4C 41 4E | .HE MACHINE LAN|
000004E0: 47 55 41 47 45 20 52 4F 55 54 49 4E 45 0D 49 54 |GUAGE ROUTINE.IT|
000004F0: 53 45 4C 46 20 49 53 20 4C 4F 43 41 54 45 44 20 |SELF IS LOCATED |
00000500: 49 4E 20 54 48 45 20 D2 D3 32 33 32 20 42 55 46 |IN THE ..232 BUF|
00000510: 46 45 52 53 0D 53 54 41 52 54 49 4E 47 20 41 54 |FERS.STARTING AT|
00000520: 20 24 30 C3 30 30 20 28 33 30 37 32 29 2C 20 53 | $0.00 (3072), S|
00000530: 4F 2C 20 41 53 0D 57 52 49 54 54 45 4E 2C 20 59 |O, AS.WRITTEN, Y|
00000540: 4F 55 20 43 41 4E 27 54 20 55 53 45 20 54 48 49 |OU CAN'T USE THI|
00000550: 53 20 57 49 54 48 20 59 4F 55 52 0D 4F 57 4E 20 |S WITH YOUR.OWN |
00000560: 54 45 52 4D 49 4E 41 4C 20 50 52 4F 47 52 41 4D |TERMINAL PROGRAM|
00000570: 53 2E 0D 0D C4 C9 D3 CB 20 C6 C9 CC C5 20 D4 C8 |S....... .... ..|
00000580: C9 D3 20 D0 D2 CF C7 D2 C1 CD 20 D5 D3 C5 D3 3A |.. ....... ....:|
00000590: 0D 0D D7 C9 CE C4 CF D7 C9 CE C7 20 31 32 38 20 |........... 128 |
000005A0: 20 20 20 20 D4 2E D7 C9 CE C4 CF D7 C9 CE C7 20 | ........... |
000005B0: 31 32 38 0D 0D 20 20 20 20 20 20 20 20 2A 2A 2A |128.. ***|
000005C0: 2A 20 C5 4E 44 20 CF 46 20 D4 45 58 54 20 2A 2A |* .ND .F .EXT **|
000005D0: 2A 2A 0D |**. |
SED IN BITMAP MODE,.WINDOW USAGE IS SLOW
BUT ACCEPTABLE... TO USE THE MEMORIZ
E/RESTORE.ROUTINES IN YOUR OWN PROGRAM,
YOU'LL.NEED TO KNOW THE FOLLOWING SYSTEM
.CALLS:..SYS 3072,0 : REM SAVES EVERYTHI
NG ON. THE 80-COLUMN SCR
EEN..SYS 3072,1 : REM RESTORES EVERYTHIN
G. ON THE 80-COLUMN SCREEN..
SYS 3072,2 : REM SAVES EVERYTHING ON.
THE 40-COLUMN SCREEN..SYS
3072,3 : REM RESTORES EVERYTHING.
ON THE 40-COLUMN SCREEN...SYS 3072
,4 : REM SAVES THE GRAPHIC.
SCREEN AND COLORS..SYS 3072,5 : REM
RESTORES THE GRAPHIC. SC
REEN AND COLORS.. NO BASIC MEMORY IS
"STOLEN" FROM.YOU TO USE AS STORAGE FOR
THE WINDOW.DATA. IT'S UNLIKELY THAT YOU
'D BE.USING THE HIGH-RES BITMAP AREA IN.
BANK 0 (8192 - 16191) SO THE 80-COLUMN.S
CREEN IS STORED THERE. NOTE THAT.YOUR 8
0-COLUMN PROGRAM SHOULD EXECUTE.A GRAPHI
C 1 COMMAND BEFORE YOU TRY.TO MEMORIZE A
N 80-COLUMN SCREEN..ISSUING THIS COMMAND
MOVES THE BASIC.TEXT UP ABOVE THE HIGH-
RES BITMAP.GRAPHIC AREA... WHEN YOU'R
E IN 40-COLUMN MODE OR.ONE OF THE BITMAP
MODES, THERE'S 16K.OF 80-COLUMN VIDEO M
EMORY ABSOLUTELY.GOING TO WASTE! SO, TH
AT'S WHERE.THE WINDOW DATA IS STORED WHE
N.40-COLUMN MODE IS ACTIVE... THE MAC
HINE LANGUAGE ROUTINE.ITSELF IS LOCATED
IN THE RS232 BUFFERS.STARTING AT $0C00 (
3072), SO, AS.WRITTEN, YOU CAN'T USE THI
S WITH YOUR.OWN TERMINAL PROGRAMS...DISK
FILE THIS PROGRAM USES:..WINDOWING 128
T.WINDOWING 128.. **** END OF
TEXT ****.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL