XとYの値を操作する命令もループ内に入れないと反映されませんよ。 WHILEをLOCATの上に移動させてやらないと。