source: xtideuniversalbios/trunk/Assembly_Library/Inc/Display.inc @ 236

Last change on this file since 236 was 186, checked in by gregli@…, 13 years ago

Initial string compression checkin. All changes are under MODULE_STRINGS_COMPRESSED, and this can still be turned off. With this checkin, the serial and ebios code can both be turned on at the same time and still we remain below the 8K boundary (barely). I still need to chekin StringsCompress.pl after some more code cleanup. The output, in StringsCompressed.asm is checked in here, and should continue be to checkin when Strings.asm is changed, for those who do not have/want to run the Perl script to recreate it.
File size: 9.1 KB
Line 
1; Project name  :   AssemblyLibrary
2; Description   :   Defines for display library.
3%ifndef DISPLAY_INC
4%define DISPLAY_INC
5
6%ifndef MODULE_STRINGS_COMPRESSED_PRECOMPRESS
7;--------------------------------------------------------------------
8; Display Library users need to use this macro since it will provide
9; compatibility with future library versions.
10;
11; CALL_DISPLAY_LIBRARY
12;   Parameters:
13;       %1:         Function to call (functionName from DISPLAY_LIB)
14;       Registers:  Depends on function to call
15;   Returns:
16;       Depends on function to call
17;   Corrupts registers:
18;       AX (unless used as a return register), DI
19;--------------------------------------------------------------------
20%macro CALL_DISPLAY_LIBRARY 1
21    %ifidn %1, PushDisplayContext
22        call    DisplayContext_Push
23    %elifidn %1, PopDisplayContext
24        call    DisplayContext_Pop
25    %elifidn %1, PrepareOffScreenBufferInESBXwithLengthInCX
26        call    DisplayContext_PrepareOffScreenBufferInESBXwithLengthInCX
27    %else
28        mov     di, %1
29        call    Display_FunctionFromDI
30    %endif
31%endmacro
32
33%if 0
34;;;
35;;; struc no longer needed with direct calls to functions
36;;;
37
38; Display library functions
39struc DISPLAY_LIB
40    .PushDisplayContext:
41    .PopDisplayContext:
42    .InitializeDisplayContext                       resb    2
43
44%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
45    .SetCharacterPointerFromBXAX                    resb    2
46%endif
47    .SetCharOutputFunctionFromAXwithAttribFlagInBL  resb    2
48    .SetCharacterOutputParameterFromAX              resb    2
49    .SetCharacterAttributeFromAL                    resb    2
50    .SetCursorShapeFromAX                           resb    2
51    .SetCursorCoordinatesFromAX                     resb    2
52    .SetNewPageFromAL                               resb    2
53    .SynchronizeDisplayContextToHardware            resb    2
54
55%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
56    .GetCharacterPointerToBXAX                      resb    2
57%endif
58    .GetSoftwareCoordinatesToAX                     resb    2
59    .GetColumnsToALandRowsToAH                      resb    2
60
61    .FormatNullTerminatedStringFromCSSI             resb    2
62%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
63    .PrintSignedWordFromAXWithBaseInBX              resb    2
64%endif
65    .PrintWordFromAXwithBaseInBX                    resb    2
66    .PrintCharBufferFromBXSIwithLengthInCX          resb    2
67    .PrintNullTerminatedStringFromBXSI              resb    2
68    .PrintNullTerminatedStringFromCSSI              resb    2
69    .PrintRepeatedCharacterFromALwithCountInCX      resb    2
70    .PrintCharacterFromAL                           resb    2
71    .PrintNewlineCharacters                         resb    2
72%ifndef EXCLUDE_FROM_XTIDE_UNIVERSAL_BIOS
73    .ClearAreaWithHeightInAHandWidthInAL            resb    2
74%endif
75    .ClearScreenWithCharInALandAttrInAH             resb    2
76endstruc
77%endif
78
79; Attribute flags for DISPLAY_LIB.SetCharacterOutputFunctionFromAXwithAttributeFlagInDL
80ATTRIBUTES_NOT_USED                         EQU     0
81ATTRIBUTES_ARE_USED                         EQU     FLG_CONTEXT_ATTRIBUTES
82
83; Character output functions for DISPLAY_LIB.SetCharacterOutputFunctionFromAXwithAttributeFlagInDL
84TELETYPE_OUTPUT_WITH_ATTRIBUTE              EQU     DisplayCharOut_TeletypeOutputWithAttribute
85TELETYPE_OUTPUT_WITHOUT_ATTRIBUTE           EQU     DisplayCharOut_TeletypeOutput
86TELETYPE_OUTPUT_USING_BIOS                  EQU     DisplayCharOut_BiosTeletypeOutput
87FAST_OUTPUT_WITH_ATTRIBUTE_ONLY             EQU     DisplayCharOut_Attribute
88FAST_OUTPUT_WITH_CHAR_ONLY                  EQU     DisplayCharOut_Character
89FAST_OUTPUT_WITH_CHAR_AND_ATTRIBUTE         EQU     DisplayCharOut_CharacterWithAttribute
90BUFFER_OUTPUT_WITH_CHAR_ONLY                EQU     DisplayCharOut_WriteCharacterToBuffer
91
92DEFAULT_CHARACTER_OUTPUT                    EQU     TELETYPE_OUTPUT_WITH_ATTRIBUTE
93
94
95struc VIDEO_BDA
96                        resb    449h
97    .bMode              resb    1       ; 0:449h, Video, Mode
98    .wColumns           resb    2       ; 0:44Ah, Video, Number of columns
99    .wBytesPerPage      resb    2       ; 0:44Ch, Video, Total number of bytes per page
100    .wPageOffset        resb    2       ; 0:44Eh, Video, Current page offset
101    .rgwCursors         resb    4       ; 0:450h, Video, Cursor position, pages 0...1
102    .displayContext     resb    12      ; Our own display context (normally cursors for pages 2...7)
103    .wCursorShape       resb    2       ; 0:460h, Video, Cursor shape
104    .bActivePage        resb    1       ; 0:462h, Video, Active display page
105    .wVideoPort         resb    2       ; 0:463h, Video, I/O Port number base
106    .bInternalModeReg   resb    1       ; 0:465h, Video, Internal mode register
107    .bColorPalette      resb    1       ; 0:466h, Video, Color palette
108endstruc
109
110struc DISPLAY_CONTEXT
111    .fpCursorPosition   resb    4   ; Far pointer to cursor position in video memory
112    .fnCharOut          resb    2   ; Function to draw character with
113    .wCharOutParam      resb    2   ; User parameter for custom character output function
114    .wCursorShape       resb    2   ; Current cursor shape
115    .bAttribute         resb    1   ; Selected character attribute
116    .bFlags             resb    1   ; Display context flags
117endstruc
118
119; Display context flags
120FLG_CONTEXT_ATTRIBUTES      EQU     (1<<0)  ; Character output function uses attributes
121FLG_CONTEXT_CGA             EQU     (1<<1)  ; CGA detected so prevent CGA snow
122
123
124; Text mode character attribute byte bits for CGA+ (color adapters)
125FLG_COLOR_FORE_BLUE         EQU     (1<<0)
126FLG_COLOR_FORE_GREEN        EQU     (1<<1)
127FLG_COLOR_FORE_RED          EQU     (1<<2)
128FLG_COLOR_FORE_INTENSITY    EQU     (1<<3)
129FLG_COLOR_FORE_FONT_B       EQU     (1<<3)  ; Select font set B (if available, EGA+)
130FLG_COLOR_BACK_BLUE         EQU     (1<<4)
131FLG_COLOR_BACK_GREEN        EQU     (1<<5)
132FLG_COLOR_BACK_RED          EQU     (1<<6)
133FLG_COLOR_BACK_INTENSITY    EQU     (1<<7)  ; Intensity when blinking is disabled
134FLG_COLOR_BLINK             EQU     (1<<7)  ; Blinking color when enabled (enabled by default)
135
136; CGA colors
137%define COLOR_ATTRIBUTE(foreground, background) ( (foreground) | ((background)<<4) )
138COLOR_BLACK                 EQU     0
139COLOR_BLUE                  EQU     1
140COLOR_GREEN                 EQU     2
141COLOR_CYAN                  EQU     3
142COLOR_RED                   EQU     4
143COLOR_MAGENTA               EQU     5
144COLOR_BROWN                 EQU     6
145COLOR_WHITE                 EQU     7       ; Last background color if blinking enabled
146COLOR_GRAY                  EQU     8
147COLOR_LIGHT_BLUE            EQU     9
148COLOR_LIGHT_GREEN           EQU     10
149COLOR_LIGHT_CYAN            EQU     11
150COLOR_LIGHT_RED             EQU     12
151COLOR_LIGHT_MAGENTA         EQU     13
152COLOR_YELLOW                EQU     14
153COLOR_BRIGHT_WHITE          EQU     15
154
155
156; Text mode character attribute byte bits for MDA (monochrome adapters)
157; (attributes 00h, 08h, 80h, 88h, 70h, 78h, F0h and F8h are exceptions)
158FLG_MONO_UNDERLINE          EQU     (1<<1)
159FLG_MONO_INTENSITY          EQU     (1<<3)
160FLG_MONO_BLINK              EQU     (1<<7)
161
162; Text mode character attribute bytes for MDA/Hercules (monochrome adapters)
163; *Not displayed on some monitors
164MONO_HIDDEN                 EQU     00h     ; Not displayed (same for 08h, 80h and 88h)
165MONO_UNDERLINE              EQU     01h     ; Underlined
166MONO_NORMAL                 EQU     07h     ; Normal (white on black)
167MONO_BRIGHT_UNDERLINE       EQU     09h     ; High intensity, underlined
168MONO_BRIGHT                 EQU     0Fh     ; High intensity
169MONO_REVERSE                EQU     70h     ; Reverse video (black on white)
170MONO_REVERSE_DARK           EQU     78h     ; (dark green on green)
171MONO_BLINK                  EQU     87h     ; Blinking white on black*
172MONO_BRIGHT_BLINK           EQU     8Fh     ; Blinking high intensity*
173MONO_REVERSE_BLINK          EQU     0F0h    ; Blinking reverse video
174MONO_REVERSE_DARK_BLINK     EQU     0F8h    ; (blinking dark green on green)
175
176
177; Cursor position macro for DX register
178%define CURSOR_XY(x, y) ( (x) | ((y)<<8) )
179
180; Cursor shapes
181CURSOR_NORMAL               EQU     0607h       ; Two line cursor near or at the bottom of cell
182CURSOR_HIDDEN               EQU     2000h
183
184
185; Display modes
186CGA_TEXT_MODE_BW40          EQU     0       ; Applications should use...
187CGA_TEXT_MODE_CO40          EQU     1
188CGA_TEXT_MODE_BW80          EQU     2       ; ..black, white and bright white attributes only
189CGA_TEXT_MODE_CO80          EQU     3
190MDA_TEXT_MODE               EQU     7       ; Real monochrome attributes available
191
192
193; Display segments
194COLOR_TEXT_SEGMENT          EQU     0B800h  ; Text modes 0...3 (CGA+)
195MONO_TEXT_SEGMENT           EQU     0B000h  ; Text mode 7 (MDA, Hercules)
196
197OFFSET_TO_CGA_STATUS_REGISTER   EQU     6   ; Base port 3D4h + 6 = 3DAh
198CGA_STATUS_REGISTER             EQU     3DAh
199
200%endif ; MODULE_STRINGS_COMPRESS_PRECOMPRESS
201
202; Control characters for teletype output
203NULL                        EQU     00h
204SOH                         EQU     01h     ; Start of heading
205STX                         EQU     02h     ; Start of text
206BELL                        EQU     07h     ; Bell
207BS                          EQU     08h     ; Backspace
208TAB                         EQU     09h     ; Horizontal TAB
209LF                          EQU     0Ah     ; Line feed (newline)
210CR                          EQU     0Dh     ; Carriage return
211ESC                         EQU     1Bh     ; Escape
212
213; Non ASCII characters (code page 437)
214QUOTATION_MARK                              EQU     34
215DOUBLE_TOP_RIGHT_CORNER                     EQU     187
216DOUBLE_TOP_LEFT_CORNER                      EQU     201
217DOUBLE_BOTTOM_RIGHT_CORNER                  EQU     188
218DOUBLE_BOTTOM_LEFT_CORNER                   EQU     200
219DOUBLE_VERTICAL                             EQU     186
220DOUBLE_HORIZONTAL                           EQU     205
221DOUBLE_VERTICAL_TO_RIGHT_SINGLE             EQU     199
222DOUBLE_VERTICAL_TO_LEFT_SINGLE              EQU     182
223DOUBLE_LEFT_HORIZONTAL_TO_SINGLE_VERTICAL   EQU     181
224DOUBLE_RIGHT_HORIZONTAL_TO_SINGLE_VERTICAL  EQU     198
225SINGLE_VERTICAL                             EQU     179
226SINGLE_HORIZONTAL                           EQU     196
227SINGLE_LEFT_HORIZONTAL_TO_VERTICAL          EQU     180
228SINGLE_RIGHT_HORIZONTAL_TO_VERTICAL         EQU     195
229ANGLE_QUOTE_LEFT                            EQU     174
230ANGLE_QUOTE_RIGHT                           EQU     175
231BLOCK_MOSTLY_BACKGROUND                     EQU     176
232BLOCK_EVEN_BACKGROUND_AND_FOREGROUND        EQU     177
233BLOCK_MOSTLY_FOREGROUND                     EQU     178
234BLOCK_FULL_FOREGROUND                       EQU     219
235ONE_HALF                                    EQU     171
236ONE_QUARTER                                 EQU     172
237
238
239; Background character for clearing screen
240%ifndef SCREEN_BACKGROUND_CHARACTER
241    %define SCREEN_BACKGROUND_CHARACTER     BLOCK_MOSTLY_BACKGROUND
242%endif
243%ifndef SCREEN_BACKGROUND_ATTRIBUTE
244    %define SCREEN_BACKGROUND_ATTRIBUTE     MONO_NORMAL
245%endif
246%define SCREEN_BACKGROUND_CHARACTER_AND_ATTRIBUTE   (SCREEN_BACKGROUND_CHARACTER | (SCREEN_BACKGROUND_ATTRIBUTE<<8))
247%define DOS_BACKGROUND_CHARACTER_AND_ATTRIBUTE      (' ' | (MONO_NORMAL<<8))
248
249%endif ; DISPLAY_INC
Note: See TracBrowser for help on using the repository browser.