f
Warning: Cannot modify header information - headers already sent by (output started at /home/anderian/ftp/www_forum/db/mysql4.php:1) in /home/anderian/ftp/www_forum/includes/sessions.php on line 548

Warning: Cannot modify header information - headers already sent by (output started at /home/anderian/ftp/www_forum/db/mysql4.php:1) in /home/anderian/ftp/www_forum/includes/sessions.php on line 549

Warning: Cannot modify header information - headers already sent by (output started at /home/anderian/ftp/www_forum/db/mysql4.php:1) in /home/anderian/ftp/www_forum/includes/page_header.php on line 343
And-Tech :: Zobacz temat - Problem z kodem, szybkie pytanie. [BASCOM]

Strona korzysta z plików cookie w celu realizacji usług zgodnie z Politykš prywatnoœci.

Możesz okreœlić warunki przechowywania lub dostępu do cookie w Twojej przeglšdarce lub konfiguracji usługi.

And-Tech Strona Główna And-Tech
Forum firmy And-Tech

FAQFAQ  SzukajSzukaj  UżytkownicyUżytkownicy  GrupyGrupy
RejestracjaRejestracja  ZalogujZaloguj  AlbumAlbum  DownloadDownload

Poprzedni temat «» Następny temat
Problem z kodem, szybkie pytanie. [BASCOM]
Autor Wiadomość
pozzzima123 
pozzzima123

Wiek: 22
Dołączył: 25 Mar 2014
Posty: 1
Skąd: Wodzisław Śląski
Wysłany: Wto Mar 25, 2014 9:37 pm   Problem z kodem, szybkie pytanie. [BASCOM]

Witam. Chcę napisać kod, którego zadaniem będzie:

Kod:
19.1 Ćwiczenie 1 - Krążąca jedynka
Celem ćwiczenia jest napisanie programu, który będzie wysyłał na port takie sygnały, żeby
podłączone do niego diody świeciły w następujący sposób: zapalamy tylko jedna diodę,
następnie czekamy określony czas. Teraz gasimy diodę i zapalamy następną. Znowu czekamy
określony czas i gasimy diodę i zapalamy następną i tak stale. To właśnie jest krążąca jedynka.
Proponuje podpiąć diody do jednego portu, gdyż wtenczas będzie dużo prostszy program.
Jeśli udało ci się już napisać taki program to dopisz jeszcze obsługę prędkości zapalania diod.
Chodzi o to, aby po pojawieniu się stanu niskiego, na którymkolwiek pinie prędkość
przełączania diod zwiększyła się dwukrotnie.
19.2 Ćwiczenie 2 -Krążąca jedynka + LCD
Wykorzystaj poprzedni program do zrobienia krążącej jedynki. Teraz dopisz do programu
obsługę wyświetlacza LCD. Na wyświetlaczu ma się wyświetlać aktualna prędkość
przełączania diod. Dodatkowo 4 przyciski mają dodawać czas:
50,150,250, 350.

U mnie przyciskami jest portd.0, portd.1, portd.3, portd.4.

Kod fajnie się pisze do czasu gdy musze wkomponować w nią obsługę zmiany prędkości(chodzi o ćwiczenie nr2). Procesor nie reaguje na naciśnięcie przycisku, mimo, że ustawiłem warunek w programie. Proszę o pomoc w poprawieniu kodu tak, abym przyciskami mógł dodawać czas do zmiennej a.



Kod:
$regfile = "m8adef.dat"
$crystal = 10000000

Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5
Config Lcd = 16 * 2

Config Pind.0 = Input
Config Pind.1 = Input
Config Pind.3 = Input
Config Pind.4 = Input
Config Pind.5 = Output
Config Pind.6 = Output
Config Pind.7 = Output



Set Portd.0
Set Portd.1
Set Portd.3
Set Portd.4

Set Portd.5
Set Portd.6
Set Portd.7

'powołanie zmiennej Long
Dim A As Long
'przyjęcie wartości początkowej A
A = 1
Do
Cls
If Portd.0 = 1 Or Portd.1 = 1 Or Portd.3 = 1 Or Portd.4 = 1 Then
Cursor Off
Cls
Lcd "Aktualnie:"
Lowerline
Lcd A
Reset Portd.5
'opóźnienie gaszenia diody
Waitms A
Set Portd.5
A = A + A
Lowerline
Lcd A
Reset Portd.6
'opóźnienie gaszenia diody
Waitms A
Set Portd.6
A = A + A
Lowerline
Lcd A
End If
If Portd.0 = 0 Then
A = A + 50
End If
If Portd.1 = 0 Then
A = A + 150
End If
If Portd.3 = 0 Then
A = A + 300
End If
If Portd.4 = 0 Then
A = A + 300
End If
Loop

End
_________________
Byle do przodu!
 
 
     
grzeniu 73 

Dołączył: 11 Mar 2012
Posty: 39
Skąd: Dania
Wysłany: Sob Mar 29, 2014 2:41 pm   

a portd.0 i portd.1 nie masz czasami na stale podpiete do ft232, sory nie dojrzałem ,ze nie używasz naszej plytki
 
     
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group