prontera,145,173,4 script Wise Ninja 637,{
if( !application ) {
goto Intro;
}
if( application == 1 ) {
goto Challenge;
}
if ( application && explanation == 1) {
goto Challenge2;
}
if ( application && explanation && challenge == 1){
goto Quiz;
}
if ( application && explanation && challenge && passed == 1){
goto Reward;
}
if ( application && explanation && challenge && passed && reward == 1){
goto Finish;
}
Intro:
mes .npc$;
mes "Hello, I am travelling shinobi. I am looking for a wise people";
mes "who can answer all my questions";
next;
mes .npc$;
mes "If you can finish my challenges and answer all my questions";
mes "I will make you a genin and reward you with a special item";
next;
mes .npc$;
mes "But of course its not for free";
mes "The application fee for one try is ^FF0000" + .zeny + " z^000000.";
next;
mes .npc$;
mes "Do you want to try answering my questions?";
next;
switch(select("Yes I Do!:No Thanks:Ignore Him")) {
case 1:
mes .npc$;
mes "The Application Fee is ^FF0000" + .amount[0] + " z^000000";
next;
switch(select("Pay!:I will get the money first")) {
case 1:
if(Zeny < .zeny){
mes .npc$;
mes "Kid this is not enough!";
mes "You need^FF0000 " + .zeny$ + " for the application fee^000000";
close;
} else {
mes .npc$;
set Zeny, Zeny - .zeny[0];
mes "Okay, This is enough";
set application,1;
next;
mes .npc$;
mes "I will think about your challenge";
mes "come talk to me again in a bit";
end;
}
case 2:
mes .npc$;
mes "Okay, come back to me anytime";
close;
}
case 2:
mes .npc$;
mes "Are you sure kid?";
mes "It's once in a lifetime offer";
close;
case 3:
mes .npc$;
mes "......";
close;
}
Challenge:
set explanation,1;
mes .npc$;
mes "So for your challenge, I want you to get me a";
mes "^00FF005"+ getitemname(.item[0]) +" "+.item_amount[0]+"^000000 ";
close;
Challenge2:
if(countitem(.item[0]) == .item_amount){
mes .npc$;
delitem .item[0],.item_amount[0];
mes "Oh, I see you have collected all the items for the challenge";
next;
mes .npc$;
mes "Give them to me";
next;
mes .npc$;
mes "You may now take the quiz";
mes "Talk to me anytime you're ready";
set challenge,1;
close;
} else {
mes .npc$;
mes "So for your challenge, I want you to get me a";
mes "^00FF005"+ getitemname(.item[0]) +" "+.item_amount[0]+"^000000 ";
close;
}
Quiz:
mes .npc$;
mes "Are you ready?";
next;
switch(select("Yes!:No")) {
case 1:
mes .npc$;
mes "Okay, let's start";
goto Quiz02;
case 2:
mes .npc$;
mes "Okay, whenever youre ready";
close;
}
Quiz02:
set .@correct$, .answers[.@i];
mes .npc$;
mes "1st Question";
mes ".questions[0]";
input .@a1$;
if (.@correct$ == .@a1$) {
set score, +1; }
end;
next;
mes .npc$;
mes "2nd Question";
mes ".questions[1]";
input .@a2$;
if (.@correct$ == .@a2$) {
set score, +1; }
next;
mes .npc$;
mes "3rd Question";
mes ".questions[2]";
input .@a3$;
if (.@correct$ == .@a3$) {
set score, +1; }
next;
mes .npc$;
mes "4th Question";
mes ".questions[3]";
input .@a4$;
if (.@correct$ == .@a4$) {
set score, +1; }
next;
mes .npc$;
mes "5th Question";
mes ".questions[4]";
input .@a5$;
if (.@correct$ == .@a5$) {
set score, +1; }
next;
mes .npc$;
mes "6th Question";
mes ".questions[5]";
input .@a6$;
if (.@correct$ == .@a6$) {
set score, +1; }
next;
mes .npc$;
mes "7th Question";
mes ".questions[6]";
input .@a7$;
if (.@correct$ == .@a7$) {
set score, +1; }
next;
mes .npc$;
mes "8th Question";
mes ".questions[7]";
input .@a8$;
if (.@correct$ == .@a8$) {
set score, +1; }
next;
mes .npc$;
mes "9th Question";
mes ".questions[8]";
input .@a9$;
if (.@correct$ == .@a9$) {
set score, +1; }
next;
mes .npc$;
mes "10th Question";
mes ".questions[9]";
input .@a10$;
if (.@correct$ == .@a10$) {
set score, +1; }
next;
mes .npc$;
mes "The Quiz is done";
mes "Let me check your answers";
goto Checking;
next;
Checking:
if( score > 7 ){
mes .npc$;
mes "Congratulations you passed the quiz";
set passed, 1;
close;
} else {
mes .npc$;
set score, 0;
mes "You Failed the quiz";
mes "Feel free to try again";
close;
}
Reward:
mes .npc$;
mes "Congratulations for passing my challenge";
mes "As a promise here is your reward";
mes "Select Carefully for your reward";
next;
.@menu_item_size = getarraysize(.@rewardname$);
for (.@i = 0; .@i < .@menu_item_size; .@i++) {
.@menu$ = .@menu$ + (.@i > 0 ? ":" : "") + .@rewardname$[.@i];
}
.@i = select( .@menu$ ) - 1;
mes "You selected : "+ .@menu_item$[.@i];
getitem .rewardid$[.@i],1;
set reward,1;
end;
Finish:
mes .npc$;
mes "Congratulations on finishing my challenge";
mes "I hope you have a nice day";
close;
OnInit:
set .npc$ = "[ ^0000FFWise Ninja^000000 ]"
setarray .zeny, 5000000 //zeny
setarray .item, 5160; // challenge item id
setarray .item_amount, 5; //challenge item amount
setarray .questions, What is the special source of energy used by ninjas ?, What is the name of the special eye of the Uchiha clan ? , What is the name of the secret village of the country of Fire ? , What is the prefered jutsu of Naruto ?, How many villages are there in total ?, What is the name of the 'star looking' weapon of the ninjas ?, What is the name of the ultimate warrior/ninja in a particular village ?, What is the name of Kiba's dog ?, Who is the master of Naruto, Sasuke and Sakura ?, What is the name of the nine-tailed demon fox ?;
setarray .answers, Chakra, Sharingan, Konoha, Kage bunshin no jutsu, 10, Shuriken, Kage, Akamaru, Kakashi, Kurama;
setarray .@rewardname$, "Country of Fire", "Country of Wind", "Country of Water", "Country of Lightning", "Country of Earth", "Country of Sound";
setarray .rewardid$, 33001, 33002, 33003, 33004, 33005, 33006;
setarray .effect$, "+10 STR HP", "+10 AGI HP", "+10 INT HP", "+10 LUK HP", "+10 VIT HP", "+10 DEX HP";
.totalreward = 6;
end;
}
I check all Quiz2 and change them all to Quiz02
and here's the new error sir
