API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Oct 22nd, 2018
156
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pic 16 1.46 KB | None | 0 0
raw download clone embed print report
  1. xuat_7doan
  2.             movlw   .0
  3.             cpfseq  idx
  4.             bra     c_hours
  5.             movff   hours,W
  6.             rcall   calculator
  7.             movff   W,temp
  8.             movlw   B'11110000'
  9.             andwf   temp,0
  10.             swapf   WREG
  11.             rcall   gm_7doan
  12.             movwf   SMENT
  13.             movlw   B'10000000'
  14.             movwf   SELECT
  15.             incf    idx
  16.             return
  17.  
  18. c_hours     movlw   .1
  19.             cpfseq  idx
  20.             bra     c_minutes
  21.             movff   hours,W
  22.             rcall   calculator
  23.             movff   W,temp
  24.             movlw   B'00001111'
  25.             andwf   temp,0
  26.             rcall   gm_7doan
  27.             movwf   SMENT
  28.             movlw   B'01000000'
  29.             movwf   SELECT
  30.             incf    idx
  31.             return
  32.  
  33. c_minutes   movlw   .2
  34.             cpfseq  idx
  35.             bra     d_minutes
  36.             movff   mins,W
  37.             rcall   calculator
  38.             movff   W,temp
  39.             movlw   B'11110000'
  40.             andwf   temp,0
  41.             swapf   WREG
  42.             rcall   gm_7doan
  43.             movwf   SMENT
  44.             movlw   B'00010000'
  45.             movwf   SELECT
  46.             incf    idx
  47.             return
  48.  
  49. d_minutes   movlw   .3
  50.             cpfseq  idx
  51.             bra     c_seconds  
  52.             movff   mins,W
  53.             rcall   calculator
  54.             movff   W,temp
  55.             movlw   B'00001111'
  56.             andwf   temp,0
  57.             rcall   gm_7doan
  58.             movwf   SMENT
  59.             movlw   B'00001000'
  60.             movwf   SELECT
  61.             incf    idx
  62.             return
  63.  
  64. c_seconds   movlw   .4
  65.             cpfseq  idx
  66.             bra     d_seconds
  67.             movlw   B'11110000'
  68.             movff   secs,W
  69.             rcall   calculator
  70.             movff   W,temp
  71.             andwf   temp,0
  72.             swapf   WREG
  73.             rcall   gm_7doan
  74.             movwf   SMENT
  75.             movlw   B'00000010'
  76.             movwf   SELECT
  77.             incf    idx
  78.             return
  79.  
  80. d_seconds   movff   secs,W
  81.             rcall   calculator
  82.             movff   W,temp
  83.             movlw   B'00001111'
  84.             andwf   temp,0
  85.             rcall   gm_7doan
  86.             movwf   SMENT
  87.             movlw   B'00000001'
  88.             movwf   SELECT
  89.             clrf    idx
  90.             return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!