북방 저장 창고(NPC) 스크립트

npc_db

256    북방저장창고    441    20

npcspawn

214    15    9    9    2    북방저장창고

pursuit_db

북방저장창고    북방저장창고    -    -    -    0    0    0    0

script_db

@import: npc/공통/북방저장창고.txt

북방저장창고    {
    set @sd, mysd();
    set @id, myid();
COS001:
    set @pos, list2(@list, 0, 0, "안녕하세요. 어떻게 오셨나요?", "북방 재료 보관", "북방 재료 찾기", "북방 주머니 설명");
    if(@pos == 0) { goto Failed; end; }
    else if(@list == 1)
    {
COS002:
        setarray @item$[1], "인면충의알", "쇠가루", "나무막대", "구미호꼬리", "쇠조각", "대나무가지", "장인의돌", "적령초", "일양초", "월로초", "만지초", "장석", "태독", "건독", "진독", "곤독", "선독", "오독산", "운모", "청동조각", "석영", "마노", "장인의뼈", "자현목", "방울뱀꼬리", "노송의가지", "천년묵은가지", "백현목", "매의깃털", "물소의뿔", "반짝이는돌", "금조각", "오철", "현철";
        setarray @count[1], $north_1, $north_2, $north_3, $north_4, $north_5, $north_6, $north_7, $north_8, $north_9, $north_10, $north_11, $north_12, $north_13, $north_14, $north_15, $north_16, $north_17, $north_18, $north_19, $north_20, $north_21, $north_22, $north_23, $north_24, $north_25, $north_26, $north_27, $north_28, $north_29, $north_30, $north_31, $north_32, $north_33, $north_34;

        set @pos, input2(@leave$, 1, 10, "어떤 아이템을 보관하시겠습니까?", " ", "(북방 재료만 가능)");
        if(@pos == 0) { goto Failed; end; }
        else if(@pos == -1) { goto COS001; }

        for(set @loop, 1; @loop <= getarraysize(@item$); set @loop, @loop+1)
        {
            if(@leave$ == @item$[@loop])
            {
                set @pos, input2(@number, 1, 10, "몇개 보관하시겠습니까?", " ", "(최대 200개)");
                if(@pos == 0) { goto Failed; end; }
                else if(@pos == -1) { goto COS002; }
                if(@number <= 0 || @number > 200)
                {
                    set @pos, dialog(0,0,0, "재료는 최소 1개, 최대 200개 까지 보관이 가능합니다.");
                    goto Failed;
                    end;
                }
                else if(countitem(name2itemid(@leave$)) < @number)
                {
                    set @pos, dialog(0,0,0, "북방 재료가 부족합니다.");
                    goto Failed;
                    end;
                }
                else
                {
                    if(get_money(@sd) < 0)
                    {
                        set @pos, dialog(0,0,0, "수수료 0전이 부족합니다.");
                        goto Failed;
                        end;
                    }
                    else
                    {
                        if(@count[@loop]+@number <= 9999)
                        {
                            for(set @i, 0; @i < @number; set @i, @i+1)
                            {
                                delitem @sd, name2itemid(@leave$), 1;
                            }
                            set @count[@loop], @count[@loop]+@number;
                            set @message, 0;
                            set_money @sd, get_money(@sd)-0;
                            updatestatus @sd, 2;
                            goto Success;
                            end;
                        }
                        else
                        {
                            set @pos, dialog(0,0,0, "북방 재료는 10000개 이상 보관하실 수 없습니다.");
                            goto Failed;
                            end;
                        }
                    }
                }
            }
        }
        set @pos, dialog(0,0,0, "북방 재료가 아닙니다.");
        goto Failed;
        end;
    }
    else if(@list == 2)
    {
COS003:
        setarray @item$[1], "인면충의알", "쇠가루", "나무막대", "구미호꼬리", "쇠조각", "대나무가지", "장인의돌", "적령초", "일양초", "월로초", "만지초", "장석", "태독", "건독", "진독", "곤독", "선독", "오독산", "운모", "청동조각", "석영", "마노", "장인의뼈", "자현목", "방울뱀꼬리", "노송의가지", "천년묵은가지", "백현목", "매의깃털", "물소의뿔", "반짝이는돌", "금조각", "오철", "현철";
        setarray @count[1], $north_1, $north_2, $north_3, $north_4, $north_5, $north_6, $north_7, $north_8, $north_9, $north_10, $north_11, $north_12, $north_13, $north_14, $north_15, $north_16, $north_17, $north_18, $north_19, $north_20, $north_21, $north_22, $north_23, $north_24, $north_25, $north_26, $north_27, $north_28, $north_29, $north_30, $north_31, $north_32, $north_33, $north_34;
        set @pos, list2(@find, 0, 1, "어떤 재료를 찾으시겠습니까?", @item$[1] + "(" + @count[1] + ")", @item$[2] + "(" + @count[2] + ")", @item$[3] + "(" + @count[3] + ")", @item$[4] + "(" + @count[4] + ")", @item$[5] + "(" + @count[5] + ")", @item$[6] + "(" + @count[6] + ")", @item$[7] + "(" + @count[7] + ")", @item$[8] + "(" + @count[8] + ")", @item$[9] + "(" + @count[9] + ")", @item$[10] + "(" + @count[10] + ")", @item$[11] + "(" + @count[11] + ")", @item$[12] + "(" + @count[12] + ")", @item$[13] + "(" + @count[13] + ")", @item$[14] + "(" + @count[14] + ")", @item$[15] + "(" + @count[15] + ")", @item$[16] + "(" + @count[16] + ")", @item$[17] + "(" + @count[17] + ")", @item$[18] + "(" + @count[18] + ")", @item$[19] + "(" + @count[19] + ")", @item$[20] + "(" + @count[20] + ")", @item$[21] + "(" + @count[21] + ")", @item$[22] + "(" + @count[22] + ")", @item$[23] + "(" + @count[23] + ")", @item$[24] + "(" + @count[24] + ")", @item$[25] + "(" + @count[25] + ")", @item$[26] + "(" + @count[26] + ")", @item$[27] + "(" + @count[27] + ")", @item$[28] + "(" + @count[28] + ")", @item$[29] + "(" + @count[29] + ")", @item$[30] + "(" + @count[30] + ")", @item$[31] + "(" + @count[31] + ")", @item$[32] + "(" + @count[32] + ")", @item$[33] + "(" + @count[33] + ")", @item$[34] + "(" + @count[34] + ")");
        if(@pos == 0) { goto Failed; end; }
        else if(@pos == -1) { goto COS001; }
        if(@find > 0)
        {
            for(set @loop, 1; @loop <= getarraysize(@item$); set @loop, @loop+1)
            {
                if(@find == @loop)
                {
                    if(@count[@loop] <= 0)
                    {
                        set @pos, dialog(0,0,0, "보관하신 재료가 없습니다.");
                        goto Failed;
                        end;
                    }
                    else
                    {
                        set @pos, input2(@number, 1, 3, "재료를 몇개 찾으시겠습니까?", " ", "(최대 200개)");
                        if(@pos == 0) { goto Failed; end; }
                        else if(@pos == -1) { goto COS003; }
                        if(@number <= 0 || @number > 200)
                        {
                            set @pos, dialog(0,0,0, "재료는 최소 1개, 최대 200개 까지 찾으실 수 있습니다.");
                            goto Failed;
                            end;
                        } 
                        else if(@count[@loop] < @number)
                        {
                            set @pos, dialog(0,0,0, "보관하신 재료가 부족합니다.");
                            goto Failed;
                            end;
                        }
                        else
                        {
                            if(get_money(@sd) < 0)
                            {
                                set @pos, dialog(0,0,0, "수수료 0전이 부족합니다.");
                                goto Failed;
                                end;
                            }
                            else
                            {
                                for(set @i, 0; @i < @number; set @i, @i+1)
                                {
                                    additem @sd, name2itemid(@item$[@loop]), 1;
                                }
                                set @count[@loop], @count[@loop]-@number;
                                set @message, 1;
                                set_money @sd, get_money(@sd)-0;
                                updatestatus @sd, 2;
                                goto Success;
                                end;
                            }
                        }
                    }
                }
            }
        }
        else { goto Failed; end; }
    }
    else if(@list == 3)
    {
COS004:
        set @pos, dialog(0,0,1, "북방 주머니는, 쥬모에게 10만원에 사시면 ,북방 재료를 보관, 찾기가 어디서든 가능한 주머니입니다.");
        if(@pos == 0) { goto Failed; end; }
COS005:
        set @pos, dialog(0,1,1, "아이템은 최대 9999개 까지 보관이 가능하며, 재료를 보관하거나 찾을때 수수료 0전 필요합니다.");
        if(@pos == 0) { goto Failed; end; }
        else if(@pos == -1) { goto COS004; }
COS006:
        set @pos, dialog(0,1,1, "단, 한번 보관하거나 찾을때는 최대 200개까지 가능하며 찾으려는 재료 갯수와 현재 가지고 있는 재료 갯수를 합한 갯수가 최대치를 초과시 재료가 손실될 수 있습니다.");
        if(@pos == 0) { goto Failed; }
        else if(@pos == -1) { goto COS005; }
        else if(@pos == 1) { goto COS001; }
        else { goto Failed; end; }
    }
    else { goto Failed; end; }

Success:
    set $north_1, @count[1];
    set $north_2, @count[2];
    set $north_3, @count[3];
    set $north_4, @count[4];
    set $north_5, @count[5];
    set $north_6, @count[6];
    set $north_7, @count[7];
    set $north_8, @count[8];
    set $north_9, @count[9];
    set $north_10, @count[10];
    set $north_11, @count[11];
    set $north_12, @count[12];
    set $north_13, @count[13];
    set $north_14, @count[14];
    set $north_15, @count[15];
    set $north_16, @count[16];
    set $north_17, @count[17];
    set $north_18, @count[18];
    set $north_19, @count[19];
    set $north_20, @count[20];
    set $north_21, @count[21];
    set $north_22, @count[22];
    set $north_23, @count[23];
    set $north_24, @count[24];
    set $north_25, @count[25];
    set $north_26, @count[26];
    set $north_27, @count[27];
    set $north_28, @count[28];
    set $north_29, @count[29];
    set $north_30, @count[30];
    set $north_31, @count[31];
    set $north_32, @count[32];
    set $north_33, @count[33];
    set $north_34, @count[34];

    if(getarraysize(@item$) > 0) { deletearray @item$[1], getarraysize(@item$); }
    if(getarraysize(@count) > 0) { deletearray @count[1], getarraysize(@count); }

    if(@message == 0)
            set @pos, dialog(0,0,1, @leave$ + " " + @number + "개 보관하였습니다.");
    else
            set @pos, dialog(0,0,1, "아이템을 정상적으로 찾았습니다.");
    end;

Failed:
    if(getarraysize(@item$) > 0) { deletearray @item$[1], getarraysize(@item$); }
    if(getarraysize(@count) > 0) { deletearray @count[1], getarraysize(@count); }
    end;
}

-게임존-

출처(윈바람)