;
;         "macross__proto.txt" ;    ()
;
 .macro xchrr ;  " //  "
     eor @0,@1 ;   xchrr rd,rs
     eor @1,@0
     eor @0,@1
  .endmacro
;
 .macro ldwi ;  "     /X,Y,Z/"
     ldi @0l,low(@1) ;   ldwi rp,0xnnnn  ldwi rp,name ( name=0xnnnn, rp=x,y,z)
     ldi @0h,high(@1)
  .endmacro
;
 .macro i_test ;    
       tst dis_lev_@0 ;   i_test  
       brbc 1,pt@0
       cbr dato,1<<@0
    pt@0:
  .endmacro
;
 .macro off_test ;    
      cp planka,dis_lev_@0 ;   off_test  
      brne pot@0
      cbr dato,1<<@0
    pot@0:
  .endmacro
;
 .macro com_jmp ;     name
     .db 0,0     ;   com_jmp name
     .dw (@0<<1)
  .endmacro
;
 .macro com_call ;    (N)   name
     .db @0,0     ;   com_call kanalN,name
     .dw (@1<<1)
  .endmacro
;
 .macro com_ret ;   (N)  
     .db @0,0 ;    com_ret kanalN
     .db 0,0
  .endmacro
;
 .macro com_rets ;   
     .db 0xff,0 ;      ( )
     .db 0,0
  .endmacro
;

;
   ;    /
   ;      
   ;  
 .macro offset 
   .db 0,8
  .endmacro