Result

AC

Duration

981ms

Code [DL]

+[,.>+++++++++[<--------->-]<---]+[>++++++++++++++++++++++++++++++++++++++++++++++++++[>,+<<[>>->+<<<-]>>.---------------------------------------------------------------------------[>[<<<+>>>-]<[+]]>[-]<<-]>,+.<<]

Disassembly

p[0] = 1;
p[1] = 0;
while (p[0]) {
	p[0] = GETC();
	PUTC(p[0]);
	p[1] += 9;
	p[0] -= 9*p[1]+3;
	p[1] = 0;
}
p[0] = 1;
p[2] = 0;
p[3] = 0;
while (p[0]) {
	p[1] += 50;
	while (p[1]) {
		p[2] = GETC();
		p[2] -= p[0]-1;
		p[3] += p[0];
		p[0] = 0;
		PUTC(p[2]);
		p[2] -= 75;
		if (p[2]) {
			p[0] += p[3];
			p[3] = 0;
			p[2] = 0;
		}
		p[2] = 0;
		p[3] = 0;
		--p[1];
	}
	p[2] = GETC();
	++p[2];
	PUTC(p[2]);
}

stdin

           T                                      
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
   K                                              

stdout

           T                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
           !                                      
   K!!!!!!!!

stderr

strace