Pascal/Turbo Pascal - NECESITO HACER QUE ESTO PARPADEE PERO NOSE COMO :(

 
Vista:

NECESITO HACER QUE ESTO PARPADEE PERO NOSE COMO :(

Publicado por Soy nuevo en esto :c (1 intervención) el 28/01/2021 16:52:58
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
#include <stdio.h>
#include <conio.h>
#include <windows.h>
 void gotoxy(int x,int y){
      HANDLE hcon;
      hcon = GetStdHandle(STD_OUTPUT_HANDLE);
      COORD dwPos;
      dwPos.X = x;
      dwPos.Y= y;
      SetConsoleCursorPosition(hcon,dwPos);
 }
 
 int main()
 {
 
 
      system("color 09");
 
	  gotoxy(38,3);
	  printf("*****       *****");
      gotoxy(37,4);
      printf("*******     *******");
	  gotoxy(36,5);
      printf("*********   *********");
      gotoxy(35,6);
      printf("*********** ***********");
      gotoxy(34,7);
      printf("*************************");
	  gotoxy(34,8);
      printf("*************************");
	  gotoxy(35,9);
      printf("***********************");
      gotoxy(36,10);
      printf("*********************");
      gotoxy(37,11);
      printf("*******************");
      gotoxy(38,12);
      printf("*****************");
      gotoxy(39,13);
      printf("***************");
      gotoxy(40,14);
      printf("*************");
      gotoxy(41,15);
      printf("***********");
      gotoxy(42,16);
      printf("*********");
      gotoxy(43,17);
      printf("*******");
      gotoxy(44,18);
      printf("*****");
      gotoxy(45,19);
      printf("***");
      gotoxy(46,20);
      printf("*");
      getch();
      return 0;
 }
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

NECESITO HACER QUE ESTO PARPADEE PERO NOSE COMO :(

Publicado por Armando Fuenmayor (6 intervenciones) el 03/02/2021 23:12:52
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
uses crt;
 
begin
clrscr();
 
 gotoxy(38,3);
 textColor(Yellow);
write('***** *****');
 
 
gotoxy(37,4); write('******* *******');
gotoxy(36,5); write('********* *********'); gotoxy(35,6); write('*********** ***********'); gotoxy(34,7); write('*************************');	 gotoxy(34,8); write('*************************');
textColor(Blue);
 	 gotoxy(35,9); write('***********************'); gotoxy(36,10); write('*********************'); gotoxy(37,11); write('*******************'); gotoxy(38,12); write('*****************');
 	 textColor(Red);
 	  gotoxy(39,13); write('***************'); gotoxy(40,14); write('*************'); gotoxy(41,15); write('***********'); gotoxy(42,16); write('*********');
 
 
    gotoxy(43,17); write('*******'); gotoxy(44,18); write('*****'); gotoxy(45,19); write('***'); gotoxy(46,20); write('*');
 
readln;
 
 
 
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

NECESITO HACER QUE ESTO PARPADEE PERO NOSE COMO :(

Publicado por David (224 intervenciones) el 07/02/2021 20:56:09
Te equivocaste de foro. Deberías postearlo en el foro de c/c++. De todas formas a ver si alguien te puede contestar.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar