# Onedream

Member

39

120 Neutral

• Rank
Member
1. ## Potentual new concept

'I need to know if the following can be made to work.  'And what are it's limits.   '****************************************************************************************************** 'Coder                                        Top_Of_Page '******************************************************************************************************   'DList$="Donnie was here,for a while;,But,He left,shortly,after Judy arrived with the car ." DList$="It is time for all good men to come to the aid of their country ."   NewSet=0           ' NewSet=1 for Different TL$,AL$ set than Decoded TL$,AL$ set active   Stream$=DList$   Pi=(atn(1)*4):Mdeg=(180/Pi):Mrdn=(Pi/180):Pi2=(Pi*2)   nop$= Coder$(Stream$,FnlT,FnlA,TL$,AL$) goto [Cont] end Function Coder$(Stream$,byref FnlT,byref FnlA,byref TL$,byref AL$) Pi=(atn(1)*4):Mdeg=(180/Pi):Mrdn=(Pi/180):Pi2=(Pi*2) T=1e100 A=1e-100 index=0 [XCdLoop] index=index+1 if index>Len(Stream$) then [XCdLoopout]   D=asc(mid$(Stream$,index,1))            'note D is always a whole number {ASCII value} '@@@@@@@@@@@@@@@@@@@@@@@@@@@   'R=?                                    'Note;  R needs to pass T and A   R=D+(1/T)                               'T coded into R as whole number and fraction-- 1/T   '****   c=(1/(R*3600))*33   L=(A*(1/360))*13   F=(1/(((L*c)^.5)*Pi2))   '****                                  'A coded into R as L of R thru c and F '@@@@@@@@@@@@@@@@@@@@@@@@@@@   A=atn(1/((R*(1/F))+1))*Mdeg   T=R*tan(A*Mrdn):eR=val(using("###.##########",T*(1/tan(A*Mrdn))))   TL$=TL$;str$(T);" " AL$=AL$;str$(A);" "   eDL$=eDL$;chr$(int(T*(1/tan(A*Mrdn))));" " goto [XCdLoop] [XCdLoopout] FnlT=T FnlA=A Coder$=eDL$end function '****************************************************************************************************** 'DeCoder Top_Of_Page '****************************************************************************************************** [Cont] if NewSet=1 then 'Different TL$,AL$set than Decoded TL$,AL$set TL$="68.0 12.2265105 27.4733551 20.0469824 22.0466327 20.3879743 10.0600121 19.1848888 22.0236299 21.3669502 10.3406324 17.5474093 22.1872612 21.5345227 21.2387626 12.1881826 18.4183448 22.8851907 22.0768607 10.1991144 16.93649 10.5596718 18.8241907 23.1498559 20.3989474 21.8756717 20.6739137 14.8099176 11.4535168 14.5336618 21.8575408 23.1870922 12.4058221 14.8637463 20.5301155 10.0373406 18.1484108 22.2214999 20.1403321 22.6887858 12.5007205 19.5664005 22.5108762 21.3182536 22.6982224 22.6138059 21.8454955 23.0466493 12.6166933 17.640404 21.6858273 22.0400221 21.1910768 21.9258625 10.2225846 14.4184335 22.9350373 20.813042 22.7891465 10.2935919 16.8757692 23.5973387 22.0425742 21.5469479 22.5766286 21.1340446 20.2933903 10.0423385 19.1982576 23.110894 21.7406367 21.6833707 9.95115602 18.9831198 22.8514967 20.031673 10.1195113 17.1935671 21.4100208 21.4948293 10.2903725 10.7835598"   AL$="45 6.28489283 14.0131722 10.3251903 11.8525478 11.4074407 17.4267733 9.15076894 12.7853629 10.5214462 17.883481 9.56830266 12.3829313 10.6929579 11.870103 15.4671949 10.2276626 11.6440628 10.9559451 17.6548061 9.89436961 18.2309521 8.98190364 12.5429429 10.9898128 11.4454287 11.5631092 14.079911 14.5692971 12.402832 10.5757448 11.2994602 15.7311699 11.6516455 11.4824404 17.3900432 9.53028148 12.4016738 11.1648106 11.062318 15.8451605 9.64940083 12.2074858 10.8673929 11.2562253 11.0271762 11.4305508 10.7798722 15.9849183 10.2989216 11.9962446 10.7538024 11.8443269 10.88248 17.6927405 11.0113815 11.0844201 11.7521645 10.6620085 17.8087971 9.85968327 11.6888257 10.9394642 11.5917464 10.8271938 11.8134693 11.4661941 17.39789 9.15702435 12.4071244 10.6113192 11.7720473 17.2509324 9.28603057 12.3863593 11.2133511 17.5231033 9.84279067 12.4396365 10.6735518 17.8022038 13.1664946" end if if NewSet=1 then Lng=Lng(TL$)   FnlT=val(word$(TL$,Lng))   FnlA=val(word$(AL$,Lng))   end if   nop=Decoder(TL$,AL$,FnlT,FnlA)   end   Function Decoder(TL$,AL$,FnlT,FnlA) '???????????????????????????????????????????????????????????? '                   Options for trial adjustments '              THE OBJECT IS FOR IT TO WORK WITH NO ADJUSTMENTS '      THIS MEANS IT DECODES WITH ONLY TWO VALUES,the final T and final A. '????????????????????????????????????????????????????????????   Adjust=1        ' Adjust=1 for any Adjust,otherwise no adjustments made.                   ' q=1  every actual T, adjust specified A                   ' q=2  adjust every other T, use every actual  A                   ' q=3  adjust specified A, adjust every other  T                   ' q=4  adjust every other A, adjust every other  T                   ' q=5  use actual A,no T adjustment                   ' q=6  use actual T,no A adjustment                   ' q=7  use actual A, use actual T   M$="1 2 3 4 5 6 7" q=7 M=val(word$(M$,q)) Pi=(atn(1)*4):Mdeg=(180/Pi):Mrdn=(Pi/180):Pi2=(Pi*2) DL$="":efDL$="" T=FnlT A=FnlA index=0 [XDCdLoop] index=index+1 n=Lng(TL$)+(index*-1)   R=T*(1/tan(A*Mrdn)):D=int(R):DL$=DL$;str$(D);" " if n=0 then [XtDDcd] c=(1/(R*3600))*33 F=R*1/((1/tan(A*Mrdn))-1) L=(((1/F)/Pi2)^2)/c A=((L/13)*360) T=1/(R+(D*-1)) if Adjust=1 then nop=Adjust(M,n,TL$,AL$,A,T) goto [XDCdLoop] [XtDDcd] for j=1 to Lng(DL$)   n=Lng(DL$)+1+(j*-1) if val(word$(DL$,n))>0 and val(word$(DL$,n))<256 then efDL$=efDL$;chr$(val(word$(DL$,n)))   end if   next j   print efDL$end function '********************************* some option functions*********************************************** 'Word length of string: Function Lng(byref Stream$)   j=0   [Loop]   j=j+1   Ele$=word$(Stream$,j) if Ele$<>"" then [Loop]   Lng=j-1   end function '?????????????????????????????????????????????????????????????????? '                 Adjuster for testing '?????????????????????????????????????????????????????????????????? ' Testing options to see what is working and what is not working.   Function Adjust(M,n,TL$,AL$,byref A,byref T)   Option=M   select case Option   case 1   if n=23 or n=68 or n=48 then A=val(word$(AL$,n))   nop= Actual2(AL$,TL$,n,A,T)   case 2   if n mod 2>0 then T=val(word$(TL$,n))   nop= Actual1(AL$,TL$,n,A,T)   case 3   if n=23 or n=68 or n=48 then A=val(word$(AL$,n))   if n mod 2>0 then T=val(word$(TL$,n))   case 4   if n mod 2>0 then A=val(word$(AL$,n))   if n mod 2>0 then T=val(word$(TL$,n))   case 5   nop= Actual1(AL$,TL$,n,A,T)   case 6   nop= Actual2(AL$,TL$,n,A,T)   case 7   nop= Actual3(AL$,TL$,n,A,T)   case else   end select   end function '????????????????????????????????????? '            Actual value T and/or A '?????????????????????????????????????   Function Actual1(AL$,TL$,n,byref A,byref T)   A=val(word$(AL$,n))   end function   Function Actual2(AL$,TL$,n,byref A,byref T)   T=val(word$(TL$,n))   end function   Function Actual3(AL$,TL$,n,byref A,byref T)   A=val(word$(AL$,n))   T=val(word$(TL$,n))   end function
2. ## Potentual new concept

