;
;
;   utils_mb.txt
;
;
;----------------------------------------------
;

;----------------------------------------------
;
;     
;  "  "
;
;
 wait_s:
  mov a,linc_port;murport
  jb ACC.Com_Key,wait_s
  acall tm_2 ; WAITT 2
  mov a,linc_port;murport
  jb ACC.Com_Key,wait_s
  acall tm_2 ; WAITT 2
 l_wait_s:
  mov a,linc_port;murport
  jnb ACC.Com_Key,l_wait_s
  acall tm_2 ; WAITT 2
  mov a,linc_port;murport
  jnb ACC.Com_Key,l_wait_s
 ret
;
 tm_2:
  WAITT 2
 ret
  
;
;----------------------------------------------
;
;      ASCII
;    ,   R5:R4 -
; ,     R5
; ,     R4
;
;
;
 binascii:
   mov r7,a
   acall tetras
   mov r4,a
   mov a,r7
   swap a
   acall tetras
   mov r5,a
  ret
 tetras:
   anl a,#0b00001111
   inc a
   movc a,@a+PC
  ret
 kodas:
  .db '0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'
;
;----------------------------------------------
;

;
;----------------------------------------------
;
;
   
;
;----------------------------------------------
;
;
   
;
;----------------------------------------------
;
;