Subversion Repositories pentevo

Rev

Rev 42 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed | ?url?

  1. .MACRO  PUSHX
  2.         PUSH    XL
  3.         PUSH    XH
  4. .ENDMACRO
  5.  
  6. .MACRO  POPX
  7.         POP     XH
  8.         POP     XL
  9. .ENDMACRO
  10.  
  11. .MACRO  PUSHY
  12.         PUSH    YL
  13.         PUSH    YH
  14. .ENDMACRO
  15.  
  16. .MACRO  POPY
  17.         POP     YH
  18.         POP     YL
  19. .ENDMACRO
  20.  
  21. .MACRO  PUSHZ
  22.         PUSH    ZL
  23.         PUSH    ZH
  24. .ENDMACRO
  25.  
  26. .MACRO  POPZ
  27.         POP     ZH
  28.         POP     ZL
  29. .ENDMACRO
  30.  
  31. .MACRO  LDIX
  32.         LDI     XL,LOW(@0)
  33.         LDI     XH,HIGH(@0)
  34. .ENDMACRO
  35.  
  36. .MACRO  LDIY
  37.         LDI     YL,LOW(@0)
  38.         LDI     YH,HIGH(@0)
  39. .ENDMACRO
  40.  
  41. .MACRO  LDIZ
  42.         LDI     ZL,LOW(@0)
  43.         LDI     ZH,HIGH(@0)
  44. .ENDMACRO
  45.  
  46. .MACRO  LDSX
  47.         LDS     XL,@0
  48.         LDS     XH,@0+1
  49. .ENDMACRO
  50.  
  51. .MACRO  LDSY
  52.         LDS     YL,@0
  53.         LDS     YH,@0+1
  54. .ENDMACRO
  55.  
  56. .MACRO  LDSZ
  57.         LDS     ZL,@0
  58.         LDS     ZH,@0+1
  59. .ENDMACRO
  60.  
  61. .MACRO  STSX
  62.         STS     @0,XL
  63.         STS     @0+1,XH
  64. .ENDMACRO
  65.  
  66. .MACRO  STSY
  67.         STS     @0,YL
  68.         STS     @0+1,YH
  69. .ENDMACRO
  70.  
  71. .MACRO  STSZ
  72.         STS     @0,ZL
  73.         STS     @0+1,ZH
  74. .ENDMACRO
  75.  
  76. ; @0 - port, @1 - regs
  77. .MACRO  OUTPORT
  78.         STS     @0+$20*(@0<$40),@1
  79. .ENDMACRO
  80.  
  81. ; @0 - regs, @1 - port
  82. .MACRO  INPORT
  83.         LDS     @0,@1+$20*(@1<$40)
  84. .ENDMACRO
  85.  
  86. ; ADDI reg,const   Осторожно с флагами!
  87. .MACRO  ADDI
  88.         SUBI    @0,(-@1&$FF)
  89. .ENDMACRO
  90.