Polygons with Image Backgrounds

TP[n_,m_,s_,file_]:=Module[{img,rt},
img=Import[

StringJoin["https://olgabelitskaya.github.io/",file]];
rt=RandomReal[{-1,1},{n,2}];
textpoly[x_]:={

Opacity[RandomReal[{0.5, 0.7}]],

EdgeForm[],Texture[img],
Polygon[x,VertexTextureCoordinates->x]};
Graphics[Rotate[textpoly[rt],#,{0, 0}]&/@Range[0,2 Pi,Pi/m],

ImageSize->s,Background->Black]];
{TP[32,3,300,"flower5.jpeg"],

TP[24,6,300,"flower2.jpeg"]}

TP[64,5,600,"flower3.jpeg"]