:for i in range(51)
call setline(i,!(float2nr(sqrt(0+("0b".getline(i)."001"))*99%99)))
endfor
ZZ