|
以下脚本范例是关于传世游戏中安全区与老兵对话离线挂机的脚本,系统公布出来能给新手及单身玩家对脚本有一定概念性的了解。能更好的认识传世私服游戏的整体构造及结构.
[@泡点挂机]
尊敬的客人,是否游戏累了呢?平时要多注意休息!身体才\
是革命的本钱,玩累了就把号交给我帮你管理吧!每次下线前,\
记得到我这里进行离线挂机服务!\\
<color=red 离线挂机时间用完后会被系统自动停止涨经验>\\
我要<开始进行挂机/@离线挂机> <领取游戏积分/@领取积分>
[@离线挂机]
请选择你要挂机的方式:\\
<元宝离线挂机/@元宝呱唧> <color=0X9ACD32 不同元宝可以挂机不同的时间,并获得不同的经验>\\
<金币离线挂机/@金币挂机> <color=0X9ACD32 每2万金币可以离线挂机1分钟,每分钟得1万经验值>\\
<免费离线挂机/@免费离线挂机> 只要你站在各地安全区内就可以获得经验\
免费离线挂机不收费,<color=0X9ACD32 每分钟获得5000的经验>\
[@元宝呱唧]
<元宝挂机①/@元宝挂气1> <color=0X9ACD32 每1元宝可以离线挂机10分钟,每分钟得1.5万经验值>\\
<元宝挂机②/@元宝挂气2> <color=0X9ACD32 每2元宝可以离线挂机10分钟,每分钟得4万经验值>\\
<元宝挂机③/@元宝挂气3> <color=0X9ACD32 每3元宝可以离线挂机10分钟,每分钟得5万经验值>\\
<元宝挂机④/@元宝挂气4> <color=0X9ACD32 每4元宝可以离线挂机10分钟,每分钟得7万经验值>\
[@元宝挂气4]
#IF
checkbt
#ACT
queryvalue 请输入你想用元宝挂机的时间:[单位(10分钟)] 2 10 4205
#ELSEACT
MessageBox 对不起,挂机之前请确认是否处于摆摊状态
break
[@getstring4205]
#ACT
Getstring s1
MOV P1 $STR(S1)
CALCVAR HUMAN SCL = $STR(s1)
CALCVAR HUMAN HHPD = $STR(s1)
CALCVAR HUMAN SCL * 4
CALCVAR HUMAN HHPD * 600
goto @元宝挂机5
[@元宝挂机5]
#IF
EQUAL P1 0
#ACT
MessageBox 对不起,你输入数量错误!请重新输入数字,不能为0或带字符
break
#ELSESAY
你选择了使用<color=red 元宝离线挂机:>\\
<color=0X9ACD32 每4元宝可以离线挂机10分钟,每分钟得7万经验值>\\
你想挂<color=red [><$STR(s1)><color=red ]>X10分钟,需要元宝<color=red
[><$human(SCL)><color=red ]>个\\
<确定花费进行挂机/@确定挂气4> <我要重新设定时间/@元宝呱唧>\\
<等会再来/@exit>
[@确定挂气4]
#IF
CHECKLEVELEX < 43
#SAY
对不起,你的等级还不能使用挂机服务.\
要使用本服务至少需要等级达到43级.\\
#ACT
break
#IF
CHECKMAPNAME 7
#ACT
goto @最终允许挂气4
break
#IF
CHECKMAPNAME 1
#ACT
goto @最终允许挂气4
break
#IF
CHECKMAPNAME 0
#ACT
goto @最终允许挂气4
break
#IF
CHECKMAPNAME 2
#ACT
goto @最终允许挂气4
break
#IF
CHECKMAPNAME 5
#ACT
goto @最终允许挂气4
break
#ELSEACT
MessageBox 对不起,您当前所处的地图不允许挂机
break
[@最终允许挂气4]
#IF
CHECKGAMEGOLD > $human(SCL)
#ACT
BreakTimeRecall
setautogetexp 60 1 1
GAMEGOLD - $human(SCL)
settimer $USERNAME $human(HHPD) @挂机下线
MOV S1 元宝离线挂机中...有事请稍后联系...
offline $str(s1) 6 7000
close
#ELSEACT
MessageBox 对不起,您的元宝不足,挂机失败。
break |