TSnakeScene.TheSnakeEatTheBonus Method

Unit: uSceneSnake
procedure TheSnakeEatTheBonus