Fórum témák
» Több friss téma |
Fórum » MikroPascal kérdések
Témaindító: bozsokiandras, idő: Máj 15, 2006
Témakörök:
Konkrét megoldást a problémádra nem tudok adni, (mert csak azért sem mert nem vagyok biztos mit is küldesz a PIC felé és mit is vársz eredményként) csak néhány észrevétel:
- "number" változó típusa nincs definiálva általad - "str2int" , "Float2Str" nem standard Mikropascal funkciók A Mikropascal-nak egész jó szoftveres nyomkövetője van, érdemes használni biztosan rátalálsz a megoldásra.
1. A 'number' az real(elfelejtettem beírni, amúgy ez csak 1 variáns a sok program közül amit probáltam futtatni), de végülis mindegy, mert ha akár 1 byte típusut akarok átküldeni azzal se boldogul.
2. Libstock-ról töltöttem le ezeket a függvényeket, ha debuggal nézem a változókat akkor mindent helyesen elvégez, ezért nem értem hogy 'élesben' miért nem működik... A hozzászólás módosítva: Feb 14, 2013
Nem az a baj.
Például, így működik jól:
de ebben az esetben már nem 10-et ír ki UART-on
Helló,
Simulink-ból küldök ki számokat RS232-ön keresztül MikroPascalba. Ott a számmal végzek pár alapműveletet, majd küldöm vissza Simulinkbe. PIC18-as mikrokontrollerem van. Így néz ki a program:
A fenti csak 1 a sok probálkozás közül. Probáltam egyszerűbb, kisebb számokkal, úgyse megy. Az a baj vele h random hülyeségeket ír ki minden olyan esetben ha művelet eredményét tartalmazó változót küldök ki UART_Write-tal. Pl. akkor is ha nem változtatom az értékét
Viszont ha x-nek beírok 1 akármilyen értéket(ami nem művelet eredmény) akkor kiadja jól. Például ezzel működik:
De így már nem kapom vissza a 15-öt UART-on keresztül
Mi lehet a probléma? Köszi a segítséget.
Sziasztok!
Van egy kapcsolás, ami 3db ceruzaelemmel működik. Rajta egy 16f690-es pic végzi a dolgát. Hogyan tudom érzékelni (elsősorban kapcsolási rajz szinten) hogy merül az elem? Arra gondolok, hogy hogy ha 3V alá csökken a feszültség kapjon a pic egy jelzést, vagy addig kapjon amíg normál a feszültség. Köszi, üdv: T.
Kapcsolási rajzot hirtelen nem tudok, de három lehetséges megoldást tudok javasolni:
1. A 16F690-es PIC-ben van komparátor. Azt kell felhasználni úgy, hogy a komparátor neminvertáló bemenetére az elemfeszültség kerül (szükség szerint leosztva), az invertálóra pedig egy fix feszültségreferenciát/zener diódát kötsz. Így az elemfeszültség csökkenésekor akár megszakítást is tud generálni a belső komparátor. 2. Külső hardver felhasználásával is megoldható a dolog, pl: TC54 és társai... 3. Emlékeim szerint a 16f690-es széria WAKE-UP modulja is felhasználható erre a célra: AN879 + 1 lehetséges megoldás: Külső alkatrész nélkül is megoldható a feladat: de ehhez olyan PIC-et kell választani, ami támogatja a LVD (Low Voltage Detect) funkciót. A hozzászólás módosítva: Feb 18, 2013
Sajnos nincs elegendő adat ahhoz, hogy a hibát mindent kizárva meg lehessen határozni, ugyanis se a konkrét PIC típus, se a használt fordító verziószáma se ismert. A hardverről nem is beszélve...
Pár tipp elsődlegesen: oszcillátor nem megfelelő beállítása, a soros adat útja során van valami gond, esetleg bekapcsolt/alapértelmezésben bekapcsolt MCU periféria okozhat hasonló gondot (esetleg ha van, akkor akár az usb-soros konverter is). A következő kód biztosan működik (mikroPascal PRO for PIC v.5.8.0; 18F4550):
Idézet: Van beépített fix referencia is!„Ad 1. A 16F690-es PIC-ben van komparátor. Azt kell felhasználni úgy, hogy a komparátor neminvertáló bemenetére az elemfeszültség kerül (szükség szerint leosztva), az invertálóra pedig egy fix feszültségreferenciát/zener diódát kötsz. Így az elemfeszültség csökkenésekor akár megszakítást is tud generálni a belső komparátor.” 4. lehetőség: ADC-vel VDD referenciával megmérhető a belső referencia (ami 0,6 V-os). Abból, hogy az ADC mennyinek méri vissza lehet számolni, az ADC ugyanis a Vref/VDD arányt adja eredményül. Ez a módszer megszakításra nem alkalmas, de folyamatos ellenőrzésre annál inkább.
Hű, igazad van. El is felejtettem (16F szériát már ritkán használok), hogy ennél a szériánál is van fix referencia, ráadásul be is állítható a belső komparátorhoz, így gond nélkül megoldható a megszakítás is... Adatlap 8.4 fejezet.
A hozzászólás módosítva: Feb 18, 2013
Szia!
Az első 3 megoldással az a baj, hogy sokkal többet fogyasztanak, mint a sleep módban levő kontroller. Egy P-MOSFET és egy N-MOSFET felhasználásával nyugalmi áram nélkül lehet a telepre kapcsolni a mérőkört. A mérőkör bekapcsolása után megvárni a beállási időt, mérni, meghozni a döntést, jelezni, majd újra sleep egy ideig. Időzítő felébreszti a kontrollert és a műsor kezdődik előlről. Ha sokáig futó állapotban van, akkor időnként mér egyet... A hozzászólás módosítva: Feb 18, 2013
Hello
Idézet: „st:=st+chr(uart_rd);” A chr(); argumentuma csak konstans lehet, ha jól tudom, mert a mikrovezérlő nem ismeri az ASCI kódtáblát, tehát a fordítónak fordításkor ismernie kell az argumentumot. Üdv.
Prototype: function Chr(code : byte) : char;
Returns: Returns a character associated with the specified character code. Description: Function returns a character associated with the specified character code. Numbers from 0 to 31 are the standard non-printable ASCII codes. This is an “inline” routine; the code is generated in the place of the call. Requires: Nothing. Example: c := Chr(10); // returns the linefeed character Ezzel a fuggvennyel biztos nincs baj. Ez a program mukodik:
Adatok: mikroPascal PRO for PIC v.5.6.0; 18F8520; 10 MHZ osc;
USB-soros konvertert hasznalok
van 1 ilyen programom:
Amint a kommentekbe irtam, mindegy milyen erteket kuldok neki az olvasoregiszterbe, mindig 252-t ad ki a Simulink-ban. Ha valamilyen muveletet akarok csinalni a szamma alakitott karaktersorral, akkor 0-at ad ki. ???
Minden uart adat kiolvasása előtt meg kell vizsgálni az RCSTAn regiszter FERR és OERR bitjeit.
A 16F88x adatlapjából: Idézet: „If the receive FIFO is overrun, no additional characters will be received until the overrun condition is cleared. See Section 12.1.2.5 “Receive Overrun Error” for more information on overrun errors.” Idézet: „12.1.2.5 Receive Overrun Error The receive FIFO buffer can hold two characters. An overrun error will be generated If a third character, in its entirety, is received before the FIFO is accessed. When this happens the OERR bit of the RCSTA register is set. The characters already in the FIFO buffer can be read but no additional characters will be received until the error is cleared. The error must be cleared by either clearing the CREN bit of the RCSTA register or by resetting the EUSART by clearing the SPEN bit of the RCSTA register.” Mág annyit hozzátennék, hogy a hibásan vett karaktert ki kell olvasni.
Ez a kód működésképtelen. Minden ciklusban lenullázod az "st" változó értékét... Ráadásul akkor is küldesz adatot, amikor nem is kaptál semmit... Azt sem látom, hogy hol van lekezelve, mikor van vége a kapott adatnak...
Ha stringet küldesz a soros vonalon, az szépen számjegyekre bontva kerül kiküldésre. Ezt neked egyenként le kell kérdezned a vételi pufferből, és ebben az esetben tudnod kell, hol van kezdete vagy vége az adatnak. Egy példa: át kell küldeni az 0123456 karakterláncot. Átküldésre kerül a mikrovezérlőbe (tehát ez az adat kerül az uart_rd regiszterbe) a következő, szépen egymás után: 48, 49, 50, 51, 52, 53, 54. Ezzel még nem vagyunk készen, ugyanis ezt fel kell fűzni egy karakterlánccá, és tudni kell, hol kezdődik, vagy hol fejeződik be az adat. Nem tudom, hogy a simulink adatformátuma mennyire rugalmas, de egy határolóadat mindenféleképp javasolt. Az esetek többségében ez a CR+LF (kocsi vissza+soremelés; 0x0D (13) és 0x0A (10)) érték.
Ez a kod mukodik:
Felfuzi a szamjegyeket es kiirja a vegen magat a szamot. Egyelore csak 1 erteket kuldok at simulink-bol, ezert eleg az Idézet: feltetel. Ez a bit mutatja hogy van-e meg atkuldendo adat. Persze tudnek irni egy ilyet is:„if (UART1_Data_Ready() <> 0) then”
De itt most azon van a hangsuly hogy meghal a dolog ha a karakterlancot atalakitom szamma, a szammal vegzek muveletet, visszaalakitom stringbe es kuldom vissza. A visszakuldes ugy mukodik hogy a Mikropascal atirja ascii kodba az ertekeket es nekem a simulinkbe van egy ASCII decoder blokkom amire rakotok egy kijelzot hogy lassam az erteket.
Ha még aktuális, ez a kód tökéletesen működik:
A fenti kód az ASCII-ban kapott számot 1-el megnövelve, ASCII-ban visszaküldi. A kód jellegéből adódóan csak egy számjegy feldolgozására alkalmas (a küldött adatra ez nem vonatkozik).
Sziasztok!
Segítséget szeretnék kéni Tőletek, mégpedig abban, hogy hogyan tudnék meglévő ASM kódot beilleszteni a mikropascal programba.(vannak már működő, korábban megírt rutinjaim, amiket szeretnék használni) Kétféle képen próbáltam: 1. : asm begin btfsc STATUS, Z goto $+3 incf mperc, F stb.... end; 2.: asm { btfsc STATUS, Z goto $+3 incf mperc, F sb.... } A fordító kiakad syntax errorral. 40 304 Syntax error: Expected "." but "asm" found ORA_Int.mpas Köszönette: gapati
A help-ben olvasd el az "asm Statement" részt.
Szia!
Nem értem, elkerüli valami a figyelmem? Én is ott láttam, hogy így kellene, de a fordító syntax errorral megáll. 61 304 Syntax error: Expected "." but "asm" found ORA_Int.mpas asm Time incf mperc, W ;Másodperc andlw 0x0F xorlw 0x0a btfsc STATUS, Z goto $+3 stb....... end; Üdv: gapati
Pedig írja pontot vár és asm talált. A kód előző része végét nézd meg.
Ha kiveszem az asm blokkot, akkor lefordul a program. Nem kell valami direktívát bekapcsolni neki az asm miatt?
Üdv: gapati
pedig más fórumon is azt mondják, hogy menni kéne. Nem lehet hogy csak a fullos verzióban működik rendesen?
http://www.mikroe.com/forum/viewtopic.php?f=76&t=49042 Üdv:gapati
Kitettem az asm...end; blokkot egy eljárás begin...end; blokkjába és így működik. De sok olyan asm direktíva van amit a Microchip formátumban nem ismer meg. A mikropascalban használható asm parancsok szintaktikáját hol lehet megtalálni?
Köszönettel: gapati
Az asm utasítás után a "Time" az mi akar lenni? Szerintem az nem assembly utasítás.
Ha cimke akkor deklarálni kell (label), vagy kettőspont kell a végére.
Szia!
Igen cimke. Kettősponttal megy is. Köszönet érte! Megtaláltam az asm utasítások szintaktikáját: http://www.mikroe.com/chapters/view/10/chapter-9-instruction-set/ A globális változóimra hivatkoztam még rosszul. A help-ben azt látom, hogy egy aláhúzás kell a változó nevek elé. Így már lefordult a program. Köszönöm a segítséget mindenkinek! További szép napot! Üdv: gapati
Sziasztok!
Szeretném megkérdezni használ-e valaki Mikropascal Pro for PIC 5.8.0. fullos verziót? Köszönettel:gapati
Pár soros program. Mégsem akar működni megfelelően.
Mindig újraindul a PIC. Hol a hiba szerintetek? program Usart_Test; var txt, delim : string[10]; begin TRISB := %11111110; PORTB := %00000001; Usart_Init(4800); delay_ms(100); delim := 'OK'; while TRUE do begin if Usart_Data_Ready() = 1 then begin Usart_Read_Text(txt, delim); if (txt[0] = 'K') and (txt[1] = 'B') and (txt[2] = 'e') and (txt[3] = ' ') then begin Usart_Write_Text('Kazan Be'); SetBit(PORTB, 0); end; if (txt[0] = 'K') and (txt[1] = 'K') and (txt[2] = 'i') and (txt[3] = ' ') then begin Usart_Write_Text('Kazan Ki'); ClearBit(PORTB, 0); end; if (txt[0] = 'H') and (txt[1] = 'M') and (txt[2] = '?') and (txt[3] = ' ') then Usart_Write_Text('Homerseklet'); end; end; end. Lehet, hogy a 16F877A-n nem működik az Usart_Read_Text? |
Bejelentkezés
Hirdetés |
