From 6e03ab1263028f5bc556357cecbb85548017c808 Mon Sep 17 00:00:00 2001 From: Jesusaves Date: Fri, 25 May 2018 13:26:06 -0300 Subject: Merge Tycoon quest mine Due huge amounts of problems and issues, leave NPC disabled. Maps not edited, quest won't work even if you enable NPC. --- npc/007-1/tycoon.txt | 300 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 300 insertions(+) create mode 100644 npc/007-1/tycoon.txt (limited to 'npc/007-1/tycoon.txt') diff --git a/npc/007-1/tycoon.txt b/npc/007-1/tycoon.txt new file mode 100644 index 000000000..f987c411d --- /dev/null +++ b/npc/007-1/tycoon.txt @@ -0,0 +1,300 @@ +// TMW2 scripts. +// TMW2 Authors: +// Saulc +// Jesusalva +// Description: +// Miner leader asks you to purge mine from monsters. Currently disabled. +// Variable: +// MineQuest_Tycoon +// Reference: +// npc name from https://www.idleminertycoon.com/ +// Steps: +// 0: Not started +// +// 1: Took ratto Quest 10 kills +// 2: Completed ratto Quest - 50 EXP 50 GP +// 3: Awaiting next quest +// +// 4: Took Cave Maggot Quest 25 kills +// 5: Completed Cave Maggot Quest - 200 EXP 150 GP +// 6: Awaiting next quest +// +// 7: Took Cave Snake Quest 50 kills +// 8: Completed Cave Snake Quest - 1000 EXP 350 GP +// 9: Awaiting next quest +// +// 10: Took Red Scorpion Quest 100 kills +// 11: Completed Red Scorpion Quest - Miner Hat +// 12: Awaiting next quest +// +// 13: Took Black Scorpion Quest 200 kills +// 14: Completed Black Scorpion Quest - 12 000 EXP 5 000 GP +// 15: Finished all trainment + +007-1,66,65,0 script Tycoon NPC_PLAYER,{ + .@q=getq(MineQuest_Tycoon); + + mesn; + mesq lg("Hello my friend!"); + next; + mesq lg("Some of my miners friends died in this mine, because there are plenty of dangerous monsters."); + next; + mesq lg("Would you like to help us? Maybe you just need some information."); + next; + goto L_Menu; + +L_PreMenu: + mesn; + mesq l("I need your help dude!"); + next; + goto L_Menu; + +L_Menu: + mesn strcharinfo(0); + menu + rif(getq(MineQuest_Tycoon) < 15, l("I am a brave adventurer! How can I help you?")), L_Purge, + l("What does miners do in cave?"), L_CaveMiner, + l("Can you give me a tip?"), L_Tip, + l("Are you a terranite?"), L_Terranite, + l("I don't care about dirty miners problem."), L_Close, + l("No, thanks, it's not my job!"), L_Close; + +L_Purge: + .@q=getq(MineQuest_Tycoon); + mes ""; + if (BaseLevel < 15) goto L_NoLevel; + .@k=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + + mesn; + if (.@q == 0) { + mesq l("Ok, you look strong enough. Now, let me think on an easy task for you..."); + next; + mesq l("Ah! I know. Kill 10 @@. They usually are near the mine's inn.", getmonsterlink(Ratto)); + setq MineQuest_Tycoon, 1, 0; + } else if (.@q == 1) { + mesq l("You are killing @@. They usually are near the mine's Inn.", getmonsterlink(Ratto)); + } else if (.@q == 2) { + mesq l("Good job! Here is your reward! (50 xp 50 gp)"); + getexp 50, 0; + set Zeny, Zeny + 50; + setq MineQuest_Tycoon, 3, 0; + } else if (.@q == 3 && BaseLevel >= 19) { + mesq l("Less rattos means more food. So, this time the monsters will be a little stronger."); + next; + mesq l("Ok, now I want you to purge the cave from maggots. Kill 25 @@. They keep respawning and annoy miners team.", getmonsterlink(CaveMaggot)); + setq MineQuest_Tycoon, 4, 0; + } else if (.@q == 3 && BaseLevel < 19) { + mesq l("You are too weak for my task, please come back later with some levels."); + } else if (.@q == 4) { + mesq l("You are killing @@ at the cave. Good progress!", getmonsterlink(CaveMaggot)); + } else if (.@q == 5) { + mesq l("Perfect! Here is your reward! (200 xp 150 gp)"); + getexp 200, 0; + set Zeny, Zeny + 150; + setq MineQuest_Tycoon, 6, 0; + } else if (.@q == 6 && BaseLevel >= 24) { + mesq l("That was fast. Do not forget to sell their... parts... for some extra cash."); + next; + mesq l("Now, please kill 50 @@, Try to collect some lamps in the same time, they could be useful later.", getmonsterlink(CaveSnake)); + setq MineQuest_Tycoon, 7, 0; + } else if (.@q == 6 && BaseLevel < 24) { + mesq l("You are too weak for my task, please come back later with some levels."); + } else if (.@q == 7) { + mesq l("You are killing @@ at the cave.", getmonsterlink(CaveSnake)); + } else if (.@q == 8) { + mesq l("I hope you got a Jean Shorts, but that depends on luck. Anyway, here is your reward. (1000 xp 350 gp)"); + getexp 1000, 0; + set Zeny, Zeny + 350; + setq MineQuest_Tycoon, 9, 0; + } else if (.@q == 9 && BaseLevel >= 29) { + mesq l("If you want to be a real miner friend, do this hard task for me. I will reward you with a @@.", getitemlink(MinerHat)); + next; + mesq l("I'll ask you to kill 100 @@. This will prove your worth. Good luck.", getmonsterlink(RedScorpion)); + setq MineQuest_Tycoon, 10, 0; + } else if (.@q == 9 && BaseLevel < 29) { + mesq l("You are too weak for my task, please come back later with some levels."); + } else if (.@q == 10) { + mesq l("You are killing @@. It's still in progress.", getmonsterlink(RedScorpion)); + } else if (.@q == 11) { + mesq l("Congratulations! Here is your reward, a @@!", getitemlink(MinerHat)); + mesq l("Mining opearations advance steadly day by day with your help, thanks! Maybe one day, we find a Mana Stone here!"); + inventoryplace MinerHat, 1; + getitem MinerHat, 1; + setq MineQuest_Tycoon, 12, 0; + } else if (.@q == 12 && BaseLevel >= 34) { + mesq l("The last task I could give you is to exterminate @@. They actually stop miners progress on the mine.", getmonsterlink(BlackScorpion)); + setq MineQuest_Tycoon, 13, 0; + } else if (.@q == 12 && BaseLevel < 34) { + mesq l("You are too weak for my last task, please come back later with some levels."); + } else if (.@q == 13) { + mesq l("You are killing @@ at the cave.", getmonsterlink(BlackScorpion)); + } else if (.@q == 14) { + mesq l("Wow! You did it! I do not think anyone else could have done that."); + mesq l("Here, take this @@ - you deserve it! And here is 5.000 GP and 8.000 XP.", getitemlink(Ruby)); + inventoryplace Ruby, 1; + getitem Ruby, 1; + getexp 8000, 0; + set Zeny, Zeny + 5000; + setq MineQuest_Tycoon, 15, 0; + } + next; + goto L_PreMenu; + +L_NoLevel: + mesn; + mesq l("Ah, yes... You see, there is just no task I can give to you right now. You are too weak to fight these monsters."); + next; + mesn; + mesq l("come back stronger, and I will give you a task."); + next; + goto L_Close; + + + +L_CaveMiner: + mes ""; + mesn; + mesq l("Tulimshar miners mainly try to optain gems."); + next; + mesq l("In this cave we can easily find Coal, Iron ore, and sometimes @@.", getitemlink(Ruby)); // maybe add link for coal and iron ? + next; + goto L_Menu; + +L_Tip: + mes ""; + mesn; + mesq l("If you fight Black scorpion or others dangerous monster you should use the 'hit and run' tatic."); + next; + mesn; + mesq l("To do this you need to disable auto move to target in 'yellow bar'."); + next; + mesn; + mesq l("To open yellow Bar you need to right click on your health bar and active status bar, also called yellow bar. Or you can press '8' on numeric keypad."); + next; + mesn; + mesq l("Now you need to fight monster with the maximum range, you can to do this do these steps in order: lock enemy, Attack, hit, move backwards of one tile, hit, ETC."); + next; + mesn; + mesq l("With this tip you will be able to fight strong monsters. It's on Saul's Strategy Guide Against Archwizards."); + next; + goto L_Menu; + +L_Terranite: + mes ""; + mesn; + mesq l("Haha, no, I'm not! But we found traces of them."); + next; + mesn; + mesq l("Terranite probably mined part of this mine long time ago."); + next; + mesn; + mesq l("That can explain why we have difficulties to find rare gems here. They probably were already extracted."); + next; + goto L_Menu; + + +L_Close: + close; + + + function tycoon_add_kills + { + .@qp=getq(MineQuest_Tycoon); + .@kp=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + setq MineQuest_Tycoon, .@qp, .@kp+1; + //message strcharinfo(0), l("Set status @@ with @@ kills", .@qp, .@kp); + } + + function tycoon_max_kills + { + .@qp=getq(MineQuest_Tycoon); + setq MineQuest_Tycoon, .@qp+1, 0; + //message strcharinfo(0), l("End status @@", .@qp); + } + +OnKillRatto: + .@q=getq(MineQuest_Tycoon); + .@k=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + if (.@q == 1) { + if (.@k+1 >= 10) { + tycoon_max_kills(); + message strcharinfo(0), l("All rattos are dead! Go back to Tycoon."); + } else { + tycoon_add_kills(); + message strcharinfo(0), l("@@/10 Rattos", .@k+1); + } + } + end; +OnKillCaveMaggot: + .@q=getq(MineQuest_Tycoon); + .@k=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + if (.@q == 4) { + if (.@k+1 >= 25) { + tycoon_max_kills(); + message strcharinfo(0), l("All cave maggots are dead! Go back to Tycoon."); + } else { + tycoon_add_kills(); + message strcharinfo(0), l("@@/25 Cave Maggots", .@k+1); + } + } else { + if (is_staff()) + dispbottom "It's working. (T:OKHM)"; + } + end; +OnKillCaveSnake: + .@q=getq(MineQuest_Tycoon); + .@k=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + if (.@q == 7) { + if (.@k+1 >= 50) { + tycoon_max_kills(); + message strcharinfo(0), l("All cave snakes are dead! Go back to Tycoon."); + } else { + tycoon_add_kills(); + message strcharinfo(0), l("@@/50 Cave Snakes", .@k+1); + } + } + end; +OnKillRedScorpion: + .@q=getq(MineQuest_Tycoon); + .@k=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + if (.@q == 10) { + if (.@k+1 >= 100) { + tycoon_max_kills(); + message strcharinfo(0), l("All red scorpions are dead! Go back to Tycoon."); + } else { + tycoon_add_kills(); + message strcharinfo(0), l("@@/100 Red Scorpions", .@k+1); + } + } + end; +OnKillBlackScorpion: + .@q=getq(MineQuest_Tycoon); + .@k=getq2(MineQuest_Tycoon); // Get number of kills (via getq2) + if (.@q == 13) { + if (.@k+1 >= 200) { + tycoon_max_kills(); + message strcharinfo(0), l("All black scorpions are dead! Go back to Tycoon."); + } else { + tycoon_add_kills(); + message strcharinfo(0), l("@@/1 Black Scorpions", .@k+1); + } + } + end; + +OnInit: + .@npcId = getnpcid(0, .name$); + setunitdata(.@npcId, UDT_HEADTOP, ArtisTankTop); + setunitdata(.@npcId, UDT_HEADMIDDLE, BromenalPants); + setunitdata(.@npcId, UDT_HEADBOTTOM, MinerHat); + setunitdata(.@npcId, UDT_WEAPON, DeepBlackBoots); + setunitdata(.@npcId, UDT_HAIRSTYLE, 19); + setunitdata(.@npcId, UDT_HAIRCOLOR, 8); + + .sex = G_MALE; + .distance = 4; + + // TODO: NPC is not ready + disablenpc .name$; + + end; +} -- cgit v1.2.3-60-g2f50