2.[@UserCmd7]
#if
ISADMIN
#say
亲爱的新开网通传奇手游管理员,你好!你选择你需要设置的项目,当前开区天数:$GLOBAL(开区天数),\
复位开区第一天/@复位第一天,\
复位新区拿沙/@复位东北网通传奇新区拿沙,\
复位老区拿沙/@复位老区拿沙,\
设置全区拿沙/@设置全区拿沙,\
增加开区天数/@增加开区天数,\
[@复位第一天]
#if
#act
CALCVARGLOBAL开区天数=0
SAVEVARGLOBAL开区天数..\QuestDiary\重要数据\行会收人数据.txt
CALCVARGLOBAL攻沙奖励=0
SAVEVARGLOBAL攻沙奖励..\QuestDiary\重要数据\行会收人数据.txt
CALCVARGLOBAL领取次数=0
SAVEVARGLOBAL领取次数..\QuestDiary\重要数据\行会收人数据.txt
messagebox已经成功复位第一天设置
break
[@复位新区拿沙]
#if
#act
CALCVARGLOBAL开区天数=1
SAVEVARGLOBAL开区天数..\QuestDiary\重要数据\行会收人数据.txt
CALCVARGLOBAL攻沙奖励=0
SAVEVARGLOBAL攻沙奖励..\QuestDiary\重要数据\行会收人数据.txt
CALCVARGLOBAL领取次数=0
SAVEVARGLOBAL领取次数..\QuestDiary\重要数据\行会收人数据.txt
messagebox已经成功复位新区拿沙设置
break
[@复位老区拿沙]
#if
#act
CALCVARGLOBAL开区天数=2
SAVEVARGLOBAL开区天数..\QuestDiary\重要数据\行会收人数据.txt
CALCVARGLOBAL攻沙奖励=0
SAVEVARGLOBAL攻沙奖励..\QuestDiary\重要数据\行会收人数据.txt
CALCVARGLOBAL领取次数=0
SAVEVARGLOBAL领取次数..\QuestDiary\重要数据\行会收人数据.txt
messagebox已经成功复位老区拿沙设置
break
[@设置全区拿沙]
#if
#act
AddAttackSabukAll0
messagebox已经设置好全区拿沙
break
[@增加开区天数]
#if
#act
CALCVARGLOBAL开区天数+1
SAVEVARGLOBAL开区天数..\QuestDiary\重要数据\行会收人数据.txt
messagebox已经成功增加开区天数
break
;--------------------------------------------------------------
[@BuyShopItem]
#IF
CHECKTEXTLIST.\QuestDiary\抽取数据\系统限制\商铺不提示.txt$STR(S0),
#ELSEACT
AddTextList.\QuestDiary\重要数据\消费记录\商铺消费记录.txt〖$USERNAME,〗购买了【$STR(S0),】$DATETIME,
;--------------------------------------------------------------
[@清理背包]
#ACT
GmexEcute清理垃圾$USERNAME,
BREAK
;--------------------------------------------------------------
[@前往土药]
#ACT
MOVRN11353362
MOVRN12336345
MAPMOVE3$STR(N11),$STR(N12),
BREAK。 |
4.[@PlayOffline]
#IF
ChecknameList..\QuestDiary\数据文件\坐监名单.txt
#ACT
BREAK
#IF
checkpkpoint2
#ACT
mapmove3849674
OFFLINE1000100
BREAK
#IF
CHECKLEVELEX,40
CheckRangeHumCount333033020150
#ACT
MOVRP818
INCP8321
MOVRP717
INCP7322
mapmove3$STR(P8),$STR(P7),
addnamelist..\QuestDiary\挂机.txt
OFFLINE1000100
BREAK
[@TakeOn12]
#if
IsOnMap0127
checkitemw千里传音(大)1
#act
TakeEx12
#if
IsOnMap0127
checkitemw千里传音(小)1
#act
TakeEx12
[@TakeOn14]
#if
checkitemw蒙面黑巾1
#act
SETRANKLEVELNAME神秘人\神秘人\ \ \ \ \ \ \ \ \ \ \ \%s
SendMsg6你佩带了蒙面黑巾,名字显示为《神秘人》
[@TakeOff14]
#if
checkitem蒙面黑巾1
#act
SETRANKLEVELNAME%s
SendMsg6你取下了蒙面黑巾,名字显示正常!
[@Challenge]
#IF
CHECKMAPHUMANCOUNTEM029A=0
#ACT
CHALLENGMAPMOVEEM029A1415
BREAK
#IF
#ACT
goto@Challenge_Fail
[@Challenge_Fail]
#IF
#ACT
GETCHALLENGEBAKITEM
#SAY
当前地图人数已经满员!请稍后再试,谢谢!\
;挑战胜利者执行..
[@Challenge_Win]
#IF
#ACT
SendMsg5挑战胜利..
。 |
5.;--------------------------------------------------------------
[@恢复封号]
#CALL[\游戏登陆\封号设置.txt]@封号设置
[@MapEventRun1]
#IF
CHECKLEVELEX80
#ACT
MOVRP8323339
MOVRP7323339
mapmove3$STR(P8),$STR(P7),
messagebox小新兵蛋子!80级都没有!人家攻沙你凑什么热闹?老老实实呆着吧!
BREAK
[@MapEventRun3]
#IF
EQUALG1081
#ACT
#CALL[\.1xlala.\土城酷跑.txt]@土城酷跑
BREAK
[@MapEventWalk1]
#IF
CHECKLEVELEX80
#ACT
MOVRP8323339
MOVRP7323339
mapmove3$STR(P8),$STR(P7),
messagebox小新兵蛋子!80级都没有!人家攻沙你凑什么热闹?老老实实呆着吧!
BREAK
;---------------------
;功能:离线挂机触发
;---------------------
[@PlayReconnection]
#IF
ISCASTLEMASTER
#ACT
SENDMSG0ぐ万人景仰的沙城主『$USERNAME,』暂时离开了$SERVERNAME,!
#IF
ISGUILDMASTER
#ACT
SENDMSG8ぐ掌门人『$USERNAME,』暂时离开了$SERVERNAME,!
。 |