Script for PvP

[IsabelaFernandez]

Hello, I would like a script for Vips (group 1) called @buffs2 that would open options to enchant the weapon with: Poison, Holy, Wind, Shadow, Earth, Water and Fire

[hendra814]

14 hours ago, IsabelaFernandez said:

Thank you, it worked perfectly, exactly as I wanted !!! <3
He only has one problem after selecting the enchantment, he only walks after using @refresh, do you have any idea what that might be? 

try this, just insert command for refresh

-	script	paytowinbuffs	-1,{
end;

OnBuffs:
	.@size = getarraysize(.buffs$);
	for( .@i = 0; .@i < .@size; .@i++){
		.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
		}
		.@i = select(.@menu$) -1;
		sc_start .elements[.@i],180000,5;
		atcommand "@refresh "+strcharinfo(0);
		end;

OnInit:
	setarray .buffs$, "Fire", "Water", "Earth", "Wind", "Holy", "Shadow", "Poison";
	setarray .elements, 96, 97, "99", "98", "37", "144", "26";
	bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,99;
	end;
}

 

[crazyarashi]

-	script	paytowinbuffs	-1,{
end;

OnBuffs:
	.@size = getarraysize(.buffs$);
	for( .@i = 0; .@i < .@size; .@i++){
		.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
		}
		.@i = select(.@menu$) -1;
		sc_start .elements$[.@i],180000,5;
		end;

OnInit:
	setarray .buffs$, "Fire", "Water", "Earth", "Fire", "Wind", "Holy", "Shadow", "Poison";
	setarray .elements$, "SC_FIREWEAPON", "SC_WATERWEAPON", "SC_EARTHWEAPON", "SC_WINDWEAPON", "SC_ASPERSIO", "SC_SHADOWWEAPON", "SC_ENCPOISON";
	bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,5;
	end;
}

 

[IsabelaFernandez]

8 hours ago, crazyarashi said:

-	script	paytowinbuffs	-1,{
end;

OnBuffs:
	.@size = getarraysize(.buffs$);
	for( .@i = 0; .@i < .@size; .@i++){
		.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
		}
		.@i = select(.@menu$) -1;
		sc_start .elements$[.@i],180000,5;
		end;

OnInit:
	setarray .buffs$, "Fire", "Water", "Earth", "Fire", "Wind", "Holy", "Shadow", "Poison";
	setarray .elements$, "SC_FIREWEAPON", "SC_WATERWEAPON", "SC_EARTHWEAPON", "SC_WINDWEAPON", "SC_ASPERSIO", "SC_SHADOWWEAPON", "SC_ENCPOISON";
	bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,5;
	end;
}

 

paytowin hahaha nice one 

Thanks for the intention, but unfortunately it did not work, would it be possible with bindatcmd script? Thank you dear 

[crazyarashi]

-	script	paytowinbuffs	-1,{
end;

OnBuffs:
	.@size = getarraysize(.buffs$);
	for( .@i = 0; .@i < .@size; .@i++){
		.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
		}
		.@i = select(.@menu$) -1;
		sc_start .elements[.@i],180000,5;
		end;

OnInit:
	setarray .buffs$, "Fire", "Water", "Earth", "Wind", "Holy", "Shadow", "Poison";
	setarray .elements, 96, 97, "99", "98", "37", "144", "26";
	bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,99;
	end;
}

Added some changes to it. it should add a command for VIP which is group 5 just edit it if you have custom group for VIP's

[IsabelaFernandez]

54 minutes ago, crazyarashi said:

-	script	paytowinbuffs	-1,{
end;

OnBuffs:
	.@size = getarraysize(.buffs$);
	for( .@i = 0; .@i < .@size; .@i++){
		.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
		}
		.@i = select(.@menu$) -1;
		sc_start .elements[.@i],180000,5;
		end;

OnInit:
	setarray .buffs$, "Fire", "Water", "Earth", "Wind", "Holy", "Shadow", "Poison";
	setarray .elements, 96, 97, "99", "98", "37", "144", "26";
	bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,99;
	end;
}

Added some changes to it. it should add a command for VIP which is group 5 just edit it if you have custom group for VIP's

Thank you, it worked perfectly, exactly as I wanted !!! <3
He only has one problem after selecting the enchantment, he only walks after using @refresh, do you have any idea what that might be? 

Edited July 31, 2018 by IsabelaFernandez

[crazyarashi]

Well sad to say i don't know why is that happening

[IsabelaFernandez]

20 hours ago, crazyarashi said:

Well sad to say i don't know why is that happening

 

No problem, you've helped me a lot already. Thank you very much 

6 hours ago, hendra814 said:

try this, just insert command for refresh

-	script	paytowinbuffs	-1,{
end;

OnBuffs:
	.@size = getarraysize(.buffs$);
	for( .@i = 0; .@i < .@size; .@i++){
		.@menu$ = .@menu$ + ""+.buffs$[.@i]+"" + ":";
		}
		.@i = select(.@menu$) -1;
		sc_start .elements[.@i],180000,5;
		atcommand "@refresh "+strcharinfo(0);
		end;

OnInit:
	setarray .buffs$, "Fire", "Water", "Earth", "Wind", "Holy", "Shadow", "Poison";
	setarray .elements, 96, 97, "99", "98", "37", "144", "26";
	bindatcmd "buffs2","paytowinbuffs::OnBuffs",5,99;
	end;
}

 

 

I would suggest this, thank you friend, now it's perfect