到处都调用FC5000

那 就 读懂  FC5000

FC5000

----------------------------------------------------------------------

L       #PRE                        //preset value
      T      #_TMR.PRE
      SET
      A      #Enable Timer         //enable timer condiations
      =      #TMR.EN                  //enabled
      SET
     R       #_TMR.TT                  //Timing
     R       #_TMR.DN               
     AN     #_TMR.EN
     JC       Clr
     L       #_TMR.PRE
     L       #_TMR.ACC                      //accumulated time
     >=D
     JCN      Done
      S      #_TMR.TT
      L      “Pre Scan Timer”
     +D
      T       #_TMR.ACC
      L       #_TMR.PRE
      <D
     JC      End
Done   :   SET
                 R          #_TMR.TT
                 S          #_TMR.DN
               JU     End
Clr :      L         0
             T        3_TMR.ACC
End :      SET
               SAVE