;
;         "macros_t7d.txt" ;    ()
;
 .macro xchrr ;  " //  "
     eor @0,@1 ;   xchrr rd,rs
     eor @1,@0
     eor @0,@1
  .endmacro
;
 .macro ldwi ;  "     /X,Y,Z/"
     ldi @1,low(@2) ;   ldwi rdh,rdl,k
     ldi @0,high(@2)
  .endmacro
;--------------------------------------------------------------------------
 .macro prints ;   /   
     push zl ;      
     push zh  ;   prints name,frame
     push accl
     ldi zl,low(@0*2)
     ldi zh,high(@0*2)
     ldi accl,@1
     rcall prints_1
     pop accl
     pop zh
     pop zl
  .endmacro
;----------------------------------------------------------------------
 .macro printb ;   /   
     ldi acch,@0 ;        
     rcall printb_1 ;   printb name=frame0  frame1
  .endmacro
;----------------------------------------------------------------------
 .macro lo_sbuf ;      
    ldi zl,low(@0*2) ;   lo_sbuf sp_bufN ( N  . )
		ldi zh,high(@0*2)
     rcall l40 ; l40    "libr_t7d.txt"
  .endmacro
;----------------------------------------------------------------------
 .macro pause ;    ~ n*2*0,000000125S (N=1-255)
    push cntxl ;   pause n
    ldi cntxl,@0
    rcall paus
    pop cntxl
  .endmacro
;-------------------------------------------------------------------------
.macro b_pause ;    ~ N*256*2*0,000000125S (N=1-255)
    push accl
    push cntxl ;   pause n
    ldi cntxl,@0
    rcall b_paus
    pop cntxl
    pop accl
  .endmacro
;--------------------------------------------------------