Advertisement
Guest User

ANJING

a guest
Dec 14th, 2017
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.93 KB | None | 0 0
  1. ; this program is from iwan
  2. ORG 00H
  3. AJMP MAIN
  4.  
  5. MAIN: MOV A,#00H
  6. MOV B,#00H
  7. MOV P1,A
  8. MOV P2,B
  9.  
  10. START: MOV A,#0EEH
  11. MOV B,#0EEH
  12. MOV P2,B
  13. MOV P1,A
  14. ACALL DELAY
  15. MOV A,#0EBH
  16. MOV B,#0EEH
  17. MOV P2,B
  18. MOV P1,A
  19. ACALL DELAY
  20. MOV A,#06DH
  21. MOV B,#0EEH
  22. MOV P2,B
  23. MOV P1,A
  24. ACALL DELAY
  25. MOV A,#0EEH
  26. MOV B,#0EEH
  27. MOV P2,B
  28. MOV P1,A
  29. ACALL DELAY
  30. MOV A,#0BEH
  31. MOV B,#0EEH
  32. MOV P2,B
  33. MOV P1,A
  34. ACALL DELAY
  35. MOV A,#0D6H
  36. MOV B,#0EEH
  37. MOV P2,B
  38. MOV P1,A
  39. ACALL DELAY
  40. MOV A,#0EEH
  41. MOV B,#0EEH
  42. MOV P2,B
  43. MOV P1,A
  44. ACALL DELAY
  45.  
  46. MOV B,#0EEH
  47. MOV P2,B
  48. ACALL DELAY
  49. MOV B,#0EBH
  50. MOV P2,B
  51. ACALL DELAY
  52. MOV B,#06DH
  53. MOV P2,B
  54. ACALL DELAY
  55. MOV B,#0EEH
  56. MOV P2,B
  57. ACALL DELAY
  58. MOV B,#0BEH
  59. MOV P2,B
  60. ACALL DELAY
  61. MOV B,#0D6H
  62. MOV P2,B
  63. ACALL DELAY
  64. MOV B,#0EEH
  65. MOV P2,B
  66. ACALL DELAY
  67.  
  68. AJMP START
  69.  
  70. DELAY: MOV R1,#06H
  71. DELAY1: MOV R2,#06H
  72. DELAY2: DJNZ R2,DELAY2
  73. DJNZ R1,DELAY1
  74. RET
  75.  
  76. END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement