ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/Frodo4/Src/el_Acorn.h
Revision: 1.1
Committed: 2003-07-01T17:22:19Z (21 years, 3 months ago) by cebix
Content type: text/plain
Branch: MAIN
Log Message:
imported files

File Contents

# User Rev Content
1 cebix 1.1 /*
2     * el_Acorn.h - Somewhat faster (on Acorn) versions of the el_-functions
3     * of VIC.cpp
4     *
5     * Frodo (C) 1994-1997,2002 Christian Bauer
6     *
7     * This program is free software; you can redistribute it and/or modify
8     * it under the terms of the GNU General Public License as published by
9     * the Free Software Foundation; either version 2 of the License, or
10     * (at your option) any later version.
11     *
12     * This program is distributed in the hope that it will be useful,
13     * but WITHOUT ANY WARRANTY; without even the implied warranty of
14     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15     * GNU General Public License for more details.
16     *
17     * You should have received a copy of the GNU General Public License
18     * along with this program; if not, write to the Free Software
19     * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20     */
21    
22    
23     #ifdef GLOBAL_VARS
24     static inline void el_std_text(uint8 *p, uint8 *q, uint8 *r)
25     #else
26     inline void MOS6569::el_std_text(uint8 *p, uint8 *q, uint8 *r)
27     #endif
28     {
29     register uint32 *lp = (uint32 *)p, *t;
30     uint8 *cp = color_line;
31     uint8 *mp = matrix_line;
32     uint32 *tab = (uint32*)&TextColorTable[0][b0c][0][0];
33    
34     // Loop for 40 characters
35     for (int i=0; i<40; i++) {
36     uint8 data = r[i] = q[mp[i] << 3];
37    
38     t = tab + ((cp[i] & 15) << 13) + (data << 1);
39     *lp++ = *t++; *lp++ = *t++;
40     }
41     }
42    
43    
44     #ifdef GLOBAL_VARS
45     static inline void el_mc_text(uint8 *p, uint8 *q, uint8 *r)
46     #else
47     inline void MOS6569::el_mc_text(uint8 *p, uint8 *q, uint8 *r)
48     #endif
49     {
50     register uint32 *wp = (uint32 *)p, *t;
51     uint32 *tab = (uint32*)&TextColorTable[0][b0c][0][0];
52     uint8 *cp = color_line;
53     uint8 *mp = matrix_line;
54     uint8 *lookup = (uint8*)mc_color_lookup;
55    
56     // Loop for 40 characters
57     for (int i=0; i<40; i++) {
58     register uint32 color = cp[i];
59     uint8 data = q[mp[i] << 3];
60    
61     if (color & 8) {
62     r[i] = (data & 0xaa) | (data & 0xaa) >> 1;
63     lookup[6] = colors[color & 7];
64     color = lookup[(data & 0xc0) >> 5] | (lookup[(data & 0x30) >> 3] << 16);
65     *wp++ = color | (color << 8);
66     color = lookup[(data & 0x0c) >> 1] | (lookup[(data & 0x03) << 1] << 16);
67     *wp++ = color | (color << 8);
68    
69     } else { // Standard mode in multicolor mode
70     r[i] = data;
71     color = cp[i]; t = tab + (color << 13) + (data << 1);
72     *wp++ = *t++; *wp++ = *t++;
73     }
74     }
75     }
76    
77    
78     #ifdef GLOBAL_VARS
79     static inline void el_std_bitmap(uint8 *p, uint8 *q, uint8 *r)
80     #else
81     inline void MOS6569::el_std_bitmap(uint8 *p, uint8 *q, uint8 *r)
82     #endif
83     {
84     register uint32 *lp = (uint32 *)p, *t;
85     uint8 *mp = matrix_line;
86    
87     // Loop for 40 characters
88     for (int i=0; i<40; i++, q+=8) {
89     uint8 data = r[i] = *q;
90     uint8 h = mp[i];
91    
92     t = (uint32*)&TextColorTable[h >> 4][h & 15][data][0];
93     *lp++ = *t++; *lp++ = *t++;
94     }
95     }
96    
97    
98     #ifdef GLOBAL_VARS
99     static inline void el_mc_bitmap(uint8 *p, uint8 *q, uint8 *r)
100     #else
101     inline void MOS6569::el_mc_bitmap(uint8 *p, uint8 *q, uint8 *r)
102     #endif
103     {
104     uint8 lookup[4];
105     register uint32 *wp = (uint32 *)p;
106     uint8 *cp = color_line;
107     uint8 *mp = matrix_line;
108    
109     lookup[0] = b0c_color;
110    
111     // Loop for 40 characters
112     for (int i=0; i<40; i++, q+=8) {
113     uint8 data = *q;
114     register uint32 h = mp[i];
115    
116     lookup[1] = colors[h >> 4];
117     lookup[2] = colors[h];
118     lookup[3] = colors[cp[i]];
119    
120     r[i] = (data & 0xaa) | (data & 0xaa) >> 1;
121    
122     h = lookup[data >> 6] | (lookup[(data >> 4) & 3] << 16); *wp++ = h | (h << 8);
123     h = lookup[(data >> 2) & 3] | (lookup[data & 3] << 16); *wp++ = h | (h << 8);
124     }
125     }
126    
127    
128     #ifdef GLOBAL_VARS
129     static inline void el_ecm_text(uint8 *p, uint8 *q, uint8 *r)
130     #else
131     inline void MOS6569::el_ecm_text(uint8 *p, uint8 *q, uint8 *r)
132     #endif
133     {
134     register uint32 *lp = (uint32 *)p, *t;
135     uint8 *cp = color_line;
136     uint8 *mp = matrix_line;
137     uint8 *bcp = &b0c;
138    
139     // Loop for 40 characters
140     for (int i=0; i<40; i++) {
141     uint8 data = r[i] = mp[i];
142    
143     t = (uint32*)&TextColorTable[cp[i]][bcp[(data >> 6) & 3]][q[(data & 0x3f) << 3]][0];
144     *lp++ = *t++; *lp++ = *t++;
145     }
146     }
147    
148    
149     #ifdef GLOBAL_VARS
150     static inline void el_std_idle(uint8 *p, uint8 *r)
151     #else
152     inline void MOS6569::el_std_idle(uint8 *p, uint8 *r)
153     #endif
154     {
155     uint8 data = *get_physical(ctrl1 & 0x40 ? 0x39ff : 0x3fff);
156     uint32 *lp = (uint32 *)p;
157     uint32 conv0 = TextColorTable[0][b0c][data][0].b;
158     uint32 conv1 = TextColorTable[0][b0c][data][1].b;
159    
160     for (int i=0; i<40; i++) {
161     *lp++ = conv0;
162     *lp++ = conv1;
163     *r++ = data;
164     }
165     }
166    
167    
168     #ifdef GLOBAL_VARS
169     static inline void el_mc_idle(uint8 *p, uint8 *r)
170     #else
171     inline void MOS6569::el_mc_idle(uint8 *p, uint8 *r)
172     #endif
173     {
174     uint8 data = *get_physical(0x3fff);
175     register uint8 c0 = b0c_color, c1 = colors[0];
176     register uint32 *lp = (uint32 *)p;
177     register uint32 conv0, conv1;
178    
179     conv0 = (((data & 0xc0) == 0) ? c0 : c1) | (((data & 0x30) == 0) ? c0<<16 : c1<<16);
180     conv1 = (((data & 0x0c) == 0) ? c0 : c1) | (((data & 0x03) == 0) ? c0<<16 : c1<<16);
181     conv0 |= (conv0 << 8); conv1 |= (conv1 << 8);
182    
183     for (int i=0; i<40; i++) {
184     *lp++ = conv0;
185     *lp++ = conv1;
186     *r++ = data;
187     }
188     }