Advertisement
Guest User

Untitled

a guest
Nov 18th, 2017
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.34 KB | None | 0 0
  1. /*
  2. * tabladecolores.asm
  3. *
  4. * Created: 15-Nov-17 19:48:48
  5. * Author: davil
  6. */
  7.  
  8.  
  9. .include "M2560def.inc"
  10.  
  11. .dseg
  12.  
  13. TABLA_COLORES_RAM: .BYTE 64
  14.  
  15. .cseg
  16.  
  17. SETUP_CARGAR_TABLA_RAM: .DEF COUNT_REG = R16
  18. .DEF RW_REG = R17
  19.  
  20.  
  21.  
  22. TABLA_COLORES_FLASH: .DB 0,5,5,5,2,2,5,5,2,2,2,5,2,2,2,5,3,5,5,5,2,3,5,5,2,2,5,5,2,2,2,5,6,3,3,3,3,3,3,3,2,2,0,5,2,2,2,5,6,6,6,4,4,4,4,4,4,4,1,1,1,1,1,7
  23. LDI COUNT_REG,64
  24. LDI ZL,LOW(TABLA_COLORES_FLASH*2)
  25. LDI ZH,HIGH(TABLA_COLORES_FLASH*2)
  26. LDI YL,LOW(TABLA_COLORES_RAM)
  27. LDI YH,HIGH(TABLA_COLORES_RAM)
  28. RJMP CARGAR_TABLA_RAM
  29.  
  30.  
  31. CARGAR_TABLA_RAM: CPI COUNT_REG,0
  32. BREQ TERMINAR
  33. LPM RW_REG,Z+
  34. ST Y+,RW_REG
  35. DEC COUNT_REG
  36. RJMP CARGAR_TABLA_RAM
  37.  
  38. TERMINAR: RJMP TERMINAR
  39.  
  40.  
  41. SETUP_MAPEAR_FREC: .EQU MAX_FREC = 0
  42. .EQU MIN_FREC = 65000
  43. .EQU A = (MAX_FREC - MIN_FREC)/4
  44. .EQU B = (MAX_FREC - MIN_FREC)/2
  45. .EQU C = (MAX_FREC - MIN_FREC)/4*3
  46. ;.EQU MIN_FREC_RED =
  47. ;.EQU MAX_FREC_RED =
  48. ;.EQU MIN_FREC_GREEN =
  49. ;.EQU MAX_FREC_GREEN =
  50. ;.EQU MIN_FREC_BLUE =
  51. ;.EQU MAX_FREC_BLUE =
  52. .DEF REG_FRECL = R16 ;COLORL
  53. .DEF REG_FRECH = R17 ;COLORH
  54. .DEF REG_R = R18
  55. .DEF REG_G = R19
  56. .DEF REG_B = R20
  57. .DEF REG_RGB = R21
  58. RJMP MAPEAR_FREC
  59.  
  60. MAPEAR_FREC:
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement