ATNEL tech-forum

Re: Załączanie kolejno każdej diody

2014-10-07T11:53:33+01:00

Niveasoft napisał(a):

Numer pinu może być od czegoś zależny(może być zmienną) i zmieniany podczas pracy programu. Ten prosty przykład zapala po kolei diody. "Serce" to trzy linijki. Reszta tylko dla wizualizacji powtórki.

[syntax=basic4gl]Config PORTD = Output
PORTD = 255

Dim N As Byte

Do
For N = 0 To 7
Reset PORTD.(n)
Wait 1
Next

Wait 1
PORTD = 255
Wait 1
Loop[/syntax]

W tym przykładzie zapalane są kolejno diody.
Wg mojego założenia dioda na 0 miała być zapalana oddzielnie, zaś od 1-7 w zależności od naciśnięcia przycisku.
Dlatego pętla For .. Next nie mogła być brana pod uwagę.
Dodatkowo ilość zapalanych diod miała ścisły związek z wyznaczonym czasem działania urządzenia.

Statystyki: Napisane przez LA72 — 7 paź 2014, o 11:53

Re: Załączanie kolejno każdej diody

2014-10-06T17:41:17+01:00

LA72 napisał(a):

C mnie na razie jakoś mniej lubi.

ale za to bluebook Cie polubi

Statystyki: Napisane przez programek — 6 paź 2014, o 17:41

Re: Załączanie kolejno każdej diody

2014-10-06T17:36:29+01:00

Jako, że oprogramowanie pisałem w Bascom:
[syntax=basic4gl]Config Pind.0 = Output 'linia PB0 jako wyjściowa
Config Pind.1 = Output 'linia PB1 jako wyjściowa
Config Pind.2 = Output 'linia PB2 jako wyjściowa
Config Pind.3 = Output 'linia PB3 jako wyjściowa
Config Pind.4 = Output 'linia PB4 jako wyjściowa
Config Pind.5 = Output 'linia PB5 jako wyjściowa
Config Pind.6 = Output 'linia PB6 jako wyjściowa
Config Pind.7 = Output 'linia PB7 jako wyjściowa

D1 Alias Portd.0 'przypisanie nazwy dla diody 1
D2 Alias Portd.1 'przypisanie nazwy dla diody 2
D3 Alias Portd.2 'przypisanie nazwy dla diody 3
D4 Alias Portd.3 'przypisanie nazwy dla diody 4
D5 Alias Portd.4 'przypisanie nazwy dla diody 5
D6 Alias Portd.5 'przypisanie nazwy dla diody 6
D7 Alias Portd.6 'przypisanie nazwy dla diody 7
D8 Alias Portd.7 'przypisanie nazwy dla diody 8

dalej w dyrektywie:
...
A = A - 1
Else
... A = A + 1 'zwiększ adres PORTD o 1
End If
Return 'powrót z podprogramu

...: 'podprogram Pr2 do zmniejszania czasów
...
A = A / 2 'obliczenia adresu dla diod przy DEF=0
A = A - 1
...
Else
A = A - 1 'obliczenia adresu dla diod przy DEF<>0
A = A / 2

...:
A = A * 2 'obliczenia adresu dla diod przy DEF=0
A = A + 2
...
Else
A = A * 2 'obliczenia adresu dla diod przy DEF<>0
A = A + 1[/syntax]

C mnie na razie jakoś mniej lubi.

Statystyki: Napisane przez LA72 — 6 paź 2014, o 17:36

Re: Załączanie kolejno każdej diody

2014-10-06T17:24:46+01:00

np tak ??

[syntax=c]#include
#include

// definicje dla preprocesora
#define LED_PIN (1<#define LED_PIN1 (1<#define LED_PIN2 (1<
#define LED_PIN3 (1<#define LED_PIN4 (1<#define LED_PIN5 (1<
#define LED1_ON PORTD &= ~LED_PIN// makrodefinicja – załączenie diody
#define LED1_OFF PORTD |= LED_PIN// makrodefinicja – wyłączenie diody
#define LED2_ON PORTD &= ~LED_PIN1// makrodefinicja – załączenie diody
#define LED2_OFF PORTD |= LED_PIN1// makrodefinicja – wyłączenie diody
#define LED3_ON PORTD &= ~LED_PIN2// makrodefinicja – załączenie diody
#define LED3_OFF PORTD |= LED_PIN2// makrodefinicja – wyłączenie diody

#define LED4_ON PORTD &= ~LED_PIN3// makrodefinicja – załączenie diody
#define LED4_OFF PORTD |= LED_PIN3// makrodefinicja – wyłączenie diody
#define LED5_ON PORTD &= ~LED_PIN4// makrodefinicja – załączenie diody
#define LED5_OFF PORTD |= LED_PIN4// makrodefinicja – wyłączenie diody
#define LED6_ON PORTD &= ~LED_PIN5// makrodefinicja – załączenie diody
#define LED6_OFF PORTD |= LED_PIN5// makrodefinicja – wyłączenie diody
// ********************************************************* 1-sza wersja
int main(void)
{
// ****** inicjalizacja *********

DDRD |= LED_PIN;// kierunek pinu PC7 – wyjściowy
DDRD |= LED_PIN1;
DDRD |= LED_PIN2;
DDRD |= LED_PIN3;
DDRD |= LED_PIN4;
DDRD |= LED_PIN5;

// ****** pętla główna programu *********
while(1)
{
LED1_ON;// zapal diodę
LED2_OFF;
LED3_OFF;
LED4_OFF;
LED5_OFF;
LED6_ON;

_delay_ms(100);// oczekiwanie 1s (1000ms)
LED1_OFF; // zgaś diodę
LED2_ON;
LED3_OFF;
LED4_OFF;
LED5_ON;
LED6_OFF;

_delay_ms(100);// oczekiwanie 1s
LED1_OFF;
LED2_OFF;
LED3_ON;
LED4_ON;
LED5_OFF;
LED6_OFF;

_delay_ms(100);

}
}[/syntax]

Pobaw się kodem

Statystyki: Napisane przez SunRiver — 6 paź 2014, o 17:24

Załączanie kolejno każdej diody

2014-10-05T20:29:55+01:00

Witam.
Jako, że ostatnio przerabiałem toster który posiada regulację czasu pracy z wyświetlaniem poziomów za pomocą 7 diod.

Jak to w praktyce działa.
Dioda nr 1 zaświecana jest całkowicie oddzielnie, zaś diody od 1 do 7.
Schemat:

Problemem na który trafiłem było to, iż nie znalazłem gotowca na obliczenia bitów portu.
Po kilku próbach powstał arkusz z wyliczeniami.

Dzięki temu mogłem poustawiać warunki dla załączania poszczególnych diod 1-7 oraz osobno LED8/9.

Ta mała informacja powyżej nie może się co prawda równać do wideo-poradników kol.Mirka, lecz dla niektórych może okazać się pomocna.

Pozdrawiam
LA

Statystyki: Napisane przez LA72 — 5 paź 2014, o 20:29