// ************************************************************ // Premium Account Sample - eAmod // ************************************************************ // Users can come to this script to pay for Premium Time. This mode runs only in the current Account, and expires when the Premium Time is over. // You can configure bonus experience, discounts in cash shops, and @commands available for Premium Account only. // Premium Account conf/battle settings ( see eAmod.conf ) // Extra experience Bonus when killing mobs. Value is from 0 to 100, as a Percent. Example 5 = 5% //premium_bonusexp: 50 // Discount when using Cash Shops. Value is from 0 to 100, as a Percent. Example 5 = 5% // premium_discount: 0 // Drop boost for Premium account users. Value is %, where 5 become 5%. // The bonus drop increases the normal drop rate just like Bubble Gum does. // If normal drop is 30% and premium_dropboost is 10. The final drop rate will be 33%, not 40%. //premium_dropboost: 50 // Only for eAthena and 3CeAM Builds. rAthena use group simulation on /conf/battle/eAmod.conf setting premium_group_id and /conf/groups.conf files. // To give access to @commands to Premium Account users, go to the file /conf/atcommand_athena.conf and add an Extra ,1 to each command setting you want to enable for Premium Users. // Example // go: 40,80 // That means, 40 GM level using @go, 80 Gm level using #go // To enable @go to Premium Account just do this: // go: 40,80,1 prontera,145,171,5 script Platinum Agent 504,{ // Settings: ----------------------------- //set .@Cost, 10000; // Cash Points required set .@Time, 4 * 7 * 24 * 60 * 60; // Time in Seconds = 4 weeks, 7 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample. set .@Time$, "28 days"; // --------------------------------------- cutin "jpn_rinne01",2; mes "[Platinum Agent]"; mes "Hello! I am the agent in charge of Platinum Membership."; if( isPremium() == 1 ) mes "Your Platinum status expires in ^FF0000" + callfunc("Time2Str",#Premium_Tick) + "^000000."; mes "What can I do for you?"; next; // isPremium() returns 1 if the current user Account is Premium and it have not expired. // It works together with #Premium_Tick, which is a Account Var set with a Unix Time value, representing when the Premium Account expires. // isPremium() is the same as #Premium_Tick > gettimetick(2) switch( select("Apply for/Extend Platinum status:What is a Platinum Member?") ) { case 1: cutin "jpn_rinne01",2; mes "[Platinum Agent]"; if( isPremium() == 1 ) mes "Would you like to extend your Platinum Status?"; else mes "Would you like to be a Platinum Member?"; mes "I can increase your Platinum status by ^FF0000" + .@Time$ + "^000000"; mes "All I require is a ^FF0000Platinum Package Ticket^000000."; next; if( select("Yes:No") == 2 ) { cutin "jpn_rinne02",2; mes "[Platinum Agent]"; mes "Come back if you change your mind!"; next; mes "[Platinum Agent]"; mes "sigh..."; cutin "", 255; close; } if(countitem(30019) < 1 ) // ADDED 674 FOR THE MEANTIME { cutin "jpn_rinne02",2; mes "Sorry, but you do not have a ^FF0000Platinum Package Ticket^000000. Please come back when you do!"; next; mes "[Platinum Agent]"; mes "sigh..."; cutin "", 255; close; } if( isPremium() == 1 ) set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension else set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account progressbar "ffff00",7; delitem 30019,1; specialeffect2 EF_MAPPILLAR; cutin "jpn_rinne02",2; mes "[Platinum Agent]"; mes "Congratulations! Thank you for enrolling in the Platinum Program!"; next; mes "[Platinum Agent]"; mes "Your Platinum status will expire in ^FF0000" + callfunc("Time2Str",#Premium_Tick) + "^000000. Have a nice day!"; cutin "", 255; close; case 2: // Edit this messages to explain your Users about the Premium Account in your server. // ---------------------------------------------------------------------------------- cutin "jpn_rinne01",2; mes "[Platinum Agent]"; mes "Premium accounts are a little better than normal accounts. Along with extra commands, Platinum members also gain additional 50% boost of both base and job experience."; mes "It costs a ^FF0000Platinum Package Ticket^000000 for a 28 day membership. You can buy a ticket for ^FF000020 iRO Tokens^000000. for You might also be lucky and receive a premium ticket from the ^FF0000Intense Gift Box^000000! "; next; mes "[Platinum Agent]"; mes "Available Perks for Platinum Accounts"; next; switch(select("Commands:Additional Perks")) { case 1: mes "[Platinum Agent]"; mes "@mobinfo/@mi/@monsterinfo"; mes "@iteminfo/ @ii"; mes "@whodrops"; mes "@font"; mes "@petrename"; mes "@storage"; mes "@homstats"; mes "@hominfo"; mes "@pettalk"; mes "@homtalk"; mes "@whosell"; mes "@return"; mes "@noask"; mes "@whereis"; mes "@aloot"; cutin "", 255; close; end; case 2: mes "[Platinum Agent]"; mes "Additonal Storage, which is rent storage with 600 slots."; mes "Additional 50% Job and Base Experience"; mes "Free Stylist"; mes "Free Warpers"; mes "Free Healer"; mes "Free Mail"; mes "Free Cart Rent"; cutin "", 255; close; end; } } }