How to receive and analyze text via SERIN ?

[Archangel]

Ok, this works, setup for a 16F690 demo board

@ __config _INTRC_OSC_NOCLKOUT & _WDT_ON & _MCLRE_OFF & _CP_OFF  
DEFINE OSC 4

DEFINE DEBUG_MODE  0    ' Debug sending True serial data
DEFINE DEBUG_REG_PORTA  ' Debug Port = PortA as required by PICKIT2 serial Monitor
DEFINE DEBUG_BIT 0      ' Debug.bit = PortA.0
DEFINE DEBUG_BAUD 9600  ' Default baud rate = 9600
DEFINE DEBUGIN_REG PORTA' Debug Port = PortA as required by PICKIT2 serial Monitor 
DEFINE DEBUGIN_BIT 1    ' Debugin bit PortA.1
DEFINE DEBUGIN_BAUD 9600' Default baud rate = 9600
DEFINE DEBUGIN_MODE 0   ' Debugin receiving data true = 0 inverted = 1

ANSEL=0
ANSELH=0
ADCON0 = 0
ADCON1 = 0
;CCP1CON = %10001100 ;Dual PWM 10xx11xx P1A/RC5 P1B/RC4 RC3/AN7 RC2/AN6
TRISA = %00000010           
TRISB = %00000000           
            
portC = 0
TrisC = %00000000
tank var byte[5]
tank = 0



main:
debugin[str tank\5]
PAUSE 30

if (tank[0] = "H") AND (tank[1] = "A") AND (tank[2] = "M") AND (tank[3] = "E") AND (tank[4] = "X")THEN
gosub flash

debug " tank"," ",str tank\5
else


                        

debug " FAIL"
endif


goto main

flash:
portc.0 = 1
pause 500
portc.0 = 0
pause 500
return



end

If HAMEX is sent it flashes the led on portc.0, if anything else, is sent it responds with FAIL