Alright,   You ask me to summarize what the concept is,so you'd know  know what it's about.   So I try to give you an idea of what it's about and you  want to understand the details,which I skipped.   You try to relate it to something you already know,which  if you do, then I don't need to show you.  Figuratively speaking,You can not take one piece of,a 100 piece,puzzle and understand the entire puzzle.   I told you what it is supposed to do;,If you want to understand how,then you need the details.  I can show you with, Just Basic 101 code,Which is explained in the Just Basic 101 help file.  I said I'm not a programmer,so I can only show what I,m doing and tell you why I did it.   Like a puzzle,You'll have to see how the pieces make sense to understand the whole concept. .   I'm not on here to waist anyone's time.   I'm looking for someone interested in the concept and in taking time and energy to communicate with me  in the best way I can,and do their own program,understanding. .   Is it worth it?? Only if I'm right. .   I'm done;,unless someone really wants to discuses this,my way.   Because, any other way is wasting all of our time.   Figuratively speaking,I don't want to ride a dead horse   If anyone is interested,let me know. .   I'm meaning no disrespect,I think you all have been more than patient.   I just think you can understand lines of program better than a line of my explanation,without it.   Either way, thanks for trying.
3. ## Potentual new concept

Albert,  As I said earlier,In the Coder you get feed back,that can modify the output.  Remember that output is dependent on string TL$and String AL$ created in the Coder as input to the Decoder. I tried to start by explaining the Coder and Decoder because if you do not understand them,then you can not use the codes to do logics. It is thru the Coder that the format for logics is processed. It is thru the Decoder that the over all progress is recorded. This is a case of { you have to crawl thru something before you can run thru it. } You actually have to have two Coders or a Coder with two modes to make the logics work. The only way I can explain this is to say,Think of the Coder and Decoder as the central processor unit for logics.CPU for logic. Can you explain a computer without explaining the CPU?
4. ## Potentual new concept

