Zaslal: ne listopad 05 2006, 15:01 Předmět: microPascal a PIC
Ahoj,začínám programovat v microPascalu pro procesory PIC (dostal jsem tip zde na elektro bastlírně ) a napsal jsem si jednoduchý program pro PIC16F84A, 4 Mhz spojený s LCD ( 2 řádky,řadič HD44780 ) a komunikující po 4 vodičové sběrnici. Zapojiní pinů LCD a PIC je podle helpu microPascalu.Program má po stisku tlačítka na portuA.2 napsat text na LCD. Chci Vás poprosit o pomoc. Kde je v kódu chyba, nechce mi to funguvat? Víte o odkazu na webu s příkladama, něco jsem hledal ale neúspěšně, moc toho tam není.
díky IceM
program pokus;
var text: array[20] of char;
procedure txt_na_lcd;
begin
text := 'nejaky text';
Lcd_Out(1, 1, text); // Print text at LCD
text := 'nejaky text';
Lcd_Out(2, 1, text); // Print text at LCD
end;
begin
TRISA := $FF;
TRISB := $0; // PORTB is output
Lcd_Init(PORTB); // Initialize LCD on PORTB
Lcd_Cmd(LCD_CURSOR_OFF); // Turn off cursor
if Button(PORTA, 2, 5, 1) then txt_na_lcd else Lcd_Cmd(lcd_clear) ;
TO ViPali:
-Procesor mám správně zadefinovaný.
-Koupím nový PIC a zkusím ho naprogramovat.
-Kontrast mám správně zapojený? Několikrát jsem zapojení procházel.
-O té smyčce jsem uvažoval ale myslel jsem že je to ošetřené fcí Button.
Zkusím napsat kód jak píšeš a uvidím.
ViPali díky za tipy.
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
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.