运动方向 i 蛇长 坐标 x x0 y y0 蛇身 蛇头位置 食物位置 180 WHILE TRUE 初始化 描述该功能... 255 0 0 3 3 0 255 0 0 0 x0 0 y0 0 x 3 y 3 蛇身 x y 蛇头位置 x y 食物位置 x0 y0 蛇长 1 显示蛇身 描述该功能... i 1 蛇长 1 坐标 GET FROM_START 蛇身 i 255 0 0 3 GET FIRST 坐标 3 GET LAST 坐标 方向 描述该功能... 运动方向 'direction' EQ 运动方向 up 0 255 0 3 x0 3 y0 y 1 GT y 7 y 7 255 0 0 3 x 3 y EQ 运动方向 down 0 255 0 3 x0 3 y0 y -1 LT y 0 y 0 255 0 0 3 x 3 y EQ 运动方向 right 0 255 0 3 x0 3 y0 x -1 LT x 0 x 0 255 0 0 3 x 3 y EQ 运动方向 left 0 255 0 3 x0 3 y0 x 1 GT x 7 x 7 255 0 0 3 x 3 y INSERT FIRST 蛇身 x y REMOVE LAST 蛇身 Hello 蛇身 0.5 吃到食物 描述该功能... AND EQ x x0 EQ y y0 蛇长 1 INSERT LAST 蛇身 GET LAST 蛇身 吃到食物 蛇身 吃到食物 蛇长 x0 0 7 y0 0 7 0 255 0 3 x0 3 y0