LOD #0
            STO W
            LOD #1
            STO X	
    loop:   LOD #10             ; result in ACC:  1=true, 0=false          
            STO T1  
            LOD X
            SUB T1
            STO T1              ; T1 = expr1 - expr2
            CPZ T1              ; ACC = 1, if expr1==expr2 otherwise ACC = 0
            JMZ notEq         	; 0 in ACC means (expr != 0)
            JMP done          	; this instruction executes when (expr == 0)
    notEq:  CPL T1            	; now test to see if expr1 <expr2
     done:  NOP               
            JMZ end		       ; if test becomes false - then time to end
            code for stmt      ;(w=w+5)
            code for assignment
            JMP loop
    end:    NOP