ForoRaspberry.es

Space escribió:Hola, he montado el ventilador de la RPi3 y funciona todo bien, lo único que no consigo es que se pare el ventilador cuando la temperatura es baja.
He puesto la variable MIN_FAN=256 a 0, dejándola así: MIN_FAN=0 y en el log aparece el ventilador al 0%

04-03-17 | 19:02:19 | temp: 39'C | fan: 0% | pause: 15s

pero el ventilador sigue girando, a baja velocidad pero sigue girando.
Alguien que lo tenga funcionando me podría decir si se para el ventilador poniéndolo asi.

Un saludo.

Dawn escribió:

Space escribió:Hola, he montado el ventilador de la RPi3 y funciona todo bien, lo único que no consigo es que se pare el ventilador cuando la temperatura es baja.
He puesto la variable MIN_FAN=256 a 0, dejándola así: MIN_FAN=0 y en el log aparece el ventilador al 0%

04-03-17 | 19:02:19 | temp: 39'C | fan: 0% | pause: 15s

pero el ventilador sigue girando, a baja velocidad pero sigue girando.
Alguien que lo tenga funcionando me podría decir si se para el ventilador poniéndolo asi.

Un saludo.

¿Has probado ha encender la RP sin iniciar el script? Si se pone en marcha el ventilador sin que el script funcione el problema es que tienes el cableado más puesto y el ventilador directo a corriente.

butarda66 escribió:Vale me auto corrijo. Es un NPN solo que los pines van en distinto orden. El que se muestra aquí van :emisor(E),Base(B)y colector (C) y el que tienes tu van:base(B),colector (C) y emisor (E).Ahora aplicando el orden correcto de vería funcionar. Prueba y nos cuentas.

Space escribió:No funciona, hice todas las pruebas posibles y no va, incluso lo monté en una RPi2 y tampoco funciona.
Será porque el ventilador es de 0.15A?

Dawn escribió:

Space escribió:No funciona, hice todas las pruebas posibles y no va, incluso lo monté en una RPi2 y tampoco funciona.
Será porque el ventilador es de 0.15A?

Descarta cosas:

- Has probado el ventilador directo a 5v para comprobar que funcione?

- Has comprobado que la entrada y la salida del transistor está correctamente? no lo habrás intercambiado?

- Te da voltaje el pin 12? Te funciona el script? coge un voltimetro y verifica que el 12 te da tensión con el script en marcha.

Space escribió:Llevo toda la tarde de pruebas y no hay manera de que funcione, por hoy lo dejo aunque ya no se que hacerle.

Hoy compre el 2N3904 (menos mal que compre 2, por que el primero lo soldé y con termoretráctiles :alterado ),

Nada, no funciona

butarda66 escribió:Vale me auto corrijo. Es un NPN solo que los pines van en distinto orden. El que se muestra aquí van :emisor(E),Base(B)y colector (C) y el que tienes tu van:base(B),colector (C) y emisor (E).Ahora aplicando el orden correcto de vería funcionar. Prueba y nos cuentas.

Gracias butarda66, tambien he probado el CBC369 conexionándolo como dices pero tampoco funciona.
Mañana lo intentaré de nuevo.

Un saludo

butarda66 escribió:Perdona por el retraso en responder. si estas utilizando el transistor que pusiste mas arriba(CBC369), mirando tu foto y suponiendo que vemos la parte plana del transistor de frente las conexiones son las siguientes:
la primera patilla(la de la izquierda del todo)va al pin 12 de la placa . La segunda patilla (la del medio) va a masa en la placa. Y la tercera patilla( a la derecha del todo)va al negativo del ventilador.
Un saludo.

Hora de inicio del sistema: 16:54:59
 
          Rangos de temperatura de la CPU en % por tiempo
 
  < 40º ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓ 52% 

40º-50º ▓▓▓▓▓▓▓▓▓▓▓▓▓ 26%

50º-60º ▓▓▓ 7%

60º-70º ▓▓▓▓▓▓ 13%

  > 70º  0%
 
Velocidad media del ventilador: 49%
 
Temperatura mínima alcanzada: 32ºC
Temperatura máxima alcanzada: 64ºC
 
Última lectura: 20:49:16 | temp: 41ºC | ventilador: 39% | pausa: 5s

