;clockgen with 12f510
list p=12F510
#include <P12F510.inc>
__CONFIG 0FD9h
errorlevel -302
clk0 equ 10h
clk1 equ 11h
clk2 equ 12h
CounterA equ 15h
CounterB equ 16h
CounterC equ 17h
CounterD equ 18h
org 0x00
goto begin
begin CLRF ADCON0
movlw 0x28
TRIS 06H
rpt clrf GPIO
movlw d'4'
movwf GPIO
movlw D'1' ;1
movwf CounterD
movlw D'1' ;1
movwf CounterC
movlw D'11' ;11
movwf CounterB
movlw D'206' ;206
movwf CounterA
loop1 decfsz CounterA,1
goto loop1
decfsz CounterB,1
goto loop1
decfsz CounterC,1
goto loop1
decfsz CounterD,1
goto loop1
movlw d'3'
movwf GPIO
movlw D'1' ;1
movwf CounterD
movlw D'1' ;1
movwf CounterC
movlw D'11' ;11
movwf CounterB
movlw D'206' ;206
movwf CounterA
loop2 decfsz CounterA,1
goto loop2
decfsz CounterB,1
goto loop2
decfsz CounterC,1
goto loop2
decfsz CounterD,1
goto loop2
goto rpt
END