viewing paste Unknown #10579 | Plain text

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
 
// NPC Name must have a Number behind it.  ex Name#1 , Name#2,...
 
prontera,142,171,5      script  Quest Event Ryu#1       412,{
function        ChainedQuest;
mes "I am Ryu, the Chained Quest Npc";
mes "-You can redo the previous quest if you finish all of the quest";
mes "-Be carefull if you lose 1 prize part of the quest you cannot continue anymore";
mes "-GM team will never replace your lost item";
mes "-Thankyou and enjoy the quest!";
next;
 
// Quest Setup :
// ChainedQuest( Reward,Amount , Required Zeny, {Item1,Amount1,Item2,Amount2,...} );
switch( getd( "Quest"+strnpcinfo(2) ) ){
        case 0: ChainedQuest( 6012,1, 1000000, 1001,50, 731,20, 957,30 );
        case 1: ChainedQuest( 7464,1, 0, 7218,100, 607,200 );
        case 2: ChainedQuest( 7461,1, 0, 7069,150, 923,50 );
        case 3: ChainedQuest( 7598,1, 500000, 607,200, 7345,50, 7163,100 );
        case 4: ChainedQuest( 7466,1, 0, 7115,200, 7116,100 );
        case 5: ChainedQuest( 6016,1, 150000, 947,100, 1048,100, 958,100 );
        case 6: ChainedQuest( 7469,1, 500000, 944,200 );
        case 7: ChainedQuest( 7462,1, 0, 7124,50, 725,50, 707,10, 7219,100 );
        case 8: ChainedQuest( 7601,1, 1000000, 6041,50, 7100,50, 963,100 );
        case 9: ChainedQuest( 6017,1, 0, 935,150, 718,150, 7035,1, 7291,1 );
        case 10: ChainedQuest( 19538,1, 300000, 6012,1, 7464,1, 7461,1, 7598,1, 7466,1, 6016,1, 7469,1, 7462,1, 7601,1, 6017,1 );
default:
        mes "Greetings from ChrysalisRO team";
        mes "We wanna congratulate you for finishing the Quest!";
        next;
        mes "Hope you do the next Chain quest event :)";
        set getd( "Quest"+strnpcinfo(2) ),0;
        close;
}
 
OnPCLoadMapEvent:
        showevent 1,0;
        end;
 
function        ChainedQuest    {
        for( set .@i,3; getarg( .@i,0 ) != 0 ; set .@i,.@i + 2 ){
                if( countitem( getarg( .@i ) ) < ( getarg( .@i + 1 )) ){
                        mes "COMPLETE THE 11 PART QUEST TO OBTAIN ^FF0000COSTUME FULL MOON^000000";
                        mes "[ ^FF0000Part "+( getd( "Quest"+strnpcinfo(2) ) + 1 )+"^000000 ]";
                        mes "^00FF00_______________________________^000000";
                        mes "^FF0000Reward^000000 : "+getarg(1)+" x ^0000FF"+getitemname( getarg(0) )+"^000000";
                        mes "^00FF00_______________________________^000000";
                        mes "then bring me those items :";
                        mes "^00FF00_______________________________^000000";
                        mes ( Zeny < getarg(2) ? "^FF0000":"^0000FF" )+getarg(2)+" Zeny^000000";
                        for( set .@a,3; getarg( .@a,0 ) != 0 ; set .@a,.@a + 2 ){
                                mes (( countitem(getarg( .@a )) < ( getarg(.@a + 1 )) )? "^FF0000[ "+countitem(getarg(.@a))+" / "+(getarg(.@a+1)):"^0000FF[ "+getd( "Quest"+strnpcinfo(2) ) )+" ] "+getitemname(getarg(.@a))+"^000000 ";
                                }
                        close;
                        }
                }
        if( Zeny < getarg( 2 ) ){
                mes "You required "+getarg( 2 )+" Zeny.";
                close;
                }
        mes "[ ^FF0000Part "+( getd( "Quest"+strnpcinfo(2) ) + 1 )+"^000000 ]";
        mes "Look's like you have collected all";
        mes "^FF0000_______________________________^000000";
        mes ( Zeny < getarg(2) ? "^FF0000":"^0000FF" )+getarg(2)+" Zeny^000000";
        for( set .@i,3; getarg( .@i,0 ) != 0 ; set .@i,.@i + 2 ){
                mes "^FF0000"+getarg( .@i+1 )+" x ^0000FF "+getitemname( getarg( .@i ) )+"^000000";
                }
        next;
        if( select("^0000FFContinue^000000:Cancel") == 2 ){
                mes "Okay..as you wish ~ come back again when you do continue it.";
                close;
                }
        for( set .@i,3; getarg( .@i,0 ) != 0 ; set .@i,.@i + 2 ){
                delitem getarg( .@i ),getarg( .@i + 1 );
                }
        set Zeny,Zeny - getarg( 2 );
        set getd( "Quest"+strnpcinfo(2) ),getd( "Quest"+strnpcinfo(2) ) + 1;
        mes "You will be rewarded with ";
        mes "^0000FF_______________________________^000000";
        mes "^FF0000"+getarg(1)+"^000000 x ^0000FF"+getitemname( getarg(0) )+"^000000";
        mes "^0000FF_______________________________^000000";
        getitem getarg(0),getarg(1);
        close;
 
OnInit:
waitingroom "EVENT: CHAIN QUEST",0;
 
        }
}
 
prontera        mapflag loadevent
Viewed 504 times, submitted by unknown.