           LDA 2040
           MOV B,A
           LDA 2030
           STA 2030
           MOV A,B
           STA 2030
           RST 1
 

