-// proc_test();
-
- a = ser_getchar(host_port1);
-
- if(a == 49)
- PIOA_CODR = 0x0000000F;
- if(a == 50)
- {
- PIOA_SODR = 0x0000000A;
- ser_printf(host_port, "%c", a);
- }
-
- if(a == 51)
- PIOA_CODR = 0x0000000F;
- if(a == 52)
- {
- PIOA_SODR = 0x00000005;
- ser_printf(host_port1, "%c", a);
- }
-