prontera,143,173,6	script	KVM Logistic Officer#a	4_F_KHALITZBURG,{
	if (countitem(War_Badge)) {
		.@pointstoadd = countitem(War_Badge);
		delitem 7773,.@pointstoadd;
		kvm_point += .@pointstoadd;
		mes("[Logistics]");
		mesf("Are those %ss I see?", getitemname(7773));
		mes("We no longer accept that currency,\r"
			"but I can exchange those for you.");
		mesf("So you have %d %ss?", .@pointstoadd, getitemname(7773));
		mesf("Alright, all set, you now have ^580080%d^000000 KVM Points.", kvm_point);
		next;
	}
	if (checkweight(Knife,1) == 0) {
		mes("- Wait a minute !! -");
		mes("- Currently you're carrying -");
		mes("- too many items with you. -");
		mes("- Please try again -");
		mes("- after you loose some weight. -");
		close;
	}
	mes("[Logistics]");
	mes("Hello?");
	mes("I am in charge of distributing\r"
		"reward items for KVM points. Any\r"
		"wrong selection of items will not\r"
		"be reversed. Please be carefull.");
	mes("Select the next step please.");
	next;
	.@name$ = strcharinfo(PC_NAME);
	switch(select("Purchase KVM Items.", "Confirm KVM Points.", "Explanation of KVM Rewards.", "Explanation of KVM Points.")) {
	case 1:
		mes("[Logistics]");
		mes("Wich items do you want to see? As\r"
			"for the detailed specification of\r"
			"the items, please refer to the\r"
			"^3131FFCatalogue^000000.");
		next;
		switch(select("Weapon", "Armor/Accessory", "Mass-Production Armor/Accessory", "Popularized Armor/Accessory")) {
		case 1:
			mes("[Logistics]");
			mes("You have selected the Weapon Category.");
			mes("Please select a sub-category.");
			next;
			switch(select("Dagger/Sword/Spear", "Staff/Mace/Axe/Shuriken", "Bow/Katar/Instrument/Whip", "Book/Knuckle", "Revolver/Rifle/Gun/Grenade Launcher")) {
			case 1:
				openshop("weapon1"); // Dagger/Sword/Spear
				end;
			case 2:
				openshop("weapon2"); // Staff/Mace/Axe/Shuriken
				end;
			case 3:
				openshop("weapon3"); // Bow/Katar/Instrument/Whip
				end;
			case 4:
				openshop("weapon4"); // Book/Knuckle
				end;
			case 5:
				openshop("weapon5"); // Revolver/Rifle/Gun/Grenade Launcher
				end;
			}
		case 2:
			openshop("armor1"); // Armor/Accessory
			end;
		case 3:
			openshop("armor2"); // Mass-Production Armor/Accessory
			end;
		case 4:
			openshop("armor3"); // Popularized Armor/Accessory
			end;
		}
	case 2:
		mes("[Logistics]");
		mesf("%s, your current points are ^580080%d^000000 KVM Points.", .@name$, kvm_point);
		close;
	case 3:
		mes("[Logistics]");
		mes("There are 3 categories in KVM Rewards: Weapon/Armor.Accessory.");
		next;
		mes("[Logistics]");
		mes("Weapon rewards require 2,000 KVM points for each.");
		mes("There are 3 types of Armor rewards and they require 840/630/580 KVM points fo each.");
		mes("Accessory rewards require 1,200 KVM points for each.");
		next;
		mes("[Logistics]");
		mes("Kreiger Weapons are LV 4 Weapons, they can be upgraded and will have special effects: Slaughter, Destruction and Blessing.");
		next;
		mes("[Logistics]");
		mes("When you can wear all 3 armors, you can have a special set of options.");
		mes("Also, when Kreiger Accessory rewards are worn with medalsm it will bring you special set rewards.");
		next;
		mes("[Logistics]");
		mes("Finally, there are Mass-Production Armor and Accessory rewards.");
		mes("Players whose Lvl is higher than 60 can equip Mass-Production Armors and there is a Lvl limit for Popularized Armor as well.");
		close;
	case 4:
		mes("[Logistics]");
		mes("KVM Points are rewarded when you win, lose or draw in Tierra - Triple Infierno.");
		mes("You can have special Rewards by using these points.");
		close;
	}
	end;
}

-	trader	weapon1	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 13042,2000;
	sellitem 13416,2000;
	sellitem 13417,2000;
	sellitem 13418,2000;
	sellitem 1187,2000;
	sellitem 1426,2000;
	sellitem 1486,2000;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	weapon2	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 2002,2000;
	sellitem 1640,2000;
	sellitem 1641,2000;
	sellitem 1546,2000;
	sellitem 1310,2000;
	sellitem 1382,2000;
	sellitem 13307,2000;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	weapon3	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 1743,2000;
	sellitem 1281,2000;
	sellitem 1282,2000;
	sellitem 1927,2000;
	sellitem 1981,2000;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	weapon4	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 1576,2000;
	sellitem 1577,2000;
	sellitem 1826,2000;
	sellitem 1827,2000;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	weapon5	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 13110,2000;
	sellitem 13176,2000;
	sellitem 13177,2000;
	sellitem 13178,2000;
	sellitem 13179,2000;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	armor1	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 2394,840;
	sellitem 2549,630;
	sellitem 2444,580;
	sellitem 2772,1200;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	armor2	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 2395,120;
	sellitem 2445,70;
	sellitem 2773,200;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
-	trader	armor3	-,{
	OnInit:
	tradertype(NST_CUSTOM);
	sellitem 2396,15;
	sellitem 2446,10;
	sellitem 2774,30;
	end;

	OnPayFunds:
		if( kvm_point < @price-@points ) end;
		kvm_point -= @price-@points;
		purchaseok();
		end;

	OnCountFunds:
		setcurrency(kvm_point);
		end;
}
