R> NPC Full Buffs for VIP Players

[yammoo]

Hi, guys. Good Morning.

I need script for NPC Full Buffs ( which contains buffs like "Increase Agi, Blessing, Angelus, Suffragium, Impositio Manus, Gloria, Magnificat, Full Chemical Protections, Assumptio, Full Adrenaline Rush, Maximize Power, Weapon Perfection, AGI Dish +5, STR Dish +5, DEX Dish +5, INT Dish +5, LUK Dish +5, VIT Dish +5, Endure, Kaupe, Kaite, and Spirits )

But, the NPC will only give the buffs to the people who holding an exact Item. ( lets say i made custom item with Name "VIP Ticket", and ID Numbers 30000 ) This NPC will only give the buffs if there is item number 30000 ( VIP Ticket ) in her/his inventory. If there isnt, the NPC will just say something like "Sorry, its only for VIP people"

I also need a script for NPC Broadcaster which allow VIP People to broadcast freely without paying, but only if he/she is holding the VIP Ticket.

And, how to make a custom item lets say its gonna be called "VIP Ticket" its not useable items, it will be in ETC Items, and it has durations like 30 days. Since i give it to the players, time is counting down, and gonna be disappeared after 30 days ( real time not online time )

Thanks a lot before, guys.

Edited March 6, 2014 by yammoo

[sandbox]

prontera,100,200,3	script	VIPBuffer	78,{

specialeffect2 EF_HEAL2; percentheal 100,100;

if(countitem(30000)){
	specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,600000,10;
	specialeffect2 EF_BLESSING; sc_start SC_BLESSING,600000,10;
	specialeffect2 EF_ANGELUS; sc_start SC_ANGELUS,600000,10;
	specialeffect2 EF_SUFFRAGIUM; sc_start SC_SUFFRAGIUM,600000,3;
	specialeffect2 EF_IMPOSITIO; sc_start SC_IMPOSITIO,600000,5;
	specialeffect2 EF_GLORIA; sc_start SC_GLORIA,600000,5;
	specialeffect2 EF_MAGNIFICAT; sc_start SC_MAGNIFICAT,600000,5;
	specialeffect2 EF_CHEMICALPROTECTIOn; sc_start SC_CP_WEAPON,600000,5;
		sc_start SC_CP_ARMOR,600000,5;
		sc_start SC_CP_SHIELD,600000,5;
		sc_start SC_CP_HELM,600000,5;
	specialeffect2 EF_ASSUMPTIO; sc_start SC_ASSUMPTIO,600000,5;
		sc_start SC_ADRENALINE2,600000,1;
	specialeffect2 EF_MAXPOWER; sc_start SC_MAXIMIZEPOWER,600000,5;
	specialeffect2 EF_PERFECTION; sc_start SC_WEAPONPERFECTION,600000,5;
	specialeffect2 EF_ENDURE; sc_start SC_ENDURE,600000,10;
		sc_start SC_KAUPE,600000,3;
		sc_start SC_KAITE,600000,7;
		sc_start SC_STRFOOD,600000,5;
		sc_start SC_AGIFOOD,600000,5;
		sc_start SC_VITFOOD,600000,5;
		sc_start SC_INTFOOD,600000,5;
		sc_start SC_DEXFOOD,600000,5;
		sc_start SC_LUKFOOD,600000,5;

switch(Class){

case 18:
case 4019:
case 4071:
case 4078:
	skilleffect "SL_ALCHEMIST",0;
	sc_start4 SC_SPIRIT,9999999,5,455,0,0;
	break;
case 15:
case 4016:
case 4070:
case 4077:
	skilleffect "SL_MONK",0;
	sc_start4 SC_SPIRIT,9999999,5,447,0,0;
	break;
case 4047:
	skilleffect "SL_STAR",0;
	sc_start4 SC_SPIRIT,9999999,5,448,0,0;
	break;
case 16:
case 4017:
case 4067:
case 4074:
	skilleffect "SL_SAGE",0;
	sc_start4 SC_SPIRIT,9999999,5,449,0,0;
	break;
case 14:
case 4015:
case 4066:
case 4073:
	skilleffect "SL_CRUSADER",0;
	sc_start4 SC_SPIRIT,9999999,5,450,0,0;
	break;
case 23:
case 4190:
	skilleffect "SL_SUPERNOVICE",0;
	sc_start4 SC_SPIRIT,9999999,5,451,0,0;
	break;
case 7:
case 4008:
case 4054:
case 4060:
	skilleffect "SL_KNIGHT",0;
	sc_start4 SC_SPIRIT,9999999,5,452,0,0; 
	break;
case 9:
case 4010:
case 4055:
case 4061:
	skilleffect "SL_WIZARD",0;
	sc_start4 SC_SPIRIT,9999999,5,453,0,0;
	break;
case 8:
case 4009:
case 4057:
case 4063:
	skilleffect "SL_PRIEST",0;
	sc_start4 SC_SPIRIT,9999999,5,454,0,0;
	break;
case 19:
case 20:
case 4020:
case 4021:
case 4068:
case 4069:
case 4075:
case 4076:
	skilleffect "SL_BARDDANCER",0;
	sc_start4 SC_SPIRIT,9999999,5,455,0,0;
	break;
case 17:
case 4018:
case 4072:
case 4079:
	skilleffect "SL_ROGUE",0;
	sc_start4 SC_SPIRIT,9999999,5,456,0,0;
	break;
case 12:
case 4013:
case 4059:
case 4065:
	skilleffect "SL_ASSASIN",0;
	sc_start4 SC_SPIRIT,9999999,5,457,0,0;
	break;
case 10:
case 4011:
	skilleffect "SL_BLACKSMITH",0;
	sc_start4 SC_SPIRIT,9999999,5,458,0,0;
	break;
case 11:
case 4012:
case 4056:
case 4062:
	skilleffect "SL_HUNTER",0;
	sc_start4 SC_SPIRIT,9999999,5,460,0,0;
	break;
case 4049:
	skilleffect "SL_SOULLINKER",0;
	sc_start4 SC_SPIRIT,9999999,5,461,0,0;
	break;
default:
	break;


		}
	
	}

end;
}

prontera,101,201,3	script	Broadcaster	78,{

if(!countitem(30000)) {
	if(Zeny < 1000000) {
		mes .Npc_Name$;
		mes "You need 1M to broadcast";
		close;
	}
}
mes .Npc_Name$;
mes "Input your message";
input .@bc$;
if(!countitem(30000)) Zeny = Zeny-1000000;
announce strcharinfo(0)+": "+.@bc$,0;
close;

OnInit:
	.Npc_Name$ = "Broadcaster";
	end;

}

For your ticket, Put this on a box or an NPC that will summon the ticket. Tag it as an equip, just set the eLvl = your server's max level + 1

renitem 30000,2592000;

[yammoo]

@sandbox : thanks sir, it helps me a lot. and yes it works!

[BavariaN]

For your ticket, Put this on a box or an NPC that will summon the ticket. Tag it as an equip, just set the eLvl = your server's max level + 1

renitem 30000,2592000;

I dont get this part . Tag it as an equip , just set the eLvl = your server's max level +1 

 

[Potato Chips]

@sandbox

me too I didnt got the last part, Can you please elaborate it for us. Thank you.
 

Oh I get it, thank you sir.