Forum - MCS Electronics

 

FAQFAQ SearchSearch RegisterRegister Log inLog in

INCREASING SRAM 4MBITS TO SRAM 20MBYTES
Goto page 1, 2  Next
 
Post new topic   Reply to topic    www.mcselec.com Forum Index -> BASCOM-AVR
View previous topic :: View next topic  
Author Message
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Sun Aug 25, 2019 6:55 pm    Post subject: INCREASING SRAM 4MBITS TO SRAM 20MBYTES Reply with quote

HERE IS THE SCHEMATIC

WHAT DO YOU THINK ABOUT

CAPACITY CAN BE INCREASED WITH EXTERNAL ADC 16BITS

CAN SOMEONE CAN SIMULATE WITH P R O TE US

THANT YOU TO TELL IF BETTER IDEE



(BASCOM-AVR version : 2.0.7.3 , Latest : 2.0.8.2 )
Back to top
View user's profile
MWS

Bascom Member



Joined: 22 Aug 2009
Posts: 1722

blank.gif
PostPosted: Sun Aug 25, 2019 8:47 pm    Post subject: Re: INCREASING SRAM 4MBITS TO SRAM 20MBYTES Reply with quote

benoit wrote:
WHAT DO YOU THINK ABOUT

Utter nonsense.
Back to top
View user's profile
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Sun Aug 25, 2019 10:12 pm    Post subject: Reply with quote

HERE IS THE BEGINING OF THE PROGRAMME FOR ENCODING EN AUDIO SIGNAL FOR EXAMPLE

PROGRAM UNDER DEVELLOPMENT AND NOT FINALISED

Code:
' bascom 2.0.7.3

' noel benoit f1tet ALGORITHME DE COMPRESSION TO SRAM 4 MBIT COMPRESSED  TO 20MBYTE DECOMPRESSED
 ' 25 08 2019

'$regfile = "m8515def.dat"
$regfile = "m168def.dat"
$crystal = 8000000
$hwstack = 100
$swstack = 100
$framesize = 40


 ' with a buffer switch adress 74HC373 8 BIT     LATCHED TO ALE SIGNAL

 ' the adc value onto 10 BITS IS ENCODED AS THE FOLLOWING
  ' on the fisrt 8 bits
  ' the 4 MSB ARE THE AVERAGE UPPER BYTES B5 TO B8 VALUE FROM 0 TO 64 TO 512  OF 8 EIGHT ADC SAMPLE DIVIDED / 8
  ' the 4 OTHER BIT ARE FOR INCREASE THE SPEED OF CHARGING/ DECHARGING CAPACITOR let 16 POSSIBILITY LET 8 BITS TO 0 OR TO 1
  ' WHEN 0 NO EXED CHARGING TIME WHEN 1 TIME MULTIPLIED PER 4
  ' the average value is outputed to adc port with relation Vaverage=vout*rc*T
  ' THAT CAN BE OUTPUTED TO ADC PORT AS OUTPUT THIS ALLOW TO INCREASE THE SPEED OF CHARGIN CAPACITOR DURING A CERTAIN TIME
  ' ON THE SECOND EIGHT SELECT IF THE OUTPUT IS UPPER OR UNDER THE AVERAGE VALUE   0 IS UNDER OR 1 IS UPPER DURING A FIXED TIME



  ' for resume there is 4 MAIN PARAMETER :
   'one average reference value TO PRECHARGE CAPACITOR WITH ADC port OUTPUT OR PWM OUTPUT WITH DIODES eight diodes
   ' one _ bit data to charge upper or discharge under the average value  i mean the second octet
   'other 4 bit that allow extra time if set one  under 16 possibility  THE FIRST 8 POSSIBILITY 0 OR 1  THE OTHER 8 0 OR 1
   'THE 8 ONE ARE EXTRA TIME IF SET ONE   AND THE SECOND 8 POSSIBILITY IS EXTRA TIME IF SET ONE


   Dim Value1 As Word                                       ' FIRST 10 BIT ADC VALEUR
   Dim Value2 As Word
   Dim Value3 As Word
   Dim Value4 As Word
   Dim Value5 As Word
   Dim Value6 As Word
   Dim Value7 As Word
   Dim Value8 As Word                                       ' EIGHT 10 BIT ADC VALEUR
   Dim Average As Dword                                     ' THE AVERAGE VALUE OF THE EIGHT MSB BITS LOWERED OF MAX 512 AND TRONCATED AT THE 4 LOWERS BYTES
    Dim Average1 As Dword                                   'AND DIVIDED BY 8 RESULT ONTO 4 BITS

   Dim Data2 As Byte                                        '' set upper or under the average value 0 or 1
   Dim Data1 As Byte                                        ' contain the 4 msb bit of average and the 4 bit coded of extra time cherging
   Dim Extand_charge As Byte


Config Adc = Single , Prescaler = 128 , Reference = Avcc



Start Adc




Dim W As Word , Channel1 As Byte


Channel1 = 1                                                'THE INCOMING SIGNAL IS CAPTURED IN ADC 1  EIGTH TIME AND A AVERAGE VALUE IS STORED IN DWORD AVERAGE
 Average = 0
