- Standardized script headers, starting with /npc/custom/

http://rathena.org/wiki/Script_header

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@15262 54d463be-8e91-2dee-dedb-b68131a5f0ec

11 files changed, 740 insertions, 737 deletions

diff --git a/npc/custom/eAAC_Scripts/DonationGirl/donate.txt b/npc/custom/eAAC_Scripts/DonationGirl/donate.txt
index dc7c0bb2a..f3d25c6d2 100644
--- a/npc/custom/eAAC_Scripts/DonationGirl/donate.txt
+++ b/npc/custom/eAAC_Scripts/DonationGirl/donate.txt
@@ -1,300 +1,250 @@
-//===== Athena Script =======================================
+//===== rAthena Script =======================================
 //= Donation NPC
-//===== By ==================================================
+//===== By: ==================================================
 //= Josh
-//===== Version =============================================
-//= 1.0	 - First release. Probably contains bugs/security
-//=	   risks.
-//= 1.1  - Added a check for whether the account exists when
-//=	   adding a donator. Need to improve ordering when
-//=	   viewing all donations.
-//= 1.2  - Modified for public use. Added checkweight feature.
-//= 2.0  - Many changes, especially ones I had always wanted
-//=	   to add to this script. Includes reading items from
-//=	   a separate SQL table and more database manipulation
-//=	   options for GMs.
-//= 2.1  - Made few changes including the add/remove items
-//=	   feature.
-//= 3.0  - All strings inputted by a user and user/char names
-//=	   in SQL queries are now escaped. Each item has a
-//=	   price rather than a quantity. This script can work
-//=	   with decimals.
-//= 3.1  - Added quotes to some queries, fixed a variable and
-//=	   removed a comment.
-//= 3.2  - Fixed a problem where rAthena would crash if a
-//=	   query returned NULL.
-//= 3.3  - Optimized query speeds by combining a few select 
-//=	   queries into one. Requires Trunk 7975.
-//= 3.4  - Added MySQL version check. If version < 5.0.8, all
-//=	   queries with CAST are omitted. Use 5.0.8 and up
-//=	   when possible. SQL errors may consequent if GM's
-//=	   input is incorrect. Added logging of claims.
-//=	   "log_npc" in log_athena.conf must be enabled. Logs
-//=	   will appear in the "npclog" table. Claim menu now
-//=	   only shows items that can be afforded.
-//= 3.5  - Minor change to table.
-//= 3.6  - Removed name column in donate_item_db. Added
-//=	   support for item_db2 table.
-//= 3.7  - Added Zeny support. $rate must be set for it to be
-//=	   used. Removed truncate() in a query since rAthena
-//=	   automatically truncates floats to ints.
-//= 3.8  - Fixed problem with menus and null values.
-//= 3.9  - Explicit reset of @aid.
-//= 3.10 - Applied previous fix to other variables and forced
-//=	   dialogue box closure every time database is
-//=	   modified.
-//= 3.11 - Explicit reset of another variable. Fixed typo
-//=	 - with $rate. Added logmes for GM operations.
-//===== Compatible With =====================================
-//= rAthena SQL - any version with the new query_sql command
-//=		  (Trunk 7975 and up).
-//= MySQL - 5.0.8 and up highly recommended but not required.
-//===== Description =========================================
+//===== Current Version: =====================================
+//= 3.11 (changelog at end of file)
+//===== Compatible With: =====================================
+//= rAthena SVN; SQL only, revision 7975+
+//===== Description: =========================================
 //= A script that lets a player claim an item for donating.
 //= Allows a GM to input each donation.
-//===== Comments ============================================
+//===== Comments =============================================
 //= This script uses SQL tables to store variables for the
 //= amount donated by users and the items claimable.
-//===== Installation ========================================
+//===== Installation =========================================
 //= You must import donate.sql and donate_item_db.sql (and
 //= item_db.sql and item_db2.sql, which comes with rAthena)
 //= before using this script.
