I need simple code for DS1302 and 18F452.