viewing paste Unknown #5992 | C

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188
//===== Hercules Script ======================================= 
//= Buwaya Dungeon
//===== By: ================================================== 
//= Masao
//===== Current Version: ===================================== 
//= 1.0
//===== Compatible With: ===================================== 
//= Hercules
//===== Description: ========================================= 
//= Entrance to the Buwaya Dungeon.
//===== Additional Comments: ================================= 
//= 1.0 First Version.
//============================================================ 
 
ma_fild02,312,317,5 script  Guard#mal   570,{
 
    if (BaseLevel < 130) {
        mes "[Guard]";
        mes "Persons ^ff0000under level 130^000000";
        mes "cannot enter this place.";
        mes "This place is dangerous. Please go back.";
        close;
    }
    set .@ins_party,getcharid(1);
    set .@ins_mas,getpartyleader(.@ins_party,2);
    set .@buwaya_timer,checkquest(4229,PLAYTIME);
    set .@p_name$,getpartyname(.@party_id);
    set .@md_name$, "Buwaya Cave";
    set .@instance, instance_create(.@md_name$, .@ins_party);
    if (.@ins_party > 0) {
        if (.@ins_mas == getcharid(0)) {
            mes "[Guard]";
            mes "This place is dangerous. Please go back.";
            mes "If you dont have any business here, please go back.";
            next;
            switch (select("Why is it so dangerous?:I'm here to hunt down Buwaya:End conversation")) {
            case 1:
                mes "[Guard]";
                mes "Recently, there has been a case";
                mes "where villagers have disappeared.";
                mes "After investigating the tracks, ";
                mes "we found out the giant monster Buwaya";
                mes "was responsible.";
                next;
                mes "[Guard]";
                mes "Soldiers and mercenaries have been dispatched to ";
                mes "hunt down Buwaya, but were never";
                mes "completely successful.";
                next;
                mes "[Guard]";
                mes "Buwaya is still kidnapping";
                mes "the villagers to this day.";
                mes "Please gather some people to get rid of Buwaya.";
                close;
            case 2:
                if (.@buwaya_timer == 0) {
                    if (.@instance == 0) {
                        mes "Guard]";
                        mes "Party name is..." + .@p_name$ + "";
                        mes "Party leader is..." + strcharinfo(0) + "";
                        mes "^0000ff" + .@md_name$ + "^000000 cannot be opened now.";
                        mes "Please try a moment later.";
                        close;
                    }
                    mes "[Guard]";
                    mes "^0000ff" + .@md_name$ + "^000000 I will open up the tunnel for a while.";
                    mes "I wish you good luck.";
                    close;
                } else if (.@buwaya_timer == 1) {
                    mes "[Guard]";
                    mes "Buwaya is still hiding.";
                    mes "Even if you enter now, Buwaya will not come out. ";
                    mes "Please come back later.";
                    close;
                }
                erasequest 4229;
                if (.@instance == 0) {
                    mes "Guard]";
                    mes "Party name is..." + .@p_name$ + "";
                    mes "Party leader is..." + strcharinfo(0) + "";
                    mes "^0000ff" + .@md_name$ + "^000000 can not be opened now.";
                    mes "Please try a moment later.";
                    close;
                }
                mes "[Guard]";
                mes "^0000ff" + .@md_name$ + "^000000 I will open up the tunnel for a while.";
                mes "I wish you good luck.";
                close;
            case 3:
                mes "[Guard]";
                mes "This place is dangerous, you cannot enter.";
                close;
            }
        }
        mes "[Guard]";
        mes "Let me talk with the party leader.";
        mes "Please call forth the leader.";
        close;
    }
    mes "[Guard]";
    mes "Buwaya is dangerous,";
    mes "please come back after you form a";
    mes "team with other people.";
    close;
}
 
ma_fild02,315,323,0 script  Cave Entrance   45,2,2,{
    end;
 
OnTouch:
    if (BaseLevel < 130) {
        mes "[Guard]";
        mes "Person ^underff0000130level^000000";
        mes "cannot enter this place.";
        mes "This place is dangerous. Please go back.";
        close;
    }
    set .@ins_party,getcharid(1);
    set .@p_name$,getpartyname(.@party_id);
    set .@md_name$, "Buwaya Cave";
    set .@instance, instance_create(.@md_name$, .@ins_party);
    set .@buwaya_timer,checkquest(4229,PLAYTIME);
    if (.@buwaya_timer == 0) {
        switch (select("Enter.:Turn back.")) {
        case 1:
            if (.@instance == 3) {
                mes "[Guard]";
                mes "Oh, now is not a good time.";
                mes "Please try again a moment later.";
                close;
            } else if (.@instance == 2) {
                mes "[Guard]";
                mes "This place is dangerous. Please do not enter.";
                close;
            } else if (.@instance == 1) {
                mes "[Guard]";
                mes "This place is dangerous. Please do not enter.";
                close;
            } else if (.@instance == 0) {
                mapannounce "ma_fild02","" + .@p_name$ + "of party" + strcharinfo(0) + "party member" + .@md_name$ + "Begin hunting Buwaya at",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
                setquest 4229;
                close;
            }
            mes "- Could not enter due to an unidentified force. -";
            close;
        case 2:
            mes "[Guard]";
            mes "You must value your life,";
            mes "it is better to think carefully before you act.";
            close;
        }
    }else if (.@buwaya_timer == 1) {
        mes "[Guard]";
        mes "Buwaya is still hiding.";
        mes "Even if you enter now, Buwaya will not come out. ";
        mes "Please come back later.";
        close;
    }
    erasequest 4229;
    switch (select("Enter.:Turn back.")) {
    case 1:
        if (.@instance == 3) {
            mes "[Guard]";
            mes "Oh, now is not a good time.";
            mes "Please try again a moment later.";
            close;
        } else if (.@instance == 2) {
            mes "[Guard]";
            mes "This place is dangerous. Please do not enter.";
            close;
        } else if (.@instance == 1) {
            mes "[Guard]";
            mes "This place is dangerous. Please do not enter.";
            close;
        } else if (.@instance == 0) {
            mapannounce "ma_fild02","" + .@p_name$ + "of party" + strcharinfo(0) + "party member" + .@md_name$ + "Begin hunting Buwaya at",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
            setquest 4229;
            close;
        }
        mes "- Could not enter due to an unidentified force. -";
        close;
    case 2:
        mes "[Guard]";
        mes "You must value your life,";
        mes "it is better to think carefully before you act.";
        close;
    }
}
Viewed 814 times, submitted by Guest.