Alberth,   If I modify the code going into the decoder,then I produce something other than what was put in. Then I can compare the logics of input against the logics of output and input corrections until the out put is what I wanted or thought. If it is worthy of remembering,then it is stored.
5. ## Potentual new concept

correction Chart at http://i.imgur.com/5qp29AM.jpg
6. ## Potentual new concept

This is to demonstrate a general idea of my thoughts I thought it may be helpful in understandinng the over all concept. . Let's consider the perfect system. That is where everything,or every modual, works perfectly. . In the perfect system everything is considered as feed back. . Think of a frame,be it picture or text, as a camera frame,as seeing something. The frames of experience and memory are already in code so this is for a temporary memory to work with the others. . Now this is one frame.  // remember the frame is concidered feed back form somewhere.// . He saw that the person was injured in the hip and this is what he saw. _____......XX...... _____.....XXXX..... _____......XX...... _____...XXXXXXXX... _____.XX.XXXXXXX.XX _____.XX.XXXXXXX.XX _____.XX..XXXXX..XX _____..X..XXXXX..X. _____....XXX.XXX... _____..Injury.XX...__mild injury _____....XXX.XXX... . . This is feed to the coder for coding. Now the coder reads it one line at a time. Accumulating the code,one character at a time.The accumulation is zeroed after each line. Now code 1 is line 1 Code 1 is text code. code 2 thru 9 is picture code. code 10 is text and picture code. code 11 is picture code. The total of the codes is the frame code. . . {Remember this is the perfect system.} Now;,At the same time the coder is compiling the perfect code,to record the frame in one code. This is to say that the frame can be reproduced from one code,by the decoder. . What!!!?? Ok,in the perfect system the last T and the last A is all that's needed in the decoder. finalA=atn(( 1/( ( R*(1/F) )+1 ) ) )  finalT=R * A . And in the perfect system These two can be changed to one code, Code=? ,such that-- sub Code -- produces; . He saw that the person was injured in the hip and this is what he saw. _____......XX...... _____.....XXXX..... _____......XX...... _____...XXXXXXXX... _____.XX.XXXXXXX.XX _____.XX.XXXXXXX.XX _____.XX..XXXXX..XX _____..X..XXXXX..X. _____....XXX.XXX... _____..Injury.XX...__mild injury _____....XXX.XXX... . Just for thought--If I have the right Code, I can produce a frame that has not been seen yet. . Note that the above is two separate functions,done in one system. . Now other possible functions are. 1. read by words 2. read by fragments.remember a fragment can by a statement or a section. // fragment enclosed in { }. // 2a He {of all persons},should know. 2b  _____{......XX......} _____{.....XXXX.....} _____{......XX......} _____{...XXXXXXXX...} _____.XX.XXXXXXX.XX _____.XX.XXXXXXX.XX _____.XX..XXXXX..XX _____..X..XXXXX..X. _____....XXX.XXX... _____..{Injury}.XX...__{mild injury} _____....XXX.XXX... 3. word codes Fragment Codes 4.Modify,annualize,record,act on //note logic as well as neural analyzers 4a characters 4b words 4C fragments 4d lines 5.send to analyzers 6.read feed back for; Modify,annualize,record,act on 4a characters 4b words 4C fragments 4d lines 7 save experience //remember one Code. 8 feed new frame and repeat. . We do not have the perfect system,But,it may be worth looking at what we do have. This is the coder. . The relative address is a different function,that uses the one coder function--Code. Which in turn is used in logic analyzers.

