admin 发表于 2020-12-23 11:03:37

GOM引擎富豪捐献脚本， 传奇一条龙开区富豪捐献系统脚本教程

http://219.150.218.177:82/data/attachment/forum/201907/19/172537nyvbjh4nqx2hjjzp.png

[@main]
#IF
#ACT
OPENMERCHANTBIGDLG 7 275 0 0 0 0 1 480 2
MOV S$显示第1名 　
SetStringBlank S$显示第1名 18 1
MOV S$显示第2名 　
SetStringBlank S$显示第2名 18 1
MOV S$显示第3名 　
SetStringBlank S$显示第3名 18 1

#SAY
\
　　　　　　　　　　　\
　\
　[　] []\
　[　] []\
　[　] []\
　\
　\
　\
<               >      \
　　　　\
　　　　\
　　　　\
　　　　　　　\
　　　　　　　\
　　　　　　　\


[@d1]
#IF
CHECKTITLE 第一富豪
#ACT
MAP yanhuangzhide
SetOnTimer 11 1
GuildNoticeMsg 151 249 玩家『』进入了排行榜第一名。
break
#ELSEACT
MESSAGEBOX 您还不是排行榜第一名，加油吧！
break


[@酒鬼币捐献]
#act
MOV S$显示第1名 　
SetStringBlank S$显示第1名 18 1
MOV S$显示第2名 　
SetStringBlank S$显示第2名 18 1
MOV S$显示第3名 　
SetStringBlank S$显示第3名 18 1

[@InPutInteger88]
#if
small N88 1
#ACT
MESSAGEBOX 【失败】：最少捐献1人民币点!
BREAK
#IF
CHECKLEVELEX > 0
#ACT
MOV P61
INC P61
#IF
LARGE P61 0
#ELSEACT
messagebox 你当前所捐献的金额,累计总额里后超出系统上限,请重新输入！\(最高累计金额21.47亿)
BREAK

#IF
CHECKGamePoint <
#ACT
messagebox 你没有人民币点,拿什么捐献？
BREAK
#ELSEACT
GamePoint -
CALCVAR HUMAN YBJX-个人捐献 +
SAVEVAR HUMAN YBJX-个人捐献 ..\QuestDiary\元宝捐献\元宝捐献排行数据.txt
GOTO @开始捐献排名
GuildNoticeMsg 254 0 【人民币点捐献提示】：[]捐献了[]人民币点!当前排名:
GOTO @酒鬼币捐献
GMEXECUTE 开始提问 @元宝捐献属性刷新

[@开始捐献排名]
#IF
CHECKLEVELEX > 0
#ACT
SortHumVarToListEx YBJX-个人捐献 ..\QuestDiary\元宝捐献\元宝捐献排行数据.txt 1 ..\QuestDiary\元宝捐献\元宝捐献排行排名.txt 1
AddTextList ..\QuestDiary\元宝捐献\元宝捐献排行排名.txt 　:0
AddTextList ..\QuestDiary\元宝捐献\元宝捐献排行排名.txt 　:0

#IF
CHECKLEVELEX > 0
#ACT
GetListString ..\QuestDiary\元宝捐献\元宝捐献排行排名.txt 0 s90 N90
#IF
LARGE N90 0
#ACT
CALCVAR GLOBAL YBJX-捐献第1名 =
CALCVAR GLOBAL YBJX-捐献第1数 =
#ELSEACT
CALCVAR GLOBAL YBJX-捐献第1名 = 　
CALCVAR GLOBAL YBJX-捐献第1数 =
#IF
CHECKLEVELEX > 0
#ACT
GetListString ..\QuestDiary\元宝捐献\元宝捐献排行排名.txt 1 s90 N90
#IF
LARGE N90 0
#ACT
CALCVAR GLOBAL YBJX-捐献第2名 =
CALCVAR GLOBAL YBJX-捐献第2数 =
#ELSEACT
CALCVAR GLOBAL YBJX-捐献第2名 = 　
CALCVAR GLOBAL YBJX-捐献第2数 =
#IF
CHECKLEVELEX > 0
#ACT
GetListString ..\QuestDiary\元宝捐献\元宝捐献排行排名.txt 2 s90 N90
#IF
LARGE N90 0
#ACT
CALCVAR GLOBAL YBJX-捐献第3名 =
CALCVAR GLOBAL YBJX-捐献第3数 =
#ELSEACT
CALCVAR GLOBAL YBJX-捐献第3名 = 　
CALCVAR GLOBAL YBJX-捐献第3数 =


#if
CHECKVAR GLOBAL YBJX-捐献第1名 =
#act
MOV S$当前排名 第一名
BREAK
#if
CHECKVAR GLOBAL YBJX-捐献第2名 =
#act
MOV S$当前排名 第二名
BREAK
#if
CHECKVAR GLOBAL YBJX-捐献第3名 =
#act
MOV S$当前排名 第三名
BREAK


来源：网络
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！

aa1010123 发表于 2023-2-23 22:28:34

对方个人风格天热个人头
页: [1]
查看完整版本: GOM引擎富豪捐献脚本， 传奇一条龙开区富豪捐献系统脚本教程