viewing paste Unknown #10579 | 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 1227 times, submitted by Guest.