clr port0.1 ;clock 
nop 
nop 
setb port0.1 
mov c,port0.0