• 设为首页
  • 收藏本站
  • 微信公众号
    微信公众号 添加方式:
    1:搜索公众号部落玩会传奇
    2:扫描左侧二维码
  • 快捷导航
    查看: 3715|回复: 2

    传奇版本银行服务脚本

    [复制链接]

    1万

    主题

    1万

    帖子

    1万

    积分

    超级版主

    Rank: 8Rank: 8

    积分
    17875
    QQ
    发表于 2014-7-11 17:35:18 | 显示全部楼层 |阅读模式
    gmbuluo.net" target="_blank" class="relatedlink">传奇版本银行服务脚本GM部落提供如下:
    [@银行服务]
    {
    #IF
    Large d4 99
    #Say
    您银行帐户内的存款为一亿金币.\
    存入金币:<100万/@存100万> <200万/@存200万> <500万/@存500万>\
    取出金币:<100万/@取100万> <200万/@取200万> <500万/@取500万>\
    利息服务:<利息信息/@利息信息> <取出利息/@取出利息>\
    #Act
    Break
    #IF
    Large d4 0
    #Say
    您银行帐户内的存款为<$str(d4)>00万金币.\
    存入金币:<100万/@存100万> <200万/@存200万> <500万/@存500万>\
    取出金币:<100万/@取100万> <200万/@取200万> <500万/@取500万>\
    利息服务:<利息信息/@利息信息> <取出利息/@取出利息>\
    #ElseSay
    您银行帐户内的存款为<$str(d4)>金币.\
    存入金币:<100万/@存100万> <200万/@存200万> <500万/@存500万>\
    取出金币:<100万/@取100万> <200万/@取200万> <500万/@取500万>\
    利息服务:<利息信息/@利息信息> <取出利息/@取出利息>\
    [@存100万]
    #IF
    Small d4 100
    CheckGold 1000000
    #Act
    Inc d4 1
    Take 金币 1000000
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    SENDMSG 5 %s已经在您帐户内存入100万金币.
    Close
    #ElseAct
    SENDMSG 7 %s出错原因:
    SENDMSG 7 %s①:您在银行内的存款已经超出9900万元,无法进行存放~
    SENDMSG 7 %s②:请确认你身上是否有100万的金币.
    Close
    [@存200万]
    #IF
    Small d4 99
    CheckGold 2000000
    #Act
    Inc d4 2
    Take 金币 2000000
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    SENDMSG 5 %s已经在您帐户内存入200万金币.
    Close
    #ElseAct
    SENDMSG 7 %s出错原因:
    SENDMSG 7 %s①:您在银行内的存款已经超出9800万元,无法进行存放~
    SENDMSG 7 %s②:请确认你身上是否有200万的金币.
    Close
    [@存500万]
    #IF
    Small d4 96
    CheckGold 5000000
    #Act
    Inc d4 5
    Take 金币 5000000
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    SENDMSG 5 %s已经在您帐户内存入500万金币.
    Close
    #ElseAct
    SENDMSG 7 %s出错原因:
    SENDMSG 7 %s①:您在银行内的存款已经超出9500万元,无法进行存放~
    SENDMSG 7 %s②:请确认你身上是否有500万的金币.
    Close
    [@取100万]
    #IF
    CheckGold 9000000
    #Act
    SENDMSG 7 %s①:您包内的金币已经超出900万元.
    Close
    Break
    #IF
    Large d4 0
    #Act
    Dec d4 1
    Give 金币 1000000
    SENDMSG 5 %s您已经在帐户内取出100万金币.
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    Close
    #ElseAct
    SENDMSG 7 %s②:您银行内的存款不到100万.
    Close
    [@取200万]
    #IF
    CheckGold 8000000
    #Act
    SENDMSG 7 %s①:您包内的金币已经超出800万元.
    Close
    Break
    #IF
    Large d4 1
    #Act
    Dec d4 2
    Give 金币 2000000
    SENDMSG 5 %s您已经在帐户内取出200万金币.
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    Close
    #ElseAct
    SENDMSG 7 %s②:您银行内的存款不到200万.
    Close
    [@取500万]
    #IF
    CheckGold 5000000
    #Act
    SENDMSG 7 %s①:您包内的金币已经超出500万元.
    Close
    Break
    #IF
    Large d4 4
    #Act
    Dec d4 5
    Give 金币 5000000
    SENDMSG 5 %s您已经在帐户内取出500万金币.
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    Close
    #ElseAct
    SENDMSG 7 %s②:您银行内的存款不到500万.
    Close
    [@存100万1]
    #IF
    Small d4 100
    CheckItem 100万支票 1
    #Act
    Inc d4 1
    Take 100万支票 1
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    Close
    #ElseAct
    SENDMSG 7 %s出错原因:
    SENDMSG 7 %s①:您在银行内的存款已经超出9900万元,无法进行存放~
    SENDMSG 7 %s②:请确认你身上是否有100万的支票.
    Close
    [@存200万1]
    #IF
    Small d4 99
    CheckItem 200万支票 1
    #Act
    Inc d4 2
    Take 200万支票 1
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    Close
    #ElseAct
    SENDMSG 7 %s出错原因:
    SENDMSG 7 %s①:您在银行内的存款已经超出9800万元,无法进行存放~
    SENDMSG 7 %s②:请确认你身上是否有200万的支票.
    Close
    [@存500万1]
    #IF
    Small d4 96
    CheckItem 500万支票 1
    #Act
    Inc d4 5
    Take 500万支票 1
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    Close
    #ElseAct
    SENDMSG 7 %s出错原因:
    SENDMSG 7 %s①:您在银行内的存款已经超出9500万元,无法进行存放~
    SENDMSG 7 %s②:请确认你身上是否有500万的支票.
    Close
    [@取100万1]
    #IF
    Large d4 0
    #Act
    Dec d4 1
    Give 100万支票 1
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    SENDMSG 5 %s100万的支票已经填写完毕!
    Close
    #ElseAct
    SENDMSG 7 %s②:您银行内的存款不到100万.无法填写!
    Close
    [@取200万1]
    #IF
    Large d4 1
    #Act
    Dec d4 2
    Give 200万支票 1
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    SENDMSG 5 %s200万的支票已经填写完毕!
    Close
    #ElseAct
    SENDMSG 7 %s②:您银行内的存款不到200万.无法填写!
    Close
    [@取500万1]
    #IF
    Large d4 4
    #Act
    Dec d4 5
    Give 500万支票 1
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    SENDMSG 5 %s500万的支票已经填写完毕!
    Close
    #ElseAct
    SENDMSG 7 %s②:您银行内的存款不到500万.无法填写!
    Close
    [@利息信息]
    #Act
    SENDMSG 5 %s只要你有钱存在银行内,每100万将按每天1000金币的利息算给你
    Close
    [@取出利息]
    #IF
    Large d4 0
    #Act
    #CALL [\\银行\取走利息.txt] @取走利息
    #ElseAct
    SENDMSG 5 %s你的银行帐户内的金币为0,故我们无法提供任何利息!
    Close
    [@我要贷款]
    如果你缺钱,我可以先贷款给你,如果你的声望在<10点以上>,\
    我可以一次贷款给你100W,如果你的声望在<20点以上>,我可\
    以贷款300W给你,如果你的声望在<30点以上>,我可以贷款500万\
    给你,如果你的声望在<50点以上>,我可以贷款1000万给你,但每次\
    贷款需要花费一点声望值!\
     <[贷款100W]/@dai100> <[贷款300W]/@dai300> <[贷款500W]/@dai500> <[贷款1000万]/@dai1000> \ \
    <我要还钱[url=]/@woyaohaiqian[/url]> <返回[url=]/@main>\[/url]
    [@dai1000]
    #IF
    Check [030] 1
    #SAY
    您已经在我这里贷过款,还清贷款后才能再次贷款!\ \
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    CHECKCREDITPOINT > 49
    #SAY
    这是金盒一个,只有还了钱才能拿回押在这里的45点声望!\ \
    <返回[url=]/@main[/url]>
    #ACT
    set [034] 1
    set [030] 1
    CREDITPOINT - 46
    give 金盒 1
    #elsesay
    对不起,你声望不够。\ \
    <返回[url=]/@main[/url]>
    [@dai500]
    #IF
    Check [030] 1
    #SAY
    您已经在我这里贷过款,还清贷款后才能再次贷款!\ \
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    CHECKCREDITPOINT > 29
    #SAY
    这是500W金币,只有还了钱才能拿回押在这里的25点声望!\ \
    <返回[url=]/@main[/url]>
    #ACT
    set [033] 1
    set [030] 1
    CREDITPOINT - 26
    give 金币 5000000
    #elsesay
    对不起,你声望不够。\ \
    <返回[url=]/@main[/url]>
    [@woyaohaiqian]
    #IF
    Check [030] 0
    #SAY
    你没在我这里贷款还什么钱啊?\ \
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    Check [031] 1
    #SAY
    你在我这里贷了100W金币,你现在有钱还了吗?还了钱你可以\
    拿走押在我这里的5点声望!\ \
    <现在还钱[url=]/@haiqian100>\[/url]
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    Check [032] 1
    #SAY
    你在我这里贷了300W金币,你现在有钱还了吗?还了钱你可以\
    拿走押在我这里的15点声望!\ \
    <现在还钱[url=]/@haiqian300>\[/url]
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    Check [033] 1
    #SAY
    你在我这里贷了500W金币,你现在有钱还了吗?还了钱你可以\
    拿走押在我这里的25点声望!\ \
    <现在还钱[url=]/@haiqian500>\[/url]
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    Check [034] 1
    #SAY
    你在我这里贷了金盒一个,你现在有钱还了吗?还了钱你可以\
    拿走押在我这里的45点声望!\ \
    <现在还钱[url=]/@haiqian1000>\[/url]
    <返回[url=]/@main[/url]>
    #ACT
    break
    [@haiqian1000]
    #IF
    Check [034] 1
    checkitem  金盒 1
    #say
    您成功还清贷款,下次有需要可以再来我这里贷款!\ \
    <返回[url=]/@main[/url]>
    #act
    take 金盒 1
    set [030] 0
    set [034] 0
    CREDITPOINT + 45
    #ELSESAY
    您好象没有足够的资金!\ \
    <返回[url=]/@main[/url]>
    [@haiqian500]
    #IF
    Check [033] 1
    checkgold 5000000
    #say
    您成功还清贷款,下次有需要可以再来我这里贷款!\ \
    <返回[url=]/@main[/url]>
    #act
    take 金币 5000000
    set [030] 0
    set [033] 0
    CREDITPOINT + 25
    #ELSESAY
    您好象没有足够的资金!\ \
    <返回[url=]/@main[/url]>
    [@haiqian300]
    #IF
    Check [032] 1
    checkgold 3000000
    #say
    您成功还清贷款,下次有需要可以再来我这里贷款!\ \
    <返回[url=]/@main[/url]>
    #act
    take 金币 3000000
    set [030] 0
    set [032] 0
    CREDITPOINT + 15
    #ELSESAY
    您好象没有足够的资金!\ \
    <返回[url=]/@main[/url]>
    [@haiqian100]
    #IF
    Check [031] 1
    checkgold 1000000
    #say
    您成功还清贷款,下次有需要可以再来我这里贷款!\ \
    <返回[url=]/@main[/url]>
    #act
    take 金币 1000000
    set [030] 0
    set [031] 0
    CREDITPOINT + 5
    #ELSESAY
    您好象没有足够的资金!\ \
    <返回[url=]/@main[/url]>
    [@dai100]
    #IF
    Check [030] 1
    #SAY
    您已经在我这里贷过款,还清贷款后才能再次贷款!\ \
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    CHECKCREDITPOINT > 9
    #SAY
    这是100W金币,只有还了钱才能拿回押在这里的5点声望!\ \
    <返回[url=]/@main[/url]>
    #ACT
    set [031] 1
    set [030] 1
    CREDITPOINT - 6
    give 金币 1000000
    #elsesay
    对不起,你声望不够。\ \
    <返回[url=]/@main[/url]>
    [@dai300]
    #IF
    Check [030] 1
    #SAY
    您已经在我这里贷过款,还清贷款后才能再次贷款!\ \
    <返回[url=]/@main[/url]>
    #ACT
    break
    #IF
    CHECKCREDITPOINT > 19
    #SAY
    这是300W金币,只有还了钱才能拿回押在这里的15点声望!\ \
    <返回[url=]/@main[/url]>
    #ACT
    set [032] 1
    set [030] 1
    CREDITPOINT - 16
    give 金币 3000000
    #elsesay
    对不起,你声望不够。\ \
    }

    GM部落所有资源均免费下载,回复帖子即出现下载地址!站长QQ:297522007
    回复

    使用道具 举报

    0

    主题

    7

    帖子

    7

    积分

    新手上路

    Rank: 1

    积分
    7
    发表于 2025-1-16 22:25:43 | 显示全部楼层
    11111111111111
    回复 支持 反对

    使用道具 举报

    0

    主题

    4

    帖子

    4

    积分

    新手上路

    Rank: 1

    积分
    4
    发表于 2025-11-19 22:22:14 | 显示全部楼层
    #CALL [\\银行\调整金币.txt] @调整金币
    #CALL [\\银行\金币扣除.txt] @金币扣除
    [\\银行\取走利息.txt] @取走利息
    内容写什么???
    回复 支持 反对

    使用道具 举报

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

    本版积分规则

    站长QQ:297522007 鲁ICP备16023438号-15 鲁ICP备16008334号-18 GM部落

    Powered by Discuz! X3.4 © 2001-2023

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