Copy bit from DBxxx to DByyy

Dear hdhosseini,

I do not know well the language awl and even the correct function pointer ...
I programmed in awl at the time of the step5, but not at these levels ...
I must compliment you on your knowledge....

I still need a change:

whit this istructions, 
 

      L     1420
      T     DB1.DBW    0
      L     P#DBX 498.0
      T     DBD    2

you can easily change the number of DB adding the OFFSET

L #DB_NUM
L #OFFSET
+I
T #DB_NUM_OK

L    #DB_NUM_OK
T     DB1.DBW    0
L     P#DBX 498.0
T     DBD    2

is possible adding the offset also the  "P#DBX 498.0" instruction?

in this mode, with few instructions, I can transfer bits from an unlimited number of db and from any location, using the Loop instruction! IS VERY IMPORTANT USE LOOP INSTRUCTION...otherwise I wasted too much memory to transfer all bits !!!

is possible?

Thank you

Roby

Another question:

we talk about pointer, accumulators and registers general purpose ...
but, if I want to view the content online accumulator or the content of the pointer, where can I watch?

Thank you

Roby

 Yes, it is possible to automate reading and copying data to target DB by using loops(as shown in the first  sample code).

where?

now, in ob1 i wrote:

      L     1220
      T     DB1.DBW    0
      L     P#DBX 0.0---------->how i can do change this number whit a temp variable?
      T     DBD    2

      L     7040
      T     DB1.DBW    6
      L     P#DBX 0.0---------->and this?
      T     DBD    8

      CALL  "Copy_BIT" , "DB_FB1"
       Source_bit     :=
       Destination_bit:=

sorry but i don't understand!

are this instructions?:



      +AR1  P#2.0                       // case specific
      +AR2  P#0.1



      L     #lp
      LOOP  lp

and:

are into fb1?

for source the offset is 498

for destination the offset is 640

Hello!

i tryed to do in this mode (for to change adress of source) but no function correctly...

      L     #lp
      L     0
      ==I  
      SPBN  m01

      L     1220
      T     DB1.DBW    0
      L     P#DBX 0.0
      T     DBD    2

m01:  L     #lp
      L     1
      ==I  
      SPBN  m02

      L     1220
      T     DB1.DBW    0
      L     P#DBX 498.0
      T     DBD    2

m02:  L     #lp
      L     2
      ==I  
      SPBN  m03

      L     1220
      T     DB1.DBW    0
      L     P#DBX 996.0
      T     DBD    2

m03:  NOP   0

      L     7040
      T     DB1.DBW    6
      L     P#DBX 0.0
      T     DBD    8

      CALL  "Copy_BIT" , "DB_FB1"
       Source_bit     :=
       Destination_bit:=

      L     #lp
      L     1
      +I   

      T     #lp

      L     #lp
      L     3
      >=I  
      SPB   m99
      SPA   end

m99:  L     0
      T     #lp
end:  NOP   0

i don't understand why!

if i set the value of #lp at 0,1 or 2 function correctly!

Repeat:

for solve in definitive mode this problem, i need of change the P#DBX0.0 with a another value, using a loop...

L     1220 -------> for this, none problem

T     DB1.DBW    0
     

L     P#DBX 0.0----->how can i do for change this value with a loop? now, dbx0.0...at second time, dbx498.0...at third time, dbx996.0 and so on!
     

T     DBD    2

if we can still do this, we made a fb that directs the single bits from one db to another changing only source and destination db

THANK YOU

ROBY

Hello Roby,

Did you solve that problem ?