Facebook
From Crippled Flamingo, 4 Months ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 78
  1. ;       - P5.0=L - z op├│┼║nieniami
  2. ;-------------------------------------------------------------------------------
  3. include         REG515.INC              ;Tabela predefinicyjna SFR.
  4. ;-------------------------------------------------------------------------------
  5.                                                
  6. code    at 1000h                                ;organizacja od adresu 1000h
  7.  
  8.                 ljmp    start                   ;skok do poczatku programu
  9.  
  10. code    at 2000h
  11.  
  12. start:
  13.        
  14.        
  15.         mov R3, #00h
  16.                 mov R2, #00h
  17.                         mov R4, #00h
  18.         mov B, #00h
  19.         mov P4, #00h
  20.         jmp petla
  21.        
  22. petla:
  23.        
  24.         jnb P5.3, change
  25.         jnb P5.2, reset
  26.         ;jnb B, stop
  27.         jmp petla
  28.        
  29. reset:
  30.         mov tmod, #00h
  31.         clr TR0
  32.         clr ET0
  33.         clr EAL
  34.         jmp start
  35.        
  36. startTimer:
  37.         mov tmod, #01h
  38.         setb TR0
  39.         setb ET0
  40.         setb EAL
  41.         mov TH0, #3Ch
  42.         mov TL0, #0AFh
  43.         jmp petla
  44.        
  45. opozn:
  46.        
  47.         djnz R0, opozn
  48.         djnz R1, opozn
  49.         RET    
  50.        
  51. stopTimer:
  52.         mov a, R2
  53.         rl a
  54.         rl a
  55.         rl a
  56.         rl a
  57.         add a, R4
  58.         mov P4, a