Jump to content
  • 0
Titan

GM Reward Giver Script

Question

Hi guys,

 

I want to request this script coz I don't want to give my event GM @item command and abuse it.

 

Event GM only send me the list of the winner in the event and I will be the one to reward the winner using this NPC script.

 

What I am looking for NPC is the following:

- can give the rewards (the player just have to talk to the NPC and claim the reward if he/she are entitled to)

- have the option to input character name and item ID and amount to be rewarded

- only GM level 99 can use it

 

Thanks in advance!

Edited by Titan
Link to comment
Share on other sites

3 answers to this question

Recommended Posts

Hi guys,

 

I want to request this script coz I don't want to give my event GM @item command and abuse it.

 

Event GM only send me the list of the winner in the event and I will be the one to reward the winner using this NPC script.

 

What I am looking for NPC is the following:

- can give the rewards (the player just have to talk to the NPC and claim the reward if he/she are entitled to)

- have the option to input character name and item ID and amount to be rewarded

- only GM level 99 can use it

 

Thanks in advance!

 

Well you can use this 

 

//===== eAthena Script =======================================
//= Item Rewards NPC
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.8
//===== Description: =========================================
//= Useful for event rewards, when a player is not necessarily online.
//= Logging is available, if needed (holds 128 names).
//= Note: Unclaimed rewards are limited to 64 at a time.
//============================================================

