Yugosh

#Mission_Points
search for it and delete every single line
and also remove the npc shop below

tr0n's Questboard
With this questboard you can easily add new quests! 2 categories are available (collection quests and hunting quests)
Thanks to Michy, Jaypee and everyone else who helped me A LOT with this <3 (sry if I didn't mentioned someone..)
original topic: http://rathena.org/board/topic/60376-tr0ns-questboard-154/

Files
[*] previous downloads available in original topic! [*]tr0ns_questboard_1.5.4.txt

Changelogs
[*]1.0.0 Release [*]1.1.0 Added zeny reward [*]1.1.0 Minor text fixes [*]1.2.0 Rewrote checkmob and killcounter [*]1.2.1 Fixed "currentquest$" (was set to 0 after finished quest) [*]1.3.1 Added level restriction [*]1.3.2 Fixed a bug in AddCollection function [*]1.3.3 Fixed a bug in AddHunting function [*]1.3.4 Added Reward Item Amount [*]1.4.4 Added Quest delay [*]1.5.4 Added repeatable Quests

How to add new Quests
There're two types of quests you can add, collection and hunting quests.

Collection Quests:
AddCollection("<Quest Name>",<Min Lvl>,<Max Lvl>,<Reward|Item ID>,<Reward|Item Amount>,<Zeny Reward>,<Base EXP>,<Job EXP>,<Item ID>,<Item Amount>,...);  
Hunting Quests:
AddHunting("<Quest Name>",<Min Lvl>,<Max Lvl>,<Reward|Item ID>,<Reward|Item Amount>,<Zeny Reward>,<Base EXP>,<Job EXP>,<Monster ID>,<Monster Amount>,...); Features
[*]You can activate|deactivate categories (they're predefined) [*]Add easily new quests [*]shows dispbottom of each killed monster [*]you can add as many items or mobs you want

Terms of Use
[*]You are not allowed to reproduce or make any profit of this script! [*]You are not allowed to take credits for this script! [*]You are allowed to modify this script for your needs but not to repost it anywhere as your own work! [*]I am not responsible of any damage on your server! [*]Use at your own risk!

How can you help me ?
[*]Give me feedback [*]Report bugs [*]Tell me if you like it

 
If you like my script please support me. Thanks!

Here's a version that pulls a "rare" item from the array .rare_id and determines whether or not you have received it, defined by the chance allocated after it (format: <item constant/ID>, <chance>):
 
prontera,147,174,5 script Odd Fellow::randomstuff 1_M_WIZARD,{ /*----------------------------------------------------- Script -----------------------------------------------------*/ mes .npc_name$; mes "Hello there! For "+ .coin_amount +" "+ getitemname(.coin_id) +", I'll give you a random item!"; next; mes .npc_name$; if (countitem(.coin_id) < .coin_amount) { mes "Come back when you have "+ .coin_amount +" "+ getitemname(.coin_id) +"!"; close; } mes "Would you like to give it a try?"; next; if (select("Sure, why not!:No, thanks") == 2) { mes .npc_name$; mes "Okay, come back if you change your mind!"; close; } // Generate random prize ID do { .@prize_id = rand(.prize_min_id, .prize_max_id); } while (getitemname(.@prize_id) == "null"); // Determine index location of rare item to randomly pick from do { .@rare_index = rand(getarraysize(.rare_id)); } while (.@rare_id % 2); // Determine whether or not to change prize to rare item if (!rand(.rare_id[.@rare_index + 1])) { .@prize_id = .@rare_id; } mes .npc_name$; mes "Here you go! You got "+ .prize_amount +" "+ getitemname(.@prize_id) +"!"; getitem .@prize_id, .prize_amount; close; /*----------------------------------------------------- Configuration -----------------------------------------------------*/ OnInit: .npc_name$ = "[Odd Fellow]"; .coin_id = Poring_Coin; // Coin constant/ID .coin_amount = 1; // Count amount required .prize_min_id = 501; // Prize minimum ID .prize_max_id = 30000; // Prize maximum ID .prize_amount = 1; // Prize amount rewarded // Rare item constants/IDs and chance in x to obtain rare item (default: 5 [20%]) setarray .rare_id[0], Apple, 10, Red_Potion, 20, Jellopy, 30, Fluff, 4, Clover, 5; end;}

prontera,150,150,0 script Sample 100,{ if ( !countitem( 7539 ) ) { mes "You need 1 " +getitemname( 7539 )+ " in order to talk to me"; close; } if ( select( "Here have my " +getitemname( 7539 )+ ":Nevermind" ) - 1 ) close; .@r = rand(501, 700); if ( getitemname( .@r ) != "null" ) { delitem 7539, 1; getitem .@r, 1; } close;}

Here, give this a try:
 
prontera,147,174,5 script Odd Fellow::randomstuff 1_M_WIZARD,{ /*----------------------------------------------------- Script -----------------------------------------------------*/ mes .npc_name$; mes "Hello there! For "+ .coin_amount +" "+ getitemname(.coin_id) +", I'll give you a random item!"; next; mes .npc_name$; if (countitem(.coin_id) < .coin_amount) { mes "Come back when you have "+ .coin_amount +" "+ getitemname(.coin_id) +"!"; close; } mes "Would you like to give it a try?"; next; if (select("Sure, why not!:No, thanks") == 2) { mes .npc_name$; mes "Okay, come back if you change your mind!"; close; } do { .@prize_id = rand(.prize_min_id, .prize_max_id); } while (getitemname(.@prize_id) == "null"); mes .npc_name$; mes "Here you go! You got "+ .prize_amount +" "+ getitemname(.@prize_id) +"!"; delitem .coin_id, .coin_amount; getitem .@prize_id, .prize_amount; close; /*----------------------------------------------------- Configuration -----------------------------------------------------*/ OnInit: .npc_name$ = "[Odd Fellow]"; .coin_id = Poring_Coin; // Coin ID .coin_amount = 1; // Count amount required .prize_min_id = 501; // Prize minimum ID .prize_max_id = 30000; // Prize maximum ID .prize_amount = 1; // Prize amount rewarded end;}

Has been awhile since I wrote my last script but here it is:
http://pastebin.com/DimazGWd
Haven't tested it though, if any error pops up, just post here and I'll fix it.