见过大多数飞机娘的巨集，不仅繁琐，管理也麻烦
特别是一些私人飞机娘，每次增加许可的个人和公会，就要在每个飞机娘的巨集里做修改
闲来无事，终于帮厕所君的飞机娘做了一次小修改，名单全部后台管理。所有飞机娘共用一份乘客名单。每次添加新的成员时，直接在乘客名单里做修改后保存即可，飞机娘也不需要重启。
另外更添加了传送地点集成管理，这样不需要每一个地点都写一段技能释放。
最后改下来的巨集 简，而未减。
更重要的是通用化！每个飞机娘的巨集都几乎一致，只需要改动两个小地方就能事先传送不同地方。

automacro pubm {
console /\[(距离|dist)=(.*)\] (.*) \((\d+)\): (.*)$/
call {
$a = @invamount(藍色魔力礦石)
$c = @eval (222 - $a)
$b = @invamount(藍色魔力礦石)
if (@invamount(藍色魔力礦石) == 0) goto nostone
$i = $.lastMatch4
$pname = @eval (exists $::players{$::playersID[$i]} ? $::players{$::playersID
[$i]}->{name} : 'null')
$gname = @eval (exists $::players{$::playersID[$i]}->{guild} ? $::players
{$::playersID[$i]}->{guild}{name} : 'null')
$authp = authplayer("$pname")
$authg = authguild("$gname")
if ($authp == 1 || $authg == 1 ) goto ok

stop
:nostone
do chat create "(> <)我要石头" 2 0 1111
pause 20
do chat leave
pause 1
stop
:ok
$posx = @arg ("$.pos", 1)
$posy = @arg ("$.pos", 2)
$pos1 = randpos($posx,$posy)
#构建的子函数，返回一个对原坐标修正值在（-3 ~ 3）的一个新坐标
$warpid = warpid("$.lastMatch5")
if ($.lastMatch5 == "123") goto buff1
if ($warpid != 0) goto a
stop
:buff1
do sp 34 $i 10
do sp 29 $i 10
pause 1
stop
:a
pause 1
do c 送你离开千里之外，请不要回来
pause 1
do sl 27 $pos1
pause 3
do warp $warpid
pause 1
if ($b == @invamount(藍色魔力礦石)) goto a
stop
}
}

即将添加的新功能是
1.通过密语指挥飞机娘 删除现有的名单或者添加新的名单
2.另外增加十万个冷笑话（应WC君要求），每次飞机娘服务前都会为尊贵的您讲一句冷笑话哦，亲

居然如此给力！

哎，虽然我没得用，还是要顶起，K君辛苦了~！

给力 支持

汗. 没接触过所谓的Openkore 就看到这个巨集, 请问楼主这些巨集使用什么语言写的?
有没有手册或者是函数库查询之类的东西?
我想研究一下私人飞机系统. 看起来很方便的.
先谢过楼主
@kevinct

没有BUFF的吗、、、

这个真的可以参考并学习！