Graphics[{Black,CountryData["Australia","SchematicPolygon"]}]backdrop=Image[Graphics[{Black,Rectangle[{0,0},{2,2}]},Background->Black],ImageSize->{1350,1350}];mask=Image[ImageCompose[backdrop,mask],ImageSize->{300,300}](*text=ReadList["Germany.txt",Word]*)text=WikipediaData["frog"];StringTake[text,1000]WordCloud[ToLowerCase[DeleteStopwords[text]],mask,BackgroundBlack,ImageSize400,ColorFunction->ColorData["SiennaTones"]]
mask=AlphaChannel
