Disguise Event that gives random reward

[AsurielRO]

Hi good morning rAthena, can anyone help me how to change the disguise event default script reward into random rewards?

i do read this thread but it seems like i still don't get in what line or what should i edit to make it work, Thank you in advance  
 

 

[LearningRO]

10 hours ago, PholliCruz said:

no one knows how to do this?

getitem callfunc("F_Rand",6635,19598),1; 

[AsurielRO]

no one knows how to do this?

[AsurielRO]

10 hours ago, LearningRO said:

getitem callfunc("F_Rand",6635,19598),1; 

Thanks @LearningRO it should be like this?

iCorrect:
	if (.Winner) {
		dispbottom "Someone has already won this round.";
		end;
	}
	set .Winner,1;
	set .RoundCount,.RoundCount+1;
	deletepset 1;
	activatepset 1;
	getitem callfunc("F_Rand",6635,19598),1;
	announce strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue;
	if (.RoundCount>=.Rounds) {
		setnpcdisplay "Disguise Event",795;
		set .RoundCount,0; set .Change,0; set .EventON,0;
		setnpctimer 0; stopnpctimer;
		npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later.";
		end;
	}
	setnpcdisplay "Disguise Event",795;
	set .Change,0;
	setnpctimer 0;
	end;
}

and no other lines should be replaced?

 

I just noticed that there's a line at the top for reward id's.

OnInit:
	set .EventON,0;
	set .Wait,0;
	set .Winner,0;
	set .ResetCounter,0;
	set .Rounds,10;
	set .Prize,512;
	set .PrizeAmt,1;
	set .Rule,1;
	setarray .MVP[0],1038,1039,1046,1059,1086,1087,1112,1115,1147,1150,1157,1159,1190,1251,1252,1272,1312,1373,
	                  1389,1399,1418,1492,1502,1511,1583,1623,1630,1646,1647,1648,1649,1650,1651,1658,1685,1688,
				   1708,1719,1734,1751,1768,1779,1785,1802,1832,1871,1874,1885,1917,1980,2022,2068,2087,2131,
				   2156,2165;

 

[LearningRO]

16 minutes ago, PholliCruz said:

Thanks @LearningRO it should be like this?

iCorrect:
	if (.Winner) {
		dispbottom "Someone has already won this round.";
		end;
	}
	set .Winner,1;
	set .RoundCount,.RoundCount+1;
	deletepset 1;
	activatepset 1;
	getitem callfunc("F_Rand",6635,19598),1;
	announce strcharinfo(0)+" is correct! I was disguised as: "+$MonsterName$+"",bc_map | bc_blue;
	if (.RoundCount>=.Rounds) {
		setnpcdisplay "Disguise Event",795;
		set .RoundCount,0; set .Change,0; set .EventON,0;
		setnpctimer 0; stopnpctimer;
		npctalk "Disguise Event : Thank you all for playing. That was the last round of the Disguise Event. Come play again later.";
		end;
	}
	setnpcdisplay "Disguise Event",795;
	set .Change,0;
	setnpctimer 0;
	end;
}

and no other lines should be replaced?

yes try it first so you will be now

[AsurielRO]

1 hour ago, LearningRO said:

yes try it first so you will be now

Thanks @LearningRO , how about to set the random rewards into different amount? like for example apple 1 jellopy 50 grapes 15 etc.