|
But the manual doese´t shows the default connections for 16F872, what are the defaults for my PIC?
Can i want use RB1 to RB6 insted och the default or does i have to use pin´s from outher ports?
btw why does the PIC have diffrent ports like PORTA, PORTB, PORTC..
And yes i´m new to PIC programing and i have just get my LED to blink when i push a button
|
Don't worry, the default one are the same for all PIC model.But the manual doese´t shows the default connections for 16F872, what are the defaults for my PIC?
Not sure what you meanCan i want use RB1 to RB6 insted och the default or does i have to use pin´s from outher ports?
Steve
It's not a bug, it's a random feature.
There's no problem, only learning opportunities.
|
Actually the manual does show the default connections.......for all PICs!Originally Posted by Fredrick
If you don't redefine the pins, they'll default to what the manual says, so long as those pins actually exist.
In a roundabout way, you can use any pin you want (using DT's ANYPIN routines) for the LCDIN/LCDOUT commands, but I'm guessing that's probably a bit above your skill at the moment. Give it time and anything is possible.Can i want use RB1 to RB6 insted och the default or does i have to use pin´s from outher ports?
I suppose they could name them anything they want, just call them 1 thru 30, or A-Z or whatever.btw why does the PIC have diffrent ports like PORTA, PORTB, PORTC..
But, since the PIC16F872 is primarily an 8bit device, it therefore makes a bit more sense to divide up the pins into 8 bit chunks as much as possible to keep the firmware/instructions/etc a bit simpler.
Quite frankly, you won't see a lot of 6 bit or 13 bit devices out there, or some other off the wall number. Pretty much everything is either 1,4,8, or 16 bits (yes, there are exceptions to the rule, just not a lot).
Get on it! Make 2 LEDs blink with 3 buttons... Then make a servo move with the buttons, then make a .... see how it goes?And yes i´m new to PIC programing and i have just get my LED to blink when i push a button
Get out while you can! It's a never ending cycle man!!! You'll end up spending all of your money on the latest greatest thing out there!!! Blowing all of your sleep time programming PICs... Lose your money, house, sanity...it's like drugs! It's terrible!!!
Ok, not really...but you get the point...(as for me, I'll never learn!)
|
Hello.
Now i have connected the LCD as PBP defaults and when i run the PIC with this code the display shown the temerature for 1sec and then it shows "fffffffffffffffffffffff" on both lines for a sec and then shows the temerature again and so on...
Why?
Code:' One-wire temperature for LAB-X1 and DS1820 define OSC 20 DEFINE LCD_COMMANDUS 2000 DEFINE LCD_DATAUS 600 temperature Var Word ' Temperature storage count_remain Var Byte ' Count remaining count_per_c Var Byte ' Count per degree C pause 1000 DQ Var PORTB.2 ' One-wire data pin ADCON1 = 7 ' Set PORTA and PORTE to digital mainloop: OWOut DQ, 1, [$CC, $44] ' Start temperature conversion waitloop: OWIn DQ, 4, [count_remain] ' Check for still busy converting If count_remain = 0 Then waitloop OWOut DQ, 1, [$CC, $BE] ' Read the temperature OWIn DQ, 0, [temperature.LOWBYTE, temperature.HIGHBYTE, Skip 4, count_remain, count_per_c] ' Calculate temperature in degrees C to 2 decimal places (not valid for negative temperature) temperature = (((temperature >> 1) * 100) - 25) + (((count_per_c - count_remain) * 100) / count_per_c) Lcdout $fe, 1, DEC (temperature / 100), ".", DEC2 temperature, " C" ' Calculate temperature in degrees F to 2 decimal places (not valid for negative temperature) temperature = (temperature */ 461) + 3200 Lcdout $fe, $c0, DEC (temperature / 100), ".", DEC2 temperature, " F" Pause 1000 ' Display about once a second Goto mainloop ' Do it forever
|
Hi,
Try this for Waitloop ...
AND ....Code:'***************************************************************************** ' Check for still busy converting ( ~ 4500 fois ... ) '***************************************************************************** waitloop: INPUT DQ If NOT DQ Then waitloop
Should be ...Code:DEFINE LCD_DATAUS 600
Code:DEFINE LCD_DATAUS 60
Alain
Last edited by Acetronics2; - 17th January 2008 at 16:40.
************************************************** ***********************
Why insist on using 32 Bits when you're not even able to deal with the first 8 ones ??? ehhhhhh ...
************************************************** ***********************
IF there is the word "Problem" in your question ...
certainly the answer is " RTFM " or " RTFDataSheet " !!!
*****************************************
|
Doesn´t work.
|
Aha ...
looks we have the same source !!! ... This one works perfectly aboard a 16F84 ...Code:' One-wire temperature for Picboard and DS1820 'Ok le 29/08/2004 - 534 lignes ' Define LCD registers and bits Define LCD_EBIT 1 DQ Var PORTB.4 ' One-wire data pin Ok Var PORTB.5 ' Led Verte Waito Var PORTB.6 ' Led Orange Error Var PORTB.7 ' Led Rouge temperature Var Word ' Temperature storage count_remain Var Byte ' Count remaining count_per_c Var Byte ' Count per degree C offset Var Word ' 100 * offset réel !!! offset = 293 PAUSE 500 LCDOUT $FE,1 '***************************************************************************** ' Start temperature conversion '***************************************************************************** mainloop: OWOut DQ, 1, [$CC, $44 ] '***************************************************************************** ' Check for still busy converting ( ~ 4500 fois ... ) '***************************************************************************** waitloop: INPUT DQ If NOT DQ Then waitloop '***************************************************************************** ' Read the temperature '***************************************************************************** OWOut DQ, 1, [$CC, $BE ] OWIn DQ, 0, [temperature.LOWBYTE, temperature.HIGHBYTE, Skip 4, count_remain, count_per_c] '***************************************************************************** ' Calculate temperature in degrees C to 2 decimal places (not valid for negative temperature) '***************************************************************************** temperature = (((temperature >> 1) * 100) - 25) + (((count_per_c - count_remain) * 100) / count_per_c)+ offset Lcdout $fe, 1, DEC (temperature / 100), ".", DEC2 temperature, " ",$DF,"C" '***************************************************************************** ' Calculate temperature in degrees F to 2 decimal places (not valid for negative temperature) '***************************************************************************** temperature = (temperature */ 461) + 3200 Lcdout $fe, $c0, DEC (temperature / 100), ".", DEC2 temperature, " ",$DF,"F" '***************************************************************************** ' Display about once a second '***************************************************************************** Pause 1000 Goto mainloop ' Do it forever
soo ... let's check the 872 config ... AND,AND,AND :
Wich PbP version do you use ... and has your PBPpic14.lib being modified ???
There was an interesting thread those days about 1Wire and > 8 Mhz Osc ...
see here : http://www.picbasic.co.uk/forum/show...79&postcount=4
Alain
************************************************** ***********************
Why insist on using 32 Bits when you're not even able to deal with the first 8 ones ??? ehhhhhh ...
************************************************** ***********************
IF there is the word "Problem" in your question ...
certainly the answer is " RTFM " or " RTFDataSheet " !!!
*****************************************
|
I use PBP v2.45 and have not modified anything.
The PIC runs on OSC 20
Edit: Just tryed to put in a 4 Mhz crystal but i does´t work
Last edited by Fredrick; - 17th January 2008 at 17:43.
Members who have read this thread : 0You do not have permission to view the list of names.
Posting Permissions
Bookmarks