6€ MCE2VGA replacement - CGA/EGA/HGC capture with logic analyzer

Reply 160 of 212, by Predator99

Posted on 2020-07-25, 10:32

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

pics...uncorrected and unscaled.

Reply 161 of 212, by Predator99

Posted on 2020-07-25, 16:28

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

Benedikt wrote on 2020-07-19, 14:24:
I just had another idea, namely for a hardware-assisted solution. If we add an oscillator matching the pixel clock, an edge-trig […]
Show full quote

I just had another idea, namely for a hardware-assisted solution.
If we add an oscillator matching the pixel clock, an edge-triggered flip-flop and an xor-gate, we could invert the polarity of the sampling clock depending on whether the oscillator output is high or low during the rising edge of the hsync pulse.
This should ensure that we always sample the pixels and not the transition between pixels.
The software part would become trivial.
You'd obviously need a logic analyzer of the kind that has an external clock input or add it as a modification.

Yes, maybe its time to think about a hardware solution. Just to keep as bookmark: It seems to be possible to modify EGA clock using the feature connector without modifying the card itself:
https://books.google.de/books?id=vcqI6sY2e-kC … z%20ega&f=false
Have to read to see if its helpful.

What I will try next: The Analyzer is easy to open and you see a single crystal: 24.000 MHz for the max sample frequency. I will replace it with a socket to see how it behaves with other crystals. 16.257 MHz would be great. Dont know if this works or if it interferes with the USB-transfer. There is also an external "CLK" connector but it seems it cannot be used by Sigrok.

Reply 162 of 212, by Benedikt

Posted on 2020-07-25, 17:36

Benedikt Offline

Rank Oldbie

Rank: Oldbie
Posts: 576
Joined: 2019-02-14, 15:28
Location: Germany

Predator99 wrote on 2020-07-25, 16:28:

What I will try next: The Analyzer is easy to open and you see a single crystal: 24.000 MHz for the max sample frequency. I will replace it with a socket to see how it behaves with other crystals. 16.257 MHz would be great. Dont know if this works or if it interferes with the USB-transfer. There is also an external "CLK" connector but it seems it cannot be used by Sigrok.

Be careful with that!
IIRC, USB derives its clock signal from an input clock that has to be a multiple of 12MHz.
If the 24MHz crystal provides both, the sample clock and the USB clock, there's a substantial risk that replacing the crystal will break the device.
Sigroks inability to use the custom clock signal from the CLK input looks like a firmware issue, if you ask me.

Reply 163 of 212, by Predator99

Posted on 2020-07-25, 18:24

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

Benedikt wrote on 2020-07-25, 17:36:
Be careful with that! IIRC, USB derives its clock signal from an input clock that has to be a multiple of 12MHz. If the 24MHz cr […]
Show full quote

Predator99 wrote on 2020-07-25, 16:28:

What I will try next: The Analyzer is easy to open and you see a single crystal: 24.000 MHz for the max sample frequency. I will replace it with a socket to see how it behaves with other crystals. 16.257 MHz would be great. Dont know if this works or if it interferes with the USB-transfer. There is also an external "CLK" connector but it seems it cannot be used by Sigrok.

Be careful with that!
IIRC, USB derives its clock signal from an input clock that has to be a multiple of 12MHz.
If the 24MHz crystal provides both, the sample clock and the USB clock, there's a substantial risk that replacing the crystal will break the device.
Sigroks inability to use the custom clock signal from the CLK input looks like a firmware issue, if you ask me.

Doesnt matter, for 6€ can afford a new one.

Tested some other crystal I had in spare: 24.576 MHz, 16.000 MHz. A USB device is detected with these, but no driver loaded...only 24.000 works. Was worth a try.

Reply 164 of 212, by Predator99

Posted on 2020-07-26, 10:33

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

root42 wrote on 2020-07-17, 19:56:

37s on a 2013 iMac with i5. So pretty old. I think your slowdown is due to the wrong texture format. If I create a texture in the wrong format it has to be converted before it is uploaded to the GPU. I will fix that soon.

So what does this mean? Can I speed it up by changing any setting in my Windows System?

I played with capturing at only 16 MHz and I am very happy with the results. Display at 320x200 is nearly perfect now. 640x350 is also looking very good.
If have again implemented the setting of individual rows...this code can be made quickly with excel. Its still too slow since you implemented the scaling of the window..

if (x== 175 ) {pset(surface, 0 , y, color1);}
if (x== 177 ) {pset(surface, 1 , y, color1);}
if (x== 179 ) {pset(surface, 2 , y, color1);}
if (x== 182 ) {pset(surface, 3 , y, color1);}
....
if (x== 881 ) {pset(surface, 316 , y, color1);}
if (x== 884 ) {pset(surface, 317 , y, color1);}
if (x== 886 ) {pset(surface, 318 , y, color1);}
if (x== 888 ) {pset(surface, 319 , y, color1);}