prontera,156,195,6	script	Item Rewards	836,{

// --------------------- Config ---------------------
// Package format is "ID1,Count1,ID2,Count2,..."
// GM Access: Level required to open the GM menu.
// GM Delete: Level required to erase entries.
// GM Logging: Level required to manage logs.

	set .GMAccess,60;
	set .GMDelete,80;
	set .GMLogging,99;
	set .PackageCount,3;
	setarray .Package1[0],501,1,502,2,503,3;
	setarray .Package2[0],601,5,602,10;
	setarray .Package3[0],607,10;

// --------------------------------------------------

	if (getgmlevel() >= .GMAccess) goto GM_Menu;
	mes "[Item Rewards]";
	set [email protected],0;
	while ([email protected] < getarraysize($itemreward$)) {
		if (strcharinfo(0) == $itemreward$[[email protected]]) goto GetReward;
		set [email protected], [email protected]+2; }
	mes "You have no rewards pending.";
	close;

GetReward:
	if (((Weight*100)/MaxWeight) > 49) {
		mes "You are over the weight limit."; close; }
	if (!checkweight(5055,getarraysize(getd(".Package"+$itemreward$[[email protected]+1])))) {
		mes "Clear space in your inventory."; close; }
	set [email protected],0;
	while ([email protected] < getarraysize(getd(".Package"+$itemreward$[[email protected]+1]))) {
		getitem getd(".Package"+$itemreward$[[email protected]+1]+"["[email protected]+"]"),getd(".Package"+$itemreward$[[email protected]+1]+"["+([email protected]+1)+"]");
		set [email protected], [email protected]+2; }
	specialeffect2 248;
	deletearray $itemreward$[[email protected]],2;
	mes "Here you go!";
	close;

OnMinute00:
OnMinute30:
	if (!getarraysize($itemreward$)) end;
	set [email protected],0;
	while ([email protected] < getarraysize($itemreward$)) {
		message $itemreward$[[email protected]],"[You have a reward pending.  See the Item Rewards NPC.]";
		sleep 10;
		set [email protected], [email protected]+2; }
	end;

GM_Menu:
	mes "[Item Rewards]";
	mes "What would you like to do?";
	next;
	switch(select(" ~ ^FF55FFPackage information^000000: ~ ^FF55FFList unclaimed rewards^000000: ~ ^00D900Give a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete all unclaimed rewards^000000: ~ "+((getgmlevel()<.GMLogging)?"^777777":"^55AAFF")+"Manage logs^000000: ~ [Close]")) {
		case 1:
			mes "[Item Rewards]";
			set [email protected],1;
			while (getd(".Package"[email protected])) {
				mes "^660099Package " + [email protected] + ":^000000";
				set [email protected],0;
				while ([email protected] < getarraysize(getd(".Package"[email protected]))) {
					mes " ~ " + getd(".Package"[email protected]+"["+([email protected]+1)+"]") + "x " + getitemname(getd(".Package"[email protected]+"["+([email protected])+"]"));
					set [email protected], [email protected]+2; }
				set [email protected], [email protected]+1; }
			next;
			goto GM_Menu;
		case 2:
			mes "[Item Rewards]";
			mes "Used space: ^F52887" + (getarraysize($itemreward$)/2) + "^000000/64";
			mes "--------------------------------";
			set [email protected],0;
			while ([email protected] < getarraysize($itemreward$)) {
				mes "^B041FF" + $itemreward$[[email protected]] + "^000000: package #" + $itemreward$[[email protected]+1];
				set [email protected], [email protected]+2; }
			next;
			goto GM_Menu;
		case 3:
			mes "[Item Rewards]";
			if (getarraysize($itemreward$) > 127) {
				mes "No more names can be stored.";
				mes "Delete some values and try again.";
				next;
				goto GM_Menu; }
			mes "Input a name, then a package number.";
			input [email protected]$;
				query_sql "SELECT `char_id` FROM `char` WHERE `name` = '"[email protected]$+"'",[email protected];
				if ([email protected]) { mes "The name is invalid."; next; goto GM_Menu; }
					else set [email protected],0;
			input [email protected],1,.PackageCount;
			next;
			mes "[Item Rewards]";
			mes "Player: ^B041FF" + [email protected]$ + "^000000";
			mes "Package: ^B041FF#" + [email protected] + "^000000";
			mes " ";
			mes "Are you sure?";
			if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; }
			setarray $itemreward$[getarraysize($itemreward$)],[email protected]$,[email protected];
			message [email protected]$,"[You have a reward pending.  See the Item Rewards NPC.]";
			if ($itemlog) {
				if (getarraysize($itemlog1$) > 127) {
					deletearray $itemlog1$[0],1;
					deletearray $itemlog2$[0],1; }
				setarray $itemlog1$[getarraysize($itemlog1$)],strcharinfo(0);
				setarray $itemlog2$[getarraysize($itemlog2$)],[email protected]$; }
			mes "Reward added.";
			next;
			goto GM_Menu;
		case 4:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMDelete) {
				mes "You are not permitted to delete entries."; next; goto GM_Menu; }
			mes "Input a name to cancel a reward.";
			input [email protected]$;
			set [email protected],0;
			while ([email protected] < getarraysize($itemreward$)) {
				if ($itemreward$[[email protected]] == [email protected]$) {
					deletearray $itemreward$[[email protected]],2;
					mes "Name cleared."; next; goto GM_Menu; }
				set [email protected], [email protected]+2; }
			mes "The name is invalid.";
			next;
			goto GM_Menu;
		case 5:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMDelete) {
				mes "You are not permitted to delete entries."; next; goto GM_Menu; }
			mes "^FF0000This action cannot be undone.^000000";
			mes "Are you sure?";
			mes " ";
			if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; }
			deletearray $itemreward$[0],getarraysize($itemreward$);
			mes "All entries cleared.";
			next;
			goto GM_Menu;
		case 6:
		Log_Menu:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMLogging) {
				mes "You are not permitted to manage logs."; next; goto GM_Menu; }
			mes "Logs are currently "+(($itemlog)?"^00D900enabled^000000":"^FF0000disabled^000000")+".";
			next;
			switch(select(" ~ ^55AAFFView Logs^000000: ~ "+((!$itemlog)?"^00D900Enable":"^777777Disable")+" logging^000000: ~ ^DE0000Delete all logs^000000: ~ [Go back]")) {
				case 1:
					mes "[Item Rewards]";
					mes "Used space: ^F52887" + (getarraysize($itemlog1$)) + "^000000/128";
					mes "--------------------------------";
					set [email protected],0;
					while ([email protected] < getarraysize($itemlog1$)) {
						mes "^B041FF" + $itemlog1$[[email protected]] + "^000000: sent to ^55AAFF" + $itemlog2$[[email protected]] + "^000000";
						set [email protected], [email protected]+1; }
					next;
					goto Log_Menu;
				case 2:
					set $itemlog, ((!$itemlog)?1:0);
					goto Log_Menu;
				case 3:
					mes "[Item Rewards]";
					mes "^FF0000This action cannot be undone.^000000";
					mes "Are you sure?";
					mes " ";
					if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto Log_Menu; }
					deletearray $itemlog1$[0],getarraysize($itemlog1$);
					deletearray $itemlog2$[0],getarraysize($itemlog2$);
					mes "Logs cleared.";
					next;
					goto Log_Menu;
				case 4:
					next;
					goto GM_Menu;
			}
		case 7:
			close;
	}
}

