求一个能泡经验的脚本

cjoop

非常十分以及极其狗血！

wjvrvt

弱弱的冒个泡！

w55955

非常十分以及极其狗血！

west0845

蹲一个大神，这东西我收了，谢谢楼主！

carrywood

[@泡点系统_1]
#say
{FCOLOR/10}<$USERNAME>{FCOLOR/12}：英雄你好！是不是工作很忙？是不是没时间练级？呵呵！你来对地方了。\ \
{FCOLOR/10}==={FCOLOR/15}条件{FCOLOR/10}==={FCOLOR/12}\
1、每次泡点需要{FCOLOR/10}500{FCOLOR/12}金币。\\
{FCOLOR/10}==={FCOLOR/15}规则{FCOLOR/10}==={FCOLOR/12}\
1、泡点结算周期为{FCOLOR/10}1{FCOLOR/12}分钟。\
2、每小时获取{FCOLOR/10}1200万{FCOLOR/12}点经验值。\
3、泡点中途断线或下线，泡点失效，再次泡点需点击{FCOLOR/10}结束泡点{FCOLOR/12}后才能泡点。\\
马上<开始泡点/@kaishi>___\\
查询<泡点成果/@cxpd>___\\
我要<结束泡点/@letgo>___\\
<返回首页/@main>\\
<关 闭@exit>

[@letgo]
#ACT
LoadValue D0 "ParamControl\泡点服务.ini" [%USERNAME] 经验1
LoadValue D2 "ParamControl\泡点服务.ini" [%USERNAME] 经验2
#IF
EQUAL D0 1
#ACT
SaveValue "ParamControl\泡点服务.ini" [%USERNAME] 经验1 0
Delaygoto [Grobal] 2 @GAMEOVER

[@GAMEOVER]
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12} ：
您本次泡点获取的经验是 {FCOLOR/1}<$OUTPUT(D2)>{FCOLOR/12} 点，欢迎再次光临！


[@cxpd]
#ACT
LoadValue D2 "ParamControl\泡点服务.ini" [%USERNAME] 经验2
MOV P1 %D2
MOV P2 400000
DIV P1 P2
MOV D3 %P9
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12} 你好！\
您本次泡点获经验为：{FCOLOR/1}<$OUTPUT(D2)>{FCOLOR/12} 点。\
您本次泡点耗时间为：{FCOLOR/1}<$OUTPUT(D3)>{FCOLOR/12} 分钟。\ \
<好，我知道了/@exit>

[@kaishi]
#ACT
LoadValue D0 "ParamControl\泡点服务.ini" [%USERNAME] 经验1
#IF
EQUAL D0 0
checkgold 500
#ACT
take 金币 500
Mapmove 1 405 124
SaveValue "ParamControl\泡点服务.ini" [%USERNAME] 经验1 1
SaveValue "ParamControl\泡点服务.ini" [%USERNAME] 经验2 0
Delaygoto [Grobal] 60 @kaishi1
#SAY
{FCOLOR/10}<$USERNAME>{FCOLOR/12}你好！现在开始泡点了。\ \
<嗯，我知道了/@exit>
#ELSESAY
对不起，你不能参加泡点，你的金币或者等级不符合要求呀。\ \
<关 闭/exit>

[@kaishi1]
#ACT
LoadValue D0 "ParamControl\泡点服务.ini" [%USERNAME] 经验1
#IF
EQUAL D0 1
#ACT
LoadValue D2 "ParamControl\泡点服务.ini" [%USERNAME] 经验2
INC D2 400000
SaveValue "ParamControl\泡点服务.ini" [%USERNAME] 经验2 %D2
mov A0 %USERNAME
GIVEEXP %A0 400000
Delaygoto [Grobal] 60 @kaishi1

lan41

沃玛教主使出了雷电术把 lan41 电晕了， 怀旧币 降了 4 .