1#include <math.h>
2#include <stdio.h>
3#include <stdlib.h>
4#define SDL_MAIN_HANDLED
5#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-w64-mingw32\include\SDL2\SDL.h>
6#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-w64-mingw32\include
7
8\SDL2\SDL_surface.h>
9
10
11#include <io.h>
12#include <fcntl.h>
13
14
15
16
17
18#define IMG_WIDTH 320
19#define IMG_HEIGHT 247
20
21#if SDL_BYTEORDER == SDL_BIG_ENDIAN
22static const Uint32 rmask = 0xff000000;
23static const Uint32 gmask = 0x00ff0000;
24static const Uint32 bmask = 0x0000ff00;
25static const Uint32 amask = 0x000000ff;
26#else
27static const Uint32 rmask = 0x00ff0000;
28static const Uint32 gmask = 0x0000ff00;
29static const Uint32 bmask = 0x000000ff;
30static const Uint32 amask = 0xff000000;
31#endif
32
33static Uint32 egapal[64];
34
35void
36init_pal()
37{
38  int i;
39  for( i = 0; i < 64; ++i ) {
40    Uint32 color =
41      (  ((i & (1 << 0)) << 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & bmask)
42      + (((i & (1 << 1)) >> 0) + ((i & (1 << 3)) >> 3)) * (0x55555555 & gmask)
43      + (((i & (1 << 2)) >> 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & rmask)
44      + amask
45      ;
46    printf("%xd ", color);
47    egapal[i] = color;
48  }
49}
50
51inline
52void
53pset(
54  SDL_Surface *surface,
55  unsigned int x,
56  unsigned int y,
57  unsigned char color
58  )
59{
60  if( x >= IMG_WIDTH || y >= IMG_HEIGHT ) {

…Show last 450 lines

61    return;
62  }
63
64  Uint32 *target_pixel = surface->pixels + y * surface->pitch +
65    x * sizeof( *target_pixel );
66  *target_pixel = egapal[color];
67}
68
69int main()
70{
71int x_scaled;  
72int new_frame = 0;
73  unsigned char value, color1;
74  int hsync = 0, vsync = 0;
75  int frame = 0;
76  unsigned int vsyncc = 0, ref_len = 0;
77  unsigned int x = 0, y = 0;
78  SDL_Window *window;
79
80  init_pal();
81  
82  SDL_Init(SDL_INIT_VIDEO);
83  window = SDL_CreateWindow(
84    "SIGROK2EGA",
85    SDL_WINDOWPOS_UNDEFINED,
86    SDL_WINDOWPOS_UNDEFINED,
87    IMG_WIDTH,
88    IMG_HEIGHT,
89    SDL_WINDOW_SHOWN|SDL_WINDOW_OPENGL|SDL_WINDOW_RESIZABLE
90    );
91
92  if (window == NULL) {
93    SDL_Log( "Could not create window: %s", SDL_GetError());
94    SDL_Quit();
95    return 1;
96  }
97
98  SDL_Renderer *ren = SDL_CreateRenderer(window, -1, SDL_RENDERER_ACCELERATED | SDL_RENDERER_PRESENTVSYNC);
99  if (ren == NULL) {
100    SDL_DestroyWindow( window );
101    SDL_Log( "SDL_CreateRenderer Error: %s", SDL_GetError());
102    SDL_Quit();
103    return 1;
104  }
105
106  SDL_Surface *surface =
107    SDL_CreateRGBSurface(
108      0,
109      IMG_WIDTH,
110      IMG_HEIGHT,
111      32,
112      rmask,
113      gmask,
114      bmask,
115      amask
116      );
117  if (surface == NULL) {
118    SDL_Log("SDL_CreateRGBSurface() failed: %s", SDL_GetError());
119    SDL_Quit();
120    return 1;
121  }
122
123  SDL_Texture *tex = SDL_CreateTextureFromSurface(ren, surface);
124  if( tex == NULL ) {
125    SDL_Log( "SDL_CreateTextueFromSurface() failed: %s", SDL_GetError());
126    SDL_Quit();
127    return 1;
128  }
129
130  while(!feof(stdin)) {
131    value = fgetc(stdin);
132    vsync = value & 128;
133    hsync = value & 64;
134    if( vsync == 0 ) {
135      vsyncc = 0;
136      new_frame = 0;
137    } else {
138      vsyncc++;
139      if( vsyncc > 20 ) {
140	vsyncc = 0;
141	y = 0;
142	// this means a new frame?
143	if( !new_frame ) {
144	  new_frame = 1;
145	  frame++;
146	  printf("frame %u\n", frame);
147
148	  SDL_UpdateTexture(tex, NULL, surface->pixels, surface->pitch);
149	  // SDL_RenderClear(ren);
150	  SDL_RenderCopy(ren, tex, NULL, NULL);
151	  SDL_RenderPresent(ren);
152
153	  SDL_Event e;
154	  if (SDL_PollEvent(&e)) {
155	    if (e.type == SDL_QUIT) {
156	      break;
157	    }
158	  }
159	}
160      }
161    }
162    color1 = value & 0x3F;
163//fast perfekt int x_scaled = round(319.5/714.5*(x-126));
164//int x_scaled = round(319.5/714.5*(x-126));
165//if (x==174) {int x_scaled = 300;}
166// int x_scaled=x    ;
167//int y_scaled = y - 13;
168
169if (x>174) {
170if (x<888) {
171if (x==	175	) {pset(surface, 	0	, y, color1);}
172if (x==	177	) {pset(surface, 	1	, y, color1);}
173if (x==	179	) {pset(surface, 	2	, y, color1);}
174if (x==	182	) {pset(surface, 	3	, y, color1);}
175if (x==	184	) {pset(surface, 	4	, y, color1);}
176if (x==	186	) {pset(surface, 	5	, y, color1);}
177if (x==	188	) {pset(surface, 	6	, y, color1);}
178if (x==	191	) {pset(surface, 	7	, y, color1);}
179if (x==	193	) {pset(surface, 	8	, y, color1);}
180if (x==	195	) {pset(surface, 	9	, y, color1);}
181if (x==	197	) {pset(surface, 	10	, y, color1);}
182if (x==	200	) {pset(surface, 	11	, y, color1);}
183if (x==	202	) {pset(surface, 	12	, y, color1);}
184if (x==	204	) {pset(surface, 	13	, y, color1);}
185if (x==	206	) {pset(surface, 	14	, y, color1);}
186if (x==	209	) {pset(surface, 	15	, y, color1);}
187if (x==	211	) {pset(surface, 	16	, y, color1);}
188if (x==	213	) {pset(surface, 	17	, y, color1);}
189if (x==	215	) {pset(surface, 	18	, y, color1);}
190if (x==	217	) {pset(surface, 	19	, y, color1);}
191if (x==	220	) {pset(surface, 	20	, y, color1);}
192if (x==	222	) {pset(surface, 	21	, y, color1);}
193if (x==	224	) {pset(surface, 	22	, y, color1);}
194if (x==	226	) {pset(surface, 	23	, y, color1);}
195if (x==	229	) {pset(surface, 	24	, y, color1);}
196if (x==	231	) {pset(surface, 	25	, y, color1);}
197if (x==	233	) {pset(surface, 	26	, y, color1);}
198if (x==	235	) {pset(surface, 	27	, y, color1);}
199if (x==	238	) {pset(surface, 	28	, y, color1);}
200if (x==	240	) {pset(surface, 	29	, y, color1);}
201if (x==	242	) {pset(surface, 	30	, y, color1);}
202if (x==	244	) {pset(surface, 	31	, y, color1);}
203if (x==	247	) {pset(surface, 	32	, y, color1);}
204if (x==	249	) {pset(surface, 	33	, y, color1);}
205if (x==	251	) {pset(surface, 	34	, y, color1);}
206if (x==	253	) {pset(surface, 	35	, y, color1);}
207if (x==	255	) {pset(surface, 	36	, y, color1);}
208if (x==	258	) {pset(surface, 	37	, y, color1);}
209if (x==	260	) {pset(surface, 	38	, y, color1);}
210if (x==	262	) {pset(surface, 	39	, y, color1);}
211if (x==	264	) {pset(surface, 	40	, y, color1);}
212if (x==	267	) {pset(surface, 	41	, y, color1);}
213if (x==	269	) {pset(surface, 	42	, y, color1);}
214if (x==	271	) {pset(surface, 	43	, y, color1);}
215if (x==	273	) {pset(surface, 	44	, y, color1);}
216if (x==	276	) {pset(surface, 	45	, y, color1);}
217if (x==	278	) {pset(surface, 	46	, y, color1);}
218if (x==	280	) {pset(surface, 	47	, y, color1);}
219if (x==	282	) {pset(surface, 	48	, y, color1);}
220if (x==	285	) {pset(surface, 	49	, y, color1);}
221if (x==	287	) {pset(surface, 	50	, y, color1);}
222if (x==	289	) {pset(surface, 	51	, y, color1);}
223if (x==	291	) {pset(surface, 	52	, y, color1);}
224if (x==	293	) {pset(surface, 	53	, y, color1);}
225if (x==	296	) {pset(surface, 	54	, y, color1);}
226if (x==	298	) {pset(surface, 	55	, y, color1);}
227if (x==	300	) {pset(surface, 	56	, y, color1);}
228if (x==	302	) {pset(surface, 	57	, y, color1);}
229if (x==	305	) {pset(surface, 	58	, y, color1);}
230if (x==	307	) {pset(surface, 	59	, y, color1);}
231if (x==	309	) {pset(surface, 	60	, y, color1);}
232if (x==	311	) {pset(surface, 	61	, y, color1);}
233if (x==	314	) {pset(surface, 	62	, y, color1);}
234if (x==	316	) {pset(surface, 	63	, y, color1);}
235if (x==	318	) {pset(surface, 	64	, y, color1);}
236if (x==	320	) {pset(surface, 	65	, y, color1);}
237if (x==	323	) {pset(surface, 	66	, y, color1);}
238if (x==	325	) {pset(surface, 	67	, y, color1);}
239if (x==	327	) {pset(surface, 	68	, y, color1);}
240if (x==	329	) {pset(surface, 	69	, y, color1);}
241if (x==	331	) {pset(surface, 	70	, y, color1);}
242if (x==	334	) {pset(surface, 	71	, y, color1);}
243if (x==	336	) {pset(surface, 	72	, y, color1);}
244if (x==	338	) {pset(surface, 	73	, y, color1);}
245if (x==	340	) {pset(surface, 	74	, y, color1);}
246if (x==	343	) {pset(surface, 	75	, y, color1);}
247if (x==	345	) {pset(surface, 	76	, y, color1);}
248if (x==	347	) {pset(surface, 	77	, y, color1);}
249if (x==	349	) {pset(surface, 	78	, y, color1);}
250if (x==	352	) {pset(surface, 	79	, y, color1);}
251if (x==	354	) {pset(surface, 	80	, y, color1);}
252if (x==	356	) {pset(surface, 	81	, y, color1);}
253if (x==	358	) {pset(surface, 	82	, y, color1);}
254if (x==	361	) {pset(surface, 	83	, y, color1);}
255if (x==	363	) {pset(surface, 	84	, y, color1);}
256if (x==	365	) {pset(surface, 	85	, y, color1);}
257if (x==	367	) {pset(surface, 	86	, y, color1);}
258if (x==	369	) {pset(surface, 	87	, y, color1);}
259if (x==	372	) {pset(surface, 	88	, y, color1);}
260if (x==	374	) {pset(surface, 	89	, y, color1);}
261if (x==	376	) {pset(surface, 	90	, y, color1);}
262if (x==	378	) {pset(surface, 	91	, y, color1);}
263if (x==	381	) {pset(surface, 	92	, y, color1);}
264if (x==	383	) {pset(surface, 	93	, y, color1);}
265if (x==	385	) {pset(surface, 	94	, y, color1);}
266if (x==	387	) {pset(surface, 	95	, y, color1);}
267if (x==	390	) {pset(surface, 	96	, y, color1);}
268if (x==	392	) {pset(surface, 	97	, y, color1);}
269if (x==	394	) {pset(surface, 	98	, y, color1);}
270if (x==	396	) {pset(surface, 	99	, y, color1);}
271if (x==	399	) {pset(surface, 	100	, y, color1);}
272if (x==	401	) {pset(surface, 	101	, y, color1);}
273if (x==	403	) {pset(surface, 	102	, y, color1);}
274if (x==	405	) {pset(surface, 	103	, y, color1);}
275if (x==	407	) {pset(surface, 	104	, y, color1);}
276if (x==	410	) {pset(surface, 	105	, y, color1);}
277if (x==	412	) {pset(surface, 	106	, y, color1);}
278if (x==	414	) {pset(surface, 	107	, y, color1);}
279if (x==	416	) {pset(surface, 	108	, y, color1);}
280if (x==	419	) {pset(surface, 	109	, y, color1);}
281if (x==	421	) {pset(surface, 	110	, y, color1);}
282if (x==	423	) {pset(surface, 	111	, y, color1);}
283if (x==	425	) {pset(surface, 	112	, y, color1);}
284if (x==	428	) {pset(surface, 	113	, y, color1);}
285if (x==	430	) {pset(surface, 	114	, y, color1);}
286if (x==	432	) {pset(surface, 	115	, y, color1);}
287if (x==	434	) {pset(surface, 	116	, y, color1);}
288if (x==	437	) {pset(surface, 	117	, y, color1);}
289if (x==	439	) {pset(surface, 	118	, y, color1);}
290if (x==	441	) {pset(surface, 	119	, y, color1);}
291if (x==	443	) {pset(surface, 	120	, y, color1);}
292if (x==	445	) {pset(surface, 	121	, y, color1);}
293if (x==	448	) {pset(surface, 	122	, y, color1);}
294if (x==	450	) {pset(surface, 	123	, y, color1);}
295if (x==	452	) {pset(surface, 	124	, y, color1);}
296if (x==	454	) {pset(surface, 	125	, y, color1);}
297if (x==	457	) {pset(surface, 	126	, y, color1);}
298if (x==	459	) {pset(surface, 	127	, y, color1);}
299if (x==	461	) {pset(surface, 	128	, y, color1);}
300if (x==	463	) {pset(surface, 	129	, y, color1);}
301if (x==	466	) {pset(surface, 	130	, y, color1);}
302if (x==	468	) {pset(surface, 	131	, y, color1);}
303if (x==	470	) {pset(surface, 	132	, y, color1);}
304if (x==	472	) {pset(surface, 	133	, y, color1);}
305if (x==	475	) {pset(surface, 	134	, y, color1);}
306if (x==	477	) {pset(surface, 	135	, y, color1);}
307if (x==	479	) {pset(surface, 	136	, y, color1);}
308if (x==	481	) {pset(surface, 	137	, y, color1);}
309if (x==	483	) {pset(surface, 	138	, y, color1);}
310if (x==	486	) {pset(surface, 	139	, y, color1);}
311if (x==	488	) {pset(surface, 	140	, y, color1);}
312if (x==	490	) {pset(surface, 	141	, y, color1);}
313if (x==	492	) {pset(surface, 	142	, y, color1);}
314if (x==	495	) {pset(surface, 	143	, y, color1);}
315if (x==	497	) {pset(surface, 	144	, y, color1);}
316if (x==	499	) {pset(surface, 	145	, y, color1);}
317if (x==	501	) {pset(surface, 	146	, y, color1);}
318if (x==	504	) {pset(surface, 	147	, y, color1);}
319if (x==	506	) {pset(surface, 	148	, y, color1);}
320if (x==	508	) {pset(surface, 	149	, y, color1);}
321if (x==	510	) {pset(surface, 	150	, y, color1);}
322if (x==	513	) {pset(surface, 	151	, y, color1);}
323if (x==	515	) {pset(surface, 	152	, y, color1);}
324if (x==	517	) {pset(surface, 	153	, y, color1);}
325if (x==	519	) {pset(surface, 	154	, y, color1);}
326if (x==	521	) {pset(surface, 	155	, y, color1);}
327if (x==	524	) {pset(surface, 	156	, y, color1);}
328if (x==	526	) {pset(surface, 	157	, y, color1);}
329if (x==	528	) {pset(surface, 	158	, y, color1);}
330if (x==	530	) {pset(surface, 	159	, y, color1);}
331if (x==	533	) {pset(surface, 	160	, y, color1);}
332if (x==	535	) {pset(surface, 	161	, y, color1);}
333if (x==	537	) {pset(surface, 	162	, y, color1);}
334if (x==	539	) {pset(surface, 	163	, y, color1);}
335if (x==	542	) {pset(surface, 	164	, y, color1);}
336if (x==	544	) {pset(surface, 	165	, y, color1);}
337if (x==	546	) {pset(surface, 	166	, y, color1);}
338if (x==	548	) {pset(surface, 	167	, y, color1);}
339if (x==	551	) {pset(surface, 	168	, y, color1);}
340if (x==	553	) {pset(surface, 	169	, y, color1);}
341if (x==	555	) {pset(surface, 	170	, y, color1);}
342if (x==	557	) {pset(surface, 	171	, y, color1);}
343if (x==	559	) {pset(surface, 	172	, y, color1);}
344if (x==	562	) {pset(surface, 	173	, y, color1);}
345if (x==	564	) {pset(surface, 	174	, y, color1);}
346if (x==	566	) {pset(surface, 	175	, y, color1);}
347if (x==	568	) {pset(surface, 	176	, y, color1);}
348if (x==	571	) {pset(surface, 	177	, y, color1);}
349if (x==	573	) {pset(surface, 	178	, y, color1);}
350if (x==	575	) {pset(surface, 	179	, y, color1);}
351if (x==	577	) {pset(surface, 	180	, y, color1);}
352if (x==	580	) {pset(surface, 	181	, y, color1);}
353if (x==	582	) {pset(surface, 	182	, y, color1);}
354if (x==	584	) {pset(surface, 	183	, y, color1);}
355if (x==	586	) {pset(surface, 	184	, y, color1);}
356if (x==	589	) {pset(surface, 	185	, y, color1);}
357if (x==	591	) {pset(surface, 	186	, y, color1);}
358if (x==	593	) {pset(surface, 	187	, y, color1);}
359if (x==	595	) {pset(surface, 	188	, y, color1);}
360if (x==	597	) {pset(surface, 	189	, y, color1);}
361if (x==	600	) {pset(surface, 	190	, y, color1);}
362if (x==	602	) {pset(surface, 	191	, y, color1);}
363if (x==	604	) {pset(surface, 	192	, y, color1);}
364if (x==	606	) {pset(surface, 	193	, y, color1);}
365if (x==	609	) {pset(surface, 	194	, y, color1);}
366if (x==	611	) {pset(surface, 	195	, y, color1);}
367if (x==	613	) {pset(surface, 	196	, y, color1);}
368if (x==	615	) {pset(surface, 	197	, y, color1);}
369if (x==	618	) {pset(surface, 	198	, y, color1);}
370if (x==	620	) {pset(surface, 	199	, y, color1);}
371if (x==	622	) {pset(surface, 	200	, y, color1);}
372if (x==	624	) {pset(surface, 	201	, y, color1);}
373if (x==	627	) {pset(surface, 	202	, y, color1);}
374if (x==	629	) {pset(surface, 	203	, y, color1);}
375if (x==	631	) {pset(surface, 	204	, y, color1);}
376if (x==	633	) {pset(surface, 	205	, y, color1);}
377if (x==	635	) {pset(surface, 	206	, y, color1);}
378if (x==	638	) {pset(surface, 	207	, y, color1);}
379if (x==	640	) {pset(surface, 	208	, y, color1);}
380if (x==	642	) {pset(surface, 	209	, y, color1);}
381if (x==	644	) {pset(surface, 	210	, y, color1);}
382if (x==	647	) {pset(surface, 	211	, y, color1);}
383if (x==	649	) {pset(surface, 	212	, y, color1);}
384if (x==	651	) {pset(surface, 	213	, y, color1);}
385if (x==	653	) {pset(surface, 	214	, y, color1);}
386if (x==	656	) {pset(surface, 	215	, y, color1);}
387if (x==	658	) {pset(surface, 	216	, y, color1);}
388if (x==	660	) {pset(surface, 	217	, y, color1);}
389if (x==	663	) {pset(surface, 	218	, y, color1);}
390if (x==	665	) {pset(surface, 	219	, y, color1);}
391if (x==	667	) {pset(surface, 	220	, y, color1);}
392if (x==	669	) {pset(surface, 	221	, y, color1);}
393if (x==	671	) {pset(surface, 	222	, y, color1);}
394if (x==	673	) {pset(surface, 	223	, y, color1);}
395if (x==	676	) {pset(surface, 	224	, y, color1);}
396if (x==	678	) {pset(surface, 	225	, y, color1);}
397if (x==	680	) {pset(surface, 	226	, y, color1);}
398if (x==	682	) {pset(surface, 	227	, y, color1);}
399if (x==	685	) {pset(surface, 	228	, y, color1);}
400if (x==	687	) {pset(surface, 	229	, y, color1);}
401if (x==	689	) {pset(surface, 	230	, y, color1);}
402if (x==	691	) {pset(surface, 	231	, y, color1);}
403if (x==	694	) {pset(surface, 	232	, y, color1);}
404if (x==	696	) {pset(surface, 	233	, y, color1);}
405if (x==	698	) {pset(surface, 	234	, y, color1);}
406if (x==	700	) {pset(surface, 	235	, y, color1);}
407if (x==	703	) {pset(surface, 	236	, y, color1);}
408if (x==	705	) {pset(surface, 	237	, y, color1);}
409if (x==	707	) {pset(surface, 	238	, y, color1);}
410if (x==	709	) {pset(surface, 	239	, y, color1);}
411if (x==	711	) {pset(surface, 	240	, y, color1);}
412if (x==	714	) {pset(surface, 	241	, y, color1);}
413if (x==	716	) {pset(surface, 	242	, y, color1);}
414if (x==	718	) {pset(surface, 	243	, y, color1);}
415if (x==	720	) {pset(surface, 	244	, y, color1);}
416if (x==	723	) {pset(surface, 	245	, y, color1);}
417if (x==	725	) {pset(surface, 	246	, y, color1);}
418if (x==	727	) {pset(surface, 	247	, y, color1);}
419if (x==	729	) {pset(surface, 	248	, y, color1);}
420if (x==	732	) {pset(surface, 	249	, y, color1);}
421if (x==	734	) {pset(surface, 	250	, y, color1);}
422if (x==	736	) {pset(surface, 	251	, y, color1);}
423if (x==	738	) {pset(surface, 	252	, y, color1);}
424if (x==	741	) {pset(surface, 	253	, y, color1);}
425if (x==	743	) {pset(surface, 	254	, y, color1);}
426if (x==	745	) {pset(surface, 	255	, y, color1);}
427if (x==	747	) {pset(surface, 	256	, y, color1);}
428if (x==	749	) {pset(surface, 	257	, y, color1);}
429if (x==	752	) {pset(surface, 	258	, y, color1);}
430if (x==	754	) {pset(surface, 	259	, y, color1);}
431if (x==	756	) {pset(surface, 	260	, y, color1);}
432if (x==	758	) {pset(surface, 	261	, y, color1);}
433if (x==	761	) {pset(surface, 	262	, y, color1);}
434if (x==	763	) {pset(surface, 	263	, y, color1);}
435if (x==	765	) {pset(surface, 	264	, y, color1);}
436if (x==	767	) {pset(surface, 	265	, y, color1);}
437if (x==	770	) {pset(surface, 	266	, y, color1);}
438if (x==	772	) {pset(surface, 	267	, y, color1);}
439if (x==	774	) {pset(surface, 	268	, y, color1);}
440if (x==	776	) {pset(surface, 	269	, y, color1);}
441if (x==	778	) {pset(surface, 	270	, y, color1);}
442if (x==	781	) {pset(surface, 	271	, y, color1);}
443if (x==	783	) {pset(surface, 	272	, y, color1);}
444if (x==	785	) {pset(surface, 	273	, y, color1);}
445if (x==	787	) {pset(surface, 	274	, y, color1);}
446if (x==	790	) {pset(surface, 	275	, y, color1);}
447if (x==	792	) {pset(surface, 	276	, y, color1);}
448if (x==	794	) {pset(surface, 	277	, y, color1);}
449if (x==	796	) {pset(surface, 	278	, y, color1);}
450if (x==	799	) {pset(surface, 	279	, y, color1);}
451if (x==	801	) {pset(surface, 	280	, y, color1);}
452if (x==	803	) {pset(surface, 	281	, y, color1);}
453if (x==	805	) {pset(surface, 	282	, y, color1);}
454if (x==	808	) {pset(surface, 	283	, y, color1);}
455if (x==	810	) {pset(surface, 	284	, y, color1);}
456if (x==	812	) {pset(surface, 	285	, y, color1);}
457if (x==	814	) {pset(surface, 	286	, y, color1);}
458if (x==	817	) {pset(surface, 	287	, y, color1);}
459if (x==	819	) {pset(surface, 	288	, y, color1);}
460if (x==	821	) {pset(surface, 	289	, y, color1);}
461if (x==	823	) {pset(surface, 	290	, y, color1);}
462if (x==	825	) {pset(surface, 	291	, y, color1);}
463if (x==	828	) {pset(surface, 	292	, y, color1);}
464if (x==	830	) {pset(surface, 	293	, y, color1);}
465if (x==	832	) {pset(surface, 	294	, y, color1);}
466if (x==	834	) {pset(surface, 	295	, y, color1);}
467if (x==	837	) {pset(surface, 	296	, y, color1);}
468if (x==	839	) {pset(surface, 	297	, y, color1);}
469if (x==	841	) {pset(surface, 	298	, y, color1);}
470if (x==	843	) {pset(surface, 	299	, y, color1);}
471if (x==	846	) {pset(surface, 	300	, y, color1);}
472if (x==	848	) {pset(surface, 	301	, y, color1);}
473if (x==	850	) {pset(surface, 	302	, y, color1);}
474if (x==	852	) {pset(surface, 	303	, y, color1);}
475if (x==	854	) {pset(surface, 	304	, y, color1);}
476if (x==	857	) {pset(surface, 	305	, y, color1);}
477if (x==	859	) {pset(surface, 	306	, y, color1);}
478if (x==	861	) {pset(surface, 	307	, y, color1);}
479if (x==	863	) {pset(surface, 	308	, y, color1);}
480if (x==	866	) {pset(surface, 	309	, y, color1);}
481if (x==	868	) {pset(surface, 	310	, y, color1);}
482if (x==	870	) {pset(surface, 	311	, y, color1);}
483if (x==	872	) {pset(surface, 	312	, y, color1);}
484if (x==	875	) {pset(surface, 	313	, y, color1);}
485if (x==	877	) {pset(surface, 	314	, y, color1);}
486if (x==	879	) {pset(surface, 	315	, y, color1);}
487if (x==	881	) {pset(surface, 	316	, y, color1);}
488if (x==	884	) {pset(surface, 	317	, y, color1);}
489if (x==	886	) {pset(surface, 	318	, y, color1);}
490if (x==	888	) {pset(surface, 	319	, y, color1);}
491}}
492
493    x++;
494    if( hsync ) {
495      ref_len++;
496      if( ref_len > 30 && x > 700 ) {
497//	pset(surface, x_scaled, y, 5);
498	y++;
499	x = 0;
500      }
501    } else {
502      ref_len = 0;
503    }
504  }
505
506  SDL_DestroyWindow( window );
507  SDL_Quit();
508
509  return 0;
510}

Attachments

Filename

320x200-16MHZ.part001.rar

File size

4.88 MiB

Downloads

47 downloads

File license

Fair use/fair dealing exception
Filename

320x200-16MHZ.part002.rar

File size

4.88 MiB

Downloads

48 downloads

File license

Fair use/fair dealing exception
Filename

320x200-16MHZ.part004.rar

File size

243.44 KiB

Downloads

49 downloads

File license

Fair use/fair dealing exception
Filename

320x200-16MHZ.part003.rar

File size

4.88 MiB

Downloads

47 downloads

File license

Fair use/fair dealing exception

Reply 165 of 212, by Predator99

Posted on 2020-07-26, 11:59

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

Made some further optimizations ... 320x200 now running in real-time. Almost no display errors, playing action games is no problem! Gods patch also included.

I am very happy with the project now 😀 😀 😀

Only thing missing is a autodetection of 320 and 640 modes. At the moment I have to switch between two programs...

1#include <math.h>
2#include <stdio.h>
3#include <stdlib.h>
4#define SDL_MAIN_HANDLED
5#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-
6
7w64-mingw32\include\SDL2\SDL.h>
8#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-
9
10w64-mingw32\include\SDL2\SDL_surface.h>
11
12
13#include <io.h>
14#include <fcntl.h>
15
16
17
18
19
20#define IMG_WIDTH 320
21#define IMG_HEIGHT 200
22
23#if SDL_BYTEORDER == SDL_BIG_ENDIAN
24static const Uint32 rmask = 0xff000000;
25static const Uint32 gmask = 0x00ff0000;
26static const Uint32 bmask = 0x0000ff00;
27static const Uint32 amask = 0x000000ff;
28#else
29static const Uint32 rmask = 0x00ff0000;
30static const Uint32 gmask = 0x0000ff00;
31static const Uint32 bmask = 0x000000ff;
32static const Uint32 amask = 0xff000000;
33#endif
34
35static Uint32 egapal[64];
36
37void
38init_pal()
39{
40  int i;
41  for( i = 0; i < 64; ++i ) {
42    Uint32 color =
43      (  ((i & (1 << 0)) << 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & bmask)
44      + (((i & (1 << 1)) >> 0) + ((i & (1 << 3)) >> 3)) * (0x55555555 & gmask)
45      + (((i & (1 << 2)) >> 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & rmask)
46      + amask
47      ;
48    printf("%xd ", color);
49    egapal[i] = color;
50  }
51}
52
53inline
54void
55pset(
56  SDL_Surface *surface,
57  unsigned int x,
58  unsigned int y,
59  unsigned char color
60  )

…Show last 515 lines

61{
62  if( x >= IMG_WIDTH || y >= IMG_HEIGHT ) {
63    return;
64  }
65
66  Uint32 *target_pixel = surface->pixels + y * surface->pitch +
67    x * sizeof( *target_pixel );
68  *target_pixel = egapal[color];
69}
70
71int main()
72{
73_setmode (_fileno( stdin ), _O_BINARY );
74
75int x_scaled;  
76int new_frame = 0;
77  unsigned char value, color1;
78  int hsync = 0, vsync = 0;
79  int frame = 0;
80  unsigned int vsyncc = 0, ref_len = 0;
81  unsigned int x = 0, y = 0;
82  SDL_Window *window;
83
84  init_pal();
85  
86  SDL_Init(SDL_INIT_VIDEO);
87  window = SDL_CreateWindow(
88    "SIGROK2EGA",
89    SDL_WINDOWPOS_UNDEFINED,
90    SDL_WINDOWPOS_UNDEFINED,
91    IMG_WIDTH,
92    IMG_HEIGHT,
93    SDL_WINDOW_SHOWN|SDL_WINDOW_OPENGL|SDL_WINDOW_RESIZABLE
94    );
95
96  if (window == NULL) {
97    SDL_Log( "Could not create window: %s", SDL_GetError());
98    SDL_Quit();
99    return 1;
100  }
101
102  SDL_Renderer *ren = SDL_CreateRenderer(window, -1, SDL_RENDERER_ACCELERATED | SDL_RENDERER_PRESENTVSYNC);
103  if (ren == NULL) {
104    SDL_DestroyWindow( window );
105    SDL_Log( "SDL_CreateRenderer Error: %s", SDL_GetError());
106    SDL_Quit();
107    return 1;
108  }
109
110  SDL_Surface *surface =
111    SDL_CreateRGBSurface(
112      0,
113      IMG_WIDTH,
114      IMG_HEIGHT,
115      32,
116      rmask,
117      gmask,
118      bmask,
119      amask
120      );
121  if (surface == NULL) {
122    SDL_Log("SDL_CreateRGBSurface() failed: %s", SDL_GetError());
123    SDL_Quit();
124    return 1;
125  }
126
127  SDL_Texture *tex = SDL_CreateTextureFromSurface(ren, surface);
128  if( tex == NULL ) {
129    SDL_Log( "SDL_CreateTextueFromSurface() failed: %s", SDL_GetError());
130    SDL_Quit();
131    return 1;
132  }
133
134  while(!feof(stdin)) {
135    value = fgetc(stdin);
136    vsync = value & 128;
137    hsync = value & 64;
138    if( vsync == 0 ) {
139      vsyncc = 0;
140      new_frame = 0;
141    } else {
142      vsyncc++;
143      if( vsyncc > 20 ) {
144	vsyncc = 0;
145	y = 0;
146	// this means a new frame?
147	if( !new_frame ) {
148	  new_frame = 1;
149	  frame++;
150	  printf("frame %u\n", frame);
151
152	  SDL_UpdateTexture(tex, NULL, surface->pixels, surface->pitch);
153	  // SDL_RenderClear(ren);
154	  SDL_RenderCopy(ren, tex, NULL, NULL);
155	  SDL_RenderPresent(ren);
156
157	  SDL_Event e;
158	  if (SDL_PollEvent(&e)) {
159	    if (e.type == SDL_QUIT) {
160	      break;
161	    }
162	  }
163	}
164      }
165    }
166    color1 = value & 0x3F;
167//fast perfekt int x_scaled = round(319.5/714.5*(x-126));
168//int x_scaled = round(319.5/714.5*(x-126));
169//if (x==174) {int x_scaled = 300;}
170// int x_scaled=x    ;
171int y_scaled = y - 34;
172
173//if (y>32){
174//if (y<235){
175
176if (x>174) {
177if (x<600) {
178
179if (x>174) {
180if (x<400) {
181
182if (x>174) {
183if (x<220) {
184if (x==	175	) {pset(surface, 	0	, y_scaled,  color1);}
185if (x==	177	) {pset(surface, 	1	, y_scaled,  color1);}
186if (x==	179	) {pset(surface, 	2	, y_scaled,  color1);}
187if (x==	182	) {pset(surface, 	3	, y_scaled,  color1);}
188if (x==	184	) {pset(surface, 	4	, y_scaled,  color1);}
189if (x==	186	) {pset(surface, 	5	, y_scaled,  color1);}
190if (x==	188	) {pset(surface, 	6	, y_scaled,  color1);}
191if (x==	191	) {pset(surface, 	7	, y_scaled,  color1);}
192if (x==	193	) {pset(surface, 	8	, y_scaled,  color1);}
193if (x==	195	) {pset(surface, 	9	, y_scaled,  color1);}
194if (x==	197	) {pset(surface, 	10	, y_scaled,  color1);}
195if (x==	200	) {pset(surface, 	11	, y_scaled,  color1);}
196if (x==	202	) {pset(surface, 	12	, y_scaled,  color1);}
197if (x==	204	) {pset(surface, 	13	, y_scaled,  color1);}
198if (x==	206	) {pset(surface, 	14	, y_scaled,  color1);}
199if (x==	209	) {pset(surface, 	15	, y_scaled,  color1);}
200if (x==	211	) {pset(surface, 	16	, y_scaled,  color1);}
201if (x==	213	) {pset(surface, 	17	, y_scaled,  color1);}
202if (x==	215	) {pset(surface, 	18	, y_scaled,  color1);}
203if (x==	217	) {pset(surface, 	19	, y_scaled,  color1);}
204}}
205if (x>217) {
206if (x<261) {
207if (x==	220	) {pset(surface, 	20	, y_scaled,  color1);}
208if (x==	222	) {pset(surface, 	21	, y_scaled,  color1);}
209if (x==	224	) {pset(surface, 	22	, y_scaled,  color1);}
210if (x==	226	) {pset(surface, 	23	, y_scaled,  color1);}
211if (x==	229	) {pset(surface, 	24	, y_scaled,  color1);}
212if (x==	231	) {pset(surface, 	25	, y_scaled,  color1);}
213if (x==	233	) {pset(surface, 	26	, y_scaled,  color1);}
214if (x==	235	) {pset(surface, 	27	, y_scaled,  color1);}
215if (x==	238	) {pset(surface, 	28	, y_scaled,  color1);}
216if (x==	240	) {pset(surface, 	29	, y_scaled,  color1);}
217if (x==	242	) {pset(surface, 	30	, y_scaled,  color1);}
218if (x==	244	) {pset(surface, 	31	, y_scaled,  color1);}
219if (x==	247	) {pset(surface, 	32	, y_scaled,  color1);}
220if (x==	249	) {pset(surface, 	33	, y_scaled,  color1);}
221if (x==	251	) {pset(surface, 	34	, y_scaled,  color1);}
222if (x==	253	) {pset(surface, 	35	, y_scaled,  color1);}
223if (x==	255	) {pset(surface, 	36	, y_scaled,  color1);}
224if (x==	258	) {pset(surface, 	37	, y_scaled,  color1);}
225if (x==	260	) {pset(surface, 	38	, y_scaled,  color1);}
226}}
227if (x>260) {
228if (x<310) {
229if (x==	262	) {pset(surface, 	39	, y_scaled,  color1);}
230if (x==	264	) {pset(surface, 	40	, y_scaled,  color1);}
231if (x==	267	) {pset(surface, 	41	, y_scaled,  color1);}
232if (x==	269	) {pset(surface, 	42	, y_scaled,  color1);}
233if (x==	271	) {pset(surface, 	43	, y_scaled,  color1);}
234if (x==	273	) {pset(surface, 	44	, y_scaled,  color1);}
235if (x==	276	) {pset(surface, 	45	, y_scaled,  color1);}
236if (x==	278	) {pset(surface, 	46	, y_scaled,  color1);}
237if (x==	280	) {pset(surface, 	47	, y_scaled,  color1);}
238if (x==	282	) {pset(surface, 	48	, y_scaled,  color1);}
239if (x==	285	) {pset(surface, 	49	, y_scaled,  color1);}
240if (x==	287	) {pset(surface, 	50	, y_scaled,  color1);}
241if (x==	289	) {pset(surface, 	51	, y_scaled,  color1);}
242if (x==	291	) {pset(surface, 	52	, y_scaled,  color1);}
243if (x==	293	) {pset(surface, 	53	, y_scaled,  color1);}
244if (x==	296	) {pset(surface, 	54	, y_scaled,  color1);}
245if (x==	298	) {pset(surface, 	55	, y_scaled,  color1);}
246if (x==	300	) {pset(surface, 	56	, y_scaled,  color1);}
247if (x==	302	) {pset(surface, 	57	, y_scaled,  color1);}
248if (x==	305	) {pset(surface, 	58	, y_scaled,  color1);}
249if (x==	307	) {pset(surface, 	59	, y_scaled,  color1);}
250if (x==	309	) {pset(surface, 	60	, y_scaled,  color1);}
251}}
252if (x>310) {
253if (x<360) {
254if (x==	311	) {pset(surface, 	61	, y_scaled,  color1);}
255if (x==	314	) {pset(surface, 	62	, y_scaled,  color1);}
256if (x==	316	) {pset(surface, 	63	, y_scaled,  color1);}
257if (x==	318	) {pset(surface, 	64	, y_scaled,  color1);}
258if (x==	320	) {pset(surface, 	65	, y_scaled,  color1);}
259if (x==	323	) {pset(surface, 	66	, y_scaled,  color1);}
260if (x==	325	) {pset(surface, 	67	, y_scaled,  color1);}
261if (x==	327	) {pset(surface, 	68	, y_scaled,  color1);}
262if (x==	329	) {pset(surface, 	69	, y_scaled,  color1);}
263if (x==	331	) {pset(surface, 	70	, y_scaled,  color1);}
264if (x==	334	) {pset(surface, 	71	, y_scaled,  color1);}
265if (x==	336	) {pset(surface, 	72	, y_scaled,  color1);}
266if (x==	338	) {pset(surface, 	73	, y_scaled,  color1);}
267if (x==	340	) {pset(surface, 	74	, y_scaled,  color1);}
268if (x==	343	) {pset(surface, 	75	, y_scaled,  color1);}
269if (x==	345	) {pset(surface, 	76	, y_scaled,  color1);}
270if (x==	347	) {pset(surface, 	77	, y_scaled,  color1);}
271if (x==	349	) {pset(surface, 	78	, y_scaled,  color1);}
272if (x==	352	) {pset(surface, 	79	, y_scaled,  color1);}
273if (x==	354	) {pset(surface, 	80	, y_scaled,  color1);}
274if (x==	356	) {pset(surface, 	81	, y_scaled,  color1);}
275if (x==	358	) {pset(surface, 	82	, y_scaled,  color1);}
276}}
277if (x>358) {
278if (x<400) {
279if (x==	361	) {pset(surface, 	83	, y_scaled,  color1);}
280if (x==	363	) {pset(surface, 	84	, y_scaled,  color1);}
281if (x==	365	) {pset(surface, 	85	, y_scaled,  color1);}
282if (x==	367	) {pset(surface, 	86	, y_scaled,  color1);}
283if (x==	369	) {pset(surface, 	87	, y_scaled,  color1);}
284if (x==	372	) {pset(surface, 	88	, y_scaled,  color1);}
285if (x==	374	) {pset(surface, 	89	, y_scaled,  color1);}
286if (x==	376	) {pset(surface, 	90	, y_scaled,  color1);}
287if (x==	378	) {pset(surface, 	91	, y_scaled,  color1);}
288if (x==	381	) {pset(surface, 	92	, y_scaled,  color1);}
289if (x==	383	) {pset(surface, 	93	, y_scaled,  color1);}
290if (x==	385	) {pset(surface, 	94	, y_scaled,  color1);}
291if (x==	387	) {pset(surface, 	95	, y_scaled,  color1);}
292if (x==	390	) {pset(surface, 	96	, y_scaled,  color1);}
293if (x==	392	) {pset(surface, 	97	, y_scaled,  color1);}
294if (x==	394	) {pset(surface, 	98	, y_scaled,  color1);}
295if (x==	396	) {pset(surface, 	99	, y_scaled,  color1);}
296if (x==	399	) {pset(surface, 	100	, y_scaled,  color1);}
297}}}}
298
299if (x>399) {
300if (x<600) {
301
302if (x>399) {
303if (x<450) {
304
305
306if (x==	401	) {pset(surface, 	101	, y_scaled,  color1);}
307if (x==	403	) {pset(surface, 	102	, y_scaled,  color1);}
308if (x==	405	) {pset(surface, 	103	, y_scaled,  color1);}
309if (x==	407	) {pset(surface, 	104	, y_scaled,  color1);}
310if (x==	410	) {pset(surface, 	105	, y_scaled,  color1);}
311if (x==	412	) {pset(surface, 	106	, y_scaled,  color1);}
312if (x==	414	) {pset(surface, 	107	, y_scaled,  color1);}
313if (x==	416	) {pset(surface, 	108	, y_scaled,  color1);}
314if (x==	419	) {pset(surface, 	109	, y_scaled,  color1);}
315if (x==	421	) {pset(surface, 	110	, y_scaled,  color1);}
316if (x==	423	) {pset(surface, 	111	, y_scaled,  color1);}
317if (x==	425	) {pset(surface, 	112	, y_scaled,  color1);}
318if (x==	428	) {pset(surface, 	113	, y_scaled,  color1);}
319if (x==	430	) {pset(surface, 	114	, y_scaled,  color1);}
320if (x==	432	) {pset(surface, 	115	, y_scaled,  color1);}
321if (x==	434	) {pset(surface, 	116	, y_scaled,  color1);}
322if (x==	437	) {pset(surface, 	117	, y_scaled,  color1);}
323if (x==	439	) {pset(surface, 	118	, y_scaled,  color1);}
324if (x==	441	) {pset(surface, 	119	, y_scaled,  color1);}
325if (x==	443	) {pset(surface, 	120	, y_scaled,  color1);}
326if (x==	445	) {pset(surface, 	121	, y_scaled,  color1);}
327if (x==	448	) {pset(surface, 	122	, y_scaled,  color1);}
328}}
329if (x>448) {
330if (x<500) {
331if (x==	450	) {pset(surface, 	123	, y_scaled,  color1);}
332if (x==	452	) {pset(surface, 	124	, y_scaled,  color1);}
333if (x==	454	) {pset(surface, 	125	, y_scaled,  color1);}
334if (x==	457	) {pset(surface, 	126	, y_scaled,  color1);}
335if (x==	459	) {pset(surface, 	127	, y_scaled,  color1);}
336if (x==	461	) {pset(surface, 	128	, y_scaled,  color1);}
337if (x==	463	) {pset(surface, 	129	, y_scaled,  color1);}
338if (x==	466	) {pset(surface, 	130	, y_scaled,  color1);}
339if (x==	468	) {pset(surface, 	131	, y_scaled,  color1);}
340if (x==	470	) {pset(surface, 	132	, y_scaled,  color1);}
341if (x==	472	) {pset(surface, 	133	, y_scaled,  color1);}
342if (x==	475	) {pset(surface, 	134	, y_scaled,  color1);}
343if (x==	477	) {pset(surface, 	135	, y_scaled,  color1);}
344if (x==	479	) {pset(surface, 	136	, y_scaled,  color1);}
345if (x==	481	) {pset(surface, 	137	, y_scaled,  color1);}
346if (x==	483	) {pset(surface, 	138	, y_scaled,  color1);}
347if (x==	486	) {pset(surface, 	139	, y_scaled,  color1);}
348if (x==	488	) {pset(surface, 	140	, y_scaled,  color1);}
349if (x==	490	) {pset(surface, 	141	, y_scaled,  color1);}
350if (x==	492	) {pset(surface, 	142	, y_scaled,  color1);}
351if (x==	495	) {pset(surface, 	143	, y_scaled,  color1);}
352if (x==	497	) {pset(surface, 	144	, y_scaled,  color1);}
353if (x==	499	) {pset(surface, 	145	, y_scaled,  color1);}
354}}
355if (x>499) {
356if (x<550) {
357if (x==	501	) {pset(surface, 	146	, y_scaled,  color1);}
358if (x==	504	) {pset(surface, 	147	, y_scaled,  color1);}
359if (x==	506	) {pset(surface, 	148	, y_scaled,  color1);}
360if (x==	508	) {pset(surface, 	149	, y_scaled,  color1);}
361if (x==	510	) {pset(surface, 	150	, y_scaled,  color1);}
362if (x==	513	) {pset(surface, 	151	, y_scaled,  color1);}
363if (x==	515	) {pset(surface, 	152	, y_scaled,  color1);}
364if (x==	517	) {pset(surface, 	153	, y_scaled,  color1);}
365if (x==	519	) {pset(surface, 	154	, y_scaled,  color1);}
366if (x==	521	) {pset(surface, 	155	, y_scaled,  color1);}
367if (x==	524	) {pset(surface, 	156	, y_scaled,  color1);}
368if (x==	526	) {pset(surface, 	157	, y_scaled,  color1);}
369if (x==	528	) {pset(surface, 	158	, y_scaled,  color1);}
370if (x==	530	) {pset(surface, 	159	, y_scaled,  color1);}
371if (x==	533	) {pset(surface, 	160	, y_scaled,  color1);}
372if (x==	535	) {pset(surface, 	161	, y_scaled,  color1);}
373if (x==	537	) {pset(surface, 	162	, y_scaled,  color1);}
374if (x==	539	) {pset(surface, 	163	, y_scaled,  color1);}
375if (x==	542	) {pset(surface, 	164	, y_scaled,  color1);}
376if (x==	544	) {pset(surface, 	165	, y_scaled,  color1);}
377if (x==	546	) {pset(surface, 	166	, y_scaled,  color1);}
378if (x==	548	) {pset(surface, 	167	, y_scaled,  color1);}
379}}
380if (x>548) {
381if (x<600) {
382if (x==	551	) {pset(surface, 	168	, y_scaled,  color1);}
383if (x==	553	) {pset(surface, 	169	, y_scaled,  color1);}
384if (x==	555	) {pset(surface, 	170	, y_scaled,  color1);}
385if (x==	557	) {pset(surface, 	171	, y_scaled,  color1);}
386if (x==	559	) {pset(surface, 	172	, y_scaled,  color1);}
387if (x==	562	) {pset(surface, 	173	, y_scaled,  color1);}
388if (x==	564	) {pset(surface, 	174	, y_scaled,  color1);}
389if (x==	566	) {pset(surface, 	175	, y_scaled,  color1);}
390if (x==	568	) {pset(surface, 	176	, y_scaled,  color1);}
391if (x==	571	) {pset(surface, 	177	, y_scaled,  color1);}
392if (x==	573	) {pset(surface, 	178	, y_scaled,  color1);}
393if (x==	575	) {pset(surface, 	179	, y_scaled,  color1);}
394if (x==	577	) {pset(surface, 	180	, y_scaled,  color1);}
395if (x==	580	) {pset(surface, 	181	, y_scaled,  color1);}
396if (x==	582	) {pset(surface, 	182	, y_scaled,  color1);}
397if (x==	584	) {pset(surface, 	183	, y_scaled,  color1);}
398if (x==	586	) {pset(surface, 	184	, y_scaled,  color1);}
399if (x==	589	) {pset(surface, 	185	, y_scaled,  color1);}
400if (x==	591	) {pset(surface, 	186	, y_scaled,  color1);}
401if (x==	593	) {pset(surface, 	187	, y_scaled,  color1);}
402if (x==	595	) {pset(surface, 	188	, y_scaled,  color1);}
403if (x==	597	) {pset(surface, 	189	, y_scaled,  color1);}
404}}}}}}
405if (x>597) {
406if (x<800) {
407
408if (x>597) {
409if (x<650) {
410if (x==	600	) {pset(surface, 	190	, y_scaled,  color1);}
411if (x==	602	) {pset(surface, 	191	, y_scaled,  color1);}
412if (x==	604	) {pset(surface, 	192	, y_scaled,  color1);}
413if (x==	606	) {pset(surface, 	193	, y_scaled,  color1);}
414if (x==	609	) {pset(surface, 	194	, y_scaled,  color1);}
415if (x==	611	) {pset(surface, 	195	, y_scaled,  color1);}
416if (x==	613	) {pset(surface, 	196	, y_scaled,  color1);}
417if (x==	615	) {pset(surface, 	197	, y_scaled,  color1);}
418if (x==	618	) {pset(surface, 	198	, y_scaled,  color1);}
419if (x==	620	) {pset(surface, 	199	, y_scaled,  color1);}
420if (x==	622	) {pset(surface, 	200	, y_scaled,  color1);}
421if (x==	624	) {pset(surface, 	201	, y_scaled,  color1);}
422if (x==	627	) {pset(surface, 	202	, y_scaled,  color1);}
423if (x==	629	) {pset(surface, 	203	, y_scaled,  color1);}
424if (x==	631	) {pset(surface, 	204	, y_scaled,  color1);}
425if (x==	633	) {pset(surface, 	205	, y_scaled,  color1);}
426if (x==	635	) {pset(surface, 	206	, y_scaled,  color1);}
427if (x==	638	) {pset(surface, 	207	, y_scaled,  color1);}
428if (x==	640	) {pset(surface, 	208	, y_scaled,  color1);}
429if (x==	642	) {pset(surface, 	209	, y_scaled,  color1);}
430if (x==	644	) {pset(surface, 	210	, y_scaled,  color1);}
431if (x==	647	) {pset(surface, 	211	, y_scaled,  color1);}
432if (x==	649	) {pset(surface, 	212	, y_scaled,  color1);}
433}}
434if (x>649) {
435if (x<700) {
436
437if (x==	651	) {pset(surface, 	213	, y_scaled,  color1);}
438if (x==	653	) {pset(surface, 	214	, y_scaled,  color1);}
439if (x==	656	) {pset(surface, 	215	, y_scaled,  color1);}
440if (x==	658	) {pset(surface, 	216	, y_scaled,  color1);}
441if (x==	660	) {pset(surface, 	217	, y_scaled,  color1);}
442if (x==	663	) {pset(surface, 	218	, y_scaled,  color1);}
443if (x==	665	) {pset(surface, 	219	, y_scaled,  color1);}
444if (x==	667	) {pset(surface, 	220	, y_scaled,  color1);}
445if (x==	669	) {pset(surface, 	221	, y_scaled,  color1);}
446if (x==	671	) {pset(surface, 	222	, y_scaled,  color1);}
447if (x==	673	) {pset(surface, 	223	, y_scaled,  color1);}
448if (x==	676	) {pset(surface, 	224	, y_scaled,  color1);}
449if (x==	678	) {pset(surface, 	225	, y_scaled,  color1);}
450if (x==	680	) {pset(surface, 	226	, y_scaled,  color1);}
451if (x==	682	) {pset(surface, 	227	, y_scaled,  color1);}
452if (x==	685	) {pset(surface, 	228	, y_scaled,  color1);}
453if (x==	687	) {pset(surface, 	229	, y_scaled,  color1);}
454if (x==	689	) {pset(surface, 	230	, y_scaled,  color1);}
455if (x==	691	) {pset(surface, 	231	, y_scaled,  color1);}
456if (x==	694	) {pset(surface, 	232	, y_scaled,  color1);}
457if (x==	696	) {pset(surface, 	233	, y_scaled,  color1);}
458if (x==	698	) {pset(surface, 	234	, y_scaled,  color1);}
459}}
460if (x>698) {
461if (x<750) {
462if (x==	700	) {pset(surface, 	235	, y_scaled,  color1);}
463if (x==	703	) {pset(surface, 	236	, y_scaled,  color1);}
464if (x==	705	) {pset(surface, 	237	, y_scaled,  color1);}
465if (x==	707	) {pset(surface, 	238	, y_scaled,  color1);}
466if (x==	709	) {pset(surface, 	239	, y_scaled,  color1);}
467if (x==	711	) {pset(surface, 	240	, y_scaled,  color1);}
468if (x==	714	) {pset(surface, 	241	, y_scaled,  color1);}
469if (x==	716	) {pset(surface, 	242	, y_scaled,  color1);}
470if (x==	718	) {pset(surface, 	243	, y_scaled,  color1);}
471if (x==	720	) {pset(surface, 	244	, y_scaled,  color1);}
472if (x==	723	) {pset(surface, 	245	, y_scaled,  color1);}
473if (x==	725	) {pset(surface, 	246	, y_scaled,  color1);}
474if (x==	727	) {pset(surface, 	247	, y_scaled,  color1);}
475if (x==	729	) {pset(surface, 	248	, y_scaled,  color1);}
476if (x==	732	) {pset(surface, 	249	, y_scaled,  color1);}
477if (x==	734	) {pset(surface, 	250	, y_scaled,  color1);}
478if (x==	736	) {pset(surface, 	251	, y_scaled,  color1);}
479if (x==	738	) {pset(surface, 	252	, y_scaled,  color1);}
480if (x==	741	) {pset(surface, 	253	, y_scaled,  color1);}
481if (x==	743	) {pset(surface, 	254	, y_scaled,  color1);}
482if (x==	745	) {pset(surface, 	255	, y_scaled,  color1);}
483if (x==	747	) {pset(surface, 	256	, y_scaled,  color1);}
484if (x==	749	) {pset(surface, 	257	, y_scaled,  color1);}
485}}
486if (x>749) {
487if (x<800) {
488if (x==	752	) {pset(surface, 	258	, y_scaled,  color1);}
489if (x==	754	) {pset(surface, 	259	, y_scaled,  color1);}
490if (x==	756	) {pset(surface, 	260	, y_scaled,  color1);}
491if (x==	758	) {pset(surface, 	261	, y_scaled,  color1);}
492if (x==	761	) {pset(surface, 	262	, y_scaled,  color1);}
493if (x==	763	) {pset(surface, 	263	, y_scaled,  color1);}
494if (x==	765	) {pset(surface, 	264	, y_scaled,  color1);}
495if (x==	767	) {pset(surface, 	265	, y_scaled,  color1);}
496if (x==	770	) {pset(surface, 	266	, y_scaled,  color1);}
497if (x==	772	) {pset(surface, 	267	, y_scaled,  color1);}
498if (x==	774	) {pset(surface, 	268	, y_scaled,  color1);}
499if (x==	776	) {pset(surface, 	269	, y_scaled,  color1);}
500if (x==	778	) {pset(surface, 	270	, y_scaled,  color1);}
501if (x==	781	) {pset(surface, 	271	, y_scaled,  color1);}
502if (x==	783	) {pset(surface, 	272	, y_scaled,  color1);}
503if (x==	785	) {pset(surface, 	273	, y_scaled,  color1);}
504if (x==	787	) {pset(surface, 	274	, y_scaled,  color1);}
505if (x==	790	) {pset(surface, 	275	, y_scaled,  color1);}
506if (x==	792	) {pset(surface, 	276	, y_scaled,  color1);}
507if (x==	794	) {pset(surface, 	277	, y_scaled,  color1);}
508if (x==	796	) {pset(surface, 	278	, y_scaled,  color1);}
509if (x==	799	) {pset(surface, 	279	, y_scaled,  color1);}
510}}}}
511if (x>799) {
512if (x<850) {
513if (x==	801	) {pset(surface, 	280	, y_scaled,  color1);}
514if (x==	803	) {pset(surface, 	281	, y_scaled,  color1);}
515if (x==	805	) {pset(surface, 	282	, y_scaled,  color1);}
516if (x==	808	) {pset(surface, 	283	, y_scaled,  color1);}
517if (x==	810	) {pset(surface, 	284	, y_scaled,  color1);}
518if (x==	812	) {pset(surface, 	285	, y_scaled,  color1);}
519if (x==	814	) {pset(surface, 	286	, y_scaled,  color1);}
520if (x==	817	) {pset(surface, 	287	, y_scaled,  color1);}
521if (x==	819	) {pset(surface, 	288	, y_scaled,  color1);}
522if (x==	821	) {pset(surface, 	289	, y_scaled,  color1);}
523if (x==	823	) {pset(surface, 	290	, y_scaled,  color1);}
524if (x==	825	) {pset(surface, 	291	, y_scaled,  color1);}
525if (x==	828	) {pset(surface, 	292	, y_scaled,  color1);}
526if (x==	830	) {pset(surface, 	293	, y_scaled,  color1);}
527if (x==	832	) {pset(surface, 	294	, y_scaled,  color1);}
528if (x==	834	) {pset(surface, 	295	, y_scaled,  color1);}
529if (x==	837	) {pset(surface, 	296	, y_scaled,  color1);}
530if (x==	839	) {pset(surface, 	297	, y_scaled,  color1);}
531if (x==	841	) {pset(surface, 	298	, y_scaled,  color1);}
532if (x==	843	) {pset(surface, 	299	, y_scaled,  color1);}
533if (x==	846	) {pset(surface, 	300	, y_scaled,  color1);}
534if (x==	848	) {pset(surface, 	301	, y_scaled,  color1);}
535}}
536if (x>849) {
537if (x<889) {
538if (x==	850	) {pset(surface, 	302	, y_scaled,  color1);}
539if (x==	852	) {pset(surface, 	303	, y_scaled,  color1);}
540if (x==	854	) {pset(surface, 	304	, y_scaled,  color1);}
541if (x==	857	) {pset(surface, 	305	, y_scaled,  color1);}
542if (x==	859	) {pset(surface, 	306	, y_scaled,  color1);}
543if (x==	861	) {pset(surface, 	307	, y_scaled,  color1);}
544if (x==	863	) {pset(surface, 	308	, y_scaled,  color1);}
545if (x==	866	) {pset(surface, 	309	, y_scaled,  color1);}
546if (x==	868	) {pset(surface, 	310	, y_scaled,  color1);}
547if (x==	870	) {pset(surface, 	311	, y_scaled,  color1);}
548if (x==	872	) {pset(surface, 	312	, y_scaled,  color1);}
549if (x==	875	) {pset(surface, 	313	, y_scaled,  color1);}
550if (x==	877	) {pset(surface, 	314	, y_scaled,  color1);}
551if (x==	879	) {pset(surface, 	315	, y_scaled,  color1);}
552if (x==	881	) {pset(surface, 	316	, y_scaled,  color1);}
553if (x==	884	) {pset(surface, 	317	, y_scaled,  color1);}
554if (x==	886	) {pset(surface, 	318	, y_scaled,  color1);}
555if (x==	888	) {pset(surface, 	319	, y_scaled,  color1);}
556}}
557
558    x++;
559    if( hsync ) {
560      ref_len++;
561      if( ref_len > 30 && x > 700 ) {
562//	pset(surface, x_scaled, y, 5);
563	y++;
564	x = 0;
565      }
566    } else {
567      ref_len = 0;
568    }
569  }
570
571  SDL_DestroyWindow( window );
572  SDL_Quit();
573
574  return 0;
575}

Last edited by Predator99 on 2020-07-26, 15:47. Edited 2 times in total.

Reply 166 of 212, by root42

Posted on 2020-07-26, 13:00

root42 Offline

Rank l33t

Rank: l33t
Posts: 2073
Joined: 2018-01-27, 13:23
Location: Germany

Will check out your changes later. That include path... the epitome of unportable! 😀 You know there are include directives for the compiler? 😀
I will also try to fix the texture problem. Different cards have different native texture formats (e.g. ARGB vs. RGBA) and you have to use the right one or else the texture data will have to be converted before being uploaded to the device. The textures allow us to scale the window arbitrarily.

YouTube and Bonus
80486DX@33 MHz, 16 MiB RAM, Tseng ET4000 1 MiB, SnarkBarker & GUSar Lite, PC MIDI Card+X2+SC55+MT32, OSSC

Reply 167 of 212, by Predator99

Posted on 2020-07-26, 13:59

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

root42 wrote on 2020-07-26, 13:00:

Will check out your changes later. That include path... the epitome of unportable! 😀 You know there are include directives for the compiler? 😀

Lol...I know its ugly but I am happy to have it running at all 😀 Would also like to upload a EXE but I am getting an error with the -static option.

Program is great...its running since my last post in Fullscreen-Mode...and running...and running... 😀

All readers should order their Analyzer...NOW 😉

Real-Time quality at 16MHz..:

Reply 168 of 212, by Predator99

Posted on 2020-07-26, 17:06

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

So this is the Windows-EXE and another demo file. To start, extract all files in a folder and type at the command prompt:

type keen-16MHZ.bin | ega-c-320-16MHZ.exe

The demo is 60 seconds long. If your PC can process it faster than that you will also be able to run it in real-time directly from the logic analyzer.

Attachments

Filename

Keen-16MHZ.part001.rar

File size

4.88 MiB

Downloads

72 downloads

File license

Fair use/fair dealing exception
Filename

ega-c-320-16MHZ.rar

File size

487.36 KiB

Downloads

56 downloads

File license

Fair use/fair dealing exception
Filename

Keen-16MHZ.part003.rar

File size

1.34 MiB

Downloads

53 downloads

File license

Fair use/fair dealing exception
Filename

Keen-16MHZ.part002.rar

File size

4.88 MiB

Downloads

51 downloads

File license

Fair use/fair dealing exception

Reply 169 of 212, by imi

Posted on 2020-07-26, 18:29

imi Offline

Rank l33t

Rank: l33t
Posts: 2800
Joined: 2019-06-16, 13:46
Location: europe

Predator99 wrote on 2020-07-26, 13:59:

All readers should order their Analyzer...NOW 😉

already did a while ago... seems to be stuck in customs since 2 weeks ^^

looking good :3

Reply 170 of 212, by Deksor

Posted on 2020-07-26, 20:41

Deksor Offline

Rank l33t

Rank: l33t
Posts: 3388
Joined: 2016-06-07, 14:37

Still no aspect ratio correction available ? It'd be nice to have that 😁

Also does it still need a beefy CPU or can a raspberry pi run it ?

Trying to identify old hardware ? Visit The retro web - Project's thread The Retro Web project - a stason.org/TH99 alternative

Reply 171 of 212, by Predator99

Posted on 2020-07-26, 20:59

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

You can chosse whatever aspect ratio you like. Yes, strong CPU required. My i7-4790 is very borderline, it often interrupts when trying to scale the window, but it works. Hope it will get better with the improvement root42 announced.

So this is the same for 640x350 at 16MHZ. Quite looking OK, but screenshots are ugly. View Demo with

type 640x350-16MHZ.bin | ega-c-640-16MHZ

With the 640 program you can the see the BIOS screen, use DOS and most text based programs. When starting a game you need to switch to the 320 Program. Autodetection shoudl be quite easy to implement, VSYNC ist inverted between the 2 modes. Will follow...
http://minuszerodegrees.net/mda_cga_ega/mda_cga_ega.htm

Filename: ega-c-640-16MHZ.rar
File size: 485.55 KiB
Downloads: 59 downloads
File license: Fair use/fair dealing exception

Filename: 640x350-16MHZ.part001.rar
File size: 4.88 MiB
Downloads: 52 downloads
File license: Fair use/fair dealing exception

Filename: 640x350-16MHZ.part002.rar
File size: 2.87 MiB
Downloads: 50 downloads
File license: Fair use/fair dealing exception

1#include <math.h>
2#include <stdio.h>
3#include <stdlib.h>
4#define SDL_MAIN_HANDLED
5#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-
6
7w64-mingw32\include\SDL2\SDL.h>
8#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-
9
10w64-mingw32\include\SDL2\SDL_surface.h>
11
12
13#include <io.h>
14#include <fcntl.h>
15
16
17
18
19
20#define IMG_WIDTH 640
21#define IMG_HEIGHT 350
22
23#if SDL_BYTEORDER == SDL_BIG_ENDIAN
24static const Uint32 rmask = 0xff000000;
25static const Uint32 gmask = 0x00ff0000;
26static const Uint32 bmask = 0x0000ff00;
27static const Uint32 amask = 0x000000ff;
28#else
29static const Uint32 rmask = 0x00ff0000;
30static const Uint32 gmask = 0x0000ff00;
31static const Uint32 bmask = 0x000000ff;
32static const Uint32 amask = 0xff000000;
33#endif
34
35static Uint32 egapal[64];
36
37void
38init_pal()
39{
40  int i;
41  for( i = 0; i < 64; ++i ) {
42    Uint32 color =
43      (  ((i & (1 << 0)) << 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & bmask)
44      + (((i & (1 << 1)) >> 0) + ((i & (1 << 3)) >> 3)) * (0x55555555 & gmask)
45      + (((i & (1 << 2)) >> 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & rmask)
46      + amask
47      ;
48    printf("%xd ", color);
49    egapal[i] = color;
50  }
51}
52
53inline
54void
55pset(
56  SDL_Surface *surface,
57  unsigned int x,
58  unsigned int y,
59  unsigned char color
60  )

…Show last 134 lines

61{
62  if( x >= IMG_WIDTH || y >= IMG_HEIGHT ) {
63    return;
64  }
65
66  Uint32 *target_pixel = surface->pixels + y * surface->pitch +
67    x * sizeof( *target_pixel );
68  *target_pixel = egapal[color];
69}
70
71int main()
72{
73_setmode (_fileno( stdin ), _O_BINARY );
74
75int x_scaled;  
76int new_frame = 0;
77  unsigned char value, color1;
78  int hsync = 0, vsync = 0;
79  int frame = 0;
80  unsigned int vsyncc = 0, ref_len = 0;
81  unsigned int x = 0, y = 0;
82  SDL_Window *window;
83
84  init_pal();
85  
86  SDL_Init(SDL_INIT_VIDEO);
87  window = SDL_CreateWindow(
88    "SIGROK2EGA",
89    SDL_WINDOWPOS_UNDEFINED,
90    SDL_WINDOWPOS_UNDEFINED,
91    IMG_WIDTH,
92    IMG_HEIGHT,
93    SDL_WINDOW_SHOWN|SDL_WINDOW_OPENGL|SDL_WINDOW_RESIZABLE
94    );
95
96  if (window == NULL) {
97    SDL_Log( "Could not create window: %s", SDL_GetError());
98    SDL_Quit();
99    return 1;
100  }
101
102  SDL_Renderer *ren = SDL_CreateRenderer(window, -1, SDL_RENDERER_ACCELERATED | SDL_RENDERER_PRESENTVSYNC);
103  if (ren == NULL) {
104    SDL_DestroyWindow( window );
105    SDL_Log( "SDL_CreateRenderer Error: %s", SDL_GetError());
106    SDL_Quit();
107    return 1;
108  }
109
110  SDL_Surface *surface =
111    SDL_CreateRGBSurface(
112      0,
113      IMG_WIDTH,
114      IMG_HEIGHT,
115      32,
116      rmask,
117      gmask,
118      bmask,
119      amask
120      );
121  if (surface == NULL) {
122    SDL_Log("SDL_CreateRGBSurface() failed: %s", SDL_GetError());
123    SDL_Quit();
124    return 1;
125  }
126
127  SDL_Texture *tex = SDL_CreateTextureFromSurface(ren, surface);
128  if( tex == NULL ) {
129    SDL_Log( "SDL_CreateTextueFromSurface() failed: %s", SDL_GetError());
130    SDL_Quit();
131    return 1;
132  }
133
134  while(!feof(stdin)) {
135    value = fgetc(stdin);
136    vsync = value & 128;
137    hsync = value & 64;
138    if( vsync != 0 ) {
139      vsyncc = 0;
140      new_frame = 0;
141    } else {
142      vsyncc++;
143      if( vsyncc > 20 ) {
144	vsyncc = 0;
145	y = 0;
146	// this means a new frame?
147	if( !new_frame ) {
148	  new_fram
149e = 1;
150	  frame++;
151	  printf("frame %u\n", frame);
152
153	  SDL_UpdateTexture(tex, NULL, surface->pixels, surface->pitch);
154	  // SDL_RenderClear(ren);
155	  SDL_RenderCopy(ren, tex, NULL, NULL);
156	  SDL_RenderPresent(ren);
157
158	  SDL_Event e;
159	  if (SDL_PollEvent(&e)) {
160	    if (e.type == SDL_QUIT) {
161	      break;
162	    }
163	  }
164	}
165      }
166    }
167    color1 = value & 0x3F;
168 
169int x_scaled=x-75    ;
170int y_scaled = y-3 ;
171
172//if (y>32){
173//if (y<235){
174
175pset(surface, x_scaled, y_scaled, color1);
176
177    x++;
178    if( hsync ) {
179      ref_len++;
180      if( ref_len > 30 && x > 700 ) {
181//	pset(surface, x_scaled, y, 5);
182	y++;
183	x = 0;
184      }
185    } else {
186      ref_len = 0;
187    }
188  }
189
190  SDL_DestroyWindow( window );
191  SDL_Quit();
192
193  return 0;
194}

Reply 172 of 212, by Deksor

Posted on 2020-07-26, 21:40

Deksor Offline

Rank l33t

Rank: l33t
Posts: 3388
Joined: 2016-06-07, 14:37

Well what I meant was perfect 4:3 aspect ratio with the best scaling possible.

Hope root42's idea works too ^^

Trying to identify old hardware ? Visit The retro web - Project's thread The Retro Web project - a stason.org/TH99 alternative

Reply 173 of 212, by Benedikt

Posted on 2020-07-27, 08:39

Benedikt Offline

Rank Oldbie

Rank: Oldbie
Posts: 576
Joined: 2019-02-14, 15:28
Location: Germany

Deksor wrote on 2020-07-26, 20:41:

Still no aspect ratio correction available ? It'd be nice to have that 😁

Also does it still need a beefy CPU or can a raspberry pi run it ?

Using it on a Raspberry Pi would be quite silly, because a Raspberry Pi has plenty of GPIOs and several PLL clock generators.
It wouldn't surprise me if it can synthesize let's say 2x the pixel clock, clock a DMA channel with it and have it read bytes from its GPIO lines via DMA.
The software side would then merely have to decide whether to preserve odd or even samples for any given scan line before writing it to a frame buffer.
It could also feed the result into one of its hardware video encoders.

Reply 174 of 212, by Predator99

Posted on 2020-08-03, 20:54

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

ARE ALL DEVICES SOLD OUT IN THE MEAN TIME?? :-p

Made a major improvement and inserted some spaghetti-code 😉

I implemented the detection of screen modes so I need only one program.

Short description how it works:
The reason that I had to switch the programs between 640 and 320 pixel modes (or exactly: 350 or 200 lines) was
Mode 1 = LINES: 200, H.SYNC: positive at 15.7 kHz, V.SYNC: positive at 60 Hz
Mode 2 = LINES: 350, H.SYNC: positive at 21.85 kHz, V.SYNC: negative at 60 Hz

Therefore the VSYNC is inverted between the modes and the next frame is not detected correctly. I implemented a VSYNC-counter ("mode_det") which sums up all values for "vsync" within a frame. This value is printed and you can see a clear difference when switching modes.

So if it is between 380000-400000 I define its a 320 pixel mode, everything else is 640 for the moment. I think this concept can be enhanced also for all other resolution and it will also help to implement a autodetection of the sigrok sample-rate...

Code looks like shit but it runs and runs and runs... 😉

Only problem at the moment: I define a 640x350 screen. But when switching to 320x200 only part of the screen is used.

Somebody 😉 knows if I can adjust the current window size to match the output..?

1#include <math.h>
2#include <stdio.h>
3#include <stdlib.h>
4#define SDL_MAIN_HANDLED
5#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-w64-mingw32\include\SDL2\SDL.h>
6#include <C:\Program Files (x86)\mingw-w64\i686-8.1.0-posix-dwarf-rt_v6-rev0\mingw32\lib\SDL2-2.0.12\i686-w64-mingw32\include\SDL2\SDL_surface.h>
7
8
9#include <io.h>
10#include <fcntl.h>
11
12
13
14
15
16#define IMG_WIDTH 640
17#define IMG_HEIGHT 350
18
19#if SDL_BYTEORDER == SDL_BIG_ENDIAN
20static const Uint32 rmask = 0xff000000;
21static const Uint32 gmask = 0x00ff0000;
22static const Uint32 bmask = 0x0000ff00;
23static const Uint32 amask = 0x000000ff;
24#else
25static const Uint32 rmask = 0x00ff0000;
26static const Uint32 gmask = 0x0000ff00;
27static const Uint32 bmask = 0x000000ff;
28static const Uint32 amask = 0xff000000;
29#endif
30
31static Uint32 egapal[64];
32
33void
34init_pal()
35{
36  int i;
37  for( i = 0; i < 64; ++i ) {
38    Uint32 color =
39      (  ((i & (1 << 0)) << 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & bmask)
40      + (((i & (1 << 1)) >> 0) + ((i & (1 << 3)) >> 3)) * (0x55555555 & gmask)
41      + (((i & (1 << 2)) >> 1) + ((i & (1 << 3)) >> 3)) * (0x55555555 & rmask)
42      + amask
43      ;
44    printf("%xd ", color);
45    egapal[i] = color;
46  }
47}
48
49inline
50void
51pset(
52  SDL_Surface *surface,
53  unsigned int x,
54  unsigned int y,
55  unsigned char color
56  )
57{
58  if( x >= IMG_WIDTH || y >= IMG_HEIGHT ) {
59    return;
60  }

…Show last 629 lines

61
62  Uint32 *target_pixel = surface->pixels + y * surface->pitch +
63    x * sizeof( *target_pixel );
64  *target_pixel = egapal[color];
65}
66
67int main()
68{
69_setmode (_fileno( stdin ), _O_BINARY );
70
71int x_scaled;  
72int mode=320;
73int mode_det=0;
74int new_frame = 0;
75  unsigned char value, color1;
76  int hsync = 0, vsync = 0;
77  int frame = 0;
78  unsigned int vsyncc = 0, ref_len = 0;
79  unsigned int x = 0, y = 0;
80  SDL_Window *window;
81
82  init_pal();
83  
84  SDL_Init(SDL_INIT_VIDEO);
85  window = SDL_CreateWindow(
86    "SIGROK2EGA",
87    SDL_WINDOWPOS_UNDEFINED,
88    SDL_WINDOWPOS_UNDEFINED,
89    IMG_WIDTH,
90    IMG_HEIGHT,
91    SDL_WINDOW_SHOWN|SDL_WINDOW_OPENGL|SDL_WINDOW_RESIZABLE
92    );
93
94  if (window == NULL) {
95    SDL_Log( "Could not create window: %s", SDL_GetError());
96    SDL_Quit();
97    return 1;
98  }
99
100  SDL_Renderer *ren = SDL_CreateRenderer(window, -1, SDL_RENDERER_ACCELERATED | SDL_RENDERER_PRESENTVSYNC);
101  if (ren == NULL) {
102    SDL_DestroyWindow( window );
103    SDL_Log( "SDL_CreateRenderer Error: %s", SDL_GetError());
104    SDL_Quit();
105    return 1;
106  }
107
108  SDL_Surface *surface =
109    SDL_CreateRGBSurface(
110      0,
111      IMG_WIDTH,
112      IMG_HEIGHT,
113      32,
114      rmask,
115      gmask,
116      bmask,
117      amask
118      );
119  if (surface == NULL) {
120    SDL_Log("SDL_CreateRGBSurface() failed: %s", SDL_GetError());
121    SDL_Quit();
122    return 1;
123  }
124
125  SDL_Texture *tex = SDL_CreateTextureFromSurface(ren, surface);
126  if( tex == NULL ) {
127    SDL_Log( "SDL_CreateTextueFromSurface() failed: %s", SDL_GetError());
128    SDL_Quit();
129    return 1;
130  }
131
132
133
134  while(!feof(stdin)) {
135    value = fgetc(stdin);
136    vsync = value & 128;
137    hsync = value & 64;
138 mode_det=mode_det+vsync;
139
140
141if(mode==640){   
142if( vsync != 0 ) {
143	
144      vsyncc = 0;
145      new_frame = 0;
146    } else {
147      vsyncc++;
148      if( vsyncc > 20 ) {
149	vsyncc = 0;
150	y = 0;
151	// this means a new frame?
152	if( !new_frame ) {
153	  new_frame = 1;
154	  frame++;
155if (mode_det <400000) {if (mode_det > 380000) {printf ("current mode 640 next mode 320");mode=320;}}else {printf("current mode 640 next mode 640");mode=640;}
156printf(" mode_det %u\n", mode_det);
157mode_det=0;
158	  SDL_UpdateTexture(tex, NULL, surface->pixels, surface->pitch);
159	  // SDL_RenderClear(ren);
160	  SDL_RenderCopy(ren, tex, NULL, NULL);
161	  SDL_RenderPresent(ren);
162
163	  SDL_Event e;
164	  if (SDL_PollEvent(&e)) {
165	    if (e.type == SDL_QUIT) {
166	      break;
167	    }
168	  }
169	}
170      }
171    }
172    color1 = value & 0x3F;
173 
174int x_scaled=x-75    ;
175int y_scaled = y-3 ;
176
177//if (y>32){
178//if (y<235){
179
180pset(surface, x_scaled, y_scaled, color1);
181
182    x++;
183    if( hsync ) {
184      ref_len++;
185      if( ref_len > 30 && x > 700 ) {
186//	pset(surface, x_scaled, y, 5);
187	y++;
188	x = 0;
189      }
190    } else {
191      ref_len = 0;
192    }
193  }
194
195
196if(mode==320){   
197if( vsync == 0 ) {
198	
199      vsyncc = 0;
200      new_frame = 0;
201    } else {
202      vsyncc++;
203      if( vsyncc > 20 ) {
204	vsyncc = 0;
205	y = 0;
206	// this means a new frame?
207	if( !new_frame ) {
208	  new_frame = 1;
209//	  frame++;
210if (mode_det <400000) {if (mode_det > 380000) {mode=320;}}else {printf("current mode 320 next mode 640");mode=640;}
211printf(" mode_det %u\n", mode_det);
212mode_det=0;
213	  SDL_UpdateTexture(tex, NULL, surface->pixels, surface->pitch);
214	  // SDL_RenderClear(ren);
215	  SDL_RenderCopy(ren, tex, NULL, NULL);
216	  SDL_RenderPresent(ren);
217
218	  SDL_Event e;
219	  if (SDL_PollEvent(&e)) {
220	    if (e.type == SDL_QUIT) {
221	      break;
222	    }
223	  }
224	}
225      }
226    }
227    color1 = value & 0x3F;
228//fast perfekt int x_scaled = round(319.5/714.5*(x-126));
229//int x_scaled = round(319.5/714.5*(x-126));
230//if (x==174) {int x_scaled = 300;}
231// int x_scaled=x    ;
232int y_scaled = y - 34;
233
234//if (y>32){
235//if (y<235){
236if (x<889) {
237
238if (x<550) {
239if (x>174) {
240
241if (x<359) {
242
243
244if (x<194) {
245if (x>174) {
246if (x==	175	) {pset(surface, 	0	, y_scaled,  color1);}
247if (x==	177	) {pset(surface, 	1	, y_scaled,  color1);}
248if (x==	179	) {pset(surface, 	2	, y_scaled,  color1);}
249if (x==	182	) {pset(surface, 	3	, y_scaled,  color1);}
250if (x==	184	) {pset(surface, 	4	, y_scaled,  color1);}
251if (x==	186	) {pset(surface, 	5	, y_scaled,  color1);}
252if (x==	188	) {pset(surface, 	6	, y_scaled,  color1);}
253if (x==	191	) {pset(surface, 	7	, y_scaled,  color1);}
254if (x==	193	) {pset(surface, 	8	, y_scaled,  color1);}
255}}
256if (x<218) {
257if (x>194) {
258if (x==	195	) {pset(surface, 	9	, y_scaled,  color1);}
259if (x==	197	) {pset(surface, 	10	, y_scaled,  color1);}
260if (x==	200	) {pset(surface, 	11	, y_scaled,  color1);}
261if (x==	202	) {pset(surface, 	12	, y_scaled,  color1);}
262if (x==	204	) {pset(surface, 	13	, y_scaled,  color1);}
263if (x==	206	) {pset(surface, 	14	, y_scaled,  color1);}
264if (x==	209	) {pset(surface, 	15	, y_scaled,  color1);}
265if (x==	211	) {pset(surface, 	16	, y_scaled,  color1);}
266if (x==	213	) {pset(surface, 	17	, y_scaled,  color1);}
267if (x==	215	) {pset(surface, 	18	, y_scaled,  color1);}
268if (x==	217	) {pset(surface, 	19	, y_scaled,  color1);}
269}} 
270if (x>219) {
271if (x<236) {
272if (x==	220	) {pset(surface, 	20	, y_scaled,  color1);}
273if (x==	222	) {pset(surface, 	21	, y_scaled,  color1);}
274if (x==	224	) {pset(surface, 	22	, y_scaled,  color1);}
275if (x==	226	) {pset(surface, 	23	, y_scaled,  color1);}
276if (x==	229	) {pset(surface, 	24	, y_scaled,  color1);}
277if (x==	231	) {pset(surface, 	25	, y_scaled,  color1);}
278if (x==	233	) {pset(surface, 	26	, y_scaled,  color1);}
279if (x==	235	) {pset(surface, 	27	, y_scaled,  color1);}
280}} 
281if (x>237) {
282if (x<261) {
283
284if (x==	238	) {pset(surface, 	28	, y_scaled,  color1);}
285if (x==	240	) {pset(surface, 	29	, y_scaled,  color1);}
286if (x==	242	) {pset(surface, 	30	, y_scaled,  color1);}
287if (x==	244	) {pset(surface, 	31	, y_scaled,  color1);}
288if (x==	247	) {pset(surface, 	32	, y_scaled,  color1);}
289if (x==	249	) {pset(surface, 	33	, y_scaled,  color1);}
290if (x==	251	) {pset(surface, 	34	, y_scaled,  color1);}
291if (x==	253	) {pset(surface, 	35	, y_scaled,  color1);}
292if (x==	255	) {pset(surface, 	36	, y_scaled,  color1);}
293if (x==	258	) {pset(surface, 	37	, y_scaled,  color1);}
294if (x==	260	) {pset(surface, 	38	, y_scaled,  color1);}
295}}
296if (x<283) {
297if (x>261) {
298if (x==	262	) {pset(surface, 	39	, y_scaled,  color1);}
299if (x==	264	) {pset(surface, 	40	, y_scaled,  color1);}
300if (x==	267	) {pset(surface, 	41	, y_scaled,  color1);}
301if (x==	269	) {pset(surface, 	42	, y_scaled,  color1);}
302if (x==	271	) {pset(surface, 	43	, y_scaled,  color1);}
303if (x==	273	) {pset(surface, 	44	, y_scaled,  color1);}
304if (x==	276	) {pset(surface, 	45	, y_scaled,  color1);}
305if (x==	278	) {pset(surface, 	46	, y_scaled,  color1);}
306if (x==	280	) {pset(surface, 	47	, y_scaled,  color1);}
307if (x==	282	) {pset(surface, 	48	, y_scaled,  color1);}
308}}
309if (x<310) {
310if (x>284) {
311if (x==	285	) {pset(surface, 	49	, y_scaled,  color1);}
312if (x==	287	) {pset(surface, 	50	, y_scaled,  color1);}
313if (x==	289	) {pset(surface, 	51	, y_scaled,  color1);}
314if (x==	291	) {pset(surface, 	52	, y_scaled,  color1);}
315if (x==	293	) {pset(surface, 	53	, y_scaled,  color1);}
316if (x==	296	) {pset(surface, 	54	, y_scaled,  color1);}
317if (x==	298	) {pset(surface, 	55	, y_scaled,  color1);}
318if (x==	300	) {pset(surface, 	56	, y_scaled,  color1);}
319if (x==	302	) {pset(surface, 	57	, y_scaled,  color1);}
320if (x==	305	) {pset(surface, 	58	, y_scaled,  color1);}
321if (x==	307	) {pset(surface, 	59	, y_scaled,  color1);}
322if (x==	309	) {pset(surface, 	60	, y_scaled,  color1);}
323}} 
324if (x>310) {
325if (x<332) {
326if (x==	311	) {pset(surface, 	61	, y_scaled,  color1);}
327if (x==	314	) {pset(surface, 	62	, y_scaled,  color1);}
328if (x==	316	) {pset(surface, 	63	, y_scaled,  color1);}
329if (x==	318	) {pset(surface, 	64	, y_scaled,  color1);}
330if (x==	320	) {pset(surface, 	65	, y_scaled,  color1);}
331if (x==	323	) {pset(surface, 	66	, y_scaled,  color1);}
332if (x==	325	) {pset(surface, 	67	, y_scaled,  color1);}
333if (x==	327	) {pset(surface, 	68	, y_scaled,  color1);}
334if (x==	329	) {pset(surface, 	69	, y_scaled,  color1);}
335if (x==	331	) {pset(surface, 	70	, y_scaled,  color1);}
336}} 
337if (x>333) {
338if (x<359) {
339
340if (x==	334	) {pset(surface, 	71	, y_scaled,  color1);}
341if (x==	336	) {pset(surface, 	72	, y_scaled,  color1);}
342if (x==	338	) {pset(surface, 	73	, y_scaled,  color1);}
343if (x==	340	) {pset(surface, 	74	, y_scaled,  color1);}
344if (x==	343	) {pset(surface, 	75	, y_scaled,  color1);}
345if (x==	345	) {pset(surface, 	76	, y_scaled,  color1);}
346if (x==	347	) {pset(surface, 	77	, y_scaled,  color1);}
347if (x==	349	) {pset(surface, 	78	, y_scaled,  color1);}
348if (x==	352	) {pset(surface, 	79	, y_scaled,  color1);}
349if (x==	354	) {pset(surface, 	80	, y_scaled,  color1);}
350if (x==	356	) {pset(surface, 	81	, y_scaled,  color1);}
351if (x==	358	) {pset(surface, 	82	, y_scaled,  color1);}
352}}} else {
353if (x>360) {
354if (x<400) {
355if (x==	361	) {pset(surface, 	83	, y_scaled,  color1);}
356if (x==	363	) {pset(surface, 	84	, y_scaled,  color1);}
357if (x==	365	) {pset(surface, 	85	, y_scaled,  color1);}
358if (x==	367	) {pset(surface, 	86	, y_scaled,  color1);}
359if (x==	369	) {pset(surface, 	87	, y_scaled,  color1);}
360if (x==	372	) {pset(surface, 	88	, y_scaled,  color1);}
361if (x==	374	) {pset(surface, 	89	, y_scaled,  color1);}
362if (x==	376	) {pset(surface, 	90	, y_scaled,  color1);}
363if (x==	378	) {pset(surface, 	91	, y_scaled,  color1);}
364if (x==	381	) {pset(surface, 	92	, y_scaled,  color1);}
365if (x==	383	) {pset(surface, 	93	, y_scaled,  color1);}
366if (x==	385	) {pset(surface, 	94	, y_scaled,  color1);}
367if (x==	387	) {pset(surface, 	95	, y_scaled,  color1);}
368if (x==	390	) {pset(surface, 	96	, y_scaled,  color1);}
369if (x==	392	) {pset(surface, 	97	, y_scaled,  color1);}
370if (x==	394	) {pset(surface, 	98	, y_scaled,  color1);}
371if (x==	396	) {pset(surface, 	99	, y_scaled,  color1);}
372if (x==	399	) {pset(surface, 	100	, y_scaled,  color1);}
373}} 
374 
375
376if (x>400) {
377if (x<422) {
378if (x==	401	) {pset(surface, 	101	, y_scaled,  color1);}
379if (x==	403	) {pset(surface, 	102	, y_scaled,  color1);}
380if (x==	405	) {pset(surface, 	103	, y_scaled,  color1);}
381if (x==	407	) {pset(surface, 	104	, y_scaled,  color1);}
382if (x==	410	) {pset(surface, 	105	, y_scaled,  color1);}
383if (x==	412	) {pset(surface, 	106	, y_scaled,  color1);}
384if (x==	414	) {pset(surface, 	107	, y_scaled,  color1);}
385if (x==	416	) {pset(surface, 	108	, y_scaled,  color1);}
386if (x==	419	) {pset(surface, 	109	, y_scaled,  color1);}
387if (x==	421	) {pset(surface, 	110	, y_scaled,  color1);}
388}} 
389 
390
391if (x>422) {
392if (x<449) {
393
394if (x==	423	) {pset(surface, 	111	, y_scaled,  color1);}
395if (x==	425	) {pset(surface, 	112	, y_scaled,  color1);}
396if (x==	428	) {pset(surface, 	113	, y_scaled,  color1);}
397if (x==	430	) {pset(surface, 	114	, y_scaled,  color1);}
398if (x==	432	) {pset(surface, 	115	, y_scaled,  color1);}
399if (x==	434	) {pset(surface, 	116	, y_scaled,  color1);}
400if (x==	437	) {pset(surface, 	117	, y_scaled,  color1);}
401if (x==	439	) {pset(surface, 	118	, y_scaled,  color1);}
402if (x==	441	) {pset(surface, 	119	, y_scaled,  color1);}
403if (x==	443	) {pset(surface, 	120	, y_scaled,  color1);}
404if (x==	445	) {pset(surface, 	121	, y_scaled,  color1);}
405if (x==	448	) {pset(surface, 	122	, y_scaled,  color1);}
406}}
407if (x<549){
408if (x>449) {
409if (x<471) {
410if (x==	450	) {pset(surface, 	123	, y_scaled,  color1);}
411if (x==	452	) {pset(surface, 	124	, y_scaled,  color1);}
412if (x==	454	) {pset(surface, 	125	, y_scaled,  color1);}
413if (x==	457	) {pset(surface, 	126	, y_scaled,  color1);}
414if (x==	459	) {pset(surface, 	127	, y_scaled,  color1);}
415if (x==	461	) {pset(surface, 	128	, y_scaled,  color1);}
416if (x==	463	) {pset(surface, 	129	, y_scaled,  color1);}
417if (x==	466	) {pset(surface, 	130	, y_scaled,  color1);}
418if (x==	468	) {pset(surface, 	131	, y_scaled,  color1);}
419if (x==	470	) {pset(surface, 	132	, y_scaled,  color1);}
420}}
421if (x>471) {
422if (x<500) {
423if (x==	472	) {pset(surface, 	133	, y_scaled,  color1);}
424if (x==	475	) {pset(surface, 	134	, y_scaled,  color1);}
425if (x==	477	) {pset(surface, 	135	, y_scaled,  color1);}
426if (x==	479	) {pset(surface, 	136	, y_scaled,  color1);}
427if (x==	481	) {pset(surface, 	137	, y_scaled,  color1);}
428if (x==	483	) {pset(surface, 	138	, y_scaled,  color1);}
429if (x==	486	) {pset(surface, 	139	, y_scaled,  color1);}
430if (x==	488	) {pset(surface, 	140	, y_scaled,  color1);}
431if (x==	490	) {pset(surface, 	141	, y_scaled,  color1);}
432if (x==	492	) {pset(surface, 	142	, y_scaled,  color1);}
433if (x==	495	) {pset(surface, 	143	, y_scaled,  color1);}
434if (x==	497	) {pset(surface, 	144	, y_scaled,  color1);}
435if (x==	499	) {pset(surface, 	145	, y_scaled,  color1);}
436}}
437if (x>500) {
438if (x<522) {
439if (x==	501	) {pset(surface, 	146	, y_scaled,  color1);}
440if (x==	504	) {pset(surface, 	147	, y_scaled,  color1);}
441if (x==	506	) {pset(surface, 	148	, y_scaled,  color1);}
442if (x==	508	) {pset(surface, 	149	, y_scaled,  color1);}
443if (x==	510	) {pset(surface, 	150	, y_scaled,  color1);}
444if (x==	513	) {pset(surface, 	151	, y_scaled,  color1);}
445if (x==	515	) {pset(surface, 	152	, y_scaled,  color1);}
446if (x==	517	) {pset(surface, 	153	, y_scaled,  color1);}
447if (x==	519	) {pset(surface, 	154	, y_scaled,  color1);}
448if (x==	521	) {pset(surface, 	155	, y_scaled,  color1);}
449}}
450if (x>523) {
451if (x<550) {
452if (x==	524	) {pset(surface, 	156	, y_scaled,  color1);}
453if (x==	526	) {pset(surface, 	157	, y_scaled,  color1);}
454if (x==	528	) {pset(surface, 	158	, y_scaled,  color1);}
455if (x==	530	) {pset(surface, 	159	, y_scaled,  color1);}
456if (x==	533	) {pset(surface, 	160	, y_scaled,  color1);}
457if (x==	535	) {pset(surface, 	161	, y_scaled,  color1);}
458if (x==	537	) {pset(surface, 	162	, y_scaled,  color1);}
459if (x==	539	) {pset(surface, 	163	, y_scaled,  color1);}
460if (x==	542	) {pset(surface, 	164	, y_scaled,  color1);}
461if (x==	544	) {pset(surface, 	165	, y_scaled,  color1);}
462if (x==	546	) {pset(surface, 	166	, y_scaled,  color1);}
463if (x==	548	) {pset(surface, 	167	, y_scaled,  color1);}
464}}} }}} else {
465if (x<750){
466  if (x<674){
467if (x>550) {
468if (x<572) {
469if (x==	551	) {pset(surface, 	168	, y_scaled,  color1);}
470if (x==	553	) {pset(surface, 	169	, y_scaled,  color1);}
471if (x==	555	) {pset(surface, 	170	, y_scaled,  color1);}
472if (x==	557	) {pset(surface, 	171	, y_scaled,  color1);}
473if (x==	559	) {pset(surface, 	172	, y_scaled,  color1);}
474if (x==	562	) {pset(surface, 	173	, y_scaled,  color1);}
475if (x==	564	) {pset(surface, 	174	, y_scaled,  color1);}
476if (x==	566	) {pset(surface, 	175	, y_scaled,  color1);}
477if (x==	568	) {pset(surface, 	176	, y_scaled,  color1);}
478if (x==	571	) {pset(surface, 	177	, y_scaled,  color1);}
479}} 
480if (x>572) {
481if (x<598) {
482
483if (x==	573	) {pset(surface, 	178	, y_scaled,  color1);}
484if (x==	575	) {pset(surface, 	179	, y_scaled,  color1);}
485if (x==	577	) {pset(surface, 	180	, y_scaled,  color1);}
486if (x==	580	) {pset(surface, 	181	, y_scaled,  color1);}
487if (x==	582	) {pset(surface, 	182	, y_scaled,  color1);}
488if (x==	584	) {pset(surface, 	183	, y_scaled,  color1);}
489if (x==	586	) {pset(surface, 	184	, y_scaled,  color1);}
490if (x==	589	) {pset(surface, 	185	, y_scaled,  color1);}
491if (x==	591	) {pset(surface, 	186	, y_scaled,  color1);}
492if (x==	593	) {pset(surface, 	187	, y_scaled,  color1);}
493if (x==	595	) {pset(surface, 	188	, y_scaled,  color1);}
494if (x==	597	) {pset(surface, 	189	, y_scaled,  color1);}
495}} 
496if (x>599) {
497if (x<623) {
498if (x==	600	) {pset(surface, 	190	, y_scaled,  color1);}
499if (x==	602	) {pset(surface, 	191	, y_scaled,  color1);}
500if (x==	604	) {pset(surface, 	192	, y_scaled,  color1);}
501if (x==	606	) {pset(surface, 	193	, y_scaled,  color1);}
502if (x==	609	) {pset(surface, 	194	, y_scaled,  color1);}
503if (x==	611	) {pset(surface, 	195	, y_scaled,  color1);}
504if (x==	613	) {pset(surface, 	196	, y_scaled,  color1);}
505if (x==	615	) {pset(surface, 	197	, y_scaled,  color1);}
506if (x==	618	) {pset(surface, 	198	, y_scaled,  color1);}
507if (x==	620	) {pset(surface, 	199	, y_scaled,  color1);}
508if (x==	622	) {pset(surface, 	200	, y_scaled,  color1);}
509}} 
510if (x>623) {
511if (x<650) {
512if (x==	624	) {pset(surface, 	201	, y_scaled,  color1);}
513if (x==	627	) {pset(surface, 	202	, y_scaled,  color1);}
514if (x==	629	) {pset(surface, 	203	, y_scaled,  color1);}
515if (x==	631	) {pset(surface, 	204	, y_scaled,  color1);}
516if (x==	633	) {pset(surface, 	205	, y_scaled,  color1);}
517if (x==	635	) {pset(surface, 	206	, y_scaled,  color1);}
518if (x==	638	) {pset(surface, 	207	, y_scaled,  color1);}
519if (x==	640	) {pset(surface, 	208	, y_scaled,  color1);}
520if (x==	642	) {pset(surface, 	209	, y_scaled,  color1);}
521if (x==	644	) {pset(surface, 	210	, y_scaled,  color1);}
522if (x==	647	) {pset(surface, 	211	, y_scaled,  color1);}
523if (x==	649	) {pset(surface, 	212	, y_scaled,  color1);}
524}}
525if (x>650) {
526if (x<674) {
527
528if (x==	651	) {pset(surface, 	213	, y_scaled,  color1);}
529if (x==	653	) {pset(surface, 	214	, y_scaled,  color1);}
530if (x==	656	) {pset(surface, 	215	, y_scaled,  color1);}
531if (x==	658	) {pset(surface, 	216	, y_scaled,  color1);}
532if (x==	660	) {pset(surface, 	217	, y_scaled,  color1);}
533if (x==	663	) {pset(surface, 	218	, y_scaled,  color1);}
534if (x==	665	) {pset(surface, 	219	, y_scaled,  color1);}
535if (x==	667	) {pset(surface, 	220	, y_scaled,  color1);}
536if (x==	669	) {pset(surface, 	221	, y_scaled,  color1);}
537if (x==	671	) {pset(surface, 	222	, y_scaled,  color1);}
538if (x==	673	) {pset(surface, 	223	, y_scaled,  color1);}
539}} }
540
541if (x>675) {
542if (x<699) {
543
544if (x==	676	) {pset(surface, 	224	, y_scaled,  color1);}
545if (x==	678	) {pset(surface, 	225	, y_scaled,  color1);}
546if (x==	680	) {pset(surface, 	226	, y_scaled,  color1);}
547if (x==	682	) {pset(surface, 	227	, y_scaled,  color1);}
548if (x==	685	) {pset(surface, 	228	, y_scaled,  color1);}
549if (x==	687	) {pset(surface, 	229	, y_scaled,  color1);}
550if (x==	689	) {pset(surface, 	230	, y_scaled,  color1);}
551if (x==	691	) {pset(surface, 	231	, y_scaled,  color1);}
552if (x==	694	) {pset(surface, 	232	, y_scaled,  color1);}
553if (x==	696	) {pset(surface, 	233	, y_scaled,  color1);}
554if (x==	698	) {pset(surface, 	234	, y_scaled,  color1);}
555}}
556if (x>699) {
557if (x<724) {
558if (x==	700	) {pset(surface, 	235	, y_scaled,  color1);}
559if (x==	703	) {pset(surface, 	236	, y_scaled,  color1);}
560if (x==	705	) {pset(surface, 	237	, y_scaled,  color1);}
561if (x==	707	) {pset(surface, 	238	, y_scaled,  color1);}
562if (x==	709	) {pset(surface, 	239	, y_scaled,  color1);}
563if (x==	711	) {pset(surface, 	240	, y_scaled,  color1);}
564if (x==	714	) {pset(surface, 	241	, y_scaled,  color1);}
565if (x==	716	) {pset(surface, 	242	, y_scaled,  color1);}
566if (x==	718	) {pset(surface, 	243	, y_scaled,  color1);}
567if (x==	720	) {pset(surface, 	244	, y_scaled,  color1);}
568if (x==	723	) {pset(surface, 	245	, y_scaled,  color1);}
569}}
570if (x>724) {
571if (x<750) {
572if (x==	725	) {pset(surface, 	246	, y_scaled,  color1);}
573if (x==	727	) {pset(surface, 	247	, y_scaled,  color1);}
574if (x==	729	) {pset(surface, 	248	, y_scaled,  color1);}
575if (x==	732	) {pset(surface, 	249	, y_scaled,  color1);}
576if (x==	734	) {pset(surface, 	250	, y_scaled,  color1);}
577if (x==	736	) {pset(surface, 	251	, y_scaled,  color1);}
578if (x==	738	) {pset(surface, 	252	, y_scaled,  color1);}
579if (x==	741	) {pset(surface, 	253	, y_scaled,  color1);}
580if (x==	743	) {pset(surface, 	254	, y_scaled,  color1);}
581if (x==	745	) {pset(surface, 	255	, y_scaled,  color1);}
582if (x==	747	) {pset(surface, 	256	, y_scaled,  color1);}
583if (x==	749	) {pset(surface, 	257	, y_scaled,  color1);}
584}}} else {
585if (x>751) {
586if (x<775) {
587if (x==	752	) {pset(surface, 	258	, y_scaled,  color1);}
588if (x==	754	) {pset(surface, 	259	, y_scaled,  color1);}
589if (x==	756	) {pset(surface, 	260	, y_scaled,  color1);}
590if (x==	758	) {pset(surface, 	261	, y_scaled,  color1);}
591if (x==	761	) {pset(surface, 	262	, y_scaled,  color1);}
592if (x==	763	) {pset(surface, 	263	, y_scaled,  color1);}
593if (x==	765	) {pset(surface, 	264	, y_scaled,  color1);}
594if (x==	767	) {pset(surface, 	265	, y_scaled,  color1);}
595if (x==	770	) {pset(surface, 	266	, y_scaled,  color1);}
596if (x==	772	) {pset(surface, 	267	, y_scaled,  color1);}
597if (x==	774	) {pset(surface, 	268	, y_scaled,  color1);}
598}}
599if (x>775) {
600if (x>775) {
601if (x<800) {
602
603if (x==	776	) {pset(surface, 	269	, y_scaled,  color1);}
604if (x==	778	) {pset(surface, 	270	, y_scaled,  color1);}
605if (x==	781	) {pset(surface, 	271	, y_scaled,  color1);}
606if (x==	783	) {pset(surface, 	272	, y_scaled,  color1);}
607if (x==	785	) {pset(surface, 	273	, y_scaled,  color1);}
608if (x==	787	) {pset(surface, 	274	, y_scaled,  color1);}
609if (x==	790	) {pset(surface, 	275	, y_scaled,  color1);}
610if (x==	792	) {pset(surface, 	276	, y_scaled,  color1);}
611if (x==	794	) {pset(surface, 	277	, y_scaled,  color1);}
612if (x==	796	) {pset(surface, 	278	, y_scaled,  color1);}
613if (x==	799	) {pset(surface, 	279	, y_scaled,  color1);}
614}} 
615if (x>800) {
616if (x<822) {
617if (x==	801	) {pset(surface, 	280	, y_scaled,  color1);}
618if (x==	803	) {pset(surface, 	281	, y_scaled,  color1);}
619if (x==	805	) {pset(surface, 	282	, y_scaled,  color1);}
620if (x==	808	) {pset(surface, 	283	, y_scaled,  color1);}
621if (x==	810	) {pset(surface, 	284	, y_scaled,  color1);}
622if (x==	812	) {pset(surface, 	285	, y_scaled,  color1);}
623if (x==	814	) {pset(surface, 	286	, y_scaled,  color1);}
624if (x==	817	) {pset(surface, 	287	, y_scaled,  color1);}
625if (x==	819	) {pset(surface, 	288	, y_scaled,  color1);}
626if (x==	821	) {pset(surface, 	289	, y_scaled,  color1);}
627}} 
628if (x>822) {
629if (x<849) {
630if (x==	823	) {pset(surface, 	290	, y_scaled,  color1);}
631if (x==	825	) {pset(surface, 	291	, y_scaled,  color1);}
632if (x==	828	) {pset(surface, 	292	, y_scaled,  color1);}
633if (x==	830	) {pset(surface, 	293	, y_scaled,  color1);}
634if (x==	832	) {pset(surface, 	294	, y_scaled,  color1);}
635if (x==	834	) {pset(surface, 	295	, y_scaled,  color1);}
636if (x==	837	) {pset(surface, 	296	, y_scaled,  color1);}
637if (x==	839	) {pset(surface, 	297	, y_scaled,  color1);}
638if (x==	841	) {pset(surface, 	298	, y_scaled,  color1);}
639if (x==	843	) {pset(surface, 	299	, y_scaled,  color1);}
640if (x==	846	) {pset(surface, 	300	, y_scaled,  color1);}
641if (x==	848	) {pset(surface, 	301	, y_scaled,  color1);}
642}}
643if (x>849) {
644if (x<864) {
645if (x==	850	) {pset(surface, 	302	, y_scaled,  color1);}
646if (x==	852	) {pset(surface, 	303	, y_scaled,  color1);}
647if (x==	854	) {pset(surface, 	304	, y_scaled,  color1);}
648if (x==	857	) {pset(surface, 	305	, y_scaled,  color1);}
649if (x==	859	) {pset(surface, 	306	, y_scaled,  color1);}
650if (x==	861	) {pset(surface, 	307	, y_scaled,  color1);}
651if (x==	863	) {pset(surface, 	308	, y_scaled,  color1);}
652
653}}
654if (x>865) {
655if (x<889) {
656
657if (x==	866	) {pset(surface, 	309	, y_scaled,  color1);}
658if (x==	868	) {pset(surface, 	310	, y_scaled,  color1);}
659if (x==	870	) {pset(surface, 	311	, y_scaled,  color1);}
660if (x==	872	) {pset(surface, 	312	, y_scaled,  color1);}
661if (x==	875	) {pset(surface, 	313	, y_scaled,  color1);}
662if (x==	877	) {pset(surface, 	314	, y_scaled,  color1);}
663if (x==	879	) {pset(surface, 	315	, y_scaled,  color1);}
664if (x==	881	) {pset(surface, 	316	, y_scaled,  color1);}
665if (x==	884	) {pset(surface, 	317	, y_scaled,  color1);}
666if (x==	886	) {pset(surface, 	318	, y_scaled,  color1);}
667if (x==	888	) {pset(surface, 	319	, y_scaled,  color1);}
668}}}}}}
669
670    x++;
671    if( hsync ) {
672      ref_len++;
673      if( ref_len > 30 && x > 700 ) {
674//	pset(surface, x_scaled, y, 5);
675	y++;
676	x = 0;
677      }
678    } else {
679      ref_len = 0;
680    }
681  }}
682
683
684
685  SDL_DestroyWindow( window );
686  SDL_Quit();
687
688  return 0;
689}

Reply 175 of 212, by root42

Posted on 2020-08-04, 07:31

root42 Offline

Rank l33t

Rank: l33t
Posts: 2073
Joined: 2018-01-27, 13:23
Location: Germany

Would be good if you could fork my git repo and submit your code into your own repo. That will make an eventual merge and cleanup operation easier than copying from this thread. 😀 Nice work though!

YouTube and Bonus
80486DX@33 MHz, 16 MiB RAM, Tseng ET4000 1 MiB, SnarkBarker & GUSar Lite, PC MIDI Card+X2+SC55+MT32, OSSC

Reply 176 of 212, by Predator99

Posted on 2020-08-04, 10:02

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

Thanks..all based on your nice work..!

Unfortunately I have no idea how git works.... 😉

Do you know how I can resize the window from 640x350 to 320x200 without closing it? I tried
SDL_SetWindowSize(window,320,200);
...but this also scales the content down.

Also played with
SDL_RenderSetLogicalSize(ren, 320,200);
SDL_RenderSetScale(ren, 1,1);
...without success.

Reply 177 of 212, by root42

Posted on 2020-08-04, 11:01

root42 Offline

Rank l33t

Rank: l33t
Posts: 2073
Joined: 2018-01-27, 13:23
Location: Germany

Predator99 wrote on 2020-08-04, 10:02:
Thanks..all based on your nice work..! […]
Show full quote

Thanks..all based on your nice work..!

Unfortunately I have no idea how git works.... 😉

Do you know how I can resize the window from 640x350 to 320x200 without closing it? I tried
SDL_SetWindowSize(window,320,200);
...but this also scales the content down.

Also played with
SDL_RenderSetLogicalSize(ren, 320,200);
SDL_RenderSetScale(ren, 1,1);
...without success.

We probably want to create a second texture for that and set that as the render surface. When I am back from vacation I will have a look.

YouTube and Bonus
80486DX@33 MHz, 16 MiB RAM, Tseng ET4000 1 MiB, SnarkBarker & GUSar Lite, PC MIDI Card+X2+SC55+MT32, OSSC

Reply 178 of 212, by Predator99

Posted on 2020-08-05, 10:01

Predator99 Offline

Rank l33t

Rank: l33t
Posts: 2041
Joined: 2016-12-28, 19:09

Predator99 wrote on 2020-08-03, 20:54:
Short description how it works: The reason that I had to switch the programs between 640 and 320 pixel modes (or exactly: 350 or […]
Show full quote

Short description how it works:
The reason that I had to switch the programs between 640 and 320 pixel modes (or exactly: 350 or 200 lines) was
Mode 1 = LINES: 200, H.SYNC: positive at 15.7 kHz, V.SYNC: positive at 60 Hz
Mode 2 = LINES: 350, H.SYNC: positive at 21.85 kHz, V.SYNC: negative at 60 Hz

Therefore the VSYNC is inverted between the modes and the next frame is not detected correctly. I implemented a VSYNC-counter ("mode_det") which sums up all values for "vsync" within a frame. This value is printed and you can see a clear difference when switching modes.

So if it is between 380000-400000 I define its a 320 pixel mode, everything else is 640 for the moment. I think this concept can be enhanced also for all other resolution and it will also help to implement a autodetection of the sigrok sample-rate...

So this doesnt seem to work as epxected. It seems not to be possible to distinguish between 320x200 and 640x200 resolution based on HSYNC or VSYNC data. Its the same for both resolutions. There are only more pixels per line in 640 mode.
Need another method for this...

Reply 179 of 212, by root42

Posted on 2020-08-05, 10:12

root42 Offline

Rank l33t

Rank: l33t
Posts: 2073
Joined: 2018-01-27, 13:23
Location: Germany

Predator99 wrote on 2020-08-05, 10:01:

So this doesnt seem to work as epxected. It seems not to be possible to distinguish between 320x200 and 640x200 resolution based on HSYNC or VSYNC data. Its the same for both resolutions. There are only more pixels per line in 640 mode.
Need another method for this...

True, the distinction works only for 200 vs. 350 lines modes. 640 and 320 are the same modes just with a different pixel clock. However that’s a signal not available on the EGA connector. You could create a heuristic that tries to figure out the mode, but it will never be perfect.

YouTube and Bonus
80486DX@33 MHz, 16 MiB RAM, Tseng ET4000 1 MiB, SnarkBarker & GUSar Lite, PC MIDI Card+X2+SC55+MT32, OSSC

Main menu

Common searches