www.elektronik.si :: Poglej temo

www.elektronik.si
Forum o elektrotehniki in računalništvu

Pomoč

Išči

Seznam članov

Skupine

Statistika

Album

Filemanager

DocDB

Povezave

Registriraj se

Pravila

Bolha

Priponke

Koledar

Zapiski

Tvoj profil

Prijava za pregled zasebnih sporočil

Prijava

Bascom in težave

www.elektronik.si Seznam forumov -> AVR, LPC900, x51

Poglej prejšnjo temo :: Poglej naslednjo temo

Avtor

Sporočilo

JamesQ
Član
Član

Pridružen-a: Čet 16 Nov 2006 12:05
Prispevkov: 362
Aktiv.: 1.60
Kraj: Novo mesto/Ljubljana

Objavljeno: Tor Jul 27, 2010 8:44 pm Naslov sporočila: Bascom in težave

Lepo pozdravljeni.

V službi me je sodelavec prosil, če mu naredim en enostaven krmilnik za ventil, ki bo izpiral neko posodo. Ker imam na razpolago nekaj AVRjev sem se odločil da bom logiko spisal kar v Bascomu, ki je relativno enostaven.

Koda:

$regfile = "m324pdef.dat"
$crystal = 20000000

Config Com1 = 19200 , Synchrone = 0 , Parity = Odd , Stopbits = 1 , Databits = 8 , Clockpol = 0
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc

Config Pind.5 = Input
Config Pinc.1 = Input
Config Pinc.2 = Input
Config Pinc.3 = Input

Ddrc = 0

Portc.0 = 1
Portc.1 = 1
Portc.2 = 1
Portc.3 = 1

Tipka0 Alias Pinc.0
Tipka1 Alias Pinc.1
Tipka2 Alias Pinc.2
Tipka3 Alias Pinc.3

Dim W As Word

Do

Debounce Tipka0 , 0 , P0 , Sub

Debounce Tipka1 , 0 , P1 , Sub

Debounce Tipka2 , 0 , P2 , Sub

Debounce Tipka3 , 0 , P3 , Sub

Loop

End

P0:
W = Getadc(0)
Print "Channel " ; 0 ; " value " ; W
Return

P1:
W = Getadc(1)
Print "Channel " ; 1 ; " value " ; W
Return

P2:
W = Getadc(2)
Print "Channel " ; 3 ; " value " ; W
Return

P3:
W = Getadc(3)
Print "Channel " ; 3 ; " value " ; W
Return

Rad bi, da mi pristisk tipke prebere vrednost na določenem ADC kanalu in pošlje po UART povezavi. Trenutno še nimam LCDja in si tako pomagam. Delam z doma narjeno testno ploščo na osnovi ATmega324PA.

Kodo prevajalnik lepo prevede brez napak. Problem je, da nikakor ne dela.

Za foro sem še pomeril napetost na PORTC.0-3, kjer se nahajajo tipke. Napetost je cca. 1.75V. JTAG je onemogočen. Lepo prosim za pomoč.

PS: opazil sem, da mi v drugi kodi ADC= ves čas pošilja vrednost 417, neglede na to koliko napetost med 0 in 5V pritisnem nanj. Je možno, da je IC fuč?

Najlepša hvala.

LDŽ
_________________
Baje sem inteligentna baraba ... FAE@Silica Slovenia (=

Nazaj na vrh

Pokaži sporočila:

	www.elektronik.si Seznam forumov -> AVR, LPC900, x51	Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Stran 1 od 1

Pojdi na:

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: 494 dni