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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165

#include <iostream.h>
#include <stdlib.h>
#include <dos.h>
#include <stdio.h>
#include <conio.h> 
/*Definimos el puerto serie COM1*/
#define PUERTO 0x3F8
 
/*Declaramos la funcion margen para dibujar la pantalla*/void margen();
 
/*La funcion inicializar se encarga de enviar todos los parametros necesarios para inicializar el puerto*/
void inicializar();
 /*Inicio del programa*/
void main(void)
{
 
   unsigned char TECLA, CH;   int i=3,j=3,m=3,f=14;
   clrscr();
   margen();//llamamos a la funcion margen para que dibuje la pantalla
   gotoxy(3,3);
    inicializar();//llamamos a la funcion inicializar para que prepare al puerto
 
   while (TECLA!=27)//Mientras no presionemos escape...
   {
      if (inportb(PUERTO+5)&1)//      {
         CH=inportb(PUERTO);//guardo en CH el valor que esta en el puerto
         //limpiamos el puerto
         if (CH==13)//preguntamos si el caracter recibido es enter
         {            i=3;
            f++;//controla la posicion del cursor
 
            if (f==23)
            {               window(3,14,77,22);
               delline();
               f=22;
               window(1,1,80,25);
               gotoxy(i,f);            }
         }
         if (CH!=NULL)//preguntamos si el caracter no es nulo
         {
            if(CH=='r')//para que el cursor se mantenga siempre al final            CH='n';
            gotoxy(i,f);printf("%c",CH);//imprimimos el caracter
            i++;
            if (i==78)
            {               i=3;
               f++;
               if (f==23)
               {
                  window(3,14,77,22);                  delline();
                  f=22;
                  window(1,1,80,25);
                  gotoxy(i,f);
               }            }
 
         }
 
      }      if (kbhit())//preguntamos si se presiono alguna tecla
      {
         gotoxy(j,m); //mandamos el cursor al final de cada caracter
         j++;//con j escribimos la palabra
         if (j==78)         {
            j=3;
            m++;
            if (m==13)
            {               window(3,3,77,12);
               delline();
               m=12;
               window(1,1,80,25);
               gotoxy(j,m);            }
         }
         TECLA=getche();//guardamos la tecla presionada
         if (TECLA==13)//preguntamos si la tecla presionada es un enter
         {            gotoxy(3,m+1);printf("");//al apretar enter probocamos un salto de linea
            j=3;
            m++;
            if (m==13)
            {               window(3,3,77,12);
               delline();
               m=12;
               window(1,1,80,25);
               gotoxy(j,m);            }
         }
         if (TECLA!=27)//preguntamos si es distinto de escape
         {
            while(!inportb(PUERTO+5)&1);            outportb(PUERTO,TECLA);//enviamos el caracter al puerto
         }
      }
   }
} 
 
void margen ()
{
  int i; 
  for (i = 1; i < 80; i++) //Dibujamos los margenes
  {
    gotoxy (i, 1); printf ("Û");
    gotoxy (i,24); printf ("Û");  }
 
  for (i = 1; i < 80; i++)
  {
    gotoxy (i, 2); printf ("Ã?");    gotoxy (i,23); printf ("Ã?");
  }
 
  for (i = 1; i < 80; i++)
  {    gotoxy (i,13); printf ("Ã?");
  }
 
  for (i = 2; i < 24; i++)
  {    gotoxy (1 ,i); printf ("Û");
    gotoxy (79,i); printf ("Û");
  }
 
  for (i = 2; i < 24; i++)  {
    gotoxy (2 ,i); printf ("º");
    gotoxy (78,i); printf ("º");
  }
  gotoxy (2 , 2); printf ("É");  gotoxy (2 ,23); printf ("ÃË� ");
  gotoxy (78, 2); printf ("»");
  gotoxy (78,23); printf ("¼");
  gotoxy(3,2);printf("Escribiste:");
  gotoxy(3,13);printf("Recibiste:");  gotoxy(64,24);printf("ESC -> Salir.");
 
}
 
void inicializar(){
   outportb(PUERTO+1,0);//
   outportb(PUERTO+3,0x80);//
   outportb(PUERTO+0,0x0C);//
   outportb(PUERTO+1,0x00);//   outportb(PUERTO+3,0x03);//
   outportb(PUERTO+2,0XC7);
   outportb(PUERTO+4,0X0B);
 
}