ATNEL tech-forum

Re: Odliczanie za pomocą PCF

2013-10-07T21:05:23+01:00

Pewnie że się nadaje. Jak programista dupa to i C nie pomoże.

Statystyki: Napisane przez pikczu — 7 paź 2013, o 21:05

Re: Odliczanie za pomocą PCF

2013-10-07T21:03:00+01:00

No, jest kawał robocizny. Niech mie tera któren jeden powie że bascom się nie nadaje.

Statystyki: Napisane przez matrix — 7 paź 2013, o 21:03

Re: Odliczanie za pomocą PCF

2013-10-07T20:49:52+01:00

Też mi się podoba fajny panel przedni no i fajne też te potencjometry na i2C ad5280 pogrzeb znajdziesz też schemat.

Statystyki: Napisane przez pikczu — 7 paź 2013, o 20:49

Re: Odliczanie za pomocą PCF

2013-10-07T20:38:25+01:00

pikczu napisał(a):

Słabo nasz kolega Sławek chwiali się swoim projektem na tym forum ale za to na innym możesz kolego Piotrze obejrzeć co nie co http://sp-hm.pl/thread-1609-page-4.html

Przyznaję że projekt wygląda zacnie.

Statystyki: Napisane przez matrix — 7 paź 2013, o 20:38

Re: Odliczanie za pomocą PCF

2013-10-07T20:28:32+01:00

Słabo nasz kolega Sławek chwiali się swoim projektem na tym forum ale za to na innym możesz kolego Piotrze obejrzeć co nie co http://sp-hm.pl/thread-1609-page-4.html

Statystyki: Napisane przez pikczu — 7 paź 2013, o 20:28

Re: Odliczanie za pomocą PCF

2013-10-06T15:40:19+01:00

pikczu napisał(a):

w linii nr 8 zmienna jest zwiększana o jeden.
Po czym znowu pętla zaczyna się od nowa wartość zmiennej sekundy znowu zostaje przypisana do zmiennej Licz_lcd_time. Dziej się to wiele razy na sekundę

pikczu napisał(a):

Bitwait to nie za dobre rozwiązanie.
Ale matrix nakierował cię na odpowiednie tory

Z pewnością wiesz Pawle że ja nie używam wait tam gdzie używać go nie należy.
Z tym dodaniem wait i bitwait chciałem spowolnić koledze pętlę by to pokazało mu co jest nie tak.

Statystyki: Napisane przez matrix — 6 paź 2013, o 15:40

Re: Odliczanie za pomocą PCF

2013-10-06T15:15:02+01:00

Bitwait to nie za dobre rozwiązanie.
Ale matrix nakierował cię na odpowiednie tory , dodaj debounce do obsługi tego przycisku albo zrób proste zagnieżdżanie.
Zacznij używać symulatora pomoże Ci to zrozumieć bardzo dużo.
Po za tym ten kod jest bez sensu odpal symulator to zobaczysz.
Przyjmijmy dla zabawy wartość dla zmiennej sekundy 35
Dane 2 lini kodu z zmiennej sekundy przypisują się za każdym po przejściu pętli do zmiennej Licz_lcd_time.
Teraz ta zmienna ma watrość 35
Po czym w linii nr 8 zmienna jest zwiększana o jeden.
Po czym znowu pętla zaczyna się od nowa wartość zmiennej sekundy znowu zostaje przypisana do zmiennej Licz_lcd_time. Dziej się to wiele razy na sekundę
Masz napisaną źle obsługę przycisku, źle przepisujesz wartości ze zmiennej sekundy, za często.

Nie bierzesz pod uwagę w ogóle upływu czasu,
w linii 12 wyświetlasz czas na lcd a w linii 14juz wyświetlasz co innego.
Nie ma prawa to działać.
Zobacz na kod poniżej może Ci coś pomoże.

[syntax=basic4gl]$regfile = "2313def.dat"
$Crystal=4000000
$hwstack=40
$swstack=16
$framesize=32
Dim Sekundy As Byte
Dim Licz_lcd_time As Byte
Declare Sub Lcd_godziny
Dim Sekundy_tmp As Byte
Config Pinb.4 = Input
Portb.4 = 1 ' pull up
Sekundy = 35

Licz_lcd_time = 0
Cls

Do

If Sekundy_tmp <> Sekundy Then
Sekundy_tmp = Sekundy
Incr Licz_lcd_time
End If

If Pinb.4 = 0 Then
Licz_lcd_time = 0

Locate 1 , 7 : Lcd "Lock"
End If
'Incr Licz_lcd_time bez sens
If Licz_lcd_time = 5 Then
Gosub Lcd_godziny
End If
' Locate 4 , 1 : Lcd Licz_lcd_time 'bez sensu totlanie

Loop
End

Sub Lcd_godziny
Cls
Lcd "test"
End Sub[/syntax]

Statystyki: Napisane przez pikczu — 6 paź 2013, o 15:15

Re: Odliczanie za pomocą PCF

2013-10-06T13:07:22+01:00

Po tej części:

[syntax=basic4gl]do
Licz_lcd_time = Sekundy
If Pinb.4 = 0 Then
Licz_lcd_time = 0
Locate 1 , 7 : Lcd "Lock"
End If[/syntax]

wstaw:

[syntax=basic4gl]bitwait Pinb.4, set
waitms 250[/syntax]

I następnie to:

[syntax=basic4gl]Incr Licz_lcd_time
If Licz_lcd_time = 5 Then
Gosub Lcd_godziny
End If
Locate 4 , 1 : Lcd Licz_lcd_time
Loop[/syntax]

I powiedz czy działa. Jeśli działa a na 99% będzie to zastanów się czemu tak się dzieje? Spróbuj wyciągnąć jakieś wnioski.

Statystyki: Napisane przez matrix — 6 paź 2013, o 13:07

Odliczanie za pomocą PCF

2013-10-06T10:40:27+01:00

Witam,

mam problem z zerowanie licznika w pętli ... po prostu mi go nie zeruje a ma to robić za każdym naciśnięciem pinb4 co jest grane [syntax=basic4gl]do
Licz_lcd_time = Sekundy
If Pinb.4 = 0 Then
Licz_lcd_time = 0

Locate 1 , 7 : Lcd "Lock"
End If
Incr Licz_lcd_time
If Licz_lcd_time = 5 Then

Gosub Lcd_godziny
End If
Locate 4 , 1 : Lcd Licz_lcd_time
Loop[/syntax]

Statystyki: Napisane przez slawek3000 — 6 paź 2013, o 10:40