TSA Randomizer

News article http://www.bloomberg.com/news/articles/2014-05-08/for-your-next-flight-hope-the-tsa-randomizer-puts-you-in-a-faster-lane says TSA uses an software to randomly decide whether a passenger go to a faster lane for security screening.  Implement this idea in Wolfram Language is easy:

CloudDeploy[APIFunction[{},Style[If[RandomVariate[BernoulliDistribution[1/3]]==0,"→","←"],400]&,"PNG"]]