装备重生使者我-3传奇脚本{需要进行重生的装备放入框内}

admin

()
        %100
        [@main]
        #if
        #say
       
       
                      
       
       
       
       
       
               
       
        [@ItemIntoBox7]
        #IF
        #ACT
        MOV S99
        SetUpgradeItem 7
        DELAYGOTO 20 @紫色检测ib
        [@紫色检测ib]
        #IF
        NOT CHECKTEXTLIST ..QuestDiary随机元素初始化首饰1000.txt
        #ACT
        UpdateItem boxitem7
        ReturnBoxItem 7
        MESSAGEBOX 您的放入的装备不是60级以下的装备 或者圣战以上的！
        break
        [@初始化an0]
        #if
        #act
        MOV S99
        #if
        checkgold 200000
        CHECKTEXTLIST ..QuestDiary随机元素初始化首饰1000.txt
        #ACT
        CHANGEITEMADDVALUE boxitem7 12 = 1
        SetNewItemValue boxitem7 0 = 0
        SetNewItemValue boxitem7 1 = 0
        SetNewItemValue boxitem7 2 = 0
        SetNewItemValue boxitem7 3 = 0
        SetNewItemValue boxitem7 4 = 0
        SetNewItemValue boxitem7 5 = 0
        SetNewItemValue boxitem7 6 = 0
        SetNewItemValue boxitem7 7 = 0
        SetNewItemValue boxitem7 8 = 0
        CHANGEITEMADDVALUE boxitem7 0 = 0
        CHANGEITEMADDVALUE boxitem7 1 = 0
        CHANGEITEMADDVALUE boxitem7 2 = 0
        CHANGEITEMADDVALUE boxitem7 3 = 0
        CHANGEITEMADDVALUE boxitem7 4 = 0
        SetCustomItemValue boxitem7 0 = 0
        SetCustomItemValue boxitem7 1 = 0
        SetCustomItemValue boxitem7 2 = 0
        SetCustomItemValue boxitem7 3 = 0
        SetCustomItemValue boxitem7 4 = 0
        SetCustomItemValue boxitem7 5 = 0
        SetCustomItemValue boxitem7 6 = 0
        SetCustomItemValue boxitem7 7 = 0
        SetCustomItemValue boxitem7 8 = 0
        SetCustomItemValue boxitem7 9 = 0
        SetCustomItemText boxitem7
        SETCUSTOMITEMPROGRESSBARVALUE boxitem7 0 0 = 0
        SetCustomItemProgressbar boxitem7 0 0 0
        CloseItemFlute boxitem7 8
        SetCustomItemProgressbarValue boxitem7 0 3 = 0
        SetCustomItemProgressbarValue boxitem7 1 3 = 0
        CHANGEITEMNAMECOLOR boxitem7 0
        CHANGEITEMUPGRADECOUNT boxitem7 = 0
        ChangeItemName boxitem7
        UpdateItem boxitem7
        ReturnBoxItem 7
        take 金币 200000
        SendMsg 5 你的装备已重生,重新穿戴即可鉴定属性！
        break
        #elseact
        sendmsg 5 金币不足！