Vítejte na Elektro Bastlírn?
Nuke - Elektro Bastlirna
  Vytvořit účet Hlavní · Fórum · DDump · Profil · Zprávy · Hledat na fóru · Příspěvky na provoz EB

Vlákno na téma KORONAVIRUS - nutná registrace


Nuke - Elektro Bastlirna: Diskuzní fórum

 FAQFAQ   HledatHledat   Uživatelské skupinyUživatelské skupiny   ProfilProfil   Soukromé zprávySoukromé zprávy   PřihlášeníPřihlášení 

Atmega8 - posilani hodnot z AD prevodniku do pocitace.

 
Přidat nové téma   Zaslat odpověď       Obsah fóra Diskuzní fórum Elektro Bastlírny -> Programování PIC, ATMEL, EEPROM a dalších obvodů
Zobrazit předchozí téma :: Zobrazit následující téma  
Autor Zpráva
TRT



Založen: Jan 24, 2008
Příspěvky: 10

PříspěvekZaslal: ne únor 15 2009, 1:16    Předmět: Atmega8 - posilani hodnot z AD prevodniku do pocitace. Citovat

Na ATMegu8 mam pripojeny potenciometry na vsech sest AD portu. Potrebuji posilat hodnoty ze vsech AD portu do pocitace skrz RS232. Rozbehl jsem si program, pomoci ktereho umim odecist hodnotu z AD prevodniku a poslat ji do pocitace, kde ji v terminalu zobrazim. Nevim ale, jak poslat vsech 6 hodnot naraz. Muzete mi prosim poradit, jakym zpusobem se vlastne takove veci resi? Dejme tomu, ze kazdy prevodnik mi vytvori trojmistne cislo. Prevodniku mam 6. Otazka je, jak to poslat do pocitace. Jestli jako nejaky dlouhy retezec, ci jak. Dekuji

Zdrojak mam takto, nejspis bude chyba v datovych typech, nebo vubec v cele logice veci.

$regfile = "m8def.dat"
$baud = 115200
$crystal = 7372800

Dim U0 As Word, U5 As Word,U3 As Word, X As Single, Y As Single, Z As Single


Config Serialout = Buffered, Size = 40
Enable Interrupts

Config Adc = Single , Prescaler = Auto , Reference = AVCC

Start Adc
Do
U0 =Getadc(0)
U5= Getadc(5)
U3= Getadc(3)

X = 4.8876 * U0
Y = 4.8876 * U5
Y = 4.8876 * U3

U0 = X
U5 = Y
U3 = Z

Print U0 ; U5 ; U3
Waitms 10

Loop
End
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
nekmil



Založen: Mar 06, 2005
Příspěvky: 787
Bydliště: Havířov

PříspěvekZaslal: ne únor 15 2009, 8:44    Předmět: Citovat

Trochu jsem ten program upravil a vyzkoušel v simulátoru.
V podstatě to máš správně.

$regfile = "m8def.dat"
$baud = 115200
$crystal = 7372800

Dim U0 As Word , U5 As Word , U3 As Word , X As Single , Y As Single , Z As Single

'tohle jsem vyhodil
'Config Serialout = Buffered, Size = 40
'Enable Interrupts

Config Adc = Single , Prescaler = Auto , Reference = Avcc

Start Adc
Do
'Getadc jsem zde nahradil RND jen pro simulaci
U0 = Rnd(1023) ' Getadc(0)
U5 = Rnd(1023) ' Getadc(5)
U3 = Rnd(1023) ' Getadc(3)

X = 4.8876 * U0
Y = 4.8876 * U5
Z = 4.8876 * U3

U0 = X
U5 = Y
U3 = Z

Print U0 ; " " ; U5 ; " " ; U3
Waitms 10

Loop
End
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu Odeslat e-mail
TRT



Založen: Jan 24, 2008
Příspěvky: 10

PříspěvekZaslal: ne únor 15 2009, 9:32    Předmět: Citovat

Diky za nakopnuti. Zjistil jsem, ze pokud nepouzivam prepocet hodnot zpet na milivolty (to jsou ty promenne X, Y, Z), vse se vporadku zobrazi v pocitaci. Defakto ten prepocet vubec nepotrebuju, staci mi, ze vim ze cely rozsah pohybu je rozdelen 10ti bitove. Takze zatim diky, predpokladam ale, ze se tu jeste objevim s dalsimi dotazy.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Zobrazit příspěvky z předchozích:   
Přidat nové téma   Zaslat odpověď       Obsah fóra Diskuzní fórum Elektro Bastlírny -> Programování PIC, ATMEL, EEPROM a dalších obvodů Časy uváděny v GMT + 1 hodina
Strana 1 z 1

 
Přejdi na:  
Nemůžete odesílat nové téma do tohoto fóra.
Nemůžete odpovídat na témata v tomto fóru.
Nemůžete upravovat své příspěvky v tomto fóru.
Nemůžete mazat své příspěvky v tomto fóru.
Nemůžete hlasovat v tomto fóru.
Nemůžete připojovat soubory k příspěvkům
Můžete stahovat a prohlížet přiložené soubory

Powered by phpBB © 2001, 2005 phpBB Group
Forums ©
Nuke - Elektro Bastlirna

Informace na portálu Elektro bastlírny jsou prezentovány za účelem vzdělání čtenářů a rozšíření zájmu o elektroniku. Autoři článků na serveru neberou žádnou zodpovědnost za škody vzniklé těmito zapojeními. Rovněž neberou žádnou odpovědnost za případnou újmu na zdraví vzniklou úrazem elektrickým proudem. Autoři a správci těchto stránek nepřejímají záruku za správnost zveřejněných materiálů. Předkládané informace a zapojení jsou zveřejněny bez ohledu na případné patenty třetích osob. Nároky na odškodnění na základě změn, chyb nebo vynechání jsou zásadně vyloučeny. Všechny registrované nebo jiné obchodní známky zde použité jsou majetkem jejich vlastníků. Uvedením nejsou zpochybněna z toho vyplývající vlastnická práva. Použití konstrukcí v rozporu se zákonem je přísně zakázáno. Vzhledem k tomu, že původ předkládaných materiálů nelze žádným způsobem dohledat, nelze je použít pro komerční účely! Tento nekomerční server nemá z uvedených zapojení či konstrukcí žádný zisk. Nezodpovídáme za pravost předkládaných materiálů třetími osobami a jejich původ. V případě, že zjistíte porušení autorského práva či jiné nesrovnalosti, kontaktujte administrátory na diskuzním fóru EB.


PHP-Nuke Copyright © 2005 by Francisco Burzi. This is free software, and you may redistribute it under the GPL. PHP-Nuke comes with absolutely no warranty, for details, see the license.
Čas potřebný ke zpracování stránky 0.14 sekund