|
hi joe im using the eeprom to save data and count them,just want to know how to vary the digits when enable digit 1 it shift out the data or number to digit 1 then digit 2 so on and remember im using shiftout to 74hc164 to drive 7 sigment digits,i want to drive 4 digit with shiftout, i will check this thread you gaved me thank you so much joe
Last edited by malwww; - 12th May 2009 at 23:32.
|
I buy 4 digit displays from http://www.sureelectronics.net/ , usually through their eBay store. For about 15 US you get an spi display that works exactly with the code in your lookup table and it is about 32mm tall, 1 1/2 inches tall. These displays can be hooked together using cables supplied with them to make several digit displays. BTW, God helps us every day, that's why we do not starve.Originally Posted by malwww
If you do not believe in MAGIC, Consider how currency has value simply by printing it, and is then traded for real assets.
.
Gold is the money of kings, silver is the money of gentlemen, barter is the money of peasants - but debt is the money of slaves
.
There simply is no "Happy Spam" If you do it you will disappear from this forum.
|
hello joe i wrote this code now it works the 7segment and shiftout .but when i vary things it doesnt works and it doesnt show me things, i want to know where i put a variables and how, is pic cant run 2 things in the same times ? (variables and shiftout with digit out) and i keep the shiftout how it is now , please help now it show me 3210 on leds 7segments ,sorry i cant find lcds in my country and i cant send money to buy from europ or usa bcz they dont alow us to send money out, i need to call my friends in spain to buy me them but it will take long 'now im new in pbp i want to learn a bit good and sorry about my english , thank you joe
' I2CREAD and I2WRITE Commands
Include "modedefs.bas"
'DEFINE SHIFT_PAUSEUS 1
DEFINE OSC 4
SDO VAR PortB.0
SCLK var PortB.1
DPIN var PORTA.0
CPIN var PORTA.1
B0 var byte
B1 var byte
B2 var byte
B3 var byte
B4 var byte
symbol Digit_1 = portb.4
symbol Digit_2 = portb.5
symbol Digit_3 = portb.6
symbol Digit_4 = portb.7
SCLK = 8
TRISB = 0
' i did a variable here lookup or read but it dont work or shiftout,
main:
Digit_2 = 1
Digit_3 = 1
digit_4 = 1
SHiftOUT SDO,SCLK,0,[252]
Digit_1 = 0
pause 1
Digit_1 = 1
Digit_3 = 1
digit_4 = 1
SHiftOUT SDO,SCLK,0,[96]
Digit_2 = 0
pause 1
Digit_1 = 1
Digit_2 = 1
digit_4 = 1
SHiftOUT SDO,SCLK,0,[218]
Digit_3 = 0
pause 1
Digit_1 = 1
Digit_2 = 1
digit_3= 1
SHiftOUT SDO,SCLK,0,[242]
Digit_4 = 0
pause 1
goto main
end
Last edited by malwww; - 13th May 2009 at 18:17.
|
Here is what your code is doing
You need to put in the REQUIRED code to disable analog stuff for your chosen PIC too or it will not do the digital dance. You need to define the TRISA values to make the proper ports inputs or outputs.
If you do not believe in MAGIC, Consider how currency has value simply by printing it, and is then traded for real assets.
.
Gold is the money of kings, silver is the money of gentlemen, barter is the money of peasants - but debt is the money of slaves
.
There simply is no "Happy Spam" If you do it you will disappear from this forum.
|
OK I am not clear on what you want to do. Are you still wanting to retrieve your lookup from external eeprom? Because that is way more code than pulling it out of your main chip. Look at my tachometer code. I stored those values in the on chip eeprom, but I could have just as easily used a lookup table in code space, the primary immediate advantage to storing it in eeprom, is if you change to a different display you can easily change the eeprom data, to match.
If you do not believe in MAGIC, Consider how currency has value simply by printing it, and is then traded for real assets.
.
Gold is the money of kings, silver is the money of gentlemen, barter is the money of peasants - but debt is the money of slaves
.
There simply is no "Happy Spam" If you do it you will disappear from this forum.
|
thank you joe, the problem i have is not lookup or eeprom or lcd,the problem is when i put variables the code doesnt works, like when i put the variables with the code above. i have problem when the pic start it losts betweenm the main shiftout and the variable so it doesnt work bcz im pausing the variable 1000 and shiftout is too fast so can i see the numbers on lcd ,the lcd and numbers shown good but just i add any variables it doesnt work or shift out things , i use pic 16f84 i think it hasnt analog stuff , thank you joe for your best
for b = 0 to 9
lookup n, [...,...,...,],bo
or read ..,..
pause 1000
next b
example
Include "modedefs.bas"
'DEFINE SHIFT_PAUSEUS 1
DEFINE OSC 4
SDO VAR PortB.0
SCLK var PortB.1
DPIN var PORTA.0
CPIN var PORTA.1
B0 var byte
B1 var byte
B2 var byte
B3 var byte
B4 var byte
symbol Digit_1 = portb.4 renaming portb.4 to Digit_1, These can only hold the value 1 or 0
symbol Digit_2 = portb.5
symbol Digit_3 = portb.6
symbol Digit_4 = portb.7
SCLK = 8 attempt to give portb.1 the value of 8 ???
TRISB = 0 set all port b as outputs
for b3 = 0 to 9
I2CREAD DPIN,CPIN,$A0,b3,[B1]
pause 1000
next b
main:
Digit_2 = 1 Make renamed ports HIgh.
Digit_3 = 1
digit_4 = 1
SHiftOUT SDO,SCLK,0,[b1]
Digit_1 = 0
pause 1
Digit_1 = 1
Digit_3 = 1
digit_4 = 1
SHiftOUT SDO,SCLK,0,[b2]
Digit_2 = 0
pause 1
Digit_1 = 1
Digit_2 = 1
digit_4 = 1
SHiftOUT SDO,SCLK,0,[..]
Digit_3 = 0
pause 1
Digit_1 = 1
Digit_2 = 1
digit_3= 1
SHiftOUT SDO,SCLK,0,[..]
Digit_4 = 0
pause 1
goto main
end
and shiftout the variables it keeps just blinkin very slow no numbers nothings .
Last edited by malwww; - 14th May 2009 at 04:32.
|
hi again joe i found this link it has a few projects maybe you'll like it http://www.compsys1.com/workbench/
|
I wrote you a counter, here is the code, would you like fries and a coke?
Code:@ __config _INTRC_OSC_NOCLKOUT & _WDT_ON & _PWRTE_ON & _MCLRE_OFF &_CP_OFF & _BODEN_OFF & _LVP_OFF DEFINE OSC 4 SDO Var PortB.4 SCLK Var PortB.5 DLE Var PortB.7 EECON1 = 7 B0 Var WORD B1 Var byte D1 Var byte D10 Var byte D100 Var Byte D1000 Var Byte ONES Var Byte TENS Var Byte HUNS Var Byte THOUS Var Byte 'WPUA = %00110001 'ANSEL = 0 ' FOR USE IN 16F690 'ANSELH = 0 CCP1CON = 0 'CM1CON0 = 0 'CM2CON0 = 0 CMCON = 7 ' Disable comparators 16F648A OPTION_REG = 0 '16f628a 'OPTION_REG = %00111000 ' set for 16f690 data @0,252,96,218,242,102,182,190,224,254,246 Pause 10 PORTB = 0 PORTA = 0 TRISB = %00000000 ' lower 4 pins outputs TRISA = %00000001 ' RA2 = TMR0 clock input Main: count portA.0,100,b1 B0 = B0+B1 'STORE THE RESULTS BETWEEN COUNTER LOOPS If B0 >= 9999 then B0 = 0 D1 = b0 DIG 0 ' Load Thousands Digit Read D1, ONES ' Convert and Load Thousands Variable d10 = B0 DIG 1 ' Load Hundreds Digit READ D10,TENS ' Convert and Load Hundreds Variable D100 = B0 DIG 2 ' Load Tens Digit READ D100,HUNS ' Convert and Load Tens Variable D1000 = B0 DIG 3 ' Load Ones Digit READ D1000,THOUS ' Convert and Load Ones Variable Shiftout SDO,SCLK,4,[ONES\8,TENS\8,HUNS\8,THOUS\8] ' Send digits to display module 0 PAUSE 10 HIGH PORTB.7 pulsout DLE, 125 pause 12 Goto MAIN end
Last edited by Archangel; - 14th May 2009 at 10:12.
If you do not believe in MAGIC, Consider how currency has value simply by printing it, and is then traded for real assets.
.
Gold is the money of kings, silver is the money of gentlemen, barter is the money of peasants - but debt is the money of slaves
.
There simply is no "Happy Spam" If you do it you will disappear from this forum.
Members who have read this thread : 0You do not have permission to view the list of names.
Posting Permissions
Bookmarks