传奇脚本知识库
  • [GEE引擎] String.ini配置WarrReNewName/WizardReNewName/TaosReNewName

    格式:
    配置文件:String.ini

    以下为相关配置内容:
    ;==========================================
    WarrReNewName=%chrname\*<圣>*
    WizardReNewName=%chrname\*<神>*
    TaosReNewName=%chrname\*<尊>*

    WarrReNewName   武士转生后名称显示
    WizardReNewName  法师转生后名称显示
    TaosReNewName   道士转生后名称显示

  • [GEE引擎] 人物转生RENEWLEVEL/checkrenewlevel/RestRenewLevel

    功能:
        人物转生控制

    格式:
        RENEWLEVEL 转次数 转后等级 分配点数
        转次数  代表一次转多少级(数值范围为 1 - 255)
        转后等级 代表转生后人物的等级,0为不改变人物当前等级。
        分配点数 代表转生后可以得到的点数,此点数可能按比例换成人物属性点(数值范围 1  - 20000)。
        英雄转生命令为:H.RENEWLEVEL 转次数 转后等级


    ;==========================================
    ;将人物转生一次,后等级设为 28级,分配100点属性
    [@RenewLevel]
    #IF
    #ACT
      RENEWLEVEL 1 28 100
    #SAY
    转生成功。
    ;==========================================
    功能:
        检测转生等级
        检测英雄等级命令:H.checkrenewlevel

    格式:
        控制符(=,>,<) 
    ;==========================================
    [@ViewRenLevel]
    #IF
      checkrenewlevel = 0
    #act
      break
    #say
    你还没转生!!!\ \
    〖<返回/@ReNewLevel>〗 〖<关闭/@exit>〗
    #IF
      checkrenewlevel = 1
    #act
      break
    #say
    你的转生等级为第一重转生!!!\ \
    〖<返回/@ReNewLevel>〗 〖<关闭/@exit>〗
    ;==========================================

    功能:
        清除人物转生数据(即人物转生后恢复到未转生状态)

        清除人物转生数据(即人物转生后恢复到未转生状态,命令:H.RestRenewLevel

    格式:
    ;==========================================
    [@ClearRenewLevel]
    #IF
    #ACT
      RestRenewLevel
    ;==========================================

     

    英雄转生示列脚本: [@herozs]
    #IF
    H.checkrenewlevel < 9
    #Act
    H.RENEWLEVEL 1
    #SAY
    您的英雄转生到<$H.RELEVEL>级了!!!
    #ELSEACT
    MESSAGEBOX 英雄转生次数已经<$H.RELEVEL>级了!
    ======================================================================

    功能:
        设置及更改转生人物显示的名称

    格式:
    配置文件:String.ini

    以下为相关配置内容:
    ;==========================================
    WarrReNewName=%chrname\*<圣>*
    WizardReNewName=%chrname\*<神>*
    TaosReNewName=%chrname\*<尊>*

    WarrReNewName   武士转生后名称显示
    WizardReNewName  法师转生后名称显示
    TaosReNewName   道士转生后名称显示

  • [GEE引擎] 人物颜色发型CHANGENAMECOLOR/HAIRSTYLE

    人物颜色发型

    [@HumFace]
    请选择美容项目....\ \
    『<名称颜色
    /@changcolor>』\
    『<换 发 型
    /@ChangHair>』\ \
    〖<返回
    /@main>〗

    [@ChangColor]
    是不是觉得自己名称的颜色太单调了,换换试试!\ \
    『<复原
    /@Color255>』\
    『<蓝色
    /@Color0>』  『<绿色/@Color1>』  『<黄色/@Color2>』  『<橙色/@Color3>』\
    『<土黄
    /@Color4>』  『<红色/@Color5>』  『<淡兰/@Color6>』  『<淡绿/@Color7>』\ \
    〖<返回
    /@MemberFace>〗 〖<关闭/@exit>〗

    [@Color255]
    #ACT
    CHANGENAMECOLOR 255
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗 〖<关闭/@exit>〗
    [@Color0]
    #ACT
    CHANGENAMECOLOR 252
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗 〖<关闭/@exit>〗
    [@Color1]
    #ACT
    CHANGENAMECOLOR 217
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗 〖<关闭/@exit>〗
    [@Color2]
    #ACT
    CHANGENAMECOLOR 251
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗 〖<关闭/@exit>〗
    [@Color3]
    #ACT
    CHANGENAMECOLOR 253
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗 〖<关闭/@exit>〗

    [@Color4]
    #ACT
    CHANGENAMECOLOR 125
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗

    [@Color5]
    #ACT
    CHANGENAMECOLOR 249
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗
    [@Color6]
    #ACT
    CHANGENAMECOLOR 254
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗
    [@Color7]
    #ACT
    CHANGENAMECOLOR 250
    #SAY
    呵呵,你的颜色已经改变。\ \
    〖<返回
    /@ChangColor>〗
    [@ChangHair]
    #IF
    gender man
    #ACT
    goto @ChangHairMan
    #ELSEACT
    goto @ChangHairWoman
    [@ChangHairMan]
    想不想来个光头呀,酷呆了!!!\ \
    『<光头
    /@hairman0>』\
    『<长头发
    /@hairman1>』\ \
    〖<返回
    /@MemberFace>〗 〖<关闭/@exit>〗
    [@hairman0]
    #ACT
      HAIRSTYLE 0
    #SAY
    呵呵,光头是不是很酷呀!!! \ \
    〖<返回
    /@ChangHairMan>〗
    [@hairman1]
    #ACT
      HAIRSTYLE 1
    #SAY
    呵呵,你的发型已经改变了... \ \
    〖<返回
    /@ChangHairMan>〗

    [@ChangHairWoman]
    『<短发型
    /@hairWoman0>』\
    『<长发型
    /@hairWoman1>』\ \
    〖<返回
    /@MemberFace>〗 〖<关闭/@exit>〗
    [@hairWoman0]
    #ACT
      HAIRSTYLE 0
    #SAY
    呵呵,你的发型已经改变了... \ \
    〖<返回
    /@ChangHairWoman>〗 〖<关闭/@Exit>〗
    [@hairWoman1]
    #ACT
      HAIRSTYLE 1
    #SAY
    呵呵,你的发型已经改变了... \ \
    〖<返回
    /@ChangHairWoman>〗 〖<关闭/@Exit>〗

  • [GEE引擎] 人物登录脚本IsAdmin/CHANGEMODE/ReloadManage/QManage.txt

    功能:
        即在人物进入游戏时自动执行的脚本,通过此脚本可对人物进行大量的功能控制。

    格式:
    在目录 Envir\MapQuest_def\ 中建立文件名为QManage.txt的脚本,按以下格式编写脚本:

    ========================================================================
    ;脚本例子
    [@Login]
    #IF 
      IsAdmin
    #ACT
      CHANGEMODE 2 1
      CHANGEMODE 3 1
      SENDMSG 5 %s,欢迎进入游戏,当前模式为GM管理模式。========================================================================

    注:如该脚本更改后,不须重启M2使其生效,可用@ReloadManage命令重新加载该脚本。 

  • [GEE引擎] 离线挂机offlinemsg/ISDUPMODE/INSAFEZONE/OFFLINEPLAY

    离线挂机

    (@@offlinemsg)
    [@main]
    欢迎使用我提供的挂机功能,使用此功能可以让你不必开电脑,\
    就可以进行泡点。\
    点击开始挂机后,可输入一段留言信息给你的朋友。\
    <开始挂机/@@offlinemsg>
    [@@offlinemsg]
    #if
    ISDUPMODE
    #say
    请找一个空位置,不能与别人站在一起。\ \
    <返回/@main>
    #act
    break

    #if
    INSAFEZONE
    #elseact
    break
    #elsesay
    请在安全区找一个位置站好,不能会被人杀的。\ \
    <返回/@main>

    #IF
    checklevelex > 0
    #act
    OFFLINEPLAY 100 100 100
    ;命令 秒 经验 分钟 (挂机多少秒获得多少经验,挂机多少分钟后踢出游戏)

    ------------------------------------------------------------------------------------------------------------------------------------

    功能: 挂机命令

    格式:ISDUPMODE (0或空时检测所有对象,1只检测人物)

  • [GEE引擎] 酒神系统CHECKREADSKILLNG/READSKILLNG/ReadNGOK/ReadNGHeroOK

    以下为酒神弟子完整脚本:
    [@Main]
    我是玛法酒神的嫡传大弟子,也是这家酒馆的老板.\
    这次回来正式受了师父的托付,将玛法的古老武学内功,在玛法大陆\
    传播开来.当你学习内功并通过修炼,使内功等级逐渐升高后,你的\
    战斗力会获得极大的提升.怎么样?有没有兴趣来学习内功?\
    <我要学习内功/@学习内功> <兑换玛法珍酿>\
    <内功是什么?/@内功说明> <兑换精元丹>\

    [@学习内功]
    哦?有心思学习这心法了?\
    算你有眼光,学习了内功,实力大增,到时候莫说,\
    击败肆虐玛法的邪恶生物,就是翻越过雪山,\
    找到回家之路也不是不可能.\
    那你是想自己学习还是你的英雄学习呢?\
    请注意,只有你自己学会内功后,我才会教你的英雄内功.\
    <我自己学习/@自己学习> <让我的英雄学吧/@英雄学习>\
    <不,我是想将玛法内功心法还给你>\
    <返回/@EXit>

    [@自己学习]
    #if
    CHECKREADSKILLNG
    #ACT
    MESSAGEBOX 你还想再学习?
    #ELSEACT
    goto @自己学习1

    [@自己学习1]
    #IF
    ;检查所需物品
    checkitem 玛法内功心法 1
    #ACT
    take 玛法内功心法 1
    READSKILLNG
    #ELSEACT
    MESSAGEBOX 没有玛法内功心法,你还想学习?

    [@英雄学习]
    #if
    H.CHECKREADSKILLNG
    #ACT
    MESSAGEBOX 英雄还想再学习?
    #ELSEACT
    goto @英雄学习1

    [@英雄学习1]
    #IF
    ;检查所需物品
    H.checkitem 玛法内功心法 1
    #ACT
    H.take 玛法内功心法 1
    H.READSKILLNG
    #ELSEACT
    MESSAGEBOX 没有玛法内功心法,你还想学习?

    [@ReadNGOK]
    你学会内功!

    [@ReadNGHeroOK]
    你的英雄学会内功!

    [@ReadNGFail]
    你的已经学会内功了呀!

    [@ReadNGHeroFail]
    你尚未招出你的英雄,或者你的英雄已经学会内功了呀!

    [@内功说明]
    三龙卫的神威早已铭记在了每个玛法人的心头,他们当年所使用的\
    绚丽招式多已经流传于当今的玛法大陆,在不久前几种三龙卫的几乎\
    失传的绝技也从藏经阁出世,再度扬威江湖.不过人们所不知道的是\
    昔年三龙卫之所以能够扬威玛法,不仅仅靠他们精妙的招式,更是\
    因为他们雄厚的内功.随着三龙卫的失踪,这些内功的秘密,也随之\
    失传.但只有一种人,他们中间还依旧流传着三龙卫内功的秘密,\
    他们,便是三龙卫的后裔!\\

    <莫非你就是三龙卫的后裔?/@三龙卫的后裔>

    [@三龙卫的后裔]
    不,不,我当然不是那些英雄的后裔,我的师父才是!我师父的名号\
    相信你一定听过,他就是玛法大陆上酒的传播者,三十年前的第一\
    勇士玛法酒神.当年师父正是凭借着他内外双修的高深功力,\
    在玛法大陆上横行无阻.这些年来,师父他一直在遵循着他的祖先\
    三龙卫的遗志,试图翻越雪山,寻找回家的路.然而,自然之力并非\
    人力可敌,师父花了三十年,也不过探索了大雪山一隅,\
    为此,他决定从他这代开始,打破三龙卫家族的族规.\ \

    <三龙卫的禁密武学从此可以外传了?/@禁密武学外传>

    [@禁密武学外传]
    不错,师父他相信人定胜天,只要敢于打破常规,必可以找出一条\
    回家的道路.因此,师父派我,他的嫡传大弟子,来到盟重酒馆\
    这个人来人往的地方,寻找有缘人,将内功的奥妙传播开来.\
    一个人找不到回家的路,但相信一万人百万人,一定可以在绵延的\
    雪山中,寻找到一条路,通向我们玛法文化的根源!\ \

    <我相信我们会找到回家的路的> <返回>

  • [GEE引擎] 检查人物移动时间间隔CHECKSTATIONTIME/Kick


    功能:
    检查人物是否移动.可以制作任务或者封闭网站挂机人物
    格式:
    CHECKSTATIONTIME 控制符(<、>、 =) 分钟
    ;==========================================
    示例一:
    #IF
    CHECKSTATIONTIME > 50
    #SAY
    你已经有50分钟没有移动了,系统将你踢下线!
    #ACT
    KICK
    示例二
    #IF
    CHECKSTATIONTIME > 50
    #SAY
    你已经有50分钟没有移动了,系统将在5秒后将你小退游戏!
    #ACT
    DelayCall 5000 @Kick [@Kick]
    #IF
    #ACT
    Kick 1
  • [GEE引擎] 结婚系统gender/marry/unmarry/responsemarry

    结婚脚本
    [@main]
    <我想结婚
    /@marry>\
    <我想离婚/@unmarry>\ \
    <离开
    /@exit>

    [@marry]
    求婚者必须是男性且拥有求婚戒指,\
    你准备好求婚了吗?\ \
    <准备好了
    /@agree>\
    <下次再来/@exit>\ \ \
    <返回
    /@main>

    [@agree]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>
    #if
      checkposemarry
    #say
    对方已经结过婚了,是不是想犯重婚罪呀!!!\ \
    <返回
    /@main>
    #act
      break

    #if
       gender man
    #elsesay
    只有男的向女的求婚,还没见过大姑娘向小伙子求婚的。\ \
    <返回
    /@main>
    #elseact
       break


    #if
      checkposegender 男
    #say
    你变态呀!!!想搞同性恋!!! \ \
    <返回
    /@main>
    #act
      break

    #if
       checkposedir 2
    #elsesay
    你们二个面对面站好呀,不要乱动。\ \
    <返回
    /@main>
    #elseact
      break

    #if
      checklevel 40
    #elsesay
    结婚要求你的等级必须40级或以上,小伙子努力练好级再来找我。\ \
    <返回
    /@main>
    #elseact
      break
    #if
      checkposelevel > 34
    #elsesay
    你的对象还没成年,等她长大点再来吧!小伙子不要心急嘛!\ \
    <返回
    /@main>
    #elseact
      break
    #if
       checkitemw 求婚戒指 1
    #elsesay
    你没求婚戒指,弄到求婚戒指再来找我吧!!!\ \
    <返回
    /@main>
    #elseact
       break

    #if
    #act
       takew 求婚戒指 1
       marry

     

    [@StartMarry]
    #if
       checkmarry
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>
    #act
       break

    #if
       gender man
    #act
       break
    #say
    婚礼现在正式开始。\ \
    你愿意娶对方为妻,并照顾她一生一世吗?\ \
    <我愿意
    /@RequestMarry>

    #if
       gender
    #act
       break
    #say
    婚礼现在正式开始。\ \
    请耐心等待你心爱的人向你求婚\ \


    [@RequestMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry requestmarry
    [@WateMarry]
    你已向对方求婚,请耐心等待对方的答复。

    [@RevMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #say
    对方向你求婚,你是否答应嫁给他? \ \
    <我愿意
    /@ResposeMarry> \
    <我不愿意
    /@ResposeMarryFail>
    [@ResposeMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry responsemarry ok

    [@ResposeMarryFail]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry responsemarry fail
    [@EndMarry]
    你们二个已经成为了一对全法夫妻了。\ \
    <关闭
    /@exit>
    [@EndMarryFail]
    结婚失败!\ \
    <关闭
    /@exit>
    [@MarryDirErr]
    对方没站好位置

    [@MarryCheckDir]
    请站好位置\\

    [@HumanTypeErr]
    你变态呀,既然选择一个非人类作为结婚对象。

    [@MarrySexErr]
    你变态呀,既然同性恋。

    ;==========================================
    离婚开始
    [@unmarry]
    #if
       checkmarry
    #act
       unmarry
    #elsesay
    你都没结婚离什么婚??\ \
    <返回
    /@main>

     

    ;=======================================================
    ;双方离婚时没面对面站好显示的信息
    [@UnMarryCheckDir]
    要离婚是吧?离婚是二个人的事,必须二个人对面对站好位置,\
    如果人来不了你只能选择强行离婚姻了。\ \
    <我要强行离婚
    /@fUnMarry>\
    <返回/@main>
    ;=======================================================
    ;对面位置不是人物时显示的信息
    [@UnMarryTypeErr]
    你对面站了个什么东西,怎么不太象人来的。\ \
    <返回
    /@main>

    ;=======================================================
    ;开始离婚程序后,双方显示的信息
    [@StartUnMarry]
    #if
       gender man
    #act
       BREAK
    #say
    是否确定真的要与你共事多年的妻子离婚吗?\ \
    <确定
    /@RequestUnMarry>

    #if
      gender
    #say
    你的老公现在向我请求离婚,是不是愿意协议离婚? \ \
    <确定
    /@RequestUnMarry>
    #act
      break

    ;=======================================================
    ;发出离婚请求
    [@RequestUnMarry]
    #if
      checkmarry
    #act
      unmarry requestunmarry
    ;=======================================================
    ;回应离婚请求
    [@ResposeUnMarry]
    #if
      checkmarry
    #act
      unmarry responseunmarry

    ;===============================================
    ;请求离婚后显示的信息
    [@WateUnMarry]
    你已向对方发出离婚请求,请耐心等待对方的答复。

    ;===============================================
    ;请求离婚后对方显示的信息
    [@RevUnMarry]
    对方向你离婚请求,你是否答应离婚? \ \
    <我愿意
    /@RequestUnMarry>
    <返回
    /@main>

    ;===============================================
    ;没结过婚的人点离婚后出的提示信息
    [@ExeMarryFail]
    你都没结过婚,跑来做什么? \ \
    [返回
    /@main]

    ;==============================================
    ;强行离婚
    [@fUnMarry]
    #if
      checkitem 金条 1
      checkmarry
    #act
      take 金条 1
      unmarry requestunmarry force
    #elsesay
    要收一根金条的手续费,你没有金条,\
    我不能让你离婚。\
    <确定
    /@exit>
    ;==============================================
    ;离婚完成后的提示信息
    [@UnMarryEnd]
    呵呵,你已经脱离苦海了!!! \ \
    <退出
    /@exit>
    [@asktime]
    你调查结婚时间的请求已发出,\
    请稍后。\
    <确定
    /@exit>

  • [GEE引擎] 结婚系统/checkposedir/checklevel/checkposelevel/checkitemw/checkmarry

    结婚脚本
    [@main]
    <我想结婚
    /@marry>\
    <我想离婚/@unmarry>\ \
    <离开
    /@exit>

    [@marry]
    求婚者必须是男性且拥有求婚戒指,\
    你准备好求婚了吗?\ \
    <准备好了
    /@agree>\
    <下次再来/@exit>\ \ \
    <返回
    /@main>

    [@agree]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>
    #if
      checkposemarry
    #say
    对方已经结过婚了,是不是想犯重婚罪呀!!!\ \
    <返回
    /@main>
    #act
      break

    #if
       gender man
    #elsesay
    只有男的向女的求婚,还没见过大姑娘向小伙子求婚的。\ \
    <返回
    /@main>
    #elseact
       break


    #if
      checkposegender 男
    #say
    你变态呀!!!想搞同性恋!!! \ \
    <返回
    /@main>
    #act
      break

    #if
       checkposedir 2
    #elsesay
    你们二个面对面站好呀,不要乱动。\ \
    <返回
    /@main>
    #elseact
      break

    #if
      checklevel 40
    #elsesay
    结婚要求你的等级必须40级或以上,小伙子努力练好级再来找我。\ \
    <返回
    /@main>
    #elseact
      break
    #if
      checkposelevel > 34
    #elsesay
    你的对象还没成年,等她长大点再来吧!小伙子不要心急嘛!\ \
    <返回
    /@main>
    #elseact
      break
    #if
       checkitemw 求婚戒指 1
    #elsesay
    你没求婚戒指,弄到求婚戒指再来找我吧!!!\ \
    <返回
    /@main>
    #elseact
       break

    #if
    #act
       takew 求婚戒指 1
       marry

     

    [@StartMarry]
    #if
       checkmarry
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>
    #act
       break

    #if
       gender man
    #act
       break
    #say
    婚礼现在正式开始。\ \
    你愿意娶对方为妻,并照顾她一生一世吗?\ \
    <我愿意
    /@RequestMarry>

    #if
       gender
    #act
       break
    #say
    婚礼现在正式开始。\ \
    请耐心等待你心爱的人向你求婚\ \


    [@RequestMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry requestmarry
    [@WateMarry]
    你已向对方求婚,请耐心等待对方的答复。

    [@RevMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #say
    对方向你求婚,你是否答应嫁给他? \ \
    <我愿意
    /@ResposeMarry> \
    <我不愿意
    /@ResposeMarryFail>
    [@ResposeMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry responsemarry ok

    [@ResposeMarryFail]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry responsemarry fail
    [@EndMarry]
    你们二个已经成为了一对全法夫妻了。\ \
    <关闭
    /@exit>
    [@EndMarryFail]
    结婚失败!\ \
    <关闭
    /@exit>
    [@MarryDirErr]
    对方没站好位置

    [@MarryCheckDir]
    请站好位置\\

    [@HumanTypeErr]
    你变态呀,既然选择一个非人类作为结婚对象。

    [@MarrySexErr]
    你变态呀,既然同性恋。

    ;==========================================
    离婚开始
    [@unmarry]
    #if
       checkmarry
    #act
       unmarry
    #elsesay
    你都没结婚离什么婚??\ \
    <返回
    /@main>

     

    ;=======================================================
    ;双方离婚时没面对面站好显示的信息
    [@UnMarryCheckDir]
    要离婚是吧?离婚是二个人的事,必须二个人对面对站好位置,\
    如果人来不了你只能选择强行离婚姻了。\ \
    <我要强行离婚
    /@fUnMarry>\
    <返回/@main>
    ;=======================================================
    ;对面位置不是人物时显示的信息
    [@UnMarryTypeErr]
    你对面站了个什么东西,怎么不太象人来的。\ \
    <返回
    /@main>

    ;=======================================================
    ;开始离婚程序后,双方显示的信息
    [@StartUnMarry]
    #if
       gender man
    #act
       BREAK
    #say
    是否确定真的要与你共事多年的妻子离婚吗?\ \
    <确定
    /@RequestUnMarry>

    #if
      gender
    #say
    你的老公现在向我请求离婚,是不是愿意协议离婚? \ \
    <确定
    /@RequestUnMarry>
    #act
      break

    ;=======================================================
    ;发出离婚请求
    [@RequestUnMarry]
    #if
      checkmarry
    #act
      unmarry requestunmarry
    ;=======================================================
    ;回应离婚请求
    [@ResposeUnMarry]
    #if
      checkmarry
    #act
      unmarry responseunmarry

    ;===============================================
    ;请求离婚后显示的信息
    [@WateUnMarry]
    你已向对方发出离婚请求,请耐心等待对方的答复。

    ;===============================================
    ;请求离婚后对方显示的信息
    [@RevUnMarry]
    对方向你离婚请求,你是否答应离婚? \ \
    <我愿意
    /@RequestUnMarry>
    <返回
    /@main>

    ;===============================================
    ;没结过婚的人点离婚后出的提示信息
    [@ExeMarryFail]
    你都没结过婚,跑来做什么? \ \
    [返回
    /@main]

    ;==============================================
    ;强行离婚
    [@fUnMarry]
    #if
      checkitem 金条 1
      checkmarry
    #act
      take 金条 1
      unmarry requestunmarry force
    #elsesay
    要收一根金条的手续费,你没有金条,\
    我不能让你离婚。\
    <确定
    /@exit>
    ;==============================================
    ;离婚完成后的提示信息
    [@UnMarryEnd]
    呵呵,你已经脱离苦海了!!! \ \
    <退出
    /@exit>
    [@asktime]
    你调查结婚时间的请求已发出,\
    请稍后。\
    <确定
    /@exit>

  • [GEE引擎] 结婚系统checkmarry/checkposemarry/gender/man/checkposegender

    结婚脚本
    [@main]
    <我想结婚
    /@marry>\
    <我想离婚/@unmarry>\ \
    <离开
    /@exit>

    [@marry]
    求婚者必须是男性且拥有求婚戒指,\
    你准备好求婚了吗?\ \
    <准备好了
    /@agree>\
    <下次再来/@exit>\ \ \
    <返回
    /@main>

    [@agree]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>
    #if
      checkposemarry
    #say
    对方已经结过婚了,是不是想犯重婚罪呀!!!\ \
    <返回
    /@main>
    #act
      break

    #if
       gender man
    #elsesay
    只有男的向女的求婚,还没见过大姑娘向小伙子求婚的。\ \
    <返回
    /@main>
    #elseact
       break


    #if
      checkposegender 男
    #say
    你变态呀!!!想搞同性恋!!! \ \
    <返回
    /@main>
    #act
      break

    #if
       checkposedir 2
    #elsesay
    你们二个面对面站好呀,不要乱动。\ \
    <返回
    /@main>
    #elseact
      break

    #if
      checklevel 40
    #elsesay
    结婚要求你的等级必须40级或以上,小伙子努力练好级再来找我。\ \
    <返回
    /@main>
    #elseact
      break
    #if
      checkposelevel > 34
    #elsesay
    你的对象还没成年,等她长大点再来吧!小伙子不要心急嘛!\ \
    <返回
    /@main>
    #elseact
      break
    #if
       checkitemw 求婚戒指 1
    #elsesay
    你没求婚戒指,弄到求婚戒指再来找我吧!!!\ \
    <返回
    /@main>
    #elseact
       break

    #if
    #act
       takew 求婚戒指 1
       marry

     

    [@StartMarry]
    #if
       checkmarry
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>
    #act
       break

    #if
       gender man
    #act
       break
    #say
    婚礼现在正式开始。\ \
    你愿意娶对方为妻,并照顾她一生一世吗?\ \
    <我愿意
    /@RequestMarry>

    #if
       gender
    #act
       break
    #say
    婚礼现在正式开始。\ \
    请耐心等待你心爱的人向你求婚\ \


    [@RequestMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry requestmarry
    [@WateMarry]
    你已向对方求婚,请耐心等待对方的答复。

    [@RevMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #say
    对方向你求婚,你是否答应嫁给他? \ \
    <我愿意
    /@ResposeMarry> \
    <我不愿意
    /@ResposeMarryFail>
    [@ResposeMarry]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry responsemarry ok

    [@ResposeMarryFail]
    #if
       checkmarry
    #act
       break
    #say
    你都结过婚了,还来注册结婚,想犯重婚罪呀!!! \ \
    <返回
    /@main>

    #if
    #act
      marry responsemarry fail
    [@EndMarry]
    你们二个已经成为了一对全法夫妻了。\ \
    <关闭
    /@exit>
    [@EndMarryFail]
    结婚失败!\ \
    <关闭
    /@exit>
    [@MarryDirErr]
    对方没站好位置

    [@MarryCheckDir]
    请站好位置\\

    [@HumanTypeErr]
    你变态呀,既然选择一个非人类作为结婚对象。

    [@MarrySexErr]
    你变态呀,既然同性恋。

    ;==========================================
    离婚开始
    [@unmarry]
    #if
       checkmarry
    #act
       unmarry
    #elsesay
    你都没结婚离什么婚??\ \
    <返回
    /@main>

     

    ;=======================================================
    ;双方离婚时没面对面站好显示的信息
    [@UnMarryCheckDir]
    要离婚是吧?离婚是二个人的事,必须二个人对面对站好位置,\
    如果人来不了你只能选择强行离婚姻了。\ \
    <我要强行离婚
    /@fUnMarry>\
    <返回/@main>
    ;=======================================================
    ;对面位置不是人物时显示的信息
    [@UnMarryTypeErr]
    你对面站了个什么东西,怎么不太象人来的。\ \
    <返回
    /@main>

    ;=======================================================
    ;开始离婚程序后,双方显示的信息
    [@StartUnMarry]
    #if
       gender man
    #act
       BREAK
    #say
    是否确定真的要与你共事多年的妻子离婚吗?\ \
    <确定
    /@RequestUnMarry>

    #if
      gender
    #say
    你的老公现在向我请求离婚,是不是愿意协议离婚? \ \
    <确定
    /@RequestUnMarry>
    #act
      break

    ;=======================================================
    ;发出离婚请求
    [@RequestUnMarry]
    #if
      checkmarry
    #act
      unmarry requestunmarry
    ;=======================================================
    ;回应离婚请求
    [@ResposeUnMarry]
    #if
      checkmarry
    #act
      unmarry responseunmarry

    ;===============================================
    ;请求离婚后显示的信息
    [@WateUnMarry]
    你已向对方发出离婚请求,请耐心等待对方的答复。

    ;===============================================
    ;请求离婚后对方显示的信息
    [@RevUnMarry]
    对方向你离婚请求,你是否答应离婚? \ \
    <我愿意
    /@RequestUnMarry>
    <返回
    /@main>

    ;===============================================
    ;没结过婚的人点离婚后出的提示信息
    [@ExeMarryFail]
    你都没结过婚,跑来做什么? \ \
    [返回
    /@main]

    ;==============================================
    ;强行离婚
    [@fUnMarry]
    #if
      checkitem 金条 1
      checkmarry
    #act
      take 金条 1
      unmarry requestunmarry force
    #elsesay
    要收一根金条的手续费,你没有金条,\
    我不能让你离婚。\
    <确定
    /@exit>
    ;==============================================
    ;离婚完成后的提示信息
    [@UnMarryEnd]
    呵呵,你已经脱离苦海了!!! \ \
    <退出
    /@exit>
    [@asktime]
    你调查结婚时间的请求已发出,\
    请稍后。\
    <确定
    /@exit>

 
 
在线客服
QQ613945605
工作时间:
10:00-24:00
客服热线:
15639769199
官方微信扫一扫
返回顶部