L #InCode
L 103
<>I
JC rEND
L #Tmp.In.ScaleNo //这段是怎么理解的呢？
+ -1 //这段是怎么理解的呢？
SLD 4 // *16 //这段是怎么理解的呢？
L P##ParScaleDB
+D
LAR1 //ParScale[Subr.In.ScaleNo]
L 0
L DIW [AR1,P#0.0]
T #Tmp.OUT.ScaleDB
==I
JC rErr
//Set Pointer CWA to current CWA
LAR1 P##CWA
T DIW [AR1,P#0.0] //DBNO
L DW#16#84000000
T DID [AR1,P#2.0] //DBX
rErr: BEU
rEND: NOP 0


///这段主要是实现什么样的功能呢？
L #Tmp.In.ScaleNo //这段是怎么理解的呢？
+ -1 //这段是怎么理解的呢？
SLD 4 // *16 //这段是怎么理解的呢？