Do
 Average = 0
 Value1 = Getadc(channel1)                                  ' SOME WAIT CAN BE INSERTED BEATWIN EACH ADC CAPTURE   SYNTAX WAIT TIME1
 Average = Average + Value1
 Value2 = Getadc(channel1)
 Average = Average + Value2
 Average = Average / 2                                      ' averaging the 2 first values   THIS METHOD INDUC A SMALL ERROR  ON THE FINAL RESULT
 Value3 = Getadc(channel1)
 Average = Average + Value3
 Average = Average / 2
 Value4 = Getadc(channel1)
 Average = Average + Value4
 Average = Average / 2
 Value5 = Getadc(channel1)
 Average = Average + Value5
 Average = Average / 2
 Value6 = Getadc(channel1)
 Average = Average + Value6
 Average = Average / 2
 Value7 = Getadc(channel1)
 Average = Average + Value7
 Average = Average / 2
 Value8 = Getadc(channel1)
 Average = Average + Value8
 Average = Average / 2
 Average1 = Average                                         ' STORING THE AVERAGE VALUE BEFORE MODIFICATIONS


 Rotate Average , Left                                      ' EXCLUDING THE MSB OF THE AVERAGE VALUE

Data2 = 0
If Value1 > Average1 Then Data2.0 = 1
If Value2 > Average1 Then Data2.1 = 1
If Value3 > Average1 Then Data2.2 = 1
If Value4 > Average1 Then Data2.3 = 1
If Value5 > Average1 Then Data2.4 = 1
If Value6 > Average1 Then Data2.5 = 1
If Value7 > Average1 Then Data2.6 = 1
If Value8 > Average1 Then Data2.7 = 1

Data1 = 0
Data1 = Average

'  THERE IS 512 BITS TO COMPENSATE WITH 16 POSSIBILYTIES LET 8 VALUES AT TIME1=512/3=170 BITS AND TIME2=512/3=170 BITS
' IF DATA2.0 POSITIF THE TIME1 AND TIME2  ARE ADDED  IF DATA2.0 ZERO THEN TIME 1 AND TIME2 ARE SUBSTRACTED FROM AVERAGE VALUE
' THIS ALLOW A DELTA OF 4 TIME1 MAX BETWEEN TWO CONCECUTIVE SIGNALS  IF T1=T2=170BITS   LET DELTA MAX 680BITS
' THE POSITIVE AND NEGATIVE TEST WITH AVERAGE VALUE MUST BE DONE TO COMPUTE THE 4BIT THAT CONTAIN THE 16 BITS VALUES
' for the restitusion signal there is tree time   let T+T1+T2=FINAL SIGNAL
'



If Data1 > Average1 Then Data2.0 = 1
If Data2 > Average1 Then Data2.1 = 1
If Data3 > Average1 Then Data2.2 = 1
If Data4 > Average1 Then Data2.3 = 1
If Data5 > Average1 Then Data2.4 = 1
If Data6 > Average1 Then Data2.5 = 1
If Data7 > Average1 Then Data2.6 = 1
If Data8 > Average1 Then Data2.7 = 1

Loop

End

 
Back to top
View user's profile
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Mon Aug 26, 2019 1:01 pm    Post subject: Reply with quote

IN FACT THE IDEE IS SIMPLE WITH 16BIT YOU HAVE 65535 COUNT LET 16 X 4096 COUNT SO A THEORICAL RESOLUTION OF 14 BITS PER A COUNTER OF 4096

THE PROBLEM IS HOW TO SEPARATE ALL THE COUNT NUMBER IN THE RIGHT ORDER

A FIXED RC VALUE CAN BE CHARGER AT CONSTANT CURRANT ON 16 SIGNALS AT THE SAME TIME TIME OR IN INDIAN MODE AND RESETED BY PORT PIN


DID SOME ONE GET IDEE?
Back to top
View user's profile
MWS

Bascom Member



Joined: 22 Aug 2009
Posts: 1722

blank.gif
PostPosted: Mon Aug 26, 2019 6:00 pm    Post subject: Reply with quote

benoit wrote:
DID SOME ONE GET IDEE?

What's with your keyboard, shift key broken?

And btw., maybe you did not understand it the first time, what you're proposing is that stupid, it is difficult to find words describing the magnitude of nonsense.
Back to top
View user's profile
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Wed Aug 28, 2019 8:01 am    Post subject: Reply with quote

Hi mws don t take care of that .

to get 22Mbyte with word of 8 bit demo:

taking 4 bit this 4 bits are the result of (word1*word2)/(word1+word2)
if the word are at 10 bits resolution we get a result of 4bit that change from 64 to 512 for all the values of word1 and word2 from 128 to 1024

so 20bit can be stored in 4 bit let 40bits in 8bits word

by the way if the 4 bits are coded as 64=bit1 128=bit2 256=bit3 512=bit4 it is possible to find a aproximation value in that table this seens to induct an error of 10%
on the final result word1 word2

it is possible to get a value table to compute the ricovering of word1 and word2 and to determinate if word 1>word2 or word2>word1


