Fix bugs: Move Pydisgner and enable him forever (after saving the 1 pt),

fix bugs on wizards, fix bugs on flood (maybe?), fix bugs on siege (global announce)

1 files changed, 81 insertions, 0 deletions

diff --git a/npc/017-1/misc.txt b/npc/017-1/misc.txt
index 1a1009300..3ac1ef089 100644
--- a/npc/017-1/misc.txt
+++ b/npc/017-1/misc.txt
@@ -227,3 +227,84 @@ OnInit:
 }
 
 
+
+
+
+
+
+
+// Whatever event use #RARE_POINTS
+// Which is a script variable, meaning it will be a really special event.
+// Side Note: Might as well add a special cap for such situations.
+017-1,118,83,0	script	Pydisgner#spoints	NPC_GUGLI,{
+    openshop;
+
+OnInit:
+    .sex = G_OTHER;
+    .distance=5;
+
+	tradertype(NST_CUSTOM);
+
+    // Rares
+	sellitem BlacksmithAxe, 64000;
+	sellitem MiereCleaver,  32000;
+	sellitem Kanabo,        13500;
+	sellitem PiouEgg,        8350;
+	sellitem AxeHat,         7000;
+	sellitem Googles,        5000;
+
+    // Uncommon
+	sellitem CrystallizedMaggot, 6000;
+	sellitem Sunglasses,         6000;
+	sellitem BunnyEars,           800;
+	sellitem StrangeCoin,          10;
+
+    // Gamble
+	sellitem SupremeGift,30000;
+	sellitem PrismGift,  11000;
+	sellitem GoldenGift,  4000;
+	sellitem SilverGift,  1500;
+	sellitem BronzeGift,   500;
+	sellitem CasinoCoins,   35;
+
+    // Equipment
+	sellitem WoodenSword,      5500;
+    sellitem Chainmail,        2500;
+    sellitem LeatherShirt,      800;
+    sellitem JeansShorts,       600;
+    sellitem ShortBow,          500;
+    sellitem RoundLeatherShield,200;
+    sellitem WoodenBow,         100;
+    sellitem Dagger,            100;
+
+    // Consumables
+	sellitem TonoriDelight, 80;
+	sellitem Aquada,        60;
+	sellitem Manana,        50;
+	sellitem Cheese,        40;
+	sellitem Plushroom,     15;
+	sellitem Chagashroom,   15;
+
+    // Useful ores and money stuff
+	sellitem IronIngot, 2500;
+    sellitem EmptyBottle, 60;
+    sellitem Arrow,        4;
+    sellitem TolchiArrow,  1;
+	sellitem PiouFeathers, 1;
+
+
+    end;
+
+OnCountFunds:
+	setcurrency(#RARE_POINTS);
+	end;
+
+OnPayFunds:
+    // Due a script bug, you must always retain a point
+	if( #RARE_POINTS <= @price )
+		end;
+    #RARE_POINTS=#RARE_POINTS-@price;
+	purchaseok();
+	end;
+
+}