SJMP pocz; 
       ORG 20h; 
pocz:  MOV A,#30H; 
       MOV B,#0; 
new:   MOV @A, @B; 
       INC A; 
       INC B; 
       INC B; 
       CJNE B, #30, new; 
       SJMP$