Witam
Męczę się z tym i mimo że powinno działać coś jest nie tak. Układ detekcji zera jest zrealizowany na pc814 (układ wg pewnej mądrej książki czas całej "szpilki 1,6ms). Układ wykonawczy to MOC3023 + BTA 16. Aby zobaczyć jak to działa bawiłem się z rozjaśnieniem od zera do 100%, i pierwsze 1/3 idzie idealnie następnie strasznie żarówka mruga, wariuje a sama końcówka rozjaśniania idzie znowu ładnie płynnie. Podejrzewam że to coś z moim programem, chociaż wzorowałem się na uruchomionych już przez innych. Kwarc 16000000.
Czas opóźnienia liczyłem sam, a potem wspomagałem się programem MOC z elektrody obliczenia te same, efekt też.
Mój program z ustawieniem 50% mocy:
Męczę się z tym i mimo że powinno działać coś jest nie tak. Układ detekcji zera jest zrealizowany na pc814 (układ wg pewnej mądrej książki czas całej "szpilki 1,6ms). Układ wykonawczy to MOC3023 + BTA 16. Aby zobaczyć jak to działa bawiłem się z rozjaśnieniem od zera do 100%, i pierwsze 1/3 idzie idealnie następnie strasznie żarówka mruga, wariuje a sama końcówka rozjaśniania idzie znowu ładnie płynnie. Podejrzewam że to coś z moim programem, chociaż wzorowałem się na uruchomionych już przez innych. Kwarc 16000000.
Czas opóźnienia liczyłem sam, a potem wspomagałem się programem MOC z elektrody obliczenia te same, efekt też.
Mój program z ustawieniem 50% mocy:
[syntax=basic4gl]
$crystal = 16000000
$regfile = "m32def.dat"
Config Pinc.0 = Output
Triak Alias Portc.0
Reset Portc.0
Config Timer1 = Timer , Prescale = 64
Config Int0 = Rising
Stop Timer1
On Timer1 On_timer1
On Int0 Zero
Enable Timer1
Enable Int0
Enable Interrupts
Do
Loop
On_timer1:
Stop Timer1
Triak = 1
Return
Zero:
Triak = 0
Load Timer1 , 1250
Start Timer1
Return
[/syntax]