[@飞升灵丹]
#IF
CHECKLEVELEX < 65
#SAY
只有65级以上未飞升的勇士才可使用飞升灵丹\\
<知道了/@exit>
#ACT
break
#IF
LARGE $AMBITKIND 2
#SAY
你已经是天人了。没有必要再飞升了\\
<知道了/@exit>
#ACT
break
#IF
checkitem 飞升灵丹 1
#SAY
<COLOR=GREEN 天人分为崇尚太阴之力的修神者和摄取太阳之力的修魔>\
<COLOR=GREEN 者，勇士要修神还是修魔啊？>\
我将收取你包裹中的1个飞升灵丹。\
<color=orange 注：每人仅有一次选择修炼类型的机会，一旦选择后将>\
<color=orange 永远无洗更改，请慎重选择！>\\
<我要修神/@飞升天人&3>\
<我要修魔/@飞升天人&4>\
<离开/@exit>\
#ACT
break
#ELSESAY
你包裹没有飞升灵丹，无法给你飞升\\
<知道了/@exit>
[@飞升天人]
#IF
EQUAL $SCRIPTPARAM(1) 3
gender MAN
#ACT
take 飞升灵丹 1
MAPMOVE FlySD 41 55
AmbitKind = 3
GOTO @检测等级
SHOWHUMEFFECT 111
#CALL [\游戏功能\登陆触发\等级封号.txt] @等级封号
SENDMSG 8 天地变色，云霞翻滚，浩天破地的能量震撼着整个中州，九道浩天神雷如期而至将<$USERNAME>力量提炼的更加精纯，使其足以突破凡间的束缚飞升成为天人。
break
#IF
EQUAL $SCRIPTPARAM(1) 3
gender WOMAN
#ACT
take 飞升灵丹 1
MAPMOVE FlySD 41 55
AmbitKind = 3
GOTO @检测等级
SHOWHUMEFFECT 111
#CALL [\游戏功能\登陆触发\等级封号.txt] @等级封号
SENDMSG 8 天地变色，云霞翻滚，浩天破地的能量震撼着整个中州，九道浩天神雷如期而至将<$USERNAME>力量提炼的更加精纯，使其足以突破凡间的束缚飞升成为天人。
break
#IF
EQUAL $SCRIPTPARAM(1) 4
gender MAN
#ACT
take 飞升灵丹 1
MAPMOVE FlyMD 16 52
AmbitKind = 4
GOTO @检测等级
SHOWHUMEFFECT 110
#CALL [\游戏功能\登陆触发\等级封号.txt] @等级封号
SENDMSG 8 天地变色，云霞翻滚，浩天破地的能量震撼着整个中州，九道浩天神雷如期而至将<$USERNAME>力量提炼的更加精纯，使其足以突破凡间的束缚飞升成为天人。
break
#IF
EQUAL $SCRIPTPARAM(1) 4
gender WOMAN
#ACT
take 飞升灵丹 1
MAPMOVE FlyMD 16 52
AmbitKind = 4
GOTO @检测等级
SHOWHUMEFFECT 110
#CALL [\游戏功能\登陆触发\等级封号.txt] @等级封号
SENDMSG 8 天地变色，云霞翻滚，浩天破地的能量震撼着整 个中州，九道浩天神雷如期而至将<$USERNAME>力量提炼的更加精纯，使其足以突破凡间的束缚飞升成为天人。
break
[@检测等级]
#IF
checkjob warrior
#ACT
MOV S40 $LEVEL
INC S40 |
#IF
!EQUAL $STR(S40)
PosInList $STR(S40) ..\QuestDiary\游戏读取\天人元力.txt S11
#ACT
SPLIT $STR(S11) | S12
AmbitLevel = $STR(S13)
ElementForce = $STR(S14)
ElementForceMax = $STR(S14)
break
#IF
checkjob wizard
#ACT
MOV S40 $LEVEL
INC S40 |
#IF
!EQUAL $STR(S40)
PosInList $STR(S40) ..\QuestDiary\游戏读取\天人元力.txt S11
#ACT
SPLIT $STR(S11) | S12
AmbitLevel = $STR(S13)
ElementForce = $STR(S15)
ElementForceMax = $STR(S15)
break
#IF
checkjob taoist
#ACT
MOV S40 $LEVEL
INC S40 |
#IF
!EQUAL $STR(S40)
PosInList $STR(S40) ..\QuestDiary\游戏读取\天人元力.txt S11
#ACT
SPLIT $STR(S11) | S12
AmbitLevel = $STR(S13)
ElementForce = $STR(S16)
ElementForceMax = $STR(S16)
break
以下为天人元力.txt文本
;等级|重数|战的神(魔)元力|法的神(魔)元力|道的神(魔)元力
65|1|162|41|88
66|2|164|43|91
67|3|167|46|94
68|4|171|50|98
69|5|176|55|103
70|6|182|61|109
71|7|189|68|116