.label INI 0x00
.label CONT 0x09
.label FINE 0x109
.label DEF 0x130

.default goto DEF

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