Zdravím,nevíte o nějakém srozumitelném příkladu (zdrojáku) přenosu dat z jednočipu 2051 do PC po RS232 do nějaké aplikace ve Visual basicu6.Např do textového okna.Dík
Založen: Jul 21, 2006 Příspěvky: 25741 Bydliště: skoro Brno
Zaslal: ne srpen 19 2007, 13:00 Předmět:
Nikdo se sice neozývá, ale na druhou stranu na tom nic není.
Stačí nastavit správnou přenosovou rychlost a přerušení někde v programu :
kód:
mov tmod,#00100001b ;T0 MOD 1, T1 MOD 2
mov tcon,#00000000b ;nepouzito
mov ie, #00010010b ;preruseni od RS232 a T0
mov ip, #00000000b ;stejna priorita, jinak se budou tahat o data
mov scon,#01000000b ;seriovy port MOD 1
mov pcon,#00000000b ;smod=0, normalni rychlost
mov th1,#0fbH ;9600 Bd (popr v smod x2) pro 18.432Mhz
Dál si vyrobit detekci odeslanýho znaku v přerušení od RS-232:
;*********
;* RS232 *
;*********
Komunik:
jb ri,Rec_rs
jb ti,Sd_rs
reti
Sd_rs:
setb Poslal
clr ti
reti
Rec_rs:
setb Prijal
clr ri
reti
A pak už jenom
kód:
mov sbuf,nejakej_znak
a počkat, az se bit Poslal nastaví do log-1 a poslat další. Jak si to vyhodnotíš a co bude jakej znak znamenat, to už si zvol sám. _________________ Pro moje oslovení klidně použijte jméno Zdeněk
Správně navržené zapojení je jako recept na dobré jídlo.
Můžete vynechat půlku ingrediencí, nebo přidat jiné,
ale jste si jistí, že vám to bude chutnat[?]
Zdeno dík,ale spíš by mi šlo o druhou stranu, o aplikaci na PC.Chtěl bych si zobrazovat měřenou teplotu někde na PC.Co jsem našel příklady,tak zrovna nebyly ve VB.Jiné jazyky neznám vůbec a basic tak tak.
Založen: Jul 21, 2006 Příspěvky: 25741 Bydliště: skoro Brno
Zaslal: ne srpen 19 2007, 20:46 Předmět:
Já to píšu či zpracovávám ve starým Borland Pascalu, bo učit se další a další jazky či jejich mutace už taky nezvládám.... Na vývoj hardware (např. komunikaci MODBUS) to stačí.
Na vizualizaci či super ovládací software si už musí zaplatit nějakýho "programátora". Je jich beztak jak much... _________________ Pro moje oslovení klidně použijte jméno Zdeněk
Správně navržené zapojení je jako recept na dobré jídlo.
Můžete vynechat půlku ingrediencí, nebo přidat jiné,
ale jste si jistí, že vám to bude chutnat[?]
Založen: Nov 02, 2005 Příspěvky: 199 Bydliště: Pardubice
Zaslal: po srpen 20 2007, 18:15 Předmět:
ZdenekHQ napsal(a):
Já to píšu či zpracovávám ve starým Borland Pascalu, bo učit se další a další jazky či jejich mutace už taky nezvládám.... Na vývoj hardware (např. komunikaci MODBUS) to stačí.
Na vizualizaci či super ovládací software si už musí zaplatit nějakýho "programátora". Je jich beztak jak much...
Mohl bys prosímtě někde uveřejnit zdroják, jak v pascalu posílat něco po sériový lince? _________________ Podpis na houby
Je to normální texťák, hledej Pt_nacti a InitRS232 a Send_Char. Je to funkční, když k tomu připojíš PLC nebo něco, co umí MODBUS, tak to bude třeba i komunikovat.
EDIT : Zip nějak zlobí, takže jsem ho nahradil přímo zdrojákem v Pascalu _________________ Pro moje oslovení klidně použijte jméno Zdeněk
Správně navržené zapojení je jako recept na dobré jídlo.
Můžete vynechat půlku ingrediencí, nebo přidat jiné,
ale jste si jistí, že vám to bude chutnat[?]
Naposledy upravil ZdenekHQ dne út prosinec 04 2007, 12:10, celkově upraveno 1 krát.
Zdeno dík,ale spíš by mi šlo o druhou stranu, o aplikaci na PC.Chtěl bych si zobrazovat měřenou teplotu někde na PC.Co jsem našel příklady,tak zrovna nebyly ve VB.Jiné jazyky neznám vůbec a basic tak tak.
Na VB už par rokov neprogramujem ale myslím že na to bolo MSCOMM32.OCX
Alebo sa dalo použiť API ale to si už nepamätám vôbec
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.