        jnz proceed
        xrl a, temp1hi <- mov a,temp1hi 
