Yoyo de luces con PIC12F629

En alrededor de 1€ en pequeñas cantidades, el PIC12F629 se sule emplear proyectos pequeños y extraños. El yoyo original fue equipado con 2 LEDs que iluminaban cuando el dispositivo le daba vueltas. He decidido añadir un micro para darle algo de animación extra.

El truco aquí es hacer que trabaje de la unidad sin un interruptor de alimentación. El interruptor de mercurio se coloca de modo que suministra energía cuando la unidad está girando. Después de unos 20 segundos, el PIC se apaga en el modo de suspensión. De esa manera, si el interruptor está todavía accionado, cuando el aparato se deja sobre una superficie, la alimentación no quedará “on”.

El circuito fue diseñado en un circuito pequeño como para caber en el interior. El interruptor de mercurio se monta fuera del tablero para conectar a la batería. La batería que se muestra es un 4,5 voltios hecha de células a partir de una batería de key-fob 12 voltios (menos de 1€ a).

;
;	Yoyo Program
;	8/04 Luhan Monat

	device	pic12f675,intrc_osc,mclre_on,wdt_off

	org	20h

count	ds	2
sumyel	ds	1
sumgrn	ds	1
sumred	ds	1
del0	ds	1
del1	ds	1
del2	ds	1
prn	ds	3

YEL	=	gp.2
RED	=	gp.1
GRN	=	gp.0

	org	0

	goto	start

start	bsf	RP0
	movlw	001000b		;float mclr?
	movwf	gp
	movlw	104
	movwf	OSCCAL
	bcf	RP0
	movlw	7
	movwf	CMCON		;no comparators
	movlw	111
	movwf	prn
	bsf	GP,3		;raise mclr?

	clrf	count
	movlw	20
	movwf	count+1
:nxt	movlw	1
	call	msecs		;basic loop timing
	call	pseudo
	bcf	RED
	bcf	YEL
	bcf	GRN
	btfsc	prn,0
	bsf	RED
	btfsc	PRN,1
	bsf	YEL
	btfsc	PRN,2
	bsf	GRN
	decfsz	count
	goto	:nxt
	decfsz	count+1
	goto	:nxt
	bcf	RED
	bcf	GRN
	bcf	YEL
:hang	sleep			;good nite, Irene.
	goto	:hang

; pseudo random number genretor

pseudo	movf	prn,w
	addwf	prn+1
	movf	prn+1,w
	addwf	prn+2
	bcf	c
	rrf	prn+2
	btfsc	c
	bsf	prn+2,7
	movf	prn+2,w
	addwf	prn
	ret

; milliseconds at 4 mhz

msecs	movwf	del1
:2	movlw	250
	movwf	del0
:3	clrwdt
	decfsz	del0
	goto	:3
	decfsz	del1
	goto	:2
	ret

	end

QED

Fuente: http://mondo-technology.com/index.html