@item3 and @item4: for test and no corruption purpose

[Kido]

I would like to have an @item3 which will make any item like @item, but this item won't be transferible in anyway. This would be for GMs who are testers and need the command but even if they are trusted ppl, just to make sure that they won't trade the items. Also if possible, an @item4 with the same functions of @item2 but will be too as @item3 that items created that way won't be tradeable.

 

this way any admin can give those commands without having to worry about possible corruption about their testers :3

 

well huh that's all o: hope it can be implemented o:!

[Tonetzkii]

I think @itembound is better to use for me.

[Kido]

I think @itembound is better to use for me.

 

yeah it actually it's pretty good, but what about when they are alone and they need to test?

the command is thinked to leave test alone the gms even when there is no police/admin to take care of their actions

i think it's pretty confortable o:

[Tonetzkii]

I see i understand now +1 for this topic.

[sandbox]

Try this, based on getitembound..

-	script	item3	-1,{

OnInit:
	bindatcmd strnpcinfo(1),strnpcinfo(1)+"::OnAtcommand",4,40;
	end;

OnAtcommand:
	if(.@atcmd_numparameters < 2) {
		message strcharinfo(0),"Invalid Syntax (usage: @item3 <item id/name> <amount>).";
		message strcharinfo(0),.@atcmd_command$+" failed.";
	}
	else {
		getitembound .@atcmd_parameters$[0],atoi(.@atcmd_parameters$[1]),4;
	}
	end;


}

-	script	item4	-1,{

OnInit:
	bindatcmd strnpcinfo(1),strnpcinfo(1)+"::OnAtcommand",4,40;
	end;

OnAtcommand:
	if(.@atcmd_numparameters < 9) {
		message strcharinfo(0),"Invalid Syntax (usage: @item3 <item id/name> <amount> <identify> <refine> <attribute> <card1> <card2> <card3> <card4>).";
		message strcharinfo(0),.@atcmd_command$+" failed.";
	}
	else {
		getitembound2 .@atcmd_parameters$[0],atoi(.@atcmd_parameters$[1]),atoi(.@atcmd_parameters$[2]),atoi(.@atcmd_parameters$[3]),atoi(.@atcmd_parameters$[4]),atoi(.@atcmd_parameters$[5]),atoi(.@atcmd_parameters$[6]),atoi(.@atcmd_parameters$[7]),atoi(.@atcmd_parameters$[8]),4;
	}
	end;


}

[Kido]

that's for rAthena (because the 40,40 D:)? or how to make only certain group users able to use the command o:?

 

edit:

it requires group 40 or 9 ? 

[sandbox]

the end of the bindatmcd line, 40,40 means lvl 40 group id for atcommand perm, and 40 for charcommand, just change the first value to whatever group id you want

[Kido]

allright ty, will test it o:!

 

edit

i tried by setting both 40,40 to 4,4 but didn't work, it just said that the command doesnt exist

 

huh i have to change them to be like 4,40 right o:?

 

edit

setting it to 4,40 didn't work D:

 

script

-	script	item3	-1,{

OnInit:
	bindatcmd strnpcinfo(1),strnpcinfo(1)+"::OnAtcommand",4,40;
	end;

OnAtcommand:
	if(.@atcmd_numparameters < 2) {
		message strcharinfo(0),"Invalid Syntax (usage: @item3 <item id/name> <amount>).";
		message strcharinfo(0),.@atcmd_command$+" failed.";
	}
	else {
		getitembound .@atcmd_parameters$[0],atoi(.@atcmd_parameters$[1]),4,getcharid(3);
	}
	end;


}

-	script	item4	-1,{

OnInit:
	bindatcmd strnpcinfo(1),strnpcinfo(1)+"::OnAtcommand",4,40;
	end;

OnAtcommand:
	if(.@atcmd_numparameters < 9) {
		message strcharinfo(0),"Invalid Syntax (usage: @item3 <item id/name> <amount> <identify> <refine> <attribute> <card1> <card2> <card3> <card4>).";
		message strcharinfo(0),.@atcmd_command$+" failed.";
	}
	else {
		getitembound2 .@atcmd_parameters$[0],atoi(.@atcmd_parameters$[1]),atoi(.@atcmd_parameters$[2]),atoi(.@atcmd_parameters$[3]),atoi(.@atcmd_parameters$[4]),atoi(.@atcmd_parameters$[5]),atoi(.@atcmd_parameters$[6]),atoi(.@atcmd_parameters$[7]),atoi(.@atcmd_parameters$[8]),4,getcharid(3);
	}
	end;


}

[Kido]

yeah i got error D:

[sandbox]

prontera,123,123,7 script item3a 90,{

if(getgroupid() < 4) end;

mes "Input Item ID";

input .@item3a;

next;

mes "Input Amount";

input .@item3b;

getitembound .@item3a,.@item3b,4;

close;

}

prontera,123,123,7 script item4a 90,{

if(getgroupid() < 4) end;

setarray .@item4[0],0;

mes "Input Item ID";

input .@item4[0];

next;

mes "Input Amount";

input .@item4[1];

next;

mes "Input identify";

input .@item4[2];

next;

mes "Input Refine #";

input .@item4[3];

next;

mes "Input Attribute";

input .@item4[4];

next;

mes "Input Card 1";

input .@item4[5];

next;

mes "Input Card 2";

input .@item4[6];

next;

mes "Input Card 3";

input .@item4[7];

next;

mes "Input Card 4";

input .@item4[8];

getitembound2 .@item4[0],.@item4[1],.@item4[2],.@item4[3],.@item4[4],.@item4[5],.@item4[6],.@item4[7],.@item4[8],4;

close;

}