GM1991 发表于 2013-5-24 12:36:03

【芝麻GM论坛】传奇私服脚本系列-开通农场触发脚本

[@开通农场]
#IF
CHECKNAMELIST ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT
#ACT
SENDMSG 6 对不起,开通农场失败,请确认你是否已经开通过农场!
BREAK
#ELSEACT
MOV N11 <$GLOBAL(开通费用)>
DEC N11 1
#IF
CHECKGAMEGOLD > <$STR(N11)>
#ACT
GAMEGOLD - <$GLOBAL(开通费用)>
CreateFile QuestDiary\Mrrp系列脚本\传奇农场\偷盗数据\<$USERNAME>1号地.txt
CALCVAR HUMAN 种植等级 = 1
SAVEVAR HUMAN 种植等级 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
CALCVAR HUMAN 第一块地种植 = 空地
SAVEVAR HUMAN 第一块地种植 ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\玩家数据.txt
SENDMSG 6 恭喜您,农场开通成功!
#ELSEACT
SENDMSG 6 对不起,开通农场失败,请确认你是否拥有(<$GLOBAL(开通费用)>)元宝!
BREAK


#IF
RANDOM 3
#ACT
AddNAMELIST ..\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT
BREAK


#IF
RANDOM 2
#ACT
MOVR N11 1 51
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT <$USERNAME> <$STR(N11)>
BREAK
#ELSEACT
AddTextListEx .\QuestDiary\Mrrp系列脚本\传奇农场\农场数据\开通农场名单.TXT <$USERNAME> 0
BREAK


页: [1]
查看完整版本: 【芝麻GM论坛】传奇私服脚本系列-开通农场触发脚本