|
(@@InPutInteger @@InPutString)
[@main]
#IF
CHECKVAR GUILD 门派级别 = 0
#act
MOV S30
#IF
CHECKVAR GUILD 门派级别 = 1
#act
MOV S30
#IF
CHECKVAR GUILD 门派级别 = 2
#act
MOV S30
#IF
CHECKVAR GUILD 门派级别 = 3
#act
MOV S30
#IF
CHECKVAR GUILD 门派级别 = 4
#act
MOV S30
#IF
CHECKVAR GUILD 门派级别 = 5
#act
MOV S30
#IF
haveguild
#ACT
OPENMERCHANTBIGDLG 90 32 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
{/AUTOCOLOR=254,251,168,191,250,70,245,249,253}\ \ \ \
{/FCOLOR=19}\
{/FCOLOR=19}\
{/FCOLOR=19}\
{/FCOLOR=19}\
{/FCOLOR=19}\ \ \ \ \
{/FCOLOR=19}\ \
{/FCOLOR=19}\\ \ \ \
{/FCOLOR=19}\
{/FCOLOR=19}\
{/FCOLOR=19}\
\
#ELSEACT
MESSAGEBOX 未加入任何行会,无法用此功能。
[@门派升级001]
#IF
CHECKVAR GUILD 门派级别 = 0
#ACT
goto @H0版本定制
BREAK
#IF
CHECKVAR GUILD 门派级别 = 1
#ACT
goto @H1版本定制
BREAK
#IF
CHECKVAR GUILD 门派级别 = 2
#ACT
goto @H2版本定制
BREAK
#IF
CHECKVAR GUILD 门派级别 = 3
#ACT
goto @H3版本定制
BREAK
#IF
CHECKVAR GUILD 门派级别 = 4
#ACT
goto @H4版本定制
BREAK
#IF
CHECKVAR GUILD 门派级别 = 5
#ACT
goto @H5版本定制
BREAK
[@H0版本定制]
#if
ISGUILDMASTER
CHECKVAR GUILD 门派资金 > 7999
CHECKVAR GUILD 门派灵力 > 399999
#ACT
CALCVAR GUILD 门派级别 + 1
SAVEVAR GUILD 门派级别 ..\QuestDiary\门派相关\门派级别.txt
CALCVAR GUILD 门派资金 - 8000
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR GUILD 门派灵力 - 400000
SAVEVAR GUILD 门派灵力 ..\QuestDiary\门派相关\门派灵力.txt
SendCenterMsg 0 58 恭喜强大的【】行会成功晋升行会等级.全员获得属性加成,更有神秘地图等待探索,踊跃加入他们吧! 1 30
#ELSEACT
MESSAGEBOX 1.你不是行会掌门\\2.晋升条件不足\\
[@H1版本定制]
#if
ISGUILDMASTER
CHECKVAR GUILD 门派资金 > 14999
CHECKVAR GUILD 门派灵力 > 699999
#ACT
CALCVAR GUILD 门派级别 + 1
SAVEVAR GUILD 门派级别 ..\QuestDiary\门派相关\门派级别.txt
CALCVAR GUILD 门派资金 - 15000
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR GUILD 门派灵力 - 700000
SAVEVAR GUILD 门派灵力 ..\QuestDiary\门派相关\门派灵力.txt
SendCenterMsg 0 58 恭喜强大的【】行会成功晋升行会等级.全员获得属性加成,更有神秘地图等待探索,踊跃加入他们吧! 1 30
#ELSEACT
MESSAGEBOX 1.你不是行会掌门\\2.晋升条件不足\\
[@H2版本定制]
#if
ISGUILDMASTER
CHECKVAR GUILD 门派资金 > 17999
CHECKVAR GUILD 门派灵力 > 899999
#ACT
CALCVAR GUILD 门派级别 + 1
SAVEVAR GUILD 门派级别 ..\QuestDiary\门派相关\门派级别.txt
CALCVAR GUILD 门派资金 - 18000
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR GUILD 门派灵力 - 900000
SAVEVAR GUILD 门派灵力 ..\QuestDiary\门派相关\门派灵力.txt
SendCenterMsg 0 58 恭喜强大的【】行会成功晋升行会等级.全员获得属性加成,更有神秘地图等待探索,踊跃加入他们吧! 1 30
#ELSEACT
MESSAGEBOX 1.你不是行会掌门\\2.晋升条件不足\\
[@H3版本定制]
#if
ISGUILDMASTER
CHECKVAR GUILD 门派资金 > 24999
CHECKVAR GUILD 门派灵力 > 1199999
#ACT
CALCVAR GUILD 门派级别 + 1
SAVEVAR GUILD 门派级别 ..\QuestDiary\门派相关\门派级别.txt
CALCVAR GUILD 门派资金 - 25000
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR GUILD 门派灵力 - 1200000
SAVEVAR GUILD 门派灵力 ..\QuestDiary\门派相关\门派灵力.txt
SendCenterMsg 0 58 恭喜强大的【】行会成功晋升行会等级.全员获得属性加成,更有神秘地图等待探索,踊跃加入他们吧! 1 30
#ELSEACT
MESSAGEBOX 1.你不是行会掌门\\2.晋升条件不足\\
[@H4版本定制]
#if
ISGUILDMASTER
CHECKVAR GUILD 门派资金 > 29999
CHECKVAR GUILD 门派灵力 > 1499999
#ACT
CALCVAR GUILD 门派级别 + 1
SAVEVAR GUILD 门派级别 ..\QuestDiary\门派相关\门派级别.txt
CALCVAR GUILD 门派资金 - 30000
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR GUILD 门派灵力 - 1500000
SAVEVAR GUILD 门派灵力 ..\QuestDiary\门派相关\门派灵力.txt
SendCenterMsg 0 58 恭喜强大的【】行会成功晋升行会等级.全员获得属性加成,更有神秘地图等待探索,踊跃加入他们吧! 1 30
#ELSEACT
MESSAGEBOX 1.你不是行会掌门\\2.晋升条件不足\\
[@H5版本定制]
#if
#ACT
MESSAGEBOX 对不起,门派等级暂时5级为满级,你的门派已经达到5级!
[@军衔称号002]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
200 200\ \
200 200\ \
15000 \ \ \
50000\ \
1000\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
=============================================================
[@军衔称号003]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
250 250\ \
250 250\ \
20000 \ \ \
100000\ \
2500\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
=====================================================
[@军衔称号004]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
300 300\ \
300 300\ \
30000 \ \ \
150000\ \
5000\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
===============================================================
[@军衔称号005]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
400 400\ \
400 400\ \
40000 \ \ \
200000\ \
7000\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
================================================
[@军衔称号006]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
600 600\ \
600 600\ \
50000 \ \ \
250000\ \
8500\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
================================================
[@军衔称号007]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
800 800\ \
800 800\ \
65000 \ \ \
300000\ \
10000\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
========================================
[@军衔称号008]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
1000 1000\ \
1000 1000\ \
80000 \ \ \
320000\ \
15000\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
================================================
[@军衔称号009]
#if
EQUAL U45 0
#act
MOV S30
#if
EQUAL U45 1
#act
MOV S30
#if
EQUAL U45 2
#act
MOV S30
#if
EQUAL U45 3
#act
MOV S30 >
#if
EQUAL U45 4
#act
MOV S30
#if
EQUAL U45 5
#act
MOV S30
#if
EQUAL U45 6
#act
MOV S30
#if
EQUAL U45 7
#act
MOV S30
#if
EQUAL U45 8
#act
MOV S30
#IF
#ACT
OPENMERCHANTBIGDLG 90 29 1 4 0 0 0
#say
\ \ \ \ \ \ \ \ \
\ \ \ \ \
1200 1200\ \
1200 1200\ \
100000 \ \ \
350000\ \
15000\ \ \ \ \
\ \
\
\
\
\
\
\
\
\
\
\
\
\
\
[@InPutInteger3]
#IF
LARGE N3 0
CHECKGAMEGOLD >
#ACT
GAMEGOLD -
CALCVAR GUILD 门派资金 +
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR HUMAN 私人资金 +
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
GOTO @MAIN
SendCenterMsg 0 58 行会成员 699999
#ACT
CALCVAR GUILD 门派级别 + 1
SAVEVAR GUILD 门派级别 ..\QuestDiary\门派相关\门派级别.txt
CALCVAR GUILD 门派资金 - 15000
SAVEVAR GUILD 门派资金 ..\QuestDiary\门派相关\门派资金.txt
CALCVAR GUILD 门派灵力 - 700000
SAVEVAR GUILD 门派灵力 ..\QuestDiary\门派相关\门派灵力.txt
SendCenterMsg 0 58 恭喜强大的【】行会成功晋升行会等级.全员获得属性加成,更有神秘地图等待探索,踊跃加入他们吧! 1 30
#ELSEACT
MESSAGEBOX 1.你不是行会掌门\\2.晋升条件不足\\
[@HH晋升兵]
#if
EQUAL U45 0
CHECKVAR HUMAN 私人灵力 > 49999
CHECKVAR HUMAN 私人资金 > 999
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 50000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 1000
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆士兵☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得士兵级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋护卫]
#if
EQUAL U45 1
CHECKVAR HUMAN 私人灵力 > 99999
CHECKVAR HUMAN 私人资金 > 2499
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 100000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 2500
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆护卫☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得护卫级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋御林军]
#if
EQUAL U45 2
CHECKVAR HUMAN 私人灵力 > 149999
CHECKVAR HUMAN 私人资金 > 4999
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 150000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 5000
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆御林军☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得御林军级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋督统]
#if
EQUAL U45 3
CHECKVAR HUMAN 私人灵力 > 199999
CHECKVAR HUMAN 私人资金 > 6999
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 200000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 7000
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆督统☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得督统级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋太师]
#if
EQUAL U45 4
CHECKVAR HUMAN 私人灵力 > 249999
CHECKVAR HUMAN 私人资金 > 8499
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 250000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 8500
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆太师☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得太师级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋大将]
#if
EQUAL U45 5
CHECKVAR HUMAN 私人灵力 > 299999
CHECKVAR HUMAN 私人资金 > 9999
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 300000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 10000
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆大将☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得大将级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋元帅]
#if
EQUAL U45 6
CHECKVAR HUMAN 私人灵力 > 319999
CHECKVAR HUMAN 私人资金 > 14999
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 320000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 15000
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆元帅☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得元帅级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
[@HH晋总统]
#if
EQUAL U45 7
CHECKVAR HUMAN 私人灵力 > 349999
CHECKVAR HUMAN 私人资金 > 14999
#ACT
INC U45 1
CALCVAR HUMAN 私人灵力 - 350000
SAVEVAR HUMAN 私人灵力 ..\QuestDiary\门派相关\私人灵力.txt
CALCVAR HUMAN 私人资金 - 15000
SAVEVAR HUMAN 私人资金 ..\QuestDiary\门派相关\私人资金.txt
CONFERTITLE ☆总统☆
SendCenterMsg 0 58 恭喜[]成功晋升军衔.获得总统级别,军衔称号有属性加成,更有特殊权限! 1 10
#ELSEACT
MESSAGEBOX 1.你已经获得过次军衔\\2.晋升条件不足\\
来源:网络
免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作! |
|