Procedura na równoległe działanie 2 programów w bascom

Question

Zrobiłem program sterujący 4 urządzeniami i mierzącymi 2 temperatury jednak po dołożeniu tych 2 procedur mierzących temperaturę szybkość reakcji przy wysyłaniu z komputera znacznie spadła (tzn. ze np. wysyłam 1 powinno praktycznie od razu włączyć wejście portb.1, a teraz trwa to sekundę),...

zumek · Answer

Jeśli Twój program wykonuje tylko te zadania o których wspomniałeś , to jest to oczywiście do zrobienia.Trzeba tylko określić priorytety i tak napisać program , by zadania nie kolidowały ze sobą.Krótko mówiąc , trzeba być mistrzem sztuki kompromisów Opisz dokładnie jak to rozwiązałeś, czy wykorzystujesz przerwania (świadomie-jawnie lub nie ) Gdybyś ujawnił swój kod , to byłaby najkrótsza droga do sukcesu Piotrek

Mustela73 · Answer

przeanalizuj co zabiera twojemu programowi tyle czasu.
Najprawdopodobnie czekanie na wynik pomiaru temperatury.
zmien te procedure tak by rozdzielic rzadanie temperatury od jej odczytu.
w miedzy czasie obsluz odczyt danych przychodzacych z komputera.
polecam takze przyjrzenie sie przerwaniom, co pod nie jest podpiete i jak jest obslugiwane.

Pozdrawiam

adamusx · Answer

A na czym Ci bardziej zalezy, na funkcji pomiaru temperatury czy na szybkosci reakcji na sygnal z komputera? Mysle ze temperatura nie zmienia sie zbyt gwaltownie wiec to moze poczekac, a najwiekszy priorytet przeznacz na obsluge danych odbieranych z komp. Jak odczytujesz dane z bufora RSa? W przerwaniu czy w okerslonym miejscu programu? Nie pamietam jak to jest w Bascomie, ale chyba jest mozliwosc wykorzystania przerwania od UARTA, np bezposrednio po przyjeciu przerwania od UARTa obsluguj sterowanie portami itp.

KanGu · Answer

Juz po części przyśpieszyłem działanie dokładając miedzy dwa odczyty temperatury funkcje odczytu z bufora. teraz to wygląda tak:
Odczyt z bufora
odczyt temperatury 1
Odczyt z bufora
odczyt temperatury 2
Pętla
wcześniej było tak:
Odczyt z bufora
odczyt temperatury 1
odczyt temperatury 2
Pętla

jednak nadal jak dla mnie czas reakcji jest za długi


1wreset
1wwrite Skip_rom
1wwrite Convert
[b]Waitms 800[/b]
1wreset
1wwrite Skip_rom
1wwrite Read_sp

Tak wygląda kod odczytu temperatury odbywa się on oddzielnie na 2 portach gdyż chciałem maksymalnie uprościć całość w sumie nigdzie indziej nie ma procedur opóźniających a te 800ms jednak robi swoje czy istnieje możliwość żeby to jeszcze bardziej uprościć (próbowałem dać mniejszy czas ale nie odczytuje temp)

PS. czy zmieniłoby to cos jesli dałbym kwarc 16Mhz zamiast 8?

mam pomysł porozdzielam te opóźnienia na 4x200ms i powrzucam miedzy nie odczyt z bufora

juz chyba 10 raz to edytuje ^^
Sprawdzone idzie jak burza

euromatic · Answer

zamiast opóźnienia daj zmienną i zliczaj czas ( pętle) jak poniżej
Do
Waitms 10
Call Analogi

Loop

Sub Analogi

'============================================= odczyt temperatury ds
Incr Licznik_ds

If Licznik_ds = 1 Then
1wreset
1wwrite &HCC : 1wwrite &H44
End If

If Licznik_ds = 100 Then
1wreset
1wwrite &HCC
1wwrite &HBE
Bd(1) = 1wread(9)
1wreset
T1 = Makeint(bd(1) , Bd(2))
'If T1 < 0 Then : Temp_znak = 0 : Else : Temp_znak = 1 : End If
'T1 = Abs(t1)
T1 = T1 * 10 : T1 = T1 / 16

Licznik_ds = 0

End If

End Sub

polik80 · Answer

Przywracam to forum do życia, bo mam problem podobny do tego z tematu. jak zrobić chociażby migającą diodę (programowo migającą), tak żeby nie wpływała na prędkość wykonywania programu, albo robiła to w nieznacznym stopniu.
Wiem że mogę urzyć wait 1 ale to strasznie spowolni mi program

Samuraj · Answer

To proste, wykorzystaj timer. Ustaw tak jeden z timerów aby generował przerwanie np. co 1s a w obsłudze przerwania tego timera zmieniaj stan diody na przeciwny. I ot to cała filozofia.

Procedura na równoległe działanie 2 programów w bascom

Post #1

Post #2

Post #3

Post #4

Post #5

Post #6

Post #7

Post #8

Podsumowanie tematu