push_0   
label_0
   
push_0   
dup 
 getc	
	 load			push_0x30   		    
sub	  	dup 
 jpc_1
		 	
add	   jp_0
 
 
label_1
   	
pop 

putn	
 	push_0xa   	 	 
putc	
  end


.