35 lines
		
	
	
		
			1.5 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			35 lines
		
	
	
		
			1.5 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| compile insert WINDOW.POINTERS
 | |
| *  WINDOW.POINTERS 
 | |
| *  Pointers into WINDOWS variables.  Whenever any of the system window
 | |
| *  colors are referenced, they are accessed by these pointers.
 | |
| *  For example, to print the highlighted bar color in a popup window:
 | |
| *
 | |
| *                   PRINT @PW<CBAR>
 | |
| *
 | |
| *  To store the current menu border type in X:
 | |
| *
 | |
| *                   X = @MW<CBORDER.TYPE>
 | |
| *
 | |
| *   Pointer               Desc
 | |
| EQU CBORDER  TO 1      ;* Border
 | |
| EQU CTITLE   TO 2      ;* Title
 | |
| EQU CBACKG   TO 3      ;* Background color for all characters in a window
 | |
| EQU CCOMMENT TO 4      ;* Comments for @HW
 | |
| EQU CBAR     TO 4      ;* Highlight bar for @PW and @MW
 | |
| EQU CPROMPT  TO 4      ;* Prompt label
 | |
| EQU CSEL     TO 5      ;* Multiple selections in @PW
 | |
| EQU CINDEX   TO 5      ;* Index verification (XR.VERIFY) in @AW
 | |
| EQU CNONSEL  TO 6      ;* Non-selected items in @PW and @MW
 | |
| EQU CMESSAGE TO 6      ;* Message colors
 | |
| EQU CLABEL   TO 7      ;* Labels
 | |
| EQU CDESC    TO 7      ;* Quoted Description in @MW
 | |
| EQU CTEXT    TO 8      ;* Text in @HW
 | |
| EQU CENTRY   TO 8      ;* Prompt Entries in @AW
 | |
| EQU CBORDER.TYPE TO 9  ;* One of five border types
 | |
| EQU CBACKCUR TO 10     ;* Current background setting with background postition
 | |
|                         * set to foreground.  (i.e. <Esc>C?7 in CBACKG will be
 | |
|                         *                      set to <Esc>C77)
 | |
| 
 | |
| EQU HCOLOR$  TO 6      ;* Pointer into @AW for highlight color
 | |
| * Source Date: 15:25:11  25 JAN 1990  Build ID: AREV*1.13.203  Level: 2.0
 |