ldi flag,0b00000001
ldi smallth,0
ldi smallth,0
ldi temph,0
ldi tempi,0
rjmp MAIN
RSTTIMER:; reset's counter
ldi tempi,0
out TCNT1H,tempi
ldi tempi,0
out TCNT1L,tempi; RESET timeout timer
ret
WAITMATCH:
ldi temp,0b01000000; очищаем 7 бит
out TIFR,temp
LOOP:
in temp,TIFR; wait for matching flag
sbrc flag,2
rjmp LOOPT
in tempi, TCNT1H; сравнение старш. частей текущ. вр. и 1/4 пер.
ср timeh,temp1
breq Р
in tempi, TCNT1H
cp timeh,tempi
brio EXIT
LOOPT:; идем сюда из диодов, так как нам не надо сравнивать текущ. вр. с вр. тек. + 1/4 пер
sbrs temp,6
rjmp LOOP
EXIT:
ret
P:; сравнение младш частей
in temp1, TCNT11
cp temp1,time1
brio LOOP
ldi flag,1
cp tempi,time2
brge EXIT
DIV:; divide in 4
sec
clс
ror temph
ror temp1
clс
ror temph
ror tempi ret
FIRSTOPT:; process the first diode
sbi PORTB,3; light the diode
in tempi,TCNT11
in temph,TCNT1H
add tempi,period1
adc temph,periodh
out OCR1AH,temph; put the time of maching
out OCR1AL,temp1
ldi flag,0b00000100
rcall WAITMATCH; wait match
cbi PORTB,3;extinguish the diode
ldi flag,0
ret
WAIT0:; wait falling
rcall RSTTIMER
cbi PORTB, 4; init
mov timeh,periodh
mov timel,period1
WT:
rcall SMALLPULSES1 sbrs
flag,0
rjmp WT
ldi flag,0
ret
SMALLPULSES1:;forms the intermediate pulses
sbi PORTB,3; light the diode
ldi smallperiod1,low(SMALLPERIODO); put Initial frequency for intermediate pulses for 0
ldi smallperiodh,high(SMALLPERIODO)
add smallt1,smallperiod1
dc smallth,smallperiodh
out OCR1AH,smallth; put the time of maching
out OCR1AL,smallt1
rcall WAITMATCH
sbrc flag,0
rjmp EX
cbi PORTB,3/extinguish the diode
ldi smallperiodl,low(SMALLPERIOD1); put Initial frequency for intermediate pulses for 1
ldi smallperiodh,high(SMALLPERIOD1)
add smallt1,smallperiod1
adc smallth,smallperiodh
out OCR1AH,smallth; put the time of maching
out 0CR1AL,smalltl
rcall WAITMATCH
EX:
ret
WAIT1:; wait raising
in time1,TCNT11; init
in timeh,TCNT1H
add time1,period1
adc timeh,periodh
in smallt1, TCNT11
in smallth, TCNT1H
W1:
rcall SMALLPULSES2
sbrs flag,0
rjmp W1
ldi flag,0
ret
SMALLPULSES2:;forms the intermediate pulses
sbi PORTB,4; light the diode
ldi smallperiod1,low(SMALLPERIOD0); put Initial frequency for intermediate pulses for 0
ldi smallperiodh,high(SMALLPERIOD0)
add smallt1,smallperiod1
adc smallth,smallperiodh
out OCR1AH,smallth; put the time of maching
out OCR1AL,smallt1
rcall WAITMATCH
sbrc flag,0
rjmp EX1
cbi PORTB,4/extinguish the diode
ldi smallperiod1,low(SMALLPERIOD1); put Initial frequency for intermediate pulses for 1
ldi smallperiodh,high(SMALLPERI0D1)
add smallt1,smallperiod1
adc smallth,smallperiodh
out OCR1AH,smallth; put the time of maching
out OCR1AL,smallt1
rcall WAITMATCH
EX1:
ret
SECONDOPT:; process the second diode
sbi P0RTB,4; light the diode
in temp1,TCNT11
in temph,TCNT1H
add temp1,period1
adc temph,periodh
ldi flag,0b00000100
out OCR1AH,temph; put the time of maching
out OCR1AL,temp1
rcall WAITMATCH; wait match
ldi flag,0
cbi PORTB,4/extinguish the diode
ret
SAVEFAZA:; calculate new period
in temp1,TCNT11
in temph,TCNT1H
rcall DIV
mov period1,temp1
mov periodh,temph
ldi temp1,0
ldi temph,0
ldi smallth,0
ldi smallt1,0
ldi time1,0
ldi timeh,0
ret
MAIN:
sbis ACSR,5;wait rise
rjmp MAIN
sbrs flag,0
rcall SAVEFAZA
ldi flag,0
rcall WAIT0
rcall FIRSTOPT
FALL:
sbic ACSR,5;wait falling
rjmp FALL
rcall WAIT1
rcall SECONDOPT
rjmp MAIN
EXIT
При отсутствие программатора, или контроллера, схему управления можно собрать по другим принципам, в том числе на логических элементах. У нас пока нет таких схем, заходите должно как нибудь появиться.
Мощность отмотки, при С1 = 20 мкф равна примерно 1 Квт. Увеличивая емкость увеличивается и мощность но нужны другие транзисторы VT1. Не забудьте про предохранители.
При настройке лучше использовать С1 = 5 мкф, не электролит.
ЧАСТЬ 4. СПОСОБ «НОЛЬ». ТРЕХФАЗНЫЙ И ОДНОФАЗНЫЙ УЧЕТ.
Описание: Как известно энергия, учитываемая счетчиком, определяется по формуле интеграл по времени U∙I∙cos f. В этом способе изменяем величину U напряжение на обмотке или датчике счетчика. Для этого необходимо отключить нулевой провод от счетчика. Это достигается переламыванием жилы провода, не снимая изоляции. Для того чтобы предотвратить контакт концов жилы можно растянуть изоляцию и через шприц залить в место разрыва клей, герметик… По перемычке синего цвета нормальный ноль подключается к квартире. Так иногда делают электрики при поломке пакетного переключателя, на учет это не влияет. затем в нулевой провод идущий от счетчика к нулевой колодке надо врезать сопротивление 3…15 кОм (зависит от желания, на сколько "снизить" учет и от сопротивления обмотки напряжения счетчика. Мощность сопротивления достаточна 1…3 Вт, надежный контакт тоже не требуется. Врезку можно сделать, разрезав провод, прикрутить сопротивление, все согнуть и хорошо замотать изолентой, чтобы было похоже на обычную скрутку, также хорошо убрать ее с глаз. Изменяя величину сопротивления можно менять погрешность счетчика от 0 до -100 %. Погрешность счетчика в 99.9 % при проверках не проверяется. Двух полюсный индикатор будет показывать, что ноль есть.
Данный способ пригоден абсолютно к любым однофазным счетчикам. Но конечно нужен доступ к проводам, да и определенные навыки надо иметь. В общем, минусов, хватает.
Синим цветом указанны изменения. Данный способ оставляет огромное место для творчества.
Для ЗФ. счетчиков:
Способ основан на следующем принципе:
Обмотки напряжения в трехфазном счетчике активной энергии (в электронных конструкция другая но принцип тот же) включены в звезду, если отключить нейтраль от центра звезды в центре все равно будет результирующий ноль, а если в ее центральную точку подать одну из фаз (на рис. 2 Фазу С) то разница напряжений на концах катушки этой фазы будет равна нулю, а т. к. энергия, учитываемая счетчиком равна интегралу по времени произведения величин тока и напряжения (напряжение = 0) и энергия в этой фазе будет = 0.
Ну а ток же, можно пропускать через измерительный элемент этой фазы любой величины счетчик не будет его учитывать.
Переламываем жилу и далее следим чтоб она не соединилась (изоляция остается целой) провода идущего от нулевой клеммы к счетчику или изолируем в болтовом соединение как на рис 4.
Устанавливаем в щит однополюсный автомат Q желательно на ток не более 1 А и подключаем его как показано на рис. 2. Провод от счетчика до автомата Q лучше как-то спрятать или замаскировать. От автомата Q отводится провод к которому подключается обычная розетка (желательно подальше от щита).
Теперь если автомат Q выключен или включен, но в розетку не чего не включено, счетчик будет работать как раньше, (нормально).
Если же включить автомат Q, а потом включить в ту розетку, какой ни будь электроприбор, к примеру, приемник, лампу накаливания или просто перемычку (далее прибор) (прибор работать не будут) счетчик перестанет учитывать любую нагрузку в фазе, к которой подключена эта розетка в нашем случае фаза С. Теперь вы можете на эту фазу (у нас автомат Q2) навесить всю однофазную нагрузку дома базы… Трехфазная нагрузка же будет учитываться счетчиком, как и раньше, полностью т. к. напряжение на других лучах звезды (не в сети) повысится на корень из трех. В случае проверки даже если вы не выключите автомат Q или прибор из розетки работник Энергосбыта перед проверкой выключит автомат Q. Так как этот способ практически не кому не известен даже в Энергосбыте[224], в случае появления аномалий ни кто не чего не поймет. Ну а если прибор выключен, то и придраться к схеме не возможно.
Возможно, у вас счетчик подключен не по правилам, а именно так: