Ik heb hier een nas staan die s’ nachts af moet. Nu blijft die een 15W verbruiken als hij “af” staat. Daarom heb ik iets ontworpen dat de 230V afschakelt als het vermogen onder een bepaald punt zakt.
Schema:
Print layout:
Foto van de print:
Ik vond dat die 220 Ohm weerstand in de voeding te warm werd en er zo teveel vermogen verloren ging. Daarom heb ik een klein transformatortje ingebouwd.
Het kastje opgehangen en aangesloten:
De code in de pic:
'**************************************************************** '* Project : Standby killer * '* Author : Coenen Stijn [Stynus] * '* Notice : Copyright (c) 2008 ElektronicaStynus.be * '* : All Rights Reserved * '* Date : 15/10/2008 * '* Version : 1.0 * '**************************************************************** Device 12F629 Config INTRC_OSC_NOCLKOUT, WDT_OFF, PWRTE_ON, BODEN_OFF, MCLRE_OFF ALL_DIGITAL TRUE Symbol GPIF = INTCON.0 Symbol GPIE = INTCON.3 Symbol GIE = INTCON.7 Symbol stroom = GPIO.5 Symbol druk = GPIO.3 Symbol ssr = GPIO.2 Symbol LED1 = GPIO.1 Symbol LED2 = GPIO.0 Dim index As Byte ; 76543210 GPIO = %00000000 TRISIO = %11111000 IOC = %00101000 GIE = 0 ;Global Interrupt Enable uitschakelen(!) GPIE = 1 ;GPIO Port change Interrupt Enable inschakelen Clear begin: While 1 = 1 GPIF = 0 Sleep If druk = 0 Then GoTo aan EndIf Wend aan: While 1 = 1 High ssr High LED2 GPIF = 0 Sleep If stroom = 0 Then GoTo uit EndIf If druk = 0 Then GoTo af EndIf Wend uit: While 1 = 1 LED1 = 0 For index = 0 To 5 Toggle LED1 DelayMS 500 If stroom = 1 Then LED1 = 0 GoTo aan EndIf Next Low ssr Low LED2 GoTo begin Wend af: While 1 = 1 LED1 = 0 For index = 0 To 5 Toggle LED1 DelayMS 500 If druk = 1 Then LED1 = 0 GoTo aan EndIf Next Low ssr Low LED2 While druk = 0: Wend DelayMS 2000 GoTo begin Wend End
English 
