Remove Alige quest

1 files changed, 2 insertions, 175 deletions

diff --git a/npc/002-1/alige.txt b/npc/002-1/alige.txt
index 665f1ef9e..a24252030 100644
--- a/npc/002-1/alige.txt
+++ b/npc/002-1/alige.txt
@@ -1,56 +1,8 @@
 // TMW2 Scripts.
-// Evol scripts.
 // Authors:
-//    Ablu
-//    Alige
-//    Qwerty Dragon
-//    Reid
-//    Vasily_Makarov
 //    Jesusalva
 // Description:
 //    Stowaway hidden in a ship's hole.
-// 2 bits array:
-//    ShipQuests
-// Variable:
-//    ShipQuests_Alige
-// Values:
-//    0   Never talk.
-//    1   First talk.
-//    2   Accept the task.
-//    3   Bring first food.
-
-002-1,45,27,0	script	AligeTrigger	NPC_HIDDEN,1,1,{
-
-OnTouch:
-    if (getareausers() <= 1)
-    {
-        setnpcdir "Alige", 2;
-        stopnpctimer;
-        initnpctimer;
-    }
-
-    if (getq(ShipQuests_Alige) > 0) close;
-    doevent "Alige::OnFirstEncounter";
-
-    close;
-
-OnUnTouch:
-    if (getareausers() == 0)
-    {
-        setnpcdir "Alige", 4;
-        stopnpctimer;
-        initnpctimer;
-    }
-    close;
-
-OnTimer190:
-    stopnpctimer;
-
-    if (getnpcdir("Alige") == 2) setnpcdir "Alige", 6;
-    if (getnpcdir("Alige") == 4) setnpcdir "Alige", 8;
-
-    end;
-}
 
 002-1,45,26,0	script	Alige	NPC_ALIGE,{
     .@q = getq(ShipQuests_Alige);
@@ -120,7 +72,6 @@ L_ExplainHiding:
     next;
     restorecam;
 
-    if (getq(ShipQuests_Alige) == 2) goto L_SoAskForFood;
     goto L_Accept;
 
 L_AboutReward:
@@ -133,7 +84,7 @@ L_AboutReward:
 
 L_Accept:
     menu
-        l("Understood, I will help you."), L_FirstAccepted,
+        //l("Understood, I will help you."), L_FirstAccepted,
         l("What is Artis?"), L_Artis,
         l("I think I should report you to the crew members."), -;
 
@@ -150,135 +101,11 @@ L_Artis:
     next;
     restorecam;
 
-    if (.@q == 2) goto L_SoAskForFood;
     goto L_Accept;
 
-L_FirstAccepted:
-    if (getq(ShipQuests_Alige) >= 2) goto L_Accepted;
-    setq ShipQuests_Alige, 2;
-
-    goto L_Accepted;
-
-L_Accepted:
-    setcamnpc;
-    mes "";
-    mesn;
-    mesq lg("Great, what food do you have for me today?");
-    next;
-    restorecam;
-
-L_GiveFood:
-    mes "";
-    menuint
-        rif(countitem(Acorn), l(getitemname(Acorn))), 0,
-        rif(countitem(Bread), l(getitemname(Bread))), 502,
-        rif(countitem(Fungus), l(getitemname(Fungus))), 503,
-        rif(countitem(Cheese), l(getitemname(Cheese))), 504,
-        rif(countitem(PiouLegs), l(getitemname(PiouLegs))), 505,
-        rif(countitem(LettuceLeaf), l(getitemname(LettuceLeaf))), 0,
-        rif(countitem(Piberries), l(getitemname(Piberries))), 2,
-        rif(countitem(SeaDrops), l(getitemname(SeaDrops))), 1,
-        rif(countitem(Aquada), l(getitemname(Aquada))), 509,
-        rif(countitem(PinkBlobime), l(getitemname(PinkBlobime))), 1,
-        rif(countitem(HalfCroconut), l(getitemname(HalfCroconut))), 512,
-        rif(countitem(Croconut), l(getitemname(Croconut))), 0,
-        rif(countitem(Plushroom), l(getitemname(Plushroom))), 515,
-        //rif(countitem(PumpkinSeeds), l(getitemname(PumpkinSeeds))), 1, // ITEM MOVED TO ART
-        rif(countitem(UrchinMeat), l(getitemname(UrchinMeat))), 1,
-        rif(countitem(EasterEgg), l(getitemname(EasterEgg))), 1,
-        rif(countitem(PumpkishJuice), l(getitemname(PumpkishJuice))), 527,
-        rif(countitem(Manana), l(getitemname(Manana))), 528,
-        rif(countitem(Curshroom), l(getitemname(Curshroom))), 529,
-        rif(countitem(Carrot), l(getitemname(Carrot))), 530,
-        rif(countitem(RedPlushWine), l(getitemname(RedPlushWine))), 3,
-        l("I don't have anything good for you today."), -1;
-
-    .@id = @menuret;
-    if (.@id == -1) goto L_Quit; // Quit message.
-    if (.@id == 0) goto L_NoReward; // In case of wrong food.
-    if (.@id == 1) goto L_Poison; // In case of poisoned food.
-    if (.@id == 2) goto L_NoMore; // In case of Piberries.
-    if (.@id == 3) goto L_Drunk; // In case of Alcohol.
-    if (countitem(.@id) == 0) goto L_Quit;
-//  if (.@id == item's ID) then food is correct.
-// Do not put any other number than -1, 0, 1, 2 or the item's ID, that'll avoid confusion.
-
-    inventoryplace Piberries, 3;
-    delitem .@id, 1;
-
-    setcamnpc;
-    mes "";
-    mesn;
-    mesq l("Thank you so much! Here, have some of my berries.");
-
-    setq ShipQuests_Alige, 3;
-    getitem Piberries, rand(1, 3);
-    next;
-
-    goto L_ReturnMenu;
-
-L_NoReward:
-    setcamnpc;
-    mes "";
-    mesn;
-    mesq l("You don't expect me to eat that, do you? Give me something else!");
-    next;
-    restorecam;
-
-    goto L_GiveFood;
-
-L_Drunk:
-    setcamnpc;
-    speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
-        l("I asked for food but... *hips* Ah, that'll do!");
-    restorecam;
-
-    goto L_GiveFood;
-
-L_ReturnMenu:
-    setcamnpc;
-    mesq l("Do you have anything else for me?");
-    next;
-    restorecam;
-
-    goto L_GiveFood;
-
-L_NoMore:
-    setcamnpc;
-    mes "";
-    mesn;
-    mesq l("Grr, don't give me more berries! I don't want them, stupid berries, stupid... Stupid... Stupid!");
-    next;
-
-    goto L_ReturnMenu;
-
-L_Poison:
-    setcamnpc;
-    mes "";
-    mesn;
-    mesq l("Don't try to poison me! I know what that does!");
-    next;
-    restorecam;
-    goto L_ReturnMenu;
-
-L_SoAskForFood:
-    setcamnpc;
-    mesn;
-    mesq l("So, do you have anything for me today?");
-    next;
-    restorecam;
-    goto L_IntroMenu;
-
-L_AskForFood:
-    setcamnpc;
-    mesn;
-    mesq l("Do you have anything for me today?");
-    next;
-    restorecam;
-
 L_IntroMenu:
     menu
-        l("Yes."), L_GiveFood,
+        //l("Yes."), L_GiveFood,
         l("Where can I find some food?"), L_FindFood,
         l("Why are you hiding?") + " " + l("Why don't you come out?"), L_ExplainHiding,
         l("What is Artis?"), L_Artis,