Quest NPC

[Lanz]

Can I request a quest npc that randomly choose items on item db every 2hours..

Prize would be tcg..

For Example:

jellopy x 1 after 2hours it will randomly choose new item quest to the item db and replace the old quest it will announce the new quest item, so that player is aware..

Thanks in advance..

[Euphy]

You'd have to specify a valid range of IDs... but interesting request, I'll see if I have time to write this soon~

Edit: Never mind, I got distracted and wrote a random monster-hunting quest instead. :<

[Lanz]

hmmn..Card id(4001 to 4453) would be the sample item..

[Magnetix]

Why don't you use arrays? Arrays let you specify the items you want to be randomly selected.

Edited September 12, 2012 by Magnetix

[Emistry]

maybe something like this ?

prontera,155,181,5 script Sample 757,{
for( set .@i,0; .@i < getarraysize( .Item ); set .@i,.@i + 1 )
mes "Item "+( .@i + 1 )+" : "+getitemname( .Item[.@i] );
close;

OnInit:
OnClock0001:
set .ItemCount,rand(10);
deletearray .Item[0],getarraysize( .Item );
for( set .@i,0; .@i < .ItemCount; set .@i,.@i + 1 )
do{
 set .Item[.@i],rand(512,20000);
}while( getitemname(.Item[.@i]) != "null" );
end;
}

[Lanz]

Thanks sir for the reply

I tried to modified the script of daily quest by katazui and i get this error..

Buildin_countitem: Invalid item '2'

Here is the code:

//Made by: Katazui
//5/21/2011
//Version 2.50
prontera,136,171,4 script Tristan 102,{
if (getgmlevel() >= 80) goto GM_Menu;
L_START:
if (getgmlevel() >= 80) next;
mes "[Daily  Quest]";
mes "Hello "+strcharinfo(0)+"!";
mes "Do you want to start today's Quest?";
mes " ";
mes "Total Daily Quests Finished: ^008800"+$DailyQuestTotal+"^000000.";
mes "Today Daily Quests Finished: ^0000FF"+$DailyQuestToday+"^000000.";
menu "Yes!",-,"Nahh",L_Close;
next;
mes "[Daily Quest]";
mes "You'll need these item for Today's Quest:";
mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"";
mes "In exchange you will get ^0000FFPoints^000000 x "+$DailyQuestPrizeHM+"";
next;
mes "[Daily Quest]";
mes "Do you have the items?";
menu "Yes! I do.",-,"Gimme some time.",L_Close;
if(countitem($QuestItem1) >= $QuestItem1HM) goto FinishQuest;
next;
mes "[Daily Quest]";
mes "You only have "+countitem($QuestItem1HM)+" of ^FF0000"+getitemname($QuestItem1)+"^000000.";
mes "Come back when you have it! Better get the items quickly. It's gonna change in a Day!";
close;
end;
L_Close:
next;
mes "[Daily Quest]";
mes "Come back again! Get the Items!";
mes "Goodbye!";
close;
end;
GM_Menu:
mes "[Daily Quest]";
mes "Hello GM "+strcharinfo(0)+"!";
mes "What can I do for you today?";
menu "Player Menu",L_START,"Change Today's Quest/Prize",L_ChangeQuest,"Close",L_Close;
end;
L_ChangeQuest:
next;
mes "[Daily Quest]";
mes "What will you like to change?";
next;
menu "Go back.",GM_Menu,"Prize [^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"]",L_ChangePrize,"Change Quest Randomly",L_ChangeQuestRandom,"Change Quest by Myself",L_ChangeQuestMyself;
end;
L_ChangeQuestMyself:
next;
mes "[Daily Quest]";
mes "Which item would you like to change first?";
menu "Go Back.",L_ChangeQuest,"Item 1 [^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"]",L_ChangeItem1;
//
L_ChangeItem1:
next;
mes "[Daily Quest]";
mes "Alright. What will be the item?";
next;
input $QuestItem1;
next;
L_ChangeItem12:
mes "[Daily Quest]";
mes "How much of ^ff0000"+getitemname($QuestItem1)+"^000000 do you want?";
mes "It must be in the range of ^0088001 ~ 200^000000.";
next;
input $QuestItem1HM;
next;
if ($QuestItem1HM > 200) goto L_HMItem1Denied;
mes "[Daily Quest]";
mes "Item 1 Set.";
set $DailyQuestToday,0;
mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+".";
next;
goto L_ChangeQuest;
end;
L_HMItem1Denied:
mes "[Daily Quest]";
mes "This item (^ff0000"+getitemname($QuestItem1)+"^000000) must be in a range of ^0088001 ~ 200^000000.";
next;
goto L_ChangeItem12;
end;
//
L_ChangeQuestRandom:
set $QuestItem1, rand(4001,4453);
set $QuestItem1HM, rand(1,3);
set $DailyQuestPrizeHM, rand(1,50);
set $DailyQuestToday,0;
mes "[Daily Quest]";
mes "This is the Daily Quest:";
mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"";
next;
goto GM_Menu;
end;
L_ChangePrize:
next;
mes "[Daily Quest]";
mes "Input the Prize";
next;
input $DailyQuestPrize;
next;
mes "[Daily Quest]";
mes "The Prize: "+getitemname($DailyQuestPrize)+" x How many?";
next;
input $DailyQuestPrizeHM;
next;
mes "[Daily Quest]";
mes "This is what you like?";
mes "^0000ffPoints^000000 x "+$DailyQuestPrizeHM+".";
menu "Yup, Thanks.",GM_Menu,"Noo! I made a mistake!",L_ChangePrize;
end;
FinishQuest:
next;
mes "[Daily Quest]";
mes "You got ^0000FFCedi Points^000000 x "+$DailyQuestPrizeHM+".";
delitem $QuestItem1,$QuestItem1HM;
set #POINTS, #POINTS + $DailyQuestPrizeHM;
set $DailyQuestTotal,$DailyQuestTotal +1;
set $DailyQuestToday,$DailyQuestToday +1;
close;
end;

}
- script DailyQuestItemChanger -1,{
OnInit:
Start:
set $QuestItem1, rand(4001,4453);
set $QuestItem1HM, rand(1,3);
set $DailyQuestPrizeHM, rand(1,50);
set $DailyQuestToday,0;
OnHour24:
set $QuestItem1, rand(4001,4453);
set $QuestItem1HM, rand(1,3);
set $DailyQuestPrizeHM, rand(1,50);
set $DailyQuestToday,0;
//goto Start;
end;
}

Hope you can help me sir to simplify this script and make it 100% working..

Thanks in advance

Anyone can help me fix and simplify the script above?

[adrian]

how about the script make quest for random mob and the prize is getting experience.. someone know how the script is?

[Euphy]

how about the script make quest for random mob and the prize is getting experience.. someone know how the script is?

Just wrote one! It's the "Hunting Missions" script: http://rathena.org/board/topic/64394-%E2%9C%B0-euphys-scripts-%E2%9C%B0/

[adrian]

how about the script make quest for random mob and the prize is getting experience.. someone know how the script is?

Just wrote one! It's the "Hunting Missions" script: http://rathena.org/b...phys-scripts-✰/

im just gonna try this now!1

awesome!

btw, Euphy, did you know how i put dialogue on my NPC.? just a sign on my NPC says " CLICK HERE "

i can;t click on the script.. nthing happen