or in this site

LINK

 

Credit to Sir Euphy

  • Upvote 1
Link to comment
Share on other sites

 

Hi guys,

 

I want to request this script coz I don't want to give my event GM @item command and abuse it.

 

Event GM only send me the list of the winner in the event and I will be the one to reward the winner using this NPC script.

 

What I am looking for NPC is the following:

- can give the rewards (the player just have to talk to the NPC and claim the reward if he/she are entitled to)

- have the option to input character name and item ID and amount to be rewarded

- only GM level 99 can use it

 

Thanks in advance!

 

Well you can use this 

 

//===== eAthena Script =======================================
//= Item Rewards NPC
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.8
//===== Description: =========================================
//= Useful for event rewards, when a player is not necessarily online.
//= Logging is available, if needed (holds 128 names).
//= Note: Unclaimed rewards are limited to 64 at a time.
//============================================================

prontera,156,195,6	script	Item Rewards	836,{

// --------------------- Config ---------------------
// Package format is "ID1,Count1,ID2,Count2,..."
// GM Access: Level required to open the GM menu.
// GM Delete: Level required to erase entries.
// GM Logging: Level required to manage logs.

	set .GMAccess,60;
	set .GMDelete,80;
	set .GMLogging,99;
	set .PackageCount,3;
	setarray .Package1[0],501,1,502,2,503,3;
	setarray .Package2[0],601,5,602,10;
	setarray .Package3[0],607,10;

// --------------------------------------------------

	if (getgmlevel() >= .GMAccess) goto GM_Menu;
	mes "[Item Rewards]";
	set [email protected],0;
	while ([email protected] < getarraysize($itemreward$)) {
		if (strcharinfo(0) == $itemreward$[[email protected]]) goto GetReward;
		set [email protected], [email protected]+2; }
	mes "You have no rewards pending.";
	close;

GetReward:
	if (((Weight*100)/MaxWeight) > 49) {
		mes "You are over the weight limit."; close; }
	if (!checkweight(5055,getarraysize(getd(".Package"+$itemreward$[[email protected]+1])))) {
		mes "Clear space in your inventory."; close; }
	set [email protected],0;
	while ([email protected] < getarraysize(getd(".Package"+$itemreward$[[email protected]+1]))) {
		getitem getd(".Package"+$itemreward$[[email protected]+1]+"["[email protected]+"]"),getd(".Package"+$itemreward$[[email protected]+1]+"["+([email protected]+1)+"]");
		set [email protected], [email protected]+2; }
	specialeffect2 248;
	deletearray $itemreward$[[email protected]],2;
	mes "Here you go!";
	close;

OnMinute00:
OnMinute30:
	if (!getarraysize($itemreward$)) end;
	set [email protected],0;
	while ([email protected] < getarraysize($itemreward$)) {
		message $itemreward$[[email protected]],"[You have a reward pending.  See the Item Rewards NPC.]";
		sleep 10;
		set [email protected], [email protected]+2; }
	end;

GM_Menu:
	mes "[Item Rewards]";
	mes "What would you like to do?";
	next;
	switch(select(" ~ ^FF55FFPackage information^000000: ~ ^FF55FFList unclaimed rewards^000000: ~ ^00D900Give a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete all unclaimed rewards^000000: ~ "+((getgmlevel()<.GMLogging)?"^777777":"^55AAFF")+"Manage logs^000000: ~ [Close]")) {
		case 1:
			mes "[Item Rewards]";
			set [email protected],1;
			while (getd(".Package"[email protected])) {
				mes "^660099Package " + [email protected] + ":^000000";
				set [email protected],0;
				while ([email protected] < getarraysize(getd(".Package"[email protected]))) {
					mes " ~ " + getd(".Package"[email protected]+"["+([email protected]+1)+"]") + "x " + getitemname(getd(".Package"[email protected]+"["+([email protected])+"]"));
					set [email protected], [email protected]+2; }
				set [email protected], [email protected]+1; }
			next;
			goto GM_Menu;
		case 2:
			mes "[Item Rewards]";
			mes "Used space: ^F52887" + (getarraysize($itemreward$)/2) + "^000000/64";
			mes "--------------------------------";
			set [email protected],0;
			while ([email protected] < getarraysize($itemreward$)) {
				mes "^B041FF" + $itemreward$[[email protected]] + "^000000: package #" + $itemreward$[[email protected]+1];
				set [email protected], [email protected]+2; }
			next;
			goto GM_Menu;
		case 3:
			mes "[Item Rewards]";
			if (getarraysize($itemreward$) > 127) {
				mes "No more names can be stored.";
				mes "Delete some values and try again.";
				next;
				goto GM_Menu; }
			mes "Input a name, then a package number.";
			input [email protected]$;
				query_sql "SELECT `char_id` FROM `char` WHERE `name` = '"[email protected]$+"'",[email protected];
				if ([email protected]) { mes "The name is invalid."; next; goto GM_Menu; }
					else set [email protected],0;
			input [email protected],1,.PackageCount;
			next;
			mes "[Item Rewards]";
			mes "Player: ^B041FF" + [email protected]$ + "^000000";
			mes "Package: ^B041FF#" + [email protected] + "^000000";
			mes " ";
			mes "Are you sure?";
			if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; }
			setarray $itemreward$[getarraysize($itemreward$)],[email protected]$,[email protected];
			message [email protected]$,"[You have a reward pending.  See the Item Rewards NPC.]";
			if ($itemlog) {
				if (getarraysize($itemlog1$) > 127) {
					deletearray $itemlog1$[0],1;
					deletearray $itemlog2$[0],1; }
				setarray $itemlog1$[getarraysize($itemlog1$)],strcharinfo(0);
				setarray $itemlog2$[getarraysize($itemlog2$)],[email protected]$; }
			mes "Reward added.";
			next;
			goto GM_Menu;
		case 4:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMDelete) {
				mes "You are not permitted to delete entries."; next; goto GM_Menu; }
			mes "Input a name to cancel a reward.";
			input [email protected]$;
			set [email protected],0;
			while ([email protected] < getarraysize($itemreward$)) {
				if ($itemreward$[[email protected]] == [email protected]$) {
					deletearray $itemreward$[[email protected]],2;
					mes "Name cleared."; next; goto GM_Menu; }
				set [email protected], [email protected]+2; }
			mes "The name is invalid.";
			next;
			goto GM_Menu;
		case 5:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMDelete) {
				mes "You are not permitted to delete entries."; next; goto GM_Menu; }
			mes "^FF0000This action cannot be undone.^000000";
			mes "Are you sure?";
			mes " ";
			if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; }
			deletearray $itemreward$[0],getarraysize($itemreward$);
			mes "All entries cleared.";
			next;
			goto GM_Menu;
		case 6:
		Log_Menu:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMLogging) {
				mes "You are not permitted to manage logs."; next; goto GM_Menu; }
			mes "Logs are currently "+(($itemlog)?"^00D900enabled^000000":"^FF0000disabled^000000")+".";
			next;
			switch(select(" ~ ^55AAFFView Logs^000000: ~ "+((!$itemlog)?"^00D900Enable":"^777777Disable")+" logging^000000: ~ ^DE0000Delete all logs^000000: ~ [Go back]")) {
				case 1:
					mes "[Item Rewards]";
					mes "Used space: ^F52887" + (getarraysize($itemlog1$)) + "^000000/128";
					mes "--------------------------------";
					set [email protected],0;
					while ([email protected] < getarraysize($itemlog1$)) {
						mes "^B041FF" + $itemlog1$[[email protected]] + "^000000: sent to ^55AAFF" + $itemlog2$[[email protected]] + "^000000";
						set [email protected], [email protected]+1; }
					next;
					goto Log_Menu;
				case 2:
					set $itemlog, ((!$itemlog)?1:0);
					goto Log_Menu;
				case 3:
					mes "[Item Rewards]";
					mes "^FF0000This action cannot be undone.^000000";
					mes "Are you sure?";
					mes " ";
					if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto Log_Menu; }
					deletearray $itemlog1$[0],getarraysize($itemlog1$);
					deletearray $itemlog2$[0],getarraysize($itemlog2$);
					mes "Logs cleared.";
					next;
					goto Log_Menu;
				case 4:
					next;
					goto GM_Menu;
			}
		case 7:
			close;
	}
}

