monton = 12
llevar = 0

while monton > 0
    input "There are "; monton; " tokens remaining. How many would you like to take? "; llevar
    while llevar = 0 or llevar > 3
        input "You must take 1, 2, or 3 tokens. How many would you like to take "; llevar
    wend

    print "On my turn I will take "; 4 - llevar; " token(s)."
    monton = monton - 4
wend

print
print "I got the last token. I win! Better luck next time."
end