#!/bin/bash
### BEGIN INIT INFO
# Provides: 		fancontrol
# Required-Start:	$syslog
# Required-Stop:	$syslog
# Default-Start:	2 3 4 5
# Default-Stop:		0 1 6
# Short-Description: 	fancontrol via Hardware
# Description:
#
# Fancontrol via Hardware PWM for RaspberryPi
### END INIT INFO

# Stadistic bar
function graphic()
{
	bar=""
	local cont=$1
	let cont=cont/2
	while [ $cont -gt 0 ]; do
		bar="$bar▓"
		let cont=cont-1
	done
	echo $bar
}


# Limits
MIN_TEMP=25
MIN_TEMP_FAN=35
MAX_TEMP=55
MIN_FAN=256
MAX_FAN=1024

# Start time log
START_TIME=$(date +"%T")

# Variables for stadistics
lt40=0
b4050=0
b5060=0
b6070=0
gt70=0
fan_sum=0
cont=0
temp_max=0
temp_min=100

# Variables for file name
FECHA=$(date +%y%m%d-%H%M%S)
FILE="fancontrol_$FECHA.log"

# Run forever
while [ 1 ]; do

	# What's the CPU temp?
	temp=$(cat /sys/class/thermal/thermal_zone0/temp)
	temp=$((temp/1000))

	if [ $temp -lt $temp_min ]; then
		let temp_min=temp
	fi

	if [ $temp -gt $temp_max ]; then
                let temp_max=temp
        fi

	# What's the CPU speed?
	freq=$(cat /sys/devices/system/cpu/cpu0/cpufreq/scaling_cur_freq)
	freq=$((freq/1000))

	# Variable temperature control
	if [ $temp -gt $MIN_TEMP_FAN  ] && [ $temp -lt $MAX_TEMP ]; then
		fan=$(((temp - MIN_TEMP) * (MAX_FAN - MIN_FAN) / (MAX_TEMP - MIN_TEMP)))
		secs=5

	# Maximum fan RPM
	elif [ $temp -ge $MAX_TEMP ]; then
		fan=$MAX_FAN
		secs=5

	# Minimun fan RPM
	else
		fan=$MIN_FAN
		secs=5
	fi

	# Send fan RPM to fan
        gpio -g mode 18 pwm
        gpio -g pwm 18 $fan

	# Stadistics
	NOW=$(date +"%T")

	if [ $temp -le "40" ]; then
		let lt40=lt40+1
	fi
	if [ $temp -gt "40" ] && [ $temp -le "50" ]; then
		let b4050=b4050+1
	fi
	if [ $temp -gt "50" ] && [ $temp -le "60" ]; then
		let b5060=b5060+1
	fi
	if [ $temp -gt "60" ] && [ $temp -le "70" ]; then
		let b6070=b6070+1
	fi
	if [ $temp -gt "70" ]; then
		let gt70=gt70+1
	fi

	# Show stadistics
	echo " " > $FILE
	echo "Hora de inicio del sistema: $START_TIME" >> $FILE
	echo " " >> $FILE
	let cont=lt40+b4050+b5060+b6070+gt70
	echo "          Rangos de temperatura de la CPU en % por tiempo" >> $FILE
	echo " " >> $FILE
	echo "  < 40º $( graphic $((lt40 * 100 / cont)) 4) $((lt40 * 100 / cont))% " >> $FILE
       	echo "40º-50º $( graphic $((b4050 * 100 / cont)) 2 ) $((b4050 * 100 / cont))%" >> $FILE
	echo "50º-60º $( graphic $((b5060 * 100 / cont)) 3 ) $((b5060 * 100 / cont))%" >> $FILE
	echo "60º-70º $( graphic $((b6070 * 100 / cont)) 5 ) $((b6070 * 100 / cont))%" >> $FILE
	echo "  > 70º $( graphic $((gt70 * 100 / cont)) 1 ) $((gt70 * 100 / cont))%" >> $FILE

	let fan_sum=fan_sum+fan*100/MAX_FAN
	echo " " >> $FILE
	echo "Velocidad media del ventilador: $((fan_sum / cont))%" >> $FILE
	echo " " >> $FILE
	echo "Temperatura mínima alcanzada: $temp_minºC" >> $FILE
	echo "Temperatura máxima alcanzada: $temp_maxºC" >> $FILE

	echo " " >> $FILE
	echo "Última lectura: $NOW | temp: $tempºC | ventilador: $((fan * 100 / MAX_FAN))% | pausa: $secs""s " >> $FILE
	echo " " >> $FILE

	sleep $secs

done
exit 0