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