When i am trying to send data pic to another pic do i have to use MAX232?
coz i am trying these codes and not working....

'''''''''''''''''''MASTER
include "modedefs.bas"
define CHAR_PACING 100
DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTD
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTD
DEFINE LCD_EBIT 1
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 2000
DEFINE LCD_DATAUS 50
adcon1=7
t1 var word
t1=0
basla:
t1=0
lcdout $fe,1
lcdout "counter"
loop:
if portb.0=0 then goto birinci
goto loop
birinci:
serout porte.0,5,[1,13]
serin porte.1,5,30,gel1,#t1
gel1:
lcdout $fe,1
lcdout "counter",
lcdout $fe,$c0
lcdout "count:",#t1
pause 2000
goto basla
end


''''''''''''''''SLAVE
include "modedefs.bas"
define CHAR_PACING 100
CMCON = 7
TRISA =%11111111
b0 var byte
b0=0
COUNTER var word
COUNTER = 0
b1 var byte
b1 =0
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 3
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 2000
DEFINE LCD_DATAUS 50
sil:
COUNTER=0
lcdout $FE, 1
lcdout "COUNTER"
lcdout $fe,$c0
lcdout "COUNT:"#COUNTER
loop:
serin portb.1,5,10,kontrol,B0
if b0=1 then goto ok
goto kontrol
goto loop
kontrol:
button porta.4 ,0,255,255,b1,1,goster
goto loop
goster:
COUNTER = COUNTER + 1
lcdout $FE, 1
lcdout "COUNTER"
lcdout $fe,$c0
lcdout "COUNT:"#COUNTER
goto loop
ok:
pause 20
serout portb.2,5,[#COUNTER,13]
lcdout $FE, 1
lcdout "COUNTER"
lcdout $fe,$c0
lcdout "COUNT SEND"
pause 1000
GOTO sil
END


SLAVE = 16F628 have a button on porta.4
MASTER=16F877 have a button on portb.0