飞机大战pge2D游戏引擎实例

.变量循环首 (局_计次个数, 1, -1, 局_计次数值)
.如果真 (程_敌机子弹 [局_计次数值].完成 ())
删除成员 (程_敌机子弹, 局_计次数值, 1)
到循环尾 ()
.如果真结束
.如果真 (全_友方战机.碰撞 ().测点 (程_敌机子弹 [局_计次数值].位置 ().横向坐标, 程_敌机子弹 [局_计次数值].位置 ().纵向坐标))
全_友方战机.击中 (程_敌机子弹 [局_计次数值].威力 ())
.如果真 (全_友方战机.生命 () ≤ 0)
调试输出 ()
场景_静音 ()
PG_音效_停止 (辅助_获取音效指针 (“sound\stage\08.ogg”))
PG_音效_播放 (辅助_获取音效指针 (“sound\stage\08.ogg”))
全_游戏信息.进度 ＝ #游戏进度_战机阵亡
全_游戏信息.关卡 ＝ “战机阵亡” ＋ #换行符 ＋ “ ” ＋ 全_游戏信息.关卡 ＋ #换行符 ＋ “ 击落敌机：” ＋ 到文本 (全_游戏信息.敌机) ＋ “架” ＋ #换行符 ＋ “ 共得分数：” ＋ 到文本 (全_游戏信息.分数)
.如果真结束
删除成员 (程_敌机子弹, 局_计次数值, 1)
到循环尾 ()
.如果真结束
程_敌机子弹 [局_计次数值].更新 ()
.变量循环尾 ()