ATNEL tech-forum

Re: Określenie ilości mignięć led

2014-04-05T07:53:49+01:00

Bierzesz timer, uruchamiasz go co 1s i odliczasz 4x3600 czyli 14400

Statystyki: Napisane przez matrix — 5 kwi 2014, o 07:53

Re: Określenie ilości mignięć led

2014-04-04T22:09:45+01:00

MICHAŁ6201 napisał(a):

A wie ktoś z Was jak można odmierzyć długie czasy, np.: stan powiedzmy czuwania przez 4 godziny i jeśli nic się nie zmieni, to po odmierzeniu tego czasu procesor przeszedłby w power down?

Wykorzystaj timer.

Statystyki: Napisane przez kaka0204 — 4 kwi 2014, o 22:09

Re: Określenie ilości mignięć led

2014-04-04T21:10:32+01:00

Zrobiłem już to i działa:)
Dziękuję Wszystkim za zainteresowanie.

A wie ktoś z Was jak można odmierzyć długie czasy, np.: stan powiedzmy czuwania przez 4 godziny i jeśli nic się nie zmieni, to po odmierzeniu tego czasu procesor przeszedłby w power down?

Statystyki: Napisane przez michał6201 — 4 kwi 2014, o 21:10

Re: Określenie ilości mignięć led

2014-03-30T08:47:11+01:00

W tym programiku dioda zmieni stan 5 razy, ale mignie tylko 2 i na końcu będzie się świecić (jeśli była zgaszona na początku)

Statystyki: Napisane przez SylwekK — 30 mar 2014, o 08:47

Re: Określenie ilości mignięć led

2014-03-29T16:27:51+01:00

Także nie za bardzo umiem bascoma, ale wg. mnie powinno to wyglądać tak:

[syntax=basic4gl]For Zmienna = 1 To 5
Toggle Led
Waitms 500
Next Zmienna[/syntax]

Statystyki: Napisane przez kaka0204 — 29 mar 2014, o 16:27

Re: Określenie ilości mignięć led

2014-03-29T17:28:21+01:00

Niestety nie wiem jak to zapisać, a mam książkę Góreckiego, w której niby instrukcja pętli for...next jest opisana, ale chyba tylko zrozumiałe to jest dla autora tej książki :/

Już sobie poradziłem.
Zlicza zarówno 0 jak i 1, więc ustawiłem 1 to 10 i jest ok.
Dziękuję Koledze za pomoc.
Pozdrawiam

Statystyki: Napisane przez michał6201 — 29 mar 2014, o 16:09

Re: Określenie ilości mignięć led

2014-03-29T15:29:49+01:00

MICHAŁ6201 napisał(a):

Macie jakieś pomysły?

Instrukcja FOR

Statystyki: Napisane przez kaka0204 — 29 mar 2014, o 15:29

Określenie ilości mignięć led

2014-03-29T15:15:44+01:00

Witam

Mam taki mały problem z programem, który staram się stworzyć. Chodzi mi o to aby po wejściu do procedury dioda led mignęła dokładnie 5 razy i nastąpił powrót do głównej pętli.

Napisałem to w ten sposób, ale to nie działa. Nie potrafię sobie tego wyobrazić jak miałby wyglądać taki kod zliczający 5 mignięć led.

[syntax=basic4gl]$regfile = "m8def.dat"
$crystal = 1000000

' Konfiguracja portu przycisku on off
Config Portd.3 = Input : Portd.3 = 1 : Sw Alias Pind.3

' Konfiguracja portu LED
Config Portc.3 = Output : Portc.3 = 0 : Led Alias Portc.3

' Konfiguracja portu przekaźnika
Config Portc.2 = Output : Portc.2 = 1 : Pk Alias Portc.2

' konfiguracja bitu pomocniczego
Config Portc.1 = Output : Portc.1 = 1 : X Alias Portc.1

Dim L As Byte
L = 1

' led świeci się, przekaźnik wyłączony
Do

If Led = 1 Then ' jeśli led zgaszona
Debounce Sw , 0 , Wylaczyc , Sub
End If

If Led = 0 Then ' jeśli led świeci
Debounce Sw , 0 , Wlaczyc , Sub
End If

Loop
End

Wlaczyc:
Toggle Led ' led gaśnie
Pk = 0 ' przekaźnik włącza się
Return

Wylaczyc:

Pk = 1

' przekaźnik wyłącza sie
' 5 mignięć led
Toggle Led
Waitms 500
Toggle Led

If Led = 0 Then L
L = L + 1
If L = 5 Then
Led = 0
Return

End If
End[/syntax]

Chodzi mi dokładnie o fragment w procedurze o nazwie "Wylaczyc"

Macie jakieś pomysły?
Z góry dziękuję za pomoc

Statystyki: Napisane przez michał6201 — 29 mar 2014, o 15:15