monton = 12
llevar = 0

DO WHILE monton > 0
    PRINT USING "There are ## tokens remaining. How many would you like to take"; monton;
    INPUT llevar
    DO WHILE llevar = 0 OR llevar > 3
	    INPUT "You must take 1, 2, or 3 tokens. How many would you like to take"; llevar
    LOOP

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

PRINT
PRINT "I got the last token. I win! Better luck next time."
END