官方微博诗风博客TG官方群EG官方群
开启辅助访问      

传世单机社区

 找回密码
 立即注册
https://www.wooolc.com
传世单机社区»论坛 › 传世单机 ╃ 分享交流 › 脚本交流 › 步步生莲脚本
123456下一页
返回列表 发新帖
查看: 7250|回复: 49

[彩虹脚本] 步步生莲脚本

  [复制链接]
﹑kk.

升级   100%

发表于 2018-3-15 10:12:20 | 显示全部楼层 |阅读模式

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要 登录 才可以下载或查看，没有账号？立即注册

x
本帖最后由 ﹑kk. 于 2018-3-16 09:38 编辑

本来应该发神龙许愿脚本的.恰好昨晚群里那个大菠萝问起了步步生莲.就临时改为了这个脚本.闲话少说.看不懂的直接复制粘贴即可.
..\Dbserve\CustomTableList.TXT
SG_PRIVITE Hum27:Int

..\Mir200\Envir\market_def\广场\广场_步步生莲-zzgc.TXT
[@main]
#IF
PneumaReleased
#SAY
    勇士，在我这里你可以将脚印光环开启。光环总共11环。\
可以通过消耗<离火晶石/@qxjy>，升级光环属性获得大幅提升。\
    <color=green 当前你的脚印等级：><$TABLE(SG_PRIVITE).Hum27><color=green 级脚印光环>\
    <color=green 当前元神脚印等级：><$HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27><color=green 级脚印光环>\
    <升级本体脚印光环/@sjztjy>        <升级元神脚印光环/@sjysjy>\
#ACT
break
#ELSESAY
    勇士，在我这里你可以将脚印光环开启。光环总共11环。\
可以通过消耗<离火晶石/@qxjy>，升级光环属性获得大幅提升。\
    <color=green 当前你的脚印等级：><$TABLE(SG_PRIVITE).Hum27><color=green 级脚印光环>\
    <升级本体脚印光环/@sjztjy>

[@qxjy]
    升级脚印光环所需：\
    消耗<color=green 100个离火晶石>升级为<color=green 1级脚印光环>\
    消耗<color=green 200个离火晶石>升级为<color=green 2级脚印光环>\
    消耗<color=green 300个离火晶石>升级为<color=green 3级脚印光环>\
    消耗<color=green 400个离火晶石>升级为<color=green 4级脚印光环>\
    消耗<color=green 500个离火晶石>升级为<color=green 5级脚印光环>\
    消耗<color=green 600个离火晶石>升级为<color=green 6级脚印光环>\
    消耗<color=green 700个离火晶石>升级为<color=green 7级脚印光环>\
    <下一页/@xyy>    <返回/@main>

[@xyy]
    升级脚印光环所需：\
    消耗<color=green 800个离火晶石>升级为<color=green 8级脚印光环>\
    消耗<color=green 900个离火晶石>升级为<color=green 9级脚印光环>\
    消耗<color=green 1000个离火晶石>升级为<color=green 10级脚印光环>\
    消耗<color=green 1500个离火晶石>升级为<color=green 顶级脚印光环>\\\\
    <上一页/@qxjy>    <返回/@main>

[@sjztjy]
#IF
LARGE $TABLE(SG_PRIVITE).Hum27 10
#ACT
SENDMSG 5 你的脚印光环已经顶级了
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 0
CHECKITEM 离火晶石 100
#ACT
TAKE 离火晶石 100
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 1
CHECKITEM 离火晶石 200
#ACT
TAKE 离火晶石 200
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 2
CHECKITEM 离火晶石 300
#ACT
TAKE 离火晶石 300
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 3
CHECKITEM 离火晶石 400
#ACT
TAKE 离火晶石 400
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 4
CHECKITEM 离火晶石 500
#ACT
TAKE 离火晶石 500
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 5
CHECKITEM 离火晶石 600
#ACT
TAKE 离火晶石 600
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 6
CHECKITEM 离火晶石 700
#ACT
TAKE 离火晶石 700
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 7
CHECKITEM 离火晶石 800
#ACT
TAKE 离火晶石 800
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 8
CHECKITEM 离火晶石 900
#ACT
TAKE 离火晶石 900
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 9
CHECKITEM 离火晶石 1000
#ACT
TAKE 离火晶石 1000
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break

#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 10
CHECKITEM 离火晶石 1500
#ACT
TAKE 离火晶石 1500
TABLE SG_PRIVITE Hum27 + 1
HCALL $USERNAME @临时封号
GOTO @main
break
#ELSEACT
SENDMSG 5 你的离火晶石不足
break

