게임존 - 게임정보 커뮤니티 - 라그나로크 파티퀘스트 스크립트

기타게임 소스자료실 기타 ()

라그나로크 파티퀘스트 스크립트

- 로이로이1
- 2016.04.26 - 08:15 43

//
prontera.gat,159,227,6 script 파티 퀘스트 79,{ //
        mes "[라이티]";
        mes "저는 파티 퀘스트를 당담하고 있습니다.";
        mes "파티 퀘스트에 도전해보세요.";
        mes "푸짐한 보상을 드립니다.";
        menu "도전",mob,"취소",c;

mob:
getpartymember(getcharid(1));
set @partymembercount,$@partymembercount;
copyarray @partymembername$[0],$@partymembername$[0],@partymembercount;

if ($@PartStart == 1) goto go;
if (@partymembercount <= 1) goto nopart;
if (@partymembercount > 6) goto partover;
if (@partymembername$[0] == strcharinfo(0)) goto part;
goto nopart;

part:
        mes "[라이티]";
        mes "파티의 리더시군요.";
        mes "도전 20층에 도전하시겠습니까?";
        mes "먼저 파티원 모두가 15x15범위에 모여야합니다.";
        menu "도전",mobS,"취소",c;
mobS:
goto go1;

end;

go1:
        disablenpc "보상";
        set $@DeonJeon,20;
        set $@summon,0;
        set $@PartStart,1;
        killmonsterall "pvp_n_2-5.gat";
warpparty "pvp_n_2-5.gat",98,101,getcharid(1);
end;

nopart:
        mes "[라이티]";
        mes "파티가 아니거나 파티장이 아닌거 같군요.";
        mes "혹은 파티원이 혼자인거 같습니다.";
close;

go:
mes "[라이티]";
mes "이미 누군가가 이용하고 있군.";
mes "만약 사람이 없다면 초기화시키고";
mes "다시할수 있다네..";
mes "초기화 하겠는가?";
menu "초기화를 시도한다",reset,"아니오",c;
close;

c:
mes "[라이티]";
mes "안녕히 가십시오.";
close;

partover:
mes "[라이티]";
mes "파티원은 6명까지가능합니다.";
mes "너무많으시군요";
close;
reset:
// set $P_Q_user,getmapusers("pvp_n_2-5.gat");
if(getmapusers("pvp_n_2-5.gat") == 0) goto go1;

mes "내부에"+getmapusers("pvp_n_2-5.gat")+"명이 있습니다.";
next;
goto c;
close;
OnInit:
waitingroom "파티퀘스트",0;
end;
}

