Changed "coconut" to "croconut" in all files of serverdata.

1 files changed, 80 insertions, 0 deletions

diff --git a/npc/items/Croconut.txt b/npc/items/Croconut.txt
new file mode 100644
index 00000000..c36eb736
--- /dev/null
+++ b/npc/items/Croconut.txt
@@ -0,0 +1,80 @@
+// Evol scripts.
+// Authors:
+//    4144, Reid
+// Description:
+//    Allow to cut a croconut in multiple part.
+//
+//    Multiple choice possible for L_Weapon:
+//    rif(countitem(35xx, 1), l(getitemname("xx"))), l_Weak,
+//    rif(countitem(35yy, 1), l(getitemname("yy"))), l_Good,
+
+
+000-2-1.gat,0,0,0	script	Croconut	0,{
+
+OnCroconut:
+    getitem 513, 1;
+    close;
+
+OnHalfCroconut:
+    getitem 512, 1;
+    close;
+
+OnTwoHalfCroconut:
+    getitem 512, 2;
+    close;
+
+OnUse:
+    mesn "Narrator";
+    mes col(l("Do you want to cut this") + " " + l(getitemname("Croconut")) + "?", 9);
+    next;
+
+    menu
+        l("Yes."), L_Weapon,
+        l("No."), -;
+
+    doevent "Croconut::OnCroconut";
+    close;
+
+L_Weapon:
+    mes "";
+    mesn "Narrator";
+    mes col(l("Which of your weapons do you want to use in order to cut this Croconut?"), 9);
+    next;
+
+    menu
+        rif(countitem(3500, 1), l(getitemname("Knife"))), L_Weak,
+        l("Bare Hands"), -;
+
+L_TooWeak:
+    mes "";
+    mesn "Narrator";
+
+    set @q, rand(5);
+    if (@q == 0) goto L_TooWeakLost;
+    if ( (@q == 1) || (@q == 2) ) goto L_TooWeakFail;
+    if ( (@q == 3) || (@q == 4) || (@q == 5) ) goto L_Weak;
+
+L_TooWeakLost:
+    mes col(l("You hit too hard with your fist, you lost your Croconut."), 9);
+
+    close;
+
+L_TooWeakFail:
+    mes col(l("Your hands are too weak, you didn't open the Croconut."), 9);
+
+    doevent "Croconut::OnCroconut";
+    close;
+
+L_Weak:
+    mes col(l("You opened the Croconut, but only one side is edible."), 9);
+
+    doevent "Croconut::OnHalfCroconut";
+    close;
+
+L_Good:
+    mes col(l("You perfectly cut your Croconut in two ediable parts."), 9);
+
+    doevent "Croconut::OnTwoHalfCroconut";
+    close;
+
+}
\ No newline at end of file