or in this site

LINK

 

Credit to Sir Euphy

 

 

thanks a lot mate  /no1

Link to comment
Share on other sites

 

 

Hi guys,

 

I want to request this script coz I don't want to give my event GM @item command and abuse it.

 

Event GM only send me the list of the winner in the event and I will be the one to reward the winner using this NPC script.

 

What I am looking for NPC is the following:

- can give the rewards (the player just have to talk to the NPC and claim the reward if he/she are entitled to)

- have the option to input character name and item ID and amount to be rewarded

- only GM level 99 can use it

 

Thanks in advance!

 

Well you can use this 

 

//===== eAthena Script =======================================
//= Item Rewards NPC
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.8
//===== Description: =========================================
//= Useful for event rewards, when a player is not necessarily online.
//= Logging is available, if needed (holds 128 names).
//= Note: Unclaimed rewards are limited to 64 at a time.
//============================================================

prontera,156,195,6	script	Item Rewards	836,{

// --------------------- Config ---------------------
// Package format is "ID1,Count1,ID2,Count2,..."
// GM Access: Level required to open the GM menu.
// GM Delete: Level required to erase entries.
// GM Logging: Level required to manage logs.

	set .GMAccess,60;
	set .GMDelete,80;
	set .GMLogging,99;
	set .PackageCount,3;
	setarray .Package1[0],501,1,502,2,503,3;
	setarray .Package2[0],601,5,602,10;
	setarray .Package3[0],607,10;

// --------------------------------------------------

	if (getgmlevel() >= .GMAccess) goto GM_Menu;
	mes "[Item Rewards]";
	set [email protected],0;
	while ([email protected] < getarraysize($itemreward$)) {
		if (strcharinfo(0) == $itemreward$[[email protected]]) goto GetReward;
		set [email protected], [email protected]+2; }
	mes "You have no rewards pending.";
	close;

GetReward:
	if (((Weight*100)/MaxWeight) > 49) {
		mes "You are over the weight limit."; close; }
	if (!checkweight(5055,getarraysize(getd(".Package"+$itemreward$[[email protected]+1])))) {
		mes "Clear space in your inventory."; close; }
	set [email protected],0;
	while ([email protected] < getarraysize(getd(".Package"+$itemreward$[[email protected]+1]))) {
		getitem getd(".Package"+$itemreward$[[email protected]+1]+"["[email protected]+"]"),getd(".Package"+$itemreward$[[email protected]+1]+"["+([email protected]+1)+"]");
		set [email protected], [email protected]+2; }
	specialeffect2 248;
	deletearray $itemreward$[[email protected]],2;
	mes "Here you go!";
	close;

OnMinute00:
OnMinute30:
	if (!getarraysize($itemreward$)) end;
	set [email protected],0;
	while ([email protected] < getarraysize($itemreward$)) {
		message $itemreward$[[email protected]],"[You have a reward pending.  See the Item Rewards NPC.]";
		sleep 10;
		set [email protected], [email protected]+2; }
	end;

GM_Menu:
	mes "[Item Rewards]";
	mes "What would you like to do?";
	next;
	switch(select(" ~ ^FF55FFPackage information^000000: ~ ^FF55FFList unclaimed rewards^000000: ~ ^00D900Give a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete a reward^000000: ~ "+((getgmlevel()<.GMDelete)?"^777777":"^DE0000")+"Delete all unclaimed rewards^000000: ~ "+((getgmlevel()<.GMLogging)?"^777777":"^55AAFF")+"Manage logs^000000: ~ [Close]")) {
		case 1:
			mes "[Item Rewards]";
			set [email protected],1;
			while (getd(".Package"[email protected])) {
				mes "^660099Package " + [email protected] + ":^000000";
				set [email protected],0;
				while ([email protected] < getarraysize(getd(".Package"[email protected]))) {
					mes " ~ " + getd(".Package"[email protected]+"["+([email protected]+1)+"]") + "x " + getitemname(getd(".Package"[email protected]+"["+([email protected])+"]"));
					set [email protected], [email protected]+2; }
				set [email protected], [email protected]+1; }
			next;
			goto GM_Menu;
		case 2:
			mes "[Item Rewards]";
			mes "Used space: ^F52887" + (getarraysize($itemreward$)/2) + "^000000/64";
			mes "--------------------------------";
			set [email protected],0;
			while ([email protected] < getarraysize($itemreward$)) {
				mes "^B041FF" + $itemreward$[[email protected]] + "^000000: package #" + $itemreward$[[email protected]+1];
				set [email protected], [email protected]+2; }
			next;
			goto GM_Menu;
		case 3:
			mes "[Item Rewards]";
			if (getarraysize($itemreward$) > 127) {
				mes "No more names can be stored.";
				mes "Delete some values and try again.";
				next;
				goto GM_Menu; }
			mes "Input a name, then a package number.";
			input [email protected]$;
				query_sql "SELECT `char_id` FROM `char` WHERE `name` = '"[email protected]$+"'",[email protected];
				if ([email protected]) { mes "The name is invalid."; next; goto GM_Menu; }
					else set [email protected],0;
			input [email protected],1,.PackageCount;
			next;
			mes "[Item Rewards]";
			mes "Player: ^B041FF" + [email protected]$ + "^000000";
			mes "Package: ^B041FF#" + [email protected] + "^000000";
			mes " ";
			mes "Are you sure?";
			if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; }
			setarray $itemreward$[getarraysize($itemreward$)],[email protected]$,[email protected];
			message [email protected]$,"[You have a reward pending.  See the Item Rewards NPC.]";
			if ($itemlog) {
				if (getarraysize($itemlog1$) > 127) {
					deletearray $itemlog1$[0],1;
					deletearray $itemlog2$[0],1; }
				setarray $itemlog1$[getarraysize($itemlog1$)],strcharinfo(0);
				setarray $itemlog2$[getarraysize($itemlog2$)],[email protected]$; }
			mes "Reward added.";
			next;
			goto GM_Menu;
		case 4:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMDelete) {
				mes "You are not permitted to delete entries."; next; goto GM_Menu; }
			mes "Input a name to cancel a reward.";
			input [email protected]$;
			set [email protected],0;
			while ([email protected] < getarraysize($itemreward$)) {
				if ($itemreward$[[email protected]] == [email protected]$) {
					deletearray $itemreward$[[email protected]],2;
					mes "Name cleared."; next; goto GM_Menu; }
				set [email protected], [email protected]+2; }
			mes "The name is invalid.";
			next;
			goto GM_Menu;
		case 5:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMDelete) {
				mes "You are not permitted to delete entries."; next; goto GM_Menu; }
			mes "^FF0000This action cannot be undone.^000000";
			mes "Are you sure?";
			mes " ";
			if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto GM_Menu; }
			deletearray $itemreward$[0],getarraysize($itemreward$);
			mes "All entries cleared.";
			next;
			goto GM_Menu;
		case 6:
		Log_Menu:
			mes "[Item Rewards]";
			if (getgmlevel() < .GMLogging) {
				mes "You are not permitted to manage logs."; next; goto GM_Menu; }
			mes "Logs are currently "+(($itemlog)?"^00D900enabled^000000":"^FF0000disabled^000000")+".";
			next;
			switch(select(" ~ ^55AAFFView Logs^000000: ~ "+((!$itemlog)?"^00D900Enable":"^777777Disable")+" logging^000000: ~ ^DE0000Delete all logs^000000: ~ [Go back]")) {
				case 1:
					mes "[Item Rewards]";
					mes "Used space: ^F52887" + (getarraysize($itemlog1$)) + "^000000/128";
					mes "--------------------------------";
					set [email protected],0;
					while ([email protected] < getarraysize($itemlog1$)) {
						mes "^B041FF" + $itemlog1$[[email protected]] + "^000000: sent to ^55AAFF" + $itemlog2$[[email protected]] + "^000000";
						set [email protected], [email protected]+1; }
					next;
					goto Log_Menu;
				case 2:
					set $itemlog, ((!$itemlog)?1:0);
					goto Log_Menu;
				case 3:
					mes "[Item Rewards]";
					mes "^FF0000This action cannot be undone.^000000";
					mes "Are you sure?";
					mes " ";
					if (select("Yes:No") == 2) { mes "Request cancelled."; next; goto Log_Menu; }
					deletearray $itemlog1$[0],getarraysize($itemlog1$);
					deletearray $itemlog2$[0],getarraysize($itemlog2$);
					mes "Logs cleared.";
					next;
					goto Log_Menu;
				case 4:
					next;
					goto GM_Menu;
			}
		case 7:
			close;
	}
}

or in this site

LINK

 

Credit to Sir Euphy

 

 

thanks a lot mate  /no1

 

 

 

^ ^

Willing to help anytime if i knew how to... ^ ^

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use and Privacy Policy.