Data storage by SPI on 18F452s

[AdamkT1]

Friends,
I am trying to save data in the EPROM memory of 18f452. The code is very simple which I copied from CCS examples.
One 18F452 is acting as a master and the other 18F452 is emulating 9356 EPROM.
I am trying to write to an address and then read from the same address.
Later, I would put the data on a port for display/debug purpose.
The problem, I am having in Proteus is the following message.

[PIC18] PC=0X0000 $MCLR$ is Low. Processor is in Reset U2(SLAVE)
[PIC18] PC=0X0000 $MCLR$ is Low. Processor is in Reset U2(MASTER)
Does it mean that I have to power the MCLR pin.

Both the codes, the master/slave is pasted below.

'===============U2(SLAVE)====================
#include <18F452.h>
#fuses HS,NOWDT,NOPROTECT,NOLVP
#use delay(clock=20000000)
#use rs232(baud=9600, xmit=PIN_C1, rcv=PIN_C0)

int8 memory[80], data, instr, address;

/*
void write_data(void)
PURPOSE: Reads data from SPI and writes it to memory
PARAMS: none
RETURNS: None
*/
void write_data(void)
{
while(!spi_data_is_in());

data = spi_read();

if(address >= 0 || address <= 80)
{
memory[address] = data;
}
}

/*
BYTE read_data(void)
PURPOSE: To read the memory
PARAMS: none
RETURNS: Data stored in memory
*/
BYTE read_data(void)
{
return (memory[address]);
}

/*
void main(void)
PURPOSE: Peripheral Initialization
*/
void main(void)
{
setup_spi(spi_slave | spi_h_to_l | spi_ss_disabled);

while(true)
{
while(!spi_data_is_in());
instr = spi_read();

while(!spi_data_is_in());
address = spi_read();

if (instr == 0x18)
{
instr = spi_read(memory[address]);
}
else if(instr == 0xa)
{
write_data();
}
}
}


'==============U1(Master)==========================

#include <18F452.h>
#fuses HS,NOWDT,NOPROTECT,NOLVP
#use delay(clock=20000000)
#use rs232(baud=9600, xmit=PIN_A0, rcv=PIN_A1)

#include <9356spi.c>
BYTE PORT_A;

void main()
{
int8 value;
EEPROM_ADDRESS address;

address=1;

init_ext_eeprom();

do
{
WRITE_EXT_EEPROM( address, 35 );
value=READ_EXT_EEPROM( address );
PORT_A=value;
delay_ms(500);
PORT_A=0;

} while (TRUE);
}
'======================Code End==================
Thanks.

[ckielstra]

When posting code please use the 'code' buttons to preserve formatting.

[AdamkT1]

Hi friends,

Still having troubles with SPI between two 18F452s. The slave is emulating 9356 EEPROM.
Below is the modified code. I hope somebody would help me solve this problem.
The error(s):
1) In Proteus, the error is : [PIC18 MSSP] PC=0X0052 MSSP slave mode with no SS pin control and CKE==1 is ambiguous U2(SLAVE)
2) Data does not show up on PORTB as I intend to. In fact nothing happen to the PORT.