Eric
many thanks!

. I don't know where you find the time. I got fed up of coding the stimulus files. Had hoped to automatate things and writing hundreds of lines such as below did not appeal! Sadly the day job is very time consuming at the moment I want to look at the 16F1827 chips but don't have the time at present. This will be very useful particularly for students.
Have a virtual applaud! The beers are on me if you ever get to StBC. Wyleu was here last week and we had some very interesting discussions
Sean
------------------------------------
configuration for "pic12f683" is
end configuration;
testbench for "pic12f683" is
begin
process is
begin
wait;
end process;
// DQ high for SFR register etc, setup
clk_56: process is
variable clk_56_end: cycle;
begin
wait for 50 ic;
clk_56_end:= 430 ic;
report "DQ high for SFR register etc, setup";
loop
GP2 <= '1';
if clk_56_end - now() < 430 ic then
wait for clk_56_end - now();
else
wait for 430 ic;
end if;
exit when now() >= clk_56_end;
GP2 <= '0';
if clk_56_end - now() < 0 ic then
wait for clk_56_end - now();
else
wait for 0 ic;
end if;
exit when now() >= clk_56_end;
end loop;
GP2 <= '0';
wait;
end process clk_56;
// Long DQ low -Master reset
clk_57: process is
variable clk_57_end: cycle;
begin