#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)&#038;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)&#038;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);

}