어둠의전설 어둠의 전설 8240 세오 say 스크립트

0    __SAY_SCRIPT__    {
    set @myid, get_myid();
    set @say$, last_say(@myid);
    set @xs, get_xs(@myid);
    set @ys, get_ys(@myid);
    if(get_mapname(@myid)=="밀레스마을"){
        if(map_objmob(@myid) <= 1){
            mob_spawn "밀레스좀비", 28, 55, 1;
            mob_spawn "밀레스좀비", 28, 56, 1;
        }
    }

    if(instr(last_say(@myid), "#도우미")){
        if(#guide==1){
            message 3,"[도우미: OFF]";
            set #guide,0;
        }else{
            message 3,"[도우미: ON]";
            set #guide,1;
        }
    }

    if(instr(last_say(@myid), "#돌돌이")){
        call_func @myid, "돌돌이";
    }
    if(instr(last_say(@myid), "#풀경")){
        call_func @myid, "경험치축적";
    }
    if(split(last_say(@myid), " ", 0)=="#표정"){
        if(split(last_say(@myid), " ", 1)=="NULL"){end;}
        newtypeset @myid, 5, split(last_say(@myid), " ", 1);
        message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]번호의 표정으로 변경되었습니다! 확인해보세요.";
    }
    if(split(last_say(@myid), " ", 0)=="#엠블럼1"){
        if(split(last_say(@myid), " ", 1)=="NULL"){end;}

        newtypeset @myid, 2, split(last_say(@myid), " ", 1);
        message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]번호의 엠블럼1으로 변경했습니다! 확인해보세요.";
    }    
    if(split(last_say(@myid), " ", 0)=="#엠블럼2"){
        if(split(last_say(@myid), " ", 1)=="NULL"){end;}
        newtypeset @myid, 3, split(last_say(@myid), " ", 1);
        message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]번호의 엠블럼2으로 변경했습니다! 확인해보세요.";
    }
    if(instr(last_say(@myid), "#사냥터이동")){
        call_func @myid, "이동명령R";
    }
    if(instr(last_say(@myid), "#삭제")){
        npc_look @myid, 0, 0;
        idel:
        set @del, menu(0, "안녕하세요. 무엇을 도와드릴까요?", "{=c골드{=a를 소모하여 아이템 삭제","나가기");
        if(@del==0){goto idel;}
        if(@del==1){
            mes 1, "삭제하려고 하는 아이템을 인벤토리 {=c첫째칸{=a에 놓아야합니다.";
            //mes 1, "아이템을 지우는데 드는 댓가는 {=c십만 Gold{=a입니다.";
            set @del2, menu(0, "삭제하고자 하는 아이템이 {=c첫째칸{=a에 있고 정말 삭제 하시겠습니까?", "네...", "아니오");
            if(@del2==1){
                if(item_one_check(@myid)==0){mes 1, "이 아이템은 제가 삭제할 수 없습니다.";goto idel;}
                //if(get_money(@myid) < 100000){mes 0, "골드가 부족하시네요..";goto idel;}
                set@itemname$,item_one_check(@myid);
                item_del@itemname$,1;
                //money_del 100000;
                mes 0, "아이템을 삭제했습니다.";
            }else if(@del2==2){mes 0, "다음에 뵙겠습니다..";}
        }
    }
    if(get_gm(@myid)){
        if(instr(last_say(@myid), "#삭제")){
            set@itemname$,item_one_check(@myid);
            item_del@itemname$,1;
        }
        if(split(last_say(@myid), " ", 0)=="#수성길드"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set_guildstone split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]방어길드 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip1"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname1$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip1멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip2"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname2$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip2멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip3"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname3$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip3멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip4"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname4$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip4멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip5"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname5$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip5멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip6"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname6$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip5멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip7"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname7$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip5멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#vip8"){
            if(split(last_say(@myid), " ", 1)=="NULL"){end;}
            set $vipname8$, split(last_say(@myid), " ", 1);
            message 3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 1) + "{=q]vip5멤버로 설정";
        }
        if(split(last_say(@myid), " ", 0)=="#지급"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"||split(last_say(@myid), " ", 3)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            item_add1 @target, split(last_say(@myid), " ", 2), split(last_say(@myid), " ", 3);
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님에게 [{=e" + split(last_say(@myid), " ", 2) + "{=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급.";
            message1 @target ,3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 2) + "{=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급받으셨습니다.";
        }
        if(split(last_say(@myid), " ", 0)=="#10일"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"||split(last_say(@myid), " ", 3)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            item_add_term @target,split(last_say(@myid), " ", 2), split(last_say(@myid), " ", 3), 864000;
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님에게 [{=e" + split(last_say(@myid), " ", 2) + "{=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급.";
            message1 @target ,3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 2) + "(10일){=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급받으셨습니다.";
        }
        if(split(last_say(@myid), " ", 0)=="#7일"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"||split(last_say(@myid), " ", 3)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            item_add_term @target,split(last_say(@myid), " ", 2), split(last_say(@myid), " ", 3), 604800;
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님에게 [{=e" + split(last_say(@myid), " ", 2) + "{=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급.";
            message1 @target ,3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 2) + "(7일){=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급받으셨습니다.";
        }
        if(split(last_say(@myid), " ", 0)=="#1일"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"||split(last_say(@myid), " ", 3)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            item_add_term @target,split(last_say(@myid), " ", 2), split(last_say(@myid), " ", 3), 86400;
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님에게 [{=e" + split(last_say(@myid), " ", 2) + "{=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급.";
            message1 @target ,3, "{=q안내 :: [{=e" + split(last_say(@myid), " ", 2) + "(1일){=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 지급받으셨습니다.";
        }
        if(@say$=="사이드체크"){
            if(get_side(@myid)==1){message 3,"side1";}
            if(get_side(@myid)==2){message 3,"side2";}
            if(get_side(@myid)==3){message 3,"side3";}
            if(get_side(@myid)==0){message 3,"side0";}
        }
        if(@say$=="맵청소"){
            item_clear get_mapname(@myid);
        }
        if(@say$=="몹청소"){
            mob_clear get_mapname(@myid);
        }
        if(split(last_say(@myid), " ", 0)=="#제거"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"||split(last_say(@myid), " ", 3)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            item_del1 @target, split(last_say(@myid), " ", 2), split(last_say(@myid), " ", 3);
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님의 [{=e" + split(last_say(@myid), " ", 2) + "{=q]을(를) {=s" + split(last_say(@myid), " ", 3) + "{=q개 제거.";
        }
        if(split(last_say(@myid), " ", 0)=="#국적"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            set_nation @target, split(last_say(@myid), " ", 2);
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님에게 [{=e" + split(last_say(@myid), " ", 2) + "{=q]번호의 국적 지급.";
            message1 @target ,3, "{=q안내 :: 당신의 국적이 변경되었습니다! 확인해보세요.";
        }
        if(split(last_say(@myid), " ", 0)=="#타이틀"){
            if(split(last_say(@myid), " ", 1)=="NULL"||split(last_say(@myid), " ", 2)=="NULL"){end;}
            set @target, get_user(split(last_say(@myid), " ", 1));
            if(!@target){message 3,"{=g" + split(last_say(@myid), " ", 1) + "는(은) 존재하지 않는 유저 이거나 접속중이 아닙니다."; del @name$; end;}
            newtypeset @target, 1, split(last_say(@myid), " ", 2);
            message 3, "{=q안내 :: [{=w" + split(last_say(@myid), " ", 1) + "{=q]님에게 [{=e" + split(last_say(@myid), " ", 2) + "{=q]번호의 타이틀 지급.";
            message1 @target ,3, "{=q안내 :: 당신의 타이틀이 변경되었습니다! 확인해보세요.";
        }
        if(@say$=="#이동"){
            set @side, get_side(@myid);
            if(@side==0){set_ys(get_ys(@myid)-1);}
            if(@side==1){set_xs(get_xs(@myid)+1);}
            if(@side==2){set_ys(get_ys(@myid)+1);}
            if(@side==3){set_xs(get_xs(@myid)-1);}
        }
    }
    //블랙셋분해■■■■■■■■■■■■■■■■■■■
    if(get_mapname(@myid)=="마인대장간"){
        npc_look @myid, 0, 249;
        if(instr(last_say(@myid), "분해")){
            blackdel:
            set@blackdel,menu(1,"블랙굴에서 나오는 무구 아이템들을 분해 해드립니다. 무엇을 도와드릴까요?","분해 한다.","설명을 들어본다..");
            if(@blackdel==1){
                set@blackdel2,menu(1,"분해 하실 블랙굴 무구를 인벤토리 첫 번째 슬롯에 두시고 다음을 진행해주시길 바랍니다.\\n준비가 되셨습니까?","아이템을 분해한다.","그만둔다");
                if(@blackdel2==1){
                    if(get_money(@myid) < 1000000){mes 3, "분해하시는데 필요한 비용이 부족합니다.";goto blackdel;}
                    set@check$,item_one_check(@myid);
                    if(@check$=="윌화이어아머A"||@check$=="윌화이어투구A"||@check$=="윌화이어장갑A"||@check$=="윌화이어각반A"||@check$=="윌화이어아머B"||@check$=="윌화이어투구B"||@check$=="윌화이어장갑B"||@check$=="윌화이어각반B"||@check$=="레인헌트아머"||@check$=="레인헌트투구"||@check$=="레인헌트장갑"||@check$=="레인헌트각반"||@check$=="브레스럭아머"||@check$=="브레스럭투구"||@check$=="브레스럭장갑"||@check$=="브레스럭각반"||@check$=="페이로브아머"||@check$=="페이로브투구"||@check$=="페이로브장갑"||@check$=="페이로브각반"||@check$=="브릴윙아머"||@check$=="브릴윙투구"||@check$=="브릴윙팔찌"||@check$=="브릴윙각반"){
                    set@itemname$,item_one_check(@myid);
                    item_del@itemname$,1;
                    money_del 1000000;
                    item_add "블랙오피온의수염",1;
                    message 3,@itemname$+"를 분해하여 {=c블랙오피온의수염{=a을 얻었다.";
                    mes 2,"아이템 분해가 완료됬습니다.";
                    }else{mes 3,"제가 분해할 수 있는 아이템이 아닙니다.";goto blackdel;}
                }else{goto blackdel;}
            }else if(@blackdel==2){
                mes 3,"블랙오피온의굴 에서 제작가능한 블랙굴 무구를 분해하시면 {=c블랙오피온의수염 {=a과 여러 아이템들을 얻으실 수 있습니다.";
                mes 3,"다만 분해해서 나오는 아이템은 제가 필요로 하기에… 좋습니다. 제가 인심 써서 모험가님에겐 분해 아이템의 핵심 요소인 {=c블랙오피온의수염 {=a아이템을 돌려드리겠습니다.";
                mes 3,"블랙굴 무구를 분해하시는데 필요한 비용은 {=c100만Gold {=a입니다. 마음의 준비가 다되시면 저에게 다시 말을 걸어주세요.";
                goto blackdel;
            }else{goto blackdel;}
        }
    }
    //생선구이만들기■■■■■■■■■■■■■■■■■
    if(get_mapname(@myid)=="피에트식당"){
        npc_look @myid, 0, 24;
        if(instr(last_say(@myid), "요리")){
            if(#fishfood==0){
                mes 3,"어서와요.얼굴을 보아하니..내가 파는 일반 음식에는 별 관심은 없는것 같고...뭔가 부탁을 하러 오셨구만..";
                mes 3," {=c생선구이{=a를 만들어 달라고? 오호~ 그 요리는 내가  이 마이소시아에서 최고지... 먹어본 사람은 평생 나를 잊지못한다오... 호호호\\n아이고... 또 주책을 부렸네.. 호호";
                mes 3,"하지만..그냥 돈주고 만들어 주는 그런 음식은 아니라우...왕이 와서 일만금을 준다고 해도 안팔지~ 하지만..내가 요새 새 생선요리를 하나 연구중인데,생선이 한두마리 필요한게 아니라서 말이지..";
                mes 3,"몇마리냐고? 놀라지마셔... 무려{=c10{=a마리정도??\\n어차피 연습용으로 쓸거라,크기는 상관없고..구해다만 준다면야 그까짓 생선요리쯤은 바로 만들어 줄텐데 말이우??~~호호호호";
                set@food,menu(1,"뭐..잡아오겠다고 약속하면 내 요리를 만들기 시작하겠우.","맡겨두세요!","너무하시는거 아녜요?");
                if(@food==1){
                    set #fishfood,1;
                    mes 2,"좋아요! 호호호! 자긴 호탕해서 마음에 드네! 물고기를 잡으면 가지고 와요.한꺼번에 가져와도 좋고,잡았을때 그때그때 가져다 줘도 좋고...다시 말하지만 크기는 별로 중요하지 않으니 어떤 물고기라도 {=c10{=a마리면 되요.";
                }else if(@food==2){
                    mes 2,"너무하던 말던 그건 내 알바가 아니지..생선요리는 별로 필요 없나봐요? 호호호";
                }
            }else{
                mes 3,"물고기는 많이 잡아 오셨나? 음하하하.. 왜이리 터프해 졌나 궁금하지않소?\\n사실은 물고기를 많이 먹어서 그렇다오..";
                mes 3,"요새 연구중인 생선 요리가 쉬운게 아니라10번 하면 9마리는 내가 먹어 보기때문에 힘과 몸무게가 남아 돈다오... 음하하하..";
                mes 3,"그나저나 물고기를 많이 먹다 보니 콜레스테롤이 많아져서 점점 남자가 되가는것 같군..\\n음.. 자 그럼 잡아온 물고기 좀 볼까?";
                set@food2,menu(1,"잡아온 물고기를 나에게 줄라우??{=q 물고기 크기는 상관없이 마구잡이로 가져가니 원하지 않으면 다시 오시오", "잡아온 물고기를 준다", "다음에 다시온다");
                if(@food2==1){
                    set@food3,menu(1,"잡아온 물고기 종류를 선택해주세요.{=q 각 물고기가 10마리씩 필요하오~","골든레드피쉬","네기피쉬","트로피칼테트라");
                    if(@food3==1){
                        if(item_exist(@myid,"골든레드피쉬")<10){food1:mes 2,"...물고기는 한마리도 안보이는데....대신 당신의 소중한 아이템을 요리재료로 써줄까??\\n하하하하하하하하하하하하.";}
                        item_del "골든레드피쉬",10;
                        food2:
                        item_add "생선구이",1;
                        set #fishfood,0;
                        mes 2,"호호호~ 고마워요. 약속했던 보답으로 {=c생선구이{=a를 드리도록 할게요.\\n물고기를 구해다 오시면 또 만들어 드릴 테니 언제든 찾아오시구랴~ 호호호호호";
                    }else if(@food3==2){
                        if(item_exist(@myid,"네기피쉬")<10){goto food1;}
                        item_del "네기피쉬",10;
                        goto food2;
                    }else if(@food3==3){
                        if(item_exist(@myid,"트로피칼테트라")<10){goto food1;}
                        item_del "트로피칼테트라",10;
                        goto food2;
                    }
                }
            }
        }
    }
    //피닉스크로어퀘스트■■■■■■■■■■■■■■■
    if(get_mapname(@myid)=="밀레스식당"){
        if(@say$=="완전방어"&&get_class(@myid)==1&&#EestQuest007==0){
            npc_look @myid, 0, 21;
            mes 3,"한때 난 잘나가는 기사였지....";
            mes 3,"왕을모시고 전장을 누비는 영웅이었지...";
            mes 3,"이야기를 하려니 목이마르군.";
            mes 3,"나는 포도주를 좋아하지.";
            mes 3,"요즘은 좋은 포도주를 구하기 힘들다더군.";
            mes 3,"내가 듣기로는 포도주는 물이 많은 어느 마을에서 구할수 있다더군.";
            mes 3,"어딘가 예전의 기법으로 포도주를 만들어주는 여자가 있다고 하던데";
            set #EestQuest007, 1;
            mes 2,"포도주를 구하면 나에게 주게나. 수고하게나.";
        }
    }
    //연습장■■■■■■■■■■■■■■■■■■■■■■
    if(get_mapname(@myid)=="밀레스여관"){
        if(@say$=="연습"){
        npc_look @myid, 0, 22;
        room:
        set @room,menu(1,"연습장에 들어가시려면 사용료 5000골드가 필요합니다. 돈을 내시겠습니까?","예. 전 연습하길 원합니다.","아니오. 전 돈이 없거든요.");
        if(@room==0){goto room;}
        if(@room==1){
            if(get_money(@myid)<5000){
                mes 3,"어머나. 돈도 없으시면서... 돈을 가지고 오세요.";
                mes 2,"혹시나 연습이 필요하시면 언제든지 오세요.";
                end;
            }
            money_del 5000;
            set @room2,menu(1,"5000골드 받았습니다. 어느 연습장으로 가길 원하세요?","큰연습장","작은연습장");
            if(@room2==1){
                mes 3,"그럼 큰 연습장으로 보내드리겠습니다.";
                warp "밀레스큰연습장",1,2;
                if(map_objmob(@myid)<=17){
                    mob_spawn4 "샌드백1","밀레스큰연습장",2,4,2;
                    mob_spawn4 "샌드백2","밀레스큰연습장",3,5,2;
                    mob_spawn4 "샌드백3","밀레스큰연습장",4,4,1;
                    mob_spawn4 "샌드백4","밀레스큰연습장",5,3,1;
                    mob_spawn4 "샌드백5","밀레스큰연습장",6,4,2;
                    mob_spawn4 "샌드백6","밀레스큰연습장",7,5,2;
                    mob_spawn4 "샌드백7","밀레스큰연습장",8,4,1;
                    mob_spawn4 "샌드백8","밀레스큰연습장",9,3,2;
                    mob_spawn4 "샌드백9","밀레스큰연습장",10,4,2;
                    mob_spawn4 "샌드백10","밀레스큰연습장",2,8,2;
                    mob_spawn4 "샌드백11","밀레스큰연습장",3,9,2;
                    mob_spawn4 "샌드백12","밀레스큰연습장",4,8,1;
                    mob_spawn4 "샌드백13","밀레스큰연습장",5,7,2;
                    mob_spawn4 "샌드백14","밀레스큰연습장",6,8,1;
                    mob_spawn4 "샌드백15","밀레스큰연습장",7,9,1;
                    mob_spawn4 "샌드백16","밀레스큰연습장",8,8,1;
                    mob_spawn4 "샌드백17","밀레스큰연습장",9,7,1;
                }
            }else if(@room2==2){
                mes 3,"그럼 작은 연습장으로 보내드리겠습니다.";
                warp "밀레스작은연습장",1,9;
                if(map_objmob(@myid)<=11){
                    mob_spawn4 "샌드백18","밀레스작은연습장",3,2,1;
                    mob_spawn4 "샌드백11","밀레스작은연습장",4,1,1;
                    mob_spawn4 "샌드백19","밀레스작은연습장",5,2,1;
                    mob_spawn4 "샌드백20","밀레스작은연습장",8,2,1;
                    mob_spawn4 "샌드백21","밀레스작은연습장",9,1,2;
                    mob_spawn4 "샌드백22","밀레스작은연습장",10,2,1;
                    mob_spawn4 "샌드백23","밀레스작은연습장",3,6,2;
                    mob_spawn4 "샌드백24","밀레스작은연습장",4,5,1;
                    mob_spawn4 "샌드백25","밀레스작은연습장",5,6,1;
                    mob_spawn4 "샌드백26","밀레스작은연습장",8,6,1;
                    mob_spawn4 "샌드백27","밀레스작은연습장",9,5,2;
                    mob_spawn4 "샌드백28","밀레스작은연습장",10,6,2;
                }
            }
        }else if(@room==2){
            mes 3,"연습장을 운영하기 위해선 돈이 필요하답니다. 죄송합니다.";
            mes 2,"혹시나 연습이 필요하시면 언제든지 오세요.";
        }
        }
    }
    //용의발톱퀘스트■■■■■■■■■■■■■■■■■■
    if(get_mapname(@myid)=="밀레스주점"){
        if(@say$=="조커"&&#EestQuest006==1){
            npc_look @myid, 0, 20;
            mes 3,"아아..그분..저번에 저희 주점에 오셨었죠. 절 계속 보고계셨는데.. 그분의 눈길이 머릿속에서 떠나질 않아요.";
            set @rana,menu(1,"어째서 였을까요?","당신의 춤은 굉장히 멋지니까요.","뭘 그런 사람을 기억하고 그러는지...");
            if(@rana==1){
                mes 3,"어머~ 감사합니다. 사실은 이번 왕국 댄스 콘테스트에 나갈생각이예요. 새 드레스도 준비했고...";
                mes 3,"하지만 그 드레스에 어울릴만한 장신구를 구하지 못해서 걱정이예요..어멋..처음 뵙는 분에게 제가 무슨 말을~!!";
                set #EestQuest006,2;
                mes 2,"그냥 지나가는 말이예요~ 신경쓰지 마세요.";
            }
        }    
    }
    if(get_mapname(@myid)=="수오미보석상점A"){
        npc_look @myid, 0, 163;
        if(@say$=="장신구"&&#EestQuest006==3){
            mes 3,"어서오세요~ 오~호호호호.. 저희가게는 제가 수공예로 만든 진귀한 장신구들이 잔뜩있답니다. 물론 아무나 가질수 있는 그런 제품은 만들지 않아요~ 전 자존심이 높거든요.";
            set @suomiA,menu(1,"무엇이 필요하신가요?","여자분에게 잘 어울릴 장신구가 필요합니다.","아닙니다. 실례했습니다.");
            if(@suomiA==1){
                mes 3,"호호호호~ 그러세요? 하지만 ~ 아까도 말씀드렸지만 전 아무나에게 보석들을 팔지 않아요. 보석이란 그것에 맞는 사람에게 주어졌을때 비로서 빛이 나게 마련이지요~";
                mes 3,"제 사촌이 죽음의마을에서 광부좀비에게 처참하게 당한적이 있었지요. 그 괴물을 10마리 잡아오시면 당신을 인정해드리겠어요.";
                set #EestQuest006,4;
                mes 2,"잡아오셨으면 {=c잡아왔습니다. {=a라고 말씀해주세요.";
            }
        }
        if(@say$=="잡아왔습니다"&&#EestQuest006==4&&#EestQuest006A>=10){
            mes 3,"빨리 다녀오셨네요. 그럼 어디 볼까요?";
            mes 3,"호오~ 실력이 대단하신걸요? 당신은 제가 만든 작품을 받기에 충분한 자격이 있으신분이로군요!";
            mes 3,"네? 라나와 조커님이?";
            mes 3,"어머나..그런 사연이 있는줄 모르고...죄송해요 당신은 정말 멋진분이로군요. 그렇다면 저도 스페셜한 장신구를 만들어 드려야 겠는데..";
            mes 3,"지금 있는 재료로는 충분하지가 않고...죄송하지만 재료를 구해다 주세요.";
            set #EestQuest006, 5;
            set #EestQuest006A, 0;
            mes 2,"그 재료는 몇일전에 뤼케시온 해안가에서 다른 대륙의 상인이 배가 난파되서 떠내려왔더군요. 그 상인은 여러가지 진귀한 물건들을 많이 가지고 있는데..그 상인에게서 장신구에 쓰일만한 재료를 구해주세요.";
        }
        if(@say$=="보석"&&#EestQuest006==7&&item_exist(@myid, "홍염의진주")){
            mes 3,"보석을 구해오셨나요?!";
            mes 3,"어머나~ 정말 구해오셨군요~~~!!!";
            mes 3,"자 ~ 이제 멋진 목걸이를 만들어 드릴께요~";
            mes 3,"이 목걸이를 가지고 이제 조커님에게 돌아가보세요.";
            item_del "홍염의진주", 1;
            set #EestQuest006, 8;
            mes 2,"좋은 결과가 있었으면 좋겠네요..수고하세요~호호호호";
        }
    }
    if(get_mapname(@myid)=="뤼케시온여관"){
        if(@say$=="물건"&&#EestQuest006==5){
            npc_look @myid, 0, 58;
            mes 3,"나는 이 대륙의 사람이 아니지요..제가 타고있던 배가 난파되는 바람에 여러날을 판자에 의지해서 떠내려왔습니다.";
            mes 3,"언젠가 돌아갈 날을 준비하고 있지요. 전 상인체질이라서 이 곳에서도 장사를 조금하고 있지요.";
            mes 3,"보석이 필요하시다구요? 제게는 저희 고장의 특산품인 귀한 보석이 있지만 ...돈을 받고 팔지는 않습니다. 전 이곳돈은 필요가 없거든요.";
            mes 3,"대신 제가 제 대륙으로 돌아가서 장사할수 있는 재품들을 모으고 있는데..제가 원하는 것은 드라코의비늘입니다. 저희 고장에서는 그것이 귀중한 시약재료로 쓰이거든요.";
            set #EestQuest006, 6;
            mes 2,"그 조각을 5개 모아다 주시면 보석을 드리도록 하지요. 다 모아오셨으면  드라코의비늘을 모아왔다고 말씀해주세요.";
        }
        if(@say$=="잡아왔습니다"&&#EestQuest006==6&&item_exist(@myid, "드라코의비늘")>=5){
            npc_look @myid, 0, 58;
            mes 3,"흐음..어디 볼까요?";
            mes 3,"호오~ 확실히 드라코의비늘 5개로군요.";
            set #EestQuest006, 7;
            item_del "드라코의비늘",1;
            item_del "드라코의비늘",1;
            item_del "드라코의비늘",1;
            item_del "드라코의비늘",1;
            item_del "드라코의비늘",1;
            item_add "홍염의진주", 1;
            mes 2,"자..원하시던 보석을 드렸습니다. 잘 쓰십시요.";
        }
    }
    //진정한강자퀘스트■■■■■■■■■■■■■■■■■
    if(get_mapname(@myid)=="연무관-창고"||get_mapname(@myid)=="여관-금화장"||get_mapname(@myid)=="무기점-연무관"||get_mapname(@myid)=="아슬론교련장"){
        if(@say$=="진정한"||@say$=="실수"||@say$=="땅의고장"||@say$=="엔도르킹"||@say$=="개방의주문서"||@say$=="다녀왔습니다"||@say$=="물리쳤습니다"||@say$=="물리쳤습니다"||@say$=="모아왔습니다"||@say$=="강화"||@say$=="엔도르퀸"||@say$=="해방의주문서"){call_func @myid, "WestQuest009_A";end;}
    }
    if(get_mapname(@myid)=="로톤대장간"){
        npc_look @myid, 0, 833;
        if(instr(last_say(@myid), "로딘")){
            if(#EestQuest013A==1){
                mes 3,"아.. {=c로딘 {=a씨에게 이야기는 들었어요.";
                mes 3,"아마 그 {=c고철군{=a은 동력원이 고장나 있을거에요. 말끔하게 고칠 수도 있겠지만, 로딘씨는 그렇게 되면 곤란하다고 하시더라고요.";
                mes 3,"적당히 사람을 해칠 수 없는 정도로 만들어서 상품으로 만들려는 것 같던데 음... 뭐 괜한 참견을 하고싶지는 않네요. 나름의 사정이 있으시겠죠?";
                mes 3,"어쨋든 {=c새로운 동력원{=a을 만들기 위해선 기계들의 파편이 필요해요. 네 맞아요. {=c로톤 북쪽의 숲{=a에서 구할 수 있죠.";
                set #EestQuest013A, 2;
                mes 2,"위험한 곳이란건 알고 있지만.. 다른 방법이 없네요. 제가 필요한 물품을 적어드리겠습니다.\\n{=v[필요준비물: B구역의기계파편 20개]";
            }
            if(#EestQuest013A==2){
                if(item_exist(@myid, "B구역의기계파편") < 20){mes 2,"아직 재료들이 덜 모인 것 같네요.";}
                mes 3,"재료가 모두 모였군요. 잠시만 기다려주세요.";
                mes 3,"(뚝딱뚝딱) 휴.. 자 이게 {=c출력제한동력원{=a입니다. 아마 고철군은 보통 꼬마아이 정도의 힘밖에 내지 못하게 될 거에요.";
                item_del "B구역의기계파편", 20;
                item_add "출력제한동력원", 1;
                mes 2,"이걸 가지고 {=c로딘{=a씨에게 가보시면 될 것 같습니다.";
            }
        end;
        }
        if(instr(last_say(@myid), "하이넬")){
            if(#EestQuest013B==1){
                mes 3,"음 {=c하이넬{=a에게 이야기는 들었어요.";
                mes 3,"고철군을 그냥 본래 상태로 수리한다니.. 아마 로딘씨가 알게 되면 날뛰시겠지만, 대충 실수했다고 둘러댈 수는 있을거같네요.";
                mes 3,"저도 하이넬한테 신세지는 것도 있고 하니 하이넬의 말대로 한번 해보도록 하겠습니다.";
                mes 3,"어쨋든 {=c새로운 동력원{=a을 만들기 위해선 기계들의 파편이 필요해요. 네 맞아요. {=c로톤 북쪽의 숲{=a에서 구할 수 있죠.";
                set #EestQuest013B, 2;
                mes 2,"위험한 곳이란건 알고 있지만.. 다른 방법이 없네요. 제가 필요한 물품을 적어드리겠습니다.\\n{=v[필요준비물: B구역의기계파편 20개]";
            }
            if(#EestQuest013B==2){
                if(item_exist(@myid, "B구역의기계파편") < 20){mes 2,"아직 재료들이 덜 모인 것 같네요.";}
                mes 3,"재료가 모두 모였군요. 잠시만 기다려주세요.";
                mes 3,"(뚝딱뚝딱) 휴.. 자 이게 {=c정상적인동력원{=a입니다. 아마 고철군은 정상적인 기능을 하게 될 거에요.";
                item_del "B구역의기계파편", 20;
                item_add "정상적인동력원", 1;
                mes 2,"이걸 가지고 {=c하이넬{=a씨에게 가보시면 될 것 같습니다.";
            }
        end;
        }
    end;
    }
    if(get_mapname(@myid)=="루어스성3층집무실"){
        npc_look @myid, 0, 44;
        if(instr(last_say(@myid), "탐사대")){
            if(#EestQuest011==1){
                mes 3, "어서오게. 소문이 생각보다 빨리 퍼진 모양이로군.";
                mes 3, "사실 이전에도 적룡굴의 심층부에 잠들어있다하는 {=c고대재보{=a를 발굴하려는 시도는 적지 않았지.";
                mes 3, "하지만 {=c고대재보{=a의 정체에 대한 의견이 분분했기에 발굴단은 매번 뿔뿔히 흩어지게 되었고 험난한 적룡굴의 여정을 견디지 못해 모두 와해 되었다네.";
                mes 3, "자네같은 모험가들이 이 일을 지원해 준다면, 이번에야 말로 성공할 수 있을지도 모르지.";
                set @RA, menu(1, "어때? 지원해 볼 의향이 있는가?", "네,지원하고 싶습니다.", "아니오,하지 않겠습니다.");
                if(@RA==1){
                    mes 3, "협력에 감사하네. 탐사대가 출발한지 오래되지 않았으니 지금 {=c적룡굴의 레드오피온 캠프{=a로 출발해도 늦지 않을걸세.";
                    set #EestQuest011, 2;
                    mes 2, "부디 고대재보가 사악한 세력들에 의해 악용되지 않고 무사히 발굴될 수 있도록 힘을 보태주게나.";
                }
            }
            if(#EestQuest011==19){
                mes 3, "자네를 기다리고 있었네.. 탐사대장에게 보고받은 바에 의하면 테네즈의 후예들이 다른 차원의 무엇과 서약을 맺고 재기를 도모하고 있었다고?!";
                mes 3, "테네즈의 후예들이 또 어떤 일을 꾸미고 있는지 아직은 알 수 없지만, 가능한 최대한의 정보를 모아볼 참이네.";
                mes 3, "우리에게 닥친 과제가 너무나도 거대한 것 같군. 자네는 이번 일에 정말 공헌이 많았어. 앞으로도 가능하다면 많은 도움을 받고 싶군.";
                mes 3, "앞으로 테네즈의 후예들의 행동에 대한 윤곽이 잡힌다면 그 때 다시 힘을 빌려주게나.";
                item_add "화이어윙", 1;
                set #EestQuest011, 20;
                legend_add 7, 254, "고대 재보의 탐사를 지원하다";
                message 3, "루어스국왕으로 부터 {=c화이어윙 {=s아이템을 선물로 받았습니다";
                sleep 200;
                message 3, "{=c고대재보의 탐사를 지원하다!!";
            }
        end;
        }
    end;
    }
    if(instr(last_say(@myid), "복숭아주")){
        if(get_mapname(@myid)=="노엠주점"){
            if(#WestQuest010B==1){
                npc_look @myid, 0, 536;
                set @WestQuest010B2, menu(1, "혹시 내가 좋아하는 복숭아주를 가져온건가!?", "네~", "죄송...");
                if(@WestQuest010B2==1){
                    if(!item_exist(@myid, "복숭아주")){mes 2, "복숭아주를 좀 갖다 주게나..";}
                    mes 3, "오~ 고맙네, 이건 답례일세. 받아주게나.";
                    set #WestQuest010B, 0;
                    item_del "복숭아주", 1;
                    item_add "생명의물B", 1;
                    message 3, "노엠촌장에게 {=c생명의물B{=a를 받았습니다.";
                }
            }
        end;
        }
        if(get_mapname(@myid)=="화론-조리장"){
            npc_look @myid, 0, 601;
            mes 3, "여기까지 무슨일인가모. 복숭아주가 필요한가모? 노엠촌장님의 부탁이라고 하니, 그럼 특별히 재료값만 받겠다모. 5론만 달라모.";
            if(item_exist(@myid, "론") < 5){mes 2, "론이 부족하다모.";}
            item_del "론", 5;
            item_add "복숭아주", 1;
            mes 2, "여기 있다모";
        }
    end;
    }
    if(get_mapname(@myid)=="알세이드스-화론마을"){
        if(@say$=="확인" && #WestQuest008==10){
            npc_look @myid, 0, 26;
            mes 3, "나에게 무슨 볼일인가? 확인서? 한푼만 주면 해주지.";
            input @Westmoney, 2, "얼마나 줄껀가?", "금전", "전", 6;
            if(@Westmoney==0){
                mes 2,"너무 적다고 생각하지 않나? 실망이네.";
            }
            if(@Westmoney < 99999){mes 2,"너무 적다고 생각하지 않나? 실망이네."; end;}
            if(get_money(@myid) < 99999){mes 2,"너무 적다고 생각하지 않나? 실망이네."; end;}
            money_del @Westmoney;
            mes 3, "확인했다.";
            mes 3, "다음은'화론촌장손녀'네";
            item_del "확인서1", 1;
            item_add "확인서2", 1;
            set #WestQuest008, 11;
            mes 2, "잘가게나~";
        end;
        }
        if(@say$=="확인" && #WestQuest008==13){
            npc_look @myid, 0, 603;
            mes 3, "확인서를 가지고 오셨소?";
            if(!item_exist(@myid, "확인서4")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'연무관주인' 이요";
            item_del "확인서4", 1;
            item_add "확인서5", 1;
            set #WestQuest008, 14;
            mes 2, "그럼 수고하시오.";
        end;
        }
        if(@say$=="확인" && #WestQuest008==15){
            npc_look @myid, 0, 600;
            mes 3, "확인서를 가지고 오셨소?";
            if(!item_exist(@myid, "확인서6")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'화론경비병' 이요";
            item_del "확인서6", 1;
            item_add "확인서7", 1;
            set #WestQuest008, 16;
            mes 2, "그럼 수고하시오.";
        end;
        }
        if(@say$=="확인" && #WestQuest008==16){
            npc_look @myid, 0, 603;
            mes 3, "확인서를 가지고 오셨소?";
            if(!item_exist(@myid, "확인서7")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'화론촌장손녀' 이요";
            item_del "확인서7", 1;
            item_add "확인서8", 1;
            set #WestQuest008, 17;
            mes 2, "그럼 수고하시오.";
        end;
        }
        if(@say$=="확인" && #WestQuest008==19){
            npc_look @myid, 0, 603;
            mes 3, "확인서를 가지고 오셨소?";
            if(!item_exist(@myid, "확인서10")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'상약국주인' 이요";
            item_del "확인서10", 1;
            item_add "확인서11", 1;
            set #WestQuest008, 20;
            mes 2, "그럼 수고하시오.";
        end;
        }
    end;
    }
    if(get_mapname(@myid)=="여관-금화장"){
        if(@say$=="확인" && #WestQuest008==11){
            npc_look @myid, 0, 605;
            mes 3, "확인서를 가지고 오셨나요?";
            if(!item_exist(@myid, "확인서2")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'연무관주인' 이예요";
            item_del "확인서2", 1;
            item_add "확인서3", 1;
            set #WestQuest008, 12;
            mes 2, "그럼 수고하세요.";
        end;
        }
        if(@say$=="확인" && #WestQuest008==17){
            npc_look @myid, 0, 605;
            mes 3, "확인서를 가지고 오셨나요?";
            if(!item_exist(@myid, "확인서8")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'상약국주인' 이예요";
            item_del "확인서8", 1;
            item_add "확인서9", 1;
            set #WestQuest008, 18;
            mes 2, "그럼 수고하세요.";
        end;
        }
    end;
    }
    if(get_mapname(@myid)=="시약점-상약국"){
        npc_look @myid, 0, 601;
        if(@say$=="확인" && #WestQuest008==18){
            mes 3, "확인서를 가지고 오셨나요?";
            if(!item_exist(@myid, "확인서9")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            mes 3, "확인했습니다.";
            mes 3, "다음은'화론경비병' 이예요";
            item_del "확인서9", 1;
            item_add "확인서10", 1;
            set #WestQuest008, 19;
            mes 2, "그럼 수고하세요.";
        end;
        }
        if(@say$=="확인" && #WestQuest008==20){
            if(!item_exist(@myid, "확인서11")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
            item_del "확인서11", 1;
            set #WestQuest008, 21;
            mes 2, "이제 됬어?충분해요 촌장한테 가보세요.";
        end;
        }
    end;
    }
    if(get_mapname(@myid)=="무기점-연무관"){
        npc_look @myid, 0, 602;
        if(@say$=="확인"){
            if(#WestQuest008==12){
            mes 3, "확인서를 가지고 오셨소?";
            if(!item_exist(@myid, "확인서3")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
                mes 3, "확인했습니다.";
                mes 3, "다음은'화론경비병' 이요";
                item_del "확인서3", 1;
                item_add "확인서4", 1;
                set #WestQuest008, 13;
                mes 2, "그럼 수고하시오.";
                end;
            }
            if(#WestQuest008==14){
                mes 3, "확인서를 가지고 오셨소?";
                if(!item_exist(@myid, "확인서5")){set #WestQuest008, 9; mes 2, "확인서가 없군요. 촌장님의 통해 다시 시험을 치루시길 바랍니다."; end;}
                mes 3, "확인했습니다.";
                mes 3, "다음은'화론떠돌이' 요";
                item_del "확인서5", 1;
                item_add "확인서6", 1;
                set #WestQuest008, 15;
                mes 2, "그럼 수고하시오.";
            end;
            }
        }
    end;
    }
    if(get_mapname(@myid)=="운디네마을"){
        if(@say$=="생명의물"){
            npc_look @myid, 0, 58;
            mes 3, "어라. 살다 보니 생명의물에 대해 알고 있는 사람을 만날 줄이야.";
            set @WestQuest010A, menu(1, "성수 10개를 가지고 오면 그걸 증류해서 생명의물 한 개를 만들 수 있지.\\n생명의물의 힘은 강력해서 보통 인간이나 식물에는 사용할 수 없을텐데... 필요하다면\\n만들어주겠네. 성수 10개를 가져왔는가?", "네.", "아니오");
            if(@WestQuest010A==1){
                if(item_exist(@myid, "성수") < 10){mes 2, "성수는 어디에 있는가?";}
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_del "성수", 1;
                item_add "생명의물A", 1;
                message 3, "성수상인에게 {=c생명의물A{=a를 받았습니다.";
            }else if(@westquest010A==2){
                mes 2, "다음에 봅세.";
            }
        }
    end;
    }
    if(@say$=="생명의물" && get_mapname(@myid)=="노엠주점"){
        npc_look @myid, 0, 536;
        set @WestQuest010B, menu(1, "생명의물이 필요하다고? 미안하지만 떠돌이 모험가에게 그 귀한걸 줄 순 없어.\\n내 부탁을 한가지 들어주면 생각해보도록 하지.", "무슨 부탁이신가요?", "귀찮아요");
        if(@WestQuest010B==1){
            mes 3, "실은…내가 술을 좋아하는데, 화론 마을의 복숭아주가 일품이란 말이지.\\n가끔 가서 화론촌장과 즐기곤 했는데, 노인네가 통 정신이 오락가락 하는데에다가 화론 촌장 손녀 눈치도 보이고...";
            set #WestQuest010B, 1;
            mes 2, "나도 촌장이다 보니 바빠서말야. 그래서 말인데, 복숭아주를 좀 갖다 주지 않겠나?\\n얻어오거든 {=c복숭아주{=a라고 말해주게~";
        }
    end;
    }
    if(get_mapname(@myid)=="아만여관"){
        npc_look @myid, 0, 921;
        if(@say$=="봉인"){
            if(#WestQuest010==5){
                mes 3, "동쪽 대륙 용자의 자손들이 여기까지 와서 다시 한번 더 우리를 위해 힘써주는군. 골골.\\n내가 어릴 적 마이소시아의 용자가 화론으로 가는 길목에서 거대한 괴물과 싸웠다고 하더군.";
                set #WestQuest010, 6;
                set #WestQuest010C, 1;
                item_add "주술이걸린글래스조각", 1;
                mes 2, "우리 아버님 말씀이 그때 그 괴물이 지하로 도망치는 것을 두눈으로 똑똑히 보았다고 했지...\\n이건 부모님께 물려받은 그때 가져온 몬스터의 파편일세. 여기에 주술을 걸어두었으니, 화론에서 가는 길목에서 사용하면 몬스터가 나타날거야.골골.";
            }
            if(#AmanTotemE >= 1 && #WestQuest010C==1){
                set #WestQuest010, 8;
                mes 2, "자네가 해냈군? 가서 페이칸 군주님께 {=c봉인{=a에 대해서 보고하게나.";
            }
        }
        if(@say$=="생명의물"){
            if(#WaterofLifeC != 0){
                if(!item_exist(@myid, "루딘의부러진칼조각")){mes 2, "내가 무엇을 믿고 자네에게 줄 수 있겠나. 믿을만한 증거를 가지고 오게나. 골골.";}
                mes 3, "오, 이 문양과 모양...이것은 딱봐도 내가 들었던 그때 루딘 님이 썼다는 칼 조각이군. 골골.\\n자네라면 믿을 수 있겠군. 이걸 받아주게.골골";
                item_del "루딘의부러진칼조각", 1;
                item_add "생명의물C", 1;
                message 3, "빌리칸에게 {=c생명의물C{=a를 받았습니다.";
                set #WaterofLifeC, 0;
                end;
            }
            mes 3, "허허, 내가 생명의물을 보관하고 있다는 사실은 어떻게 안 겐가? 골골.\\n아주 오래 전, 동쪽 대륙의 용사가 우리 집안에 맡기고 간 것이지. 나쁜 사람에게 넘어가지 않도록 지켜달라고 신신당부를 하더군.";
            mes 3, "내가 무엇을 믿고 자네에게 줄 수 있겠나. 믿을만한 증거를 가지고 오게나. 골골.";
            set #WaterofLifeC, 1;
        }
    end;
    }
    if(get_mapname(@myid)=="아만자치국회관"){
        npc_look @myid, 0, 920;
        if(@say$=="다녀왔습니다"){
            if(#WestQuest010==2){
                if(#AmanTotemD == 1 && #AmanTotemC == 1 && #AmanTotemB == 1 && #AmanTotemA == 1){
                    mes 3, "그래, 그 4개의 토템과 마을의 세계수가 이 마을을 지탱하는 힘일세.\\n아주 오래 전에 이곳을 지나간 용자의 말에 의하면, 세상에는 식물의 힘을 강화시킬 수 있는 신성한 힘을 가진 물이 있다고 하던데…";
                    set #WestQuest010, 3;
                    mes 2, "얼마전에 안 사실인데 성수들은 각각  동쪽 대륙의 성수상인이, 노엠총장이, 빌리칸이, 그리고 정글 몬스터가 가지고 있다고 하네.\\n가지고오면 {=c모아왔습니다{=a라고 말해주게나.";        
                }else{
                    mes 2, "수호토템 들을 보고 오게.";
                }
            }
        }
        if(@say$=="봉인"){
            if(#WestQuest010==8){
                mes 3, "드디어 봉인이 해체되었군. 모든 것은 자네 덕분일세. 그 동안의 노고에 감사드리네. 아만주민들을 대표하여 내가 주는 선물을 받아주게나.";
                legend_add 0, 255, "아만과 화론사이의 봉인을 약화시켜 아만 군주에게 인정받다.";
                message 3, "정글과 화론 사이의 봉인을 해체했다.";
                item_add "정글악어악세", 1;
                set #WestQuest010, 9;
                end;
            }
        }
        if(@say$=="물리쳤습니다"){
            if(#WestQuest010==4){
                if(#AmanTotemD >= 2 && #AmanTotemC >= 2 && #AmanTotemB >= 2 && #AmanTotemA >= 2){
                set #WestQuest010, 5;
                mes 2, "이상하군, 아직도 화론으로 가는 길이 뚫어지지 않았는데… 나도 영문을 모르겠어. 남아있는 괴물이 더 있는걸까…";
                }
            }
        }
        if(@say$=="모아왔습니다"){
            if(#WestQuest010==3){
                if(!item_exist(@myid, "생명의물A")||!item_exist(@myid, "생명의물B")||!item_exist(@myid, "생명의물C")||!item_exist(@myid, "생명의물D")){mes 2, "성수들은 각각  동쪽 대륙의 성수상인이, 노엠총장이, 빌리칸이, 그리고 정글 몬스터가 가지고 있다고 하네.";}
                mes 3, "오오, 이게 바로 그 신성한 물이로군. 정말 구해올 줄이야. 이걸 토템에게 사용해주게. 아마 강한 힘을 견디지 못하고 지하에 숨어있던 몬스터가 밖으로 나올거야.";
                set #WestQuest010, 4;
                mes 2, "그걸 해치워주게. 돌아오면 {=c물리쳤습니다{=a라고 보고해주게.";
            }
        }
        if(@say$=="고민"){
            if(#WestQuest010==9){mes 2, "그대야말로 진정한 용자일세.";}
            if(#WestQuest010==2){mes 2, "수호토템 들을 보고 오게.";}
            if(#WestQuest010==1){
                if(!item_exist(@myid, "엘로푸이열매")){goto peican1;}
                set #AmanTotemA, 0;
                set #AmanTotemB, 0;
                set #AmanTotemC, 0;
                set #AmanTotemD, 0;
                mes 3, "헛, 이건 내가 좋아하는 엘로푸이열매….\\n먹을걸 주다니 자네 괜찮은 사람이구만! 내가 먹을 것에 약한 건 어떻게 알고…(침을 질질 흘리고 있다.)";
                mes 3, "도와준다고 하니 털어놓겠네.\\n예전 우리 마을은 알세이드스와 종종 교류하던 사이였지. 그런데 악에 지배당한 추장 루칸 덕분에 정글이 오염되면서. 아만을 지탱하고 있던 토템과 세계수의 힘이 약해져 버렸어.";
                mes 3, "루칸은 땅 밑에 정기를 빼앗는 괴물들을 심어둔 모양이더군.\\n덕분에 이곳은 고립되어 버렸고,,, 다시 토템의 힘을 강화할 수만 있다면 좋을텐데 말야…";
                item_del "엘로푸이열매", 1;
                set #WestQuest010, 2;
                mes 2, "정말 도와줄 생각이라면 사전조사부터 해야겠지? 정글에는 아만의 떠받느는 4개의 토템이 있다네,\\n우선 그 토템들을 둘러보고 오게나. 와서 {=c다녀왔습니다{=a라고 말해주게.";
            }
            set @rand, rand2(1,10);
            if(@rand <= 3){
                mes 2, "뭐, 우리 동의 없이 여기까지 와서 왜 자꾸 귀찮게 하는가?";
            }if(@rand <= 4){
                mes 2, "이 먼 곳까지 타지 사람이 왠 일이지? 오해를 사기전에 빨리 돌아가게.";
            }if(@rand <= 6){
                mes 2, "이 먼 곳까지 타지 사람이 왠 일이지? 오해를 사기전에 빨리 돌아가게.";
            }else{
                peican1:
                set @peican, menu(1, "난 아주 바쁜 몸이라고, 상대할 시간 없네.", "고민이 있으시다고 들었어요.", "고집불통 이시네요?");
                if(@peican==1){
                    set #WestQuest010, 1;
                    mes 2, "누가 그런 헛소문을…타지 사람의 도움을 받고 싶은 생각은 없네,\\n내가 자네의 무엇을 보고 믿겠는가?";
                }
            }
        }
    end;
    }
    if(@say$=="루그" && get_mapname(@myid)=="호엔대장간B"){
        npc_look @myid, 0, 30;
        mes 3, "헉...그분을 어떻게 알고세시죠? 으으음...그분은 저희 호엔마을의 장인으로써..일찍이 왕궁의\\n전속 대장장이로 일하시면서 훌륭한 무기와 아이템들을 만들어 내셨었지요.";
        mes 3, "하지만 그분의 작품들을 헛되게 사용하는 사람들이 늘어나면서, 그분은 은둔생활을 시작하셨습니다. 그리고 자신을 찾기위해 노력하는 자가 아니면 만나려고 하지 않으시죠.";
        mes 3, "그분이 게시는 작업장에는 특수한 자물쇠가 걸려있어서 그것을 열기위해서는 신비한 힘을 가진 황금의 만능열쇠가 필요하다고 합니다.";
        mes 3, "그것은 아마도 적룡굴에서 구할수 있다고 들었습니다만...그분은 굉장히 까다로운 분이라서..";
        set @rugwarp, menu(1, "그런데..무엇때문에 그러시죠?", "루그가 만드는 아이템에 관심이 있습니다.", "아뇨..뭐..그냥....");
        if(@rugwarp==1){
            rugre:
            set @rugwarp2, menu(1, "루그님이 만드는 아이템을 설명해드리지요. 어떤것을 알고싶습니까?", "생명의목걸이", "생명의벨트", "암흑의목걸이", "암흑의벨트", "루그에게 가는 방법을 알고싶습니다.");
            if(@rugwarp2==1){
                mes 3, "생명의목걸이는 천사의 눈물이라고 하는 다이라룬드가 박혀있어서 그 보석으로 하여금 성스러운 기운을 내뿜어 악한 기운을 물리친다고 합니다.";
                mes 3, "그 목걸이를 만들기 위해서는 <홀리팬플룻> 이라고 하는 성스러운 악기와 <블루오피온의수염>이\\n필요하다고 합니다.";
                mes 3, "잊지 마셔야 할것은 꼭 재료를 모두 준비해서 가셔야 한다는 것입니다. 그분은 재료가 모자라면\\n받은 재료도 돌려주지 않습니다.";
                goto rugre;
            }else if(@rugwarp2==2){
                mes 3, "생명의벨트는 그 모습만 봐도 화려하다고 느낄정도로 빛나는 벨트입니다. 재련할때에 한방울만 써도 죽음의 기운이 달아난다는 생명의시약을 뿌린다고 하는군요";
                mes 3, "그 재료는 <드래곤뉴트의 뿔> 과 성스러운 <생명의시약>이라고 합니다.";
                mes 3, "잊지 마셔야 할것은 꼭 재료를 모두 준비해서 가셔야 한다는 것입니다. 그분은 재료가 모자라면\\n받은 재료도 돌려주지 않습니다.";
                goto rugre;        
            }else if(@rugwarp2==3){
                mes 3, "암흑의 목걸이는 뮤레칸의 종인 어떤 드래곤이 소지하고 있다는 구슬로 만들어 차고있는 자체로도 그 용의 암흑의 기운이 몸을 지배한다고 하는군요.";
                mes 3, "그 목걸이를 만드는데는 <여의주>라고 불리우는 구슬과 <레드오피온의수염>이 필요하다고 합니다.";
                mes 3, "잊지 마셔야 할것은 꼭 재료를 모두 준비해서 가셔야 한다는 것입니다. 그분은 재료가 모자라면\\n받은 재료도 돌려주지 않습니다.";
                goto rugre;
            }else if(@rugwarp2==4){
                mes 3, "암흑의벨트는 생명의벨트와 마찬가지로 제련할때에 죽음의 기운이 담긴 시약을 뿌려 완성한다고\\n합니다.";
                mes 3, "그 벨트를 만드는데는 <암흑의시약>과 <드래곤드래곤뉴트의뿔>이 필요하다고 합니다.";
                mes 3, "잊지 마셔야 할것은 꼭 재료를 모두 준비해서 가셔야 한다는 것입니다. 그분은 재료가 모자라면\\n받은 재료도 돌려주지 않습니다.";
                goto rugre;
            }else if(@rugwarp2==5){
                set @rugwarp3, menu(1, "루그님께 가고 싶으시다고요? 열쇠가 필요한것은 아시겠죠? 혹시, 열쇠를 가지고 오셨습니까?", "네, 구해왔습니다.", "아니오");
                if(@rugwarp3==1){
                    if(!item_exist(@myid, "비밀의황금열쇠")){mes 0, "열쇠가없으시군요.열쇠를 구해오세요"; end;}
                    mes 3, "오호~구해오셨군요. 그럼 이제 그분의 작업실로 안내하겠습니다. 따라오세요";
                    item_del "비밀의황금열쇠", 1;
                    warp "루그의비밀작업장", 12,12;
                    end;
                }else if(@rugwarp3==2){
                    mes 2, "으음..열쇠가 있어야 자물쇠를 열수 있습니다. 열쇠를 구해오시면 언제든지 안내해드리겠습니다.";
                }
            }
        }else if(@rugwarp==2){
            mes 2, "저는 바쁜사람입니다.용무가 없으면 돌아가주세요.";
        }
        end;
    }
    if(get_mapname(@myid)=="전사승급신전"||get_mapname(@myid)=="도적승급신전"||get_mapname(@myid)=="마법사승급신전"||get_mapname(@myid)=="성직자승급신전"||get_mapname(@myid)=="무도가승급신전"){
        if(get_mapname(@myid)=="전사승급신전"){npc_look @myid, 0, 39;}
        if(get_mapname(@myid)=="도적승급신전"){npc_look @myid, 0, 60;}
        if(get_mapname(@myid)=="마법사승급신전"){npc_look @myid, 0, 679;}
        if(get_mapname(@myid)=="성직자승급신전"){npc_look @myid, 0, 40;}
        if(get_mapname(@myid)=="무도가승급신전"){npc_look @myid, 0, 678;}
        if(instr(last_say(@myid), "복구")){
            call_func @myid, "승급기본장비복구도우미";
        }
        if(instr(last_say(@myid), "업그레이드")){
            call_func @myid, "승급장비업그레이드";
        }
        if(instr(last_say(@myid), "승급")){
            call_func @myid, "승급도우미";
        }
        if(instr(last_say(@myid), "능력")){
            call_func @myid, "능력치도우미";
        }
    }
    if(instr(last_say(@myid), "라미아")){
        if(get_mapname(@myid)=="오렌군주의저택"){
            if(#orenquest002==1){
                npc_look @myid, 0, 39;
                if(get_class()==1||get_class()==2||get_class()==5){item_add "다크셀피어", 1;}
                if(get_class()==3||get_class()==4){item_add "홀리셀피어", 1;}
                set #orenquest002, 0;
                mes 0, "흠..라미아를 잡았는가? 대단한 실력이군... 그럼 그에 상응하는 댓가를 주마..";
                end;
            }
        }
    end;
    }
    if(get_mapname(@myid)=="밀레스신전"){
        if(instr(last_say(@myid), "체력")){
            npc_look @myid, 0, 61;
            mes 3, "어머나...어서 오세요. 이 세계를 어둠에서 구해주실 용사님...";
            mes 3, "그동안 당신의 모험담은 노래로 지어져서 널리 퍼져 있답니다.";
            mes 3, "저 역시 당신의 팬이에요...호호";
            mes 3, "어머나...내 정신 봐라...";
            set @sunjin, menu(1, "신들을 만나보고 싶으시다고요?", "네. 신의 축복이 필요하거든요.", "아니오. 아직은 제가 경험치 부족하군요.");
            if(@sunjin==1){
                mes 3, "신들을 만나고 싶으시다면 예물이 필요해요. 예물은 엑스쿠라눔이란 희귀한 시약 1병입니다.";
                mes 3, "신들의 세계로 가실려면, 신들에게 제물로 엑스쿠라눔 1개를 바치셔야 합니다.";
                set @select2, menu(1, "당신은 신들께 예물을 마치실 준비가 되어있습니까?", "예. 엑스쿠라눔을 가져 왔습니다.", "잉. 예물이 필요해요?");
                if(@select2==1){
                    mes 3, "당신께 엑스쿠라눔이 있는지 보고, 예물을 받도록 하겠습니다.";
                    if(get_level(@myid) != 99){mes 3, "신들을 만나시려면... 당신의 능력치 부터 올리셔야 합니다..."; end;}
                    if(item_exist(@myid, "엑스쿠라눔")==0){mes 4, "미처 예물을 준비 못하신듯 하네요. 예물을 준비하시고 다시 오시도록 하세요.";}
                    mes 3, "호호... 1병 확실히 받았습니다.";
                    mes 3, "이제 당신을 신들이 사는 신전으로 보내드리겠습니다.";
                    mes 3, "신전은 당신이 처음 태어나실대 보셨던 곳입니다. 그곳에서 세오님과 칸님을 찾아가시면 되요";
                    mes 3, "신들께 “당신의 은총을 바랍니다”라고 하시면 됩니다. 세오님은 체력으로, 칸님은 마력으로 보답하실거에요.";
                    mes 3, "당신의 앞날에 신의 가호가 있기를 기원합니다.";
                    item_del "엑스쿠라눔", 1;
                    warp "신들의세계", 25, 25;
                    end;
                }else if(@select2==2){
                    mes 3, "아시다시피 신들은 꽤 욕심이 많답니다...호호";
                    mes 4, "예물을 준비하셔서 다시 오도록 하세요.";
                }
            }else if(@sunjin==2){
                mes 4, "호호... 급하게 서두르실 필요 없어요. 신들은 한가하거든요. 담번에 또 와주세요.";
            }
        end;
        }
        if(@say$=="승급"){
            npc_look @myid, 0, 61;
            if(get_class_sub(@myid)==0){mes 0, "승급자가 아니면 감히 갈수 없습니다."; end;}
            mes 3, "마스터시군요.";
            mes 3, "능력치를 올리시려고 가시나보죠??";
            set @sunjin, menu(1, "신들을 만나보고 싶으시다고요?", "네. 신의 축복이 필요하거든요.", "아니오. 아직은 제가 경험치 부족하군요.");
            if(@sunjin==1){
                mes 3, "신들을 만나고 싶으시다면 예물이 필요해요. 예물은 엑스쿠라눔이란 희귀한 시약 1병입니다.";
                mes 3, "신들의 세계로 가실려면, 신들에게 제물로 엑스쿠라눔 1개를 바치셔야 합니다.";
                set @select2, menu(1, "당신은 신들께 예물을 마치실 준비가 되어있습니까?", "예. 엑스쿠라눔을 가져 왔습니다.", "잉. 예물이 필요해요?");
                if(@select2==1){
                    mes 3, "당신께 엑스쿠라눔이 있는지 보고, 예물을 받도록 하겠습니다.";
                    if(get_level(@myid) != 99){mes 3, "신들을 만나시려면... 당신의 능력치 부터 올리셔야 합니다..."; end;}
                    if(item_exist(@myid, "엑스쿠라눔")==0){mes 4, "미처 예물을 준비 못하신듯 하네요. 예물을 준비하시고 다시 오시도록 하세요.";}
                    mes 3, "호호... 1병 확실히 받았습니다.";
                    mes 3, "이제 당신을 신들이 사는 신전으로 보내드리겠습니다.";
                    mes 3, "신들께 “능력을 올리고 싶습니다.”라고 하시면 됩니다.";
                    mes 3, "당신의 앞날에 신의 가호가 있기를 기원합니다.";
                    item_del "엑스쿠라눔", 1;
                    if(get_class()==1){warp "전사승급신전", 5, 7; end;}
                    if(get_class()==2){warp "도적승급신전", 5, 7; end;}
                    if(get_class()==3){warp "마법사승급신전", 5, 7; end;}
                    if(get_class()==4){warp "성직자승급신전", 5, 7; end;}
                    if(get_class()==5){warp "무도가승급신전", 5, 7; end;}
                    end;
                }else if(@select2==2){
                    mes 3, "아시다시피 신들은 꽤 욕심이 많답니다...호호";
                    mes 4, "예물을 준비하셔서 다시 오도록 하세요.";
                }
            }else if(@sunjin==2){
                mes 4, "호호... 급하게 서두르실 필요 없어요. 신들은 한가하거든요. 담번에 또 와주세요.";
            }
        end;
        }
        if(@say$=="순수"){
            npc_look @myid, 0, 61;
            if(get_class()==5||get_son()==0 ||get_class_sub(@myid)==0){mes 2, "죄송합니다.순수직업 승급자분들만 입장이 가능합니다.";}
            warp "순수직업관", 7,5;
            mes 4, "순수직업승급자들을 위한 직업신전으로 이동합니다.";
        end;
        }
        if(@say$=="전직"){
            npc_look @myid, 0, 61;
            set @class, get_class(@myid);
            set @HP, get_basevita2(@myid);
            set @MP, get_basemana2(@myid);
            if(get_level(myid) < 99){end;}
            if(get_class_sub() != 0){mes 3, "마스터시군요."; mes 4, "마스터는 전직할수 없습니다.";}
            mes 3, "전직을 원하시나보죠?";
            mes 3, "전직은 신중하게생각하고 하시길...";
            if(#classchange==1){goto go8;}
            mes 3, "전직은 자신의 직업에서 다른 직업으로 변함을 말합니다.";
            mes 3, "자신의 직업이 좋다면 다신 한번 자신의 직업으로 변할수도 있구요.";
            mes 3, "단 전직은 오직 한번이니 신중하게 결정하길 바랍니다.";
            mes 3, "그리고 전직에도 많은 경험치와 기준이 있으니 자격이 안되면 신청하지 마시기 바랍니다.";
            mes 3, "전직을 하게되면 레벨이 1이되며 특성치도 초기화 됩니다.";
            mes 3, "또한 체력과 마력도 초기화됩니다.";
            mes 3, "그리고 당신이 가지고 있던 모든 경험치도 사라집니다.";
            if(@class==1){
                mes 3, "당신은 전사로써 전직 조건은, 체력 14000 마력 3500입니다.";
                if(@HP < 14000||@MP < 3500){mes 0, "당신은 아직 전직을 하실수가 없습니다. 체력마력 기준치를 달성한뒤 와주세요."; end;}
                goto go5;
            }
            if(@class==2){
                mes 3, "당신은 도적으로써 전직 조건은, 체력 11000 마력 6000입니다.";
                if(@HP < 11000||@MP < 6000){mes 0, "당신은 아직 전직을 하실수가 없습니다. 체력마력 기준치를 달성한뒤 와주세요."; end;}
                goto go5;
            }
            if(@class==3){
                mes 3, "당신은 마법사로써 전직 조건은, 체력 10000 마력 11000입니다.";
                if(@HP < 10000||@MP < 11000){mes 0, "당신은 아직 전직을 하실수가 없습니다. 체력마력 기준치를 달성한뒤 와주세요."; end;}
                goto go5;
            }
            if(@class==4){
                mes 3, "당신은 성직자로써 전직 조건은, 체력 11000 마력 12000입니다.";
                if(@HP < 11000||@MP < 12000){mes 0, "당신은 아직 전직을 하실수가 없습니다. 체력마력 기준치를 달성한뒤 와주세요."; end;}
                goto go5;
            }
            if(@class==5){
                mes 3, "당신은 무도가로써 환골탈퇴 조건은, 체력 14000 마력 6000입니다.";
                if(@HP < 14000||@MP < 6000){mes 0, "당신은 아직 환골탈퇴를 하실수가 없습니다. 체력마력 기준치를 달성한뒤 와주세요."; end;}
                goto go6;
            }
        end;
        go5:
            mes 3, "그럼 이제 전직에 관한 절차를 시작합니다.";
            mes 3, "전직에 필요한 체력 마력을 체크합니다.";
            mes 3, "그럼 이제 전직시 필요한 경험치를 체크합니다.";
            mes 3, "당신은 이제 전직을 할수 있습니다.";
            re3:
            set @select2, menu(1, "직업을 선택해주십시오.", "전사", "도적", "마법사", "성직자");
            if(@select2==0){goto re3;}
            if(@select2==1){
                re4:
                set @select3, menu(1, "강인한 체력과 강력함을 지닌 전사로서 다시 태워 나시겠습니까?", "네, 전사로 선택했습니다.", "다시 선택하겠습니다.");
                if(@select3==0){goto re4;}
                if(@select3==1){
                    if(@class==1){set_son 1;}else{set_son 0;}
                    set_class 1;
                    legend_add 7, 88, "세오 " + $년도 + "년 " + $계절$ + ", 전사로 전직하다.";
                    broadcast 3, "{=u[[ {=c" + get_name() +"{=s님이 전사로 전직하셨습니다. 축하 드립니다 !! {=u]]";
                    skill_add "숏블레이드";
                    goto go7;
                }else if(@select3==2){
                    mes 3, "신중히 골라주시길 바랍니다.";
                    goto re3;
                }
            }
            if(@select2==2){
                re5:
                set @select3, menu(1, "뛰어난 스피드와 치명적인 매력을 지닌 도적으로서 다시 태워 나시겠습니까?", "네, 도적으로 선택했습니다.", "다시 선택하겠습니다.");
                if(@select3==0){goto re5;}
                if(@select3==1){
                    if(@class==2){set_son 1;}else{set_son 0;}
                    set_class 2;
                    legend_add 7, 88, "세오 " + $년도 + "년 " + $계절$ + ", 도적으로 전직하다.";
                    broadcast 3, "{=u[[ {=c" + get_name() +"{=s님이 도적으로 전직하셨습니다. 축하 드립니다 !! {=u]]";
                    skill_add "찌르기";
                    goto go7;
                }else if(@select3==2){
                    mes 3, "신중히 골라주시길 바랍니다.";
                    goto re3;
                }
            }    
            if(@select2==3){
                re6:
                set @select3, menu(1, "뛰어난정식력과 강력한 마법공격력을 지닌 마법사로서 다시 태워 나시겠습니까?", "네, 마법사로 선택했습니다.", "다시 선택하겠습니다.");
                if(@select3==0){goto re6;}
                if(@select3==1){
                    if(@class==3){set_son 1;}else{set_son 0;}
                    set_class 3;
                    legend_add 7, 88, "세오 " + $년도 + "년 " + $계절$ + ", 마법사로 전직하다.";
                    broadcast 3, "{=u[[ {=c" + get_name() +"{=s님이 마법사로 전직하셨습니다. 축하 드립니다 !! {=u]]";
                    spell_add "마레노";
                    goto go7;
                }else if(@select3==2){
                    mes 3, "신중히 골라주시길 바랍니다.";
                    goto re3;
                }
            }
            if(@select2==4){
                re7:
                set @select3, menu(1, "뛰어난신성력과 강력한 회복력을 지닌 성직자로서 다시 태워 나시겠습니까?", "네, 성직자로 선택했습니다.", "다시 선택하겠습니다.");
                if(@select3==0){goto re7;}
                if(@select3==1){
                    if(@class==4){set_son 1;}else{set_son 0;}
                    set_class 4;
                    legend_add 7, 88, "세오 " + $년도 + "년 " + $계절$ + ", 성직자로 전직하다.";
                    broadcast 3, "{=u[[ {=c" + get_name() +"{=s님이 성직자로 전직하셨습니다. 축하 드립니다 !! {=u]]";
                    spell_add "홀리볼트";
                    spell_add "쿠로";
                    goto go7;
                }else if(@select3==2){
                    mes 3, "신중히 골라주시길 바랍니다.";
                    goto re3;
                }
            }
            end;
            go6:
            mes 3, "당신은 충분히 환골탈퇴를할수 있는 체력과 마력을 지니셧군요.";
            re8:
            set @select2, menu(1, "환골탈퇴를 하시겠습니까? 신중히 선택해 주시길 바랍니다.", "환골탈퇴를 한다.", "환골탈퇴를 하지 않는다.");
            if(@select2==0){goto re8;}
            if(@select2==1){
                legend_add 7, 88, "세오 " + $년도 + "년 " + $계절$ + ", 환골탈태.";
                broadcast 3, "{=u[[ {=c" + get_name() +"{=s님이 환골탈태를 하셨습니다.. 축하 드립니다 !! {=u]]";
                goto go7;
            }else if(@select2==2){
                mes 4, "환골탈퇴에 신중을 기울여주세요. 승급만 하지 않는다면 언재든지 환골탈퇴가 가능하답니다.";
                end;
            }
            end;
            go7:
            set_basevita 100;
            set_basemana 100;
            set_level "2";
            set_point "2";
            exp_del "4300000000";
            set_str "3";
            set_int "3";
            set_wis "3";
            set_dex "3";
            set_con "3";
            set #classchange, 1;
            exp_add 1;
            warp "노비스마을", 31,9;
        }
        end;
    }
    if(instr(last_say(@myid), "잡아왔습니다")){
        if(get_mapname(@myid)=="오렌군주의저택" && #EestQuest005==1){
            npc_look @myid, 0, 39;
            mes 3, "오오..다녀왔는가? 그럼 어디 한번 자네의 성과를 보지..";
            if(#ono < 1||#jun < 1||#anton < 1){mes 2, "한놈을 아직 잡지 못했거나..시간이 너무 많이 흘렀군..";}
            mes 3, "오오..정말 대단하군!! 고맙네..이건 내가 주는 선물일세..뭐..해적들 옷이긴 하지만 이쁘지 않나? 하.하.하..";
            if(get_sex()==1){item_add "해적옷1", 1;}
            if(get_sex()==2){item_add "해적옷2", 1;}
            item_add "해적모자", 1;
            legend_add 7, 254, "오렌 해적들을 용감하게 무찌르다.";
            set #EestQuest005, 2;
            broadcast 0,"[" + get_name() + "]님이 오렌마을의 해적을 소탕하셨습니다.";
            mes 2, "정말 수고 많았네..잘가게나..!!!";            
        end;
        }
        if(get_mapname(@myid)=="그린혼학원식당"){
            npc_look @myid, 0, 24;
            if(#Quest001==1){
                set @say$, last_say(@myid);
                if(#Questmonster001 < 10){goto go3;}
                mes 3, "아이고 고마워요~ 그런데 한번 더 도와 줄 수 있어요? 쥐를 잡아줘서 한시름 덜었는데, 거미도 와글와글 하지 않수?\\n 덕분에 지하 창고에 갈 때마다 깜짝 놀란다우.";
                set @select, menu(1, "내가 이리 뚱뚱해 보여도 나름 심약해서 호호호. 다시 한번 내려가서 거미 15마리만 잡아와요.\\n 어때요?", "그러죠, 뭐", "음.. 바빠서 안되겠어요");
                if(@select==1){
                    set #Quest001, 2;
                    mes 4, "아 그럼 한번더 수고해줘요.. 아까처럼  {=c잡아왔습니다{=a라고 말하면된다우.";
                }else if(@select==2){
                    mes 3, "아 그래요? 그럼 어쩔수 없죠. 그래도 도와줬으니 고마워요";
                    mes 3, "음..이건 뭐 얼마 안되지만 용돈이라고 생각하고 받아줘요. 호호호호\\n마을로 나가서 방패랑 무기등을 사는데 조금이라도 도움이 될거예요.";
                    mes 3, "그리고 먹을걸 좀 챙겨줄테니 필요할때 먹어요.음식은 체력을 회복시켜주니 사냥에도 도움이 될거예요\\n호호호호~~~";
                    item_add "치즈", 10;
                    item_add "소고기스테이크", 10;
                    item_add "샌드위치", 10;
                    money_add "1500000";
                    exp_add 200;
                    set #Quest001, 3;
                    mes 4, "아참~~~ 꼭 시험장에 가서 시험을 보시구랴.. 휴식스킬은 꼭 필요하다우";
                }
                end;
            }
            if(#Quest001==2){
                set @say$, last_say(@myid);
                if(#Questmonster002 < 15){goto go3;}
                mes 3, "아 너무 고마워요.. 두 가지 일이나 해주다니! 자 날 도와줬으니 경험치하고 돈.. 그리고 먹을껄 좀 더 챙겨 줄께요..";
                mes 3, "음..이건 뭐 얼마 안되지만 용돈이라고 생각하고 받아줘요. 호호호호\\n마을로 나가서 방패랑 무기등을 사는데 조금이라도 도움이 될거예요.";
                mes 3, "음식은 체력을 회복시켜주니 사냥에도 도움이 될거예요 호호호호~~~";
                mes 3, "흠.. 그리고 남쪽 빨간집에 있는 시약사가 뭔가 시킬 일이 있는 것 같은데, 믿을 만한 사람을\\n찾아달라고 했거든!\\n 내가 말해놓을 테니, 가서 이런 저런 대화를 해봐요.";
                message 3, "경험치 500, 금전 20000을 획득";
                item_add "치즈", 10;
                item_add "소고기스테이크", 10;
                item_add "샌드위치", 10;
                money_add "2000000";
                exp_add 500;
                set #Quest001, 3;
                mes 4, "만약에 시약사에게 안 갈거면 꼭 시험장에 들러서 휴식 스킬을 받도록해요!";
                end;
            }
            go3:
            set @select, menu(1, "어머..생각보다 힘드나 보네요…음..무리할 필요는 없는데.. 그래도 계속 해볼래요?", "물론이지요", "아니요 그만할래요");
            if(@select==1){
                if(#Quest001==1){mes 4, "10마리면 그리 많지 않으니 금방 잡을 수 있을 거라우. 수고해 줘요~ 호호호";}
                if(#Quest001==2){mes 4, "쥐도 10마리잡았으니까.. 거미도 15마리 금방잡을꺼라우~ 수고해 줘요 호호호";}
            }else if(@select==2){
                mes 4, "으음..그래요? 그렇다면 어쩔 수 없죠 뭐..다음에 또 들려요~";
            }
        }
        end;
    }
    if(pet_user(@myid) == 1){
        if(group_count(@myid, 0) >= 4){
            pet_say @myid, "다음에 또 뵙겠습니다";
            sleep 500;
            pet_position @myid, 3;        
            message 3,"그룹 원이 4명이 실 때는 돌돌이를 사용하실 수 없습니다.";
        }else{
            if(get_mapname(@myid)=="[뮤레칸]피에트던전(1)"||get_mapname(@myid)=="[뮤레칸]피에트던전(2)"||get_mapname(@myid)=="[뮤레칸]뤼케시온던전(1)"||get_mapname(@myid)=="[뮤레칸]뤼케시온던전(2)"||get_mapname(@myid)=="[뮤레칸]밀레스던전(1)"||get_mapname(@myid)=="[뮤레칸]밀레스던전(2)"||get_mapname(@myid)=="[뮤레칸]루어스던전(1)"||get_mapname(@myid)=="[뮤레칸]루어스던전(2)"||get_mapname(@myid)=="[뮤레칸]홀리루딘던전(1)"||get_mapname(@myid)=="[뮤레칸]홀리루딘던전(2)"){
                message 3,"이 곳에선 사용이 불가능합니다.";
                pet_say @myid, "다음에 또 뵙겠습니다";
                sleep 500;
                pet_position @myid, 3;
            }
            if(@say$ == "119"){
                if(get_state1(@myid) == 1 && get_coma(@myid) == 1){
                    set_state1 @myid, 0;
                    set_coma @myid, 0;
                    coma_delay @myid, 0;
                    set_vita @myid, 1000;
                    del_coma @myid;
                    effect @myid, 5, 0, 75;
                }
            }
            if(instr(last_say(@myid), "ㅈ")){
                set@x1,get_xs();
                set@y1,get_ys();
                set@side,get_side(@myid);
                if(@side==0){
                    set@mob,get_mobxy(@x1,(@y1)-1);set@type1,istype(@mob);
                    if(@type1==1){
                        if(!magic_exist(1,@mob,1)){
                            magic 1,@mob,"데프레타",120,35,@myid;
                            effect@mob,0,243,100;
                        }
                    }
                }if(@side==1){
                    set@mob1,get_mobxy(@x1+1,(@y1));set@type1,istype(@mob1);
                    if(@type1==1){
                        if(!magic_exist(1,@mob1,1)){
                            magic 1,@mob1,"데프레타",120,35,@myid;
                            effect@mob1,0,243,100;
                        }
                    }
                }if(@side==2){
                    set@mob2,get_mobxy(@x1,(@y1)+1);set@type1,istype(@mob2);
                    if(@type1==1){
                        if(!magic_exist(1,@mob2,1)){
                            magic 1,@mob2,"데프레타",120,35,@myid;
                            effect@mob2,0,243,100;
                        }
                    }
                }if(@side==3){
                    set@mob3,get_mobxy(@x1-1,(@y1));set@type1,istype(@mob3);
                    if(@type1==1){
                        if(!magic_exist(1,@mob3,1)){
                            magic 1,@mob3,"데프레타",120,35,@myid;
                            effect@mob3,0,243,100;
                        }
                    }
                }
                game_sound 8,0;
            }
            if(@say$ == "ㅎ"){
                set@hill,get_basevita(@myid)/100*10;
                effect@target,71,0,75;
                game_sound 38 ,0;
                message 3,"Comtuter님이 홀리쿠라노를 외워주셨습니다.";
                heal@myid,@hill;
            }
            if(@say$ == "ㄷㅅ"){
                message 3,"Comtuter님이 디소루마를 시전해주셨습니다.";
                effect @myid, 282, 0, 100;
                mobsor_end @myid;
                game_sound 8, 0;
            }
            if(@say$ == "ㄷㄴ"){
                message 3,"Comtuter님이 디나르콜리를 시전해주셨습니다.";
                effect @myid, 280, 0, 100;
                mobnar_end @myid;
                game_sound 8, 0;
            }
        }
    }
}