pvp_n_2-5.gat,98,101,6 script 파티 퀘스트(워프) 723,{

getpartymember(getcharid(1));
set @partymembercount,$@partymembercount;
        if (@partymembercount >= 1) goto part;
        if (@partymembercount < 1) goto nopart;
part:
        if ($@summon == 1) goto no233;
        if ($@DeonJeon == 20) goto M20;
        if ($@DeonJeon == 19) goto M19;
        if ($@DeonJeon == 18) goto M18;
        if ($@DeonJeon == 17) goto M17;
        if ($@DeonJeon == 16) goto M16;
        if ($@DeonJeon == 15) goto M15;
        if ($@DeonJeon == 14) goto M14;
        if ($@DeonJeon == 13) goto M13;
        if ($@DeonJeon == 12) goto M12;
        if ($@DeonJeon == 11) goto M11;
        if ($@DeonJeon == 10) goto M10;
        if ($@DeonJeon == 9) goto M9;
        if ($@DeonJeon == 8) goto M8;
        if ($@DeonJeon == 7) goto M7;
        if ($@DeonJeon == 6) goto M6;
        if ($@DeonJeon == 5) goto M5;
        if ($@DeonJeon == 4) goto M4;
        if ($@DeonJeon == 3) goto M3;
        if ($@DeonJeon == 2) goto M2;
        if ($@DeonJeon == 1) goto M1;
        if ($@DeonJeon == 0) goto M0;

M20:
        MapAnnounce "pvp_n_2-5.gat","20층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1002,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1007,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1011,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1019,1,"MOB::OnDeath";
        set $@summon,1;
goto go3;
end;

M19:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","19층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1009,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1012,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1014,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1016,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M18:
if (getmapusers("pvp_n_2-5.gat") < 5){
MapAnnounce "pvp_n_2-5.gat","겨우 그인원으로 도전하겠다는건가?? 어디...",26;

        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1736,10;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1046,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;
}
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","18층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1024,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1055,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1074,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1096,1,"MOB::OnDeath";
        set $@summon,1;
         goto go3;
end;

M17:
if (getmapusers("pvp_n_2-5.gat") < 5){
MapAnnounce "pvp_n_2-5.gat","아직도 정신 못차리는군.",26;

        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1736,10;
monster "pvp_n_2-5.gat",100,100,"몬스터",1147,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1147,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;
}
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","17층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1141,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1686,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1034,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1096,1,"MOB::OnDeath";
        set $@summon,1;
         goto go3;
end;

M16:
if (getmapusers("pvp_n_2-5.gat") < 3){
MapAnnounce "pvp_n_2-5.gat","진정한 용사란말인가..",26;

        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1736,10;
monster "pvp_n_2-5.gat",100,100,"몬스터",1147,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1785,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;
}
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","16층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1400,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1069,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1028,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1582,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M15:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","15층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1144,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1177,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1248,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1120,1,"MOB::OnDeath";
        set $@summon,1;
         goto go3;
end;

M14:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","14층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1099,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1367,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1037,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1120,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M13:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","13층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1180,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1497,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1584,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1120,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M12:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","12층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1301,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1313,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1270,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1115,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M11:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","11층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1301,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1313,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1270,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1150,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M10:
MapAnnounce "pvp_n_2-5.gat","10층으로 워프합니다.",16;
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1301,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1313,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1270,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1159,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M9:
MapAnnounce "pvp_n_2-5.gat","9층으로 워프합니다.",16;
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1301,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1313,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1270,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1112,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M8:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","8층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1301,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1313,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1270,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1583,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M7:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","7층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1301,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1313,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1270,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1086,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M6:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","6층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1505,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1204,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1251,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1649,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M5:
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);
        MapAnnounce "pvp_n_2-5.gat","5층으로 워프합니다.",16;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1251,10;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1640,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1641,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1642,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1644,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1645,1;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1650,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M4:
MapAnnounce "pvp_n_2-5.gat","4층으로 워프합니다.",16;
warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1734,10;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1640,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1641,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1642,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1644,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1645,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1648,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M3:
MapAnnounce "pvp_n_2-5.gat","3층으로 워프합니다.",16;
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1511,10;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1640,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1641,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1642,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1644,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1645,2;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1647,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M2:
MapAnnounce "pvp_n_2-5.gat","2층으로 워프합니다.",16;
warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1765,10;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1640,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1641,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1642,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1644,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1645,3;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1646,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

M1:
MapAnnounce "pvp_n_2-5.gat","1층으로 워프합니다.",16;
        warpparty "pvp_n_2-5.gat",100,134,getcharid(1);

        monster "pvp_n_2-5.gat",100,100,"몬스터",1658,10;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1640,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1641,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1642,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1644,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1645,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1755,5;
        monster "pvp_n_2-5.gat",100,100,"몬스터",1708,1,"MOB::OnDeath";
        set $@summon,1;
        goto go3;
end;

no233:
        MapAnnounce "pvp_n_2-5.gat","아직 보스 몬스터가 죽지 않았습니다.",16;
