d-gdc, 142 bytes

Result

WA

Duration

1547ms

Code [DL]

import std.stdio;
void main(){
string s = readln;
for(int i=0;i<33;i++)write(s[i]&s[i+5]&s[i+12]&s[i+17]-48);
for(int i=0;i<16;i++)write(0);
}

stdin

10000001011010100101000010100000001000000001101001

stdout

0000000100000000000000000000000000000000000000000

stderr

strace