prontera,x,y,z	script	Rewards	899,{

//Set the GM Min Level to Give Reward
set .gmlevel,99;
//------------------------------------

	if(getgmlevel() >= .gmlevel) goto GMMenu;
	if(#freerewards == 1) {
	mes "Hi, here's your reward";
	getitem $itemid,$itemamt;
	set #freerewards,0;
	end;
	}
	mes "Sup";
	end;

	GMMenu:
	mes "Do you want to give reward ?";
	switch(select("Yes:No") {
	case 1:
	next;
	mes "Type the ID of the Item";
	input $itemid;
	next;
	mes "So it's ^FF0000"+getitemname($itemid)+"^000000.";
	mes "How many of the amount you want to give ?";
	input $itemamt;
	next;
	mes "So it's "+$itemamt+" of ^FF0000"+getitemname($itemid)+"^000000(s).";
	mes "Are you sure this is right ?";
		switch(select("Yes:No") {
		case 1:
		query_sql "SELECT COUNT(*) FROM `char` WHERE online=1",@onlineplayers;
		query_sql "SELECT `account_id`, `name` FROM `char` WHERE online=1",$@account_id,$@name$;
		for (set @i,0; @i <= @onlineplayers-1; set @i,@i+1) {
		attachrid($@accountid[@i]);
		set #freerewards,1;
		}
		mes "Rewards has successfully given";
		end;

		case 2:
		end;
		}

	case 2:
	end;
	}

}