Nim game

You are encouraged to solve this task according to the task description, using any language you may know.
Nim is a simple game where the second player ─── if they know the trick ─── will always win.



The game has only 3 rules:

   start with   12   tokens
   each player takes   1,  2,  or  3   tokens in turn
  the player who takes the last token wins.


To win every time,   the second player simply takes 4 minus the number the first player took.   So if the first player takes 1,   the second takes 3 ─── if the first player takes 2,   the second should take 2 ─── and if the first player takes 3,   the second player will take 1.



Task

Design a simple Nim game where the human player goes first, and the computer always wins. The game should enforce the rules.




LET monton = 12
LET llevar = 0
 
DO WHILE monton > 0
   PRINT "Quedan"; monton; "fichas. ¿Cuántas te gustaría tomar";
   INPUT llevar
   DO WHILE llevar = 0 OR llevar > 3
      PRINT "Debes tomar 1, 2, o 3 fichas. ¿Cuántas te gustaría tomar";
      INPUT llevar
   LOOP
 
   PRINT "Es mi turno, tomaré"; 4-llevar; "ficha(s)."
   LET monton = monton - 4
LOOP
 
PRINT
SET COLOR 2
PRINT "Obtuve la última ficha. ¡Gané! Mejor suerte la próxima vez."
END