RosettaCodeData/Task/Loops-While/GML/loops-while.gml

i = 1024
while(i > 0)
    {
    show_message(string(i))
    i /= 2
    }