INI       Z=LV; if (Z) goto FINE; else goto CONT 
CONT      MAR = TOS; rd 
          LV = LV -1 
          TOS = MDR; goto INI 
FINE      OPC = TOS 
END       goto END