//===== Hercules Script ======================================
//= Event Manager
//===== By: ==================================================
//= ZelosAvalon
//===== Current Version: =====================================
//= 1.0
//===== Description: =========================================
//= 1.0 NPC that manages the earnings event points in Invasion Event,
// where you can exchange Event Coins for rewards. [ZelosAvalon]
//===== Additional Comments: =================================
//= 1.0 Now you can exchange you Event Coins for items in Event Manager. [ZelosAvalon]
//============================================================
prontera,146,146,6 script Event Manager 804,{
mes "[Event manager]";
mes "Hello ^3355FF"+strcharinfo(0)+"^000000";
mes "I'm the Event Manager.";
mes "You give me Event Coins, i reward you. It's that simple!";
next;
Main:
switch(select("Tell me more about Event coins and rewards:I want to convert my Event Coins:I want to receive my rewards:Well,it was nice meeting you..."))
{
case 1:
{
mes "[Event Manager]";
mes "There are 3 types of Event Coins you may win from Events:";
mes " - Golden Event Coin";
mes " - Silver Event Coin";
mes " - Bronze Event Coin";
next;
mes "[Event Manager]";
mes "The exchange rates between Event Coin are:";
mes " ^0000DD1^000000 Golden Coin = ^0000DD5^000000 Silver Coins";
mes " ^0000DD1^000000 Silver Coin = ^0000DD5^000000 Bronze Coins";
next;
mes "[Event Manager]";
mes "Here is the list rewards you may receive from your Event Coins:";
mes "^22AA22( Note that in this list, we have: GC = Golden Coins, SC = Silver Coins and BC = Bronze Coins )^000000";
next;
mes "[Event Manager]";
mes "1.[^ff0000"+ 100000 +"^000000 Zeny for 1 ^22AA22BC^000000]";
mes "2.[^ff0000"+ 50 +"^000000 Yggdrasil Seeds for 1 ^22AA22BC^000000]";
mes "3.[^ff0000"+ 50 +"^000000 Yggdrasil Berry for 2 ^22AA22SC^000000]";
next;
goto Main;
}
case 2:
{
mes "[Event Manager]";
mes "Remeber the conversion rates:";
mes " ^0000DD1^000000 Golden Coin = ^0000DD5^000000 Silver Coins";
mes " ^0000DD1^000000 Silver Coin = ^0000DD5^000000 Bronze Coins";
next;
mes "so, which type of conversion would you like to do?";
next;
switch(select("Silver Coin => Golden Coin:Bronze Coin => Silver Coin:Silver Coin => Bronze Coin:Golden Coin => Silver Coin:Nothing for now..."))
{
case 1:
{
mes "[Event Manager]";
mes "How many ^0000DDSilver^000000 Coins you wish to exchange for ^0000DDGolden^000000 Coins?:";
input #pas1;
next;
{if(#pas1 < 5 )
goto noCoin;
}
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
.@remainDiv = #pas1%5;
.@remaindiv01 = #pas1 - .@remainDiv;
delitem 8051,.@remaindiv01;
mes " [Event Manager]";
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events, and you can win many Coins, and exchange with beautiful items.";
.@remaindiv01 = .@remaindiv01/5;
getitem 8050,.@remaindiv01;
close;
}
}
case 2:
{
mes "[Event Manager]";
mes "How many ^0000DDBronze^000000 Coins you wish to exchange for ^0000DDSilver^000000 Coins?:";
input #pas1;
next;
{if(#pas1 < 5 )
goto noCoin;
}
{if(countitem(8052) < #pas1 )
goto noCoin;
}
{ if(countitem(8052) >= #pas1)
.@remainDiv = #pas1%5;
.@remaindiv01 = #pas1 - .@remainDiv;
delitem 8052,.@remaindiv01;
mes " [Event Manager]";
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events, and you can win many Coins, and exchange with beautiful items.";
.@remaindiv01 = .@remaindiv01/5;
getitem 8051,.@remaindiv01;
close;
}
}
case 3:
{
mes "[Event Manager]";
mes "How many ^0000DDSilver^000000 Coins you wish to exchange for ^0000DDBronze^000000 Coins?:";
input #pas1;
next;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
.@remaindiv01 = #pas1*5;
delitem 8051,#pas1;
mes " [Event Manager]";
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events, and you can win many Coins, and exchange with beautiful items.";
getitem 8052,.@remaindiv01;
close;
}
}
case 4:
{
mes "[Event Manager]";
mes "How many ^0000DDGolden^000000 Coins you wish to exchange for ^0000DDSilver^000000 Coins?:";
input #pas1;
next;
{if(countitem(8050) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{ if(countitem(8050) >= #pas1)
.@remaindiv01 = #pas1*5;
delitem 8050,#pas1;
mes " [Event Manager]";
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events, and you can win many Coins, and exchange with beautiful items.";
getitem 8051,.@remaindiv01;
close;
}
}
case 5:
{
mes "[Event Manager]";
mes "Ok, No problem.";
next;
goto Main;
}
}
}
case 3:
{
mes "[Event Manager]";
mes "Don't worry about conversions. If an item can be obtained for 2 Golden Coins and you only have 10 Silve Coins will be used instead. Likewise, if you only have 1 Golden Coin for example, and the item you want is 2 Silve Coins, you will be given back 3 Silver Coins.";
next;
mes "[Event Manager]";
mes "Very well, make your choice:";
mes "^22AA22( Note that in this list, we have: GC = Golden Coins, SC = Silver Coins and BC = Bronze Coins )^000000";
next;
switch(select("1.[^ff0000"+500000+"^000000 Zeny for 1 ^22AA22BC^000000]:2.[^ff0000"+ 5 +"^000000 "+getitemname(8055)+" for 1 ^22AA22BC^000000]:3.[^ff0000"+ 5 +"^000000 "+getitemname(14232)+" for 1 ^22AA22SC^000000]:4.[^ff0000"+ 10 +"^000000 "+getitemname(13891)+" for 2 ^22AA22SC^000000]:5.[^ff0000"+ 10 +"^000000 "+getitemname(13892)+" for 2 ^22AA22SC^000000]:6.[^ff0000"+ 10 +"^000000 "+getitemname(13893)+" for 2 ^22AA22SC^000000]:7.[^ff0000"+ 10 +"^000000 "+getitemname(13894)+" for 2 ^22AA22SC^000000]:8.[^ff0000"+ 10 +"^000000 "+getitemname(8063)+" for 2 ^22AA22SC^000000]:9.[^ff0000"+ 10 +"^000000 "+getitemname(8064)+" for 2 ^22AA22SC^000000]:10.[^ff0000"+ 10 +"^000000 "+getitemname(8065)+" for 2 ^22AA22SC^000000]:Next page."))
{
case 1:
mes "[Event Manager]";
mes "Very well, how many BC would you like to exchange for Zeny? :";
input #pas1;
{if(countitem(8052) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{ if(countitem(8052) >= #pas1)
delitem 8052,#pas1;
.@zenValue = #pas1*100000;
set Zeny,Zeny+.@zenValue;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
}
close;
case 2:
mes "[Event Manager]";
mes "Very well, how many BC would you like to exchange for "+getitemname(8055)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8052) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{ if(countitem(8052) >= #pas1)
delitem 8052,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8055,.@item2;
}
close;
case 3:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(14232)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 1)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 14232,.@item2;
}
close;
case 4:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13891)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13891,.@item2;
}
close;
case 5:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13892)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13892,.@item2;
}
close;
case 6:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13893)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13893,.@item2;
}
close;
case 7:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13894)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13894,.@item2;
}
close;
case 8:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(8063)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8063,.@item2;
}
close;
case 9:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(8064)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8064,.@item2;
}
close;
case 10:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(8065)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8065,.@item2;
}
close;
case 11:
switch(select("1.[^ff0000"+500000+"^000000 Zeny for 1 ^22AA22BC^000000]:2.[^ff0000"+ 5 +"^000000 "+getitemname(8055)+" for 1 ^22AA22BC^000000]:3.[^ff0000"+ 5 +"^000000 "+getitemname(14232)+" for 1 ^22AA22SC^000000]:4.[^ff0000"+ 10 +"^000000 "+getitemname(13891)+" for 2 ^22AA22SC^000000]:5.[^ff0000"+ 10 +"^000000 "+getitemname(13892)+" for 2 ^22AA22SC^000000]:6.[^ff0000"+ 10 +"^000000 "+getitemname(13893)+" for 2 ^22AA22SC^000000]:7.[^ff0000"+ 10 +"^000000 "+getitemname(13894)+" for 2 ^22AA22SC^000000]:8.[^ff0000"+ 10 +"^000000 "+getitemname(8063)+" for 2 ^22AA22SC^000000]:9.[^ff0000"+ 10 +"^000000 "+getitemname(8064)+" for 2 ^22AA22SC^000000]:10.[^ff0000"+ 10 +"^000000 "+getitemname(8065)+" for 2 ^22AA22SC^000000]:Next page."))
{
case 1:
mes "[Event Manager]";
mes "Very well, how many BC would you like to exchange for Zeny? :";
input #pas1;
{if(countitem(8052) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{ if(countitem(8052) >= #pas1)
delitem 8052,#pas1;
.@zenValue = #pas1*100000;
set Zeny,Zeny+.@zenValue;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
}
close;
case 2:
mes "[Event Manager]";
mes "Very well, how many BC would you like to exchange for "+getitemname(8055)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8052) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{ if(countitem(8052) >= #pas1)
delitem 8052,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8055,.@item2;
}
close;
case 3:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(14232)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 1)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 14232,.@item2;
}
close;
case 4:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13891)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13891,.@item2;
}
close;
case 5:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13892)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13892,.@item2;
}
close;
case 6:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13893)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13893,.@item2;
}
close;
case 7:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(13894)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 13894,.@item2;
}
close;
case 8:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(8063)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8063,.@item2;
}
close;
case 9:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(8064)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8064,.@item2;
}
close;
case 10:
mes "[Event Manager]";
mes "Very well, how many SC would you like to exchange for "+getitemname(8065)+"?";
input #pas1;
.@item1 = #pas1;
.@item2 = #pas1*5;
{if(countitem(8051) < #pas1 )
goto noCoin;
}
{if(#pas1 == 0)
goto noCoin;
}
{if(#pas1 < 2)
goto noCoin;
}
{ if(countitem(8051) >= #pas1)
delitem 8051,.@item1;
mes "Thank you for choosing ^777777Rebirth-RO^000000 that luck be with you in future events.";
getitem 8065,.@item2;
}
close;
}
}
}
case 4:
{
mes "[Event Manager]";
mes "Sure.";
close;
}
noCoin: {
mes "[Event Manager]";
mes "You don't have enough Coins.";
close;
}
}
}