in the end i connected both the cap and ldr to gnd but still was not right, so used to following code and seems to work fine

aa var word

trisd.7=0
high portd.7
pause 500
trisd.7=1
loop6:
aa=aa+1
if aa=65000 then aa=aa-1
if portd.7 = 1 then loop6



serout portb.0,n2400,[#aa,13,10]

there is probably a better way to do it, but this seems to work for me