``` procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs); begin //Push函数返回实际被推开的距离.在障碍物的影响下,实际推出距离可能小于指定的距离 if Player.Push(Random(8){随机8个方向中的一个}, Random(5) + 1{推出1-5格距离}) > 0 then Player.Messagebox('你被推开了！'); end; ```