PK火游戏排行榜, 玩家编程技术

标题: BLUE引擎限时称号传奇脚本教程 [打印本页]

作者: pkhuo    时间: 2021-9-30 20:13
标题: BLUE引擎限时称号传奇脚本教程
[@Bluem2.net_限时称号NPC]
{
#IF
CHECKLEVELEX > 0
#SAY
    <COLOR=#$0079FF 〝≈><COLOR=#$00A0FF 傲><COLOR=#$00B1FF 世><COLOR=#$00C2FF 傳><COLOR=#$00D3FF 奇><COLOR=#$00B1FF ≈><COLOR=#$00FFC5 正版><COLOR=#$00FFD6 授权><COLOR=#$00FFE7 ≈><COLOR=#$00FFF8 公司><COLOR=#$00F5FF 运营><COLOR=#$00E4FF ≈><COLOR=#$00D3FF 独><COLOR=#$00C2FF 家><COLOR=#$00B1FF 奉><COLOR=#$00A0FF 献><COLOR=#$0079FF ≈〞>\
<COLOR=#$00393942 ─────────────────────────────>\
<COLOR=clMoneyGreen 本服无任何赞助大使,为了感谢各位充值玩家对傲世传奇的支持与>\
<COLOR=clMoneyGreen 厚爱,特推出【><COLOR=#$F79600 $(限时称号名称)><COLOR=clMoneyGreen 】游戏称号功能>\
<COLOR=clMoneyGreen 只要充值> <COLOR=clRED 200元> <COLOR=clMoneyGreen 即可获得!>\
<COLOR=#$00FFC5 称号奖励:><COLOR=#$0079FF 战士HP+100 道士HP+70 法师HP+35>\
<COLOR=#$00FFC5 称号奖励:><COLOR=#$0079FF 怪物爆率提高10% 每天可免费进入地狱十八一次>\
<COLOR=#$00FFC5 称号奖励:><COLOR=#$0079FF 每天可领取888欢乐豆><COLOR=#$00FFAADD (领取需前往时来运转地图)>\
<COLOR=#$00393942 ─────────────────────────────>\
<[使用200点卷兑换3天称号]/@兑换3天称号>                <[查看称号剩余时间]/@查看称号剩余时间>
#ACT
BREAK

[@1]
#ACT
DEPRIVETITLE $(限时称号名称)
INTS 4 = 0



[@兑换3天称号]
#IF
CHECKGAMEGOLD ? 200
#ELSEACT
SENDMSG 7 对不起!你没有足够的元宝!
BREAK

#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$YEAR>
DEC S10 1 2
MOV D10 <$STR(S10)> 525600
MOV D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$MONTH>
#IF
LARGE D10 1
#ACT
ReadRandomLine ..\QuestDiary\Bluem2.net_限时称号配置\时间读取\<$STR(D10)>.txt S10
MOV D10 <$STR(S10)>
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$DAY>
#IF
LARGE D10 1
#ACT
DEC D10 1
MUL D10 1440
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$HOUR>
#IF
LARGE D10 0
#ACT
MUL D10 60
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$MINUTE>
#IF
LARGE D10 0
#ACT
INC D11 <$STR(D10)>

#IF
CHECKINTS 4 > <$STR(D11)>
#ACT
GAMEGOLD - 200
MOV P9 1440 $(限时兑换时间)
INTS 4 + <$STR(P9)>
SENDMSG 7 成功兑换3天称号时间!
GOTO @查看称号剩余时间
BREAK
#IF
CHECKLEVELEX > 0
#ACT
GAMEGOLD - 200
INC D11 1440 $(限时兑换时间)
INTS 4 = <$STR(D11)>
CONFERTITLE $(限时称号名称)
BREAK


[@限时称号常量加载]
#CALL [\Bluem2.net_限时称号配置\限时称号常量.ini] @限时称号常量



[@查看称号剩余时间]
#IF
CHECKLEVELEX > 0
#ACT
MOV S10 <$YEAR>
DEC S10 1 2
MOV D10 <$STR(S10)> 525600
MOV D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$MONTH>
#IF
LARGE D10 1
#ACT
ReadRandomLine ..\QuestDiary\Bluem2.net_限时称号配置\时间读取\<$STR(D10)>.txt S10
MOV D10 <$STR(S10)>
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$DAY>
#IF
LARGE D10 1
#ACT
DEC D10 1
MUL D10 1440
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$HOUR>
#IF
LARGE D10 0
#ACT
MUL D10 60
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 <$MINUTE>
#IF
LARGE D10 0
#ACT
INC D11 <$STR(D10)>
#IF
CHECKLEVELEX > 0
#ACT
MOV D12 <$STR(D11)>
MOV D10 <$INTS4>
DEC D10 <$STR(D12)>
;------剩余时间计算
#IF
LARGE D10 0
#ACT
MOV P7 <$STR(D10)>
MOV P8 <$STR(D10)>
DIV P8 1440
MOV S10 (
#IF
LARGE P8 0
#ACT
INC S10 <$STR(P8)>天
MUL P8 1440
DEC P7 <$STR(P8)>
#IF
LARGE D10 0
#ACT
MOV P8 <$STR(P7)>
DIV P8 60
#IF
LARGE D10 0
LARGE P8 0
#ACT
INC S10 <$STR(P8)>小时
MUL P8 60
DEC P7 <$STR(P8)>
#IF
LARGE D10 0
LARGE P7 0
#ACT
INC S10 <$STR(P7)>分钟)

#IF
LARGE D10 0
EQUAL P7 0
#ACT
INC S10 )

#IF
SMALL D10 0
#ACT
MOV S10
#IF
EQUAL D10 0
#ACT
MOV S10



#IF
CHECKLEVELEX > 0
#SAY
    <COLOR=#$0079FF 〝≈><COLOR=#$00A0FF 傲><COLOR=#$00B1FF 世><COLOR=#$00C2FF 傳><COLOR=#$00D3FF 奇><COLOR=#$00B1FF ≈><COLOR=#$00FFC5 正版><COLOR=#$00FFD6 授权><COLOR=#$00FFE7 ≈><COLOR=#$00FFF8 公司><COLOR=#$00F5FF 运营><COLOR=#$00E4FF ≈><COLOR=#$00D3FF 独><COLOR=#$00C2FF 家><COLOR=#$00B1FF 奉><COLOR=#$00A0FF 献><COLOR=#$0079FF ≈〞>\
<COLOR=#$00393942 ─────────────────────────────>\ \
<COLOR=#$00FFC5 您还剩充值点:>(<$GAMEGOLD>)\ \
<COLOR=#$00FFC5 称号剩余时间:><$STR(S10)>\
<COLOR=#$00393942 ─────────────────────────────>\
<[使用200点卷兑换3天称号]/@兑换3天称号>\ \
<COLOR=clRED 注意:称号未到期前连续兑换时间累加!>
}





作者: hming666    时间: 2022-12-2 12:39
而非个人为服务




欢迎光临 PK火游戏排行榜, 玩家编程技术 (https://pkhuo.com/) Powered by Discuz! X3.4