Help for this page

Select Code to Download


  1. or download this
    #Perl program
    
    ...
       }
       }
    
  2. or download this
    VOR#000 EQU *
            MVC A,B     move B to A
            CLC VAR1,VAR2  compare VAR2 != VAR1
            BNE COMP
            EJECT
    
  3. or download this
    VOR#000 
            MVC A,B     
            CLC VAR1,VAR2 BNE COMP
            EJECT