 |
www.elektronik.si Forum o elektrotehniki in računalništvu
|
Poglej prejšnjo temo :: Poglej naslednjo temo |
Avtor |
Sporočilo |
marko11 Član



Pridružen-a: Ned 14 Dec 2003 17:47 Prispevkov: 893 Aktiv.: 3.77 Kraj: Dobrepolje
|
Objavljeno: Ned Maj 04, 2008 6:02 pm Naslov sporočila: Bascom, LCD, izpis |
|
|
Pozdrav
Rad bi izpisoval stanje Stevca na LCD-ju.
Če ga z Gosub Displej pošljem, da izpisuje se pa zanka upočasni, pa ni realno stanje.
Kako napisati program, da bo izpisoval stanje števca z isto hitrostjo kot deluje zanka For-Next ?
LP,marko
Koda: |
For N = 1 To 100
P3.0 = 0
Delay
Delay
P3.0 = 1
Incr Stevec
'Gosub Displej
For J = 1 To 10
Delay
Next J
Next N
|
_________________ Če ne veš kam greš, se ne moreš zgubiti. |
|
Nazaj na vrh |
|
 |
dkone Član

Pridružen-a: Sre 07 Mar 2007 18:53 Prispevkov: 2116 Aktiv.: 9.51 Kraj: Krško
|
Objavljeno: Ned Maj 04, 2008 6:11 pm Naslov sporočila: |
|
|
Probaj takole,takoj za for zanko:
Koda: |
do
for n=0 to 1000
p3.1=0
waitms 50
LCD n
....
.
.
.
loop |
_________________ Denis |
|
Nazaj na vrh |
|
 |
marko11 Član



Pridružen-a: Ned 14 Dec 2003 17:47 Prispevkov: 893 Aktiv.: 3.77 Kraj: Dobrepolje
|
Objavljeno: Ned Maj 04, 2008 6:20 pm Naslov sporočila: |
|
|
Meni se pa zdi, da se najprej izvede zanka For-Next, potem pa šele izpis na lcd.
LP,
_________________ Če ne veš kam greš, se ne moreš zgubiti. |
|
Nazaj na vrh |
|
 |
rudiP Član

Pridružen-a: Tor 07 Avg 2007 15:30 Prispevkov: 1234 Aktiv.: 5.67 Kraj: KOPER
|
Objavljeno: Ned Maj 04, 2008 8:40 pm Naslov sporočila: FOR_NEXT BASCOM |
|
|
v SAMPLES DIREKTORIJU IMAŠ PRIMERE:
For A = 1 To 10
LCD "This is A " ; A
Next A
_________________ Lep pozdrav iz Kopra Rudi |
|
Nazaj na vrh |
|
 |
dkone Član

Pridružen-a: Sre 07 Mar 2007 18:53 Prispevkov: 2116 Aktiv.: 9.51 Kraj: Krško
|
Objavljeno: Ned Maj 04, 2008 8:41 pm Naslov sporočila: |
|
|
Prvo prebere for zanko nato izpiše na LCD. Saj tako sem gledal v simulaciji.
Koda: |
$sim
Config Lcdpin = Pin , Db7 = Portb.7 , Db6 = Portb.6 , Db5 = Portb.5 , Db4 = Portb.4 , E = Portb.2 , Rs = Portb.1
Config Lcd = 16 * 4
Dim N As Byte
N = 0
Cls
Do
For N = 1 To 255
Waitms 500
Locate 1 , 1
Lcd N
Next
Loop |
Opis: |
|
Velikost datoteke: |
573.48 KB |
Pogledana: |
11 krat |

|
_________________ Denis |
|
Nazaj na vrh |
|
 |
dkone Član

Pridružen-a: Sre 07 Mar 2007 18:53 Prispevkov: 2116 Aktiv.: 9.51 Kraj: Krško
|
Objavljeno: Ned Maj 04, 2008 8:43 pm Naslov sporočila: Re: FOR_NEXT BASCOM |
|
|
rudiP je napisal/a: |
v SAMPLES DIREKTORIJU IMAŠ PRIMERE:
For A = 1 To 10
LCD "This is A " ; A
Next A |
Samo moraš imeti med for ter izpisom zakasnitev,drugače ne vidiš kaj sploh dela-prehitro.
_________________ Denis |
|
Nazaj na vrh |
|
 |
pato90 Član

Pridružen-a: Tor 17 Apr 2007 20:16 Prispevkov: 39 Aktiv.: 0.18 Kraj: Logatec
|
Objavljeno: Ned Maj 04, 2008 8:53 pm Naslov sporočila: |
|
|
pa še to v simulatorjih časi niso realni. kažejo tudi tam do sekunde počasneje.
L.P.
|
|
Nazaj na vrh |
|
 |
dkone Član

