海盗社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 活动 交友 discuz
查看: 18794|回复: 0

+27全套属性衣服宝箱-脚本

[复制链接]

93

主题

97

帖子

406

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
406
发表于 2018-5-10 16:46:46 | 显示全部楼层 |阅读模式
注意:
       以下脚本开出的+27衣服,如果是工坊,可以酷合再转移装备才有效.

+27全套属性衣服宝箱-脚本
---------------------------------------------------------
function ItemUse27Set( role , Item )
   local Item_CanGet = GetChaFreeBagGridNum ( role )
  if Item_CanGet < 6 then
  SystemNotice(role ,"使用+27属性衣服宝箱最少需要6个空位")
  UseItemFailed ( role )
  return
    end

    local GemSlotAID = 11------ 岩玉    --------------这里是对应variable.lua宝石序号(单位数要在前加上0)
    local GemSlotBID = 26----- 死神不死--------------这里是对应variable.lua宝石序号(单位数要在前加上0)
    local GemSlotCID = 14----- 黑龙之魂--------------这里是对应variable.lua宝石序号(单位数要在前加上0)
    local GemSlotALevel = 9-----9级
    local GemSlotBLevel = 9-----9级
    local GemSlotCLevel = 9-----9级
    r1,r2 = MakeItem(role,768,1,18)--------ID--双剑士
    r1,r3 = MakeItem(role,765,1,18)--------ID--巨剑士
    r1,r4 = MakeItem(role,791,1,18)--------ID--狙击
    r1,r5 = MakeItem(role,768,1,18)--------ID--圣职
    r1,r6 = MakeItem(role,797,1,18)--------ID--封印
    r1,r7 = MakeItem(role,805,1,18)--------ID--航海

    local Equipp = GetChaItem(role,2,r2)
    local Equipp3 = GetChaItem(role,2,r3)
    local Equipp4 = GetChaItem(role,2,r4)
    local Equipp5 = GetChaItem(role,2,r5)
    local Equipp6 = GetChaItem(role,2,r6)
    local Equipp7 = GetChaItem(role,2,r7)

    local param = GetItemForgeParam(Equipp,1)
    local param3 = GetItemForgeParam(Equipp3,1)
    local param4 = GetItemForgeParam(Equipp4,1)
    local param5 = GetItemForgeParam(Equipp5,1)
    local param6 = GetItemForgeParam(Equipp6,1)
    local param7 = GetItemForgeParam(Equipp7,1)

    local Item_Stone = {}
    local Item_StoneLv = {}

    param = TansferNum(param)
    param3 = TansferNum(param3)
    param4 = TansferNum(param4)
    param5 = TansferNum(param5)
    param6 = TansferNum(param6)
    param7 = TansferNum(param7)

    Item_Stone[0] = GetNum_Part2(param)
    Item_Stone[0] = GetNum_Part2(param3)
    Item_Stone[0] = GetNum_Part2(param4)
    Item_Stone[0] = GetNum_Part2(param5)
    Item_Stone[0] = GetNum_Part2(param6)
    Item_Stone[0] = GetNum_Part2(param7)

    Item_StoneLv[0] = GetNum_Part3(param)
    Item_StoneLv[0] = GetNum_Part3(param3)
    Item_StoneLv[0] = GetNum_Part3(param4)
    Item_StoneLv[0] = GetNum_Part3(param5)
    Item_StoneLv[0] = GetNum_Part3(param6)
    Item_StoneLv[0] = GetNum_Part3(param7)

    Item_Stone[0] = GemSlotAID                           
    Item_StoneLv[0] = GemSlotALevel

    param = SetNum_Part2(param, Item_Stone[0])
    param3 = SetNum_Part2(param3, Item_Stone[0])
    param4 = SetNum_Part2(param4, Item_Stone[0])
    param5 = SetNum_Part2(param5, Item_Stone[0])
    param6 = SetNum_Part2(param6, Item_Stone[0])
    param7 = SetNum_Part2(param7, Item_Stone[0])

    param = SetNum_Part3(param, Item_StoneLv[0])
    param3 = SetNum_Part3(param3, Item_StoneLv[0])
    param4 = SetNum_Part3(param4, Item_StoneLv[0])
    param5 = SetNum_Part3(param5, Item_StoneLv[0])
    param6 = SetNum_Part3(param6, Item_StoneLv[0])
    param7 = SetNum_Part3(param7, Item_StoneLv[0])

    SetItemForgeParam(Equipp,1,param)
    SetItemForgeParam(Equipp3,1,param3)
    SetItemForgeParam(Equipp4,1,param4)
    SetItemForgeParam(Equipp5,1,param5)
    SetItemForgeParam(Equipp6,1,param6)
    SetItemForgeParam(Equipp7,1,param7)

    param = TansferNum(param)
    param3 = TansferNum(param3)
    param4 = TansferNum(param4)
    param5 = TansferNum(param5)
    param6 = TansferNum(param6)
    param7 = TansferNum(param7)

    Item_Stone[1] = GetNum_Part2(param)
    Item_Stone[1] = GetNum_Part2(param3)
    Item_Stone[1] = GetNum_Part2(param4)
    Item_Stone[1] = GetNum_Part2(param5)
    Item_Stone[1] = GetNum_Part2(param6)
    Item_Stone[1] = GetNum_Part2(param7)



    Item_StoneLv[1] = GetNum_Part3(param)
    Item_StoneLv[1] = GetNum_Part3(param3)
    Item_StoneLv[1] = GetNum_Part3(param4)
    Item_StoneLv[1] = GetNum_Part3(param5)
    Item_StoneLv[1] = GetNum_Part3(param6)
    Item_StoneLv[1] = GetNum_Part3(param7)

    Item_Stone[1] =  GemSlotBID                           
    Item_StoneLv[1] = GemSlotBLevel

    param = SetNum_Part4(param,Item_Stone[1])  
    param3 = SetNum_Part4(param3,Item_Stone[1])
    param4 = SetNum_Part4(param4,Item_Stone[1])
    param5 = SetNum_Part4(param5,Item_Stone[1])
    param6 = SetNum_Part4(param6,Item_Stone[1])
    param7 = SetNum_Part4(param7,Item_Stone[1])

    param = SetNum_Part5(param,Item_StoneLv[1])  
    param3 = SetNum_Part5(param3,Item_StoneLv[1])  
    param4 = SetNum_Part5(param4,Item_StoneLv[1])  
    param5 = SetNum_Part5(param5,Item_StoneLv[1])  
    param6 = SetNum_Part5(param6,Item_StoneLv[1])  
    param7 = SetNum_Part5(param7,Item_StoneLv[1])  

    SetItemForgeParam(Equipp,1,param)
    SetItemForgeParam(Equipp3,1,param3)
    SetItemForgeParam(Equipp4,1,param4)
    SetItemForgeParam(Equipp5,1,param5)
    SetItemForgeParam(Equipp6,1,param6)
    SetItemForgeParam(Equipp7,1,param7)

    param = TansferNum(param)
    param3 = TansferNum(param3)
    param4 = TansferNum(param4)
    param5 = TansferNum(param5)
    param6 = TansferNum(param6)
    param7 = TansferNum(param7)

    Item_Stone[2] = GetNum_Part2(param)
    Item_Stone[2] = GetNum_Part2(param3)
    Item_Stone[2] = GetNum_Part2(param4)
    Item_Stone[2] = GetNum_Part2(param5)
    Item_Stone[2] = GetNum_Part2(param6)
    Item_Stone[2] = GetNum_Part2(param7)

    Item_StoneLv[2] = GetNum_Part3(param)
    Item_StoneLv[2] = GetNum_Part3(param3)
    Item_StoneLv[2] = GetNum_Part3(param4)
    Item_StoneLv[2] = GetNum_Part3(param5)
    Item_StoneLv[2] = GetNum_Part3(param6)
    Item_StoneLv[2] = GetNum_Part3(param7)

    Item_Stone[2] = GemSlotCID                       
    Item_StoneLv[2] = GemSlotCLevel  

    param = SetNum_Part6(param,Item_Stone[2])     
    param3 = SetNum_Part6(param3,Item_Stone[2])
    param4 = SetNum_Part6(param4,Item_Stone[2])
    param5 = SetNum_Part6(param5,Item_Stone[2])
    param6 = SetNum_Part6(param6,Item_Stone[2])
    param7 = SetNum_Part6(param7,Item_Stone[2])

    param = SetNum_Part7(param,Item_StoneLv[2])
    param3 = SetNum_Part7(param3,Item_StoneLv[2])
    param4 = SetNum_Part7(param4,Item_StoneLv[2])
    param5 = SetNum_Part7(param5,Item_StoneLv[2])
    param6 = SetNum_Part7(param6,Item_StoneLv[2])
    param7 = SetNum_Part7(param7,Item_StoneLv[2])

    SetItemForgeParam(Equipp,1,param)
    SetItemForgeParam(Equipp3,1,param3)
    SetItemForgeParam(Equipp4,1,param4)
    SetItemForgeParam(Equipp5,1,param5)
    SetItemForgeParam(Equipp6,1,param6)
    SetItemForgeParam(Equipp7,1,param7)

    local Socket = GetItemForgeParam(Equipp, 1)
    local Socket3 = GetItemForgeParam(Equipp3, 1)
    local Socket4 = GetItemForgeParam(Equipp4, 1)
    local Socket5 = GetItemForgeParam(Equipp5, 1)
    local Socket6 = GetItemForgeParam(Equipp6, 1)
    local Socket7 = GetItemForgeParam(Equipp7, 1)

    Socket = TansferNum(Socket)
    Socket3 = TansferNum(Socket3)
    Socket4 = TansferNum(Socket4)
    Socket5 = TansferNum(Socket5)
    Socket6 = TansferNum(Socket6)
    Socket7 = TansferNum(Socket7)

    Socket = SetNum_Part1(Socket,3)
    Socket3 = SetNum_Part1(Socket3,3)
    Socket4 = SetNum_Part1(Socket4,3)
    Socket5 = SetNum_Part1(Socket5,3)
    Socket6 = SetNum_Part1(Socket6,3)
    Socket7 = SetNum_Part1(Socket7,3)

    SetItemForgeParam(Equipp,1,Socket)
    SetItemForgeParam(Equipp3,1,Socket3)
    SetItemForgeParam(Equipp4,1,Socket4)
    SetItemForgeParam(Equipp5,1,Socket5)
    SetItemForgeParam(Equipp6,1,Socket6)
    SetItemForgeParam(Equipp7,1,Socket7)

    “refresh”Cha(role)
    local cha_name = GetChaDefaultName ( role )---叫玩家名字


    Notice ( "全服恭喜玩家["..cha_name.."]打开+27衣服宝箱,获得全套职业+27属性衣服")---系统公告


end
---------------------------------------------------------

回复

使用道具 举报

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

本版积分规则

QQ|Archiver|手机版|小黑屋|海盗社区

GMT+8, 2019-12-6 19:20 , Processed in 0.047239 second(s), 19 queries .

Powered by Discuz! X3.4

© 2001-2013 Comsenz Inc.

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