Hello Dan,

I took the program and "compressed it" so that it will compile on compilespot.com. Here is the code...
do not add anything to it, and leave off the "End"
do not add spaces, comments, or anything else.

I am assuming the code I copied off that site runs.

It is 899 bytes... compile spot allows 900..

Dwayne



INCLUDE "bs2defs.bas"
r VAR b3
s VAR b4
se VAR PORTA.4
TRISA=$10
TRISB=$00
l:
SerIn se,N2400,[254],r,s
Select Case r
Case 1:
IF s=1 Then
High 0
Else
Low 0
EndIF
Case 2:
IF s=1 Then
High 1
Else
Low 1
EndIF
Case 3:
IF s=1 Then
High 2
Else
Low 2
EndIF
Case 4:
IF s=1 Then
High 3
Else
Low 3
EndIF
Case 5:
IF s=1 Then
High 4
Else
Low 4
EndIF
Case 6:
IF s=1 Then
High 5
Else
Low 5
EndIF
Case 7:
IF s=1 Then
High 6
Else
Low 6
EndIF
Case 8:
IF s=1 Then
High 7
Else
Low 7
EndIF
Case 9:
IF s=1 Then
PORTA.0=1
Else
PORTA.0=0
EndIF
Case 10:
IF s=1 Then
PORTA.1=1
Else
PORTA.1=0
EndIF
Case 11:
IF s=1 Then
PORTA.2=1
Else
PORTA.2=0
EndIF
Case 12:
IF s=1 Then
PORTA.3=1
Else
PORTA.3=0
EndIF
End Select
GoTo l