.section program;
.global _enable_cycle;
.align 4;

_enable_cycle:
    R0 = SYSCFG;
	BITSET(R0,1);
	SYSCFG = R0;
	rts;

_enable_cycle.end:

.section program;
.global _stop_cycle;
.align 4;

_stop_cycle:
    R0 = SYSCFG;
	BITCLR(R0,1);
	SYSCFG = R0;
	rts;

_stop_cycle.end:

.section program;
.global _clear_cycle;
.align 4;

_clear_cycle:

    R1 = 0(z);
	CYCLES = R1;
	rts;
	
_clear_cycle.end:


.section program;
.global _read_cycle;
.align 4;

_read_cycle:
 
    R0 = CYCLES;
	//R0 = R7;
	rts;
	
_read_cycle.end: