VOR#000 
        MVC A,B     
        CLC VAR1,VAR2 BNE COMP
        EJECT