Facebook
From Sweet Goose, 6 Years ago, written in ARM Assembler.
Embed
Download Paste or View Raw
Hits: 265
  1. $MOD842
  2.  
  3. ORG 00H
  4.     JMP START
  5.    
  6. ORG 053H
  7.     CALL PRZERW
  8. RETI
  9.  
  10.  
  11. START:
  12.    
  13.     SETB EA
  14.     SETB ET0
  15.     MOV IEIP2,#0FFH    
  16.     MOV TIMECON,#3H
  17.     MOV INTVAL, #10
  18.     MOV HTHSEC, #00H
  19.     MOV R2, #10H
  20.     MOV R3, #60H
  21.     MOV R4, #30H
  22.  
  23.    
  24. WYSWIETLANIE:    
  25.     MOV P2,HTHSEC
  26.     MOV R5,#255
  27.     DJNZ R5, $
  28.     MOV P2,R2
  29.     MOV R5,#255
  30.     DJNZ R5, $
  31.     MOV P2,R3
  32.     MOV R5,#255
  33.     DJNZ R5, $
  34.     MOV P2,R4
  35.     MOV R5,#255
  36.     DJNZ R5, $
  37.     JMP WYSWIETLANIE
  38.  
  39.    
  40.    
  41.    
  42.    
  43.    
  44. PRZERW:
  45.  
  46.  
  47. MOV HTHSEC,#00H
  48.  
  49. INC R2
  50.  
  51. CJNE R2, #22, Z
  52. MOV R2, #10H
  53. INC R3
  54. CPL F0
  55.  
  56. CJNE R3, #106,Z
  57. MOV R3, #60H
  58. INC R4
  59.  
  60. CJNE R4, #54, Z
  61. MOV R4, #30H
  62.  
  63.  
  64.  
  65.  
  66. Z:
  67. RET
  68.  
  69. END