mes "만약 몹을다잡았는데도 이메세지가나오면";
mes "타이머를 재시동하세요.";
mes "단. 재시동한 케릭은 30초간 움직일수 없으니";
mes "신중하게 생각하시고 재시동하시기바랍니다.";
menu "취소",P_Q_end,"타이머 재시동",addT;
end;
P_Q_end :
end;
addT:
addtimer 20000,"check::OnStart";
end;
nopart:
        mes "[파티퀘스트]";
        mes "파티를 제대로 결성한 후, 파티의 리더가 저에게 신청해주셔야만 됩니다.";
close;

err2:
        mes "[파티퀘스트]";
        if(@ret == -2) mes "소스 내부에서 사용하는 sd 또는 p 변수에 NULL 값이 들어갔습니다.";
        if(@ret == -1) mes "스크립트 사용자가 파티에 소속되지 않았습니다.";
        if(@ret == 0) mes "해당 파티원이 다른 맵에 있거나 15셀 밖에 있었습니다.";
close;

go3:
addtimer 20000,"check::OnStart";
warpparty "pvp_n_2-5.gat",98,134,getcharid(1);
end;

M0:
announce " *** 파티 퀘스트를 완료하였습니다. *** ",0;
        set $@PartStart,0;
        enablenpc "보상";
        end;
}

pvp_n_2-5.gat,0,0,3 script check -1,{
OnStart:
        MapAnnounce "pvp_n_2-5.gat","현재 생존자 : " + getusers(0) + "",16;
        if ($@monster == 1) goto q;
        if (getusers(0) == 0) goto e;
        if ($@DeonJeon == 0) goto c;
        addtimer 20000,"check2::OnStart";
        end;
e:
        announce " *** 파티가 전멸당했습니다. *** ",0;
        set $@PartStart,0;
        end;
q:
        killmonsterall "pvp_n_2-5.gat";
        announce " *** 보스 몬스터가 쓰러졌습니다. *** ",0;
        set $@summon,0;
        set $@monster,0;
        set $@DeonJeon,$@DeonJeon-1;
        end;
c:
        announce " *** 파티 퀘스트를 완료하였습니다. *** ",0;
        set $@PartStart,0;
        enablenpc "보상";
        end;
}

pvp_n_2-5.gat,0,0,3 script check2 -1,{
OnStart:
        MapAnnounce "pvp_n_2-5.gat","현재 생존자 : " + getusers(0) + "",16;
        if ($@monster == 1) goto q2;
        if (getusers(0) == 0) goto e2;
        if ($@DeonJeon == 0) goto c2;
        addtimer 20000,"check::OnStart";
        close;
e2:
        announce " *** 파티가 전멸당했습니다. *** ",0;
        set $@PartStart,0;
        close;
q2:
        killmonsterall "pvp_n_2-5.gat";
        announce " *** 보스 몬스터가 쓰러졌습니다. *** ",0;
        set $@summon,0;
        set $@monster,0;
        set $@DeonJeon,$@DeonJeon-1;
        close;
c2:
        announce " *** 파티 퀘스트를 완료하였습니다. *** ",0;
        set $@PartStart,0;
        enablenpc "보상";
        close;
}
pvp_n_2-5.gat,0,0,3 script MOB -1,{
OnDeath:
        set $@monster,1;
        close;
}

pvp_n_2-5.gat,99,96,3 script 보상 55,{
        set BaseExp,BaseExp+1000000000;
        set Zeny,zeny+1000000;
        getitem 7169,10;
getitem 969,20;
        mes "[라이티]";
        mes "승리를 축하드립니다!";
        next;
        areawarp "pvp_n_2-5.gat",1,1,255,255,"rachel.gat",114,132;
        close;
}

pvp_n_2-5.gat mapflag nosave SavePoint

Attached file

이 게시물을..

소울워커(SoulWorker) 스팀 asm 스크립트잼과베이컨

0

로이로이1

글쓴이의 서명작성글 감추기

댓글 쓰기 에디터 사용하기 닫기

view_headline 목록

SEARCH

라그나로크 파티퀘스트 스크립트

로이로이1 님의 최근 글

로이로이1 님의 최근 댓글