先转ASCII码为单个的浮点数。

DEVAL(TRUE, D109,D164);

DEVAL(TRUE, D110,D166);

DEVAL(TRUE, D111,D168);

DEVAL(TRUE, D112,D170);

DEVAL(TRUE, D113,D172);

DEVAL(TRUE, D114,D174);

DEVAL(TRUE, D115,D176);

DEVAL(TRUE, D116,D178);

再乘除转乘一个浮点数

DEMUL(TRUE,D160,E100000,D300);

DEMUL(TRUE,D162,E10000,D302);

DEMUL(TRUE,D164,E1000,D304);

DEMUL(TRUE,D166,E100,D306);

DEMUL(TRUE,D168,E10,D308);

DEADD(TRUE,D300,D302,D310);

DEADD(TRUE,D304,D306,D312);

DEADD(TRUE,D308,D172,D314);

DEADD(TRUE,D310,D312,D316);

DEADD(TRUE,D314,D316,D318);

DEDIV(TRUE,D318,E10,D320);

DECMP(TRUE,D320,D200,M10);