13. ## Potentual new concept

guys,I'm done. sorry I took up your time. I was honestly trying show something. I appreciate your honest remarks.I just bit off more than I can chew. You guys have been more than gracious.Thanks again.Bye. last post.
14. ## Potentual new concept

I'm listening,trying this?? We have all asked the question;,How does the mind do what it does? How does birth develop into a being of specific classes. Like anything else;,It follows a basic pattern with deviations or mutations. No matter what the physical means is,The intelligence is messaging, language,codes of logic,programs. There is one big question,How does the mind do relativity? This is the one thing that leads to creativity,understanding,self awareness. So what is the basic pattern and how does it work? Neural science is part of the pattern. My concept is about another part of the pattern. The model_T of a concept,if you will?,To be developed over time. Messaging, or programming, is the one place {abstract reasoning} makes sense,as a real tool. one apple is 5,000 cars.We use that {abstract reasoning} kind of logic in charts all the time,only we call it symbolisms. Yet,We do not think "symbolisms" we think "using one thing to represent other things" Now here is the relativity. relevant Stream$="what is" Default Stream$="using one thing to represent other things" Given Stream$= "symbolism" {form exsperance} Memory Stream$="what is symbolism, abstract reasoning, using one thing to represent other things " Ok.I can pull out "abstract reasoning" out of memory and that may be enough for Joe. However now relevant Stream$must be "what is,for Joe" and related to Memory Stream$ for that option. Bill might need a code number {a symbolic location} to find a more complete explanation. Now relevant Stream$must be "what is,for Bill" and related to Memory Stream$ for that option Code wise: With the Default Stream$__code as a reference. Options codes like Default Stream$__code + relevant Stream\$__code is Option_code The relativity is not in the function,but rather in what the code{symbols} represent. The function is how they are stored or read. Now if I want to create a symbol code every time I say "using one thing to represent other things" I can say 4.23 is "using one thing to represent other things" But if I want to create a relative code{symbol} I use the coder to create it. Now if when I say "using one thing to represent other things" and it goes thru the coder,I have the relative symbolic code. Call it abstract,but relativity is an abstract operation. What are the rules for abstract operation or logic? One different between inches and feet---get a longer stick! The coder generates relative codes.{relative symbols} But it also can generate modified or mutated relative code,and print what they represent. {apple} is a symbol {apple for 5 cars} is a relative symbol This is the heart of my concept. Relative code {symbols} have hidden clarity;,Like bare and bear.
15. ## Potentual new concept

MarkS I can appreciate that.Point taken. Give me another 66 yr's,and I'll get back to you. L.O.L I never did a lot of writing.As you can imagine.