Pridružen-a: Sre 07 Mar 2007 18:53 Prispevkov: 2116 Aktiv.: 9.51 Kraj: Krško
|
Objavljeno: Ned Maj 04, 2008 8:55 pm Naslov sporočila: |
|
|
pato90 je napisal/a: |
pa še to v simulatorjih časi niso realni. kažejo tudi tam do sekunde počasneje.
L.P. |
Že že,samo ti vidiš kako se dejansko program obnašav v procesorju.
_________________ Denis |
|
Nazaj na vrh |
|
 |
rudiP Član

Pridružen-a: Tor 07 Avg 2007 15:30 Prispevkov: 1234 Aktiv.: 5.67 Kraj: KOPER
|
Objavljeno: Ned Maj 04, 2008 9:43 pm Naslov sporočila: FOR_NEXT BASCOM |
|
|
Za testiranje izpusti LOCATE ukaz , pa boš več videl.
Poskusi z manjšim številom -npr:
Koda: |
FOR X JE 1 TO 16
LCD X
NEXT X
|
Priporočam:Pri pisanju pazi na obliko, tako da bo koda pregledna !
Pri odkrivanju napak je to še kako dobro.
_________________ Lep pozdrav iz Kopra Rudi |
|
Nazaj na vrh |
|
 |
marko11 Član



Pridružen-a: Ned 14 Dec 2003 17:47 Prispevkov: 893 Aktiv.: 3.77 Kraj: Dobrepolje
|
Objavljeno: Pon Maj 05, 2008 6:04 pm Naslov sporočila: |
|
|
Poglejte, prosim, prvi post kjer je napisana koda.
Z "Gosub displej" pošljem da izpise na LCD. Če postavim ta ukaz v zanki, se izvajanje zanke recimo podvoji.
Če pa ukaz "Gosub displej" postavim izven zanke, pa se zanka izvede tako kot je napisano, le da je na LCD-ju samo zadnji izpis.
LP,
_________________ Če ne veš kam greš, se ne moreš zgubiti. |
|
Nazaj na vrh |
|
 |
rudiP Član

Pridružen-a: Tor 07 Avg 2007 15:30 Prispevkov: 1234 Aktiv.: 5.67 Kraj: KOPER
|
Objavljeno: Pon Maj 05, 2008 6:59 pm Naslov sporočila: FOR_NEXT BASCOM |
|
|
V kolikor želiš imeti realen čas se boš moral poigrati z RTC, v kolikor ga tvoj yprocesor ima, ali pa vsaj z časovnimi prekinitvami.
1.Skonfiguriraj timer v časovnem intervalu in načinu kakor želiš
2. v ISR postaviš zastavico
3. ko v Loop-u naletiš na zastavico jo najprej zbrišeš nato pa pošlješ na LCD
stanje naprimer sekund ali stanje nekega števca itd.
Na tak način boš imel dogajanje v realnem času !!
Ne vem ali uporabljaš Bascom ali Bascom AVR ? Bascom avr ima možnost:
Wait (sekund) in Waitms . Oba ukaza zaustavita izvajanje programa.
_________________ Lep pozdrav iz Kopra Rudi |
|
Nazaj na vrh |
|
 |
marko11 Član



Pridružen-a: Ned 14 Dec 2003 17:47 Prispevkov: 893 Aktiv.: 3.77 Kraj: Dobrepolje
|
Objavljeno: Pon Maj 05, 2008 8:39 pm Naslov sporočila: |
|
|
Uporabljam Bascom8051.
Kaj je to, RTC in ISR?
LP,
_________________ Če ne veš kam greš, se ne moreš zgubiti. |
|
Nazaj na vrh |
|
 |
rudiP Član

Pridružen-a: Tor 07 Avg 2007 15:30 Prispevkov: 1234 Aktiv.: 5.67 Kraj: KOPER
|
Objavljeno: Pon Maj 05, 2008 8:54 pm Naslov sporočila: FOR_NEXT BASCOM |
|
|
RTC = REAL TIME CLOCK = URA V REALNEM ČASU = SEKUNDE, MINUTE, URE DNEVI LETA ITD.
ISR = INTERRUPT SERVICE RUTINE. OB SPROŽITVI ČASOVNE ALI ZUNANJE PREKINITVE, SKOČI PROGRAM V ISR KJER IZVEDE NAPISANE UKAZE NATO PA NADALJUJE Z IZVAJANJEM PREKINJENE KODE.
RudiP, prosim ne kriči (piši z malimi črkami).
_________________ Lep pozdrav iz Kopra Rudi |
|
Nazaj na vrh |
|
 |
|
|
Ne, ne moreš dodajati novih tem v tem forumu Ne, ne moreš odgovarjati na teme v tem forumu Ne, ne moreš urejati svojih prispevkov v tem forumu Ne, ne moreš brisati svojih prispevkov v tem forumu Ne ne moreš glasovati v anketi v tem forumu Ne, ne moreš pripeti datotek v tem forumu Ne, ne moreš povleči datotek v tem forumu
|
Uptime: 493 dni
Powered by phpBB © 2001, 2005 phpBB Group
|