[@sjysjy]
#IF
LARGE $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 10
#ACT
SENDMSG 5 你元神的脚印光环已经顶级了
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 0
CHECKITEM 离火晶石 100
#ACT
TAKE 离火晶石 100
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 1
CHECKITEM 离火晶石 200
#ACT
TAKE 离火晶石 200
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 2
CHECKITEM 离火晶石 300
#ACT
TAKE 离火晶石 300
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 3
CHECKITEM 离火晶石 400
#ACT
TAKE 离火晶石 400
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 4
CHECKITEM 离火晶石 500
#ACT
TAKE 离火晶石 500
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 5
CHECKITEM 离火晶石 600
#ACT
TAKE 离火晶石 600
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 6
CHECKITEM 离火晶石 700
#ACT
TAKE 离火晶石 700
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 7
CHECKITEM 离火晶石 800
#ACT
TAKE 离火晶石 800
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 8
CHECKITEM 离火晶石 900
#ACT
TAKE 离火晶石 900
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 9
CHECKITEM 离火晶石 1000
#ACT
TAKE 离火晶石 1000
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break

#IF
EQUAL $HUMANINFO[$PNEUMANAME].$TABLE(SG_PRIVITE).Hum27 10
CHECKITEM 离火晶石 1500
#ACT
TAKE 离火晶石 1500
$PNEUMANAME.TABLE SG_PRIVITE Hum27 + 1
HCALL $PNEUMANAME @临时封号
GOTO @main
break
#ELSEACT
SENDMSG 5 你的离火晶石不足
break


..Mir200\Envir\QuestDiary\登陆设置\在线封号.TXT
[@临时封号] PNEUMA
{

#IF
RANDOM 1
#ACT
RESTPROVISIONALABIL

DelayCall 1 @脚印等级
break


[@脚印等级] PNEUMA
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 1
#ACT
CHANGEMODE 33 1
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 1        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 1        ；魔防
SetProvisionalAbil 4 + 2        ；攻击
SetProvisionalAbil 5 + 2        ；攻击
SetProvisionalAbil 6 + 2        ；魔法
SetProvisionalAbil 7 + 2        ；魔法
SetProvisionalAbil 8 + 2        ；道术
SetProvisionalAbil 9 + 2        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 2
#ACT
CHANGEMODE 33 2
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 2        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 2        ；魔防
SetProvisionalAbil 4 + 3        ；攻击
SetProvisionalAbil 5 + 3        ；攻击
SetProvisionalAbil 6 + 3        ；魔法
SetProvisionalAbil 7 + 3        ；魔法
SetProvisionalAbil 8 + 3        ；道术
SetProvisionalAbil 9 + 3        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 3
#ACT
CHANGEMODE 33 3
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 3        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 3        ；魔防
SetProvisionalAbil 4 + 5        ；攻击
SetProvisionalAbil 5 + 5        ；攻击
SetProvisionalAbil 6 + 5        ；魔法
SetProvisionalAbil 7 + 5        ；魔法
SetProvisionalAbil 8 + 5        ；道术
SetProvisionalAbil 9 + 5        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 4
#ACT
CHANGEMODE 33 4
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 4        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 4        ；魔防
SetProvisionalAbil 4 + 7        ；攻击
SetProvisionalAbil 5 + 7        ；攻击
SetProvisionalAbil 6 + 7        ；魔法
SetProvisionalAbil 7 + 7        ；魔法
SetProvisionalAbil 8 + 7        ；道术
SetProvisionalAbil 9 + 7        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 5
#ACT
CHANGEMODE 33 5
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 5        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 5        ；魔防
SetProvisionalAbil 4 + 9        ；攻击
SetProvisionalAbil 5 + 9        ；攻击
SetProvisionalAbil 6 + 9        ；魔法
SetProvisionalAbil 7 + 9        ；魔法
SetProvisionalAbil 8 + 9        ；道术
SetProvisionalAbil 9 + 9        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 6
#ACT
CHANGEMODE 33 6
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 7        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 7        ；魔防
SetProvisionalAbil 4 + 11        ；攻击
SetProvisionalAbil 5 + 11        ；攻击
SetProvisionalAbil 6 + 11        ；魔法
SetProvisionalAbil 7 + 11        ；魔法
SetProvisionalAbil 8 + 11        ；道术
SetProvisionalAbil 9 + 11        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 7
#ACT
CHANGEMODE 33 7
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 9        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 9        ；魔防
SetProvisionalAbil 4 + 14        ；攻击
SetProvisionalAbil 5 + 14        ；攻击
SetProvisionalAbil 6 + 14        ；魔法
SetProvisionalAbil 7 + 14        ；魔法
SetProvisionalAbil 8 + 14        ；道术
SetProvisionalAbil 9 + 14        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 8
#ACT
CHANGEMODE 33 8
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 11        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 11        ；魔防
SetProvisionalAbil 4 + 17        ；攻击
SetProvisionalAbil 5 + 17        ；攻击
SetProvisionalAbil 6 + 17        ；魔法
SetProvisionalAbil 7 + 17        ；魔法
SetProvisionalAbil 8 + 17        ；道术
SetProvisionalAbil 9 + 17        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 9
#ACT
CHANGEMODE 33 9
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 13        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 13        ；魔防
SetProvisionalAbil 4 + 20        ；攻击
SetProvisionalAbil 5 + 20        ；攻击
SetProvisionalAbil 6 + 20        ；魔法
SetProvisionalAbil 7 + 20        ；魔法
SetProvisionalAbil 8 + 20        ；道术
SetProvisionalAbil 9 + 20        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 10
#ACT
CHANGEMODE 33 10
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 15        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 15        ；魔防
SetProvisionalAbil 4 + 24        ；攻击
SetProvisionalAbil 5 + 24        ；攻击
SetProvisionalAbil 6 + 24        ；魔法
SetProvisionalAbil 7 + 24        ；魔法
SetProvisionalAbil 8 + 24        ；道术
SetProvisionalAbil 9 + 24        ；道术
break
#IF
EQUAL $TABLE(SG_PRIVITE).Hum27 11
#ACT
CHANGEMODE 33 11
SetProvisionalAbil 0 + 0        ；防御
SetProvisionalAbil 1 + 18        ；防御
SetProvisionalAbil 2 + 0        ；魔防
SetProvisionalAbil 3 + 18        ；魔防
SetProvisionalAbil 4 + 30        ；攻击
SetProvisionalAbil 5 + 30        ；攻击
SetProvisionalAbil 6 + 30        ；魔法
SetProvisionalAbil 7 + 30        ；魔法
SetProvisionalAbil 8 + 30        ；道术
SetProvisionalAbil 9 + 30        ；道术
break


}

