path: root/npc/001-1/rewards.txt

// TMW2 Script
// Author:
//  Jesusalva
// Description:
//  Trades Strange Coins for useful items

001-1,243,26,0	script	Aeros Trader	NPC_M_COINKEEPER,{
    mesn;
    mesq l("Oh, hello there! Welcome to the Mana Plain Of Existence!");
    next;
    mesn;
    mesq l("In this wonderful realm, you can find and earn many @@, our currency!", getitemlink(StrangeCoin));
    next;
    mesn;
    mesq l("You can then trade these coins for items with me!");
    next;
    openshop;
    closedialog;
    close;

OnInit:
    .@npcId = getnpcid(0, .name$);
    setunitdata(.@npcId, UDT_HEADTOP, TopHat);
    setunitdata(.@npcId, UDT_HEADMIDDLE, GoldenWarlordPlate);
    setunitdata(.@npcId, UDT_WEAPON, JeansChaps);
    setunitdata(.@npcId, UDT_HEADBOTTOM, AssassinBoots);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 25);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 4);

    .sex = G_MALE;
    .distance = 5;

	tradertype(NST_CUSTOM);

	// Rare Equipment selection.
    // *these* are really rare!
	sellitem ThunderStaff,9000;
	sellitem PiouEgg,3915;
	sellitem DeliciousCookie,3240;
    sellitem TopHat, 1620;
    sellitem BowlerHat, 720;
	sellitem AshUrn,630;
	sellitem Googles,540;

    // Temporary, Seasonal, for events, rare drops, next release
	sellitem BlacksmithAxe, 32400;
    sellitem DesertBow, 9000;
    sellitem LeaderWand, 5400;
    sellitem MiereCleaver, 2700;
    sellitem Chainmail, 2700;
    sellitem LeatherShirt, 315;
    sellitem JeansShorts, 270;

    // Awesome Feature, pending quest, DO NOT FORGET, @JESUSALVA
	sellitem IronShovel,180;

    // Temporary, but later may sell rare dyes (eg. purple and... golden?)
    sellitem RedDye, 45;
    sellitem GreenDye, 45;
    sellitem BlueDye, 36;

    // Consumables
	sellitem ElixirOfLife,32;
	sellitem CelestiaTea,18;
	sellitem HastePotion,15;
	sellitem StrengthPotion,15;
	sellitem Grenade,rand(9,14); // I really don't care about the price of this. Used to be 12.
    sellitem CursedArrow,8;
	sellitem Curshroom,6;
	sellitem PetcaringGuide,5; // I needed to add this somewhere
	end;

/* set currency to be item 828 */
OnCountFunds:
	setcurrency(countitem(StrangeCoin));
	end;

/* @price is total cost. @points is if we accept two items as currency. */
OnPayFunds:
	//dispbottom "Hi: price="+@price+" and points="+@points;
	if( countitem(StrangeCoin) < @price )
		end;
	delitem StrangeCoin,@price;
	purchaseok();
	end;

}