-//===========================================================
-//= Thanks to Vich for helping me with the SQL syntax.
-//= Thanks to Lance for helping me with the the arrays and 
-//= for implementing query_sql.
-//= Thanks to Skotlex for implementing escape_sql.
-//= Thanks to Toms for implementing the new multi-column 
-//= query_sql command.
-//===========================================================
+//============================================================
 
 prontera,145,179,5	script	Donation Girl	714,{
 
-if (getgmlevel() >= 80) goto L_GM;
+	if (getgmlevel() >= 80) goto L_GM;
 
 L_START:
-mes "[Donation Girl]";
-mes "Hello! I'm the Donation Girl!";
-mes "If you have made a donation,";
-mes "you are entitled to a reward!";
-next;
-menu "More info",-,"Make a claim",L_CHECK,"Statistics",L_STATS;
+	mes "[Donation Girl]";
+	mes "Hello! I'm the Donation Girl!";
+	mes "If you have made a donation,";
+	mes "you are entitled to a reward!";
+	next;
+	menu "More info",-,"Make a claim",L_CHECK,"Statistics",L_STATS;
 L_INFO:
-mes "[Donation Girl]";
-mes "Each month, a lot of money is paid to keep this server running.";
-next;
-mes "[Donation Girl]";
-mes "You can support us by donating any amount of money.";
-next;
-mes "[Donation Girl]";
-mes "To show our appreciation, we will gladly give you a reward.";
-next;
-menu "Continue",L_START,"Cancel",-;
+	mes "[Donation Girl]";
+	mes "Each month, a lot of money is paid to keep this server running.";
+	next;
+	mes "[Donation Girl]";
+	mes "You can support us by donating any amount of money.";
+	next;
+	mes "[Donation Girl]";
+	mes "To show our appreciation, we will gladly give you a reward.";
+	next;
+	menu "Continue",L_START,"Cancel",-;
 
 L_CHECK:
-query_sql "SELECT `amount`,`claimed` FROM `donate` WHERE `account_id` = "+getcharid(3), @amount$, @claimed$;
-query_sql "SELECT "+@amount$+" - "+@claimed$, @value$;
-query_sql "SELECT '"+@value$+"' > 0", @enough;
-if(!@enough) {
-	mes "[Donation Girl]";
-	mes "Sorry, you do not have enough to make a claim.";
-	mes "If you have donated but have not made a claim,";
-	mes "Please give us time to process your donation.";
-	close;
+	query_sql "SELECT `amount`,`claimed` FROM `donate` WHERE `account_id` = "+getcharid(3), @amount$, @claimed$;
+	query_sql "SELECT "+@amount$+" - "+@claimed$, @value$;
+	query_sql "SELECT '"+@value$+"' > 0", @enough;
+	if(!@enough) {
+		mes "[Donation Girl]";
+		mes "Sorry, you do not have enough to make a claim.";
+		mes "If you have donated but have not made a claim,";
+		mes "Please give us time to process your donation.";
+		close;
 	}
 
 L_CLAIM:
-mes "[Donation Girl]";
-mes "Thankyou for donating!";
-mes "You have $"+@value$+" worth of credit!";
-mes "What would you like to claim?";
-next;
-menu "Items",L_CLAIMITEM,"Zeny",L_ZENY;
+	mes "[Donation Girl]";
+	mes "Thankyou for donating!";
+	mes "You have $"+@value$+" worth of credit!";
+	mes "What would you like to claim?";
+	next;
+	menu "Items",L_CLAIMITEM,"Zeny",L_ZENY;
 
 L_CLAIMITEM:
-mes "[Donation Girl]";
-mes "Very well. Which item would you like?";
-next;
-query_sql "SELECT `id` FROM `donate_item_db` WHERE `price` <= "+@value$+" ORDER BY `id`",@name;
-set @menu$, getitemname(@name[0]);
+	mes "[Donation Girl]";
+	mes "Very well. Which item would you like?";
+	next;
+	query_sql "SELECT `id` FROM `donate_item_db` WHERE `price` <= "+@value$+" ORDER BY `id`",@name;
+	set @menu$, getitemname(@name[0]);
 	for(set @i, 1; @i < getarraysize(@name); set @i, @i + 1){
 		set @menu$, @menu$ + ":" + getitemname(@name[@i]);
 	}
 
-set @m, select(@menu$)-1;
+	set @m, select(@menu$)-1;
 
-query_sql "SELECT `price` FROM `donate_item_db` WHERE `id` = "+@name[@m], @price$;
-query_sql "SELECT "+@value$+" / "+@price$, @max;
+	query_sql "SELECT `price` FROM `donate_item_db` WHERE `id` = "+@name[@m], @price$;
+	query_sql "SELECT "+@value$+" / "+@price$, @max;
 
-mes "[Donation Girl]";
-mes getitemname(@name[@m])+"s cost $"+@price$+" each.";
-mes "How many "+getitemname(@name[@m])+"s would you like to claim?";
-mes "Maximum: "+@max+".";
-input @quantity;
-mes "[Donation Girl]";
-if(@quantity>@max) {
-	mes "Sorry, but you do not have enough to claim "+@quantity+" "+getitemname(@name[@m])+"s.";
-	next;
-	goto L_CLAIM;
+	mes "[Donation Girl]";
+	mes getitemname(@name[@m])+"s cost $"+@price$+" each.";
+	mes "How many "+getitemname(@name[@m])+"s would you like to claim?";
+	mes "Maximum: "+@max+".";
+	input @quantity;
+	mes "[Donation Girl]";
+	if(@quantity>@max) {
+		mes "Sorry, but you do not have enough to claim "+@quantity+" "+getitemname(@name[@m])+"s.";
+		next;
+		goto L_CLAIM;
 	}
-if(!@quantity) {
-	mes "You can't have 0 as an amount!";
-	next;
-	goto L_CLAIM;
+	if(!@quantity) {
+		mes "You can't have 0 as an amount!";
+		next;
+		goto L_CLAIM;
 	}
-if(!checkweight(@name[@m],@quantity)) {
-	mes "I'm sorry, but you cannot carry "+@quantity+" "+getitemname(@name[@m])+"s.";
-	next;
-	goto L_CLAIM;
+	if(!checkweight(@name[@m],@quantity)) {
+		mes "I'm sorry, but you cannot carry "+@quantity+" "+getitemname(@name[@m])+"s.";
+		next;
+		goto L_CLAIM;
 	}
-query_sql "SELECT "+@quantity+" * "+@price$, @total$;
-mes "Are you sure you want to claim "+@quantity+" "+getitemname(@name[@m])+"s for $"+@total$+"?";
-next;
-menu "No",L_CLAIM,"Yes",-;
-query_sql "UPDATE `donate` SET `claimed` = `claimed` + "+@total$+" WHERE `account_id` = "+getcharid(3);
-logmes "Claimed "+@quantity+" "+getitemname(@name[@m])+"s";
-getitem @name[@m],@quantity;
-mes "[Donation Girl]";
-mes "Thankyou for donating! We hope you enjoy your gift!";
-close;
+	query_sql "SELECT "+@quantity+" * "+@price$, @total$;
+	mes "Are you sure you want to claim "+@quantity+" "+getitemname(@name[@m])+"s for $"+@total$+"?";
+	next;
+	menu "No",L_CLAIM,"Yes",-;
+	query_sql "UPDATE `donate` SET `claimed` = `claimed` + "+@total$+" WHERE `account_id` = "+getcharid(3);
+	logmes "Claimed "+@quantity+" "+getitemname(@name[@m])+"s";
+	getitem @name[@m],@quantity;
+	mes "[Donation Girl]";
+	mes "Thankyou for donating! We hope you enjoy your gift!";
+	close;
 
 L_ZENY:
-mes "[Donation Girl]";
-if(!$rate) {
-	mes "Sorry, we currently do not allow claiming Zeny.";
-	mes "Please go back and claim an item instead.";
-	next;
-	goto L_CLAIM;
+	mes "[Donation Girl]";
+	if(!$rate) {
+		mes "Sorry, we currently do not allow claiming Zeny.";
+		mes "Please go back and claim an item instead.";
+		next;
+		goto L_CLAIM;
 	}
-query_sql "SELECT "+@value$+" * "+$rate, @maxzeny;
-mes "Very well. You can claim as much as "+@maxzeny+"Z.";
-mes "How much Zeny would you like to claim?";
-input @zeny;
-mes "[Donation Girl]";
-if(@zeny>@maxzeny) {
-	mes "Sorry, but you do not have enough to claim "+@zeny+"Z.";
-	next;
-	goto L_CLAIM;
+	query_sql "SELECT "+@value$+" * "+$rate, @maxzeny;
+	mes "Very well. You can claim as much as "+@maxzeny+"Z.";
+	mes "How much Zeny would you like to claim?";
+	input @zeny;
+	mes "[Donation Girl]";
+	if(@zeny>@maxzeny) {
+		mes "Sorry, but you do not have enough to claim "+@zeny+"Z.";
+		next;
+		goto L_CLAIM;
 	}
-if(!@zeny) {
-	mes "You can't have 0 as an amount!";
-	next;
-	goto L_CLAIM;
+	if(!@zeny) {
+		mes "You can't have 0 as an amount!";
+		next;
+		goto L_CLAIM;
 	}
-set @total, @zeny * $rate;
-mes "Are you sure you want to claim "+@zeny+"Z for $"+@total+"?";
-next;
-menu "No",L_CLAIM,"Yes",-;
-query_sql "UPDATE `donate` SET `claimed` = `claimed` + "+@total+" WHERE `account_id` = "+getcharid(3);
-logmes "Claimed "+@zeny+" zenies";
-set Zeny, Zeny + @zeny;
-mes "[Donation Girl]";
-mes "Thankyou for donating! We hope you enjoy your gift!";
-close;
+	set @total, @zeny * $rate;
+	mes "Are you sure you want to claim "+@zeny+"Z for $"+@total+"?";
+	next;
+	menu "No",L_CLAIM,"Yes",-;
+	query_sql "UPDATE `donate` SET `claimed` = `claimed` + "+@total+" WHERE `account_id` = "+getcharid(3);
+	logmes "Claimed "+@zeny+" zenies";
+	set Zeny, Zeny + @zeny;
+	mes "[Donation Girl]";
+	mes "Thankyou for donating! We hope you enjoy your gift!";
+	close;
 
 L_STATS:
-mes "[Donation Girl]";
-query_sql "SELECT IFNULL((SELECT SUM(amount) FROM `donate`),0)", @total$; 
-mes "Our fund is at a total of $"+@total$;
-next;
-menu "More info",L_INFO,"Make a claim",L_CHECK,"Statistics",L_STATS;
+	mes "[Donation Girl]";
+	query_sql "SELECT IFNULL((SELECT SUM(amount) FROM `donate`),0)", @total$; 
+	mes "Our fund is at a total of $"+@total$;
+	next;
+	menu "More info",L_INFO,"Make a claim",L_CHECK,"Statistics",L_STATS;
 
 L_GM:
-mes "[GM Menu]";
-mes "Hello GM!";
-mes "What would you like to do?";
-next;
-query_sql "SHOW VARIABLES LIKE 'version'", @version, @valule$;
-query_sql "SELECT '"+@valule$+"' >= '5.0.8'", @version;
-menu "Add/Remove Donation",L_GM2,"Add/Remove Items",L_ITEM,"(Re)Set Exchange Rate",L_RATE,"Test Script",L_START;
+	mes "[GM Menu]";
+	mes "Hello GM!";
+	mes "What would you like to do?";
+	next;
+	query_sql "SHOW VARIABLES LIKE 'version'", @version, @valule$;
+	query_sql "SELECT '"+@valule$+"' >= '5.0.8'", @version;
+	menu "Add/Remove Donation",L_GM2,"Add/Remove Items",L_ITEM,"(Re)Set Exchange Rate",L_RATE,"Test Script",L_START;
 
 L_GM2:
-menu "Add a donation",L_DONATE,"Remove a donation",L_REMOVE,"View all donations",L_VIEWALL,"Return to main menu",L_GM;
+	menu "Add a donation",L_DONATE,"Remove a donation",L_REMOVE,"View all donations",L_VIEWALL,"Return to main menu",L_GM;
 
 L_ITEM:
-menu "Add an item",L_NEWITEM,"Remove an item",L_DELITEM,"View all items",L_ALLITEMS,"Return to main menu",L_GM;
+	menu "Add an item",L_NEWITEM,"Remove an item",L_DELITEM,"View all items",L_ALLITEMS,"Return to main menu",L_GM;
 
 L_NEWITEM:
-mes "[GM Menu]";
-mes "Please enter the item name:";
-input @itemname$;
-set @iid, 0;
-query_sql "SELECT `id` FROM `item_db` WHERE `name_english` = '"+escape_sql(@itemname$)+"' || `name_japanese` = '"+escape_sql(@itemname$)+"' UNION SELECT `id` FROM `item_db2` WHERE `name_english` = '"+escape_sql(@itemname$)+"' || `name_japanese` = '"+escape_sql(@itemname$)+"'", @iid;
-if(!@iid) goto L_INONE;
-query_sql "SELECT 1 FROM `donate_item_db` WHERE `id` = "+@iid, @check;
-mes "[GM Menu]";
-mes "Please enter the cost of each "+@itemname$+":";
-input @cost$;
-if(@version) query_sql "SELECT CAST('"+escape_sql(@cost$)+"' AS DECIMAL)", @cost$;
-query_sql "SELECT '"+escape_sql(@cost$)+"' > 0", @valid;
-if(!@valid) goto L_ZERO;
-mes "[GM Menu]";
-mes "You have specified that donators can claim "+@itemname$+"s for $"+@cost$+" each.";
-mes "Would you like to continue?";
-next;
-menu "No",L_ITEM,"Yes",-;
-mes "[GM Menu]";
-if(!@check){
-	query_sql "INSERT INTO `donate_item_db` VALUES ("+@iid+",'"+@cost$+"')";
-	logmes "Added "+@itemname$+"s to list of claimable items";
-	mes "Item added successfully!";
-	} else {
-	mes "Item "+@itemname$+" already exists in the database.";
-	mes "Would you like to replace it?";
+	mes "[GM Menu]";
+	mes "Please enter the item name:";
+	input @itemname$;
+	set @iid, 0;
+	query_sql "SELECT `id` FROM `item_db` WHERE `name_english` = '"+escape_sql(@itemname$)+"' || `name_japanese` = '"+escape_sql(@itemname$)+"' UNION SELECT `id` FROM `item_db2` WHERE `name_english` = '"+escape_sql(@itemname$)+"' || `name_japanese` = '"+escape_sql(@itemname$)+"'", @iid;
+	if(!@iid) goto L_INONE;
+	query_sql "SELECT 1 FROM `donate_item_db` WHERE `id` = "+@iid, @check;
+	mes "[GM Menu]";
+	mes "Please enter the cost of each "+@itemname$+":";
+	input @cost$;
+	if(@version) query_sql "SELECT CAST('"+escape_sql(@cost$)+"' AS DECIMAL)", @cost$;
+	query_sql "SELECT '"+escape_sql(@cost$)+"' > 0", @valid;
+	if(!@valid) goto L_ZERO;
+	mes "[GM Menu]";
+	mes "You have specified that donators can claim "+@itemname$+"s for $"+@cost$+" each.";
+	mes "Would you like to continue?";
 	next;
 	menu "No",L_ITEM,"Yes",-;
-	query_sql "REPLACE INTO `donate_item_db` VALUES ("+@iid+",'"+@cost$+"')";
-	logmes "Changed the price of "+@itemname$+"s";
 	mes "[GM Menu]";
-	mes "Item replaced successfully!";
+	if(!@check){
+		query_sql "INSERT INTO `donate_item_db` VALUES ("+@iid+",'"+@cost$+"')";
+		logmes "Added "+@itemname$+"s to list of claimable items";
+		mes "Item added successfully!";
+	} else {
+		mes "Item "+@itemname$+" already exists in the database.";
+		mes "Would you like to replace it?";
+		next;
+		menu "No",L_ITEM,"Yes",-;
+		query_sql "REPLACE INTO `donate_item_db` VALUES ("+@iid+",'"+@cost$+"')";
+		logmes "Changed the price of "+@itemname$+"s";
+		mes "[GM Menu]";
+		mes "Item replaced successfully!";
 	}
-close;
+	close;
 
 L_INONE:
-mes "[GM Menu]";
-mes "Item "+@itemname$+" does not exist.";
-next;
-goto L_ITEM;
+	mes "[GM Menu]";
+	mes "Item "+@itemname$+" does not exist.";
+	next;
+	goto L_ITEM;
 
 L_DELITEM:
-mes "[GM Menu]";
-mes "Please enter the item name:";
-input @itemname$;
-set @iid, 0;
-query_sql "SELECT `donate_item_db`.`id` FROM `donate_item_db` LEFT JOIN `item_db` ON `donate_item_db`.`id` = `item_db`.`id` LEFT JOIN `item_db2` ON `donate_item_db`.`id` = `item_db2`.`id` WHERE `item_db`.`name_english` = '"+escape_sql(@itemname$)+"' || `item_db`.`name_japanese` = '"+escape_sql(@itemname$)+"' || `item_db2`.`name_english` = '"+escape_sql(@itemname$)+"' || `item_db2`.`name_japanese` = '"+escape_sql(@itemname$)+"'", @iid;
-if(!@iid) goto L_INONE;
-next;
-mes "[GM Menu]";
-mes "You have specified to delete "+@itemname$+" from the database.";
-mes "Would you like to continue?";
-next;
-menu "No",L_ITEM,"Yes",-;
-query_sql "DELETE FROM `donate_item_db` WHERE `id` = "+@iid;
-logmes "Deleted "+@itemname$+"s from list of claimable items";
-mes "[GM Menu]";
-mes "Item deleted successfully!";
-close;
+	mes "[GM Menu]";
+	mes "Please enter the item name:";
+	input @itemname$;
+	set @iid, 0;
+	query_sql "SELECT `donate_item_db`.`id` FROM `donate_item_db` LEFT JOIN `item_db` ON `donate_item_db`.`id` = `item_db`.`id` LEFT JOIN `item_db2` ON `donate_item_db`.`id` = `item_db2`.`id` WHERE `item_db`.`name_english` = '"+escape_sql(@itemname$)+"' || `item_db`.`name_japanese` = '"+escape_sql(@itemname$)+"' || `item_db2`.`name_english` = '"+escape_sql(@itemname$)+"' || `item_db2`.`name_japanese` = '"+escape_sql(@itemname$)+"'", @iid;
+	if(!@iid) goto L_INONE;
+	next;
+	mes "[GM Menu]";
+	mes "You have specified to delete "+@itemname$+" from the database.";
+	mes "Would you like to continue?";
+	next;
+	menu "No",L_ITEM,"Yes",-;
+	query_sql "DELETE FROM `donate_item_db` WHERE `id` = "+@iid;
+	logmes "Deleted "+@itemname$+"s from list of claimable items";
+	mes "[GM Menu]";
+	mes "Item deleted successfully!";
+	close;
 
 L_ALLITEMS:
-mes "[GM Menu]";
-query_sql "SELECT `id`,`price` FROM `donate_item_db` ORDER BY `id`", @items, @itemamount$;
-for(set @i, 0; @i < getarraysize(@items); set @i, @i + 1){
+	mes "[GM Menu]";
+	query_sql "SELECT `id`,`price` FROM `donate_item_db` ORDER BY `id`", @items, @itemamount$;
+	for(set @i, 0; @i < getarraysize(@items); set @i, @i + 1){
 		mes getitemname(@items[@i])+" - $"+@itemamount$[@i];
 	}
-next;
-goto L_GM;
+	next;
+	goto L_GM;
 
 L_DONATE:
-mes "[GM Menu]";
-mes "Please enter the donator's username:";
-input @donator$;
-set @aid, 0;
-query_sql "SELECT `account_id` FROM `login` WHERE `userid` = '"+escape_sql(@donator$)+"'", @aid;
-if(!@aid) goto L_NONE;
-set @donated$, "";
-query_sql "SELECT `amount` FROM `donate` WHERE `account_id` = "+@aid, @donated$;
-query_sql "SELECT '"+@donated$+"' > 0", @donated;
-switch(@donated) {
+	mes "[GM Menu]";
+	mes "Please enter the donator's username:";
+	input @donator$;
+	set @aid, 0;
+	query_sql "SELECT `account_id` FROM `login` WHERE `userid` = '"+escape_sql(@donator$)+"'", @aid;
+	if(!@aid) goto L_NONE;
+	set @donated$, "";
+	query_sql "SELECT `amount` FROM `donate` WHERE `account_id` = "+@aid, @donated$;
+	query_sql "SELECT '"+@donated$+"' > 0", @donated;
+	switch(@donated) {
 	case 0:
 		mes @donator$+" has not donated before.";
 		break;
@@ -302,19 +252,19 @@ switch(@donated) {
 		mes @donator$+" has donated $"+@donated$+".";
 		break;
 	}
-next;
-mes "[GM Menu]";
-mes "Please enter the amount donated by "+@donator$;
-input @donating$;
-if(@version) query_sql "SELECT CAST('"+escape_sql(@donating$)+"' AS DECIMAL)", @donating$;
-query_sql "SELECT '"+escape_sql(@donating$)+"' > 0", @valid;
-if(!@valid) goto L_ZERO;
-mes "[GM Menu]";
-mes "You have specified that "+@donator$+" has donated $"+@donating$+".";
-mes "Would you like to continue?";
-next;
-menu "No",L_GM,"Yes",-;
-switch(@donated) {
+	next;
+	mes "[GM Menu]";
+	mes "Please enter the amount donated by "+@donator$;
+	input @donating$;
+	if(@version) query_sql "SELECT CAST('"+escape_sql(@donating$)+"' AS DECIMAL)", @donating$;
+	query_sql "SELECT '"+escape_sql(@donating$)+"' > 0", @valid;
+	if(!@valid) goto L_ZERO;
+	mes "[GM Menu]";
+	mes "You have specified that "+@donator$+" has donated $"+@donating$+".";
+	mes "Would you like to continue?";
+	next;
+	menu "No",L_GM,"Yes",-;
+	switch(@donated) {
 	case 0:
 		query_sql "INSERT INTO `donate` VALUES ("+@aid+", '"+@donating$+"', 0)";
 		break;
@@ -322,44 +272,44 @@ switch(@donated) {
 		query_sql "UPDATE `donate` SET `amount` = `amount` + "+@donating$+" WHERE `account_id` = "+@aid;
 		break;
 	}
-logmes "Credited "+@donator$+" with $"+@donating$;
-query_sql "SELECT `amount` FROM `donate` WHERE `account_id` = "+@aid, @newdonated$;
-mes "[GM Menu]";
-mes "Donation added successfully!";
-mes @donator$+" has donated a total of $"+@newdonated$;
-close;
+	logmes "Credited "+@donator$+" with $"+@donating$;
+	query_sql "SELECT `amount` FROM `donate` WHERE `account_id` = "+@aid, @newdonated$;
+	mes "[GM Menu]";
+	mes "Donation added successfully!";
+	mes @donator$+" has donated a total of $"+@newdonated$;
+	close;
 
 L_ZERO:
-mes "[GM Menu]";
-mes "You can't have 0 as an amount!";
-next;
-goto L_GM;
+	mes "[GM Menu]";
+	mes "You can't have 0 as an amount!";
+	next;
+	goto L_GM;
 
 L_NONE:
-mes "[GM Menu]";
-mes "Account name "+@donator$+" does not exist.";
-next;
-goto L_GM;
+	mes "[GM Menu]";
+	mes "Account name "+@donator$+" does not exist.";
+	next;
+	goto L_GM;
 
 L_REMOVE:
-mes "[GM Menu]";
-mes "Please enter the donator's username:";
-input @donator$;
-set @aid, 0;
-query_sql "SELECT `account_id` FROM `login` WHERE `userid` = '"+escape_sql(@donator$)+"'", @aid;
-if(!@aid) goto L_NONE;
-query_sql "SELECT `amount` FROM `donate` WHERE `account_id` = "+@aid, @donated$;
-query_sql "SELECT '"+@donated$+"' > 0", @donated;
-mes "[GM Menu]";
-if(!@donated) {
-	query_sql "DELETE FROM `donate` WHERE `account_id` = "+@aid;
-	logmes "Deleted "+@donator$+" from donation database";
-	mes @donator$+" is not a donator and has been deleted from the donation database.";
+	mes "[GM Menu]";
+	mes "Please enter the donator's username:";
+	input @donator$;
+	set @aid, 0;
+	query_sql "SELECT `account_id` FROM `login` WHERE `userid` = '"+escape_sql(@donator$)+"'", @aid;
+	if(!@aid) goto L_NONE;
+	query_sql "SELECT `amount` FROM `donate` WHERE `account_id` = "+@aid, @donated$;
+	query_sql "SELECT '"+@donated$+"' > 0", @donated;
+	mes "[GM Menu]";
+	if(!@donated) {
+		query_sql "DELETE FROM `donate` WHERE `account_id` = "+@aid;
+		logmes "Deleted "+@donator$+" from donation database";
+		mes @donator$+" is not a donator and has been deleted from the donation database.";
 	} else {
-	mes @donator$+" has donated $"+@donated$+".";
-	next;
-	switch(select("Deduct an amount from "+@donator$,"Remove "+@donator$+" from the donation database")){
-		mes "[GM Menu]";
+		mes @donator$+" has donated $"+@donated$+".";
+		next;
+		switch(select("Deduct an amount from "+@donator$,"Remove "+@donator$+" from the donation database")){
+			mes "[GM Menu]";
 		case 1:
 			mes "Please enter the amount "+@donator$+" is to be deducted by:";
 			input @deduct$;
@@ -390,27 +340,76 @@ if(!@donated) {
 			break;
 		}
 	}
-close;
+	close;
 
 L_VIEWALL:
-mes "[GM Menu]";
-query_sql "SELECT `account_id`,`amount` FROM `donate` ORDER BY `amount` DESC", @donatoraid, @donatedamount$;
-for(set @i, 0; @i < getarraysize(@donatoraid); set @i, @i + 1){
-	query_sql "SELECT `userid` FROM `login` WHERE `account_id` = "+@donatoraid[@i], @donateruserid$;
-	for(set @j, 0; @j < getarraysize(@donateruserid$); set @j, @j + 1){
-		mes @donateruserid$[@j]+" - "+@donatedamount$[@i];
+	mes "[GM Menu]";
+	query_sql "SELECT `account_id`,`amount` FROM `donate` ORDER BY `amount` DESC", @donatoraid, @donatedamount$;
+	for(set @i, 0; @i < getarraysize(@donatoraid); set @i, @i + 1){
+		query_sql "SELECT `userid` FROM `login` WHERE `account_id` = "+@donatoraid[@i], @donateruserid$;
+		for(set @j, 0; @j < getarraysize(@donateruserid$); set @j, @j + 1){
+			mes @donateruserid$[@j]+" - "+@donatedamount$[@i];
+		}
 	}
-}
-next;
-goto L_GM;
+	next;
+	goto L_GM;
 
 L_RATE:
-mes "[GM Menu]";
-if($rate) mes "$1 is currently worth "+$rate+"Z.";
-mes "How much Zeny is $1 worth?";
-input $rate;
-mes "[GM Menu]";
-mes "The value of $1 successfully changed to "+$rate+"Z.";
-next;
-goto L_GM;
+	mes "[GM Menu]";
+	if($rate) mes "$1 is currently worth "+$rate+"Z.";
+	mes "How much Zeny is $1 worth?";
+	input $rate;
+	mes "[GM Menu]";
+	mes "The value of $1 successfully changed to "+$rate+"Z.";
+	next;
+	goto L_GM;
 }
+
+//===== Additional Comments: =================================
+//= 1.0  - First release. Probably contains bugs/security risks.
+//= 1.1  - Added a check for whether the account exists when
+//=        adding a donator. Need to improve ordering when
+//=        viewing all donations.
+//= 1.2  - Modified for public use. Added checkweight feature.
+//= 2.0  - Many changes, especially ones I had always wanted
+//=        to add to this script. Includes reading items from
+//=        a separate SQL table and more database manipulation
+//=        options for GMs.
+//= 2.1  - Made few changes including the add/remove items feature.
+//= 3.0  - All strings inputted by a user and user/char names
+//=        in SQL queries are now escaped. Each item has a
+//=        price rather than a quantity. This script can work
+//=        with decimals.
+//= 3.1  - Added quotes to some queries, fixed a variable and
+//=        removed a comment.
+//= 3.2  - Fixed a problem where rAthena would crash if a
+//=        query returned NULL.
+//= 3.3  - Optimized query speeds by combining a few select 
+//=        queries into one. Requires Trunk 7975.
+//= 3.4  - Added MySQL version check. If version < 5.0.8, all
+//=        queries with CAST are omitted. Use 5.0.8 and up
+//=        when possible. SQL errors may consequent if GM's
+//=        input is incorrect. Added logging of claims.
+//=        "log_npc" in log_athena.conf must be enabled. Logs
+//=        will appear in the "npclog" table. Claim menu now
+//=        only shows items that can be afforded.
+//= 3.5  - Minor change to table.
+//= 3.6  - Removed name column in donate_item_db. Added
+//=        support for item_db2 table.
+//= 3.7  - Added Zeny support. $rate must be set for it to be
+//=        used. Removed truncate() in a query since rAthena
+//=        automatically truncates floats to ints.
+//= 3.8  - Fixed problem with menus and null values.
+//= 3.9  - Explicit reset of @aid.
+//= 3.10 - Applied previous fix to other variables and forced
+//=        dialogue box closure every time database is modified.
+//= 3.11 - Explicit reset of another variable. Fixed typo
+//=      - with $rate. Added logmes for GM operations.
+//============================================================
+//= Thanks to Vich for helping me with the SQL syntax.
+//= Thanks to Lance for helping me with the the arrays and 
+//= for implementing query_sql.
+//= Thanks to Skotlex for implementing escape_sql.
+//= Thanks to Toms for implementing the new multi-column 
+//= query_sql command.
+//============================================================
diff --git a/npc/custom/eAAC_Scripts/DonationGirl/sql/donate.sql b/npc/custom/eAAC_Scripts/DonationGirl/sql/donate.sql
index 6838297bc..b820e2605 100644
--- a/npc/custom/eAAC_Scripts/DonationGirl/sql/donate.sql
+++ b/npc/custom/eAAC_Scripts/DonationGirl/sql/donate.sql
@@ -1,6 +1,6 @@
 CREATE TABLE `donate` (
-  `account_id` int(11) unsigned NOT NULL,
-  `amount` float(9,2) unsigned NOT NULL,
-  `claimed` float(9,2) unsigned NOT NULL,
+  `account_id` INT(11) UNSIGNED NOT NULL,
+  `amount` FLOAT(9,2) UNSIGNED NOT NULL,
+  `claimed` FLOAT(9,2) UNSIGNED NOT NULL,
   PRIMARY KEY  (`account_id`)
-) TYPE=MyISAM;
\ No newline at end of file
+) TYPE=MYISAM;
diff --git a/npc/custom/eAAC_Scripts/DonationGirl/sql/donate_item_db.sql b/npc/custom/eAAC_Scripts/DonationGirl/sql/donate_item_db.sql
index 2b3caf104..54b4895b3 100644
--- a/npc/custom/eAAC_Scripts/DonationGirl/sql/donate_item_db.sql
+++ b/npc/custom/eAAC_Scripts/DonationGirl/sql/donate_item_db.sql
@@ -1,8 +1,8 @@
 CREATE TABLE `donate_item_db` (
-  `id` smallint(5) unsigned NOT NULL default '0',
-  `price` float(9,2) unsigned NOT NULL,
+  `id` SMALLINT(5) UNSIGNED NOT NULL DEFAULT '0',
+  `price` FLOAT(9,2) UNSIGNED NOT NULL,
   PRIMARY KEY  (`id`)
-) TYPE=MyISAM;
+) TYPE=MYISAM;
 
 #(ID,Price);
 REPLACE INTO `donate_item_db` VALUES (601,0.06); #Wing_Of_Fly
@@ -10,4 +10,4 @@ REPLACE INTO `donate_item_db` VALUES (602,0.33); #Wing_Of_Butterfly
 REPLACE INTO `donate_item_db` VALUES (603,10); #Old_Blue_Box
 REPLACE INTO `donate_item_db` VALUES (604,0.05); #Branch_Of_Dead_Tree
 REPLACE INTO `donate_item_db` VALUES (605,2); #Anodyne
-REPLACE INTO `donate_item_db` VALUES (606,2); #Aloebera
\ No newline at end of file
+REPLACE INTO `donate_item_db` VALUES (606,2); #Aloebera
diff --git a/npc/custom/eAAC_Scripts/Kafra_Express_files.conf b/npc/custom/eAAC_Scripts/Kafra_Express_files.conf
index 1364e7479..96c5823df 100644
--- a/npc/custom/eAAC_Scripts/Kafra_Express_files.conf
+++ b/npc/custom/eAAC_Scripts/Kafra_Express_files.conf
@@ -1,5 +1,5 @@
 //|-----------------------------------------------------------------|
-//|-	English Athena Approved Certified Script: Kafra Express Set	 -|
+//|-  English Athena Approved Certified Script: Kafra Express Set  -|
 //|-----------------------------------------------------------------|
 //|
 //| The configuration file.
@@ -26,4 +26,4 @@ npc: npc/custom/eAAC_Scripts/kafraExpress/ke_warp_town.txt
 npc: npc/custom/eAAC_Scripts/kafraExpress/ke_warp_woe.txt
 
 //| For more info referring this script, open the provided readme.txt in this folder.
-//| Copyright © 2004 - 2006 Skotlex. All Rights Reserved for him (this is almost a trademark =X)
\ No newline at end of file
+//| Copyright © 2004 - 2006 Skotlex. All Rights Reserved for him (this is almost a trademark =X)
diff --git a/npc/custom/eAAC_Scripts/banker.txt b/npc/custom/eAAC_Scripts/banker.txt
index 5d46cd00b..f9111098f 100644
--- a/npc/custom/eAAC_Scripts/banker.txt
+++ b/npc/custom/eAAC_Scripts/banker.txt
@@ -1,40 +1,40 @@
 //| ~~~~~~~~~~~ Information ~~~~~~~~~~~~~
-//| | This is a simple banking npc,	|
-//| | instead of using those global	|
-//| | variables :P			|
-//| |					|
-//| | It's fully customizable, you	|
-//| | can exchange the coin ID used	|
-//| | at will, it won't affect the	|
-//| | script whatsoever =3		|
-//| |					|
-//| | The prices can also be set, the	|
-//| | way you like the most, as they	|
-//| | won't affect the script either	|
-//| |					|
-//| | No db/client files modification	|
-//| | needed, just "Plug&Play" ;P	|
+//| | This is a simple banking npc,     |
+//| | instead of using those global     |
+//| | variables :P                      |
+//| |                                   |
+//| | It's fully customizable, you      |
+//| | can exchange the coin ID used     |
+//| | at will, it won't affect the      |
+//| | script whatsoever =3              |
+//| |                                   |
+//| | The prices can also be set, the   |
+//| | way you like the most, as they    |
+//| | won't affect the script either    |
+//| |                                   |
+//| | No db/client files modification   |
+//| | needed, just "Plug&Play" ;P       |
 //| ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
-
+//|
 //| Revision:
 //| v.1.0: Released script. No problems or bugs found, at least :P
-//| 	It's your duty to find them now if there are.
-//|	@minvalue must contain the coin price of the lowest coin value
-//|	in order for the script to work correctly. By default it's set
-//|	to the bronze coin
-
+//|        It's your duty to find them now if there are.
+//|        @minvalue must contain the coin price of the lowest coin value
+//|        in order for the script to work correctly. By default it's set
+//|        to the bronze coin
+//|
 //| Revision:
 //| v.2.0: Added a Mix option in the Zeny to Coin function,
-//| 	where it allows you to split your desired Zeny into
-//| 	the coins you wish to obtain, without having to go 
-//| 	through the other functions to obtain them all. That way
-//|	you can get them all at once ;3
+//|        where it allows you to split your desired Zeny into
+//|        the coins you wish to obtain, without having to go 
+//|        through the other functions to obtain them all. That way
+//|     you can get them all at once ;3
+//|
+//|     It also displays the total zeny being exchanged,
+//|     the total coins obtained and the difference between
+//|     the amount of zeny you've inputted and the sum of
+//|      the coin's values.
 //|
-//|	It also displays the total zeny being exchanged,
-//|	the total coins obtained and the difference between
-//|	the amount of zeny you've inputted and the sum of
-//| 	the coin's values.
-
 //| Revision:
 //| v.2.5: Replaced all the coin names with a variable that has
 //|   getitemname(<coin_id), for more customization of the script.
@@ -49,33 +49,33 @@
 
 //| Revision:
 //| v.2.6: Added another Weight check to prevent coins from dropping
-//| 	to the ground because A) Too many coins (more than 30,000 ea)
-//| 	B) Your current weight + total coins weight were greater than
-//| 	your max weight, causing them to drop due to "over-weight".
-//|		Thanks to Niktout for spotting it.
+//|        to the ground because A) Too many coins (more than 30,000 ea)
+//|        B) Your current weight + total coins weight were greater than
+//|        your max weight, causing them to drop due to "over-weight".
+//|        Thanks to Niktout for spotting it.
 
 //| Revision:
 //| v.2.7: Added a check to the Zeny -> Coin Mix label. It seems you
-//|		can trade with negative zeny (meh...). This should prevent it.
-//|		Thanks to Niktout.
+//|        can trade with negative zeny (meh...). This should prevent it.
+//|        Thanks to Niktout.
 
 //| Revision:
 //| v.2.8: Added a n00b check for the Zeny -> Coin function. Should
-//| 	prevent zeny overflow. Also added a variable cleaning section
-//| 	at the beginning of the Mix function, to prevent old values
-//| 	to be used as a payout.
+//|        prevent zeny overflow. Also added a variable cleaning section
+//|        at the beginning of the Mix function, to prevent old values
+//|        to be used as a payout.
 
 //| Revision:
 //| v.2.8.1 Removed the 'conflicting' switch with variables as case options,
-//|	and moved the color names to the function, so now it executes once.
-//|	Did other optimizations and cleanups all around the code. Meh.
+//|         and moved the color names to the function, so now it executes once.
+//|         Did other optimizations and cleanups all around the code. Meh.
 
 //| Upcomming possible updates:
 //| v.3.0: Adding a refining system, so you can gather ore and the likes
-//| 	to make your own coins. They will have a failure chance
-//| 	of course. You will need, for now: 10 ores of the type of 
-//| 	coin you wish, a mini furnace, an anvil depending on what
-//|	You're crafting, and a hammer according to it.
+//|        to make your own coins. They will have a failure chance
+//|        of course. You will need, for now: 10 ores of the type of 
+//|        coin you wish, a mini furnace, an anvil depending on what
+//|        You're crafting, and a hammer according to it.
 
 //| Copyright © 2006-2007 erKURITA. All Rights Reserved
 
@@ -420,4 +420,4 @@ prontera,155,188,3	script	Zacariath Madhat	872,{
 	OnInit:
 		setitemscript 671,"{}";
 		end;
-}
\ No newline at end of file
+}
diff --git a/npc/custom/eAAC_Scripts/kafraExpress/Changelog.txt b/npc/custom/eAAC_Scripts/kafraExpress/Changelog.txt
index f75b01837..2f9555f1d 100644
--- a/npc/custom/eAAC_Scripts/kafraExpress/Changelog.txt
+++ b/npc/custom/eAAC_Scripts/kafraExpress/Changelog.txt
@@ -480,4 +480,4 @@
 * Broadcast Module v1.7
 - Expanded to include new PvP rooms
 
--- Too old to remember :P
\ No newline at end of file
+-- Too old to remember :P
diff --git a/npc/custom/eAAC_Scripts/kafraExpress/ke_bank.txt b/npc/custom/eAAC_Scripts/kafraExpress/ke_bank.txt
index 2f240b2df..d5a4093cb 100644
--- a/npc/custom/eAAC_Scripts/kafraExpress/ke_bank.txt
+++ b/npc/custom/eAAC_Scripts/kafraExpress/ke_bank.txt
@@ -177,4 +177,3 @@ function	SF_calcInterest {
 }	//SF end
 
 }
-
diff --git a/npc/custom/eAAC_Scripts/messageboards.txt b/npc/custom/eAAC_Scripts/messageboards.txt
index 7dae78cfc..c6c59edcb 100644
--- a/npc/custom/eAAC_Scripts/messageboards.txt
+++ b/npc/custom/eAAC_Scripts/messageboards.txt
@@ -1,421 +1,433 @@
+//===== rAthena Script =======================================
+//= Message Man
+//===== By: ==================================================
+//= Vicious
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= a message board where you can post and read messages
+//===== Additional Comments: =================================
+//= 
+//============================================================
+
 geffen,122,102,4	script	Message Man	774,{
-mes "[Robert]";
-mes "Hello, I am here to serve you. Enjoy my service. ^_-";
-next;
-mes "[Robert]";
-mes "Please keep in mind, that all messages are wiped once every two days";
-mes "-Msg From Creator- In new version this will be set able, look forward to this! -End Msg From Creator-";
-next;
+	mes "[Robert]";
+	mes "Hello, I am here to serve you. Enjoy my service. ^_-";
+	next;
+	mes "[Robert]";
+	mes "Please keep in mind, that all messages are wiped once every two days";
+	mes "-Msg From Creator- In new version this will be set able, look forward to this! -End Msg From Creator-";
+	next;
 L_Menu01:
-mes "[Robert]";
-mes "What would you like to do??";
-next;
-if((getgmlevel() >= 90)) menu "Public board",L_pubgmmenu,"Gm Board",L_gmmenu,"Close Public Board",L_clospub,"Open Public Board",L_openpub;
-if(($messagepubclose == 1)) goto L_pubclosed;
-menu "Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave;
+	mes "[Robert]";
+	mes "What would you like to do??";
+	next;
+	if((getgmlevel() >= 90)) menu "Public board",L_pubgmmenu,"Gm Board",L_gmmenu,"Close Public Board",L_clospub,"Open Public Board",L_openpub;
+	if(($messagepubclose == 1)) goto L_pubclosed;
+	menu "Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave;
 L_pubgmmenu:
-if(($messagepubclose == 1)) goto L_pubclosed;
-menu "Re-set the rotation",L_setrot,"Reset Message",L_Clearmsgs,"Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave;
+	if(($messagepubclose == 1)) goto L_pubclosed;
+	menu "Re-set the rotation",L_setrot,"Reset Message",L_Clearmsgs,"Read messages!",L_readmsg,"Post a message!",L_Postmsg,"Leave",L_leave;
 L_gmmenu:
-menu "Read messages!",L_gmboardread,"Post a Message!",L_gmboardpost,"Reset Messages",L_gmboardreset;
+	menu "Read messages!",L_gmboardread,"Post a Message!",L_gmboardpost,"Reset Messages",L_gmboardreset;
 
 L_openpub:
-mes "[Robert]";
-mes "Are you sure?";
-menu "Yes",-,"No",L_openpubn;
-mes "[Robert]";
-mes "It is done.";
-close2;
-set $messagepubclose,0;
-end;
+	mes "[Robert]";
+	mes "Are you sure?";
+	menu "Yes",-,"No",L_openpubn;
+	mes "[Robert]";
+	mes "It is done.";
+	close2;
+	set $messagepubclose,0;
+	end;
 
 L_openpubn:
-mes "[Robert]";
-mes "Very well it shall remain closed.";
-close;
+	mes "[Robert]";
+	mes "Very well it shall remain closed.";
+	close;
 
 L_pubclosed:
-mes "[Robert]";
-mes "Im sorry. The public boards are currently Closed.";
-close;
+	mes "[Robert]";
+	mes "Im sorry. The public boards are currently Closed.";
+	close;
 
 L_clospub:
-mes "[Robert]";
-mes "Are you sure?";
-next;
-menu "Yes.",-,"No",L_closepubn;
-mes "[Robert]";
-mes "Very well I will not allow anyone into the public board.";
-close2;
-set $messagepubclose,1;
-end;
+	mes "[Robert]";
+	mes "Are you sure?";
+	next;
+	menu "Yes.",-,"No",L_closepubn;
+	mes "[Robert]";
+	mes "Very well I will not allow anyone into the public board.";
+	close2;
+	set $messagepubclose,1;
+	end;
 
 L_closepubn:
-mes "[Robert]";
-mes "Have a nice day";
-close;
+	mes "[Robert]";
+	mes "Have a nice day";
+	close;
 
 L_gmboardreset:
-mes "[Robert]";
-mes "This will require atleast 2 GM's approval to reset the gm board.";
-mes "-Msg From Creator- This is bugged same gm can vote twice. Planned to revise in next version. -End Msg From Creator-";
-next;
-menu "Vote for reset.",L_gmboardresetvote,"Back to main.",L_Menu01,"Leave.",L_leave;
+	mes "[Robert]";
+	mes "This will require atleast 2 GM's approval to reset the gm board.";
+	mes "-Msg From Creator- This is bugged same gm can vote twice. Planned to revise in next version. -End Msg From Creator-";
+	next;
+	menu "Vote for reset.",L_gmboardresetvote,"Back to main.",L_Menu01,"Leave.",L_leave;
 
 L_gmboardresetvote:
-callfunc "F_gmresetcheck";
-set @tempid,getcharid(0);
-set $gmboardresetvotenumb,$gmboardresetvotenumb+1;
-set $gmboardresetvoted[$gmboardresetvotenumb],1;
-set $gmboardresetvoteid[$gmboardresetvotenumb],@tempid;
-set @tempid,0;
-set $gmboardreset,$gmboardreset-1;
-mes "[Robert]";
-mes "Thank you.";
-next;
-if(($gmboardreset == 0)) goto L_gmresetdone;
-if(($gmboardreset >= 1)) goto L_gmresetnotdone;
-close;
+	callfunc "F_gmresetcheck";
+	set @tempid,getcharid(0);
+	set $gmboardresetvotenumb,$gmboardresetvotenumb+1;
+	set $gmboardresetvoted[$gmboardresetvotenumb],1;
+	set $gmboardresetvoteid[$gmboardresetvotenumb],@tempid;
+	set @tempid,0;
+	set $gmboardreset,$gmboardreset-1;
+	mes "[Robert]";
+	mes "Thank you.";
+	next;
+	if(($gmboardreset == 0)) goto L_gmresetdone;
+	if(($gmboardreset >= 1)) goto L_gmresetnotdone;
+	close;
 
 L_gmresetdone:
-deletearray $gmmessageboardpost$[1],$gmmessageboardpostnumber;
-deletearray $gmmessageboardpostdate$[1],$gmmessageboardpostnumber;
-deletearray $gmmessageboardpostname$[1],$gmmessageboardpostnumber;
-deletearray $gmmessageboardeditdate$[1],$gmmessageboardpostnumber;
-deletearray $gmboardresetvoted[1],$gmboardresetvotenumber;
-deletearray $gmboardresetvoted[1],$gmboardresetvotenumber;
-deletearray $gmboardresetvoteid[1],$gmboardresetvotenumber;
-set $gmboardresetvotenumber,0;
-set $gmboardreset,2;
-mes "[Robert]";
-mes "The reset has been done.";
-close;
+	deletearray $gmmessageboardpost$[1],$gmmessageboardpostnumber;
+	deletearray $gmmessageboardpostdate$[1],$gmmessageboardpostnumber;
+	deletearray $gmmessageboardpostname$[1],$gmmessageboardpostnumber;
+	deletearray $gmmessageboardeditdate$[1],$gmmessageboardpostnumber;
+	deletearray $gmboardresetvoted[1],$gmboardresetvotenumber;
+	deletearray $gmboardresetvoted[1],$gmboardresetvotenumber;
+	deletearray $gmboardresetvoteid[1],$gmboardresetvotenumber;
+	set $gmboardresetvotenumber,0;
+	set $gmboardreset,2;
+	mes "[Robert]";
+	mes "The reset has been done.";
+	close;
 
 L_gmresetnotdone:
-mes "[Robert]";
-mes "There needs to be "+$gmboardreset+" more gm(s) approval to do the reset.";
-close;
+	mes "[Robert]";
+	mes "There needs to be "+$gmboardreset+" more gm(s) approval to do the reset.";
+	close;
 
 L_gmboardread:
-if(($gmmessageboardpostnumber == 0)) goto L_msgno;
-callfunc "F_gmmessage";
-end;
+	if(($gmmessageboardpostnumber == 0)) goto L_msgno;
+	callfunc "F_gmmessage";
+	end;
 
 L_gmboardpost:
-if(($gmmessageboardpostnumber >= 127)) goto L_postmsgyestm;
-set @gmmessageboardpostername$,strcharinfo(0);
-set @gmmessageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21);
-set $gmmessageboardpostnumber,$gmmessageboardpostnumber+1;
-input @gmmsgboardmsgt$;
-set $gmmessageboardpost$[$gmmessageboardpostnumber],@gmmsgboardmsgt$;
-set $gmmessageboardpostdate$[$gmmessageboardpostnumber],@gmmessageboarddate$;
-set $gmmessageboardpostname$[$gmmessageboardpostnumber],@gmmessageboardpostername$;
-mes "[Robert]";
-mes "Here is what your message looks like";
-next;
-mes "Posted by: "+$gmmessageboardpostname$[$gmmessageboardpostnumber]+".";
-mes "On: "+$gmmessageboardpostdate$[$gmmessageboardpostnumber]+".";
-mes $gmmessageboardpost$[$gmmessageboardpostnumber];
-close;
+	if(($gmmessageboardpostnumber >= 127)) goto L_postmsgyestm;
+	set @gmmessageboardpostername$,strcharinfo(0);
+	set @gmmessageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21);
+	set $gmmessageboardpostnumber,$gmmessageboardpostnumber+1;
+	input @gmmsgboardmsgt$;
+	set $gmmessageboardpost$[$gmmessageboardpostnumber],@gmmsgboardmsgt$;
+	set $gmmessageboardpostdate$[$gmmessageboardpostnumber],@gmmessageboarddate$;
+	set $gmmessageboardpostname$[$gmmessageboardpostnumber],@gmmessageboardpostername$;
+	mes "[Robert]";
+	mes "Here is what your message looks like";
+	next;
+	mes "Posted by: "+$gmmessageboardpostname$[$gmmessageboardpostnumber]+".";
+	mes "On: "+$gmmessageboardpostdate$[$gmmessageboardpostnumber]+".";
+	mes $gmmessageboardpost$[$gmmessageboardpostnumber];
+	close;
 
 
 L_setrot:
-set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages.
-if(($@determinedayrotation == 0)) set $rotation,0;
-if(($@determinedayrotation == 1)) set $rotation,1;
-if(($@determinedayrotation == 2)) set $rotation,0;
-if(($@determinedayrotation == 3)) set $rotation,1;
-if(($@determinedayrotation == 4)) set $rotation,0;
-if(($@determinedayrotation == 5)) set $rotation,1;
-if(($@determinedayrotation == 6)) set $rotation,0;
-mes "It is done.";
-close;
+	set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages.
+	if(($@determinedayrotation == 0)) set $rotation,0;
+	if(($@determinedayrotation == 1)) set $rotation,1;
+	if(($@determinedayrotation == 2)) set $rotation,0;
+	if(($@determinedayrotation == 3)) set $rotation,1;
+	if(($@determinedayrotation == 4)) set $rotation,0;
+	if(($@determinedayrotation == 5)) set $rotation,1;
+	if(($@determinedayrotation == 6)) set $rotation,0;
+	mes "It is done.";
+	close;
 
 L_Clearmsgs:
-mes "[Robert]";
-mes "Are you sure?";
-next;
-menu "Yes",L_clearmsgsy,"No thanks.",L_Menu01;
+	mes "[Robert]";
+	mes "Are you sure?";
+	next;
+	menu "Yes",L_clearmsgsy,"No thanks.",L_Menu01;
 
 L_clearmsgsy:
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $messageboardeditdate$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-mes "[Robert]";
-mes "It is done.";
-close;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $messageboardeditdate$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	mes "[Robert]";
+	mes "It is done.";
+	close;
 
 L_leave:
-close;
+	close;
 
 L_Postmsg:
-mes "[Robert]";
-mes "What do you want to say in your message?";
-next;
-set @msgboardmsgt$,0;
-input @msgboardmsgt$;
-mes "[Robert]";
-mes "are you sure this is the message you want?";
-mes @msgboardmsgt$;
-next;
-menu "Yes!",L_postmsgyes,"No let me re-do it!",L_Postmsg,"Ive changed my mind let me leave.",lleave;
+	mes "[Robert]";
+	mes "What do you want to say in your message?";
+	next;
+	set @msgboardmsgt$,0;
+	input @msgboardmsgt$;
+	mes "[Robert]";
+	mes "are you sure this is the message you want?";
+	mes @msgboardmsgt$;
+	next;
+	menu "Yes!",L_postmsgyes,"No let me re-do it!",L_Postmsg,"Ive changed my mind let me leave.",lleave;
 
 L_postmsgyes:
-if(($messageboardpostnumber >= 127)) goto L_postmsgyestm;
-set @messageboardpostername$,strcharinfo(0);
-set @messageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21);
-set $messageboardpostnumber,$messageboardpostnumber+1;
-set @mymessage2,$messageboardpostnumber;
-set $mymessage[$messageboardpostnumber],5;
-set $messageboardpost$[$messageboardpostnumber],@msgboardmsgt$;
-set $messageboardpostdate$[$messageboardpostnumber],@messageboarddate$;
-set $messageboardpostname$[$messageboardpostnumber],@messageboardpostername$;
-mes "[Robert]";
-mes "here is what your message looks like";
-next;
-mes "Posted by: "+$messageboardpostname$[$messageboardpostnumber]+".";
-mes "On: "+$messageboardpostdate$[$messageboardpostnumber]+".";
-mes $messageboardpost$[$messageboardpostnumber];
-close;
+	if(($messageboardpostnumber >= 127)) goto L_postmsgyestm;
+	set @messageboardpostername$,strcharinfo(0);
+	set @messageboarddate$,gettimestr("%Y-%m/%d %H:%M:%S",21);
+	set $messageboardpostnumber,$messageboardpostnumber+1;
+	set @mymessage2,$messageboardpostnumber;
+	set $mymessage[$messageboardpostnumber],5;
+	set $messageboardpost$[$messageboardpostnumber],@msgboardmsgt$;
+	set $messageboardpostdate$[$messageboardpostnumber],@messageboarddate$;
+	set $messageboardpostname$[$messageboardpostnumber],@messageboardpostername$;
+	mes "[Robert]";
+	mes "here is what your message looks like";
+	next;
+	mes "Posted by: "+$messageboardpostname$[$messageboardpostnumber]+".";
+	mes "On: "+$messageboardpostdate$[$messageboardpostnumber]+".";
+	mes $messageboardpost$[$messageboardpostnumber];
+	close;
 
 L_postmsgyestm:
-set @mesboardmsgt$,0;
-mes "[Robert]";
-mes "Im sorry your going to have to wait till more space opens up for messages, it should be in 1 or 2 days =)";
-close;
+	set @mesboardmsgt$,0;
+	mes "[Robert]";
+	mes "Im sorry your going to have to wait till more space opens up for messages, it should be in 1 or 2 days =)";
+	close;
 
 lleave:
-deletearray $messageboardpost$[@tempview],@tempview;
-deletearray $messageboardpostname$[@tempview],@tempview;
-deletearray $messageboardpostdate$[@tempview],@tempview;
-deletearray $mymessage[@tempview],@tempview;
-set $messageboardpostnumber,$messageboardpostnumber-1;
-set @msgboardmsgt$,0;
-close;
+	deletearray $messageboardpost$[@tempview],@tempview;
+	deletearray $messageboardpostname$[@tempview],@tempview;
+	deletearray $messageboardpostdate$[@tempview],@tempview;
+	deletearray $mymessage[@tempview],@tempview;
+	set $messageboardpostnumber,$messageboardpostnumber-1;
+	set @msgboardmsgt$,0;
+	close;
 
 L_readmsg:
-if(($messageboardpostnumber == 0)) goto L_msgno;
-callfunc "F_message";
-end;
+	if(($messageboardpostnumber == 0)) goto L_msgno;
+	callfunc "F_message";
+	end;
 
 L_msgno:
-mes "[Robert]";
-mes "There are currently no messages.";
-close;
+	mes "[Robert]";
+	mes "There are currently no messages.";
+	close;
 
 OnInit:
-set $gmboardreset,2;
-set $gmboardresetvotenumb,0;
-end;
+	set $gmboardreset,2;
+	set $gmboardresetvotenumb,0;
+	end;
 
 OnInterIfInitOnce:
-set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages.
-if(($@determinedayrotation == 0)) set $rotation,0;
-if(($@determinedayrotation == 1)) set $rotation,1;
-if(($@determinedayrotation == 2)) set $rotation,0;
-if(($@determinedayrotation == 3)) set $rotation,1;
-if(($@determinedayrotation == 4)) set $rotation,0;
-if(($@determinedayrotation == 5)) set $rotation,1;
-if(($@determinedayrotation == 6)) set $rotation,0;
-end;
+	set $@determinedayrotation,gettime(4); //this determines the day rotation for clearing messages.
+	if(($@determinedayrotation == 0)) set $rotation,0;
+	if(($@determinedayrotation == 1)) set $rotation,1;
+	if(($@determinedayrotation == 2)) set $rotation,0;
+	if(($@determinedayrotation == 3)) set $rotation,1;
+	if(($@determinedayrotation == 4)) set $rotation,0;
+	if(($@determinedayrotation == 5)) set $rotation,1;
+	if(($@determinedayrotation == 6)) set $rotation,0;
+	end;
 
 
 OnSun1200:
-if(($rotation == 1)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 1)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	end;
 
 OnSat1200:
-if(($rotation == 0)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 0)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	end;
 
 OnMon1200:
-if(($rotation == 1)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 1)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	end;
 
 OnTue1200:
-if(($rotation == 0)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 0)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	end;
 
 OnWed1200:
-if(($rotation == 1)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 1)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	end;
 
 OnThu1200:
-if(($rotation == 0)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[1],$messageboardpostnumber;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 0)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[1],$messageboardpostnumber;
+	set $messageboardpostnumber,0;
+	end;
 
 OnFri1200:
-if(($rotation == 1)) end;
-deletearray $messageboardpost$[1],$messageboardpostnumber;
-deletearray $messageboardpostdate$[1],$messageboardpostnumber;
-deletearray $messageboardpostname$[1],$messageboardpostnumber;
-deletearray $mymessage[@tempview],@tempview;
-set $messageboardpostnumber,0;
-end;
+	if(($rotation == 1)) end;
+	deletearray $messageboardpost$[1],$messageboardpostnumber;
+	deletearray $messageboardpostdate$[1],$messageboardpostnumber;
+	deletearray $messageboardpostname$[1],$messageboardpostnumber;
+	deletearray $mymessage[@tempview],@tempview;
+	set $messageboardpostnumber,0;
+	end;
 }
 
 function	script	F_gmresetcheck	{
-set @tempcheck,0;
+	set @tempcheck,0;
 L_top:
-set @tempcheck,@tempcheck+1;
-if(($gmboardresetvoted[@tempview] == 1)) goto L_votecheck;
-if(($gmboardresetvoted[@tempview] == 0)) return;
-goto L_top;
-end;
-
+	set @tempcheck,@tempcheck+1;
+	if(($gmboardresetvoted[@tempview] == 1)) goto L_votecheck;
+	if(($gmboardresetvoted[@tempview] == 0)) return;
+	goto L_top;
+	end;
 L_votecheck:
-set @tempcheckid,0;
-set @tempcheckid,getcharid(0);
-if(($gmboardresetvoteid[@tempview] != @tempcheckid)) goto L_top;
-if(($gmboardresetvoteid[@tempview] == @tempcheckid)) goto L_voted;
-end;
+	set @tempcheckid,0;
+	set @tempcheckid,getcharid(0);
+	if(($gmboardresetvoteid[@tempview] != @tempcheckid)) goto L_top;
+	if(($gmboardresetvoteid[@tempview] == @tempcheckid)) goto L_voted;
+	end;
 }
 
 function	script	F_gmmessage	{
-set @tempview,0;
+	set @tempview,0;
 L_top:
-set @tempview,@tempview+1;
-mes "Posted By: "+$gmmessageboardpostname$[@tempview]+".";
-mes "On: "+$gmmessageboardpostdate$[@tempview]+".";
-mes $gmmessageboardpost$[@tempview]+".";
-menu "Next Message",L_top2;
-
+	set @tempview,@tempview+1;
+	mes "Posted By: "+$gmmessageboardpostname$[@tempview]+".";
+	mes "On: "+$gmmessageboardpostdate$[@tempview]+".";
+	mes $gmmessageboardpost$[@tempview]+".";
+	menu "Next Message",L_top2;
 L_top2:
-if(($gmmessageboardpostnumber > @tempview)) goto L_top;
-close;
+	if(($gmmessageboardpostnumber > @tempview)) goto L_top;
+	close;
 }
 
 function	script	F_message	{
-set @tempview,0;
+	set @tempview,0;
 L_top:
-set @tempview,@tempview+1;
-mes "Posted By: "+$messageboardpostname$[@tempview]+".";
-mes "On: "+$messageboardpostdate$[@tempview]+".";
-mes $messageboardpost$[@tempview]+".";
-next;
-if(($mymessage[@tempview] == 5) && (getgmlevel()>0)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy,"Delete This message",L_Del;
-if((getgmlevel()>0))  menu "Next Message",L_top2,"Delete This message",L_Del;
-if(($mymessage[@tempview] == 5)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy;
-menu "Next message",L_top2;
-close;
+	set @tempview,@tempview+1;
+	mes "Posted By: "+$messageboardpostname$[@tempview]+".";
+	mes "On: "+$messageboardpostdate$[@tempview]+".";
+	mes $messageboardpost$[@tempview]+".";
+	next;
+	if(($mymessage[@tempview] == 5) && (getgmlevel()>0)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy,"Delete This message",L_Del;
+	if((getgmlevel()>0))  menu "Next Message",L_top2,"Delete This message",L_Del;
+	if(($mymessage[@tempview] == 5)) menu "Next Message",L_top2,"Delete My Message",L_delmy,"Edit my message",L_editmy;
+	menu "Next message",L_top2;
+	close;
 
 L_editmy:
-mes "Are you sure?";
-next;
-menu "Yes",L_editmyy,"No",L_editmyn;
+	mes "Are you sure?";
+	next;
+	menu "Yes",L_editmyy,"No",L_editmyn;
 
 L_editmyy:
-mes "what do you want your new message to be?";
-next;
-mes "Current message!";
-mes $messageboardpost$[@tempview];
-set @tempeditmsg$,0;
-input @tempeditmsg$;
-next;
-mes "is this what you want?";
-mes @tempeditmsg$;
-next;
-menu "Yes!",L_editmyyy,"No.",L_editmyyn;
+	mes "what do you want your new message to be?";
+	next;
+	mes "Current message!";
+	mes $messageboardpost$[@tempview];
+	set @tempeditmsg$,0;
+	input @tempeditmsg$;
+	next;
+	mes "is this what you want?";
+	mes @tempeditmsg$;
+	next;
+	menu "Yes!",L_editmyyy,"No.",L_editmyyn;
 
 L_editmyyy:
-deletearray $messageboardpost$[@tempview],@tempview;
-set $messageboardpost$[@tempview],@tempeditmsg$;
-mes "Here is what your new message looks like.";
-next;
-mes "Posted By: "+$messageboardpostname$[@tempview]+".";
-mes "On: "+$messageboardpostdate$[@tempview]+".";
-mes $messageboardpost$[@tempview]+".";
-close2;
-set @tempview,0;
-end;
+	deletearray $messageboardpost$[@tempview],@tempview;
+	set $messageboardpost$[@tempview],@tempeditmsg$;
+	mes "Here is what your new message looks like.";
+	next;
+	mes "Posted By: "+$messageboardpostname$[@tempview]+".";
+	mes "On: "+$messageboardpostdate$[@tempview]+".";
+	mes $messageboardpost$[@tempview]+".";
+	close2;
+	set @tempview,0;
+	end;
 
 L_editmyn:
-Mes "So be it.";
-set @tempview,0;
-close;
+	Mes "So be it.";
+	set @tempview,0;
+	close;
 
 L_editmyyn:
-mes "So be it!";
-set @tempeditmsg$,0;
-set @tempview,0;
-close;
+	mes "So be it!";
+	set @tempeditmsg$,0;
+	set @tempview,0;
+	close;
 
 L_delmy:
-mes "Are you sure...?";
-next;
-menu "Yes",L_delmyy,"No thanks.",L_delmyn;
+	mes "Are you sure...?";
+	next;
+	menu "Yes",L_delmyy,"No thanks.",L_delmyn;
 
 L_delmyy:
-deletearray $messageboardpost$[@tempview],@tempview;
-deletearray $messageboardpostname$[@tempview],@tempview;
-deletearray $messageboardpostdate$[@tempview],@tempview;
-deletearray $mymessage[@tempview],@tempview;
-deletearray $messageboardeditdate$[@tempview],@tempview;
-set $messageboardpostnumber,$messageboardpostnumber-1;
-set @tempview,0;
-mes "It is done.";
-close;
+	deletearray $messageboardpost$[@tempview],@tempview;
+	deletearray $messageboardpostname$[@tempview],@tempview;
+	deletearray $messageboardpostdate$[@tempview],@tempview;
+	deletearray $mymessage[@tempview],@tempview;
+	deletearray $messageboardeditdate$[@tempview],@tempview;
+	set $messageboardpostnumber,$messageboardpostnumber-1;
+	set @tempview,0;
+	mes "It is done.";
+	close;
 
 L_delmyn:
-mes "Come back soon.";
-set @tempview,0;
-close;
+	mes "Come back soon.";
+	set @tempview,0;
+	close;
 
 L_top2:
-if(($messageboardpostnumber > @tempview)) goto L_top;
-close;
+	if(($messageboardpostnumber > @tempview)) goto L_top;
+	close;
 
 L_Del:
-mes "Are you sure?";
-next;
-menu "Yes",L_Dely,"No",L_Deln;
+	mes "Are you sure?";
+	next;
+	menu "Yes",L_Dely,"No",L_Deln;
 
 L_Dely:
-deletearray $messageboardpost$[@tempview],@tempview;
-deletearray $messageboardpostname$[@tempview],@tempview;
-deletearray $messageboardpostdate$[@tempview],@tempview;
-deletearray $mymessage[@tempview],@tempview;
-deletearray $messageboardeditdate$[@tempview],@tempview; 
-set $messageboardpostnumber,$messageboardpostnumber-1;
-mes "It is done.";
-set @tempview,0;
-close;
+	deletearray $messageboardpost$[@tempview],@tempview;
+	deletearray $messageboardpostname$[@tempview],@tempview;
+	deletearray $messageboardpostdate$[@tempview],@tempview;
+	deletearray $mymessage[@tempview],@tempview;
+	deletearray $messageboardeditdate$[@tempview],@tempview; 
+	set $messageboardpostnumber,$messageboardpostnumber-1;
+	mes "It is done.";
+	set @tempview,0;
+	close;
 
 L_Deln:
-mes "Come back soon!";
-set @tempview,0;
-close;
-}
\ No newline at end of file
+	mes "Come back soon!";
+	set @tempview,0;
+	close;
+}
diff --git a/npc/custom/eAAC_Scripts/quest_warper.txt b/npc/custom/eAAC_Scripts/quest_warper.txt
index 427fff850..a9947ee3f 100644
--- a/npc/custom/eAAC_Scripts/quest_warper.txt
+++ b/npc/custom/eAAC_Scripts/quest_warper.txt
@@ -1,12 +1,11 @@
 //===== rAthena Script ============================================
 //= Quest Warper Script
 //===== By: =======================================================
-//= Old Warper 2 by Darkchild - Remade with quest format by DZeroX
-//= Huge Rewrite by Neouni
+//= DZeroX, Darkchild, Neouni
 //===== Current Version: ==========================================
 //= 2.2
 //===== Compatible With: ==========================================
-//= Any rAthena Version
+//= rAthena SVN
 //===== Description: ==============================================
 //= Warper that works only after locations are unlocked
 //===== Additional Comments: ======================================
diff --git a/npc/custom/eAAC_Scripts/roll_a_dice.txt b/npc/custom/eAAC_Scripts/roll_a_dice.txt
index 0f1fdf81b..4ba8fc827 100644
--- a/npc/custom/eAAC_Scripts/roll_a_dice.txt
+++ b/npc/custom/eAAC_Scripts/roll_a_dice.txt
@@ -1,23 +1,26 @@
-//==========================================================
-//Roll a Dice  NPC
-//==========================================================
-//Made by birkiczd
-//==========================================================
-//This game lets you and the Dicer throw 3 dices.
-//Whoever get's a higher number (the player or dealer) wins.
-//==========================================================
-//Version:1.0 - made script public
-//        1.1 - fixed a few bugs,added dice emos =)
-//        1.2 - made variables for the amount of zenys for 
-//	          each bet so it is easy for people to costumize 
-//              the script
-//	    1.3 - added more emoticons,made an Info menu 
-//		    option which contains explanations and rules,
-//		    added the amount of lost/won zeny on the end 
-//		    of each game,added more colors
-//	    1.4 - some small code optimization thanks to Myzter             
-//==========================================================
-
+//===== rAthena Script =======================================
+//= Roll a Dice
+//===== By: ==================================================
+//= birkiczd
+//===== Current Version: =====================================
+//= 1.4
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= This game lets you and the Dicer throw 3 dices.
+//= Whoever get's a higher number (the player or dealer) wins.
+//===== Additional Comments: =================================
+// 1.0 - made script public
+// 1.1 - fixed a few bugs,added dice emos =)
+// 1.2 - made variables for the amount of zenys for 
+//       each bet so it is easy for people to costumize 
+//       the script
+// 1.3 - added more emoticons,made an Info menu 
+//       option which contains explanations and rules, 
+//       added the amount of lost/won zeny on the end 
+//       of each game,added more colors
+// 1.4 - some small code optimization thanks to Myzter
+//============================================================
 
 cmd_in02,181,98,2	script	Dicer	57,{
 
@@ -239,6 +242,4 @@ L_againa:
 	mes "Would you like to play again?";
 	next;
 	menu "Yes",L_play,"No",L_go;
-
- 
 }
diff --git a/npc/custom/eAAC_Scripts/vendmachine.txt b/npc/custom/eAAC_Scripts/vendmachine.txt
index bbd7602c6..17371ef9d 100644
--- a/npc/custom/eAAC_Scripts/vendmachine.txt
+++ b/npc/custom/eAAC_Scripts/vendmachine.txt
@@ -1,35 +1,33 @@
-//=====================================
-// Vending Machine Script
-// v2.4
-//=====================================
-// by Celestria
-//=====================================
-// Changelog:
-// 2.4 - Made optimizations according to suggestions made by erKURITA. Script is now significantly shorter.
-//
-// 2.3 - Added in "Slam" feature, as well as admin ability to turn machine on and off.
-// - Added admin menu. Allows GMs to put machines in/out of service, and to clear
-// all jammed items.
-//
-// 2.2 - Added in/Renamed some variables to allow a single machine to block on several
-// items simultaneously. This fix also allows the two-item drop to work with every
-// item the machine is jammed on.
-//
-// 2.1 - Fixed an error where if one machine jammed on a menu item (say 3 for example),
-// if another machine also jammed on the same menu item (3 in this case), the original
-// machine to jam would be unjammed.
-// - This fix only allows a machine to jam one item at a time. Will fix in the future.
-//
-// 2.0 - Completely redid the script using a call-function.
-// Now all replica scripts can simply be a copy of Vending Machine,
-// but with variables modified to suit it''s intended use.
-//
-// 1.1 - Fixed $jamplayer1 not being a string, thanks to Terces.
-// - Changed random number that intiates jam to 1, to allow for faster modification of jam rates.
-//
-// 1.0 - Creted a script for selling numerous items that would occasionally jam on players.
-// - Used numbered variables to allow for multiplacation of the script.
-//=====================================
+//===== rAthena Script =======================================
+//= Vending Machine
+//===== By: ==================================================
+//= Celestria
+//===== Current Version: =====================================
+//= 2.4
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= sells items to players; occasionally the machine will "jam" :P
+//===== Additional Comments: =================================
+//= 1.0 - Creted a script for selling numerous items that would occasionally jam on players.
+//=     - Used numbered variables to allow for multiplacation of the script.
+//= 1.1 - Fixed $jamplayer1 not being a string, thanks to Terces.
+//=     - Changed random number that intiates jam to 1, to allow for faster modification of jam rates.
+//= 2.0 - Completely redid the script using a call-function.
+//=       Now all replica scripts can simply be a copy of Vending Machine,
+//=       but with variables modified to suit it''s intended use.
+//= 2.1 - Fixed an error where if one machine jammed on a menu item (say 3 for example),
+//=       if another machine also jammed on the same menu item (3 in this case), the original
+//=       machine to jam would be unjammed.
+//=     - This fix only allows a machine to jam one item at a time. Will fix in the future.
+//= 2.2 - Added in/Renamed some variables to allow a single machine to block on several
+//=       items simultaneously. This fix also allows the two-item drop to work with every
+//=       item the machine is jammed on.
+//= 2.3 - Added in "Slam" feature, as well as admin ability to turn machine on and off.
+//=     - Added admin menu. Allows GMs to put machines in/out of service, and to clear
+//=       all jammed items.
+//= 2.4 - Made optimizations according to suggestions made by erKURITA. Script is now significantly shorter.
+//============================================================
 
 p_track01,45,58,4	script	Vending Machine#1	910,{
 
@@ -70,10 +68,6 @@ p_track01,45,58,4	script	Vending Machine#1	910,{
 
 
 
-
-
-
-
 //===============================================================================================
 // Functions
 //
@@ -173,7 +167,6 @@ function	script	F_Vend2	{
 		goto B_Buy;
 
 
-
 B_Cancel:
 	mes "On second thoughts, you decide not to buy anything.";
 	close;
@@ -247,4 +240,4 @@ R_Item:
 		close;}
 	mes "The machine shakes, but nothing happens";
 	close;
-}
\ No newline at end of file
+}