嗯.有时间我再把龙珠许愿脚本发出来.忘了说.该脚本元神一样会生效的

评分

参与人数 4热心 +5 传世币 +104 收起 理由
hhg123123 + 1 感谢您的支持，传世单机社区因你更精彩！
ahmeijian + 1 + 1 谢谢@Thanks！
admin + 100 我很赞同！
zhchxkkk + 3 + 3 感谢发布原创作品，传世单机社区因你更精彩.

查看全部评分

回复

使用道具 举报

lsbird585

升级   82.33%

发表于 2018-3-15 10:49:30 | 显示全部楼层
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

大菠萝

升级   100%

发表于 2018-3-15 11:16:24 | 显示全部楼层
感恩无私的分享与奉献

回复 支持 反对

使用道具 举报

z75274420

升级   44.33%

发表于 2018-3-15 16:17:42 | 显示全部楼层
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

奔奔

升级   0%

发表于 2018-3-15 17:44:21 | 显示全部楼层
真是难得给力的帖子啊。

回复 支持 反对

使用道具 举报

ynztmco

升级   100%

发表于 2018-3-15 20:11:37 | 显示全部楼层
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

你还好吗

升级   38.41%

发表于 2018-3-15 22:30:17 | 显示全部楼层
感恩无私的分享与奉献

回复 支持 反对

使用道具 举报

xx410x

升级   79.53%

发表于 2018-3-16 01:51:00 | 显示全部楼层
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

afdcbts

升级   69.03%

发表于 2018-3-16 08:49:46 | 显示全部楼层
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

高手在此

升级   29.6%

发表于 2018-3-23 09:53:44 | 显示全部楼层
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

下一页 »
123456下一页
返回列表 发新帖
懒得打字嘛，点击右侧快捷回复
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

■1、请认真发帖，禁止回复纯表情，纯数字等无意义的内容！帖子内容不要太简单!
■2、提倡文明上网，净化网络环境！抵制低俗不良违法有害信息。
■3、如果你对主帖作者的帖子不屑一顾的话，请勿回帖。谢谢合作！
关闭

站长推荐 上一条 /1 下一条

传奇世界单机版|传世服务端|传世版本|关于我们|小黑屋|手机版| 传世单机社区 |网站地图

GMT+8, 2024-6-12 06:05 , Processed in 0.142603 second(s), 35 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2018 Comsenz Inc.

快速回复 返回顶部 返回列表