;
;
;   
;     lt_2.txt
;
;
;
;----------------------------------------
;
;   .cseg at (smart_vectors + 256)
 .cseg
 init:
;     -
  mov TMOD,#1<<M0_0
  setb ET0
;   -
  mov a,#0xff
  mov p0,a
  mov p1,a
  mov p2,a
  mov p3,a
  mov r0,#ramend
  clr a
 cleen:
	mov @r0,a
	djnz r0,cleen
	mov auxr,#(1<<dps) ;  
	      ;  ALE ( MOVX/MOVC )
  mov SP,#steck_start ;   
  setb EA
  lcall sek_time ;   1 
;
 wait_com:
  mov a,txd_port ;    
  jb ACC.bus_clc,wait_com ;  
             ;    bus_clc
  mov dptr,#smart_vectors ;   DPTR
       ;     smart_vectors
;
  acall bspi_rxd ;   
  jnb data_key,wait_com ;   
                ;   - 
  jmp @a+dptr ;     
         ;  - 
         ;  
;
;----------------------------------------
;