一休论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 719|回复: 1

[常用脚本] 最全的结婚脚本配合现有结婚M2功能

[复制链接]
  • TA的每日心情
    开心
    2015-2-10 22:09
  • 签到天数: 1 天

    [LV.1]初来乍到

    发表于 2014-11-14 17:07:27 | 显示全部楼层 |阅读模式
    网络广告风险自担 网络广告风险自担
    网络广告风险自担
    配合现有结婚M2实现功能最全的结婚脚本!
    本结婚脚本出自苍月传奇,转贴请注明出处!
    本脚本结合了现在的结婚功能、以及原有闹洞房、离婚、换金婚戒指等功能。或许脚本并不完善请大家多提意见!
    当然首先你要有能够结婚的M2SERVER.exe!
    脚本需要在数据库添加以下物品:结婚证书、请柬、身份证、求婚戒指、爱情鲜花、圣战婚戒、天尊婚戒、法神婚戒。NPC人物红娘、常娥、吴刚。需要怪物:喜之树、喜之兽王、喜之猪王、喜之精王。
    红娘请放在真爱咨询屋地图里面,常娥请放在新房一楼地图,吴刚请放在洞房里面。
    并且需要在mapinfo修改这两行:
    [0137 新房一楼] FIGHT
    [0139 洞房] NORECALL CHECKQUEST(Q1001) NEEDSET_ON(404) NORECONNECT(0) NOPOSITIONMOVE

    在mapquest_def添加一个Q1001文件。脚本如下:
    [@main]
    #IF
    check [451] 1
    checkitem 结婚证书 1
    #act
    goto @jinr
    break
    #if
    checkitem 请柬 1
    #ACT
    goto @jinr
    #ELSEACT
    goto @bun
    [@bun]
    (为什么不让我进去!!!)
    [@jinr]
    #act
    mapmove 0139
    红娘脚本:
    [@main]
    你们好,我是红娘。欢迎来到真爱咨询屋,你们是来结婚的吧?你在我这里可以办理<身份证[url=]/@gysfz[/url]>、申请<结婚[url=]/@jhdj1[/url]>、申请<离婚[url=]/@unmarry[/url]>等结婚后就可以一个象征性的装备,想知道是什么吗?那就赶快结婚吧!<办身份证[url=]/@bl[/url]><申请结婚[url=]/@jhdj1[/url]><申请离婚[url=]/@unmarry[/url]><换取婚戒[url=]/@hhj[/url]><取消[url=]/@exit[/url]>
    [@bl]
    #IF
    checklevel 42
    #SAY
    你已经有资格领取身份证了,很快我就会给你办好的。请你准备好10000元的办理费,并稍等……\ <继续[url=]/@next1[/url]>
    #ELSESAY
    对不起,你还没有资格办理身份证,等你到了42级以后再来吧!\ <关闭[url=]/@exit[/url]>
    [@next1]
    #IF
    check [450] 1
    #act
    goto @no_1_1
    #elseact
    goto @no_1
    [@no_1]
    #if
    checkgold 10000
    #ACT
    take 金币 10000
    set [450] 1
    give 身份证 1
    #SAY
    从现在开始,你就是个有“身份”的人了。有了身份证你就可以登记结婚了。每个人只有一次办理的机会如果你丢失了,那你只能做“单身贵族”了\ <关闭[url=]/@exit[/url]>
    #ELSEACT
    goto @no_1_2
    [@no_1_2]
    你没有办理身份证所需要的费用,请你赚到10000块再来吧\ <确定[url=]/@exit[/url]>
    [@no_1_1]
    通过检索登记纪录,发现你以前办理过身份证。放哪里去了?好好想想吧!\ <关闭[url=]/@exit[/url]>
    [@jhdj1]
    <$USERNAME>,你们是来结婚的吧?找我就对了只要你东西齐全你就一定能顺利结婚首先按照中国老规矩必须男方向女方求婚!并且男方等级必须达到42级女方40级!<我要求婚[url=]/@marry1[/url]><返回[url=]/@main[/url]>
    [@marry1]
    #if
    gender man
    #act
    goto @man_marry
    #elseact
    goto @woman_marry
    [@man_marry]
    #say
    首先,你要和你的心上人面对面站好,然后向直接向她<求婚[url=]/@man_marry1[/url]>,你的心上人如果同意了,我就马上给你们办理结婚登记。<我只是想了解一下[url=]/@exit[/url]>
    [@woman_marry]
    #say
    首先,你要和你的心上人面对面站好,然后等着他向你求婚吧,他会向你提出请求,请一定要先想好!别后悔哦!<我只是想了解一下[url=]/@exit[/url]>
    [@man_marry1]
    #if
    checklevel 42
    #elseact
    goto @level_error1
    break
    #if
    checkmarry 位置
    #elseact
    goto @place_error1
    break
    #if
    checkmarry 对方级别 40
    #elseact
    goto @level_error2
    break
    #if
    checkmarry 对方已婚
    #act
    goto @marry_error
    break
    #if
    checkitem 身份证 1
    checkitem 金条 1
    checkitem 爱情戒指 1
    #act
    marry 求婚
    #say
    你现在急切地等着心上人答应啦~~~~~~
    #act
    take 金条 1
    take 身份证 1
    give 结婚证书 1
    give 爱情鲜花 1
    set [451] 1
    #elsesay
    你东西不够啊,怎么结婚?要一个金条还有身份证以及爱情戒指你有这些东西吗?\ <离开[url=]/@exit[/url]>
    [@woman_marry1]
    求婚当然由男方提出,难道你要倒贴?作为红娘我可不让!
    <呵呵[url=]/@exit[/url]>
    [@level_error1]
    #say
    你的级别不够。\ <离开[url=]/@exit[/url]>
    [@level_error2]
    #say
    你的心上人还没长大呢。\ <离开[url=]/@exit[/url]>
    [@marry_error]
    #say
    对不起,对方已经有伴侣了。\ <离开[url=]/@exit[/url]>
    [@place_error1]
    #say
    求婚,跟谁呀?首先要和你的心上人面对面才行。\ <离开[url=]/@exit[/url]>
    ;由对方弹出的窗口返回
    [@agree_marry]
    #if
    checkmarry 应婚
    #say
    恭喜!恭喜!现在你们是夫妻了。<谢谢[url=]/@exit[/url]>
    #act
    marry 应婚
    take 身份证 1
    give 结婚证书 1
    give 爱情鲜花 1
    set [451] 1
    #elsesay
    你现在不能结婚。<退出[url=]/@exit[/url]>
    [@unmarry]
    #say
    <$USERNAME>,欢迎来到封魔堡,上次你已经在这里结过婚了,你真是个有心人,还记得我这个媒人婆,咯咯咯...<回来看看[url=]/@exit[/url]><唉,我要离婚![url=]/@unmarry1[/url]>
    [@unmarry1]
    #if
    gender man
    #act
    goto @man_unmarry
    #elseact
    goto @woman_unmarry
    [@man_unmarry]
    #say
    一个大男人哭鼻子羞死人了,唉,离婚是一件很痛苦的事儿,这样吧,你们俩夫妻面对面站好,你提出<离婚请求[url=]/@unmarry2[/url]>如果她同意,那你就自由了。办理离婚手续不需要任何费用的。<不,我还舍不得我的娇妻[url=]/@exit[/url]>
    [@woman_unmarry]
    #say
    哟,你老公欺负你啦?唉,离婚是一件很痛苦的事儿,这样吧,你们两夫妻面对面站好,你提出<离婚请求[url=]/@unmarry2[/url]>如果他同意,那你就自由了。办理离婚手续不需要任何费用的。<不要呢,我还舍不得我的好老公[url=]/@exit[/url]>
    [@unmarry2]
    #if
    checkmarry 位置
    #elseact
    goto @place_error2
    break
    #if
    checkmarry 夫妻
    #say
    好了,你就等着对方答应吧。#act
    marry 离婚
    take 结婚证书 1
    give 身份证 1
    set [451] 0
    #elsesay
    你们不是夫妻,不要在这胡闹啦。<退出[url=]/@exit[/url]>
    ;由对方弹出的窗口返回
    [@agree_unmarry]
    #if
    checkmarry 夫妻
    #act
    marry 离异
    take 结婚证书 1
    give 身份证 1
    set [451] 0
    #elsesay
    你现在不能离婚。<退出[url=]/@exit[/url]>
    [@place_error2]
    #SAY
    两夫妻不面对面站好,怎么离婚呀?<离开[url=]/@exit[/url]>
    [@hhj]
    #IF
    checklevel 49
    #SAY
    时间过的真快,你们都已经结婚7周年了。今天我将送你们一个特别的礼物但是它也不是轻易可以得到的。必须要你们拿出诚心才行!请问你们结婚证书、爱情鲜花和神圣水晶带来了吗?带了就点继续!
    <继续[url=]/@xyb>#ELSESAY[/url]
    你知道吗?换婚戒必须是双方等级都达到49级我才能给你们换金婚戒指!<关闭[url=]/@exit>[@xyb[/url]]
    #IF
    check [451] 1
    check [770] 0
    #ACT
    goto @xyb1
    #ELSESAY
    <$USERNAME>,你是还没有结婚还是已经换过了!<对不起[url=]/@exit[/url]>
    [@xyb1]
    呵呵,别着急啊先告诉我你是什么职业?<武士[url=]/@nrzs[/url]> <法师[url=]/@nrfs[/url]> <道士[url=]/@nrds[/url]>
    [@nrzs]
    #IF
    checkitem 结婚证书 1
    checkitem 爱情鲜花 1
    checkitem 神圣水晶 1
    #ACT
    take 结婚证书 1
    take 爱情鲜花 1
    take 神圣水晶 1
    give 圣战婚戒 1
    SET [770] 1
    #SAY
    换完了,帅吧!
    <谢谢你[url=]/@exit>#ELSESAY[/url]
    你是不是东西忘了拿了啊?
    <取消[url=]/@exit[/url]>
    [@nrfs]
    #IF
    checkitem 结婚证书 1
    checkitem 爱情鲜花 1
    checkitem 神圣水晶 1
    #ACT
    take 结婚证书 1
    take 爱情鲜花 1
    take 神圣水晶 1
    give 法神婚戒 1
    SET [770] 1
    #SAY
    换完了,帅吧!
    <谢谢你[url=]/@exit>#ELSESAY[/url]
    你是不是东西忘了拿了啊?
    <取消[url=]/@exit[/url]>
    [@nrds]
    #IF
    checkitem 结婚证书 1
    checkitem 爱情鲜花 1
    checkitem 神圣水晶 1
    #ACT
    take 结婚证书 1
    take 爱情鲜花 1
    take 神圣水晶 1
    give 天尊婚戒 1
    SET [770] 1
    #SAY
    换完了,帅吧!
    <谢谢你[url=]/@exit>#ELSESAY[/url]
    你是不是东西忘了拿了啊?<取消[url=]/@exit>\[/url]
    常娥脚本:
    [@main]
    你想进去吗?记住哦,你的时间只有一个小时,请快点办完正事\ <准备请柬[url=]/@syqj[/url]><进入洞房[url=]/@jrdf[/url]><参加典礼[url=]/@cjhl[/url]><关闭[url=]/@exit[/url]>
    [@jrdf]
    #if
    check [453] 1
    #act
    goto @jhdl1
    #ELSESAY
    你忘记向朋友们发送请柬了。没有请柬,得朋友们怎么来参加你的婚礼呢?\ <索取请柬[url=]/@syqj[/url]><取消[url=]/@exit[/url]>
    [@jhdl1]
    #IF
    check [451] 0
    #SAY
    干什么这么着急结婚,去办理一下结婚登记再来。\ <离开[url=]/@exit[/url]>
    #ELSESAY
    新人想进入结婚典礼会场,需要[结婚证书],如果你已经准备好了,我检查一下你就可以进去了。但是先请把请柬发给你的朋友,否则就是进去了也就你们两个\ <确定[url=]/@jhdl2[/url]><取消[url=]/@exit[/url]>
    [@jhdl2]
    #IF
    check [452] 1
    #SAY
    我记得以前你已经结婚了呀,怎么想犯重婚罪吗?<离开[url=]/@exit[/url]>
    #ELSEACT
    goto @jhdl3
    [@jhdl3]
    #IF
    check [451] 1
    checkitem 结婚证书 1
    #SAY
    首先恭喜您,您的婚礼现场正在准备中,您现在就可以进去了。\ <进入[url=]/@jhdl4[/url]><离开[url=]/@exit[/url]>
    #ELSESAY
    你办理过结婚登记吗?还是证件丢失了,快去准备好,再来这里。\ <离开[url=]/@exit[/url]>
    [@jhdl4]
    #ACT
    set [452] 1
    mapmove 0139 21 25
    [@cjhl]
    您好,结婚典礼现场是很神圣的地方,进入时我需要看一下你的证件,如果正确的话,我马上带你去。\ <确定[url=]/@cjhl1[/url]><离开[url=]/@exit[/url]>
    [@cjhl1]
    #IF
    checkitem 请柬 1
    #ACT
    mapmove 0139 20 15
    TimeRecall 60
    take 请柬 1
    #ELSESAY
    对不起,你拿不出任何证明你身份的证件,我无法让你进去参加婚礼。\ <离开[url=]/@exit[/url]>
    [@syqj]
    #IF
    check [452] 1
    #SAY
    对不起,请柬已经发完了。我再也找不到一张请柬了,抱歉!\ <离开[url=]/@exit[/url]>
    #ELSEACT
    goto @syqj1
    [@syqj1]
    #IF
    check [451] 0
    #SAY
    只有新婚夫妇才有权向我索要请柬,我很忙,对不起了。\ <离开[url=]/@exit[/url]>
    #ELSEact
    goto @lQQj
    [@lQQj]
    #say
    注意:只有把请柬发给朋友们以后才好进入洞房啊不然朋友们没有请柬,可是进不去哦\ <领取[url=]/@syqj2[/url]>请柬<离开[url=]/@exit[/url]>
    #act
    set [453] 1
    [@syqj2]
    #ACT
    give 请柬 1
    吴刚脚本:
    [@main]
    #if
    checkitem 结婚证书 1
    check [451] 1
    #act
    goto @xinren
    break
    #if
    checkitem 请柬 1
    #act
    goto @keren
    #ELSESAY
    你好,欢迎你来参加婚礼,不过请问你是怎么来到这里的?或者你忘记带了什么东西?等你准备好了再来吧!\ <确定[url=]/@over[/url]>
    [@xinren]
    #say
    祝福你们,希望你们白头偕老,永结同心在这大喜的*子,你想进行什么喜庆活动?\ <打精王[url=]/@dxl[/url]> 进行一次需要经费200万<找果子[url=]/@zgz[/url]> 进行一次需要经费200万<打猪王[url=]/@wjy[/url]> 进行一次需要经费200万<打兽王[url=]/@wsw[/url]> 进行一次需要经费200万<婚庆结束[url=]/@monmap[/url]><返回比奇[url=]/@over[/url]><取消[url=]/@main[/url]>
    [@keren]
    #say
    欢迎你来参加这对新人的婚礼,让我们一起来祝福他们吧如果你有什么礼物,就请直接交给新人吧,谢谢啦!\ <确定[url=]/@exit[/url]><返回比奇[url=]/@over[/url]>
    [@dxl]
    #if
    checkgold 2000000
    #ACT
    take 金币 2000000
    Param1 0139
    Param2 21
    Param3 25
    MonGen 喜之精王 1 1
    MonGen 喜之精王 1 1
    MonGen 喜之精王 1 1
    MonGen 喜之精王 1 1
    MonGen 喜之精王 1 1
    MonGen 爱情王子0 1 1
    close
    #ELSESAY
    你在搞什么啊?结婚还搞的这么寒酸?\ <返回[url=]/@xinren[/url]><取消[url=]/@exit[/url]>
    [@zgz]
    #if
    checkgold 2000000
    #ACT
    take 金币 2000000
    Param1 0139
    Param2 21
    Param3 25
    MonGen 喜之树 1 1
    close
    #ELSESAY
    你在搞什么啊?结婚还搞的这么寒酸?\ <返回[url=]/@xinren[/url]><取消[url=]/@exit[/url]>
    [@wjy]
    #if
    checkgold 2000000
    #ACT
    take 金币 2000000
    Param1 0139
    Param2 21
    Param3 25
    MonGen 喜之猪王 1 1
    MonGen 喜之猪王 1 1
    MonGen 喜之猪王 1 1
    MonGen 喜之猪王 1 1
    MonGen 喜之猪王 1 1
    MonGen 爱情王子0 1 1
    close
    #ELSESAY
    你在搞什么啊?结婚还搞的这么寒酸?\ <返回[url=]/@xinren[/url]><取消[url=]/@exit[/url]>
    [@wsw]
    #if
    checkgold 2000000
    #ACT
    take 金币 2000000
    Param1 0139
    Param2 21
    Param3 25
    MonGen 喜之兽王 1 1
    MonGen 喜之兽王 1 1
    MonGen 喜之兽王 1 1
    MonGen 喜之兽王 1 1
    MonGen 喜之兽王 1 1
    MonGen 爱情王子0 1 1
    close
    #ELSESAY
    你在搞什么啊?结婚还搞的这么寒酸?\ <返回[url=]/@xinren[/url]><取消[url=]/@exit[/url]>
    [@monmap]
    #act
    monclear 0139
    close
    [@over]
    #act
    take 请柬 40
    mapmove 0 333 268






    上一篇:全套祈祷生效-全能脚本
    下一篇:清除PK值/变性/转职/买宝宝脚本
    网络广告风险自担
  • TA的每日心情
    无聊
    2015-4-22 17:31
  • 签到天数: 15 天

    [LV.4]偶尔看看III

    发表于 2015-1-4 11:45:18 | 显示全部楼层
    网络广告风险自担
    222222222222222222222222222
    回复 支持 反对

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    网络广告风险自担

    小黑屋|传奇一条龙|GM基地|GM版本库|一休论坛

    GMT+8, 2016-12-3 08:19 , Processed in 1.107602 second(s), 80 queries , Gzip On.

    传奇一条龙 GM基地 版本库 传奇论坛 传奇漏洞论坛 传奇服务端下载 传奇版本

    站长QQ:1921249589 一休论坛资料来自网络仅供学习交流之用,用于商业后果自负

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