[传奇脚本] blue引擎赏金猎人通缉脚本

[复制链接]
查看33 | 回复0 | 2024-7-14 10:42:09 | 显示全部楼层 |阅读模式
[@BLueMir2_赏金猎人NPC]
{

#IF
CHECKLEVELEX > 0
#ACT
SetMerchantDlgImgName MerchantDlg.png
ReadRandomLine ..\QuestDiary\BLueMir2_游戏功能配制\赏金猎人\抽取数据\空格.txt S0
CALCVAR HUMAN 赏金猎人输入页 = 1
DELAYGOTO 1 @赏金猎人页面显示

[@赏金猎人页面显示]
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 1
#ACT
MOV S18 <COLOR=clRed
INC S18
INC S18 [1]> 
#ELSEACT
MOV S18 <[1]/@赏金猎人页数1> 
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 2
#ACT
MOV S17 <COLOR=clRed
INC S17
INC S17 [2]> 
INC S18 <$STR(S17)>
#ELSEACT
MOV S17 <[2]/@赏金猎人页数2> 
INC S18 <$STR(S17)>
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 3
#ACT
MOV S17 <COLOR=clRed
INC S17
INC S17 [3]> 
INC S18 <$STR(S17)>
#ELSEACT
MOV S17 <[3]/@赏金猎人页数3> 
INC S18 <$STR(S17)>
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 4
#ACT
MOV S17 <COLOR=clRed
INC S17
INC S17 [4]> 
INC S18 <$STR(S17)>
#ELSEACT
MOV S17 <[4]/@赏金猎人页数4> 
INC S18 <$STR(S17)>
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 5
#ACT
MOV S17 <COLOR=clRed
INC S17
INC S17 [5]> 
INC S18 <$STR(S17)>
#ELSEACT
MOV S17 <[5]/@赏金猎人页数5> 
INC S18 <$STR(S17)>
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 6
#ACT
MOV S17 <COLOR=clRed
INC S17
INC S17 [6]> 
INC S18 <$STR(S17)>
#ELSEACT
MOV S17 <[6]/@赏金猎人页数6> 
INC S18 <$STR(S17)>
#IF
CHECKVAR HUMAN 赏金猎人输入页 = 7
#ACT
MOV S17 <COLOR=clRed
INC S17
INC S17 [7]>
INC S18 <$STR(S17)>
#ELSEACT
MOV S17 <[7]/@赏金猎人页数7>
INC S18 <$STR(S17)>

#IF
CHECKLEVELEX > 0
#ACT
CALCVAR HUMAN 赏金猎人NPC显示01 =
CALCVAR HUMAN 赏金猎人NPC显示02 =
CALCVAR HUMAN 赏金猎人NPC显示03 =
CALCVAR HUMAN 赏金猎人NPC显示04 =
CALCVAR HUMAN 赏金猎人NPC显示05 =
CALCVAR HUMAN 赏金猎人NPC显示06 =
CALCVAR HUMAN 赏金猎人NPC显示07 =
#IF
CHECKLEVELEX > 0
#ACT
MOV D10 7
CALCVAR HUMAN 赏金猎人输入序 = <$HUMAN(赏金猎人输入页)>
CALCVAR HUMAN 赏金猎人输入序 - 1
CALCVAR HUMAN 赏金猎人输入序 * <$STR(D10)>
CALCVAR HUMAN 赏金猎人输入序 + 1
f0ecf06cbc423254b6f600474ffc2b79_232100mc852fc48cvvv629.png

游客,如果您要查看本帖隐藏内容请回复


马永贞版本库,GM论坛传奇版本下载基地,传奇一条龙!马币1:100 站长QQ:185277791
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则