util.asm

胎压检测发送端汇编源码-tpms-transmitters

;/*****************************************************************************/
;/* PROJECT : RF key demonstrator (ASK or FSK)                                */
;/* Functions: tempo                                                          */
;/*****************************************************************************/

;/*****************************************************************************/
;/* tempo                                                                     */
;/* Description : it waits for n cpu cycles                                   */
;/* In : H:X                                                                  */
;/* Out : TMOD, TSC                                                           */
;/* local variables :                                                         */
;/*****************************************************************************/

Tempo:

        psha

        lda     TSC             ;
        and     #%01111111      ; clear tof
        ora     #%00110000      ; stop the counter,
        sta     TSC             ; while keeping prescaler same

        sthx    tmodh
        bclr    5,TSC           ; start the timer
        brclr   7,TSC,*         ; wait until the tempo is expired

        pula

        rts