it that table or formula that i looking for

exept the space of the data table the whole 4mbit memory will be filled with 4mbits/8bits=512kbytes

if a byte is representing 40 bits we got a memory with 512k*40bits =20mbits let 2,56mbytes
if the value of 10bit as been divided by 8 it is possible to reverse 52bit per octet and to get get 3,M bytes data storage

with a good algorithm that realise the process to expend the 4 bit it seems that 20Mbyte restitution data can be reach with 512kbyte memory depending of signal the reproduce
and time to computing

usefull comment welcome
and math fornula well come too..
thanks
Back to top
View user's profile
Duval JP

Bascom Member



Joined: 22 Jun 2004
Posts: 865
Location: France

france.gif
PostPosted: Wed Aug 28, 2019 11:05 am    Post subject: Reply with quote

do you need these values instantly?

because a storage method with an flash DD or an SD card can be a solution with AVR-Dos

JP

_________________
pleasure to learn, to teach, to create
Back to top
View user's profile Visit poster's website
MWS

Bascom Member



Joined: 22 Aug 2009
Posts: 1722

blank.gif
PostPosted: Wed Aug 28, 2019 12:45 pm    Post subject: Reply with quote

@benoit:

For all the nonsense you write here, one thing, the very basic should be clear:

512k x 8bit SRam can store 524,288 x 8 = 4,194,304 single states.
It is possible to store more bits within a given memory with methods of lossless compression, compression ratio and thus gain depends strongly on compressibility of the source data.

It is NOT possible by adding a few R/C combinations and using ADCs to magically multiply single states, this idea is only a result of your confused mind.
Back to top
View user's profile
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Wed Aug 28, 2019 1:43 pm    Post subject: Reply with quote

@JP
@MWS

sound recording is the objective
avr are fast enought fast for that.
i was wondered what will be the best performance arithmetic function that permit to get the max capacity storage possible . with max 15% error

like i am not math enthousiastic it is not easy to found the best formula.
Back to top
View user's profile
laborratte

Bascom Expert



Joined: 27 Jul 2005
Posts: 255
Location: Berlin

germany.gif
PostPosted: Wed Aug 28, 2019 3:19 pm    Post subject: Reply with quote

Reminds me of the signetics 25120, a fully encoded 9046xN random access write-only-memory.

Datasheet: http://www.ganssle.com/misc/wom1.jpg and http://www.ganssle.com/misc/wom2.jpg
Back to top
View user's profile
MWS

Bascom Member



Joined: 22 Aug 2009
Posts: 1722

blank.gif
PostPosted: Wed Aug 28, 2019 7:57 pm    Post subject: Reply with quote

laborratte wrote:
Reminds me of the signetics 25120, a fully encoded 9046xN random access write-only-memory.

Agree, this seems to be proper technology for the TO.
Also the phrase 'free energy' came into mind, but I've feared this will attrack more nutjobs.
Otoh this forum is frequented by registered Bascom users only, and I estimate almost all of them have a clear mind.
Back to top
View user's profile
AdrianJ

Bascom Expert



Joined: 16 Jan 2006
Posts: 2457
Location: Queensland

australia.gif
PostPosted: Thu Aug 29, 2019 3:47 am    Post subject: Reply with quote

If sound recording is what you want, then there are already many compression schemes. eg MP3. Just pick one you like, and write it in Bascom / ASM
_________________
Adrian Jansen
Computer language is a framework for creativity
Back to top
View user's profile Visit poster's website
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Thu Aug 29, 2019 8:24 am    Post subject: Reply with quote

@ADRIANJ

IT IS A GOOD IDEE

DO YOU THINK THAT I CAN CUMULATE MP3 COMPRESSION AND THIS ENCODING METHOD ?

THS
Back to top
View user's profile
Duval JP

Bascom Member



Joined: 22 Jun 2004
Posts: 865
Location: France

france.gif
PostPosted: Thu Aug 29, 2019 10:12 am    Post subject: Reply with quote

Hello Benoit,

and sorry for english speaking people :

I let you see, in french, this document about the netiquette , it is maybe too old fashion for you but I'm an old man and I like the "courtoisie" courtesy
https://fr.wikipedia.org/wiki/N%C3%A9tiquette

I think you have a good reason to write in caps but it is shocking

- Use mixed case. UPPER CASE LOOKS AS IF YOU'RE SHOUTING.


JP Wink

_________________
pleasure to learn, to teach, to create
Back to top
View user's profile Visit poster's website
benoit

Bascom Member



Joined: 24 Jul 2007
Posts: 177

france.gif
PostPosted: Thu Aug 29, 2019 8:53 pm    Post subject: Reply with quote

73 @JC

How are you you dont look so old ; hi

i understand better why i was not understood this story with lower and upper character

i have never read this netiquette et was never informed about that text

thabk you very much for this notice
Back to top
View user's profile
Display posts from previous:   
Post new topic   Reply to topic    www.mcselec.com Forum Index -> BASCOM-AVR All times are GMT + 1 Hour
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You cannot download files in this forum