Archiviare Dato In Virgola Mobile...

[monica_124]

Ciao a tutti:

Con questo codice archivo nel DB100 una serie di campioni (fino a 2000) in formato decimale. Come posso fare lo stesso ma con formato virgola mobile?

      AUF   DB   100
      L     2000

X01:  T     #cont

      L     1

      -D   

      SLD   4

      L     P#DBX 0.0

      +D   

      LAR1 

      L     DBW [AR1,P#0.0]

      T     DBW [AR1,P#2.0]

      L     #cont

      LOOP  X01

      L     #input

      T     DBW    0 

Grazie in anticipo per un'eventuale suggerimento :-)

[batta]

Prova così:

      AUF   DB   100
      L     2000

X01:  T     #cont

      L     1

      -D   

      SLD   5

      L     P#DBX 0.0

      +D   

      LAR1 

      L     DBD [AR1,P#0.0]

      T     DBD [AR1,P#4.0]

      L     #cont

      LOOP  X01

      L     #input

      T     DBD    0 

La variabile #input deve essere, ovviamente, in formato REAL.

Modificato: 11 settembre 2013 da batta