From 195dffc20af1fb32c7e4119988911b72955aeabc Mon Sep 17 00:00:00 2001 From: "(no author)" <(no author)@54d463be-8e91-2dee-dedb-b68131a5f0ec> Date: Thu, 4 Nov 2004 23:25:09 +0000 Subject: git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/athena@2 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/Changelog.txt | 205 ++ npc/cities/alberta.txt | 873 +++++++ npc/cities/aldebaran.txt | 1542 +++++++++++++ npc/cities/amatsu.txt | 1479 ++++++++++++ npc/cities/comodo.txt | 1616 +++++++++++++ npc/cities/geffen.txt | 659 ++++++ npc/cities/gonryun.txt | 318 +++ npc/cities/izlude.txt | 547 +++++ npc/cities/lutie.txt | 999 ++++++++ npc/cities/morocc.txt | 557 +++++ npc/cities/niflheim.txt | 534 +++++ npc/cities/payon.txt | 816 +++++++ npc/cities/prontera.txt | 618 +++++ npc/cities/umbala.txt | 1664 ++++++++++++++ npc/cities/yuno.txt | 616 +++++ npc/events/alchemist.txt | 166 ++ npc/events/custom/draculax.txt | 130 ++ npc/events/twintowers.txt | 93 + npc/events/valentines_day.txt | 272 +++ npc/guides/guides_alb.txt | 109 + npc/guides/guides_alde.txt | 116 + npc/guides/guides_com.txt | 141 ++ npc/guides/guides_gef.txt | 135 ++ npc/guides/guides_izl.txt | 118 + npc/guides/guides_mor.txt | 121 + npc/guides/guides_nif.txt | 82 + npc/guides/guides_pay.txt | 193 ++ npc/guides/guides_pron.txt | 206 ++ npc/guides/guides_umb.txt | 107 + npc/guides/guides_yun.txt | 223 ++ npc/guild/aldeg/aldeg_dunsw.txt | 51 + npc/guild/aldeg/aldeg_ev_agit.txt | 130 ++ npc/guild/aldeg/aldeg_flags.txt | 199 ++ npc/guild/aldeg/aldeg_guardians.txt | 111 + npc/guild/aldeg/aldeg_kafras.txt | 61 + npc/guild/aldeg/aldeg_managers.txt | 110 + npc/guild/aldeg/aldeg_treas.txt | 141 ++ npc/guild/ev_agit_event.txt | 41 + npc/guild/gefg/gefg_dunsw.txt | 49 + npc/guild/gefg/gefg_ev_agit.txt | 130 ++ npc/guild/gefg/gefg_flags.txt | 154 ++ npc/guild/gefg/gefg_guardians.txt | 108 + npc/guild/gefg/gefg_kafras.txt | 71 + npc/guild/gefg/gefg_managers.txt | 104 + npc/guild/gefg/gefg_treas.txt | 148 ++ npc/guild/gldfunc_dunsw.txt | 42 + npc/guild/gldfunc_ev_agit.txt | 149 ++ npc/guild/gldfunc_flag.txt | 58 + npc/guild/gldfunc_kafra.txt | 37 + npc/guild/gldfunc_manager.txt | 429 ++++ npc/guild/gldfunc_treasure.txt | 78 + npc/guild/nguild/nguild_dunsw.txt | 39 + npc/guild/nguild/nguild_ev_agit.txt | 107 + npc/guild/nguild/nguild_flags.txt | 113 + npc/guild/nguild/nguild_guardians.txt | 91 + npc/guild/nguild/nguild_kafras.txt | 53 + npc/guild/nguild/nguild_managers.txt | 86 + npc/guild/nguild/nguild_treas.txt | 117 + npc/guild/old/aldeg_cas01.txt | 675 ++++++ npc/guild/old/aldeg_cas02.txt | 676 ++++++ npc/guild/old/aldeg_cas03.txt | 679 ++++++ npc/guild/old/aldeg_cas04.txt | 679 ++++++ npc/guild/old/aldeg_cas05.txt | 677 ++++++ npc/guild/old/aldeg_flag.txt | 351 +++ npc/guild/old/ev_agit_aldeg.txt | 476 ++++ npc/guild/old/ev_agit_event.txt | 34 + npc/guild/old/ev_agit_gefg.txt | 464 ++++ npc/guild/old/ev_agit_payg.txt | 466 ++++ npc/guild/old/ev_agit_prtg.txt | 476 ++++ npc/guild/old/gefg_cas01.txt | 667 ++++++ npc/guild/old/gefg_cas02.txt | 667 ++++++ npc/guild/old/gefg_cas03.txt | 668 ++++++ npc/guild/old/gefg_cas04.txt | 668 ++++++ npc/guild/old/gefg_cas05.txt | 666 ++++++ npc/guild/old/gefg_flag.txt | 359 +++ npc/guild/old/gswitch.txt | 444 ++++ npc/guild/old/guardian/aldeg_cas01_guardian.txt | 67 + npc/guild/old/guardian/aldeg_cas02_guardian.txt | 67 + npc/guild/old/guardian/aldeg_cas03_guardian.txt | 67 + npc/guild/old/guardian/aldeg_cas04_guardian.txt | 67 + npc/guild/old/guardian/aldeg_cas05_guardian.txt | 67 + npc/guild/old/guardian/gefg_cas01_guardian.txt | 67 + npc/guild/old/guardian/gefg_cas02_guardian.txt | 67 + npc/guild/old/guardian/gefg_cas03_guardian.txt | 67 + npc/guild/old/guardian/gefg_cas04_guardian.txt | 67 + npc/guild/old/guardian/gefg_cas05_guardian.txt | 67 + npc/guild/old/guardian/payg_cas01_guardian.txt | 67 + npc/guild/old/guardian/payg_cas02_guardian.txt | 67 + npc/guild/old/guardian/payg_cas03_guardian.txt | 67 + npc/guild/old/guardian/payg_cas04_guardian.txt | 67 + npc/guild/old/guardian/payg_cas05_guardian.txt | 67 + npc/guild/old/guardian/prtg_cas01_guardian.txt | 67 + npc/guild/old/guardian/prtg_cas02_guardian.txt | 62 + npc/guild/old/guardian/prtg_cas03_guardian.txt | 62 + npc/guild/old/guardian/prtg_cas04_guardian.txt | 62 + npc/guild/old/guardian/prtg_cas05_guardian.txt | 62 + npc/guild/old/payg_cas01.txt | 667 ++++++ npc/guild/old/payg_cas02.txt | 666 ++++++ npc/guild/old/payg_cas03.txt | 666 ++++++ npc/guild/old/payg_cas04.txt | 666 ++++++ npc/guild/old/payg_cas05.txt | 666 ++++++ npc/guild/old/payg_flag.txt | 360 +++ npc/guild/old/prtg_cas01.txt | 670 ++++++ npc/guild/old/prtg_cas02.txt | 667 ++++++ npc/guild/old/prtg_cas03.txt | 667 ++++++ npc/guild/old/prtg_cas04.txt | 666 ++++++ npc/guild/old/prtg_cas05.txt | 664 ++++++ npc/guild/old/prtg_flag.txt | 364 +++ npc/guild/old/treasure/aldeg_cas01_treasure.txt | 72 + npc/guild/old/treasure/aldeg_cas02_treasure.txt | 67 + npc/guild/old/treasure/aldeg_cas03_treasure.txt | 67 + npc/guild/old/treasure/aldeg_cas04_treasure.txt | 67 + npc/guild/old/treasure/aldeg_cas05_treasure.txt | 67 + npc/guild/old/treasure/gefg_cas01_treasure.txt | 67 + npc/guild/old/treasure/gefg_cas02_treasure.txt | 67 + npc/guild/old/treasure/gefg_cas03_treasure.txt | 67 + npc/guild/old/treasure/gefg_cas04_treasure.txt | 68 + npc/guild/old/treasure/gefg_cas05_treasure.txt | 68 + npc/guild/old/treasure/payg_cas01_treasure.txt | 67 + npc/guild/old/treasure/payg_cas02_treasure.txt | 67 + npc/guild/old/treasure/payg_cas03_treasure.txt | 67 + npc/guild/old/treasure/payg_cas04_treasure.txt | 67 + npc/guild/old/treasure/payg_cas05_treasure.txt | 67 + npc/guild/old/treasure/prtg_cas01_treasure.txt | 72 + npc/guild/old/treasure/prtg_cas02_treasure.txt | 67 + npc/guild/old/treasure/prtg_cas03_treasure.txt | 67 + npc/guild/old/treasure/prtg_cas04_treasure.txt | 67 + npc/guild/old/treasure/prtg_cas05_treasure.txt | 67 + npc/guild/payg/payg_dunsw.txt | 49 + npc/guild/payg/payg_ev_agit.txt | 130 ++ npc/guild/payg/payg_flags.txt | 148 ++ npc/guild/payg/payg_guardians.txt | 108 + npc/guild/payg/payg_kafras.txt | 65 + npc/guild/payg/payg_managers.txt | 104 + npc/guild/payg/payg_treas.txt | 140 ++ npc/guild/prtg/prtg_dunsw.txt | 49 + npc/guild/prtg/prtg_ev_agit.txt | 130 ++ npc/guild/prtg/prtg_flags.txt | 175 ++ npc/guild/prtg/prtg_guardians.txt | 108 + npc/guild/prtg/prtg_kafras.txt | 66 + npc/guild/prtg/prtg_managers.txt | 104 + npc/guild/prtg/prtg_treas.txt | 144 ++ npc/jobs/1-1/acolyte.txt | 349 +++ npc/jobs/1-1/archer.txt | 183 ++ npc/jobs/1-1/mage.txt | 498 ++++ npc/jobs/1-1/merchant.txt | 973 ++++++++ npc/jobs/1-1/swordsman.txt | 795 +++++++ npc/jobs/1-1/thief.txt | 443 ++++ npc/jobs/2-1-1/AssassinCross.txt | 70 + npc/jobs/2-1-1/HighPriest.txt | 61 + npc/jobs/2-1-1/HighWizard.txt | 60 + npc/jobs/2-1-1/LordKnight.txt | 62 + npc/jobs/2-1-1/Sniper.txt | 64 + npc/jobs/2-1-1/WhiteSmith.txt | 60 + npc/jobs/2-1/assassin.txt | 1918 ++++++++++++++++ npc/jobs/2-1/blacksmith.txt | 1436 ++++++++++++ npc/jobs/2-1/hunter.txt | 1250 ++++++++++ npc/jobs/2-1/knight.txt | 1854 +++++++++++++++ npc/jobs/2-1/priest.txt | 1430 ++++++++++++ npc/jobs/2-1/wizard.txt | 1446 ++++++++++++ npc/jobs/2-2-1/Champion.txt | 61 + npc/jobs/2-2-1/Clown.txt | 122 + npc/jobs/2-2-1/Creator.txt | 61 + npc/jobs/2-2-1/Gypsy.txt | 89 + npc/jobs/2-2-1/Paladin.txt | 62 + npc/jobs/2-2-1/Professor.txt | 61 + npc/jobs/2-2-1/Stalker.txt | 59 + npc/jobs/2-2/alchemist.txt | 1078 +++++++++ npc/jobs/2-2/crusader.txt | 1164 ++++++++++ npc/jobs/2-2/noquest/crusader.txt | 54 + npc/jobs/2-2/noquest/dancer-bard.txt | 72 + npc/jobs/2-2/noquest/monk.txt | 54 + npc/jobs/2-2/rogue.txt | 943 ++++++++ npc/jobs/2-2/sage.txt | 2146 +++++++++++++++++ npc/jobs/custom/jobchange.txt | 758 ++++++ npc/jobs/custom/reset.txt | 40 + npc/jobs/novice/novice.txt | 2338 +++++++++++++++++++ npc/jobs/novice/supernovice.txt | 273 +++ npc/kafras/functions_kafras.txt | 342 +++ npc/kafras/kafras_alb.txt | 67 + npc/kafras/kafras_alde.txt | 51 + npc/kafras/kafras_com.txt | 60 + npc/kafras/kafras_dungeons.txt | 129 ++ npc/kafras/kafras_gef.txt | 101 + npc/kafras/kafras_izl.txt | 39 + npc/kafras/kafras_mor.txt | 100 + npc/kafras/kafras_new.txt | 52 + npc/kafras/kafras_pay.txt | 65 + npc/kafras/kafras_pron.txt | 100 + npc/kafras/kafras_yun.txt | 71 + npc/merchants/2-2shop.txt | 1 + npc/merchants/alchemist.txt | 120 + npc/merchants/clothes_dyer.txt | 325 +++ npc/merchants/custom/breeder.txt | 67 + npc/merchants/custom/dye.txt | 176 ++ npc/merchants/dye_maker.txt | 277 +++ npc/merchants/grandpa_pharmacist.txt | 186 ++ npc/merchants/hair_dyer.txt | 158 ++ npc/merchants/inn.txt | 172 ++ npc/merchants/milk_trader.txt | 63 + npc/merchants/refine.txt | 873 +++++++ npc/merchants/renters.txt | 155 ++ npc/merchants/shops.txt | 205 ++ npc/mobs/dungeons/amatdun.txt | 33 + npc/mobs/dungeons/anthell.txt | 117 + npc/mobs/dungeons/ayodun.txt | 31 + npc/mobs/dungeons/beachdun.txt | 32 + npc/mobs/dungeons/byalan.txt | 104 + npc/mobs/dungeons/clocktower.txt | 122 + npc/mobs/dungeons/coalmine.txt | 29 + npc/mobs/dungeons/geftower.txt | 68 + npc/mobs/dungeons/glastheim.txt | 159 ++ npc/mobs/dungeons/gondun.txt | 39 + npc/mobs/dungeons/guilddun.txt | 43 + npc/mobs/dungeons/louydun.txt | 33 + npc/mobs/dungeons/magmadun.txt | 25 + npc/mobs/dungeons/moc_pyramid.txt | 49 + npc/mobs/dungeons/moc_sphinx.txt | 44 + npc/mobs/dungeons/orcdun.txt | 30 + npc/mobs/dungeons/payoncave.txt | 150 ++ npc/mobs/dungeons/pront_maze.txt | 75 + npc/mobs/dungeons/pront_sewers.txt | 44 + npc/mobs/dungeons/sunkenship.txt | 141 ++ npc/mobs/dungeons/toyfactory.txt | 30 + npc/mobs/dungeons/turtleisland.txt | 47 + npc/mobs/dungeons/umbaladun.txt | 25 + npc/mobs/fields/amatsu.txt | 38 + npc/mobs/fields/ayothana.txt | 22 + npc/mobs/fields/comodo.txt | 151 ++ npc/mobs/fields/gefenia.txt | 49 + npc/mobs/fields/geffen.txt | 195 ++ npc/mobs/fields/gonryun.txt | 20 + npc/mobs/fields/louyang.txt | 15 + npc/mobs/fields/lutie.txt | 16 + npc/mobs/fields/mjolnir.txt | 226 ++ npc/mobs/fields/morocc.txt | 256 +++ npc/mobs/fields/niflheim.txt | 42 + npc/mobs/fields/payon.txt | 128 ++ npc/mobs/fields/prontera.txt | 113 + npc/mobs/fields/umbala.txt | 38 + npc/mobs/fields/yuno.txt | 60 + npc/mobs/pvp.txt | 31 + npc/other/Global_Functions.txt | 80 + npc/other/IceCream.txt | 64 + npc/other/Valkyrie.txt | 50 + npc/other/arena.txt | 568 +++++ npc/other/arena_mvp.txt | 1105 +++++++++ npc/other/bank.txt | 126 + npc/other/books.txt | 2291 +++++++++++++++++++ npc/other/card_remover.txt | 169 ++ npc/other/devnpc.txt | 284 +++ npc/other/gefenia.txt | 31 + npc/other/heal.txt | 41 + npc/other/heal_payment.txt | 99 + npc/other/kafra_bank.txt | 106 + npc/other/mc_cameri/bank.txt | 2793 +++++++++++++++++++++++ npc/other/momotaro.txt | 439 ++++ npc/other/msg_boards.txt | 175 ++ npc/other/old/guide.txt | 1153 ++++++++++ npc/other/old/kafra.txt | 1866 +++++++++++++++ npc/other/old/pvp.txt | 1455 ++++++++++++ npc/other/platinum_skills.txt | 94 + npc/other/pvp.txt | 443 ++++ npc/other/tougijou.txt | 372 +++ npc/other/warper.txt | 99 + npc/other/warper2.txt | 263 +++ npc/other/wedding.txt | 538 +++++ npc/other/weddingtxt.txt | 277 +++ npc/quests/all_quest.txt | 570 +++++ npc/quests/bongun.txt | 58 + npc/quests/bongunsword.txt | 44 + npc/quests/bunnyband.txt | 102 + npc/quests/counteragent_mixture.txt | 263 +++ npc/quests/custom/berzebub.txt | 84 + npc/quests/custom/elvenear.txt | 71 + npc/quests/custom/event_32_new_hats.txt | 1278 +++++++++++ npc/quests/custom/excalibur.txt | 68 + npc/quests/custom/ironcane.txt | 52 + npc/quests/custom/kaho_balmung.txt | 97 + npc/quests/custom/kahohorn.txt | 79 + npc/quests/custom/new_hats.txt | 1469 ++++++++++++ npc/quests/custom/sunglasses.txt | 146 ++ npc/quests/custom/uneasy_cemetery.txt | 135 ++ npc/quests/custom/valhallen.txt | 199 ++ npc/quests/doomed_swords.txt | 297 +++ npc/quests/fashion.txt | 70 + npc/quests/juice_maker.txt | 308 +++ npc/quests/magicalhatquest.txt | 40 + npc/quests/monstertamers.txt | 443 ++++ npc/quests/mrsmile.txt | 92 + npc/quests/munak.txt | 54 + npc/quests/quests_alberta.txt | 683 ++++++ npc/quests/quests_aldebaran.txt | 93 + npc/quests/quests_comodo.txt | 277 +++ npc/quests/quests_geffen.txt | 186 ++ npc/quests/quests_lutie.txt | 186 ++ npc/quests/quests_morocc.txt | 119 + npc/quests/quests_payon.txt | 291 +++ npc/quests/quests_prontera.txt | 92 + npc/quests/quests_umbala.txt | 291 +++ npc/quests/quests_yuno.txt | 134 ++ npc/quests/skills/acolyte_skills.txt | 126 + npc/quests/skills/archer_skills.txt | 210 ++ npc/quests/skills/mage_skills.txt | 114 + npc/quests/skills/merchant_skills.txt | 308 +++ npc/quests/skills/novice_skills.txt | 258 +++ npc/quests/skills/swordsman_skills.txt | 371 +++ npc/quests/skills/thief_skills.txt | 386 ++++ npc/sample/PCLoginEvent.txt | 33 + npc/sample/bank_test.txt | 59 + npc/sample/gstorage_test.txt | 33 + npc/sample/npc_card_remover.txt | 197 ++ npc/sample/npc_equip_sample.txt | 17 + npc/sample/npc_extend_shop.txt | 68 + npc/sample/npc_sample.txt | 457 ++++ npc/sample/npc_shop_test.txt | 31 + npc/sample/npc_test_arena.txt | 104 + npc/sample/npc_test_array.txt | 35 + npc/sample/npc_test_chat.txt | 28 + npc/sample/npc_test_ev.txt | 146 ++ npc/sample/npc_test_func.txt | 27 + npc/sample/npc_test_npctimer.txt | 33 + npc/sample/npc_test_skill.txt | 19 + npc/sample/npc_test_str.txt | 17 + npc/sample/npc_testchkoption.txt | 15 + npc/sample/npc_time_sample.txt | 19 + npc/warps/cities/alberta.txt | 58 + npc/warps/cities/aldebaran.txt | 49 + npc/warps/cities/amatsu.txt | 51 + npc/warps/cities/comodo.txt | 56 + npc/warps/cities/geffen.txt | 50 + npc/warps/cities/gonryun.txt | 34 + npc/warps/cities/izlude.txt | 34 + npc/warps/cities/louyang.txt | 48 + npc/warps/cities/lutie.txt | 41 + npc/warps/cities/morroc.txt | 107 + npc/warps/cities/niflheim.txt | 35 + npc/warps/cities/payon.txt | 137 ++ npc/warps/cities/prontera.txt | 102 + npc/warps/cities/umbala.txt | 44 + npc/warps/cities/yggdrasil.txt | 25 + npc/warps/cities/yuno.txt | 92 + npc/warps/disabled_warps.txt | 37 + npc/warps/dungeons/alberta_duns.txt | 58 + npc/warps/dungeons/alde_ct.txt | 226 ++ npc/warps/dungeons/amatsu_dun.txt | 20 + npc/warps/dungeons/ant_hell.txt | 27 + npc/warps/dungeons/coal_mine.txt | 22 + npc/warps/dungeons/com_dun.txt | 19 + npc/warps/dungeons/geffen_dun.txt | 45 + npc/warps/dungeons/gon_dun.txt | 40 + npc/warps/dungeons/izlude_dun.txt | 30 + npc/warps/dungeons/louyang_dun.txt | 20 + npc/warps/dungeons/lutie_dun.txt | 18 + npc/warps/dungeons/morroc_duns.txt | 63 + npc/warps/dungeons/orc_dun.txt | 26 + npc/warps/dungeons/payon_dun.txt | 37 + npc/warps/dungeons/prt_dun.txt | 154 ++ npc/warps/dungeons/umbala_dun.txt | 33 + npc/warps/dungeons/yuno_dun.txt | 18 + npc/warps/fields/amatsu_fild.txt | 21 + npc/warps/fields/com_fild.txt | 53 + npc/warps/fields/gefenia.txt | 30 + npc/warps/fields/geffen_fild.txt | 72 + npc/warps/fields/glastheim.txt | 85 + npc/warps/fields/jawaii.txt | 25 + npc/warps/fields/lutie_fild.txt | 17 + npc/warps/fields/morroc_fild.txt | 103 + npc/warps/fields/mtmjolnir.txt | 61 + npc/warps/fields/payon_fild.txt | 48 + npc/warps/fields/prontera_fild.txt | 101 + npc/warps/fields/umbala_fild.txt | 35 + npc/warps/fields/yuno_fild.txt | 31 + npc/warps/guild/guildcastles.txt | 401 ++++ npc/warps/other/jobquests.txt | 137 ++ npc/warps/other/other.txt | 35 + npc/warps/pvp/pvp.txt | 259 +++ 377 files changed, 98680 insertions(+) create mode 100644 npc/Changelog.txt create mode 100644 npc/cities/alberta.txt create mode 100644 npc/cities/aldebaran.txt create mode 100644 npc/cities/amatsu.txt create mode 100644 npc/cities/comodo.txt create mode 100644 npc/cities/geffen.txt create mode 100644 npc/cities/gonryun.txt create mode 100644 npc/cities/izlude.txt create mode 100644 npc/cities/lutie.txt create mode 100644 npc/cities/morocc.txt create mode 100644 npc/cities/niflheim.txt create mode 100644 npc/cities/payon.txt create mode 100644 npc/cities/prontera.txt create mode 100644 npc/cities/umbala.txt create mode 100644 npc/cities/yuno.txt create mode 100644 npc/events/alchemist.txt create mode 100644 npc/events/custom/draculax.txt create mode 100644 npc/events/twintowers.txt create mode 100644 npc/events/valentines_day.txt create mode 100644 npc/guides/guides_alb.txt create mode 100644 npc/guides/guides_alde.txt create mode 100644 npc/guides/guides_com.txt create mode 100644 npc/guides/guides_gef.txt create mode 100644 npc/guides/guides_izl.txt create mode 100644 npc/guides/guides_mor.txt create mode 100644 npc/guides/guides_nif.txt create mode 100644 npc/guides/guides_pay.txt create mode 100644 npc/guides/guides_pron.txt create mode 100644 npc/guides/guides_umb.txt create mode 100644 npc/guides/guides_yun.txt create mode 100644 npc/guild/aldeg/aldeg_dunsw.txt create mode 100644 npc/guild/aldeg/aldeg_ev_agit.txt create mode 100644 npc/guild/aldeg/aldeg_flags.txt create mode 100644 npc/guild/aldeg/aldeg_guardians.txt create mode 100644 npc/guild/aldeg/aldeg_kafras.txt create mode 100644 npc/guild/aldeg/aldeg_managers.txt create mode 100644 npc/guild/aldeg/aldeg_treas.txt create mode 100644 npc/guild/ev_agit_event.txt create mode 100644 npc/guild/gefg/gefg_dunsw.txt create mode 100644 npc/guild/gefg/gefg_ev_agit.txt create mode 100644 npc/guild/gefg/gefg_flags.txt create mode 100644 npc/guild/gefg/gefg_guardians.txt create mode 100644 npc/guild/gefg/gefg_kafras.txt create mode 100644 npc/guild/gefg/gefg_managers.txt create mode 100644 npc/guild/gefg/gefg_treas.txt create mode 100644 npc/guild/gldfunc_dunsw.txt create mode 100644 npc/guild/gldfunc_ev_agit.txt create mode 100644 npc/guild/gldfunc_flag.txt create mode 100644 npc/guild/gldfunc_kafra.txt create mode 100644 npc/guild/gldfunc_manager.txt create mode 100644 npc/guild/gldfunc_treasure.txt create mode 100644 npc/guild/nguild/nguild_dunsw.txt create mode 100644 npc/guild/nguild/nguild_ev_agit.txt create mode 100644 npc/guild/nguild/nguild_flags.txt create mode 100644 npc/guild/nguild/nguild_guardians.txt create mode 100644 npc/guild/nguild/nguild_kafras.txt create mode 100644 npc/guild/nguild/nguild_managers.txt create mode 100644 npc/guild/nguild/nguild_treas.txt create mode 100644 npc/guild/old/aldeg_cas01.txt create mode 100644 npc/guild/old/aldeg_cas02.txt create mode 100644 npc/guild/old/aldeg_cas03.txt create mode 100644 npc/guild/old/aldeg_cas04.txt create mode 100644 npc/guild/old/aldeg_cas05.txt create mode 100644 npc/guild/old/aldeg_flag.txt create mode 100644 npc/guild/old/ev_agit_aldeg.txt create mode 100644 npc/guild/old/ev_agit_event.txt create mode 100644 npc/guild/old/ev_agit_gefg.txt create mode 100644 npc/guild/old/ev_agit_payg.txt create mode 100644 npc/guild/old/ev_agit_prtg.txt create mode 100644 npc/guild/old/gefg_cas01.txt create mode 100644 npc/guild/old/gefg_cas02.txt create mode 100644 npc/guild/old/gefg_cas03.txt create mode 100644 npc/guild/old/gefg_cas04.txt create mode 100644 npc/guild/old/gefg_cas05.txt create mode 100644 npc/guild/old/gefg_flag.txt create mode 100644 npc/guild/old/gswitch.txt create mode 100644 npc/guild/old/guardian/aldeg_cas01_guardian.txt create mode 100644 npc/guild/old/guardian/aldeg_cas02_guardian.txt create mode 100644 npc/guild/old/guardian/aldeg_cas03_guardian.txt create mode 100644 npc/guild/old/guardian/aldeg_cas04_guardian.txt create mode 100644 npc/guild/old/guardian/aldeg_cas05_guardian.txt create mode 100644 npc/guild/old/guardian/gefg_cas01_guardian.txt create mode 100644 npc/guild/old/guardian/gefg_cas02_guardian.txt create mode 100644 npc/guild/old/guardian/gefg_cas03_guardian.txt create mode 100644 npc/guild/old/guardian/gefg_cas04_guardian.txt create mode 100644 npc/guild/old/guardian/gefg_cas05_guardian.txt create mode 100644 npc/guild/old/guardian/payg_cas01_guardian.txt create mode 100644 npc/guild/old/guardian/payg_cas02_guardian.txt create mode 100644 npc/guild/old/guardian/payg_cas03_guardian.txt create mode 100644 npc/guild/old/guardian/payg_cas04_guardian.txt create mode 100644 npc/guild/old/guardian/payg_cas05_guardian.txt create mode 100644 npc/guild/old/guardian/prtg_cas01_guardian.txt create mode 100644 npc/guild/old/guardian/prtg_cas02_guardian.txt create mode 100644 npc/guild/old/guardian/prtg_cas03_guardian.txt create mode 100644 npc/guild/old/guardian/prtg_cas04_guardian.txt create mode 100644 npc/guild/old/guardian/prtg_cas05_guardian.txt create mode 100644 npc/guild/old/payg_cas01.txt create mode 100644 npc/guild/old/payg_cas02.txt create mode 100644 npc/guild/old/payg_cas03.txt create mode 100644 npc/guild/old/payg_cas04.txt create mode 100644 npc/guild/old/payg_cas05.txt create mode 100644 npc/guild/old/payg_flag.txt create mode 100644 npc/guild/old/prtg_cas01.txt create mode 100644 npc/guild/old/prtg_cas02.txt create mode 100644 npc/guild/old/prtg_cas03.txt create mode 100644 npc/guild/old/prtg_cas04.txt create mode 100644 npc/guild/old/prtg_cas05.txt create mode 100644 npc/guild/old/prtg_flag.txt create mode 100644 npc/guild/old/treasure/aldeg_cas01_treasure.txt create mode 100644 npc/guild/old/treasure/aldeg_cas02_treasure.txt create mode 100644 npc/guild/old/treasure/aldeg_cas03_treasure.txt create mode 100644 npc/guild/old/treasure/aldeg_cas04_treasure.txt create mode 100644 npc/guild/old/treasure/aldeg_cas05_treasure.txt create mode 100644 npc/guild/old/treasure/gefg_cas01_treasure.txt create mode 100644 npc/guild/old/treasure/gefg_cas02_treasure.txt create mode 100644 npc/guild/old/treasure/gefg_cas03_treasure.txt create mode 100644 npc/guild/old/treasure/gefg_cas04_treasure.txt create mode 100644 npc/guild/old/treasure/gefg_cas05_treasure.txt create mode 100644 npc/guild/old/treasure/payg_cas01_treasure.txt create mode 100644 npc/guild/old/treasure/payg_cas02_treasure.txt create mode 100644 npc/guild/old/treasure/payg_cas03_treasure.txt create mode 100644 npc/guild/old/treasure/payg_cas04_treasure.txt create mode 100644 npc/guild/old/treasure/payg_cas05_treasure.txt create mode 100644 npc/guild/old/treasure/prtg_cas01_treasure.txt create mode 100644 npc/guild/old/treasure/prtg_cas02_treasure.txt create mode 100644 npc/guild/old/treasure/prtg_cas03_treasure.txt create mode 100644 npc/guild/old/treasure/prtg_cas04_treasure.txt create mode 100644 npc/guild/old/treasure/prtg_cas05_treasure.txt create mode 100644 npc/guild/payg/payg_dunsw.txt create mode 100644 npc/guild/payg/payg_ev_agit.txt create mode 100644 npc/guild/payg/payg_flags.txt create mode 100644 npc/guild/payg/payg_guardians.txt create mode 100644 npc/guild/payg/payg_kafras.txt create mode 100644 npc/guild/payg/payg_managers.txt create mode 100644 npc/guild/payg/payg_treas.txt create mode 100644 npc/guild/prtg/prtg_dunsw.txt create mode 100644 npc/guild/prtg/prtg_ev_agit.txt create mode 100644 npc/guild/prtg/prtg_flags.txt create mode 100644 npc/guild/prtg/prtg_guardians.txt create mode 100644 npc/guild/prtg/prtg_kafras.txt create mode 100644 npc/guild/prtg/prtg_managers.txt create mode 100644 npc/guild/prtg/prtg_treas.txt create mode 100644 npc/jobs/1-1/acolyte.txt create mode 100644 npc/jobs/1-1/archer.txt create mode 100644 npc/jobs/1-1/mage.txt create mode 100644 npc/jobs/1-1/merchant.txt create mode 100644 npc/jobs/1-1/swordsman.txt create mode 100644 npc/jobs/1-1/thief.txt create mode 100644 npc/jobs/2-1-1/AssassinCross.txt create mode 100644 npc/jobs/2-1-1/HighPriest.txt create mode 100644 npc/jobs/2-1-1/HighWizard.txt create mode 100644 npc/jobs/2-1-1/LordKnight.txt create mode 100644 npc/jobs/2-1-1/Sniper.txt create mode 100644 npc/jobs/2-1-1/WhiteSmith.txt create mode 100644 npc/jobs/2-1/assassin.txt create mode 100644 npc/jobs/2-1/blacksmith.txt create mode 100644 npc/jobs/2-1/hunter.txt create mode 100644 npc/jobs/2-1/knight.txt create mode 100644 npc/jobs/2-1/priest.txt create mode 100644 npc/jobs/2-1/wizard.txt create mode 100644 npc/jobs/2-2-1/Champion.txt create mode 100644 npc/jobs/2-2-1/Clown.txt create mode 100644 npc/jobs/2-2-1/Creator.txt create mode 100644 npc/jobs/2-2-1/Gypsy.txt create mode 100644 npc/jobs/2-2-1/Paladin.txt create mode 100644 npc/jobs/2-2-1/Professor.txt create mode 100644 npc/jobs/2-2-1/Stalker.txt create mode 100644 npc/jobs/2-2/alchemist.txt create mode 100644 npc/jobs/2-2/crusader.txt create mode 100644 npc/jobs/2-2/noquest/crusader.txt create mode 100644 npc/jobs/2-2/noquest/dancer-bard.txt create mode 100644 npc/jobs/2-2/noquest/monk.txt create mode 100644 npc/jobs/2-2/rogue.txt create mode 100644 npc/jobs/2-2/sage.txt create mode 100644 npc/jobs/custom/jobchange.txt create mode 100644 npc/jobs/custom/reset.txt create mode 100644 npc/jobs/novice/novice.txt create mode 100644 npc/jobs/novice/supernovice.txt create mode 100644 npc/kafras/functions_kafras.txt create mode 100644 npc/kafras/kafras_alb.txt create mode 100644 npc/kafras/kafras_alde.txt create mode 100644 npc/kafras/kafras_com.txt create mode 100644 npc/kafras/kafras_dungeons.txt create mode 100644 npc/kafras/kafras_gef.txt create mode 100644 npc/kafras/kafras_izl.txt create mode 100644 npc/kafras/kafras_mor.txt create mode 100644 npc/kafras/kafras_new.txt create mode 100644 npc/kafras/kafras_pay.txt create mode 100644 npc/kafras/kafras_pron.txt create mode 100644 npc/kafras/kafras_yun.txt create mode 100644 npc/merchants/2-2shop.txt create mode 100644 npc/merchants/alchemist.txt create mode 100644 npc/merchants/clothes_dyer.txt create mode 100644 npc/merchants/custom/breeder.txt create mode 100644 npc/merchants/custom/dye.txt create mode 100644 npc/merchants/dye_maker.txt create mode 100644 npc/merchants/grandpa_pharmacist.txt create mode 100644 npc/merchants/hair_dyer.txt create mode 100644 npc/merchants/inn.txt create mode 100644 npc/merchants/milk_trader.txt create mode 100644 npc/merchants/refine.txt create mode 100644 npc/merchants/renters.txt create mode 100644 npc/merchants/shops.txt create mode 100644 npc/mobs/dungeons/amatdun.txt create mode 100644 npc/mobs/dungeons/anthell.txt create mode 100644 npc/mobs/dungeons/ayodun.txt create mode 100644 npc/mobs/dungeons/beachdun.txt create mode 100644 npc/mobs/dungeons/byalan.txt create mode 100644 npc/mobs/dungeons/clocktower.txt create mode 100644 npc/mobs/dungeons/coalmine.txt create mode 100644 npc/mobs/dungeons/geftower.txt create mode 100644 npc/mobs/dungeons/glastheim.txt create mode 100644 npc/mobs/dungeons/gondun.txt create mode 100644 npc/mobs/dungeons/guilddun.txt create mode 100644 npc/mobs/dungeons/louydun.txt create mode 100644 npc/mobs/dungeons/magmadun.txt create mode 100644 npc/mobs/dungeons/moc_pyramid.txt create mode 100644 npc/mobs/dungeons/moc_sphinx.txt create mode 100644 npc/mobs/dungeons/orcdun.txt create mode 100644 npc/mobs/dungeons/payoncave.txt create mode 100644 npc/mobs/dungeons/pront_maze.txt create mode 100644 npc/mobs/dungeons/pront_sewers.txt create mode 100644 npc/mobs/dungeons/sunkenship.txt create mode 100644 npc/mobs/dungeons/toyfactory.txt create mode 100644 npc/mobs/dungeons/turtleisland.txt create mode 100644 npc/mobs/dungeons/umbaladun.txt create mode 100644 npc/mobs/fields/amatsu.txt create mode 100644 npc/mobs/fields/ayothana.txt create mode 100644 npc/mobs/fields/comodo.txt create mode 100644 npc/mobs/fields/gefenia.txt create mode 100644 npc/mobs/fields/geffen.txt create mode 100644 npc/mobs/fields/gonryun.txt create mode 100644 npc/mobs/fields/louyang.txt create mode 100644 npc/mobs/fields/lutie.txt create mode 100644 npc/mobs/fields/mjolnir.txt create mode 100644 npc/mobs/fields/morocc.txt create mode 100644 npc/mobs/fields/niflheim.txt create mode 100644 npc/mobs/fields/payon.txt create mode 100644 npc/mobs/fields/prontera.txt create mode 100644 npc/mobs/fields/umbala.txt create mode 100644 npc/mobs/fields/yuno.txt create mode 100644 npc/mobs/pvp.txt create mode 100644 npc/other/Global_Functions.txt create mode 100644 npc/other/IceCream.txt create mode 100644 npc/other/Valkyrie.txt create mode 100644 npc/other/arena.txt create mode 100644 npc/other/arena_mvp.txt create mode 100644 npc/other/bank.txt create mode 100644 npc/other/books.txt create mode 100644 npc/other/card_remover.txt create mode 100644 npc/other/devnpc.txt create mode 100644 npc/other/gefenia.txt create mode 100644 npc/other/heal.txt create mode 100644 npc/other/heal_payment.txt create mode 100644 npc/other/kafra_bank.txt create mode 100644 npc/other/mc_cameri/bank.txt create mode 100644 npc/other/momotaro.txt create mode 100644 npc/other/msg_boards.txt create mode 100644 npc/other/old/guide.txt create mode 100644 npc/other/old/kafra.txt create mode 100644 npc/other/old/pvp.txt create mode 100644 npc/other/platinum_skills.txt create mode 100644 npc/other/pvp.txt create mode 100644 npc/other/tougijou.txt create mode 100644 npc/other/warper.txt create mode 100644 npc/other/warper2.txt create mode 100644 npc/other/wedding.txt create mode 100644 npc/other/weddingtxt.txt create mode 100644 npc/quests/all_quest.txt create mode 100644 npc/quests/bongun.txt create mode 100644 npc/quests/bongunsword.txt create mode 100644 npc/quests/bunnyband.txt create mode 100644 npc/quests/counteragent_mixture.txt create mode 100644 npc/quests/custom/berzebub.txt create mode 100644 npc/quests/custom/elvenear.txt create mode 100644 npc/quests/custom/event_32_new_hats.txt create mode 100644 npc/quests/custom/excalibur.txt create mode 100644 npc/quests/custom/ironcane.txt create mode 100644 npc/quests/custom/kaho_balmung.txt create mode 100644 npc/quests/custom/kahohorn.txt create mode 100644 npc/quests/custom/new_hats.txt create mode 100644 npc/quests/custom/sunglasses.txt create mode 100644 npc/quests/custom/uneasy_cemetery.txt create mode 100644 npc/quests/custom/valhallen.txt create mode 100644 npc/quests/doomed_swords.txt create mode 100644 npc/quests/fashion.txt create mode 100644 npc/quests/juice_maker.txt create mode 100644 npc/quests/magicalhatquest.txt create mode 100644 npc/quests/monstertamers.txt create mode 100644 npc/quests/mrsmile.txt create mode 100644 npc/quests/munak.txt create mode 100644 npc/quests/quests_alberta.txt create mode 100644 npc/quests/quests_aldebaran.txt create mode 100644 npc/quests/quests_comodo.txt create mode 100644 npc/quests/quests_geffen.txt create mode 100644 npc/quests/quests_lutie.txt create mode 100644 npc/quests/quests_morocc.txt create mode 100644 npc/quests/quests_payon.txt create mode 100644 npc/quests/quests_prontera.txt create mode 100644 npc/quests/quests_umbala.txt create mode 100644 npc/quests/quests_yuno.txt create mode 100644 npc/quests/skills/acolyte_skills.txt create mode 100644 npc/quests/skills/archer_skills.txt create mode 100644 npc/quests/skills/mage_skills.txt create mode 100644 npc/quests/skills/merchant_skills.txt create mode 100644 npc/quests/skills/novice_skills.txt create mode 100644 npc/quests/skills/swordsman_skills.txt create mode 100644 npc/quests/skills/thief_skills.txt create mode 100644 npc/sample/PCLoginEvent.txt create mode 100644 npc/sample/bank_test.txt create mode 100644 npc/sample/gstorage_test.txt create mode 100644 npc/sample/npc_card_remover.txt create mode 100644 npc/sample/npc_equip_sample.txt create mode 100644 npc/sample/npc_extend_shop.txt create mode 100644 npc/sample/npc_sample.txt create mode 100644 npc/sample/npc_shop_test.txt create mode 100644 npc/sample/npc_test_arena.txt create mode 100644 npc/sample/npc_test_array.txt create mode 100644 npc/sample/npc_test_chat.txt create mode 100644 npc/sample/npc_test_ev.txt create mode 100644 npc/sample/npc_test_func.txt create mode 100644 npc/sample/npc_test_npctimer.txt create mode 100644 npc/sample/npc_test_skill.txt create mode 100644 npc/sample/npc_test_str.txt create mode 100644 npc/sample/npc_testchkoption.txt create mode 100644 npc/sample/npc_time_sample.txt create mode 100644 npc/warps/cities/alberta.txt create mode 100644 npc/warps/cities/aldebaran.txt create mode 100644 npc/warps/cities/amatsu.txt create mode 100644 npc/warps/cities/comodo.txt create mode 100644 npc/warps/cities/geffen.txt create mode 100644 npc/warps/cities/gonryun.txt create mode 100644 npc/warps/cities/izlude.txt create mode 100644 npc/warps/cities/louyang.txt create mode 100644 npc/warps/cities/lutie.txt create mode 100644 npc/warps/cities/morroc.txt create mode 100644 npc/warps/cities/niflheim.txt create mode 100644 npc/warps/cities/payon.txt create mode 100644 npc/warps/cities/prontera.txt create mode 100644 npc/warps/cities/umbala.txt create mode 100644 npc/warps/cities/yggdrasil.txt create mode 100644 npc/warps/cities/yuno.txt create mode 100644 npc/warps/disabled_warps.txt create mode 100644 npc/warps/dungeons/alberta_duns.txt create mode 100644 npc/warps/dungeons/alde_ct.txt create mode 100644 npc/warps/dungeons/amatsu_dun.txt create mode 100644 npc/warps/dungeons/ant_hell.txt create mode 100644 npc/warps/dungeons/coal_mine.txt create mode 100644 npc/warps/dungeons/com_dun.txt create mode 100644 npc/warps/dungeons/geffen_dun.txt create mode 100644 npc/warps/dungeons/gon_dun.txt create mode 100644 npc/warps/dungeons/izlude_dun.txt create mode 100644 npc/warps/dungeons/louyang_dun.txt create mode 100644 npc/warps/dungeons/lutie_dun.txt create mode 100644 npc/warps/dungeons/morroc_duns.txt create mode 100644 npc/warps/dungeons/orc_dun.txt create mode 100644 npc/warps/dungeons/payon_dun.txt create mode 100644 npc/warps/dungeons/prt_dun.txt create mode 100644 npc/warps/dungeons/umbala_dun.txt create mode 100644 npc/warps/dungeons/yuno_dun.txt create mode 100644 npc/warps/fields/amatsu_fild.txt create mode 100644 npc/warps/fields/com_fild.txt create mode 100644 npc/warps/fields/gefenia.txt create mode 100644 npc/warps/fields/geffen_fild.txt create mode 100644 npc/warps/fields/glastheim.txt create mode 100644 npc/warps/fields/jawaii.txt create mode 100644 npc/warps/fields/lutie_fild.txt create mode 100644 npc/warps/fields/morroc_fild.txt create mode 100644 npc/warps/fields/mtmjolnir.txt create mode 100644 npc/warps/fields/payon_fild.txt create mode 100644 npc/warps/fields/prontera_fild.txt create mode 100644 npc/warps/fields/umbala_fild.txt create mode 100644 npc/warps/fields/yuno_fild.txt create mode 100644 npc/warps/guild/guildcastles.txt create mode 100644 npc/warps/other/jobquests.txt create mode 100644 npc/warps/other/other.txt create mode 100644 npc/warps/pvp/pvp.txt (limited to 'npc') diff --git a/npc/Changelog.txt b/npc/Changelog.txt new file mode 100644 index 000000000..9dcf48606 --- /dev/null +++ b/npc/Changelog.txt @@ -0,0 +1,205 @@ +== Progress == + +Person Working On +====== +Darkchild + * New Payon City - 99% - As Far Done As Posible + * Alchemist - Done + * Sage - Done + * Monk Quest - Botting An Acolyte Atm +Lupus + * Marriage (Fix, optimization) - 70% + * fixing skill quests/ kafras to work with high classes + * removing a loop from grandpa_pharmacist.txt (similiar to Juice quest) 0% +kobra_k88 + * Optimize WoE + * Easter Egg event +Aria + * Debugging/Overlooking NPCs. + * Making misc npcs + * Making the "Dev edition" npcs =D - 80% - Final layout finished, need more devs to put their quotes in. +Shinigami + * Organizing/Optmizing/Checking for Typo in all NPCs. +Mass Zero + * Novice Training Ground. + * (Probably unofficial) Lou Yang NPC's, mobs, etc... +Other Ppl + * Their Work? + +== Changelog == + +Date Added +====== +11/02 + * Added unofficial nguild castles. Updated stats for Stone Shooter, Wooden Golem, Hyegun, + Civil Servant, Dancing Dragon, Baby Garm, and Increase Soil mobs in mob db. Drops are still + missing for some of them.[kobra_k88] +11/01 + * Set Comodo Kafra to warp to Umbala (11/2/04 patch) [Aria] +10/31 + * Fixed Dev NPCs giving off errors... [Aria] + * Fixed prob. with duplicating mobs in wizard.txt. Corrected some item names in sage.txt. Corrected mode values + for hornet, wolf, baby desert wolf, and peco peco in mob db.[kobra_k88] +10/30 + * Commented out unfinished Dev NPCs and added npc line to map_athena.conf [Aria] +10/29 + * Added missing Lmenu label to novice.txt.[kobra_k88] +10/27 + * Re-organized mob scripts.[kobra_k88] + * Updated mob placements with info from emperium.org.[Lupus] + * Fixed Aldebaran (gatekeeper conditions bugs and wrong Key ID). Fixed some typos in other cities [Lupus] + * assassin.txt, rogue.txt: added clothes dye reset before job change since + thiefs with custom dyes were getting errors upon job change. + updated towns.txt and nopenatly.txt mapflags.[kobra_k88] +10/26 + * Added more quotes -_- [Aria] + * Fixed Mouse's devnpc only saying his quotes once per server reset [Aria] + * Fixed Umbalian Quest, fixed Amatsu, fixed Niflheim NPCs, Warper2 NPC, fixed 1 warp [Lupus] + +10/25 + * updated Mousejstr in devnpc [ MouseJstr] +10/23 + * Finished Aria and MC Cameri "Dev edition" NPCs. [Aria] + * gldfunc_ev_agit.txt: added F_AgitEnd func. + prtg_guardians.txt: fixed typos where I used OnInit instead of OnAgitInit. + Minor cosmetic changes to various guild script files. [kobra_k88] + +10/21 + * Replaced some checkcart and checkoption(x) with checkcart(0) in the guild folder [Aria] + * Waiting for various devs to tell me their coords, map, biography, quotes, + moving coords, etc. In the meantime, I replaced them with (x,y),(lols), + (sprite),(somewhere), and if they didn't give me any info, I didn't + add them yet =P. [Aria] + * Added Davidsiaw, Shinigami, Lord, Codemaster, MouseJstr, MC Cameri, and Darkchild + to "Dev edition" NPCs [Aria] + * Revised "Dev edition" NPC layout a bit, should go smoother now. Should be final + layout unless something goes wrong =O. [Aria] + * Changed "Dev edition" NPC layout so that they move by themselves by timers. [Aria] + * Changed "Dev edition" NPCs to walk during quotes, and added biography. [Aria] + * Fixed quest/all_quest.txt not showing the correct description of the binoculars. [Aria] + * Fixed quest/all_quest.txt not going to stop pass and not displaying requirements. [Aria] + * Fixed clothes_dyer.txt: Disabled Assassing/Rogues Dye. Also fixed wrong labels [Lupus] + * Fixed hair_dyer.txt: fixed missing menu label [Lupus] + * new_hats.txt 1.4 fixed amount of Fish Tail (300 -> 30), Zeny bugs in Ear of Angel, + Ear of Demon,Big Golden Bell, Mistress Crown, + Crown of The Ancient Queen, Indian Headband, Orc Hero Helm [Lupus] + * Fixed name of a flower in Prontera quest (Dreamy->Illusion) according to our DB [Lupus] + * Fixed item names in the temp Crusader Job Quest according to our DB [Lupus] + +10/20 + * Finished basic layout, finished Aria starting to create Shinigami [Aria] + * Started to create "Dev edition" npcs [Aria] + * Fixed Castle aldg504-1 warp [Lupus] + * Fixed Payon's Skirt of virgin quest [Lupus] + * Fixed Doomed swords quest [Lupus] + * Optimized mapflags (removed useless nobranc flag, where gvg flag is set) + +10/16 + * Fixed my stupid mistake with the guild switches. + Moved shops from umbala.txt to shops.txt. Commented out the other ones. + Updated mapflags and re-organized them again. Files in "mapflag\type" folder are the + same as ones in "mapflag" folder, just organized differently. ONLY use 1 set.[kobra_k88] + * Corrected Morroc warp npc overlaying Kafra npc. [Aria] + * Corrected kafra typo. [Shinigami] + * Corrected zeny amount subtracted for iron hammer in refine.txt[kobra_k88] +10/15 + * Added kafra_bank NPC - a new bank with daily interst of 0.1#%. [Lupus] +10/14 + * Kafras: Fixed some minor typos. Corrected savepoints for geffen, orc dun, comodo kafras. + Added another argument to F_KafEnd. Added correct payon warp point.[kobra_k88] + * Forgot some qutoes in class check function calls in Blacksmith, Assassin, Wizard, Hunter + quests, added them.[kobra_k88] + * Added optimized version of WoE scripts. Moved old version to "old" folder. +10/07 + * Fixed Doctor Band items [Lupus] +10/06 + * Removed a left over if statement that caused the Blacksmith script to hang durring + job change.[kobra_k88] +10/04 + * Implemented class check functions in all skills quests except novice. [kobra_k88] + * Implemented class check functions in hunter, blacksmith, wizard, and + assassin quests. Fixed some bugs in assassin quest. Also implemented + new Ontouch label function and close2 command in assassin.txt.(see file for details). [kobra_k88] + * Removed single job check functions from Global_Functions.txt and completed + the rest of the multiple job check funtions. Also added advanced and high + job classes to the checks.[kobra_k88] + * Fixed some typos in inn.txt. Switched from @variables to arguments. [kobra_k88] + +10/03 + * Minor changes in Counteragent/Mixture Morgenstein Quest, a fix of Uneasy Cemetary [Lupus] + +10/02 + * Added Crusader Quest [Lupus] + +09/26 + * Cleared Up Npc Folder For Release [Darkchild] + +09/24 + * Added Sage Job Quest [Darkchild] + * Updated a few Payon files [Darkchild] + - Removed Double Warp + - Placed BunnyBand Quest Npc Better + - Updated Pvp People's Locations + - Updated Warper/Warper2 Loc and Warp + - Same for Wapra 2 + - Removed Msg Boards In Payon + - Updated Heal and Heal Payment Loc + - Commented Out a Falcon Renter which shouldnt be there + - Updated Guide's Viewpoints + - Bugs Were All Reported On The Forums + * Update Heal and Heal Payment Npcs To All Be Healrings [Darkchild] + +09/23 + * Added a loopless option "Gimme as many as possible" into Juice Maker quest [Lupus] + +09/19 + * Added missing warp mjol17 [Lupus] + +09/17 + * Added Correct Niflheim Dialogs + +09/16 + * Added nude; to palace guard in payon, will disarm player [Darkchild] + +09/14 + * Added New Dye Npc, Has 'browse' option [Darkchild] + * Fixed skillpoints check in Hunter Job Quest [Lupus] + +09/13 + * Added better save point inside city for payon [Darkchild] + * Fixed lil bug in Drunk npc in payon [Darkchild] + +09/12 + * Deleted Old Non-Quest Alchemist Job Change [Darkchild] + * Added Alchemist Job Quest [Darkchild] + * Added Alchemist Shop [Darkchild] + * Changed Bain Bro's To Work With Alchemist Quest [Darkchild] + * Changed CounterAgent and Mixture Quest To Work With Alchemist Quest [Darkchild] + * Added Inn Npcs [Darkchild] + +09/10 + * Added cities/payon.txt. All Npcs at correct location, only 5 npcs arent translated. [Darkchild] + * Submitted Alchemyst Job Quest and Sage Job Quest (to help DC in his work). These quests are ports. [Lupus] + +09/07 + * Better New Payon, All Except cities, will do 2morrow :P [Darkchild] + * Added Rogue job quest. [kobra_k88] + * Added missing cutin commands to town guides. [kobra_k88] + * Removed the delitem 2312(padded armor) in swordman_skills.txt as the + armor is not supposed to be removed. The npc is only supposed to check + for it and not delete it. This is how it is on official servers. [kobra_k88] + * Removed duplicate waprs from izlude.txt, comodo.txt, morroc.txt, and jobquest.txt. + Added complete rogue warps. Removed traingnd.txt file as those warps are + already in jobquest.txt. Added correct tabs to first 2 warps in louyang.txt. [kobra_k88] + * Fixed various typos in kafra files. Now using arrays for the teleport service. + Also added guild options. [kobra_k88] + +09/06 + * Forgot the dun/field warps for payon, added now! [Darkchild] + * Fixed: add a forgotten "delitem 2312,1;" in quest/skills/swordmand_skils.txt [Yor] + +09/05 + * Fixed 2 Bugs In Super Novice Script [Darkchild] + * Added Super Novice Official Quest [Darkchild] + + - Started Changelog: Same As Normal Changelog, but now for scripts, here we can put every lil thing we change :) diff --git a/npc/cities/alberta.txt b/npc/cities/alberta.txt new file mode 100644 index 000000000..f81397e72 --- /dev/null +++ b/npc/cities/alberta.txt @@ -0,0 +1,873 @@ +//===== eAthena Script ======================================= +//= Alberta Town +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Negative input bug fixed [Lupus] +//============================================================ + + + +// Young Man ----------------------------------------------------------- +alberta_in.gat,20,183,6 script Young Man 49,{ + mes "[Merchant]"; + mes "People say that ^0000ffGungnir^000000, the legendary bow, never missess its' target. If that's true, then it's simply amazing."; + close; +} + +// Merchant ------------------------------------------------- +alberta.gat,97,51,7 script Merchant 84,{ + mes "[Merchant]"; + mes "When you travel to many places like I do, you often here alot of rumors. There is one rumor I heard that is really interesting."; + next; + mes "[Merchant]"; + mes "Apparently there are cards which seal the power of certain monsters within them."; + mes "If someone is able to obtain one of those cards, he/she will obtain the power of the monster..."; + next; + mes "[Merchant]"; + mes "Bah! I don't believe it though."; + close; +} + +// Merchant --------------------------------------------------------- +alberta.gat,53,39,8 script Merchant 74,{ + mes "[Merchant]"; + mes "Oh, you look like a stranger. Welcome to Alberta."; + emotion 0; + next; + mes "[Merchant]"; + mes "I was just brainstorming on some ideas I have for my business."; + next; + mes "[Merchant]"; + mes "You see, I heard that there is a store in Geffen that sells unique armor that is resistant to magic attacks."; + mes "If I could somehow get them in bulk for a low price and sell them to the people in other towns......"; + next; + mes "[Merchant]"; + mes "Cha-ching! (you see dollar signs in her eyes)"; + emotion 8; + close; +} + +// Merchant ------------------------------------------------- +alberta.gat,58,80,8 script Merchant 99,{ + set @TEMP,0; + mes "[Merchant]"; + set @TEMP,rand(2); + if(@TEMP == 1) goto R_1; + + R_0: + mes "We merchants can open a roadside stand and do business. With the ^0000ffDiscount skill^000000 we can buy goods from stores for low prices."; + next; + mes "[Merchant]"; + mes "We can also rent carts which allow us to load up with goods and make our business portable."; + mes "This way, business is more convenient and safe."; + close; + R_1: + mes "We merchants can negotiate with store NPCs to get more money for items we sell to them by using the skill ^ff0000Overcharge^000000."; + next; + mes "[Merchant]"; + mes "The most we can overcharge NPCs is by 24%, but it takes some hard work and training to get the skill!!"; + close; +} + +// Phina ------------------------------------------------------- +alberta.gat,62,156,2 script Phina 102,{ + + set @TEMP,3; + set @TEMP,rand(3); + + mes "[Phina]"; + + if(@TEMP == 2) goto R_2; + if(@TEMP == 1) goto R_1; + if(@TEMP == 0) goto R_0; + + R_2: + mes "This one time, I was walking in the forest and I saw a long, slender piece of green grass sticking out on the ground."; + next; + mes "[Phina]"; + mes "It was soooo cute that I wanted to touch it. And when I did, you know what happend? The grass actualy slapped my hand."; + next; + mes "[Phina]"; + mes "I was startled and so I backed off a bit. I then realized that it was not grass but a very small creature."; + emotion 0; + next; + mes "[Phina]"; + mes "Even calm monsters can be very dangerous when they feel threatened. So don't startle them by mistake."; + close; + + R_1: + mes "You know those dumb-looking bears that live in the forest connecting Alberta and Payon?"; + mes "You know... the ones that play around with the flies that make that buzzing noise."; + next; + mes "[Phina]"; + mes "Well one time I threw a twig at one just for fun. All of the sudden, IT RUSHED TOWARDS ME!"; + next; + mes "[Phina]"; + mes "I was SOOOO scared!! I quickly jumped to the side to avoid it. Then BAMB!!! It hit a huge tree and crushed it into pieces."; + emotion 16; + next; + mes "[Phina]"; + mes "I sure learned my lesson that day. NEVER taunght any creature cause if they get angry, you'll be in a world of hurt."; + close; + + R_0: + mes "Did you know? Wolves are much more cooperative than they might seem. If one of them is attacked, then others will come to help him."; + next; + mes "[Phina]"; + mes "So becarefull if you ever decide to fight one."; + close; +} + +// Grandma ----------------------------------------------------- +alberta.gat,93,174,2 script Grandma 103,{ + mes "[Grandma]"; + mes "Some time ago a derelict ship drifted into the Alberta harbor. Some of the town's young people went into the ship to find survivors."; + next; + mes "[Grandma]"; + mes "But after a few moments they all ran out terrified. They said that they saw CORPSES walking around the ship!."; + next; + mes "[Grandma]"; + mes "The ship was also over run by never before seen sea monsters which made it impossible for the towns people to get around."; + next; + mes "[Grandma]"; + mes "We've never been able to doing anything about that ominous-looking ship so we just left it there, hoping that it would sink or drift away."; + next; + mes "[Grandma]"; + mes "Then out of nowhere the Cool Event Corp. people came by and paid the city a huge amount zeny to buy the ship."; + next; + mes "[Grandma]"; + mes "They then created an event called the ^0000ddSunken Ship^000000."; + next; + mes "[Grandma]"; + mes "They invited young warriors from all over to enter the ghost ship and test their skills fighting the mosters in it."; + next; + mes "[Grandma]"; + mes "Now the ghost ship, that was once a problem for Alberta, has become quite a popular attraction."; + next; + mes "[Grandma]"; + mes "I have to say though, that I don't think it's worth risking your life for......"; + close; +} + +// Drunken old man ---------------------------------------------------------------- +alberta.gat,131,139,4 script Drunken old man 709,{ + mes "[Drunken old man]"; + mes "(~hiccup~)... Huh?... Wh-what are you staring at? Get lost!!"; + next; + menu "Stay",M_0,"Leave him alone",M_1; + + M_0: + mes "[Drunken old man]"; + mes "Hahahaha (~hiccup~)... So you got some nerve..."; + next; + mes "[Drunken old man]"; + mes "Heh... I may look worthless now, but back in the day I was a handsome sailor on board the `Going Mary'."; + next; + menu "Is that a ship?",sM_0,"Really? No kidding!",sM_1; + + sM_0: + mes "[Drunken old man]"; + mes "What? Ya never heard of it? Stupid! Everybody knows the notorious pirateship `Going Mary'! (~hiccup~)"; + emotion 1; + next; + sM_1: + mes "[Drunken old man]"; + mes "Ah~ the good ol'days... only... if only we hadn't run into that STORM... (~hiccup~)"; + next; + mes "[Drunken old man]"; + mes "AH~ Captian. I miss our capt'n more than anything.... no foe could ever survive capt'n's sword."; + mes "CAPTIAN~~~!!! (~HICCUP~) He'd swing his sword like THIS!... then... THEN...!!!"; + next; + mes "[Drunken old man]"; + mes "The enemy and anything around him was surrounded by flames! Now that I think of it, the sword must've had some sort of mysterious power."; + next; + mes "[Drunken old man]"; + mes "(~sigh!~) (~sob, sob~)... God I miss everyone... Now I'm depressed. Just go away and leave me be....."; + emotion 28; + close; + + M_1: + mes "[Drunken old man]"; + mes "That's right! Go AWAY~"; + emotion 32; + close; +} + +// Soda Man ---------------------------------------------------- +alberta.gat,90,71,3 script Soda Man 89, +{ + mes "[Soda Man]"; + mes "Ummm.... delicious...."; + emotion 33; + next; + mes "[Soda Man]"; + mes "Wait! Don't bother me right now. Hmm? What am I doing you ask? Well isn't it obvious what I'm doing?"; + mes "Look at this! I've mixed sugar and soda together in this container. Watch what happens when I heat it up."; + next; + mes "[Soda Man]"; + mes "The two ingredients will melt soon and intermix. When the color of the mixture turns brown, we have to stop heating it."; + mes "At that point it will have a marshmallow consistency."; + next; + mes "[Soda Man]"; + mes "You see what I am talking about now? Do you think it's valuable?........ What?..... No?....."; + mes "Hmm... then what about the story of the old man who almost conquered ^5555FFTurtle Island^000000?"; + next; + mes "[Soda Man]"; + mes "Go to the inn and you'll find an old drunkard there. When you speak to him at first, it may seem like he's taliking nonsense."; + mes "But be patient and if you listen to his words carefully you may be able to pick up some usefull information."; + next; + mes "[Soda Man]"; + mes "Oh, and there is a letter on the table inside of that old man's room. It's a scary story about Turtle Island."; + close; +} + + +//<=================================================== Marina (Docks/Port) ===================================================>\\ +// Sailor Fisk ---------------------------------------------------------------- +alberta.gat,189,151,5 script Sailor Fisk 100,{ + mes "[Sailor Fisk]"; + mes "Ahoy matey, where'd ya wanna go?"; + next; + menu "Izlude Marina -> 500 Zeny.",M0,"Quit",M_End; + + M0: + if(Zeny < 500) goto NoZenyM1; + set Zeny, Zeny - 500; + warp "izlude.gat",176,182; + close; + + NoZenyM1: + mes "[Sailor Fisk]"; + mes "I'm sorry but i told you i would need 500 Zeny, and it looks like you dont have it."; + close; + + M_End: + close; + +} + +// Phelix ------------------------------------------------------------------ +alberta.gat,190,173,4 script Phelix 85,{ + + mes "[Phelix]"; + mes "What the hell are you doing here?"; + next; + mes "[Phelix]"; + mes "There is nothing you can get for free on this ship, if you want to get rewarded, do some work!!"; + next; + mes "[Phelix]"; + mes "Hmm, however I'd be willing to trade you some items for your jellopies."; + mes " - For ^0000ff10 Jellopies^000000 I'd be willing to give you ^ff00001 potion^000000."; + mes " - For ^0000ff3 Jellopies^000000 I'll give you ^ff00001 sweet potato^000000."; + next; + mes "[Phelix]"; + mes "How does that sound?"; + next; + menu "Sounds good",M_Yes,"Na",M_End; + + M_Yes: + mes "[Phelix]"; + mes "What do you want to exchange your jellopies for?"; + next; + menu "Red Potion please.",M_0,"Sweet Potato please.",M_1,"Cancel",M_End; + + M_0: + set @item, 501; + goto L_Get; + + M_1: + set @item, 516; + + L_Get: + mes "[Phelix]"; + mes "Please enter an amount. Enter 0 to cancel."; + next; + set @input,0; + input @input; + if(@input < 1) goto M_Yes; //fixed by Lupus + + if(@item == 501) set @amount, @input*10; + if(@item == 516) set @amount, @input*3; + if(countitem(909) < @amount) goto L_NotEnough; + + getitem @item,@input; + delitem 909, @amount; + close; + + L_NotEnough: + mes "[Phelix]"; + mes "I'm sorry but you do not have enough jellopy."; + next; + goto M_Yes; + + M_End: + close; +} + + +//<=================================================== Sunken Ship ======================================================>\\ +// Paul ---------------------------------------------------------------- +alberta.gat,195,151,3 script Paul 86,{ + mes "[Paul]"; + mes "Good day. Would you like be part of the Sunken Ship event, provided by Cool Event Corp.?"; + next; + mes "[Paul]"; + mes "Oh! I better warn you, this event is only suitable for HIGH LEVEL warriors."; + emotion 0; + next; + mes "[Paul]"; + mes "So what do you say? It only cost 200 zeny to participate and you'll get a ton of experience, gauranteed."; + next; + menu "Enter",M_0,"Quit",M_End; + + M_0: + if(Zeny < 200) goto L_NoZeny; + set Zeny, Zeny - 200; + warp "alb2trea.gat",62,69; + close; + M_End: + mes "[Paul]"; + mes "Come back anytime."; + close; + + L_NoZeny: + mes "[Paul]"; + mes "I'm sorry but i told you I would need 200 Zeny, and it looks like you dont have it."; + mes "Please come back later when you have enough."; + close; +} + +// Sailor -------------------------------------------------- +alb2trea.gat,39,50,5 script Sailor 100,{ + mes "[Sailor]"; + mes "Do you wanna return?"; + next; + menu "Return to Alberta",M0,"Quit",MEnd; + + M0: + warp "alberta.gat",192,169; + close; + MEnd: + close; +} + + +//<====================================================== Turtle Island ========================================================>\\ +// Gotanblue -------------------------------------------------------------------------- +alberta.gat,247,123,5 script Gotanblue 709, +{ + if(TURTLE == 1) goto L_Turtle; + mes "[Gotanblue]"; + mes "Ha ha! The sea seems endless!! We cannot begin to grasp it's size merely by gazing at it from land...."; + next; + mes "[Gotanblue]"; + mes "Do you know what I mean?....."; + close; + +L_Turtle: + mes "[Gotanblue]"; + mes "Oh! Your eyes.... they tell me everything!! You must have been sent from that drunken old man!"; +M_Menu: + next; + menu "-Tell me about Turtle Island.",M_1, "-How Can I get there?",M_2, "-End Conversation",M_End; + + M_1: + mes "[Gotanblue]"; + mes "So you wanna know about Turtle Island?... You think it's a great place?... Do you like it that much?..."; + next; + mes "[Gotanblue]"; + mes "Well let me tell you something...."; + next; + mes "[Gotanblue]"; + mes "TURTLE ISLAND TOOK THE LIVES OF MY CLOSEST FRIENDS!!"; + emotion 0; + next; + mes "[Gotanblue]"; + mes "Can you POSSIBLY understand??........."; + next; + mes "[Gotanblue]"; + mes "It all happened a few decades ago...."; + next; + mes "[Gotanblue]"; + mes "^5555FFJornadan Niliria^000000 and our comrades set off on a journey to find out if the legends about the island were true."; + next; + mes "[Gotanblue]"; + mes "It was summer when I was approached to become a member of Jornadan's team."; + mes "I was only 20 then, and it was a huge honor for me to be a part of such a well respected group of men."; + next; + mes "[Gotanblue]"; + mes "Jornadan Niliria was a great treasure hunter, I was the best seaman of the bunch, and the others were all the very best at what they did."; + next; + mes "[Gotanblue]"; + mes "We decided to start our great adventure here, in Alberta. This was because of a clue we found that put the location of Turtle Island near Alberta."; + next; + mes "[Gotanblue]"; + mes "We were all very exited and full of hope! We left everything behind and set sail to seek Turtle Island!"; + mes "We sailed all day and all night. We eventually ran adrift, and could do nothing but sit and wait as the days passed....."; + next; + mes "[Gotanblue]"; + mes "Then one day... without warning... we were surrounded by a tremendously thick blanket of fog!!"; + mes "It was impossible to see anything past the length of your own arm!"; + next; + mes "[Gotanblue]"; + mes "We could not tell which way was East and which way was West. But it didn't matter... for we were all exhausted at that point."; + next; + mes "[Gotanblue]"; + mes "Then what we feared most happened. A huge rock formation piereced through the fog right in front of us!"; + mes "There was no way to avoid it and we crashed violently into it, severly damaging our ship!!"; + emotion 0; + next; + mes "[Gotanblue]"; + mes "Amazingly the ship held together and we were able to continue on."; + next; + mes "[Gotanblue]"; + mes "Then like a beam of energy descending down from the heavens, the first ray of sunlight we had seen in weeks piereced through the fog onto our battered ship."; + next; + mes "[Gotanblue]"; + mes "And like magic the fog lifted to reveal what we had been searching so long and hard for.... that legendary place.... TURTLE ISLAND!!!!"; + next; + mes "[Gotanblue]"; + mes "We set up camp immediately and rested our weary bodies. A few days later we began to extensively search the island."; + mes "What we found was shocking! Apparently someone had found the island before us. He left a very well kept journal of his expidition."; + next; + mes "[Gotanblue]"; + mes "According to his journal, the man had come by himself to find the island. Unfortunatley we could not find him anywhere."; + next; + mes "[Gotanblue]"; + mes "Even though someone had beaten us to Turtle Island, we still felt that it was an accomplishment to have made it to the island."; + mes "We continued to explore the island and find out as much about it as we could."; + next; + mes "[Gotanblue]"; + mes "A particular artifact caught our interest. It was mentioned in that man's journal...."; + mes "Oh, now I remeber his name... ^5555FF'Won'^000000... apparently a great sword master...."; + next; + mes "[Gotanblue]"; + mes "Anyway, he wrote about a '^FF5555Jewel Fragment'^000000 of some kind. He described it as, 'the most beautifull thing in the world'."; + next; + mes "[Gotanblue]"; + mes "We became intent on finding that jewel no matter what. Day after day we searched for it. Months passed."; + mes "But even with Won's journal records, we were not able to find the jewel fragment. We had no choice but to give up."; + next; + mes "[Gotanblue]"; + mes "So we packed up our belongings and headed home. Again we passed througth the horrible dense fog."; + mes "After a month of sailing our journey was near its end... or so we thought."; + next; + mes "[Gotanblue]"; + mes "We spotted land and I breathed a sigh of relief... unfortunatley that feeling of relief turned into bewilderment as I realized that..... that...."; + next; + mes "[Gotanblue]"; + mes "IT WAS TURTLE ISLAND!!! We had landed on the other side of the island! We had no idea how it happened but we immediatley cast off once again."; + emotion 0; + next; + mes "[Gotanblue]"; + mes "And as if some foul curse and been placed on our group, we again found ourselves on the shores of Turtle Island."; + mes "Time after time we attempted to flee the island only to find ourselves back on it. A whole year passed and still, we were trapped!"; + next; + mes "[Gotanblue]"; + mes "It was beyond reason.... We had tried every possible path.... Our spirits were broken, our hopes were crushed...."; + mes "And one by one, my comrades fell, no longer having the strength to find a way home...."; + next; + mes "[Gotanblue]"; + mes "CURSED ISLAND!!!!!"; + emotion 23; + next; + mes "[Gotanblue]"; + mes "As you can see only I and Jornadan were able to make it out alive. By pure luck we made back to Alberta...."; + next; + mes "[Gotanblue]"; + mes "(~sob~sob~sob)... I appologize... I'm am still very emotional about it after all these years... well that is all I have to say about Turtle Island."; + emotion 28; + goto M_Menu; + + M_2: + mes "[Gotanblue]"; + mes "What's this? After my terrifying story about Turtle Island you still want to got there? You're not at all scared??"; + emotion 1; + next; + mes "[Gotanblue]"; + mes "So be it... but you will need me as your guide and that will cost 10,000 zeny!"; + next; + menu "Turtle Island -> 10000 zeny",sM_1, "Cancel",sM_End; + + sM_1: + if(Zeny < 10000) goto sL_Zeny; + mes "[Gotanblue]"; + mes "Alright!! You've made your choice! With my experience we will get to Turtle Island without any problems."; + mes "I admire your fighting spirit. Carry it with you always!"; + next; + mes "^5555FF(you and Gotanblue climb onboard his little steamboat)^000000"; + next; + mes "[Gotanblue]"; + mes "We are now heading towards Turtle Island. Let us go withouth fear!!"; + next; + mes "^5555FF(~choo~choooo~)^000000"; + next; + set Zeny, Zeny - 10000; + warp "tur_dun01.gat",154,39; + close; + + sL_Zeny: + mes "[Gotanblue]"; + mes "What's this? I said 10000 zeny. I will not guide you for less. Good day!"; + emotion 1; + close; + sM_End: + mes "[Gotanblue]"; + mes "A very good choice!! Turtle Island is a DREADFULL and EVIL place!"; + mes "When I take people there, I feel as if I'm leading them to their DEATHS!"; + close; + + M_End: + mes "[Gotanblue]"; + mes "To this day, Turtle Island is shrowded in mystery. It is extremely hard to find, and almost impossible to escape from."; + mes "If you do not want to suffer great despair, then leave the truth behind Turtle Island as it is.... unknown...."; + close; +} + +// Turtle Grandpa ------------------------------------------------------------------- +alberta_in.gat,23,104,2 script Turtle Grandpa 120, +{ + mes "[Turtle Grandpa]"; + mes "~Buuurrrpp!!!~ Oops..."; + emotion 4; + next; + mes "[Turtle Grandpa]"; + mes "It's beyond me why people seem to think that Alberta is the center of world trade."; + mes "I mean, this place doesn't even have a decent bar for crying out loud!!"; + emotion 6; + next; + mes "[Turtle Grandpa]"; + mes "Why is it that I have to resort to drinking in a place like this??"; + emotion 1; + next; + menu "-Tell me about Turtle Island.",M_0, "-How can I get there?",M_1, "-End conversation.",M_End; + + M_0: + mes "[Turtle Grandpa]"; + mes "There is an enormous stash of treasure hidden on Turtle Island."; + mes "There is also a special potion that can increase a person's lifespan on that island......"; + next; + mes "[Turtle Grandpa]"; + mes "There are so many myths and legends about the island, that no one even knows for sure if Turtle Island exist."; + next; + mes "[Turtle Grandpa]"; + mes "I for one believe it does.... it HAS TOO!!......"; + emotion 0; + next; + mes "[Turtle Grandpa]"; + mes "If you are any sort of seaman, if you have a spirit for adventure, and if you have the heart to become a great treasure hunter...."; + mes "Then you may be worthy of the information I have to offer..."; + next; + menu "-(~eyes twinkle~)",sM_0, "-Heck Ya! Gimme that information.",sM_1; + + sM_0: + mes "[Turtle Grandpa]"; + mes "His name was ^5555FFJornadan Niliria^000000. Jornadan and his ten comrades set off on a journey to find the legendary Turtle Island."; + next; + mes "[Turtle Grandpa]"; + mes "At first they had no idea where the island was. They were ambitious and worked extemely hard to gather clues on the whereabouts of the island."; + next; + mes "[Turtle Grandpa]"; + mes "These men were very strong, especially Jornadan. He was so strong in fact, that his simple kicks were as powerfull as a level 10 bash!!!"; + next; + mes "[Turtle Grandpa]"; + mes "He could catch an arrow in one hand while healing a comrade with the other, all during the middle of a battle!"; + next; + mes "[Turtle Grandpa]"; + mes "Heh heh. Well, it's just a rumor so take it for what it's worth. As I was saying...."; + next; + mes "[Turtle Grandpa]"; + mes "After searching tirelessly Jornadan and his crew eventually found the famed, Turtle Island."; + next; + mes "[Turtle Grandpa]"; + mes "But for reasons unknown, the crew became stranded on the island forever!!"; + mes "Although I do not know why or how it happened, there IS one person that does."; + next; + mes "[Turtle Grandpa]"; + mes "Go the docks on the east end of town. Look for a scholar named.... ^FF3333Jornadan^000000... ^FF3333Niliria^000000..."; + mes "Speak to him. He should be able to tell you more..... "; + next; + mes "[Turtle Grandpa]"; + mes "Oh! One more thing... look for his '^5555FFjournal^000000'. He usually has it close by. It's definately an interesting read."; + set TURTLE, 1; + set JORNADAN, 1; + close; + sM_1: + mes "[Turtle Grandpa]"; + mes "No way! I have no interest in speaking with someone with greed in his/her heart!"; + emotion 0; + next; + mes "[Turtle Grandpa]"; + mes "Get OUT of my sight!!! GO HOME!"; + emotion 6; + next; + mes "[Turtle Grandpa]"; + mes "What's this?? You're still here?..... GO! GO AWAY!!............"; + emotion 27; + close; + + M_1: + mes "[Turtle Grandpa]"; + mes "It's is extremely hard to find, and even more difficult to reach. The likelyhood of returning home is slim at best...."; + next; + mes "[Turtle Grandpa]"; + mes "Actually..... IT'S IMPOSSIBLE!!!!"; + emotion 0; + next; + mes "[Turtle Grandpa]"; + mes "Yet you still want to go there??"; + emotion 1; + next; + mes "[Turtle Grandpa]"; + mes "I want to warn you about the dangers of going there.... but.... I feel so dizzy..... wooah..... it must be the Vodka...."; + next; + mes "[Turtle Grandpa]"; + mes "Anywho, if you go the docks you'll find a fat, old, sailor. His name is ^5555FFGotanblue^000000."; + mes "Tell him I sent you and maybe he'll tell you how to get to Turtle Island. Well good luck."; + close; + + M_End: + mes "[Turtle Grandpa]"; + mes "whooops......"; + next; + mes "!!KA-PLOP!!(collapses on the floor)"; + next; + mes "[Turtle Grandpa]"; + mes "he he he.... lookee me.... I'm a fish... I'm drunk like a fish..... enough for today..... ~ZZZZZzzzz~"; + close; +} + +// Letter of an explorer (on Turtle Grandpa's desk)------------------------------------------------------------------ +alberta_in.gat,17,101,1 script Letter of an explorer 111, +{ + mes "~ The letter reads... ~"; + mes "- O/X/XOVX -"; + mes "If you find this letter, it means that our expidition to Turtle Island has failed. Please inform the others..."; + next; + mes "~ continued...~"; + mes "As of now, only half the number of our crew members are left. Our food supply will only last for ten more days. It is a grave situation we are facing...."; + next; + mes "~ continued...~"; + mes "- V/O/XOVX -"; + mes "It seems my letters did not make it to the outside world, and have instead come back to me.... This damn island is CURSED!! Oh God....."; + next; + mes "~ continued...~"; + mes "GOD FORSAKEN ISLAND!! There is nothing left to eat..... help... me... please.... HELP ME!!"; + next; + mes "~ continued...~"; + mes "- V/X/XOVX -"; + mes "^5555FF- This section is serverly crumpled and tattered. -^000000"; + mes "^5555FF- You are unable to read it. -^000000"; + close; +} + +// Jornadan Niliria ------------------------------------------------------------------------ +alberta.gat,248,90,1 script Jornadan Niliria 121, +{ + mes "[Jornadan Niliria]"; + mes "Sometimes I think that the world around me is ever changing."; + mes "When I view the land it seems different, when I look up at the sky it too seems different...."; + next; + mes "[Jornadan Niliria]"; + mes "The way that Alberta and Turtle Island are different. Hah hah hah...."; + next; + menu "-About Turtle Island.",M_0, "-Um, did you get confused with Al De Baran?",M_1, "-End Conversation.",M_End; + + M_0: + mes "[Jornadan Niliria]"; + mes "Ah yes..... Turtle Island.... Do you know why it's named, 'Turtle' Island? Would you like to know? Haha......"; + next; + mes "[Jornadan Niliria]"; + mes "The reason behind the name is actually very easy to figure out and you might even feel a little foolish about not getting it in the first place."; + next; + mes "[Jornadan Niliria]"; + mes "It's called 'Turtle' Island, because of the fact that it is shaped like an actual turtle. Haha. That's all there is to it."; + next; + mes "[Jornadan Niliria]"; + mes "There is an unsually dense area of fog that surrounds the island."; + mes "At first we tried to figure what causes it but with no luck. We figured that it was just one of nature's natural phenomenons."; + next; + mes "[Jornadan Niliria]"; + mes "Then we found a cave along the coastline of the island. Inside we were amazed to see a HUGE waterfall."; + mes "It turns out that this waterfall is what creates that extremely thick area of fog around that island."; + next; + mes "[Jornadan Niliria]"; + mes "The reason is so simple and yet there are people who still try to find a deeper meaning behind it...."; + next; + mes "[Jornadan Niliria]"; + mes "I believe that people continue to probe into the matter because they do not want to feel that their efforts have been in vain."; + mes "Maybe they are afraid of the truth..... I for one was once afraid.... afraid of Turtle Island...."; + next; + mes "[Jornadan Niliria]"; + mes "But now that I trully understand all of the myths about Turtle Island, I feel at ease and at peace with the island."; + mes "There is still one lingering question about the island for me though..... it is the existence of the unknown ^FF5555'Jewel Fragment'^000000."; + next; + mes "[Jornadan Niliria]"; + mes "I am still not certain about what it really is. In the mean time I will continue to persue the matter untill I discover the truth! Hahaha!!"; + close; + + M_1: + mes "[Jornadan Niliria]"; + mes "Whoops ! Oh that's right !! Confused !.... Yipe !..... WOOOOO !!!"; //have NO idea what this means..... + close; + + M_End: + mes "[Jornadan Niliria]"; + mes "When you're searching for the truth, make sure to keep trying. Someday you will find the answers you seek..."; + next; + mes "[Jornadan Niliria]"; + mes "Hmmm.... by the way.... I feel hungry. Why doesn't Alberta have a store or restaurant for some good Dim Sum??"; + close; +} + +// Jornadan's Voyage Log ------------------------------------------------- +alberta.gat,247,93,1 script A Voyage Log 111, +{ + if(JORNADAN == 1) goto L_Treasure; + mes "[A Voyage Log]"; + mes "= 03:20 am ="; + mes "The moon was dark and I couldn't even see 100m in front of me. I had a bad feeling about the situation..... I was not the only one..."; + next; + mes "[A Voyage Log]"; + mes "I could tell by the looks on my comrade's faces, that they too were worried. No could sleep that night. I hope we will see the sunrise soon...."; + next; + mes "[A Voyage Log]"; + mes "= 04:10 ="; + mes "5 minutes ago one of our comrades, Cooker, died. While he walking on deck, the flagpole suddently broke and fell on his head...."; + next; + mes "[A Voyage Log]"; + mes "He died at approximately 04:07. The flagpole had been damaged when our ship hit a reef."; + mes "The ship sustained serious damage along the left side of the deck. I called on the chief to repair it."; + next; + mes "[A Voyage Log]"; + mes "= 04:45 ="; + mes "While two of our wokers were fixing the bottom of the deck, monsters attacked them without warning."; + mes "Apparently they had gotten in through some openings in the deck."; + next; + mes "[A Voyage Log]"; + mes "Two more men had been lost. Fortunatley the ship has yet to sink and seems to be holding up. Still, we must find land soon."; + next; + mes "[A Voyage Log]"; + mes "Durring the collision with the reef we lost about 30% of our supplies. In particular we lost food... a great deal of food...."; + next; + mes "[A Voyage Log]"; + mes "= 05:23 ="; + mes "We've been noticing an increase in the amount of reefs and they are getting larger as well."; + mes "I wonder when we will find land.... I wonder if we can...."; + next; + mes "[A Voyage Log]"; + mes "- Written by -"; + mes "- captain Jornadan Niliria -"; + next; + mes "^5555FF- Closed the voyage log -^000000"; + close; + +L_Treasure: + mes "^5555FF- The paper is torn -"; + mes "- Seaweed and mold have -"; + mes "- mixed with the paper -"; + mes "- It looks to be in very poor"; + mes "condition. -^000000"; + next; + mes "^5555FF- Between some pages -"; + mes "- Is a Banana leaf -"; + mes "- this is written. -^000000"; + next; + mes "[A Voyage Log]"; + mes "= O/X date ="; + mes "Just after we arrived to Turtle Island, we searched for some food to eat. I am so skinny now..."; + next; + mes "[A Voyage Log]"; + mes "When I looked at myself in the mirror, it was horrible. I was disturbed by what I saw..."; + next; + mes "[A Voyage Log]"; + mes "= X/X date ="; + mes "We found some kind of fruit! It has a yellow color and a long shape. It looks just like a banana!"; + next; + mes "[A Voyage Log]"; + mes "= XO/X date ="; + mes "Although very similar, the fruit we found was not a banana. We believe it is a relative of the banana."; + mes "It smells and tastes exactly like a banana."; + next; + mes "[A Voyage Log]"; + mes "We were starving so we just refered to the fruit as bananas and gathered it for food."; + mes "Although there were a limited amount of trees, there was enough for our survival."; + next; + mes "[A Voyage Log]"; + mes "It has become the answer to our lack of food and has become precious to us."; + mes "~ WE LOVE YOU BANANA!! ~"; + next; + mes "[A Voyage Log]"; + mes "= O/O date ="; + mes "In the middle of the night, one of our comrades reported that he felt sick from something he ate."; + next; + mes "[A Voyage Log]"; + mes "= OO/O date ="; + mes "Another comrade fell ill. He had the strongest digestive sytem among us."; + mes "He went by the name, 'Berot Berot', and he played a vital role in our group."; + next; + mes "[A Voyage Log]"; + mes "The fact that he got sick from something he ate, made it very clear that there was something poisoning us."; + next; + mes "[A Voyage Log]"; + mes "= XO/O date ="; + mes "A third person became sick today while we were out exploring. The first person to become ill has passed away.... We are all very worrired."; + next; + mes "[A Voyage Log]"; + mes "We tried very hard to find the cause of the illness. Then by observing the animals one day, we found it."; + mes "It was the very thing we thought to be our salvation and yet not one animal on the island would even touch it....."; + next; + mes "[A Voyage Log]"; + mes "What was killing us was..... our beloved BANANA!!"; + next; + mes "[A Voyage Log]"; + mes "We decided to get rid of all of the bananas. But for some reason they didn't seem to be decomposing."; + mes "Even when the skin was peeled off, the fruits remained the same."; + next; + mes "[A Voyage Log]"; + mes "I think that the poison or some other agent within the fruit is allowing it to survive."; + mes "We may be able to use it for medicinal purposes later, but for now it is of no use to us."; + mes "Until we get back to Alberta, we have to decided to burry what is left of the fruit."; + next; + mes "[A Voyage Log]"; + mes "This is the location where it's buried in case we forget:"; + mes "^FF8888- tur_dun01 -"; + mes "- X: 160, Y: 81 -^000000"; + next; + mes "^5555FF- There is a thin Key -"; + mes "- with a skull mark on it -"; + mes "- You've gained -"; + mes "- a 'Skull Key' -^000000"; + set SKULLKEY, 1; + set JORNADAN, 0; + close; +} + +// Burried treasure -------------------------------------------------------------------- +turn_dun01,160,80,1 script Skull Stone 111, +{ + if(SKULLKEY == 1) goto L_OpenBox; + mes "^5555FF(It's a frightening stone tomb with horrible skull on it.)^000000"; + close; + +L_OpenBox: + mes "^5555FF(Under the stone is a tiny key hole with a skull mark. You used the 'Skull Key' to open the box.)^000000"; + next; + mes "^5555FF(~click!~click!~)^000000"; + next; + mes "^5555FF(Suddenly the top of the stone opens with many things coming out!)^000000"; + next; + mes "^5555FF(You got 5 Bananas, and 5 Banana Juices.)^000000"; + getitem 634, 5; + getitem 532, 5; + set SKULLKEY, 0; + close; +} diff --git a/npc/cities/aldebaran.txt b/npc/cities/aldebaran.txt new file mode 100644 index 000000000..c0181ea87 --- /dev/null +++ b/npc/cities/aldebaran.txt @@ -0,0 +1,1542 @@ +//===== eAthena Script ======================================= +//= Al De Baran Town +//===== By: ================================================== +//= eAthena dev team +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working. +//= v1.1 Added RS125 NPC. Added another Kafra Resrve points agent. +//= The 2nd reserve points agent is not complete yet. +//= 1.2 Lottery input number fix [Lupus], 1.2a - label typo fixed +//= 1.3 Gatekeeper's bug fixed (wrong check and wrong item ID +//= for underground), fixed some typos [Lupus] +//============================================================ + + + +// Panama -------------------------------------------------------------- +aldebaran.gat,46,129,4 script Panama 97,{ + mes "[Panama]"; + mes "Al De Baran has been widely known throughout Rune-Midgard Kingdom as the City of canals."; + next; + menu "About the canals",M_0,"End conversation",M_End; + + M_0: + mes "[Panama]"; + mes "A canal is an artificial river used for travel, shipping, or irrigation. Generally they are used for transportation."; + next; + mes "[Panama]"; + mes "Most canals are constructed through reclamation work in which waterways are left over after a area of water as been filled in with dirt."; + close; + M_End: + mes "[Panama]"; + mes "This is a mountain town so the water is supposed to be pure ..."; + next; + mes "[Panama]"; + mes "Help yourself to some..."; + close; +} + +// Miller ------------------------------------------------------------------------ +aldebaran.gat,49,93,4 script Miller 83,{ + mes "[Miller]"; + mes "Did you know that LEVEL 4 weapons exist?"; + next; + mes "[Miller]"; + mes "Hmmm... of course they are rarely seen, but I hear that Boss monsters drop them occasionaly."; + close; +} + +// Senorita Sylvia ----------------------------------------------------------- +aldebaran.gat,60,70,4 script Senorita Sylvia 69,{ + mes "[Senorita Sylvia]"; + mes "I came all the way out here from Prontera because I heard that the Kafra Main Office is somewhere in the city of Al De Baran"; + next; + mes "[Senorita Sylvia]"; + mes "B-B-But... *sob*... It's been 5 hours since I started looking for it....."; + emotion 28; + next; + mes "[Senorita Sylvia]"; + mes "Where the hell is it~~~?!"; + emotion 6; + next; + mes "[Senorita Sylvia]"; + mes "I may look smart, but I am TERRIBLE with directions....."; + next; + mes "[Senorita Sylvia]"; + mes "Ah~ by the way, would you like to know a bit of very useful information?"; + next; + menu "Please continue.",M_0,"Not really.",M_End; + + M_0: + mes "[Senorita Sylvia]"; + mes "If you pick up equipment that was dropped by a monster, you will not be able to equip it right away."; + next; + mes "[Senorita Sylvia]"; + mes "Before you can use it you have to identify the equipment with a ^0000FFMagnifier^000000."; + mes "Once you've done so you'll be able to equip it without problems."; + close; + M_End: + mes "[Senorita Sylvia]"; + mes "Whatever....."; + emotion 32; + close; +} + +// Quatro ---------------------------------------------------------------- +aldebaran.gat,64,104,4 script Quatro 55,{ + mes "[Quatro]"; + mes "It has been rumored that famous blacksmith came to this town from Geffen..."; +M_Menu: + next; + menu "Famous Blacksmith?",M_0,"About weapon upgrading",M_1,"End conversation",M_End; + + M_0: + mes "[Quatro]"; + mes "People say his wife is ill. She constantly needs medicinal herbs that grow near town."; + mes "Also he has a devoted son, who helps him out with his work."; + next; + mes "[Quatro]"; + mes "I hope his son will be a good blacksmith in the future."; + goto M_Menu; + + M_1: + mes "[Quatro]"; + mes "If you upgrade a weapon its attack strength will increase."; + next; + mes "[Quatro]"; + mes "For a ^0000fflevel 1^000000 weapon attack str will go up by ^ff00002^000000 for every upgrade level."; + mes "For a ^0000fflevel 2^000000 weapon attack str will go up by ^ff00003^000000."; + mes "For a ^0000fflevel 3 and level 4^000000 weapon attack str will go up by ^ff00005^000000!"; + goto M_Menu; + + M_End: + close; +} + +// Isenberg --------------------------------------------------------------------- +aldebaran.gat,67,154,4 script Isenberg 98,{ + mes "[Isenberg]"; + mes "Mount Mjolnir and the Payon Forest are both notorious for high amounts of rainfall."; +M_Menu: + next; + menu "Mt. Mjolnir",M_0,"Payon Forest",M_1,"End conversation",M_End; + + M_0: + mes "[Isenberg]"; + mes "Mt. Mjolnir !"; + next; + mes "[Isenberg]"; + mes "It's the mountain range which you must pass through to get here from either Prontera or Geffen."; + next; + mes "[Isenberg]"; + mes "It is a difficult path however due to the steep and rugged terrain."; + mes "Not to mention the strong and hostile monsters which roam the mountain side."; + next; + mes "[Isenberg]"; + mes "You did a good job to get here."; + emotion 21; + goto M_Menu; + M_1: + mes "[Isenberg]"; + mes "You must travel through the Payon Forest if you wish to visit Alberta or Payon."; + next; + mes "[Isenberg]"; + mes "The Payon Forest is large and it's pathways are very intricate. It is easy to get lost and confused in it."; + next; + mes "[Isenberg]"; + mes "Unless you have good concentration and a strong will, you will find yourself giving up trying to pass through it."; + next; + mes "[Isenberg]"; + mes "The forest was named after Payon, the village of independence instead of Alberta, the harbor town."; + next; + mes "[Isenberg]"; + mes "Payon was built deep within the rugged forest with the intention of providing protection from outside influence."; + next; + mes "[Isenberg]"; + mes "I guess that's why people called that forest the Payon Forest rather than the Alberta Forest."; + goto M_Menu; + M_End: + mes "[Isenberg]"; + mes "Although Mnt. Mjolnir hinders travellers, it also creates a mysterious and unique atmoshpere in our town."; + close; +} + +// Joanne ------------------------------------------------------------------------------ +aldebaran.gat,81,61,4 script Joanne 101,{ + mes "[Joanne]"; + mes "I like to go gathering sea shells. It is really fun"; + next; + menu "Shell Gathering",M_0,"End Conversation",M_End; + + M_0: + mes "[Joanne]"; + mes "When you see bubbles popping up from the sand or a muddy puddle, try diggin in that area."; + mes "Usually shell fish conceal themselves under the ground."; + next; + mes "[Joanne]"; + mes "By the way, there is a dangerous shell fish called Ambernite."; + mes "It can usually be found on the beaches near Comodo."; + next; + mes "[Joanne]"; + mes "What a scary shell fish .."; + close; + M_End: + mes "[Joanne]"; + mes "I'm going to taste Cave Shell Fish one of these days!!"; + mes "I know it is a little bit dangerous... but it's worth the risk, right?"; + close; +} + +// Bebe ------------------------------------------------------------------- +aldebaran.gat,86,228,4 srcipt Bebe 703,{ + mes "[Bebe]"; + mes "A while back I went out for a walk towards Mt.Mjolnir, carrying a 'Savage Bebe' with me."; +M_Menu: + next; + menu "Savage Bebe??",M_0,"Mt.Mjolnir??",M_1,"End Conversation",M_End; + + M_0: + mes "[Bebe]"; + mes "A Savage Bebe is a kind of baby wild boar that has a pink color. It's very cute and pretty."; + next; + mes "[Bebe]"; + mes "Anyways, I was walking up this narrow path when... out of nowhere, this GIANT, UGLY, PLANT attacked me and my Savage Bebe!"; + emotion 0; + next; + mes "[Bebe]"; + mes "I was so frightened that I ran as far away from it as I could. When I stopped running I noticed that it hadn't followed me."; + next; + mes "[Bebe]"; + mes "So I threw rocks at it out of anger. It didn't do much good though. I don't think it even felt anything."; + next; + mes "[Bebe]"; + mes "I then noticed something else. The plant had a human looking face!! EEEWWW!!!"; + emotion 19; + next; + mes "[Bebe]"; + mes "If you every see one, don't even think about going near it. It may just bite you to death!"; + goto M_Menu; + + M_1: + mes "[Bebe]"; + mes "Even though people are facinated by the scenic beauty of Mt.Mjolnir, this mountain is filled with weird monsters."; + next; + mes "[Bebe]"; + mes "Monsters like Man Eating Flowers, giant Moths, Bigfoot, giant Centipedes, and so much more. So be carefull if you ever go up there."; + next; + mes "[Bebe]"; + mes "Most of the monsters won't attack you if you don't attack them first though."; + goto M_Menu; + + M_End: + mes "[Bebe]"; + mes "Ah?! Where is my Savage Bebe..? Savage Bebe, where are you!"; + emotion 20; + close; +} + +// Epthiel ----------------------------------------------------------------- +aldebaran.gat,90,170,4 script Epthiel 47,{ + mes "[Epthiel]"; + mes "Some weapons and armor have slotts in them. This allows you to insert monster cards into them."; +M_Menu: + next; + menu "About the number of slots..",M_0,"Relation between Cards and Slots",M_1,"End Conversation",M_End; + + M_0: + mes "[Epthiel]"; + mes "Items dropped by monsters often times have more slotts than ordinary weapons or armor sold at an NPC shop."; + next; + mes "[Epthiel]"; + mes "The greater number of slotts a piece of equipment has the greater its value is."; + goto M_Menu; + M_1: + mes "[Epthiel]"; + mes "When a card is inserted into a slott on a piece of equipment, the owner will gain certain skills or stat bonuses from that card."; + next; + mes "[Epthiel]"; + mes "If the weapon or armor with the card is unequiped, then the effect of the card will wear off."; + next; + mes "[Epthiel]"; + mes "A very important thing to know about inserting a card into a slott, is that once inserted the card cannot be removed."; + next; + mes "[Epthiel]"; + mes "So make sure you're absolutely sure about putting a card into a slott. You don't want to waste one."; + goto M_Menu; + M_End: + mes "[Epthiel]"; + mes "Do you have a card?"; + close; +} + +// Daniel -------------------------------------------------------------------------- +aldebaran.gat,93,80,4 script Daniel 48,{ + mes "[Daniel]"; + mes "With waterways everywhere, the city of Al De Baran is a wonderful place to live."; + next; + mes "[Daniel]"; + mes "B-U-T!....."; + emotion 0; + next; + mes "[Daniel]"; + mes "Last night on the way to see my girl friend, I fell into one of those waterways and sprang my ankle."; + mes "I couldn't enjoy my date with my girl friend which sucked big time!"; + emotion 7; + next; + menu "Gosh, that's too bad.",M_0,".....",M_1; + + M_0: + mes "[Daniel]"; + mes "*~Sigh~* Yeah it really is. You see my girl friend is the Armor Merchants youngest daughter."; + mes "She told me once that the armor that's dropped by monsters is often times much better than the kind sold in shops."; + next; + mes "[Daniel]"; + mes "She said something about the armor having 'more slots'.... whatever that means."; + close; + M_1: + mes "[Daniel]"; + mes "Huh? *~Sob sob~* You think I'm a stupid idiot, right? "; + emotion 28; + close; +} + +// Munster ----------------------------------------------------------------- +aldebaran.gat,113,70,2 script Munster 48,{ + mes "[Munster]"; + mes "My family used to live in Geffen, the homeland of blacksmith. We moved to Al De Baran last winter."; + next; + mes "[Munster]"; + mes "Back in Geffen my father was a famous blacksmith. Sometimes I heped my father with his work"; + mes "I learned alot about the success rate of ugrading weapons of different levels."; + next; + mes "[Munster]"; + mes "A ^0000fflevel 1^000000 weapon could be safely upgraded ^ff00007^000000 times,"; + mes "A ^0000fflevel 2^000000 weapon ^ff00006^000000 times,"; + mes "and ^0000fflevel 3 and 4^000000 weapons ^ff00005^000000 times each."; + next; + mes "[Munster]"; + mes "With level 4 weapons however, there is still a risk of failure durring the first upgrade."; + next; + mes "[Munster]"; + mes "As far as ^0000ffarmor^000000 goes, they can gernerally be upgraded about ^ff00005^000000 times."; + next; + mes "[Munster]"; + mes "Maybe it's because we just moved here, but for some reason people don't seem to know that my fathers workshop is now located in Al De Baran,"; + next; + mes "[Munster]"; + mes "Anywho, I hope people will come to re-acquaint themselves with my fathers superior craftmanship."; + close; +} + +// Phracon Guy -------------------------------------------------------------- +aldebaran.gat,117,181,4 script Pharacon Guy 48,{ + mes "[Phracon Guy]"; + mes "Lv 1 weapons require a metal called 'Pharacon' to be upgraded."; + next; + menu "About Pharacon",M_0,"Advice about Phracon",M_1,"End Conversation",M_End; + + M_0: + mes "[Pharacon Guy]"; + mes "It's a very common metal found throughout Rune-Midgard and is used almost exclusively for weapon upgrading."; + next; + mes "[Pharacon Guy]"; + mes "Although it's not as strong as other metals, it reamins popular among most people because of its abundance."; + next; + mes "[Pharacon Guy]"; + mes "You can obtain Pharacon from monsters or you can purchase it from Forging Workshops located in towns."; + next; + mes "[Pharacon Guy]"; + mes "If you don't need Pharacon for upgrading purposes then you can sell it for 100 zeny a piece to NPC's!"; + close; + M_1: + mes "[Pharacon Guy]"; + mes "I hear that alot of monsters carry Pharacon. Why don't you go hunt them?"; + mes "You should be able to find a lot of Pharacon without much trouble."; + next; + mes "[Pharacon Guy]"; + mes "A couple of days ago, I went hunting with the Pub Master and got a Pharacon dropped from Bebe Savage."; + close; + M_2: + mes "[Pharacon Guy]"; + mes "Good luck on finding some Pharacon -"; + close; +} + +// Alchemy Guy Chemirre ----------------------------------------------------------- +aldebaran.gat,121,231,4 script Alchemy Guy Chemirre 740,{ + mes "[Alchemy Guy Chemirre]"; + mes "The Alchemist is one of the 2nd Job Classes and involves the creation of rare and valuble items from abundant materials."; +M_Menu: + next; + menu "About Alchemy of Payon",M_0,"The concept behind Alchemy",M_1,". . . . .",M_2,"End Conversation",M_End; + + M_0: + mes "[Alchemy Guy Chemirre]"; + mes "Payon Alchemy dates as far back as the Alchemy of Al De Baran and originates from Toaism."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "Just like the Alchemists of Al De Baran, the Alchemists of Payon were able to create gold out of various materials."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "However due Payon's environment and a lack of adequate reasources, Payon alchemy never exceled the way it did in Al De Baran."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "Therefore the Alchemist Guild in Al De Baran became the only Alchemy Research Organization in Rune-Midgard."; + goto M_Menu; + + M_1: + mes "[Alchemy Guy Chemirre]"; + mes "Alchemy involves chemical research, and the practice of creating useful items out of materials that are usually non valuble."; + goto M_Menu; + M_2: + mes "[Alchemy Guy Chemirre]"; + mes "Let me tell you something that might be interesting to you. It's about monster cards and slots.."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "If you already posses a monster card then you've probably already heard this but....."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "Each card has a specific type of equipment it can be placed on."; + mes "For instance, let's say you have a poring card....."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "If you check the card's description, you will find that the Poring card increases its wearer's LUK by 1, and that it can be only inserted on 'Armor'."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "Something to take note of is the fact that armor purchased at an NPC shop may not have slotts on them."; + mes "Armor dropped by monsters however, will usually have a high number of slotts on them. They aren't dropped too often though."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "In order to use a card you must first unequip the piece of equipment you want to insert the card into."; + mes "Next find your card in your inventory window and double click it."; + next; + mes "[Alchemy Guy Chemirre]"; + mes "A window will pop up showing you what equipment the card can be inserted in. Choose the one you want, and your done."; + close; + M_End: + mes "[Alchemy Guy Chemirre]"; + mes "Long live the Al De Baran Alchemy Guild!!"; + close; + +} + +// Nastasia -------------------------------------------------------------- +aldebaran.gat,146,124,4 script Nastasia 101,{ + mes "[Nastasia]"; + mes "Somewhere in Rune-Midgard there exists the ^3355FF' Assassin Guild '^000000."; + next; + mes "[Nastasia]"; + mes "It's a place that trains people in the art of assassinating someone without leaving behind the slightest trace."; + next; + mes "[Nastasia]"; + mes "But... is that.... legal.....??"; + emotion 1; + next; + mes "[Nastasia]"; + mes "And do they collect tuition....??"; + next; + menu "Continue conversation.",M_0,"End Conversation.",M_End; + + M_0: + mes "[Nastasia]"; + mes "Most flying monsters are very fast and have a high amount of agility."; + mes "Therefore, it's very difficult to hit them successfully."; + next; + mes "[Nastasia]"; + mes "In order to fight against those kinds of monsters, you'll need a good amount of DEX."; + close; + M_End: + mes "[Nastasia]"; + mes "Like the old saying goes, 'nothing in life is free'."; + close; +} + +// Stromme --------------------------------------------------------- +aldebaran.gat,159,242,4 script Stromme 119,{ + mes "[Stromme]"; + mes "When you spend some time in Mt. Mjolnir, you'll start to notice something."; + next; + mes "[Stromme]"; + mes "The insects in Mt. Mjolnir are classified into different groups by thier habits!"; + next; + menu "About insects",M_0,"End conversation",M_End; + + M_0: + mes "[Stromme]"; + mes "Honey Bees, Butterflies and Moths help transfer pollen between flowers by flying over and around them."; + next; + mes "[Stromme]"; + mes "However that doesn't mean that you can take them lightly."; + mes "They have evolved into creatures that can defend themselves when attacked."; + next; + mes "[Stromme]"; + mes "There are some insects which are aggressive, such as Praying Mantises, Spiders, and Centipedes etc."; + mes "These monsters are strong so you should be carefull about approaching them."; + next; + mes "[Stromme]"; + mes "Also watch out for a monster that looks like a leech!! One blow from it can prove to be fatal."; + next; + mes "[Stromme]"; + mes "Luckily that leech thingy has poor eye sight and won't notice you if you are far enough away from it."; + close; + M_End: + mes "[Stromme]"; + mes "Don't even dare attack a ladybug haphazardly! Be respectfull of mighty nature in Mt. Mjolnir."; + close; +} + +// Joo Jahk ------------------------------------------------------ +aldebaran.gat,180,46,4 script Joo Jahk 88,{ + mes "[Joo Jahk]"; + mes "I am a tourist from Payon, the city within the forest. I noticed that it's very cool here... probably due to the waterways."; + next; + mes "[Joo Jahk]"; + mes "But.... Do you think I could drink the water in these waterways?"; + emotion 20; + next; + mes "[Joo Jahk]"; + mes "Actually I already did, but I am still concerned....."; + emotion 4; + next; + menu "Continue.",M_0,"End conversation.",M_End; + + M_0: + mes "[Joo Jahk]"; + mes "I been traveling around Rune-Midgard."; + next; + mes "[Joo Jahk]"; + mes "On the way here, I heard about ^3355FFSpiritual Property Monsters^000000 from a really high level Magician"; + mes "Apparently physical attacks and non-elemental magic attacks can't damage them."; + next; + mes "[Joo Jahk]"; + mes "I hope this advice can come in handy for you."; + close; + M_End: + mes "[Joo Jahk]"; + mes "The water here taste really fresh. It's probably well preserved. I don't think I'll have anything to worry about."; + close; +} + +// Gavin ------------------------------------------------------------------- +aldebaran.gat,212,122,4 script Gavin 97,{ + mes "Welcome! We, the towns people of Al De Baran, ALL welcome you . . . . ."; + next; + mes "[Gavin]"; + mes "Hmm... did I over-exaggerate? 'Towns people'..."; + mes "Well... it is just myself, but hey! Still, I welcome you!"; + next; + menu "Continue conversation.",M_0,"End conversation.",M_End; + + M_0: + mes "[Gavin]"; + mes "Ah~ now I remember! I saw a very interesting monster just a few days ago."; + mes "I saw a Poring with the wings of an angel, somwhere in the Mjohlnir Mountains surrounding Al De Baran."; + next; + mes "[Gavin]"; + mes "I swear it!"; + emotion 0; + next; + mes "[Gavin]"; + mes "It was jumping around with the other ordinary Porings. Angeling... is that what it was...?"; + close; + M_End: + mes "[Gavin]"; + mes "I welcome you to Al De Baran, a wonderful city of Canals surrounded by the Mjohlnir Mountains."; + close; +} + + +// Giddy Fellow ------------------------------------------------------------------ +aldeba_in.gat,152,47,4 script Giddy Fellow 97,{ + mes "[Giddy Fellow]"; + mes "E..E..E..Emergenc----y!!! I CAN'T find my pet chicken anywhere!!"; + emotion 23; + next; + menu "What's its name?",M_0,". . . . .",M_1; + + M_0: + mes "[Giddy Fellow]"; + mes "It's 'The Great Picky ' ... SOB SOB SOB... gosh... what am I gonna do?!~ Please find my cutey for meee~~~"; + emotion 28; + next; + menu "Dude! It's such a common name...",L00,". . . . .",L1; + + L00: + mes "[Giddy Fellow]"; + mes "Wha-What are you talking about!! My 'The Great Picky' is the one and only cutest chicken in this whole wide WORLD for Christ's sake~!"; + emotion 1; + close; + M_1: + mes "[Giddy Fellow]"; + mes "Don't you laugh at me~! I don't have any siblings so my cute chicken is like a younger brother to me! SOB SOB SOB SOB"; + emotion 28; + close; +} + +// Master ---------------------------------------------------------- +aldeba_in.gat,156,179,4 script Master 61,{ + mes "[Master]"; + if(sex==0) mes "Oh hello. Don't mind me, I'm just a perverted old man.... la di da......."; + if(sex==0) close; + mes "Did you know that the Kafra Main Office is located here, in Aldebaran?"; + next; + mes "[Master]"; + mes "The young Kafra Ladies visit me from time to time. They are really delightful and fun to be around."; + next; + mes "[Master]"; + mes "Alright! Time for a survey... this is to determine which Kafra you like best."; + next; + mes "[Master]"; + mes "Choose the Kafra Lady that you think is HOT!!!"; + next; + menu "Oh~it turns me on!!!!",M_0,"No way..I am not a pervert.",M_1; + + M_0: + mes "[Master]"; + mes "Alright, here you go, your Favorite Ladies!!! Take a carefull look!"; + next; + mes "[Master]"; + mes " - Kafra Number (1) ^3355FF'Pavianne'^000000 !!"; + mes "The Original Kafra, the classic blue haired beauty!..."; + mes " - Kafra Number (2) ^9A01BA'Blossom'^000000 !!"; + mes "Her graceful ponytail takes men's breaths away! She's a favorite among young Boys!!"; + mes " - Kafra Number (3) ^0000FF'Jasmine'^000000 !!"; + mes "Long, straight, silky hair is what gives her her charm. She is the Silk from the East ~! From payon,...."; + next; + mes "[Master]"; + mes " - Kafra Number (4) ^FF8040'Roxie'^000000 !!"; + mes "She has a cute tomboy look with short hair...."; + mes " - Kafra Number (5) ^7A0DF2'Leilah'^000000 !!"; + mes "She is intelligent and sophisticated. A pair of refined glasses fits her well...."; + mes " - Kafra Number (6) ^EEC111'Curly Sue'^000000 !!"; + mes "Pretty and cute. Although she looks young and immature, she's a very hard worker...."; + next; + mes "[Master]"; + mes "So who do you think?"; + next; + menu "(1) Pavianne",M_00,"(2) Blossom",M_01,"(3) Jasmine",M_02,"(4) Roxie",M_03,"(5) Leilah",M_04,"(6) Curly Sue.",M_05; + + M_00: + mes "[Master]"; + mes "Oh~ So your reserved in nature, and therefore you are into a more traditional type of girl..."; + next; + mes "[Master]"; + mes "Well, I have to tell you....."; + next; + mes "[Master]"; + mes "The world is all about change so face the facts and learn to accept new things!"; + close; + M_01: + mes "[Master]"; + mes "Wake up~! Do you really think you'd have a shot with a girl like that?? Be realistic! She's out of your league...."; + emotion 0; + close; + M_02: + mes "[Master]"; + mes "Gentel, sexy, sweet, and beautifull.... a girl like Jasmine would have you wrapped around her finger in no time...."; + close; + M_03: + mes "[Master]"; + mes "You're over-zealous! If you were to get with a girl who's as exuberant as her..."; + next; + mes "[Master]"; + mes "You'd cause a LOT of trouble for the neighbors, if ya know what I mean.... Hahahaha!!"; + emotion 18; + close; + M_04: + mes "[Master]"; + mes "Into the cold, analitical type huh?... If you like being bossed around, then I guess Leilah's the girl for you...."; + close; + M_05: + mes "[Master]"; + mes "Wha-what!"; + emotion 0; + next; + mes "[Master]"; + mes "A thirst for young girls~~! It's a c-c-crime!!!!"; + emotion 19; + close; + M_1: + mes "[Master]"; + mes "Ah~~~!! I stayed up all night last night trying to make this wonderful survey~!!"; + mes "And you just dissed me~ like thaaat~ I hate you."; + close; +} + +// RS125 ------------------------------------------------------------------------ +aldeba_in.gat,234,241,4 script RS125 48, +{ + mes "[RS125]"; + mes "Even if my first name is not human, and my manner of speech is not very eloquent, please don't be afraid of me."; + mes "I'm actually a warm hearted person."; + next; + mes "[RS125]"; + mes "There is an artificial heart that beats loudly in my body."; + mes "Although people hate me because of it, I will still continue to function for the love of my home, Al De Baran."; + next; + menu "Oh you poor boy! Tell me more...",-, "The best of luck to ya!!",M_End; + + + mes "[RS125]"; + mes ".... It was 3 years ago..... My big bro 996, was a highly regarded sprinter in Al De Baran."; + mes "People refered to him as 'Al De Baran's Peco Peco'. He was the fastest runner in the world......"; + next; + mes "[RS125]"; + mes "Every 4 years a special track meet called the 'Al De Baran Turbo Tracks', takes place here."; + mes "Many admirers from around the world came to see my brother. They gathered around him every chance they got."; + next; + mes "[RS125]"; + mes "I was his manager at the time and even I becamed stressed out by the crowds of people."; + mes "I can only imagine how he felt about being so famous."; + next; + mes "[RS125]"; + mes "Sadly there is no such thing as eternal fame and glory in this world. There was a girl from Payon who came take part in the event."; + mes "That year she was able to finally defeat my poor brother."; + next; + mes "[RS125]"; + mes "After that humiliating defeat, he decided to train even harder and pushed himself to his limits."; + mes "But he pushed to hard and began to have serious heart problems. To this day he cannot move around without someone elses help."; + next; + mes "[RS125]"; + mes "Now I am the future of Al De Baran athletics! I am a ray of hope for my brother!"; + mes "Remeber me, for I shall beat her, 'Havana', the breeze of Payon!"; + close; + M_End: + mes "[RS125]"; + mes "I've dreamed of making an around-the-world trip. It would be wonderfull to trully experience the sea of Alberta!!"; + mes "After the track championship next year, my brother and I are going to travel the whole world together."; + close; +} + +// Nice Looking Guy ---------------------------------------------------------- +aldeba_in.gat,219,61,4 script Nice Looking Guy 109,{ + mes "[Nice Looking Guy]"; + mes "Forget about the doofus living next door."; + next; + mes "[Nice Looking Guy]"; + mes "To tell you the truth, 2 years earlier, he fell down from a tree in the Drill Field and since then his mind has been out of control."; + mes "I heard he was trying to pick some fruits from that tree."; + next; + mes "[Nice Looking Guy]"; + mes "Anyways, he's constantly bugging me and I think I'm gonna be crazy beacuse of him... Oh my godness!"; + close; +} + +// Evil Looking Guy -------------------------------------------------------------- +aldeba_in.gat,223,121,2 script Evil looking Guy 63,{ + mes "[Evil Looking Guy]"; + mes "Hey dude! Don't you think it's rude for a stranger to enter someone elses house?"; + emotion 1; + next; + mes "[Evil Looking Guy]"; + mes "Now I'm upset! What reason do you have to come in here and bother me??"; + emotion 32; + next; + mes "[Evil Looking Guy]"; + mes "Ah alright, alright. No more fooling around... you're here because I'm an NPC and you think I'm supposed to help you right?"; + next; + menu "You got it.",M_0, "Nah... just messin around....",M_1; + + M_0: + mes "[Evil Looking Guy]"; + mes "You! I'm not sure if you know this, but in this world there exists something called a Mercenary System."; + next; + mes "[Evil Looking Guy]"; + mes "What is this you ask? It's simple. You hire a Mercenary to fight battles for you. The more a Mercenary cost the better a fighter he/she is."; + next; + mes "[Evil Looking Guy]"; + mes "So how do you go about getting one?? It's easy, listen closely....."; + next; + mes "[Evil Looking Guy]"; + mes "First, check his/her nose. Yes, I said NOSE! A high quality Mercenary has a moist nose which is a sign of good health."; + mes "If it's possible, try touching the Mercenarys' nose. If it's dry, then there is no doubt that that Mercenary has caught a cold."; + next; + mes "[Evil Looking Guy]"; + mes "A good Mercenary should have slender ankles. Umm... in adition, he/she should have a snowy and skinny neck!"; + mes "And if the Mercenarys' hair is long and curly, that's icing on the cake!!"; + next; + mes "[Evil Looking Guy]"; + mes "Finally, a Mercenary is obligated to provide 100% customer assistance and support!!!"; + next; + mes "[Evil Looking Guy]"; + mes "Oh and don't forget to change a Mercenarys' wet tissues as well!!"; + close; + M_1: + mes "[Evil Looking Guy]"; + mes "Whattt!!! Get the heck out of my house!! If you're a cop, show me a search warrant."; + mes "If you're a member of my family then pull down your pants so I can look at our family mark!"; + emotion 0; + close; +} + + +//<=================================================== Kafra Corp. Headquarters ==========================================================>\\ +// Kafra Jasmine ------------------------- +aldeba_in.gat,24,245,4 script Kafra Jasmine 115,{ + cutin "kafra_03",2; + mes "[Kafra Jasmine]"; + mes "Hi~ I am Kafra type Jasmine. Thank you for comming all the way to the Kafra Main Office here in Al De Baran!"; + next; + mes "[Kafra Jasmine]"; + mes "Our Kafra Service is always working with our customers!"; + mes "Our Kafra Service has a history and legacy that is 5 thousand, 8 hundred years old..."; + mes "Blah-blah-blah....."; + next; + menu "FIVE THOUSNAD YEARS?!",M_0, "Ahh~ Shut Up!",M_1, "You got a boyfriend?",M_2; + + M_0: + mes "[Kafra Jasmine]"; + mes "HEY! Just SHUT-UP and LISTEN! It took me a whole week to memorize this!"; + mes "I've got a poor memory unlike the other Kafra agents!"; + emotion 6; + next; + mes "[Kafra Jasmine]"; + mes "..... Eh!... heh... heh... um..."; + emotion 19; + next; + mes "[Kafra Jasmine]"; + mes "I'm verrrryyy sorry about that... I didn't mean to startle you... you see...."; + next; + mes "[Kafra Jasmine]"; + mes "That... that... that was just an act.... YEAH! An act I put on for the customers. Heh.. heh...."; + emotion 4; + cutin "kafra_03",255; + close; + M_1: + mes "[Kafra Jasmine]"; + mes ". . . . ."; + emotion 6; + next; + mes "[Kafra Jasmine]"; + mes "Just so you know, I was a member of Kafra Garrison before I joined the Kafra Service Team."; + mes "My speciality was 'Bash'!! Now I'm trying to be more feminine and live a quieter life"; + next; + mes "[Kafra Jasmine]"; + mes "So please, DON'T TEMPT ME...!!"; + emotion 32; + cutin "kafra_03",255; + close; + M_2: + mes "[Kafra Jasmine]"; + mes "I'm flattered but, Kafra Services has a ridiculous rule that no employee can have a boyfriend...."; + next; + mes "[Kafra Jasmine]"; + mes "Just kidding~~ Tehehe"; + emotion 18; + cutin "kafra_03",255; + close; +} + +// Special Reserve ---------------------------------------------- +aldeba_in.gat,79,161,6 script Kafra 115, +{ + cutin "kafra_03",2; + mes "[Kafra]"; + mes "Welcome, ^6666FF" + strcharinfo(0) + "^000000. This is where you can trade in your special reserve points for usefull items and cool prizes."; + next; + mes "[Kafra]"; + mes "Each Kafra will allow to trade in reserve points of varying amounts. I can trade in reserve points starting from ^2222FF100 pts up to 3000 pts^000000."; + next; + mes "[Kafra]"; + mes "The amount of special reserve points that you have is: ^FF0000"+RESRVPTS+"^000000 pts. Please make a choice based on your point total."; +M_Menu: + next; + menu "100- Sweet Potato 7 ea",M_1a, "200- Sweet Potato 15 ea",M_1b, "300- Sweet Potato 25 ea",M_1c, "400- Sweet Potato 35 ea",M_1d, + "500- Sweet Potato 50 ea",M_1e, "600- Sweet Potato 60 ea",M_1f, "700- Sweet Potato 75 ea",M_1g, "800- Sweet Potato 85 ea",M_1h, + "900- Sweet Potato 100 ea",M_1i, "1000- 1st Lotery Chance!",M_1j, "Next items",M_2, "Cancel",M_End; + + M_1a: + if(RESRVPTS < 100) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 7; + set RESRVPTS, RESRVPTS - 100; + close; + M_1b: + if(RESRVPTS < 200) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 15; + set RESRVPTS, RESRVPTS - 200; + close; + M_1c: + if(RESRVPTS < 300) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 25; + set RESRVPTS, RESRVPTS - 300; + close; + M_1d: + if(RESRVPTS < 400) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 35; + set RESRVPTS, RESRVPTS - 400; + close; + M_1e: + if(RESRVPTS < 500) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 50; + set RESRVPTS, RESRVPTS - 500; + close; + M_1f: + if(RESRVPTS < 600) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 60; + set RESRVPTS, RESRVPTS - 600; + close; + M_1g: + if(RESRVPTS < 700) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 75; + set RESRVPTS, RESRVPTS - 700; + close; + M_1h: + if(RESRVPTS < 800) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 85; + set RESRVPTS, RESRVPTS - 800; + close; + M_1i: + if(RESRVPTS < 900) goto sL_LowPts1; + mes "[Kafra]"; + mes "Here you are."; + getitem 516, 100; + set RESRVPTS, RESRVPTS - 900; + close; + M_1j: + if(RESRVPTS < 1000) goto sL_LowPts1; + set RESRVPTS, RESRVPTS - 1000; + mes "[Kafra]"; + mes "^0000FF1st Lottery Opportunity!!^000000"; + set @Lotto, 1; + next; + callfunc "F_Lottery"; + goto M_End; + + sL_LowPts1: + mes "[Kafra]"; + mes "I'm sorry but you do not have enough reserve points for that selection."; + goto M_Menu; + + M_2: + menu "1100- Red Potion 7 ea",M_2a, "1300- Red Potion 15 ea",M_2b, "1500- Red Potion 25 ea",M_2c, + "1700- Red Potion 35 ea",M_2d, "1900- Red Potion 50 ea",M_2e, "2100- Red Potion 60 ea",M_2f, + "2300- Red Potion 75 ea",M_2g, "2500- Red Potion 85 ea",M_2h, "2800- Red Potion 100 ea",M_2i, + "3000- 2nd Lotery Chance!",M_2j, "Previous List",M_Menu, "Cancel",M_End; + + M_2a: + if(RESRVPTS < 1100) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 7; + set RESRVPTS, RESRVPTS - 1100; + close; + M_2b: + if(RESRVPTS < 1300) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 15; + set RESRVPTS, RESRVPTS - 1300; + close; + M_2c: + if(RESRVPTS < 1500) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 25; + set RESRVPTS, RESRVPTS - 1500; + close; + M_2d: + if(RESRVPTS < 1700) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 35; + set RESRVPTS, RESRVPTS - 1700; + close; + M_2e: + if(RESRVPTS < 1900) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 50; + set RESRVPTS, RESRVPTS - 1900; + close; + M_2f: + if(RESRVPTS < 2100) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 60; + set RESRVPTS, RESRVPTS - 2100; + close; + M_2g: + if(RESRVPTS < 2300) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 75; + set RESRVPTS, RESRVPTS - 2300; + close; + M_2h: + if(RESRVPTS < 2500) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 85; + set RESRVPTS, RESRVPTS - 2500; + close; + M_2i: + if(RESRVPTS < 2800) goto sL_LowPts2; + mes "[Kafra]"; + mes "Here you are."; + getitem 502, 100; + set RESRVPTS, RESRVPTS - 2800; + close; + M_2j: + if(RESRVPTS < 3000) goto sL_LowPts2; + set RESRVPTS, RESRVPTS - 3000; + mes "[Kafra]"; + mes "^0000FF2nd Lottery Opportunity!!^000000"; + set @Lotto, 2; + next; + callfunc "F_Lottery"; + goto M_End; + + sL_LowPts2: + mes "[Kafra]"; + mes "I'm sorry but you do not have enough reserve points for that selection."; + next; + goto M_2; + + M_End: + mes "[Kafra]"; + mes "Please come back anytime when you have more reserve points."; + cutin "kafra_03",255; + close; +} + +// Special Reserve 2 ---------------------------------------------- +aldeba_in.gat,88,161,3 script Kafra 115, +{ + cutin "kafra_03",2; + mes "[Kafra]"; + mes "Hello and welcome to the Kafra Corp. Main office."; + cutin "",255; + close; + +// will implement this part when I find out what items to use for the prizes + cutin "kafra_03",2; + mes "[Kafra]"; + mes "Welcome ^5577FF"+strcharinfo(0)+"^000000. We are currently having a special event for our customers."; + mes "You can get free gifts by using your ^FF5533special reserve points^000000 in the ^3355FFSpecial Kafra Gift Event^000000!!"; + next; + mes "[Kafra]"; + mes "Would you like to use your points?"; + next; + menu "Yes I would.",-, "Maybe next time.",M_End; + + mes "[Kafra]"; + mes "You have the following amount of special reserve points: ^5544FF"+RESRVPTS+"^000000."; + mes "Make a choice and test your luck!"; + next; + menu "5000pts = 1st Lottery Chance!",sM_1st, "7000pts = 2nd Lottery Chance!",sM_2nd, "10000pts = 3rd Lottery Chance!",sM_3rd, "Cancel",M_End; + + sM_1st: + if(RESRVPTS < 5000) goto sL_NotEnuf; + set RESRVPTS, RESRVPTS - 5000; + set @Lotto, 3; + callfunc "F_Lottery"; + goto M_End; + sM_2nd: + if(RESRVPTS < 7000) goto sL_NotEnuf; + set RESRVPTS, RESRVPTS - 7000; + set @Lotto, 4; + callfunc "F_Lottery"; + goto M_End; + sM_3rd: + if(RESRVPTS < 10000) goto sL_NotEnuf; + set RESRVPTS, RESRVPTS - 10000; + set @Lotto, 5; + callfunc "F_Lottery"; + goto M_End; + + sL_NotEnuf: + mes "[Kafra]"; + mes "I'm sorry dear but you do not have enough points for this selection."; + cutin "kafra_03",255; + close; + M_End: + mes "[Kafra]"; + mes "No problem. Collect more and more special reserve points by using the Kafra Services found throughout Rune Midgard."; + mes "Thank you for using Kafra Corp. services."; + cutin "kafra_03",255; + close; +} + +// Function F_Lottery ------------------------------------------------------------------------------------------ +function script F_Lottery { + mes "[Kafra]"; + mes "You have the unique opportunity to win a prize sent down from the heavens themselves!!"; + next; + mes "[Kafra]"; + mes "Don't miss this one and only chance! Now dear, are you ready?"; + next; + mes "[Kafra]"; + mes "How many times do you want the Lottery Machine to spin? You can choose up to 5 times."; + next; + input @input; + if(@input < 1 || @input > 5) set @input, rand(1,5); //Lupus's fix + callsub sF_Spin; + mes "[Kafra]"; + mes "Ok~ Let me check the results~ guess what it is?"; + next; + mes "[Kafra]"; + mes "^FF0000Lets see.... This is...!!^000000"; + next; + if(@temp <= 4) goto sL_Prize3; + if(@temp <= 7) goto sL_Prize2; + + sL_Prize1: + mes "[Kafra]"; + mes "WOW!!!!..... You win!!! 1st Prize~! Congratulations~~ You got the 1st prize~~"; + if(@Lotto == 1) getitem, 2328,1; + if(@Lotto == 2) getitem, 2307,1; //don't know if this is the correct item + //if(@Lotto == 3) getitem, ,1 + //if(@Lotto == 4) getitem, ,1 + //if(@Lotto == 5) getitem, ,1 + return; + sL_Prize2: + mes "[Kafra]"; + mes "Oh wow! You've won the 2nd prize! Congratulations!!"; + if(@Lotto == 1) getitem 2220, 1; + if(@Lotto == 2) getitem 2403, 1; //don't know if this is the correct item + //if(@Lotto == 3) getitem, ,1 + //if(@Lotto == 4) getitem, ,1 + //if(@Lotto == 5) getitem, ,1 + return; + sL_Prize3: + mes "[Kafra]"; + mes "Congratulations! You've won the 3rd prize."; + if(@Lotto == 1) getitem 516, 100; + if(@Lotto == 2) getitem 502, 100; + //if(@Lotto == 3) getitem, ,1 + //if(@Lotto == 4) getitem, ,1 + //if(@Lotto == 5) getitem, ,1 + return; + +sF_Spin: + mes "[Lottery Machine]"; + mes "Number of spins remaining: "+@input; + next; + mes "[Lottery Machine]"; + mes "(rumble~rumble~rumble~)..."; + next; + set @temp, rand(10); + set @input, @input -1; + if(@input <= 0) return; + goto sF_Spin; +} + + +// Kafra Pavianne ----------------------------- +aldeba_in.gat,81,166,4 script Kafra Pavianee 117,{ + cutin "kafra_01",2; + mes "[Kafra Pavianne]"; + mes "Welcome! I'm Kafra service's first Kafra type 'Pavianne'"; + next; + mes "[Kafra Pavianne]"; + mes "Our Kafra Service is always trying to achieve 100% customer satisfaction based on the 3 principles of Trust, Devotion, and Honesty."; + next; + mes "[Kafra Pavianne]"; + mes "With complete service training and supervision, we are able to fully meet the needs of our customers."; + next; + menu "Buy a Kafra Pass",M_0,"What is a Kafra Pass",M_1,"Good Bye",M_3; + + M_0: + if(Zeny < 2000) goto sL_Zeny; + mes "[Kafra Pavianne]"; + mes "Thank you for using our Kafra Service! Have a Nice Day!"; + getitem 1084,1; + set Zeny, Zeny-2000; + emotion 15; + cutin "kafra_01",255; + close; + + sL_Zeny: + mes "[Kafra Pavianne]"; + mes "I'm sorry but you don't have enough zeny."; + close; + + M_1: + mes "[Kafra Pavianne]"; + mes "It's the best gift you can get yourself and it can only be found at the Kafra Main Office!"; + next; + mes "[Kafra Pavianne]"; + mes "With a Kafra Pass, you could experience the convenience of Kafra Service world-wide! Hassle free! The price is 2000 zeny~~"; + next; + mes "[Kafra Pavianne]"; + mes "Visit any Kafra Service in Rune-Midgard, and you could enjoy Kafra Service any time any where for once."; + mes "Ending a conversation with Kafra Service Agent will expire the pass."; + cutin "kafra_01",255; + close; + M_3: + mes "[Kafra Pavianne]"; + mes "Thank you for using Kafra Services! I'm Kafra Pavianne, and it was a pleasure to assist you."; + emotion 15; + cutin "kafra_01",255; + close; +} + +// Kafra Blossom ----------------------------------- +aldeba_in.gat,83,244,4 script Kafra Blossom 116,{ + cutin "kafra_02",2; + mes "[Kafra Blossom]"; + mes "..... Pavianne is soooo old school! She's too stubborn is what it is..."; + emotion 32; + next; + mes "[Kafra Blossom]"; + mes "We should be trying to make our customers' experience more unique, with new and creative ideas..."; + next; + mes "[Kafra Blossom]"; + mes "Anyways... WEELLLLCOOMMME!!!~~ I am Kafra type ^3333ffBlossom^000000."; + mes "Please don't forget to continue using our Kafra Services, and ask for me, ^3333ffBlossom^000000!"; + next; + menu "I'm an admirer of you~!",M_0,"Ehhaha",M_1; + + M_0: + mes "[Kafra Blossom]"; + mes "Really! Thank you sooo much!! Here is... my... autograph..."; + emotion 15; + next; + mes "[Kafra Blossom]"; + mes "Don't bother to look in your Item Iventory for it. It won't be there... tehehe... for my autograph will remail winthin your heart."; + emotion 33; + cutin "kafra_02",255; + close; + M_1: + mes "[Kafra Blossom]"; + mes "Huh? . . . . . That's all? Phew~ such a dull customer..."; + emotion 1; + cutin "kafra_02",255; + close; +} + +// Kafra Curly Sue --------------------------------- +aldeba_in.gat,91,244,4 script Kafra Curly Sue 112,{ + cutin "kafra_06",2; + mes "[Kafra Curly Sue]"; + mes "Hello, hello! I'm the youngest of all Kafra personel, the Kafra cutey...."; + next; + mes "[Kafra Curly Sue]"; + mes "I am Kafra Type 'Curly Sue'!!"; + next; + mes "[Kafra Curly Sue]"; + mes "I'm rather new so haven't been on the job all that long, but I am always doing my best!!"; + next; + menu "Uh... where is your momy?",M_0,"End conversation",M_End; + + M_0: + mes "[Kafra Curly Sue]"; + mes ".... Sob~sob~... WHAT?? I'm NOT some KID!!"; + emotion 28; + next; + cutin "kafra_06",255; + close; + M_End: + mes "[Kafra Curly Sue]"; + mes "Here at Kafra Corp., we're all doing our B-E-S-T to provide our customers with the B-E-S-T service."; + mes "We really appreciate your doing business with us."; + next; + cutin "kafra_06",255; + close; +} + +// Kafra Roxie -------------------------------------- +aldeba_in.gat,148,244,4 script Kafra Roxie 114,{ + cutin "kafra_04",2; + mes "[Kafra Roxie]"; + mes "Welcome! I'm Kafra type 'Roxie'. Let me let you in on a special secret about the Kafras!"; + next; + mes "[Kafra Roxie]"; + mes "You know... Our Kafra Service wasn't originally called Kafra.... Well what do you think it was?~"; + next; + mes "[Kafra Roxie]"; + mes "TaDa~ Surprisingly it was.... Ka...."; + next; + mes "[Kafra Roxie]"; + mes "(Ring Ring Ring) Oh... my phone... Sorry please wait..."; + next; + mes "[Kafra Roxie]"; + mes "Hi, Kafra Type Roxie here.... Huh! Director, sir!... Yes!... Yes!... I understand! ..... Sure!... Ah... Huh?!"; + next; + mes "[Kafra Roxie]"; + mes "No-no sir!.... Yes I understand!!"; + next; + mes "[Kafra Roxie]"; + mes "(*Click*) ..... Heh heh...."; + next; + mes "[Kafra Roxie]"; + mes "Uh... please ignore what I was talking about earlier. Hahaha.....heh..."; + emotion 4; + cutin "kafra_04",255; + close; +} + + +//<====================================================== Clock Tower ==============================================================>\\ +// Clock Keeper --------------------------------------------------------------- +aldebaran.gat,143,136,4 script Clock Keeper 89,{ + mes "[Clock Keeper]"; + mes "Let me introduce myself, I am 'Monster A' of the Al De Baran Clock Tower, and the Committee of 'Heaven on Earth'."; + next; + mes "[Clock Keeper]"; + mes "It looks like you have an interest in this tower?"; + next; + menu "About the Clock Tower.",M_0,"About the Committee of 'Heaven on Earth'.",M_1,"Quit.",M_End; + + M_0: + mes "[Clock Keeper]"; + mes "Each floor of this tower is connected through a device called a 'Warp'."; + mes "Most of these warps are standard warps but some of them are 'Random Warps'."; + next; + mes "[Clock Keeper]"; + mes "You should be careful with 'Random Warps' because they will transport you to a random location."; + next; + mes "[Clock Keeper]"; + mes "I know you wouldn't want to get seperated from you friends while you're battling monsters."; + next; + mes "[Clock Keeper]"; + mes "Random warps are shown as green dots on the Mini-Map so keep your eyes on the Mini-Map to avoid them."; + next; + mes "[Clock Keeper]"; + mes "Have a good time with the clocks. Hehehehe."; + close; + M_1: + mes "[Clock Keeper]"; + mes "Have you ever heard of the Committee of 'Heaven on Earth'?!"; + next; + menu "Yup, I have",sM_0,"What are they?",sM_1; + + sM_0: + mes "[Clock Keeper]"; + mes "Muhahahaha! Good, good! I'm so glad that our reputation has spread throughout Rune-Midgard."; + mes "What a great day to meet an adventurer like you! I would like to present this to you....."; + next; + mes "[Clock Keeper]"; + mes "Hmmm... Where did I leave it..."; + next; + mes "[Clock Keeper]"; + mes "Oops... it seems that I left the present in the control room on the 4th floor of the tower."; + mes "I promise I will give it to you next time. See you later."; + close; + sM_1: + mes "[Clock Keeper]"; + mes "What? I can't believe that there are still people who do not know about us!"; + next; + mes "[Clock Keeper]"; + mes "Our goal is to build a Heaven on Earth. Specifically here in AL De Baran. For starters, we built this clock tower."; + next; + mes "[Clock Keeper]"; + mes "We even created the idea for Glast Helm a while back."; + mes "Look around and you will see many of our great achievements."; + close; + M_End: + close; +} + +// Gatekeeper Riku ------------------------------------------------------------------- +c_tower3.gat,10,249,4 script Gatekeeper 84,{ + mes "[Gatekeeper Riku]"; + mes "Welcome to "; + mes "Kinase - Blue Gallino"; + mes "the one of Local Speciality in Aldebaran."; + mes "However,from the 4th Floor of this Clock Tower,"; + mes "You may not enter."; + mes "Please go back to where you're from."; + next; + menu "About Clock Tower",M_0,"About the 4th Floor",M_1,"Move to the 4th Floor",M_2,"End mesue",M_End; + + M_0: + mes "[Gatekeeper Riku]"; + mes "Homeland of Alchemy, Aldebaran!"; + mes "Long Time ago, there were"; + mes "3 Legendary Alchemists...They are"; + mes "Bruke Seimer,"; + mes "Philip Warisez,"; + mes "And.."; + next; + mes "[Gatekeeper Riku]"; + mes "Romero Specialre!"; + mes "This venerable architecture is their masterpiece."; + mes "I assume you would feel something unusual"; + mes "While on the way to this floor,"; + mes "Every feature of This Clocktower "; + next; + mes "[Gatekeeper Riku]"; + mes "Consists of Mysterious Ancient Magics."; + mes "If you just wander around here without any intention"; + next; + mes "[Gatekeeper Riku]"; + mes "By any means,"; + mes "You will meet with a mishap"; + mes "by Gatekeeper Creatures."; + mes "Please be careful .."; + close; + M_1: + mes "[Gatekeeper Riku]"; + mes "Ancient Alchemists"; + mes "Sealed the Gate of 4th Floor using an Alchemistic Device "; + mes "To keep something"; + mes "From Evil Creatures and Human Enemies."; + mes "To go through this door"; + next; + mes "[Gatekeeper Riku]"; + mes "It needs a Key."; + mes "That Key has rumored to be possessed by Gatekeeper Creatures"; + mes "Prowling around here."; + next; + mes "[Gatekeeper Riku]"; + mes "The Key is the Intensiveness of Ancient Alchemy,"; + mes "By hearsay When used once,"; + mes "It will be released from being spelled"; + mes "And be disapeared."; + next; + mes "[Gatekeeper Riku]"; + mes "If that key comes into your possession, please show it to me."; + mes "The one who possesses the Key of Clock Tower"; + mes "Will have access to go through this Gate with his own will!"; + next; + mes "[Gatekeeper Riku]"; + mes "I will give you a chance."; + mes ". . . . ."; + close; + M_2: + mes "[Gatekeeper Riku]"; + if(countitem(7026) < 1) goto L_Check_Key; + mes "Hmm! I already felt that you are not an Ordinary person,"; + mes "Now it seems to be successful in Speculation."; + mes "Please, You may enter."; + mes "May God bless you .."; + next; + delitem 7026,1; + warp "c_tower4.gat",185,44; + close; + + L_Check_Key: + mes ". . . . . ."; + mes "Unfortunately you don't have a privilege"; + mes "To enter this Gate .."; + mes "You won't be able to go through"; + mes "As long as Ancient Alchemists"; + mes " Don't approve you."; + close; + M_End: + mes "[Gatekeeper Riku]"; + mes "This Clock Tower"; + mes "Is the place where the 3 Ancient Legendary Alchemists"; + mes "Have left their Spirits and Skills."; + mes "Please Do not Scribble or Damage on the Interior."; + close; +} + +//<======================================== Al De Baran Dungeon ==========================================>\\ +alde_dun03.gat,264,16,4 script Gatekeeper 101,{ + mes "[Gatekeeper Boy]"; + mes "Welcome to"; + mes "Kinase - Blue Gallino"; + mes "The one of Local Speciality in Aldebaran."; + mes "You can't go through from B4th Floor,"; + mes "Please go back."; + next; + menu "About Clock Tower",M_0,"About B4th Floor",M_1,"Move to the B4th Floor",M_2,"End mesue",M_End; + + M_0: + mes "[Gatekeeper Boy]"; + mes "Homeland of Alchemy, Aldebaran!"; + mes "Long Time ago, there were"; + mes "3 Legendary Alchemists... They are"; + mes "Bruke Seimer"; + mes "Philip Warisez"; + mes "And .."; + next; + mes "[Gatekeeper Boy]"; + mes "Romero Specialre!"; + mes "This venerable architecture is"; + mes "their masterpiece."; + mes "I assume you would feel something unusual"; + mes "While on the way to this floor,"; + mes "Every feature of This Clocktower"; + next; + mes "[Gatekeeper Boy]"; + mes "Consists of Mysterious Ancient Magics."; + mes "If you just wander around here,"; + mes " without any intention"; + next; + mes "[Gatekeeper Boy]"; + mes "By any means,"; + mes "You will meet with a mishap"; + mes "by Gatekeeper Creatures."; + mes "Please be careful .."; + close; + M_1: + mes "[Gatekeeper Boy]"; + mes "Ancient Alchemists"; + mes "Sealed the Gate of 4th Floor using an Alchemistic Device "; + mes "To keep something"; + mes "From Evil Creatures and Human Enemies."; + mes "To go through this door"; + next; + mes "[Gatekeeper Boy]"; + mes "It needs a Key."; + mes "That Key has rumored to be possessed by Gatekeeper Creatures"; + mes "Prowling around here."; + next; + mes "[Gatekeeper Boy]"; + mes "The Key is the Intensiveness of Ancient Alchemy,"; + mes "By hearsay When used once,"; + mes "It will be released from being spelled"; + mes "And be disapeared."; + next; + mes "[Gatekeeper Boy]"; + mes "If that key comes into your possession, please show it to me."; + mes "The one who possesses the Key of Underground"; + mes "Will have access to go through this Gate with his own will!"; + next; + mes "[Gatekeeper Boy]"; + mes "I will give you a chance."; + mes ". . . . ."; + close; + M_2: + mes "[Gatekeeper Boy]"; + if(countitem(7027) < 1) goto L_Check_Key; + mes "Hmm! I already felt that you are not an Ordinary person,"; + mes "Now it seems to be successful in Speculation."; + mes "Please,You may enter."; + mes "May God bless you .."; + next; + delitem 7027,1; + warp "alde_dun04.gat",79,267; + close; + + L_Check_Key: + mes ". . . . . ."; + mes "Unfortunately you don't have a privilege"; + mes "To enter this Gate .."; + mes "You won't be able to go through"; + mes "As long as Ancient Alchemists"; + mes " Don't grant you."; + close; + M_End: + mes "[Gatekeeper Boy]"; + mes "This Clock Tower"; + mes "Is the place where the 3 Ancient Legendary Alchemists"; + mes "Has left their Spirits and Skills."; + mes "Please Do not Scribble or Damage on the Interior."; + close; +} diff --git a/npc/cities/amatsu.txt b/npc/cities/amatsu.txt new file mode 100644 index 000000000..bdc3724a6 --- /dev/null +++ b/npc/cities/amatsu.txt @@ -0,0 +1,1479 @@ +//===== eAthena Script ======================================= +//= Amatsu Script +//===== By: ================================================== +//= Some people & eAthena Dev Team +//===== Current Version: ===================================== +//= 1.01 +//===== Compatible With: ===================================== +//= Any eAthena Version; Niflheim Required +//===== Description: ========================================= +// Amatsu Town NPCs : Revision 2 (Fox quest fix) +// Translated by Makenshi and dj +// Revisions and edits by Valaris and Darkchild +// 1.01 event_sushi -> ama_sushi fixed +// and other fixes, thanks to Shinomori +//===================================================================== +alberta.gat,245,93,4 script Captain 709,{ + mes "[Carter Moores]"; + mes "Did you know that on the other side of the ocean"; + mes "there lives a mysterious culture, "; + mes "with stories totally unheard of in this country."; + mes "Have you heard of it before?"; + next; + menu "I want to know more about Amatsu",L1,"Go to Amatsu",L2,"End Dialogue",-; + mes "[Carter Moores]"; + mes "If you are a true adventurer,"; + mes "you should try to leave this continent."; + mes "Nothing is more exciting than learning about new cultures..."; + mes "However, do whatever you want."; + close; + L1: + mes "[Carter Moores]"; + mes "The legend says, a sailor got lost on the sea,"; + mes "in midst of drifting in the sea,"; + mes "he discovered it..."; + mes "In the mighty storm and the mist, "; + mes "the ship is undoubtedly lost."; + next; + mes "[Carter Moores]"; + mes "After the ship sunk"; + mes "he reached a village."; + mes "It is now called Amatsu,"; + mes "The sailor was later rescued by the locals."; + mes "As he worked hard over there,"; + mes "I heard that he later finished a map."; + next; + mes "[Carter Moores]"; + mes "He died soon after his return,"; + mes "but the map was indeed passed onto Tristian the Third."; + mes "Later, the king ordered"; + mes "that whoever is able to open a route,"; + mes "that leads to Amatsu, will get a reward from the king."; + mes "He gave everyone a copy of the map"; + next; + mes "[Carter Moores]"; + mes "What the people want is not the reward,"; + mes "but to get the trading opportunity with other countries."; + mes "The benefits from this is almost unimaginable."; + mes "Therefore, many adventurers and bold captains"; + mes "took the map,"; + mes "And headed for the ocean..."; + next; + mes "[Carter Moores]"; + mes "But all of them have failed!"; + mes "To face the gigantic current and the unpredictable weather,"; + mes "one needed to be familiar with sailing and the ocean."; + mes "However, all of them were blinded by the reward and desire for the trade rights,"; + mes "and failed to make the necessary preparations"; + next; + mes "[Carter Moores]"; + mes "At this time, someone found it,"; + mes "the entire route to Amatsu..."; + mes "And that guy is me, Mr. Carter Moores,"; + mes "the first person to start trading with Amatsu!"; + mes "Hahaha! That's pretty much it"; + next; + mes "[Carter Moores]"; + mes "I made quite a bit of zeny from the trade,"; + mes "and am now trying to start a tourism industry."; + mes "Do a little investment."; + mes "If you want to go to Amatsu,"; + mes "then just tell me...!"; + close; + L2: + mes "[Carter Moores]"; + mes "Yea, Amatsu is a great place!"; + mes "Because to cross that treacherous ocean"; + mes "is not a very easy thing to do."; + mes "I hope you find the travelling fee acceptable."; + next; + mes "[Carter Moores]"; + mes "The round trip costs 10,000 Zeny."; + mes "Our commercial vessels are very sturdy."; + mes "The passenger rooms are specially designed as well."; + next; + mes "[Carter Moores]"; + mes "So, have you decided to leave?"; + mes "Do you have enough zeny for travelling?"; + next; + menu "Yes",Lgo,"No",-; + mes "[Carter Moores]"; + mes "Not drawn to this new continent?"; + mes "People never like"; + mes "to head for the far coast on the other side."; + close; + Lgo: + if (Zeny < 10000) goto Lzeny; + set Zeny, Zeny-10000; + mes "[Carter Moores]"; + mes "All aboard!"; + next; + warp "amatsu",197,83; + break; + Lzeny: + mes "[Carter Moores]"; + mes "Did you forget what I said?"; + mes "10,000 zeny. If you can't come up with enough zeny,"; + mes "hunt around the Sunken Ship,"; + mes "and hope for some luck hunting treasure..."; + mes "and get enough zeny"; + close; +} +//===================================================================== +amatsu.gat,194,79,4 script Captain 709,{ + mes "[Carter Moores]"; + mes "Ready to leave?"; + mes "Probably had lots of fun in the Amatsu Tour!"; + mes "Are you really ready to leave?"; + menu "Time to go home!",L1,"I will stay a bit longer",-; + mes "[Carter Moores]"; + mes "Alright! Roger that."; + mes "The vessel for return will always be ready."; + mes "Have a good trip."; + close; + L1: + mes "[Carter Moores]"; + mes "Set sail."; + mes "Don't know if you are bringing back any"; + mes "souvenirs."; + next; + warp "alberta",243,91; + break; +} +//===================================================================== +// Amatsu Citizen +//===================================================================== +amatsu.gat,179,107,4 script John 86,{ + mes "[John]"; + mes "Hey."; + mes "You seem like me,"; + mes "not a native of Amatsu"; + next; + mes "[John]"; + mes "I have been here"; + mes "doing business for almost 5 years"; + next; + mes "Even during the first time "; + mes "the kingdom of Rune-Midgard"; + mes "traded with Amatsu."; + mes "I thought of the 'Lucky Bum'!"; + next; + mes "[John]"; + mes "I want to start something"; + mes "unique that the others won't do."; + next; + mes "[John]"; + mes "So I decided"; + mes "to come to Amatsu"; + mes "and learn how to make the food here,"; + mes "then return home"; + mes "so everyone can enjoy the exotic food."; + next; + mes "[John]"; + mes "But in the end"; + mes "I became attached to this place."; + mes "Even after 5 years"; + mes "I am still here"; + next; + mes "[John]"; + mes "Anyhow, from then on I just stayed here."; + mes "Just chat and gossip with the villagers,"; + mes "and relax"; + next; + mes "[John]"; + mes "Some time ago a famous sushi chef"; + mes "lived across the street, and ever since"; + mes "I have only seen flies around my place."; + next; + mes "[John]"; + mes "In this life, my happiness in life"; + mes "has been found here already."; + mes "Now it seems like it is about to end as well."; + close; +} +//===================================================================== +amatsu.gat,185,116,4 script Drunken Man 765,{ + mes "[Ralph]"; + mes "Cough. I'm old and useless."; + mes "Only brute strength. Cough."; + mes "This time I really cough won't go back home. Cough."; + next; + menu "Please stop drinking and go home.",L1,"Let's get wasted!",L2; +L2: + mes "[Ralph]"; + mes "Hahaha! A good young man."; + mes "Cough, but but, cough"; + mes "I can't give you my drink, cough."; + next; + mes "[Ralph]"; + mes "If you want to buy me a drink, I'll think about it."; + mes "Haha! Cough."; + close; +L1: + mes "[Ralph]"; + mes "What?!"; + mes "You want me to be like my wife, to be beaten by iron fists?"; + mes "Cough. You won't know it until you see it"; + mes "When she was young,"; + mes "she wrestled and caught tigers."; + next; + mes "[Ralph]"; + mes "I was in Co..Comudo whatever town it was."; + mes "I just lost a little, and he"; + mes "beat me up like that. Cough."; + next; + mes "[Ralph]"; + mes "Lacking life."; + mes "What the hell are zeny??"; + mes "Cough.. Cough.."; + mes "..........................."; + mes "........Cough.............."; + close; +} +//===================================================================== +amatsu.gat,217,179,0 script Old Women 760,{ + mes "[Hashey]"; + mes "My husband is so into gambling, it worries me to death."; + mes "Went to that town that's really far away, lost a lot of zeny again."; + mes "Come back.."; + next; + mes "[Hahsey]"; + mes "Because I was angry, I got irrational again."; + mes "Don't know if he's drinking at home again."; + mes "What a miser.. sobs."; + close; +} +//===================================================================== +ama_in01.gat,162,17,0 script Iron Chef 765,{ + if (ama_sushi == 1) goto LStart2; + mes "[ShabuShabu]"; + mes "*Sighs* This is getting worse.."; + mes "Everyday more customers come,"; + mes "but I can never get"; + mes "enough material, even today."; + mes "A lot of customers surely will be huntry?"; + next; + mes "[ShabuShabu]"; + mes "*Sigh*, a customer. Welcome."; + mes "As always, my homemade sashimi"; + mes "focuses on the freshness. What do you need?"; + next; + menu "I want to buy shrimp sushi",L1,"I want to buy sashimi",L2,"Need some help!",L3,"Keep up the good work",-; + mes "[ShabuShabu]"; + mes "Alright then, my sashimi"; + mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them."; + mes "If you have a chance, come try a little sashimi!"; + close; + L1: + mes "[ShabuShabu]"; + mes "Alright! How much do you want?"; + mes "Unit price 700 zeny, but if you only want a taste,"; + mes "I'll give you a discount of 74 zeny,"; + mes "If you like the taste come back and find me later."; + next; + menu "I want the 700 zeny piece!",L1_1,"I want the 74 zeny sample!",L1_2,"I'll come eat next time",-; + mes "[ShabuShabu]"; + mes "Alright then, my shrimp sushi"; + mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them."; + mes "If you have a chance, come try a little sashimi!"; + close; + L1_1: + if (Zeny < 700) goto Lzeny; + set Zeny,Zeny-700; + getitem 551,10; + mes "[If you have a chance, come try a little sashimi!]"; + mes "Thank you very much"; + close; + L1_2: + if (Zeny < 74) goto Lzeny; + set Zeny,Zeny-74; + getitem 551,1; + mes "[If you have a chance, come try a little sashimi!]"; + mes "Thank you very much"; + close; + L2: + mes "[ShabuShabu]"; + mes "Alright! How much do you want?"; + mes "Unit price 350 zeny, but if you only want a taste,"; + mes "I'll just give you a discount of 37 zeny."; + mes "If you like the taste come back and find me later"; + next; + menu "I want the 350 zeny piece!",L2_1,"I want the 37 zeny sample",L2_2,"I'll come eat next time",-; + mes "[ShabuShabu]"; + mes "Alright then, my sashimi"; + mes "are famous throughout the world! Their taste relies on its freshness, and no one else can make them."; + mes "[If you have a chance, come try a little sashimi!]"; + close; + L2_1: + if (Zeny < 350) goto Lzeny; + set Zeny,Zeny-350; + getitem 544,10; + mes "[ShabuShabu]"; + mes "Thank you very much"; + close; + L2_2: + if (Zeny < 37) goto Lzeny; + set Zeny,Zeny-37; + getitem 544,1; + mes "[ShabuShabu]"; + mes "Thank you very much"; + close; + Lzeny: + mes "[ShabuShabu]"; + mes "You don't have enough zeny with you"; + close; +L3: + mes "[ShabuShabu]"; + mes "Oh, any help is welcomed!!"; + mes "I was just worrying about not having enough material everyday."; + mes "Do you want to hear my request?"; + mes "Of course I will pay you to help me."; + next; + + set ama_sushi,1; + mes "[ShabuShabu]"; + mes "Crab Shell."; + mes "They are all out. I need them right now."; + mes "So please find ^0000FF10Crab shells^000000."; + mes "I can never find it when I need it."; + mes "I'll be counting on you."; + next; + mes "[ShabuShabu]"; + mes "Then, please hurry! I'll be here"; + mes "waiting for you, please don't forget my request!"; + close; +LStart2: + if (countitem(964)>=10) goto Lok; + mes "[ShabuShabu]"; + mes "Man, don't have my materials ready?"; + mes "Oh no, you didn't forget it did you?"; + next; + mes "[ShabuShabu]"; + mes "^0000FF10Crab shells^000000"; + mes "Don't forget again."; + mes "You must help me find them!"; + close; +Lok: + mes "[ShabuShabu]"; + mes "Hmm! Thank you so much"; + next; + delitem 964,10; + getitem 551,20; + mes "[ShabuShabu]"; + mes "Here is my thanks, take it!"; + set ama_sushi,0; + close; + +} +//===================================================================== +amatsu.gat,189,166,4 script Kouji 764,{ + mes "[Kuruchi]"; + mes "Lalala Lalala Lalalalalala.."; + mes "Lalala Lalala Lalalalalala.."; + next; + if (event_amatsu == 2) goto L1; + if ((event_amatsu == 3) || (event_amatsu == 4)) goto L2; + if (event_amatsu == 5) goto L3; + if (event_amatsu == 6) goto L4; +L0: + mes "[Kuruchi]"; + mes "Hanging Under the Blue Sky's Blue Roof"; + mes "Shining on Blue Wall's Reflection on the Blue Lake"; + mes "Blue Hearting Containing a Blue Desire"; + mes "Blue Blue Everything's Blue"; + next; + goto LEnd; +L1: + mes "[Kuruchi]"; + mes "Monk, Monk, the fox is following me"; + mes "Because I have its favorite food"; + mes "Ramen noodle, my favorite too"; + mes "I can eat it three times a day"; + set event_amatsu,3; + goto LEnd; +L2: + mes "[Kuruchi]"; + mes "Monk,Monk, The Fox Is Following Me"; + mes "Shout At Him To Scare It Off!"; + mes "Voice Too Small So It Didn't Run Off"; + mes "Followed All The Way To North Side's Shrine!"; + set event_amatsu,4; + goto LEnd; +L3: + mes "[Kuruchi]"; + mes "Monk,Monk, The Fox Is Following Me"; + mes "Ramen NoodleIs My Favorite"; + mes "But Now I am No Longer Afraid?"; + mes "I Shouted Loudly To Scare It Off!"; + goto LEnd; +L4: + mes "[Kuruchi]"; + mes "The Town's Dock Has An Abandoned Boat!"; + mes "Everyone Forget That In The Ship"; + mes "Is Full Of Treasure And Gold"; + mes "A Boat That Is Feared By Everyone"; + goto LEnd; + +LEnd: + next; + mes "[Kuruchi]"; + mes "Lalala Lalala Lalalalalala.."; + mes "Lalala Lalala Lalalalalala.."; + close; +} + +//===================================================================== +amatsu.gat,205,163,4 script Mimi 759,{ + mes "[Mimi]"; + mes "Phew.."; + mes "Did you see the Ms. Amatsu besides the dock?"; + mes "Very pretty, no?"; + next; + mes "[Mimi]"; + mes "When I grow up I also want to enter the competition."; + next; + mes "[Mimi]"; + mes "Although I look like this, I am still the most beautiful woman in town.."; + mes "Women always need to watch their apparence, whoohoohoohooo."; + close; +} +//===================================================================== +//Done Done Done +amatsu.gat,230,160,4 script Lady 757,{ + mes "[Yorukoc]"; + mes "Although I come to the well for water everyday,"; + mes "if it's misty or rainy,"; + mes "I will not come out here."; + next; + mes "[Yoruko]"; + mes "Seems like deep within the well,"; + mes "someone is trying to"; + mes "climb up on the wall of the well."; + mes "It gives me goosebumps."; + close; +} +//===================================================================== +amatsu.gat,171,174,4 script Guard Soldier 767,{ + if ((event_amatsu == 0) || (event_amatsu == 1)) goto L0; + if (event_amatsu == 6) goto L1; + if (event_amatsu == 7) goto L2; + mes "[Guard Soldier]"; + mes "This area is where"; + mes "the Master's mother"; + mes "Is here for her treatment."; + next; + mes "[Guard Soldier]"; + mes "Although it's not much to talk about..."; + mes "She has been sick here for several months"; + mes "and started to live here"; + close; +L0: + mes "[Guard Soldier]"; + mes "This is where the Master's mother stays at."; + mes "Please keep quiet, we are also"; + mes "very worried watching this everyday"; + next; + mes "[Guard Soldier]"; + mes "Why does this happen"; + mes "to our benign and wise Master..."; + mes "I don't understand, *sobs*..."; + close; +L1: + mes "[Guard Soldier]"; + mes "What? Seems like something"; + mes "flew by... Didn't you see? Oh..."; + mes "And I heard a loud noise... Scared the shit out of me"; + close; +L2: + mes "[Guard Soldier]"; + mes "Our master should be alright now."; + mes "We are also greatly relieved."; + mes "You have no idea how worried we were... Phew."; + close; +} +//===================================================================== +amatsu.gat,164,174,4 script Guard Soldier 767,{ +//FlagGET + if (event_amatsu == 0) goto LOnce; + if ((event_amatsu >= 2) && (event_amatsu <= 5)) goto L2; + if (event_amatsu == 6) goto L3; + if (event_amatsu == 7) goto L4; + mes "[Guard Soldier]"; + mes "Hopefully she will return healthy soon..."; + mes "The Master has spent a lot of time"; + mes "taking care and worrying about her."; + close; +LOnce: + mes "[Guard Soldier]"; + mes "Do not enter here."; + mes "This is where the master's mother is"; + mes "recuperating."; + next; + mes "[Guard Soldier]"; + mes "Although it's not much to talk about."; + mes "But she has been sick here for several months"; + mes "and started to live here."; + set event_amatsu,1; + close; +L2: + mes "[Guard Soldier]"; + mes "If you are invited by the Master..."; + mes "Please do come in."; + mes "Up till today, many doctors came to diagnose but"; + mes "all their efforts seem futile."; + close; +L3: + mes "[Guard Soldier]"; + mes" Hey!"; + mes" What's that sound!?"; + mes" Where did it come from!?"; + close; +L4: + mes "[Guardian Soldier]"; + mes "The master's mother still"; + mes "hasn't fully recovered.. "; + mes "Although, it seems to have turned for the better."; + mes "But then again.."; + close; +} +//===================================================================== +amatsu.gat,119,164,4 script Guard Soldier 767,{ + mes "[Guard Soldier]"; + mes "Are you from Rune-Midgard?"; + mes "Welcome to the town of Amatsu."; + mes "After entering the city,"; + mes "please pay a visit to the Master of Amatsu"; + mes "before leaving!"; + next; + mes "[Guard Soldier]"; + mes "He is a really great guy."; + mes "He did a lot of investments for the town"; + mes "from all over the other continents."; + mes "He handles all sorts of things."; + close; +} +//===================================================================== +amatsu.gat,112,164,4 script Guard Soldier 767,{ + mes "[Guard Soldier]"; + mes "This is the best castle in Amatsu,"; + mes "called the East Lake Castle."; + mes "Normally people are not permitted"; + mes "to come in and out."; + next; + mes "[Guard Soldier]"; + mes "From your clothes, it looks like you are from another continent."; + mes "In the past, the Master specifically"; + mes "permitted the travellers to come in and out."; + mes "Now you may go in."; + close; +} + +//===================================================================== +ama_in01.gat,22,111,0 script Old Lady 761,{ + if (event_amatsu == 5) goto LStart2; + if (event_amatsu == 6) goto LStart3; + if (event_amatsu == 7) goto LStart4; + mes "[...]"; + mes "^FF6060Clang Clannng! Clang Clannng! Stupid humans again!"; + mes "Clang Clannng, Clang Clannng. Who is it? Is it human!?"; + mes "What do you need here! Hurry up"; + mes "Get out... Clang Clannng! Clang Clannng!^000000"; + next; + mes "[...]"; + mes "^FF6060I have decided to live here til"; + mes "the Ishida Family line ends!"; + mes "Stop bothering me and get out! Clang Clannng!^000000"; + next; + warp "amatsu",167,197; + break; +LStart2: + mes "[...]"; + mes "^FF0066Clang Clannng! Clang Clannng! Here comes another one!"; + mes "Stupid Humans! What do you want now"; + mes "Throw me out of here!?^000000"; + next; + mes "[...]"; + mes "^FF0066Seems like you learned something somewhere,"; + mes "That's about all you can do"; + mes "You can't do anything to me!! Clang Clannng!^000000"; + next; + menu "HAAAA!!",-; + set @which,rand(2); + if (@which == 1) goto Lfail; + mes "[...]"; + mes "^FF0066Clang Clannng! Clang Clannng! Clang Clannng! This Bastard!"; + mes "He threw me out like this!"; + mes "Sick! Not fair!!^000000"; + next; + mes "[...]"; + mes "^FF0066That goddamed Ishida that rendered me to this."; + mes "I'll curse them forever! FOREVER!"; + mes "Human, you better be careful too!^000000"; + next; + monster "ama_in01.gat",22,112,"Fox",1180,1; + killmonsterall "ama_in01.gat"; + getitem 1022,1; + mes "[...]"; + mes "^FF0066Everything that Paul Shinaku did"; + mes "will sooner or later"; + mes "Bring about my downfall...^000000"; + mes "^CC3300Clangggggggggggg!!^000000"; + set event_amatsu,6; + close; +Lfail: + mes "[...]"; + mes "^FF0066Clang Clannng! Haha! Clang Clannng! Hahahaha!"; + mes "How dare you,wanting to throw me out!"; + mes "Get out of here!! Clang Clannng!^000000"; + next; + warp "amatsu",167,197; + break; +LStart3: + mes "[Ishida Sauk]"; + mes "...*Sigh* Where from young man...?"; + mes "Did you get rid of the fox?"; + mes "Somehow I feel so tired, *sigh*..."; + next; + mes "[Ishida Sauk]"; + mes "Thank you. Coming from another place"; + mes "and still has to endure through this."; + mes "Very sorry... Sorry..."; + next; + mes "[Ishida Sauk]"; + mes "I need to find my son."; + mes "Tell him that I got rid of the fox..."; + mes "Thank you."; + next; + mes "[Ishida Sauk]"; + mes "Now I am getting very tired."; + mes "I need to rest now, young man....."; + mes "Go find my son..."; + close; +LStart4: + mes "[Ishida Sauk]"; + mes "Oh, You are the you man who"; + mes "got rid of the fox... welcome."; + mes "Sit here a while if you can..."; + next; + mes "[Ishida Sauk]"; + mes "To be possessed by that fox..."; + mes "It is all my own fault..."; + mes "I didn't teach my child properly... *sigh*"; + mes "He was a good kid when he was small."; + mes "It's all because I wasn't strict enough..."; + next; + mes "[Ishida Sauk]"; + mes "Originally this town was small."; + mes "Without a castle of this size either."; + mes "But, my son got some zeny somehow"; + mes "and just start bringing them to me."; + mes "Don't know what he did to get this zeny."; + mes "And has to hide the truth from even me..."; + next; + mes "[Ishida Sauk]"; + mes "Then starting building on the castle and town,"; + mes "and treated the townspeople fairly and nicely..."; + mes "If that was all, then there will be no problem."; + mes "The problem came after he did some strange things..."; + next; + mes "[Ishida Sauk]"; + mes "Yea, he angered the gods"; + mes "learning some weird spells somewhere."; + mes "And started doing experimenting,"; + mes "Capturing the monsters,"; + mes "Doing bad things..."; + next; + mes "[Ishida Sauk]"; + mes "And now, the monsters"; + mes "started to live in Amatsu..."; + mes "The gods became so angry even "; + mes "the monks from the shrine"; + mes "don't know what to do....."; + next; + mes "[Ishida Sauk]"; + mes "They punished me as well..."; + mes "and sent a fox here, "; + mes "hoping to give a warning,"; + mes "but my son didn't stop."; + next; + mes "[Ishida Sauk]"; + mes "If possible please stop my son."; + mes "I am old and almost dead."; + mes "I don't know what to do either..."; + mes "Please guard this peaceful town."; + mes "I don't know what my son is smoking"; + mes "doing that kind of stuff..."; + close; +} + + + +//===================================================================== +ama_in02.gat,207,40,6 script Guard Soldier 767,{ + mes "[Guard Soldier]"; + mes "Welcome,"; + mes "The Master specifically allowed"; + mes "the guests from the continent to enter and leave."; + next; + mes "[Guard Soldier]"; + mes "When you are have visited everywhere, please rest here"; + mes "before leaving."; + close; +} +//===================================================================== +ama_in02.gat,207,49,6 script Guard Soldier 767,{ + mes "[Guard Soldier]"; + mes "The master is really a great guy."; + mes "Who would have thought that anyone could"; + mes "turn this small town into what it is today?"; + next; + mes "[Guard Soldier]"; + mes "He even accepted worthless trash like me."; + mes "I am really grateful."; + mes "But I don't know what has happened recently."; + mes "His expressions"; + mes "look different from before."; + close; +} +//===================================================================== +ama_in02.gat,187,57,2 script Soldier 767,{ + mes "[Ichiro]"; + mes "Welcome, our master"; + mes "has already prepared a place"; + mes "for the guests to retire in."; + next; + mes "[Ichiro]"; + mes "If you have any needs,"; + mes "please contact us, and "; + mes "just thank our master later."; + mes "All of these preparations"; + mes "were ordered by the Master."; + close; +} +//===================================================================== +ama_in02.gat,170,62,4 script Soldier 767,{ + mes "[Kyro]"; + mes "My name is Kyro. In this town"; + mes "I handle all the administrative work."; + mes "What type of service do you need?"; + next; + menu "Please give me a pass",L1,"I want to live here",L2,"Nothing",L3; +L1: + if (event_amatsu == 7) goto L1_1; + mes "[Kyro]"; + mes "The master said that the guests from the continent"; + mes "can move about freely,"; + mes "Without any"; + mes "permits or passes."; + close; +L1_1: + if (countitem(7160) == 0) goto L1_2; + mes "[Kyro]"; + mes "I have already given you a pass."; + close; +L1_2: + mes "[Kyro]"; + mes "Did you lose the pass?"; + mes "If you want another pass"; + mes "you need to pay 10,000 zeny for registration fees."; + next; + menu "Get the pass",L1_2_1,"Maybe next time",-; + mes "No problem!"; + mes "If you need anything please come talk to me again!"; + close; +L1_2_1: + if (Zeny < 10000) goto LError; + set Zeny,Zeny-10000; + getitem 7160,1; + mes "[Kyro]"; + mes "Come, this is it."; + mes "Please be careful and don't lose it again."; + close; +LError: + mes "[Kyro]"; + mes "You don't have enough zeny!"; + close; +L2: + mes "[Kyro]"; + mes "This will be difficult,you can"; + mes "freely move around, but the master"; + mes "hasn't considered anything about immigration."; + mes "But, you can stay as long as you want"; + close; +L3: + mes "[Kyro]"; + mes "Then that's it for now..."; + mes "If there's anything else just tell me."; + close; + +} +//===================================================================== +ama_in02.gat,37,157,4 script Soldier 767,{ + mes "[Sbarro]"; + mes "This is our soldier's"; + mes "training ground."; + mes "Feel free to take a look around..."; + next; + mes "[Sbarro]"; + mes "But recently there's a strange atmosphere."; + mes "The solders aren't as lively as before."; + mes "How to describe it? Also seem depressed."; + mes "And some soldiers have gone missing..."; + mes "Maybe they moved to other continents."; + next; + mes "[Sbarro]"; + mes "And I also frequently see strange people."; + mes "I've heard that the customers upstairs are"; + mes "from far away, but because of their"; + mes "auspicious behaviors. I already command the soldiers"; + mes "to monitor their movements..."; + next; + mes "[Sbarro]"; + mes "Of course, the master must have his own thoughts"; + mes "and base his decisions on those."; + mes "Haha, it seems like I'm speaking too much."; + mes "See you later..."; + close; +} +//===================================================================== +ama_in02.gat,32,51,6 script Shiro 767,{ + mes "[Shiro]"; + mes "Cough cOugh, cough cough, what... leave me alone"; + mes "Go visit another place..."; + mes "Cough cough, cough cough... ouch, my throat"; + next; + mes "[Shiro]"; + mes "That fraud doctor's medicine"; + mes "did not work at all!"; + mes "Shouldn't trust those people from the continent..."; + mes "Cough cough, cough cough..."; + next; + mes "[Shiro]"; + mes "What the hell?!? My body is getting weaker and weaker..."; + mes "No energy at all... Is"; + mes "a flu really this bad?"; + mes "Cough cough... cough cough..."; + close; +} +//===================================================================== +ama_in02.gat,40,167,3 script Soldier 767,{ + mes "[Kuro]"; + mes "Shh... customer, please be quiet."; + mes "I will tell you a story"; + next; + mes "[Kuro]"; + mes "In Amatsu there is this rumor."; + mes "The truth is the current master"; + mes "is not the real master of the town... shh, quiet!"; + mes "Don't panic, please continue to listen."; + next; + mes "[Kuro]"; + mes "Behind this benign Master,"; + mes "there is a real master,"; + mes "scheming all kinds of plots,"; + mes "using the current master as a puppet,"; + mes "hidden in some corner"; + mes "controlling everything that happens in the town."; + next; + mes "[KurO]"; + mes "Doubt me?,"; + mes "It's real! I saw it,"; + mes "the other master's face"; + mes "watching the town across"; + mes "the river with an evil smile!!"; + mes "But what I have said today"; + mes "is a secret, ok?"; + close; +} +//===================================================================== +ama_in02.gat,32,167,5 script ¤h§L 767,{ + mes "[Kukuro]"; + mes "That guy is always rambling"; + mes "some gibberish, saying that our master"; + mes "might be a farce."; + mes "Not funny at all"; + next; + mes "[Kukuro]"; + mes "Although, it is true"; + mes "that some strange"; + mes "events happened recently,"; + mes "right now the interior of"; + mes "the castle is still off limits..."; + next; + mes "[Kukuro]"; + mes "Occasionally you can also hear"; + mes "a really scary sound. I don't know"; + mes "what's wrong with his mother,"; + mes "and many doctors have already visited."; + mes "Doesn't seem to be much hope..."; + close; +} +//===================================================================== +ama_in02.gat,42,34,2 script Soldier 767,{ +// npcs made by eAthena + mes "[Hakiro]"; + mes "Rest for a while before leaving,"; + mes "master has already prepared"; + mes "a few empty room for the visitors."; + next; + mes "[Hakiro]"; + mes "If there are any questions,"; + mes "come to me at any time."; + mes "And, please do not disturb"; + mes "the other visitors..."; + next; + mes "[Hakiro]"; + mes "Then, good day to you"; + close; +} +// eAthena Team +//===================================================================== +ama_in02.gat,203,156,4 script Soldier 767,{ + mes "[Hakiro]"; + mes "Master is in there."; + mes "If you want to go greet him,"; + mes "silently walk in and talk to him"; + next; + mes "[Hakiro]"; + mes "Master is not in a good mood right now."; + mes "Don't do or say anything insulting."; + mes "Normally, he will happily see visitors."; + mes "Don't know what happened today....."; + close; +} +// eAthena Dev Team +//===================================================================== +ama_in02.gat,195,156,4 script Soldier 767,{ + mes "[Kuro]"; + mes "Damn, maybe the master"; + mes "is having a hard time right now."; + mes "Usually he's a very nice guy..."; + next; + mes "[Kuro]"; + mes "There are strange rumors going around,"; + mes "but I still trust my master,"; + mes "because he was the one who"; + mes "transformed our town. So I became"; + mes "a soldier to serve him"; + close; +} +//===================================================================== +// eAthena Team +ama_in02.gat,115,177,7 script §L¤h 767,{ + mes "[Juro]"; + mes "What are you here for?"; + mes "There is nothing much over here."; + next; + menu "Oh, really",L1,"Please open the door for me",L2; +L1: + mes "[Juro]"; + mes "The town has much more stuff."; + mes "Have a wonderful time..."; + close; +L2: + if (event_amatsu != 7) goto Lnoflag; + if (countitem(7160) < 1) goto Llost; + mes "[Juro]"; + mes "You already got the pass..."; + mes "Do you want to go in directly? Or"; + mes "Do you want me to explain first...?"; + next; + menu "Direct access",L2_1,"Listen to explanation",L2_2; +L2_1: + mes "[Juro]"; + mes "Then, I will open the door for you."; + mes "Please take care..."; + next; + warp "ama_dun01.gat",229,10; + break; +L2_2: + mes "[Juro]"; + mes "The inner space seems to be "; + mes "protected by special spells."; + mes "Those who wander in carelessly,"; + mes "become lost and will be assaulted"; + mes "mysteriously and die."; + next; + mes "[Juro]"; + mes "What I can tell you"; + mes "isn't all that much."; + mes "I have not been inside."; + mes "It's a mysterious place, its only proof is"; + mes "of existance is from the"; + mes "survivors that ventured inside"; + next; + mes "[Juro]"; + mes "First of all....."; + mes "'Don't believe in what you see.'"; + next; + mes "[Juro]"; + mes "Second of all....."; + mes "About the spells, they have their own rules."; + mes "Everything has its own purpose,"; + mes "including the spells."; + mes "Will you find some"; + mes "answers?"; + next; + mes "[Juro]"; + mes "Then, I'll open the door for you."; + mes "Please be careful..."; + next; + warp "ama_dun01.gat",229,10; + break; +Llost: + mes "[Juro]"; + mes "You don't have the pass"; + mes "so I cannot open the gate for you."; + mes "Please understand."; + close; +Lnoflag: + mes "[Juro]"; + mes "What door are you talking about?"; + mes "In a place like this there won't"; + mes "be any doors as far as I know."; + mes "You might have been mistaken."; + next; + mes "[Juro]"; + mes "There are more to see in town."; + mes "I hope you have a good time..."; + close; +} +ama_dun01.gat,229,7,0 script Soldier 767,{ + mes "[Juro]"; + mes "Ready to leave?"; + next; + menu "Leave",-,"Wait a little more",L1; + mes "[Juro]"; + mes "Gogo!!"; + next; + warp "ama_in02.gat",119,181; + break; +L1: + mes "[Juro]"; + mes "Take care of yourself!"; + close; +} + +//===================================================================== +// eAthena Team +ama_in02.gat,200,176,4 script Castle Owner 768,{ + if (event_amatsu == 1) goto LStart2; + if ((event_amatsu >= 2) && (event_amatsu <=5)) goto LStart3; + if (event_amatsu == 6) goto LStart4; + if (event_amatsu == 7) goto LStart5; + mes "[Ishida Yoshinake]"; + mes "What! An outsider?"; + mes "What do you need me for?? If it's nothing important"; + mes "Talk to you later...!"; + next; + mes "[Ishida Yoshinake]"; + mes "Please leave! No matter who you are!!"; + mes "Right now I am in a VERY bad mood!"; + close; +LStart2: + mes "[Ishida Yoshinaku]"; + mes "What! A visitor...? Oh,sorry"; + mes "But today I am not in the mood"; + mes "of seeing a visitor!"; + next; + menu "I heard your mother is sick...",L1,"What a beautiful castle",L2,"Who are you?",L3; +L1: + mes "[Ishida Yoshinaku]"; + mes "Oh... You are an expert pathologist?"; + mes "Oh yea, if you are a foreign expert"; + mes "I should be able to trust you..."; + mes "I guess..."; + next; + mes "[Ishida Yoshinaku]"; + mes "Welcome, as you know"; + mes "I am the owner of the East Lake Castle"; + mes "My name is Ishida Yoshinaku,"; + mes "Nice to meet you."; + next; + mes "[Ishida Yoshinaku]"; + mes "To put it simple: my mother"; + mes "is not very healthy,"; + mes "of course you are here because of it"; + mes "Can you cure my ailing mother??"; + next; + mes "[Ishida Yoshinaku]"; + mes "So many famous and talented"; + mes "Doctors has visited her already,"; + mes "But not only did they not cure her!!"; + mes "They worsened her condition!!"; + mes "so I kept feeling disappointed"; + next; + mes "[Ishida Yoshinaku]"; + mes "You, being a foreign expert,"; + mes "may cure my mother's sickness!"; + mes "if you do, I will give you lots of zeny and rewards..."; + next; + mes "[Ishida Yoshinaku]"; + mes "Please help her,"; + mes "my mother lives in the mansion outside of the castle,"; + mes "After you cure her"; + mes "Come see me again"; + set event_amatsu,2; + close; +L2: + mes "[Ishida Yoshinaku]"; + mes "Yes! Beautiful indeed! So what"; + mes "Do you want to do! Leave when you get"; + mes "bored of it! Man!"; + next; + mes "[Ishida Yoshinaku]"; + mes "At a pressing time like this... *Sobs*..."; + mes "Leave when you become satisfied or bored!"; + close; +L3: + mes "[Ishida Yoshinaku]"; + mes "...Talking about me? You don't know? Eh?"; + mes "I am this castle's master!"; + mes "Go ask around the soldiers outside"; + mes "If you are not sure!"; + next; + mes "[if you are not sure]"; + mes "At a pressing time like this... *Sobs*..."; + mes "Leave when you become satisfied or bored!"; + close; +LStart3: + mes "[Ishida Yushinaku]"; + mes "How is my mother?"; + mes "If you know the name of the sickness...."; + mes "Please tell me immediately..."; + mes "Argh... So worried!"; + mes "I can't sleep at night any longer!"; + next; + mes "[Ishida Yushinaku]"; + mes "You are from the other continents,"; + mes "so you must know...."; + mes "now you are the only one I can trust"; + close; +LStart4: + mes "[Ishida Yushinaku]"; + mes "WoW, you are great, I heard"; + mes "My mother is getting better already,"; + mes "Anyway, what sickness was it?"; + next; + mes "[Ishida Yushinaku]"; + mes "Fox? The fox is the reason? ho..."; + mes "So it's not a sickness after all...!!"; + mes "Why didn't I think of it earlier!!!"; + next; + mes "[Ishida Yushinaku]"; + mes "Damn fox, after it ran away,"; + mes "it tried to revenge like this..."; + mes "But now there is no other"; + mes "Way... hahaha! Hahahaha!"; + next; + mes "[Ishida Yushinaku]"; + mes "Um, hmm, umm..."; + next; + mes "[Ishida Yushinaku]"; + mes "Anyway, Thanks for your help!"; + mes "I think my mother will return to normal now..."; + mes "I want to show you my gratitude..."; + mes "What to do..."; + next; + mes "[Ishida Yushinaku]"; + mes "Alright, I will give you this pass."; + mes "As long as you have this pass,"; + mes "you can get into ANYWHERE"; + mes "In this town"; + next; + set event_amatsu,7; + getitem 7160,1; + mes "[Ishida Yushinaku]"; + mes "Although it's not such a great gift, but"; + mes "I believe you will have use for it someday..."; + mes "talk to 'Juro' For the details"; + close; +LStart5: + mes "[Ishida Yushinaku]"; + mes "Hey... I hope you have a"; + mes "good time in Amatsu....."; + mes "We always welcome the foreigners!"; + close; +} +// eAthena Dev Team +ama_in01.gat,180,173,2 script Fox Mask 762,{ + if (event_amatsu == 4) goto LStart2; + if (event_amatsu == 5) goto LStart3; + mes "[Takikuwi]"; + mes "Hiya, outsider, this"; + mes "Shrine is left by a monk a long time ago."; + mes "Sometimes I come here to play"; + mes "along with my friend Tokari"; + next; + mes "[Takikuwi]"; + mes "If you are here to hide from the monsters,"; + mes "please do come in, no monsters"; + mes "can ever come in here!"; + mes "You can always take a short rest in here!"; + close; +LStart2: + mes "[Takikuwi]"; + mes "Hiya, outsider, here to find me?"; + mes "Because of the fox bothering you?"; + mes "From your expression You seem to"; + mes "have had quite a bit of trouble"; + next; + mes "[Takikuwi]"; + mes "Although usually the head monk"; + mes "should come to help himself, this shrine"; + mes "Has been deserted for a long time"; + next; + mes "[Takikuwi]"; + mes "It is very hard to get rid of a fox in a person's body"; + mes "If there's alcohol and ramen noodle,"; + mes "Iit might be a little easier,"; + mes "But they are hard to find!"; + next; + mes "[Takikuwi]"; + mes "Good thing I know quite a bit"; + mes "about the fox, I'll tell you"; + mes "some words of advice, although foxes"; + mes "are very tricky, and although they like to"; + mes "make fun of humans... but it is seldom"; + mes "for a fox to display hatred!"; + next; + mes "[Takikuwi]"; + mes "In another word, if there is hatred"; + mes "human also did something wrong!!"; + mes "Which will hurt self,"; + mes "And sometimes unlucky things happen"; + mes "and to friend and family as well!"; + next; + mes "[Takikuwi]"; + mes "Anyway,I've heard that when"; + mes "there's a strong animal then a fox will chased,"; + mes "away from the human."; + mes "So try hard, and try summoming the animal spirit!"; + next; + menu "Haaaa!!",-; + mes "[Takikuwi]"; + mes "Very good, just repeating it will"; + mes "show the fox a strong spirit,"; + mes "and show results, but the best thing is"; + mes "to find out why the fox will enter the"; + mes "person's body, but if you do this"; + mes "it should help, more or less"; + set event_amatsu,5; + close; +LStart3: + mes "[Takikuwi]"; + mes "Don't forget, when you try summoning"; + mes "you must think about!"; + mes "A monster that is stronger than a fox"; + mes "or it would just be a futile effort!"; + mes "Remember....... Stronger than a fox...."; + close; +} +// eAthena Dev Team +ama_in01.gat,169,173,0 script Miko 769,{ + mes "[Tokari]"; + mes "I'm not a real shrine maiden."; + mes "my friend, Takikuwi told me to try on"; + mes "this cloth... and he brought me"; + mes "to this shrine"; + next; + mes "[Tokari]"; + mes "Although he asks for weird shit sometimes"; + mes "he is still a funny friend!"; + mes "Sometimes I don't know what he's thinking"; + mes "but He is still a good friend"; + next; + mes "[Tokari]"; + mes "If you have any questions"; + mes "go ask Takihuwi first"; + mes "even stuff that now one knows"; + mes "no matter how weird or strange"; + mes "He knows... He always does!"; + close; +} +// eAthena Dev Team +amatsu.gat,269,221,1 script Proposing Girl 758,{ + mes "[Hutari Sioko]"; + mes "Nice to meet you"; + mes "my name is Hutari Sioko,"; + mes "my hobby is listening to music,"; + mes "and I usually listen to classical music"; + next; + mes "[Hutari Sioko]"; + mes "There is a legend"; + mes "about the large hill in our town"; + mes "do you know anything about it?"; + next; + mes "[Hutari Sioko]"; + mes "According to the legend, if you propose"; + mes "to your lover under that tree"; + mes "the couple will live happily ever forever"; + next; + mes "[Hutari Sioko]"; + mes "But the proposal cannot be done on any time"; + mes "it has to be on the Saturday Night."; + mes "or else it won't hold true"; + next; + mes "[Hutari Sioko]"; + mes "Furthermore, the proposal has to be answered"; + mes "prior to Sunday night after"; + next; + emotion 3; + mes "[Hutari Sioko]"; + mes "If you have a secret admirer..."; + mes "why not meet under that tree"; + mes "and propose?"; + mes "I bet something good will happen"; + close; +} +// eAthena Dev Team +amatsu.gat,287,266,3 script Jyaburo 766,{ + mes "[Jyaburo]"; + mes "This is a special place"; + mes "for my wife and me"; + next; + mes "[Jyaburo]"; + mes "..When I was here Proposing"; + mes "to her here under the tree.."; + mes "I didn't know that she"; + mes "liked me as well"; + next; + mes "[Jyaburo]"; + mes "After that, we talked a lot here under this tree,"; + mes "this is the ideal location"; + mes "because of its tranquility and harmony,"; + mes "an everlasting moment of happiness"; + next; + mes "[Jyaburo]"; + mes "Even now, when I close my eye, I can clearly remember"; + mes "the sweet memories of the past"; + mes "as if it happened yesterday..."; + next; + mes "[Jyaburo]"; + mes "Even though she passed away some times ago"; + mes " I always come here alone now,"; + mes "Everytime I come here it is as if my wife is just besides me,"; + mes "And my depressed and broken heart is gone"; + next; + mes "[Jyaburo]"; + mes "After hearing my rambling,"; + mes "Can you think of anyone?"; + mes "If you can, stop the hesitation and the delay,"; + mes "And love her with all your heart"; + next; + mes "[Jyakuro]"; + mes "What does it mean to be human?"; + mes "Smile, and live your life to the fullest"; + mes "Even though life might be sure,"; + mes "Forget the worries and pains"; + mes "Always try to live a happy life"; + close; +} +// eAthena Dev Team +amatsu.gat,274,178,0 script Vet 735,{ + mes "[Sakura Seiichi]"; + mes "Oww... I'm not a suspicious guy,"; + mes "please don't be surprised, I am just"; + mes "A regular vet,"; + mes "making a living but"; + mes "curing sick animals"; + next; + mes "[Sakura Seiichi]"; + mes "But... Did you know?"; + mes "about the sakura tree on the hill"; + mes "and its story... Maybe this is the"; + mes "first time you've heard?!"; + next; + mes "[Sakura Seiichi]"; + mes "The reason that tree can maintain"; + mes "its everlasting youth and bueaty"; + mes "lies within its secret..."; + mes "that is... Because below the tree"; + mes "dead people are buried..."; + next; + menu "Can buried people feel the pain?",L1,"Speaking of bullshit...",L2; +L1: + mes "[Sakura Seiichi]"; + mes "... Maybe..."; + mes "Anyways, do you believe me or not"; + mes "want to make a bet...?"; + next; + emotion 9; + mes "[Sakura Seiichi]"; + mes "What if I..."; + mes "............"; + mes "............"; + next; + mes "^6633FFHer laugh gradually fades^000000"; + mes "^6633FFAway in the wind,^000000"; + mes "^6633FFUntil nothing can be heard anymore,^000000"; + mes "^6633FFCannot even remember what^000000"; + mes "^6633FFHe was about to say...^000000"; + close; +L2: + mes "[Sakura Seiichi]"; + mes "So entranced, I suppose you are all right..."; + mes "becareful, one day that kind of things"; + mes "Will happen to you as well.."; + next; + Emotion 9; + mes "[Sakura Seiichi]"; + mes "Hahaha... Hahahaha....."; + mes "..............."; + mes "..........."; + next; + mes "^6633FFHer laugh gradually fades^000000"; + mes "^6633FFAway in the wind,^000000"; + mes "^6633FFUntil nothing can be heard anymore,^000000"; + mes "^6633FFI don't understand why she told^000000"; + mes "^6633FFMe that...^000000"; + close; +} +// eAthena Dev Team +amatsu.gat,283,203,1 script PokePoke 738,{ + Emotion 19; + mes "[Pokepoke]"; + mes "The tree on this hill"; + mes "has existed for a long time, a deep-rooted"; + mes "and ever-blooming Sakura Tree King"; + next; + Emotion 19; + mes "[Pokepoke]"; + mes "And I am very thankful of this tree,"; + mes "whenever I feel any sorrow or sadness"; + mes "I always go sit under that tree"; + next; + Emotion 19; + mes "[Pokepoke]"; + mes "That way no matter what happened"; + mes "I can forget it all...."; + mes "this tree will sooth us"; + mes "and make us forget sad things"; + mes "a magic tree"; + next; + Emotion 19; + mes "[Pokepoke]"; + mes "If you feel any sadness or sorrow"; + mes "you can try to sit under this tree"; + mes "a really magical and thankful tree..."; + close; +} +// eAthena Dev Team +amatsu.gat,261,197,4 script Legendary Sakura Tree 111,{ + mes "^0000FFJust as she said"; + mes "this tree is famous because"; + mes "many couples confessed their love here"; + mes "Sometimes you can still see a few people"; + mes "Drawinging a heart with the lover's"; + mes "Name within it.^000000"; + next; + mes "^0000FFThey are not only here for lover's confessions,"; + mes "sometimes they will meet here too"; + mes "talk about some important matters,"; + mes "in such a beautiful place"; + mes "no matter what they are discussing"; + mes "they always reach an agreement^000000"; + close; +} + +// eAthena Dev Team \ No newline at end of file diff --git a/npc/cities/comodo.txt b/npc/cities/comodo.txt new file mode 100644 index 000000000..4cfb9e967 --- /dev/null +++ b/npc/cities/comodo.txt @@ -0,0 +1,1616 @@ +//===== eAthena Script ======================================= +//= Comodo Town +//===== By: ================================================== +//= eAthena dev team +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Not complete. +//= 1.1 Rolled back from the wron Kashy's fix +//= Implemented the 'Cheese'/Stone of Awakening quest. Re-organized stuff. [kobra_k88] +//============================================================ + + + +//===============================================================================================================// +// BBQ Camp Grounds // +//===============================================================================================================// + +//==================================================== +comodo.gat,216,310,4 script BBQ Papa 85,{ +OnStart: + mes "[BBQ Son]"; + mes "Daddy! Daddy!........ Is it true that an ^FF4444Evil Witch^000000 onced lived in our village?? Does she still live here???"; + next; + mes "[BBQ Mama]"; + mes "Son, where did you hear about that?"; + next; + mes "[BBQ Papa]"; + mes "Ha ha... are you scared of the Evil Witch? It's just an old story......"; + next; + mes "[BBQ Son]"; + mes "No daddy! If the Witch really lived on our island, her home must be around here still.... She had to have a place to sleep in... right??"; + next; + mes "[BBQ Mama]"; + mes "Ho ho ho... now if all of this were true don't you think the ^5555FFChief^000000 would know about it?"; + mes "Anyway, we better start eating before the meat gets overcooked."; + next; + mes "[BBQ Son]"; + mes "Okay.... (~crunch~chew~) Yum Yum!!. I'm... I'm...... (~chomp~chomp~).... gonna find out the truth!! (~crunch~chomp~) Mmmmm......"; + close; +} + +//======================================================= +comodo.gat,215,307,4 script BBQ Mama 66,{ + doevent "BBQ Papa::OnStart"; + end; +} + +//======================================================= +comodo.gat,213,310,4 script BBQ Son 706,{ + doevent "BBQ Papa::OnStart"; + end; +} + +//======================================================= +comodo.gat,221,310,4 script Rinta 89,{ + mes "[Rinta]"; + mes "I was 'accidentally' eavesdropping on those people having the BBQ over there."; + mes "It seems that they are long time friends of Comodo's ^5555FFChief^000000."; + next; + mes "[Rinta]"; + mes "If this is true, then this means that they can have as much meat and seasoning as they want......"; + emotion 5; + close; +} + +//======================================================= +comodo.gat,218,309,4 script Razy 69,{ + mes "[Razy]"; + mes "I really dislike people who constantly reminisce about the past. Like that group of people over there. They're really starting to bug me."; + next; + mes "[Razy]"; + mes "However, the lady in that group looks really beautiful.... her skin is so light and her complexion is wonderfull."; + mes "If only she didn't have that scar on her face.... she would be perfect..........."; + close; +} + + + +//===============================================================================================================// +// Casino // +//===============================================================================================================// + +//============================================================= +cmd_in02.gat,172,105,4 script G . J 86,{ + mes "[G . J]"; + mes "The more I think about it, the more I realize that it is easier and quicker to get rich by working a steady job and saving my money"; + mes "than it is to gamble it away on false hopes of hitting the jackpot. "; + next; + mes "[G . J]"; + mes "It just seems like a smarter choice. I can still earn a good living even after paying my bills and taxes."; + mes "I feel that it is much more respectable to earn your living through hard work than it is to try to make a living on easy money."; + next; + mes "[G . J]"; + mes "Wouldn't you agree? Think about it in this way: You and your friend have been gambling and your friend hits the jackpot."; + mes "You would want your friend to buy you dinner or even lend you some of the prize money right?"; + next; + mes "[G . J]"; + mes "Afterall it's not like your friend EARNED the money.... he/she just got lucky thats all."; + mes "Your friend shouldn't mind sharing money that really isn't his/hers."; + next; + mes "[G . J]"; + mes "On the other hand, if that same friend had a steady job and worked hard for evey penny he/she earned......"; + mes "would you be comfotable asking your friend for some of that hard earned money?"; + next; + mes "[G . J]"; + mes "You wouldn't dare would you! That money was well earned and represents your friends hard work."; + mes "You have respect for you friend because of that, and value his/her money more than some prize money."; + close; +} + +//============================================================= +cmd_in02.gat,178,92,4 script Shalone 101,{ + mes "[Shalone]"; + mes "Ok, ok............ A-4!! Looks like you've lost again sir.... Hoo hoo, if you'd like a little advice, you shouldn't play when your luck's this bad."; + next; + mes "[Shalone]"; + mes "( This costumer just can't seem to win! I feel so sorry for him... ~sigh~)"; + close; +} + +//============================================================= +cmd_in02.gat,178,86,4 script Stonae 98,{ + mes "[Stonae]"; + mes "WHAT!! Dang it!! AGAIN!! Arghhhhhhh!!!............"; + emotion 23; + next; + mes "[Stonae]"; + mes "Sheesh! I can't quit after losing this badly! I won't quit until I win!"; + emotion 7; + next; + mes "[Stonae]"; + mes "Let's go!!"; + emotion 27; + close; +} + +//============================================================= +cmd_in02.gat,174,126,4 script Loyar 83,{ + set @TEMP,0; + mes "[Loyar]"; + mes "The Comodo Casino has a very pleasing decor... It's quite clean and smiple!"; + mes "The atomoshpere is perfect and makes you really want to play more!"; + emotion 33; + next; + mes "[Loyar]"; + mes "Atmosphere is everything when it comes to gaming."; + next; + mes "[Loyar]"; + mes "No matter how much fun a game is, no one would be willing to play for a long time if the environment was dirty."; + mes "A shabby interior and bad odors can wreck a good casino!"; + next; + mes "[Loyar]"; + mes "The Comodo Casino is the best... NOTHING can beat it! The interior design might even change the mood of a sensitive player."; + mes "Isn't it great?!"; + close; +} + +//============================================================= +cmd_in02.gat,73,81,4 script Martine 48,{ + set @temp, 2; + mes "[Martine]"; + mes "Gambling? Oh no, it's NOT gambling! Don't say that the Comodo 'CASINO' houses gambling....."; + emotion 0; + next; + mes "[Martine]"; + mes "We provide some of the greatest 'GAMES' in the world. It's much more of a sophisticated form of 'GAMING' than it is 'GAMBLING'....."; + mes "You know what I mean?? (~wink~)"; + next; + mes "[Martine]"; + mes "What?......... Don't look at me like that!................."; + emotion 0; + next; + mes "[Martine]"; + mes "..... Ok, FINE! I see how it is. I don't care what you think. I've lost all my zeny playing in this casino and I have NO regrets whatsoever!"; + emotion 7; + next; + mes "[Martine]"; + mes "Today's competition is over! I'll have to go to the ^5555FFComodo Dungeon^000000 and kill some monsters to earn back the zeny I lost."; + mes "But no worries here cause after I've made some zeny, I'll be right back were I left off!!"; + next; + mes "[Martine]"; + mes "WOO HOO!! I'm gonna have a blast!! HAHAHA!"; + emotion 29; + close; +} + +//============================================================= +cmd_in02.gat,64,43,4 script Roberto 709,{ + mes "[Roberto]"; + mes "Muhahaha... What a stupid man! Now that's easy money! (~counts his money~)"; + emotion 29; + next; + mes "[Roberto]"; + mes "Hey you! What are you looking at!? Get out of here!! What... you've never seen someone count money before??"; + emotion 1; + close; +} + +//============================================================= +cmd_in02.gat,89,72,4 script Deniroz 89,{ + mes "[Deniroz]"; + mes "If the bead falls in this time, i'll hit the JACKPOT!! All I have to do is put this small bead into that little hole."; + emotion 0; + next; + mes "[Deniroz]"; + mes "Most people give up after a few tries, but not me..... *whispers*(the can of beer in my hand is actually a powerful magnet)..."; + next; + mes "[Deniroz]"; + mes "Keee hee hee hee!! I'm going to get rich with my secret plan!!"; + emotion 29; + close; +} + +//============================================================= +cmd_in02.gat,57,62,4 script Casino Manager Moo 109,{ + mes "[Casino Manager Moo]"; + mes "I am the manager of Comodo Casino. My name is ^3355FF'Moo'^000000."; + next; + mes "[Casino Manager Moo]"; + mes "Here at the Comodo Casino, we strive to serve our customers and accomidate their needs as best we can."; + mes "Please let us know if you need anything."; + next; + mes "[Casino Manager Moo]"; + mes "This area is for the VIP guest at our Casino. Our VIP program fascilitates a more sophisticated level of gaming."; + mes "If you're interested in a more easy going gaming environment, I recomend choosing a more genral gaming area."; + next; + mes "[Casino Manager Moo]"; + mes "We are continually expanding and trying to develop a more enjoyable environment for our guests here so check back with us often."; + close; +} + +//==================================================== +cmd_in02.gat,48,55,4 script Scoursege 51,{ + mes "[Scoursege]"; + mes "Darn it, where is that guy who borrowed my zeny? He better not be hiding from me, he told me he would double my money!"; + emotion 19; + next; + mes "[Scoursege]"; + mes "He was positive that he could double my money and make a little for himself! Where is he?..............."; + next; + mes "[Scoursege]"; + mes "Have I been scammed!?? On no! What should I do?? My zeny..... (~sob~sob~)"; + emotion 28; + close; +} + + + +//===============================================================================================================// +// Chief Quest // +//===============================================================================================================// +//======================================================= +comodo.gat,206,310,4 script Rochito 48, +{ + if(chief_Q == 1) goto L_1; + if(chief_Q == 2) goto L_2; + if(chief_Q == 3) goto sL_2; + if(chief_Q == 4) goto L_3; + if(chief_Q == 5) goto sL_3; +L_0: + mes "[Rochito]"; + mes "Meat, meat, meat... I LOVE MEAT!! Eat, eat, eat... ALL I eat is MEAT!! I'm sooo obsessed with meat..... I'm... I.. I... I'm a MEAT MAN!!"; + emotion 3; + next; + mes "[Rochito]"; + mes "Comodo is meat heaven!! That's why BBQ camping in Comodo is sooooo AWESOME!!!"; + next; + menu "Tell me more about BBQ Camping.",M_0, "End Conversation.",M_End; + + M_0: + mes "[Rochito]"; + mes "The Komodoru, a native animal of Comodo, is famous because of it's delicious meat. Every part of the animal is tasty."; + mes "However the tastiest part of the Komodoru, is the area around the spine. It's number one!"; + emotion 21; + next; + mes "[Rochito]"; + mes "Look at all of this meat in front of me! I don't know what to do with all of this meat! What should I do?? Oh no!...................."; + emotion 19; + next; + mes "[Rochito]"; + mes "Oh, I almost forgot!! You must try this Komodoru spine meat with Comodo's authentic BBQ seasoning."; + mes "^5555FFKoserahserah^000000 is the name of the seasoning, and you should at least try it once before you leave."; + next; + mes "[Rochito]"; + mes "There is a rumor going around this camp ground that Koserahserah is soooo good that it might be addictive."; + mes "It's possible that it may even cause a slight euphoria in those who try it."; + next; + mes "[Rochito]"; + mes "I'm not sure if that's true, but I do not that the seasoning is not allowed to be exported outside of Comodo."; + mes "Luckily I'm a resident here so I can have as much as I want."; + next; + mes "[Rochito]"; + mes "Still, the authorities are worried about how Koserahserah should be regulated."; + mes "The ^5555FFChief of Comodo^000000 is currently working on a some guidlines for it."; + set chief_Q, 1; + close; + M_End: + close; + +L_1: + mes "[Rochito]"; + mes "This Komodoru spine meat is delicious when seasoned with ^5555FFKoserahseah^000000, a local flavoring that is the pride of Comodo!!"; + mes "Would you like to try some?"; + next; + mes "[Rochito]"; + mes "Oh, are you looking for the ^5555FFChief's^000000 house? Just go west of this camp ground to the village. You'll find his house there."; + close; + +L_2: + mes "[Rochito]"; + mes "We have a lot of time left on our vacation and I think we should spend the rest of it here, enjoying the Komodoru meat."; + next; + mes "[Rochito]"; + mes "In fact, we should just keep on having BBQ parites!"; + next; + mes "^5533FF~ gave Rochito the Koserahserah ~^000000"; + next; + mes "[Rochito]"; + mes "Oh my!! This is the special Comodo seasoning.... Koserahserah!! How did you manage to get this precious delicacy?"; + emotion 0; + next; + mes "[Rochito]"; + mes "Oh... I see, I see. So it was given to you by my long time friend. Well, thank you so much.... thank you..."; + emotion 15; + next; + mes "[Rochito]"; + mes "Hey everybody! Tausupa has sent us some Koserahserah seasoning!!"; + next; + mes "[Emralhandas]"; + mes "Our old freind?"; + next; + mes "[Rochito]"; + mes "I don't know if we should take such a great gift...."; + next; + mes "[Rockha]"; + mes "........................."; + next; + mes "[Rochito]"; + mes "We should give him something in return as a thank you. But what can we give him?.........."; + mes "should we give him that wonderful ^5555FFWine^000000 we've been saving? It has a very nice aroma...."; + next; + mes "[Rochito]"; + mes "May I ask a favor of you? If it is not too much trouble, would you take this to our dear friend....."; + mes "I would deliver this in person but I'm a little busy with the BBQ and all....."; + next; + mes "[Rochito]"; + mes "Please. We would be very grateful if you could give this to him."; + next; + mes "^5555FF~ recieved 'Mureuchieligu Wine' ~^000000"; + set chief_Q, 3; + close; + + sL_2: + mes "[Rochito]"; + mes "Please do us a favor and deliver the wine to the chief. We would be very greatful if you did."; + close; + +L_3: + mes "[Rochito]"; + mes "You've returned..... Oh! Thank you for the delivering the wine for us."; + emotion 15; + set chief_Q, 5; + next; + + sL_3: + mes "[Rochito]"; + mes "We are very proud of our courageous friend. It is because of him that we can live peacefully and travel safely."; + next; + mes "[Rochito]"; + mes "Oh, I just remembered something...."; + mes "We've been talking about Comodo's famous meat all this time, and I didn't even mention Comodo's world famous ^5555FFCheese^000000!"; + next; + mes "[Rochito]"; + mes "I believe there is a cheese expert named ^5533FFTORUNA^000000 somewhere on this island."; + mes "If your interested in the cheese you should go ask him about it."; + if(cheese_Q == 0) set cheese_Q, 1; + close; + + +} + +//======================================================= +comodo.gat,204,310,4 script Rockha 98, +{ + if(chief_Q == 3) goto L_1; + if(chief_Q == 4 || chief_Q==5) goto L_2; +L_0: + mes "[Rockha]"; + mes ". . . . . . . . . ."; + mes "My friends and I always wanted to have our BBQ eat out....."; + mes ". . . . . . . . . ."; + next; + menu "About the ^3355FFChief^000000.",M_0, "End Conversation.",M_End; + + M_0: + mes "[Rockha]"; + mes "Yeah... I recently discovered that a friend I thought I lost during the ^FF4444'War with the Witch'^000000, is still alive."; + mes "Now he's the ^5555FFChief of Comodo^000000...."; + next; + mes "[Rockha]"; + mes "At the end of the war the witch was defeated and sealed in the ground beneath this village."; + next; + mes "[Rockha]"; + mes "It is rumored that the seasonings we get from our local plants somehow recieve their unique qualitites from the Witch's magical influence."; + next; + mes "[Rockha]"; + mes "Although my friend and I now live in different worlds, his new life hasn't changed him."; + mes "Thankfully we can still be friends after all that's happened."; + close; + +L_1: + mes "[Rockha]"; + mes "Oh, and by the way.... Could you give him this message as well?"; + mes "Tell him, 'For as long as you have remembered us, we will not forget you. Friends forever.'....."; + close; + +L_2: + mes "[Rockha]"; + mes "Ha ha ha..... aaaahhh.... THIS is FRIENDSHIP!!"; + emotion 18; + next; + mes "[Rockha]"; + mes "Let us take a moment to make a toast to our good friend. Let us eat and drink until we can eat no more!!"; + next; + mes "[Rockha]"; + mes "~!!Yippeeeeee!!~!!Wooohooooo!!~"; + close; + mes "[Rockha]"; + mes "Thank you for your assistance. You have shown us that you are truly a good person. We now consider you as a friend."; + next; + mes "[Rockha]"; + mes "If you ever need any help, just come and look for me, ^3355FF'Rockha'^000000. We are forever in your debt."; + close; +} + +//======================================================= +comodo.gat,209,314,4 script Rotute 82, +{ + if(chief_Q==2 || chief_Q==3) goto L_1; + if(chief_Q == 4 || chief_Q==5) goto L_2; + +L_0: + mes "[Rotute]"; + mes "The quest for the ^5555FFSwords of Power^000000 has not yet been completed!"; + next; + mes "[Rotute]"; + mes "Although four of the swords have been recovered by our team, there are rumors of a more powerfull sword near ^5555FFGlastheim^000000."; + mes "This has brought us yet another challenge....."; + next; + mes "[Rotute]"; + mes "We must find this new sword!! A new expidition has been planned to find this sword but I feel very anxious."; + mes "If we succeed this will affect the whole world!! For my deceased father....."; + next; + mes "[Rotute]"; + mes "...... We MUST SUCCEED!!!!"; + emotion 27; + close; + +L_1: + mes "[Rotute]"; + mes "Wow!! This is Comodo's famous seasoning!! The Captain's friend is truly a good person. To be this generous is unbelievable!"; + emotion 0; + next; + mes "[Rotute"; + mes "I can only hope that I find a freind that is as loyal as he on this quest....."; + close; + +L_2: + mes "[Rotute]"; + mes "It's strange.... this is only my first visit to Comodo and yet.... for some reason, it seems so familiar... like it's my home town."; + next; + mes "[Rotute]"; + mes "When this journey is over, I hope to visit this wonderful place again..... It feels like something is waiting for me here."; + next; + mes "[Rotute]"; + mes "Oh, and thanks so much for helping our captain."; + emotion 15; + close; +} + +//======================================================= +comodo.gat,209,305,4 script Emralhandas 70,{ + mes "[Emralhandas]"; + mes "Rockha, empty your glass so I can pour you a drink."; + next; + mes "[Emralhandas]"; + mes "Many years ago, during the War with the Witch, we dreamed of the day when we could live in peace."; + mes "Today that dream has come true and it's all because of you my freinds!!"; + emotion 21; + next; + menu "Ask about her friends....",M_0, "End Conversation",M_End; + + M_0: + mes "[Emralhandas]"; + mes "Many years ago, heroes from every region of Rune Midgard were selected to embark upon a very unique and important quest."; + next; + mes "[Emralhandas]"; + mes "The goal was to find the ^5555FF4 rare 'Swords of Power'^000000!"; + mes "These 4 swords were said to be the most powerful weapons to have ever been made."; + next; + mes "[Emralhandas]"; + mes "After 10 hard years of searching, all 4 swords were found and brought together."; + mes "Out of all of those who searched the swords, the four bravest were chosen to protect them."; + next; + mes "[Emralhandas]"; + mes "I, Emralhandas, was one of the four that were chosen."; + next; + mes "[Emralhandas]"; + mes "Of course there were many hardships that we had to endure before, and even after these swords were found........"; + next; + mes "[Emralhandas]"; + mes "Our team of adventures consisted of myself, our ship's captain 'Rockha', our comrade 'Rochito', and the Chief of this town, 'Tausupa'."; + next; + mes "[Emralhandas]"; + mes "We had found the last sword and headed back to the island. Up to this point we had not even thought about the weapon's owner."; + mes "As we left we began to have a bad feeling about what was going to happen next."; + next; + mes "[Emralhandas]"; + mes "When we returned to the island, we were confronted by ^790079'Mariposum'^000000, a powerful Witch who practiced the dark art of EVIL magic!!"; + next; + mes "[Emralhandas]"; + mes "Her goal was to take over the world and plunge into a dark chaos!! We had to defend not only ourselves, but the future of humanity!!"; + mes "So it was here that me made our stand against this terrible evil!"; + emotion 0; + next; + mes "[Emralhandas]"; + mes "A tremendous battle took place and many of our comrades fell that day... but their efforts were not in vain."; + next; + mes "[Emralhandas]"; + mes "With bloodshed and feirce determination we were able to defeat the witch and inprison her beneath the earth."; + next; + mes "[Emralhandas]"; + mes "Of all of those who risked their lives that day, one stood out amoungst the rest and became the deciding factor in the witch's defeat....."; + next; + mes "[Emralhandas]"; + mes "It was ^5555FFTausupa^000000."; + next; + mes "[Emralhandas]"; + mes "Of course we are greatful to all the brave warriors who fought and lost their lives that day."; + mes "Especially to 'Rotute's' father who cannot be with us today, may he rest in peace."; + next; + mes "[Emralhandas]"; + mes "Rotute does not know about this yet, but hopefully he will find out about his father's heroism before this quest is complete......"; + close; + M_End: + mes "[Emralhandas]"; + mes "Our quest has not yet been completed. Rockha we must eat all of the meat in Rune Midgard untill there is none left!!"; + mes "We must eat and eat, for the pride of our Meat Club!!! (~hiccup~)"; + close; +} + + +// Chief's House =========================================================// +cmd_in02.gat,32,140,4 script Chief Tausupa 49, +{ + if(chief_Q == 1) goto L_1; + if(chief_Q == 2) goto sL_1; + if(chief_Q == 3) goto L_2; + if(chief_Q == 4) goto sL_2; + +L_0: + mes "[Chief Tausupa]"; + mes "Hello, I am the Chief of Comodo. You may call me Tausupa. Comodo is a place of pleasure, enjoyment, love, and beauty."; + mes "Welcome, and have a pleasant and relaxing stay here."; + next; + menu "Ask about the ^5555FFCasino^000000.",M_0, "Ask about the ^790079Evil Witch^000000.",M_1, "End Conversation.",M_End; + + M_0: + mes "[Chief Tausupa]"; + mes "The Casino is one of the many notable sites in Comodo. It would seem that you have some interest in it."; + mes "The Casino uses it's own currency, a coin called the ^5555FF'Eulwo'^000000."; + next; + mes "[Chief Tausupa]"; + mes "There are a variety of games for you to enjoy there."; + mes "The earnings you win can be used to purchase different items available only in the Casino."; + next; + mes "[Chief Tausupa]"; + mes "These earnings, which are in the form of Eulwo, cannot be exchanged for Zeny though."; + close; + M_1: + mes "[Chief Tausupa]"; + mes ". . . . . . . . . ."; + mes "You must be from out of town. I'm not sure where you heard about it, but that story is old and most people have forgotten about it."; + mes "It's really not worth mentioning. . . . . . . . . . . ."; + close; + M_End: + mes "[Chief Tausupa]"; + mes "If you haven't noticed, Comodo is located inside of a huge, natural, cave. No matter what time of day it is, you'll never see the sunlight."; + next; + mes "[Chief Tausupa]"; + mes "It is this unique 24 hour nightlife that attracts so many tourist to our town. Anyways, please enjoy your stay here."; + close; + +L_1: + mes "[Tausupa]"; + mes "..... Is that so? My long time friends have come back to Comodo and are at the Camp Grounds enjoying the BBQ huh?......."; + next; + mes "[Tausupa]"; + mes "It would seem that they are planning another expedition........"; + next; + mes "[Tausupa]"; + mes "I have not seen my friends in a long time and the sound of going on another adventure with them is very exciting.... however......"; + next; + mes "[Tausupa]"; + mes "~sigh~ Unfortunately I will not be able to go with them. I fear that if I leave, the evil witch will revive and wreak havoc on this world once again."; + next; + mes "[Tausupa]"; + mes "..... I have a favor I must ask of you......."; + next; + mes "[Tausupa]"; + mes "Can you take this special seasoning to my friends?"; + next; + mes "^5555FF~ recieved Koserahserah ~^000000"; + set chief_Q, 2; + next; + + sL_1: + mes "[Chief Tausupa]"; + mes "Please take this seasoning to my friends at the BBQ camp grounds and give it to ^5555FFRochito^000000. Thank you."; + close; + +L_2: + mes "[Chief Tausupa]"; + mes "Were my freinds happy? After you left, I had some time to think..... I should have delivered the seasoning personally......"; + mes "I should have gone to see them......"; + next; + mes "[Chief Tausupa]"; + mes "But I am much too busy as the Chief of Comodo........ Maybe I should quit..........."; + mes "I really want to go on another quest with my good friends.... How did I end up like this?"; + next; + mes "^5555FF~ you give him Mureuchieligu Wine and convey the message ~^000000"; + next; + mes "[Chief Tausupa]"; + mes ".................."; + next; + mes "[Chief Tausupa]"; + mes "That was a message from my friends? I think I understand now.... My friends are TRUE friends. They have been thinking of me all this time........"; + next; + mes "[Chief Tausupa]"; + mes "I have made up my mind!"; + emotion 5; + next; + mes "[Chief Tausupa]"; + mes "Mureuchieligu Wine is made as soon as the grapes are picked. It is then bottled in the very same place and is left there to age."; + mes "The wine spends the rest of its days aging in the same spot."; + next; + mes "[Chief Tausupa]"; + mes "Much like the wine, I have been aging away in the same place here in Comodo, and I must continue to stay here for it is my duty."; + next; + mes "[Chief Tausupa]"; + mes "I am thankful for my friends' advice. The gift they gave me had a great deal of meaning."; + mes "Please tell my friends this, 'I will not avoid my destiny. On the contrary, I will fullfill it to the best of my ability'."; + set chief_Q, 4; + next; + + sL_2: + mes "[Chief Tausupa]"; + mes "I would like to thank you for helping my friends and I. I am truly greatful."; + close; +} + + + +//=======================================================================================================// +// Cheese Quest // +//=======================================================================================================// + +//======================================================= +comodo.gat,88,97,4 script Cheese Expert TORUNA 109, +{ + if(cheese_Q == 2) goto sL_2; + mes "[TORUNA]"; + mes "I hear that the cheese here is delicious. Everytime I come here to visit, I ask for some of that popular cheese."; + mes "But they always seem to be out! If I could just get a taste of that cheese..........."; +M_Menu: + next; + menu "Ask about the cave.",M_0, "Comodo is a town inside a cave?",M_1, "End Conversation.",M_End; + + M_0: + mes "[TORUNA]"; + mes "It is a natural formation of limestone which was shaped by the erosive powers of fresh water with sea water."; + next; + mes "[TORUNA]"; + mes "The air and topsoil in the cave are rich in carbon-dioxide gas."; + mes "This was caused by C02 gas leaking into the cave through cracks in the limestone over a period of many years."; + next; + mes "[TORUNA]"; + mes "Water from rainfall and ocean currents slowly eroded the limestone to carve out the cave."; + next; + mes "[TORUNA]"; + mes "Essentially a cave is formed when water finds cracks in some type of rock formation and erodes the rock to a point where a cave is formed."; + mes "Of course this takes hundreds of years and a lot of water."; + goto M_Menu; + M_1: + mes "[TORUNA]"; + mes "Yep. What you see here is really the inside of a gigantic cave."; + mes "Most people don't realize this at first, and that's thanks to all of the towns people's hard work and dedication."; + next; + mes "[TORUNA]"; + mes "The people who settled here were very industrious and worked diligently to turn this cave into a place that they could call home."; + next; + mes "[TORUNA]"; + mes "They slowly chipped away at the limestone surfaces, to shape the interior of the cave into something much more eye pleasing."; + mes "It was from these humble beginnings that the Comodo you see today, was founded."; + next; + if(cheese_Q == 1) goto sL_1; + + mes "[TORUNA]"; + mes "Unfortunately that is only half the story."; + next; + mes "[TORUNA]"; + mes "The early settlers faced an even greater challenge when the ^790079Evil Witch, Meropusum^000000, arrived."; + mes "She was determined to rule the world, and used the newly founded town of Comodo as her staging ground."; + next; + mes "[TORUNA]"; + mes "Led by a group of strong heros, the town fought back against the witch and sealed her away. Many lives were lost in this war however."; + next; + mes "[TORUNA]"; + mes "The strongest of the heros was chosen as the town's new leader, and under his leadership the town prospered."; + next; + mes "[TORUNA]"; + mes "Be aware though, that Meropusom is still alive. Although she has been sealed away, her evil powers can still be felt."; + mes "Her minions still lurke in the shadows awaiting their master's return."; + next; + mes "[TORUNA]"; + mes "So be cautious when venturing into the unkown parts of Comodo. Anyway, so long and take care."; + goto M_Menu; + + sL_1: + mes "[TORUNA]"; + mes "Not only has this cave become a home for the people of Comodo, but it's unique environment has also helped in creating...."; + next; + mes "[TORUNA]"; + mes "The world famous..... Comodo ^5533FFCheese^000000!!!"; + emotion 5; + next; + mes "[TORUNA]"; + mes "This special Cheese is simply DELICIOUS! You will understand how good the Cheese is once you try it."; + emotion 14; + set cheese_Q, 2; + next; + sL_2: + mes "[TORUNA]"; + mes "You should go speak with the people at the ^009500Outdoor Bar^000000 near the camp grounds."; + mes "I heard them talking about the ^5533FFCheese^000000, it is so popular."; + close; + M_End: + mes "[TORUNA]"; + mes "The taste of Comodo Cheese is simply out of this world!! Just one taste and I guarantee that you won't be able to stop!"; + mes "It's so good you may even go GRAZY without it!"; + emotion 3; + next; + mes "[TORUNA]"; + mes "Oh if I could just have one piece.... I'd be soooo happy I'd dance all night on that ^5555FFHula Dancing Stage^000000!!"; + close; +} + +//======================================================= +comodo.gat,164,291,2 script Rakusa 73, +{ + if(cheese_Q == 2) goto L_1; + if(cheese_Q == 3) goto L_2; + + mes "[Rakusa]"; + mes "Comodo is often reffered to as the town of 'recreation and relaxation'......."; + next; + mes "[Rakusa]"; + mes "This can be misleading however, for Comodo is not only the home of fun tourist attractions, but two very ^FF4444dangerous dungeons^000000 as well."; + next; + mes "[Rakusa]"; + mes "This area has unusually strong monsters. If you plan on entering the dungeons, be very well prepapred and expect trouble."; + mes "These dungeons are definately not for the faint of heart!"; + close; +L_1: + mes "[Rakusa]"; + mes "That man sitting over there simply won't stop talking about that Comodo ^3355FF'Cheese'^000000........."; + next; + mes "[Rakusa]"; + mes "I just can't stop wondering about what kind of Cheese it is. I sure hope I will have the opportunity to try it someday."; + set cheese_Q, 3; + next; +L_2: + mes "[Rakusa]"; + mes "It looks like ^5533FFKichiri^000000 isn't as interested in the Cheese as that other man is though...... actually he looks rather annoyed........."; + next; + mes "[Rakusa]"; + mes "Someone should check on Kichiri and make sure everything is all right......"; + close; +} + +//======================================================= +comodo.gat,169,284,4 script Kichiri 99, +{ + mes "[Kichiri]"; + if(cheese_Q == 3) goto L_1; + if(cheese_Q == 4) goto L_2; + + mes "In the heart of Comodo lies a performance stage. It's where a number of crazed residents put on shows for the tourists that come to visit."; + mes "The shows are so popular that some tourist even come back to Comodo to see them again."; + next; + mes "[Kichiri]"; + mes "Many of the residents just dance and dance without much skill."; + mes "But for the few who show some talent, there is the possiblity of being recruited by the local ^5555FFDancers Guild^000000."; + close; +L_1: + mes "The guy sitting near me just won't stop talking about Comodo ^5533FFCheese^000000...... It's going to drive me insane!"; + emotion 32; + next; + mes "[Kichiri]"; + mes "Yeah, right over there, the guy named ^3355FFMagatu^000000. Can you do something about it?"; + set cheese_Q, 4; + close; +L_2: + mes "I just want to have a quit time and have a few drinks, is this too much to ask for?"; + mes "Stupid drunk ^3355FF' Magatu '^000000..... always talking about ^5533FFCheese^000000......"; + emotion 7; + close; +} + +//======================================================= +comodo.gat,163,280,4 script Magatu 55, +{ + mes "[Magatu]"; + if(cheese_Q == 4) goto L_1; + if(cheese_Q == 5) goto L_2; + + mes "Yes! That's it!! The irresistable smell of that amazing ^5533FFCheese^000000!! It's so delicious!.... Oh, I can't wait any longer......"; + emotion 3; + next; + mes "[Magatu]"; + mes "No matter what anyone else says..... Comodo Cheese is truly the BEST!!! Kekekeke!!"; + emotion 21; + next; + mes "[Magatu]"; + mes "Cheese! CHEESE!! WONDERFULL Comodo CHEESE!!!.... soooo.... tas... ty.... (~drooools~)"; + emotion 3; + close; +L_1: + mes "What? You want to know some information regarding Comodo's special ^5533FFCheese^000000?"; + mes "I guess I could give you some inside information............"; + emotion 1; + next; + mes "[Magatu]"; + mes "Okay, go to the ^009500Casino^000000 and look for a guy named ^5533FFManzi^000000. He should be somewhere on the first floor."; + mes "He's got a huge scar on his face so he should be easy to spot."; + next; + mes "[Magatu]"; + mes "When you see him give him this Bottle Cap. Don't do anything else, just give him the bottle cap and he will give you some info on the Cheese...."; + next; + mes "^3355FF- Received a Bottle Cap -^000000"; + set cheese_Q, 5; + close; +L_2: + mes "Oh yeah, I gotta tell you my friend's name....."; + next; + mes "[Magatu]"; + mes "O? I already told you? Bah, I am sooo drunk....... ^5533FFManzi^000000... he's in the ^009500Casino^000000, got it?"; + emotion 20; + close; +} + +//====================================================== +cmd_in02.gat,189,99,4 script Manzi 85,{ + if(cheese_Q == 5) goto L_1; + if(cheese_Q == 6) goto L_2; + if(Class == Job_Novice) goto L_Nov; + + mes "[Manzi]"; + mes "There have been some people who've bet too much and have lost their pecopeco and many other precious items."; + mes "So becareful when you make your bets..... you might just loose the shirt off your back......."; + close; + + L_Nov: + mes "[Manzi]"; + mes "Stop bothering me you little kid. This place is for adults only, get out of here."; + close; +L_1: + mes "[Manzi]"; + mes "Yes?.........."; + next; + mes "^3355FF- You give him the Bottle Cap-^000000"; + next; + mes "[Manzi]"; + mes ".........................."; + next; + mes "[Mazi]"; + mes "Whoa! This is from my friend Magatu, you must be someone of great importance to him."; + mes "Otherwise, he wouldn't have given you the Bottle Cap."; + emotion 5; + next; + mes "[Manzi]"; + mes "I made a promise to Magatu that I'd help anybody who had one of his bottle caps find out more about the ^5533FFCheese^000000........."; + next; + mes "[Manzi]"; + mes "Only a selected few get the rare opportunity to taste the legendary Comodo Cheese you know."; + next; + mes "[Manzi]"; + mes "Well, I guess you could find out more about Comodo Cheese from a lady near the ^3355FF 'Hulla Stage' ^000000 located near the center of town."; + next; + mes "^3355FF- Received Shiny Coin -^000000"; + next; + mes "[Manzi]"; + mes "Just tell her that Manzi from the casino sent you and show her that coin. She'll tell you all you need to know about the Cheese."; + next; + mes "[Manzi]"; + mes "By the way......... no else is listening this right?....... *whispers: that lady is actually incharge of the Comodo Cheese distribution*..........."; + set cheese_Q, 6; + close; +L_2: + mes "[Manzi]"; + mes "The cheese lady should be near the ^5533FFHulla Stage^000000. Just remember to show her the coin when you ask her about the cheese."; + close; +} + +//======================================================= +comodo.gat,187,153,4 script Hullaris 701, +{ + mes "[Hullaris]"; + if(cheese_Q == 6) goto L_1; + if(cheese_Q == 7) goto L_2; + if(cheese_Q == 8) goto L_3; + if(cheese_Q == 9) goto L_4; + + mes "Hula Dance? Who says it's merely a hula dance?? It is much more than just some dance."; + mes "To reffer to Comodo's unique form of dancing as simply a hula dance, is just insulting!"; + emotion 6; + next; + mes "[Hullaris]"; + mes "The Comodo Hula Dance was developed long ago. Legend has it that the dance was used to control the minds and bodies of others!"; + mes "Hula 'dance'?.... More like Hula 'communication'......"; + next; + mes "[Hullaris]"; + mes "This form of 'communication' was capable of not only changing a persons mood, but of controlling a persons mind as well!"; + next; + mes "[Hullaris]"; + mes "Hehehehehe...... If anyone can dance better than me.... LET EM COME OUT!! It is more than just dancing.........."; + mes "It is a form of 'COMMUNICATION'!!!"; + emotion 29; + close; + +L_1: + mes "Ah, such a great day..........."; + next; + menu "Show her the Shiny Coin",-,"Don't show her the coin, but continue talking",M_End; + + mes "^3355FF- Shows lady the Shiny Coin -^000000"; + next; + mes "[Hullaris]"; + mes "Hmm, that coin.... How did you know to come and look for me? Ah, I got it. Manzi must have told you about me."; + emotion 20; + next; + mes "[Hullaris]"; + mes "I presume you are also interested in the famous Comodo ^5533FFCheese^000000."; + mes "Well you've come to the right place because you're talking to a real expert."; + next; + mes "[Hullaris]"; + mes "And let me tell you something about how rare Comodo Cheese is......."; + mes "Some people will NEVER get to taste it in their entire lifetime....."; + next; + mes "[Hullaris]"; + mes "Before I go any further, I will need to clear up some of the misconceptions you may have about Comodo Cheese."; + next; + mes "[Hullaris]"; + mes "In reality, Comodo Cheese is NOT actually a cheese. It is actually a very powerful enchanted magical stone, know as........."; + mes "The ^3355FFStone of Awakening^000000."; + next; + mes "[Hullaris]"; + mes "Because of the similarities in shape, form, and color, between the two, people have mistaken the stone to be cheese."; + next; + mes "[Hullaris]"; + mes "Legend has it that the user of the Stone of Awakening, could gain great knowledge and power much faster than normal people."; + next; + mes "[Hullaris]"; + mes "Many Wizards and Mages in the past have grown very powerful in very short time after consuming the Stone of Awakening."; + next; + mes "[Hullaris]"; + mes "Therefore, even though my close friend told you to come to me, I cannot just give you this rare item."; + next; + mes "[Hullaris]"; + mes "I am very sorry about this, but you will need to prove to me somehow that you are worthy of this stone."; + next; + mes "[Hullaris]"; + goto L_2; + + M_End: + mes "[Hullaris]"; + mes "Hey! Don't look at me like that, get out of here!"; + emotion 0; + close; + +L_2: + mes "Some sort of ^5533FFProof of Worthiness^000000 could be obtained through the wizard ^5533FF'Nigirboran'^000000."; + mes "He is usually inside of the ^009500East Comodo Dungeon^000000."; + next; + mes "[Hullaris]"; + mes "Just tell Nigirboran everything I have told you and he will judge whether or not you are worthy of the Stone of Awakening."; + mes "Best of luck to you."; + set cheese_Q, 7; + close; +L_3: + mes "Your back........ do you have the ^5533FFProof of Worthiness^000000?"; + mes "I cannot give you the Stone of Awakening if you have not passed the test."; + close; +L_4: + mes "How did the test go?"; + next; + mes "^3355FF~ Shows Hullaris ~^000000"; + mes "^3355FF~ Proof of Worthiness ~^000000"; + next; + mes "[Hullaris]"; + mes "Ah, you did it! I knew you would pass the test. No I mean it."; + mes "There was something about you that gave me confidence in your abilities."; + next; + mes "[Hullaris]"; + mes "Anyway, here is the Stone of Awakening as promised........."; + next; + mes "^3355FF~ you received the Stone of Awakening ~^000000"; + mes "^3355FF~ you quickly eat it. . . . . ~^000000"; + next; + mes "^3355FF~ Munch . .Munch . . ~^000000"; + next; + mes "^3355FF~ Tastes like some sort of mushroom... ~^000000"; + mes "^3355FF~ it is somewhat sour... ~^000000"; + next; + mes "^3355FF~ somehow you feel more confident... ~^000000"; + mes "^3355FF~ and more courageous now! ~^000000"; + next; + mes "[Hullaris]"; + mes "What do you think? The taste and smell are undescribable huh? From the way you look I can tell that it was worth the effort to find."; + next; + mes "[Hullaris]"; + mes "You are now one of the few who have been priviledged enough to taste Comodo's special 'Cheese', heh heh heh....."; + mes "Well have fun here in Comodo."; + set cheese_Q,10; + close; +} + +//========================================================= +beach_dun3.gat,30,220,4 script Wizard Nigirboran 704, +{ + mes "[Nigirboran]"; + if(cheese_Q == 7) goto L_1; + if(cheese_Q == 8) goto L_2; + if(cheese_Q == 9) goto L_3; + if(comodo_npc == 14) goto L_4; + + mes ". . . . . . . . . . . . . . ."; + next; + mes "[Nigirboran]"; + mes "I am Nigirboran, a Wizard in training..."; + next; + mes "[Nigirboran]"; + mes "If you don't have anything to say, please do not bother me, I am very busy."; + close; + +L_1: + mes ". . . . . Hmm. . . . . ."; + next; + mes "[Nigirboran]"; + mes "Hullaris told you to come didn't she? Let me introduce myself. I am Nigirboran, a Wizard in training."; + next; + mes "[Nigirboran]"; + mes "It is true that Comodo ^5533FFCheese^000000 is actually the ^5533FF'Stone of Awakening' or the 'Stone of Wisdom'^000000."; + mes "It's unfortunate that so many people think of this great stone as nothing more than a tastey snack."; + next; + mes "[Nigirboran]"; + mes "A long time ago, real Comodo cheese was actually made from Payon's poisonous mushrooms, Aldebaran's singing plants, and Morroc's cactus juice."; + next; + mes "[Nigirboran]"; + mes "The cheese was aged for a minimum of 3 years before it could be eaten. If anyone ate the cheese before it had a chance to properly age...."; + next; + mes "[Nigirboran]"; + mes "The posion and magic from the cheese would melt their insides instantly............"; + next; + mes "[Nigirboran]"; + mes "That's why Hullaris sent you here. She wants to see if you can withstand those strong poisons."; + next; + mes "[Nigirboran]"; + mes "Are you willing to risk your life just to prove yourself to Hullaris?"; + next; + menu "Sure, why not.",-, "...... Uh... no....",M_End; + + set cheese_Q, 8; + mes "[Nigirboran]"; + goto L_2; + + M_End: + mes "[Nigirboran]"; + mes "Very well then."; + close; +L_2: + mes "Very good, then let us begin the test."; + percentheal 100, 100; + next; + mes "[Nigirboran]"; + mes "You will be given some real Comodo cheese to eat. If you are strong enough you will have no problems with the cheese."; + next; + mes "[Nigirboran]"; + mes "If you start to feel nauscious and start having hallucinations, that means you have succomb to the poison and are not worthy of the Stone of Awakening."; + next; + mes "[Nigirboran]"; + mes "Ready?"; + next; + mes "^3355FF~ you are given a piece of funky cheese ~"; + mes ". . . . . . . . . . . . .^000000"; + next; + mes "^3355FF~ you are given a piece of funky cheese ~"; + mes ". . . . . . . . . . . . ."; + mes "~ you swallow it ~"; + mes ". . . . . . . . . . . . .^000000"; + next; + mes "^3355FF~ you are given a piece of funky cheese ~"; + mes ". . . . . . . . . . . . ."; + mes "~ you swallow it ~"; + mes ". . . . . . . . . . . . ."; + mes "~ it tastes nasty!!! ~^000000"; + next; + mes "^3355FF~ your body is overcome with a wave of heat ~"; + mes "~ you feel the poison racing through your body ~^000000"; + sc_start SC_Poison,900000,1; + next; + mes "^5533FF. . . . . . . . . . . . . . .^000000"; + next; + sc_end SC_Poison; + if(BaseLevel < 25) goto L_LowLvl; + set @TEMP, rand(3); + if(@TEMP == 2) goto R_2; + if(@TEMP == 1) goto R_1; + + R_0: + mes "^3355FF~ your body seems fine but.....but...but.... ~^000000"; + next; + mes "^3355FF~ your body seems fine but.....but...but.... ~"; + mes "~ You see pink elephants everywhere!! ~^000000"; + next; + mes "[Nigirboran]"; + mes "Tsk tsk. Although your body didn't seem to have any ill effects from the poison.... your mind was not as fortunate."; + next; + mes "[Nigirboran]"; + mes "Hahaha... pink elephants.... reminds me of a bad acid trip I once had... er..... forget what I just said."; + emotion 18; + next; + mes "[Nigirboran]"; + mes "If you cannot hadle a little piece of cheese, there is absolutely no way you will be able to handle the Stone of Awakening."; + next; + mes "[Nigirboran]"; + mes "If you feel up to it, you may try again later. The fact that you're still alive is a good sign."; + close; + R_1: + mes "^3355FF~ now you feel extremley cold and dizzy.... ~"; + mes "~ your body feels weak and you are getting drowzy.... ~^000000"; + sc_start SC_Sleep,900000,1; + next; + mes "[Nigirboran]"; + mes "Hmm.... well the good news is you didn't have any hallucinations. Your body however, reacted poorly and you fell asleep."; + sc_end SC_Sleep; + next; + mes "[Nigirboran]"; + mes "If you cannot hadle a little piece of cheese, there is absolutely no way you will be able to handle the Stone of Awakening."; + next; + mes "[Nigirboran]"; + mes "If you feel up to it, you may try again later. The fact that you're still alive is a good sign."; + close; + R_2: + mes "^3355FF~ you now feel a very strange, soothing sensation........ ~"; + mes "~ your body feels at ease and your mind is clear... ~^000000"; + next; + mes "[Nigirboran]"; + mes "Hmm?.... Wow! Now that's rare!! You dont seem to have any ill effects from the posion."; + mes "You must be in top shape both mentally and physically."; + emotion 5; + next; + mes "[Nigirboran]"; + mes "You have proven that you are worthy of the ^5533FFStone of Awakening^000000. Take this......."; + next; + mes "~ received ^5533FF'Proof of Worthiness'^000000 ~"; + next; + mes "[Nigirboran]"; + mes "Just show this to Hullaris and she will give you the Stone of Awakening."; + set cheese_Q, 9; + close; + + // this section is for another quest. will implement later. + mes "[Nigirboran]"; + mes "Oh, by the way, why did you choose to look for the Stone in the first place?"; + next; + mes "[Nigirboran]"; + mes "I surely hope its not because of the temptations of the three Doomed Swords..."; + mes "....Huh? You don't know what the three Doomed Swords are?"; + next; + mes "[Nigirboran]"; + mes "Legend has it that the one who wields the three Doomed Swords"; + mes "^3355FF- Executioner -^000000"; + mes "^3355FF- Mysteltain-^000000"; + mes "^3355FF- Grimtooth -^000000"; + mes "could conquer the whole world with ease."; + next; + mes "[Nigirboran]"; + mes "And again, to summon these three Doomed Swords, the user is also required to possess"; + mes "both ?^3355FF` Tablet of Power '^000000 and"; + mes "^3355FF` Book of the Tiresome Sheep'^000000."; + next; + + L_LowLvl: + mes "^3355FF~ it is unbearable and causes you to faint ~^000000"; + next; + warp "beach_dun3.gat",32,214; + doevent "Wizard Nigirboran::OnFainted"; + end; + + OnFainted: + mes "[Nigirboran]"; + mes "~ Sigh ~ You are simply not strong enough to withstand the poison."; + mes "Maybe if you had a ^5533FFBase level of at least 25^000000, you could withstand the poison...."; + close; +L_3: + mes "Go see Hullaris for the Stone of Awakening. Good luck to you."; + close; +L_4: + mes "[Nigirboran]"; + mes "Look for ^3355FFMoet Leng Good^000000 somewhere"; + mes "inside ^3355FFAldebaran^000000 ?"; + mes "regarding information about the 'Tablet of Power'"; + close; +} + + + +//===============================================================================================================// +// Comodo Pharos Lightouse (Beacon Island) // +//===============================================================================================================// + +//================================================== +cmd_fild07.gat,192,58,4 script Light House Guard 100,{ + mes "[Rahasu]"; + mes "Good morning, I am Rahasu, your guide to the"; + mes "^3355FF`lighthouses'^000000"; + mes "Do you wish to learn more about these lighthouses?"; + next; + menu "Learn more about these Lighthouses..",M0,"Cancel",MEnd; + + M0: + mes "[Rahasu]"; + mes "As you probably have noticed, there are two huge lighthouses located in this area."; + mes "Both of these lighhouses were used to signal nearby fortresses of incoming invasions many years ago."; + next; + mes "[Rahasu]"; + mes "Too bad tourists can not enter these lighthouses yet, because they are still under heavy restrictions."; + mes "There are many, many beautiful paintings inside."; + close; + MEnd: + mes "[Rahasu]"; + mes "That's too bad, hope you could find some time to learn more about these ancient structures."; + close; +} + +//========================================================= +cmd_fild07.gat,52,280,4 script Light House Guard 100,{ + mes "[Hallosu]"; + mes "That's correct, this is one of the two lighthouses in this area."; + mes "However, I can not let anyone go in yet because the lighthouse's interior is still under reconstruction."; + next; + mes "[Hallosu]"; + mes "We hope to have a grand opening soon, thank you for your time!"; + mes "^3355FF(The guard is very nervous)^000000"; + close; +} + +//========================================================= +cmd_fild07.gat,299,83,4 script Sailor 100,{ + mes "[Zain]"; + mes "Hello my friend, where do you wish to go?"; + next; + menu "Alberta = 600 Zeny",M0,"Izlude = 800 Zeny",M1,"Cancel",MEnd; + + M0: + if(Zeny < 600) goto NoZeny; + set Zeny, Zeny - 600; + warp "alberta.gat",192,169; + close; + M1: + if(Zeny < 800) goto NoZeny; + set Zeny, Zeny - 800; + warp "izlude.gat",176,182; + close; + + NoZeny: + mes "[Zain]"; + mes "Umm, you do not have enough zeny."; + close; + MEnd: + mes "[Zain]"; + mes "Thank you, come again"; + close; +} + +//========================================================= +cmd_fild07.gat,94,134,4, script Sailor 100,{ + mes "[Sarumane]"; + mes "Hello my friend, where do you wish to go?"; + next; + menu "Alberta = 600 Zeny",M0,"Izlude = 800 Zeny",M1,"Cancel",MEnd; + + M0: + if(Zeny < 600) goto NoZeny; + set Zeny, Zeny - 600; + warp "alberta.gat",192,169; + close; + M1: + if(Zeny < 800) goto NoZeny; + set Zeny, Zeny - 800; + warp "izlude.gat",176,182; + close; + + NoZeny: + mes "[Sarumane]"; + mes "Umm, you do not have enough zeny."; + close; + MEnd: + mes "[Sarumane]"; + mes "Thank you, come again."; + close; +} + + + +//=======================================================================================================// +// Kokomo Beach // +//=======================================================================================================// + +//============================================================= +cmd_fild04.gat,188,74,4 script Zyosegirl 93,{ + mes "[Zyosegirl]"; + mes "Hello, I am Zyosegirl, I gather seashells in the sea all day and sell them to make a living."; + next; + mes "[Zyosegirl]"; + mes "Even though it seems to be a simple lifestyle, I absolutely love it here."; + close; +} + +//========================================================= +cmd_fild04.gat,248,86,4 script Ziyaol 709,{ + mes "[Ziyaol]"; + mes "I don't care what you think of me, I am a fisherman, and it is a very tough profession."; + next; + mes "[Ziyaol]"; + mes "I am just taking a short break right now, then I will resume fishing again in a few mintues..."; + close; +} + +//========================================================= +cmd_fild04.gat,267,137,4 script Kid 703,{ + mes "[Daeguro]"; + mes "The sand here are so gentle and the smell of the ocean is great."; + mes "I hope one day I could get on one of those boats and head to Alberta."; + close; +} + + +//=====================================================================================================// +// Others +//=====================================================================================================// + +//========================================================= +aldebaran.gat,44,53,4 script Wizard in Training 64,{ + if(comodo_npc == 14) goto cmd_npc14; + if(comodo_npc == 15) goto cmd_npc15; + if(comodo_npc == 16) goto cmd_npc16; + if(comodo_npc == 17) goto cmd_npc17; + mes "[Moet Leng Good]"; + mes "Did you know that some people signed contract in shadows with the Dark Lord with the"; + mes "^3355FF`Tablet of Power'^000000?!"; + next; + mes "[Moet Leng Good]"; + mes "As a result of their greed for power, it brought disasters for the entire world."; + mes "So please, be happy with what you already have and do not give in to the dark side."; + close; + + cmd_npc14: + mes "[Moet Leng Good]"; + mes "I guess you are the possessor of the 'Stone of Awakening' and also the one seeking for the 'Tablet of Power'."; + next; + mes "[Moet Leng Good]"; + mes "Very well then, I will help you to make a 'Tablet of Power'."; + mes "However, it is not a simple task, I will need a number of materials in order to succeed."; + next; + mes "[Moet Leng Good]"; + mes "I will need one of these stones, gems, and ores."; + mes "^3355FF`Blue Gemstone'^000000"; + mes "^3355FF`Sapphire'^000000"; + mes "^3355FF`Aquarmarine'^000000"; + mes "^3355FF`Shining Stone'^000000"; + mes "and ^3355FF`Rough Elunium'^000000"; + next; + mes "[Moet Leng Good]"; + mes "In other words, the 'Tablet of Power' is very valuable, and might take you a while to gather the resources for it."; + set comodo_npc,15; + close; + cmd_npc15: + if((countitem(717) > 0) & (countitem(726) > 0) & (countitem(720) > 0) & (countitem(640) > 0) & (countitem(757) > 0)) goto set_cmd_npc16; + mes "[Moet Leng Good]"; + mes "Very well then, I will help you to make a 'Tablet of Power'."; + mes "However, it is not a simple task, I will need a number of materials in order to succeed."; + next; + mes "[Moet Leng Good]"; + mes "I will need one of these stones, gems, and ores."; + mes "^3355FF`Blue Gemstone'^000000"; + mes "^3355FF`Sapphire'^000000"; + mes "^3355FF`Aquarmarine'^000000"; + mes "^3355FF`Shining Stone'^000000"; + mes "and ^3355FF`Rough Elunium'^000000"; + next; + mes "[Moet Leng Good]"; + mes "In other words, the 'Tablet of Power' is very valuable, and might take you a while to gather the resources for it."; + close; + + set_cmd_npc16: + mes "[Moet Leng Good]"; + mes ". . . . . ! !"; + mes "I can hardly believe that you actually gathered all the resources for the 'Tablet of Power'"; + mes "Because you have worked so hard, let me make the tablet for you now."; + next; + delitem 717,1; + delitem 726,1; + delitem 720,1; + delitem 640,1; + delitem 757,1; + mes "^3355FF- Gives him all the stones -^000000"; + set comodo_npc,16; + next; + mes "[Moet Leng Good]"; + mes "Now, I'll just need you to gather a few ingredients for the fininshing touch of the tablet."; + next; + mes "[Moet Leng Good]"; + mes "I will need just one ^3355FF`Cobweb'^000000"; + mes "You could easily obtain them through argos in Mt. Mjolnir"; + next; + mes "^3355FF- Moet Leng Good's-^000000"; + mes "^3355FF- working hard on the tablet -^000000"; + close; + cmd_npc16: + if(countitem(1025) > 0) goto set_cmd_npc17; + mes "[Moet Leng Good]"; + mes "The tablet will be done when I finish!"; + mes "Please do not bother me for now, I need to concentrate"; + next; + mes "[Moet Leng Good]"; + mes "Meanwhile, please go find a cobweb so I could use it to provide some finishing touches to the tablet, thanks."; + close; + + set_cmd_npc17: + mes "[Moet Leng Good]"; + mes "Ah, very good, you got a cobweb, please just leave it over there."; + next; + mes "^3355FF- Gives cobweb to him-^000000"; + delitem 1025,1; + next; + mes "[Moet Leng Good]"; + mes "Alright, here we go !!"; + next; + mes "^3355FF- Clang ! Clang ! Clunk ! -^000000"; + mes "^3355FF- Boom ! ! -^000000"; + next; + mes "^3355FF- `Tablet of Power'-^000000"; + mes "^3355FF- is forged -^000000"; + next; + mes "^3355FF- Received 'Tablet of Power'-^000000"; + set comodo_npc,17; + next; + mes "[Moet Leng Good]"; + mes "Even though you possess the 'Tablet of Power' now, the tablet would not be effective without"; + mes "the ^3355FF` Book of the Tiresome Sheep'^000000??"; + next; + mes "[Moet Leng Good]"; + mes "^3355FF`Book of the Tiresome Sheep'^000000"; + mes "was originally crafted by demons located in the desert and now the crafting skill have been passed down to a few wanderers near Morroc."; + next; + mes "[Moet Leng Good]"; + mes "So if you wish to obatin the 'Book of the Tiresome Sheep', Morroc would be a smart place to look"; + close; + cmd_npc17: + mes "[Moet Leng Good]"; + mes "Head to Morroc then!"; + mes "Show the someone the 'Tablet of Power' and maybe some people will tell you about the 'Book of the Tiresome Sheep'."; + close; +} + +//======================================================= +comodo.gat,232,87,4 script Wandering Swordsman WON 106,{ + if(comodo_npc == 22) goto cmd_npc22; + if(comodo_npc == 23) goto cmd_npc23; + if(comodo_npc == 24) goto cmd_npc24; + + mes "[WON]"; + mes "My name is ^3355FF'Won'^000000. I have searched far and wide, across the oceans and the mountains, to find one who is worthy......."; + next; + mes "[WON]"; + mes "It has been many years since the Evil Witch was defeated in that legendary battle..... It is now a story of the past......."; + mes "Still, the quest must continue! This is what the heavens desire of me....."; + next; + mes "[Won]"; + mes "I must stay here in Comodo..... It is my fate.... I must stay here and wait........."; + mes ". . . . . . . . . . . . . . . . . . . ."; + mes ". . . . . . . . . . . . . . ."; + mes ". . . . . . . . . ."; + mes ". . . . ."; + close; + + cmd_npc22: + mes "^3355FF- The swordsman examines you -^000000"; + mes "^3355FF- for a few seconds -^000000"; + next; + mes "[Swordsman]"; + mes "Heh, you're just a normal fella."; + mes "I am a wandering swordsman,"; + mes "^3355FF`WON'^000000"; + next; + mes "[WON]"; + mes "What? You say you are gonna summon the Doomed Swords?"; + mes "Psh, I don't care what you say, I will be the judge on whether or not you are worthy."; + mes "Let me explain..."; + next; + mes "[WON]"; + mes "Even though you do have all the required materials to summon the Doomed Swords but that does not mean that you could withstand the energy drained during one summoning."; + next; + mes "[WON]"; + mes "Without careful control of energy transfer from the normal world to the Dark World, many disasters could arise upon the world or even unforeseen consequences."; + next; + mes "[WON]"; + mes "I am sure that you have heard that the three different Doomed Swords are:"; + mes "^3355FF` Mysteltain '^000000"; + mes "^3355FF` Grimtooth '^000000"; + mes "and ^3355FF` Executioner '^000000."; + mes "Each of them with very distinct specialties."; + next; + mes "[WON]"; + mes "Now that you understand these, let us start the summoning then."; + next; + mes "- `Won'-"; + mes "- draws his sword -"; + mes "- and starts to swing it around -"; + next; + mes "- You notice something -"; + mes "- a blue light descending -"; + mes "- from the sky -"; + next; + mes "^3355FF-You got-^000000"; + mes "^3355FF-Voucher of Power-^000000"; + set comodo_npc,23; + next; + mes "[WON]"; + mes ". . . . ."; + mes "Hmm, it seems like the Dark World is not ready to give you the Doomed Sword just yet...even though you have what it takes to be the master of the swords."; + next; + mes "[WON]"; + mes "However, when the day is as long as the night, when the sunlight is as bright as solar sword."; + mes "Only during that time, you will have the opportunity to receive the Doomed Swords."; + next; + mes "[WON]"; + mes "When that time comes, visit the East for a quiet city name Payon, and you shall find yourself in a new journey for the Doomed Swords."; + close; + cmd_npc23: + mes "[WON]"; + mes "Hmm, it seems like the Dark World is not ready to give you the Doomed Sword just yet...even though you have what it takes to be the master of the swords."; + next; + mes "[WON]"; + mes "However, when the day is as long as the night, when the sunlight is as bright as solar sword."; + mes "Only during that time, you will have the opportunity to receive the Doomed Swords."; + next; + mes "[WON]"; + mes "When that time comes, visit the East for a quiet city name Payon, and you shall find yourself in a new journey for the Doomed Swords."; + close; + cmd_npc24: + mes "123456789101112131415"; + close; +} + +//============================================================ +moc_fild12.gat,35,303,4 script Saint Darmain Gatekeeper 59,{ + mes "[Serutero]"; + mes "Good day, my name is Sertutero and I am the Gatekeeper for the road to Saint Darmain."; + mes "Do wish to proceed to Saint Darmain?"; + next; + menu "Proceed to Saint Darmain",M0,"Learn more about Saint Darmain",M1,"Cancel",MEnd; + + M0: + mes "[Serutero]"; + mes "Good luck out there, things could get rough, so be extra careful."; + mes ". . . . ."; + warp "cmd_fild08.gat",331,319; + close; + M1: + mes "[Serutero]"; + mes "Long time ago, due to many waves of invasion by monsters in Saint Darmain, many defensive structures were constructed to keep the peace."; + mes "And slowly, Saint Darmain became a natural fortress."; + mes "During an invasion, the southern edge of Saint Darmain's lighthouse also sends warning signals to surrounding cities."; + next; + mes "[Serutero]"; + mes "Because of the vastness of all the defensive structures, Saint Darmain is also commonly known as"; + mes "^3355FF` Fortress Saint Darmain '^000000."; + next; + mes "[Serutero]"; + mes "If you are looking for the lighthouse, proceed in the direction of south-west."; + close; + MEnd: + mes "[Serutero]"; + mes "If you ever become exhausted on your journey, you should stop by the nearby island of"; + mes "^3355FF`Comodo'^000000 City."; + mes "The tropical weather over there is a brand new experience for most people."; + close; +} diff --git a/npc/cities/geffen.txt b/npc/cities/geffen.txt new file mode 100644 index 000000000..05d19cb1c --- /dev/null +++ b/npc/cities/geffen.txt @@ -0,0 +1,659 @@ +//===== eAthena Script ======================================= +//= Geffen Town +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + +// Lady ------------------------------------------------------- +geffen.gat,59,143,8 script Lady 91,{ + mes "[Lady]"; + mes "Oh, you must be a Stranger here."; + next; + mes "[Lady]"; + mes "Wellcome to geffen, the City of Magic. You Must be very tired? Why don't you eat Some ^ffaa00Honey^000000? It will relieve of your fatigue"; + next; + mes "[Lady]"; + mes "Honey is very sweet and highly nutritious. It will allow you to ^0000ffregain^000000 some of your ^0000ffHP as well as SP^000000."; + mes "It's gatthered by Hornets for the queen bee ^ff0000Mistress^000000. MIstress is a very rare and powerfull monster."; + next; + mes "[Lady]"; + mes "BELIEVE me, you DON'T want to try and take honey away from HER...."; + next; + mes "[Lady]"; + mes "There are other monsters that drop honey but they are fairly strong. Honey is pretty hard to come by which makes it very pricey to buy."; + next; + mes "[Lady]"; + mes "Believe it or not Honey is actually NOT the most valuable bee product there is......."; + mes "Apparently ^ffaa00`Royal Jelly'^000000, which is made by ^ff0000Mistress^000000 herself, is even rarer and more sought after."; + next; + mes "[Lady]"; + mes "Ah~ Thinking of Royal Jelly makes my mouth Water~"; + close; +} + + +// Womankind ------------------------------------------------------------ +geffen.gat,111,48,2 script Womankind 101,{ + mes "[Womankind]"; + mes "Good Day, adventurer."; + next; + mes "[Womankind]"; + mes "Have you ever seen the ^ff0000Orcs^000000, the Demi-Human Tribe?"; + next; + mes "[Womankind]"; + mes "South of here, deep in the forest, lies the home land of the Orcs. I here they have a unique culture and language that is much different from our own."; + next; + mes "[Womankind]"; + mes "I wonder.....? Do they dream of love and romance just as we do? Hmm..... I wonder........"; + close; +} + + +// Researcher ------------------------------------------------------------------------ +geffen.gat,156,190,8 script Researcher 57,{ + mes "[Researcher]"; + mes "Hmm... Interesting. Hmm... It is Very interesting...."; + next; + mes "[Researcher]"; + mes "Oh, you've come at just the right time. Let me tell you about something I just discovered."; + next; + mes "[Researcher]"; + mes "You see, I found this Mysterious Scroll when I was researching Magic. In the scroll there is a description of a tree named ^008800Yggdrasill^000000."; + mes "It says that the leaves, seeds, and fruits of this tree are somehow connected to the creation and preservation of life in this world."; + next; + mes "[Researcher]"; + mes "I've never actually come across the leaves, seeds, or fruits of the Yggdrasill, let alone the tree itself..... but....."; + next; + mes "[Researcher]"; + mes "The idea of a tree of life is quite amazing! Don't you think so?"; + close; +} + +// Young Man -------------------------------------------------------------------------- +geffen.gat,147,26,0 script "Young man" 97,{ + mes "[Young Man]"; + mes "I heard that somewhere in this world, there is a rare staff which transforms its owner's psychic power into phisycal powers, and endows with destructive force also..."; + mes "With this, everybody could be as strong as Hercules, despite their lack of muscles. Haw haw...I will take it."; + next; + mes "[Young Man]"; + mes "Good heavens! You, since when were you behind me?"; + mes "Did you happen to hear what I said? Ha ma...Muhaha. I didn't say anything. If you heard anything from me, just forget~Forget about it~"; + mes "Yay~ veggie is cheap today~come on!!"; + close; +} + +// Young Man ----------------------------------------------------------------------- +geffen_in.gat,34,170,0 script "Young man" 47,{ + mes "[Young Man]"; + mes "Hello? Isn't it wonderful, today? I am a promising young Mage. Ahem."; + mes "Nowadays, my mental anguish about magic things keeps me awake every night..sigh...Especially, about the weak point of magic, you know."; + next; + mes "[Young Man]"; + mes "Darn! It was really annoying when I encountered that long-ranged enemy last time. It disrupted magic casting."; + mes "After all I realised I need a weapon to counter Such a long-ranged attack from an enemy....But geez..It is not easy to make such a weapon I wish."; + next; + mes "There should be another way.....Should be....."; + mes "Any ideas for me?"; + close; +} + + +//<============================================ Inn =====================================================>\\ +// Waitress --------------------------------------------------------------------------- +geffen_in.gat,70,67,5 script Waitress 80, +{ + mes "[Waitress]"; + mes "Ugh!! SO annoying! Why would you drink here when you could drink at the pub!? This is an Inn, not a pub!!"; + mes "That man!... everytime he drinks... he gets like that! Ugh!!"; + emotion 6; + next; + mes "[Waitress]"; + mes "(~yells to the man~)'Hey mister! I TOLD you... THIS.. IS.. AN INN, NOT A BAR!!'"; + emotion 32; + next; + mes "[Waitress]"; + mes "(~sighs~) That old man in the front corner there gives me a headache."; + mes "My younger sister, who works at the pub, told me that there is someone just like him at the Pub."; + next; + mes "[Waitress]"; + mes "To think that there are 2 of them in one city... It's JUST ABSURD!!"; + emotion 32; + next; + mes "[Waitress]"; + mes "(~mumbles~)... I wish they would both just leave this town and be forgotten forever... that would be nice...."; +M_Menu: + next; + menu "May I have a drink?",M_0, "Has there been anything interesting lately?",M_1, "End Conversation",M_End; + + M_0: + mes "[Waitress]"; + mes "Oh my, I'm sorry but that DRUNKARD swallowed up every last drop of liquior we have."; + mes "Everyday it's the same thing... as soon as the Inn opens he comes in and gulps down drink after drink."; + next; + mes "[Waitress]"; + mes "It's amazing he hasn't died yet. Maybe if you came by some other time we'll be restocked... oh who am I kidding...."; + goto M_Menu; + M_1: + mes "[Waitress]"; + mes "Well... of all of the people who have stopped by latelty, there are a group of merchants that have caught my attention."; + mes "I could tell right away that they were from out of town. My younger sister tells me they are from Schubaltzwald..."; + next; + mes "[Waitress]"; + mes "It really doesn't matter who they are or where they're from, afterall business is business. They could be from Schuschu Chocolate Land for all I care...."; + next; + mes "[Waitress]"; + mes "I just wish the amount of local customers would start increasing again, since they are the bulk of my customers."; + goto M_Menu; + M_End: + mes "[Waitress]"; + mes "Have a nice day!"; + close; +} + +// Merhcant Daven ------------------------------------------------------------------- +geffen_in.gat,79,75,2 script Merchant Daven 61, +{ + mes "[Merchant Daven]"; + mes "Back in the day when I frist came to Geffen, the town was a very boring place to live in."; + next; + mes "[Merchant Daven]"; + mes "But now there are noble Mages and a flourishing community of Blacksmiths, that make Geffen......."; + next; + mes "[Merchant Daven]"; + mes ".... still.... a very BORING place to be.... Bleh! I'm really bored here!!!"; +M_Menu: + next; + menu "-Mages?",M_0, "-Blacksmiths?",M_1, "-Who are you?",M_2, "-End Conversation.",M_End; + + M_0: + mes "[Merchant Daven]"; + mes "Mages and Wizards love to carry books around with them wherever they go. That's just how they are."; + next; + mes "[Merchant Daven]"; + mes "Mages like to gather at the ^5555FFMagic Academey^000000 where they study the basics of magic use."; + next; + mes "[Merchant Daven]"; + mes "After much study and with enough experience, Mages can become Wizards. Wizards can use much more powerfull magical spells."; + mes "You can find them at the top floor of the ^5555FFGeffen Tower^000000."; + goto M_Menu; + M_1: + mes "[Merchant Daven]"; + mes "Blaksmiths are difficult people. They are also a dirty bunch, whose faces are often covered with black soot."; + mes "No matter where they are or what they do, they always smell of iron and soot."; + next; + mes "[Merchant Daven]"; + mes "However, that is something that can't be helped. Blacksmiths are always hard at work, refining ores, and tempering equipment."; + mes "It's just not possible to be a Blacksmith and not be dirty and smelly. Unfortunately it's part of the job."; + next; + mes "[Merchant Daven]"; + mes "Weapons forged by Blacksmiths can be much more unique then those sold in Armories."; + mes "The actual ores and stones used by the Blacksmiths are of a much higher quality and are often scarce."; + mes "This can give their weapons special qualities that are very benificial to a character."; + goto M_Menu; + M_2: + mes "[Merchant Daven]"; + mes "Me?.... Oh I'm the world's PRETTIEST street merchant!!..... teh he he..."; + emotion 30; + next; + menu "..... I'm gonna puke....",sM_0, ".... SLAPP him upside his head!!!",sM_1; + + sM_0: + mes "[Merchant Daven]"; + mes "Hehehe.... it was a joke.... a joke ok..... hehehe...."; + emotion 18; + goto M_Menu; + sM_1: + mes "~^FF8000!!!^FF0000THWAAACCCKKK^FF8000!!!^000000~"; + next; + mes "[Merchant Daven]"; + mes "OW!! Ok! Ok! I was just kidding.... sheesh...."; + emotion 16; + goto M_Menu; + M_End: + close; +} + +// Drunkard ------------------------------------------------------------------- +geffen_in.gat,59,62,2 script Drunkard 120, +{ + mes "[Drunkard]"; + mes "Hmm... You're Joshua's friend too??"; + next; + menu "-Nope.",M_0, "-Who's that??",M_1, "-I have no friends.(~sob~)",M_2; + + M_0: + mes "[Drunkard]"; + mes "Hmf. Yeah... that dork has no reason to have any friends. Forget I even asked."; + close; + M_1: + mes "[Drunkard]"; + mes "Uh... well if you go down this hall to the room on the left... you'll find this dork."; + mes "All day long, he just stays in that dark room tempering steel.... who the hell knows what he's making...."; + next; + mes "[Drunkard]"; + mes "If you're interested you should go talk to him. From the looks of it, you two would probably get along really well... HAHAHA!"; + emotion 18; + close; + M_2: + mes "[Drunkard]"; + mes "Oh... I see, I see. My appologies. You seem to be sensative about this. To think that you have no friends...."; + mes "Ya know, you remind me of my younger self! Heck... you might end up just like me... heh heh."; + next; + mes "[Drunkard]"; + mes "(~sob~sob~).... oh what happened to my life!!!....(~baaaahhhh~)"; + emotion 28; + next; + mes "[Waitress]"; + mes "ARGH!! STOP being so noisey!"; + close; +} + +// Schubaltzwald Merchant ---------------------------------------------------------------------- +geffen_in.gat,113,73,4 script Schubaltzwald Merchant 709, +{ + mes "[Schubaltzwald Merchant]"; + mes "How are you, Rune-Midgard young'un? I am Schubaltzwald's one and only Hans Hadenhiem."; + next; + mes "[Schubaltzwald Merchant]"; + mes "My business associates and I plan to do business, both here in Geffen, and at home in Schubaltzwald."; + next; + mes "[Schubaltzwald Merchant]"; + mes "Although Rune-Midgard doesn't seem to have any exciting places to go sight-seeing, it does have a lot of interesting merchandise."; + mes "Because of their uniqueness, these items have become quite valuable in my city."; + next; + mes "[Schubaltzwald Merchant]"; + mes "Something may be plentifull here, but scarce somewhere else, an item may be popular there but not here...."; + mes "That is what makes being a merchant so interesting, the variety of items to buy and sell between different places."; + next; + mes "[Schubaltzwald Merchant]"; + mes "Of course it would be ideal if a merchant could have a widespread distribution of the same items in different cities."; + next; + mes "[Schubaltzwald Merchant]"; + mes "If you're not satisfied with the merchandise, just wait, and some other day what you're looking for may be in stock."; + mes "It's a merchant's duty to make the customer happy with the quality of the items being sold!"; + close; +} + + +//<============================================== Pub ==================================================>\\ +// Waitress ----------------------------------------------------------------- +geffen_in.gat,28,134,4 script Waitress 69, +{ + mes "[Waitress]"; + mes "Meh! ALWAYS drinking and ALWAYS fighting..... HEY Mister! This is a place of BUSINESS!!"; + emotion 6; + next; + mes "[Waitress]"; + mes "That man gives me a headache. My sister at the Inn says that there is another IDIOT just LIKE HIM there!"; + mes "I CAN'T BELIEEEEVE that there is more that one IDIOT like him in this world..... I wish they would just... just... DISAPPEAR!!"; + next; + mes "[Waitress]"; + mes "(~sighs~)"; + emotion 32; +M_Menu: + next; + menu "Could I get drink?",M_0, "Anything interesting goin on lately?",M_1, "End Conversation",M_End; + + M_0: + mes "[Waitress]"; + mes "Jeez, I'm real sorry but we ran out of liquior. THAT DRUNKARD chugged down every last drop we had...."; + mes "As soon as we open he's in here downing drink after drink! I'm surprised he's still alive."; + next; + mes "[Waitress]"; + mes "Maybe if you stopped by later.... but then again, the way HE'S been drinking.... you might have better luck else where...."; + goto M_Menu; + M_1: + mes "[Waitress]"; + mes "Hmm... there really hasn't been anything new going on lately.... there haven't been any rumors from the customers either...."; + mes "Come to think of it.... you yourself are a person of few words...."; + next; + mes "[Waitress]"; + mes "I'm sure there's a reason why there has been such a lull as of late...."; + mes "It's just we working girls tend to get REALLLYYY BORED.... so if anything exciting happens let me know okay?"; + goto M_Menu; + M_End: + mes "[Waitress]"; + mes "You have a nice day now!"; + close; +} + +// Drunkard ---------------------------------------------------------------------------- +geffen_in.gat,21,125,5 script Drunkard 52, +{ + mes "[Drunkard]"; + mes "You want to be an idiotic magician? Is that why you came here??"; + emotion 1; + close; +} + +// Friend of Youth ----------------------------------------------------------------- +geffen_in.gat,37,124,5 script Friend of Youth 704, +{ + set @temp,0; + mes "[Friend of Youth]"; + mes "Welcome young one! Are you worrying about something? Tell me all your troubles and I will tell you your fortune with my silver ball of mystery!"; +M_Menu: + next; + set @temp, rand(5); + menu "-Life!",M_0, "-Love!",M_1, "-Fortune!",M_2, "-Grades!",M_3, "-Future!",M_4, "-Fashion!",M_5, "-End.",M_End; + + M_0: + if(@temp ==1) goto R0_1; + if(@temp ==2) goto R0_2; + if(@temp ==3) goto R0_3; + if(@temp ==4) goto R0_4; + + R0_0: + mes "[Friend of Youth]"; + mes "It seems that you've had to deal with many problems recently... but don't despair."; + mes "Although you may have to endure some hardships now, the road ahead of you is clear."; + next; + mes "[Friend of Youth]"; + mes "Being tossed out in the desert, naked, and chased by a Peco Peco really isn't that bad."; + mes "If you maintain your composure and perservere, you will be able to enjoy the sweet taste of acomplishment."; + next; + mes "[Friend of Youth]"; + mes "So keep your head up and endure for a bit longer!"; + next; + goto R0_End; + R0_1: + mes "[Friend of Youth]"; + mes "It looks as though you have chosen an obscure path for yourself. You may feel as though you may have made a mistake."; + mes "This uncertainty about your choices affects you even now. Try to take a break and relax."; + next; + mes "[Friend of Youth]"; + mes "Re-organize yourself to better handle the situation that surrounds you."; + mes "Rearrange your items and equipment to give yourself a 'fresh' start."; + next; + goto R0_End; + R0_2: + mes "[Friend of Youth]"; + mes "The evil forces that evny your fortune and good health are always watching you."; + mes "They are jealous of what you have and are eagerly waiting for you to make mistakes."; + next; + mes "[Friend of Youth]"; + mes "Therefore you must be more careful with your actions. Proceed with caution, especially in dangerous sitiuations."; + mes "Remain calm however, and continue to prepapre for the days to come."; + next; + goto R0_End; + R0_3: + mes "[Friend of Youth]"; + mes "Some recent turmoil between you and someone you know still looms over your head."; + mes "There is no way to avoid the problems... you must face them head on."; + next; + mes "[Friend of Youth]"; + mes "Try to resolve the issues in a calm, peaceful, and friendly manner. Think about the relationship you have with this person."; + next; + goto R0_End; + R0_4: + mes "[Friend of Youth]"; + mes "Lately you have been living in the darkness of the monsters."; + mes "The power of the dark is too strong and you must pull away from it."; + next; + mes "[Friend of Youth]"; + mes "In order to do that you must be physically strong and mentally able. Give it all you have and make good use of your training!"; + next; + + R0_End: + mes "[Friend of Youth]"; + mes "Now, have the questions about your life been answered? Feel free to ask me again. I am always on your side friend!"; + emotion 21; + goto M_Menu; + + M_1: + if(@temp ==1) goto R1_1; + if(@temp ==2) goto R1_2; + if(@temp ==3) goto R1_3; + + R1_0: + mes "[Friend of Youth]"; + mes "Tsk tsk.... Are you looking for another love?"; + emotion 1; + next; + mes "[Friend of Youth]"; + mes "So you're not satisfied with the relationship your in now.... you want one that is new, better, more exciting......."; + next; + mes "[Friend of Youth]"; + mes "Don't be a fool!! Treasure the love you have now! You never no where a wandering heart will lead you...."; + emotion 0; + next; + goto R1_End; + R1_1: + mes "[Friend of Youth]"; + mes "Everybody says that love is wonderful. THAT IS, until things go WRONG, then it's not so easy to say that love is wonderful."; + next; + mes "[Friend of Youth]"; + mes "Maybe your not quite ready for love right now. Build up some more confidence in yourself then go after that special someone with all your heart."; + next; + mes "[Friend of Youth]"; + mes "With that confidence and a little bit of luck, you're sure to find love. Always!!"; + emotion 21; + next; + goto R1_End; + R1_2: + mes "[Friend of Youth]"; + mes "Oh ho! To be in love is a wonderful existance!"; + mes "Love can be as exciting as running through a forest filled with porings while wildly swinging your sword around!!"; + next; + mes "[Friend of Youth]"; + mes "So BRANDISH your sword in the name of LOVE!!"; + emotion 21; + next; + goto R1_End; + R1_3: + mes "[Friend of Youth]"; + mes "Well now... You're so happy, you don't know what to do!! No matter how hard you try, you can't hide the fact that you're in love!"; + next; + mes "[Friend of Youth]"; + mes "Heh, I guess there's nothing for me to tell you."; + next; + mes "[Friend of Youth]"; + mes "Now if I could only find someone to love......."; + emotion 20; + next; + goto R1_End; + R1_End: + mes "[Friend of Youth]"; + mes "Even in this bleek world, love is all around you! Love can be fun so treasure the heart and come back for another reading!"; + emotion 22; + goto M_Menu; + + M_2: + if(@temp ==1) goto R2_1; + if(@temp ==2) goto R2_2; + if(@temp ==3) goto R2_3; + if(@temp ==4) goto R2_4; + + R2_0: + mes "[Friend of Youth]"; + mes "For a young one such as yourself, money should not be the most important thing in your life."; + mes "Don't worry about money too much, just live your life to the fullest! Only then can something wonderfull can happen to you."; + goto M_Menu; + R2_1: + mes "[Friend of Youth]"; + mes "Let me tell you something, DON'T become obsessed with materialistic things!"; + next; + mes "[Friend of Youth]"; + mes "Although you need money to get by in this world, if aquiring wealth is your sole purpose in life...."; + mes "you will ultimately find yourself dissapointed and empty."; + goto M_Menu; + R2_2: + mes "[Friend of Youth]"; + mes "Are you envious of someones else's items?? DON'T BE!!"; + mes "You are better then that! Seek that which makes you a better person"; + goto M_Menu; + R2_3: + mes "[Friend of Youth]"; + mes "Saving money is important. Don't get into the habbit of buying cheap things you can afford right away."; + mes "It's better to wait untill you have enough for something that is of high quality. That way you spend less money overall."; + goto M_Menu; + R2_4: + mes "[Friend of Youth]"; + mes "It's a very interesting thing. To be honest, money just might be the REAL MONSTER in this world...."; + next; + mes "[Friend of Youth]"; + mes "One man's trash is another man's treasure! Go out and gather everything you can find! Don't be embarressed about it!"; + goto M_Menu; + M_3: + if(@temp ==1) goto R3_1; + if(@temp ==2) goto R3_End; + + R3_0: + mes "[Friend of Youth]"; + mes "It's good to be worried about your grades. You will have a bright future if you study hard and get good grades."; + mes "It can be difficult to do, but that is how life is. The difficult things in life are the ones worth doing."; + next; + goto R3_End; + R3_1: + mes "[Friend of Youth]"; + mes "Worrying about your grades can be a hassle. And sometimes it's hard to be confident that you will get good grades."; + mes "But stay positive and keep your head up! With hard work and preseverance you'll surely achieve your goals."; + next; + goto R3_End; + R3_End: + mes "[Friend of Youth]"; + mes "Concentrating on studies is difficult. Come back anytime to ask questions regarding your studies! I'll be waiting."; + goto M_Menu; + + M_4: + if(@temp ==1) goto R4_1; + if(@temp ==2) goto R4_2; + if(@temp ==3) goto R4_3; + + R4_0: + mes "[Friend of Youth]"; + mes "A person who worries about the future is one who is ill prepared for it."; + mes "And yet a person who prepares for the future is also one who worries about it."; + next; + goto R4_End; + R4_1: + mes "[Friend of Youth]"; + mes "Hmm... Don't you think you're worrying too much about the future?? Try focusing more on the present."; + mes "Obsessing over the future will eventually cause problems for you in the hear and now."; + next; + goto R4_End; + R4_2: + mes "[Friend of Youth]"; + mes "If all you do is play and you don't plan ahead for your future, you may have to re-think your approach to life."; + next; + mes "[Friend of Youth]"; + mes "There is an old story about the Thief Bug who was happy and full during the winter months,...."; + mes "while the Rocker was starving and cold...The Thief Bug planned ahead and gathered enough food for winter,....."; + mes "where as the Rocker had spent all his time playing and did not have enough food for the winter."; + next; + mes "[Friend of Youth]"; + mes "The person who treasures his/her life prepares for the future. So treasure your life and plan for the future!!"; + next; + goto R4_End; + R4_3: + mes "[Friend of Youth]"; + mes "You have the ability to leap towards the future! But the past has a hold of your ankle and wont let go."; + next; + mes "[Friend of Youth]"; + mes "Break free and move towards the future and be prepapred to face what lies ahead!"; + emotion 21; + next; + goto R4_End; + R4_End: + mes "[Friend of Youth]"; + mes "There are many reasons to look forward to the future. So untill you find one for yourself, keep searching for it."; + mes "And feel free to come back for another reading any time okay?"; + goto M_Menu; + M_5: + if(@temp ==1 && countitem(2280)>=1) goto R5_1; + if(@temp ==2) goto R5_2; + if(@temp ==3) goto R5_3; + if(@temp ==4) goto R5_4; + + R5_0: + mes "[Friend of Youth]"; + mes "Equipping basic items that provide you with exactly what you need is important."; + mes "But isn't there a way to make equipment more stylish?"; + next; + goto R5_End; + R5_1: + mes "[Friend of Youth]"; + mes "Wah! A Sakkat hat with that type of outfit is a bad idea!!"; + emotion 23; + next; + mes "[Friend of Youth]"; + mes "Wow, now that I think about it, it's unbearable!!"; + next; + goto R5_End; + + R5_2: + mes "[Friend of Youth]"; + mes "A Mr. Smile mask and an Orc Helmet look cute when used together. But a Mr. Smile cap by itself is just plain scary!"; + next; + mes "[Friend of Youth]"; + mes "Why is that??"; + emotion 1; + next; + goto R5_End; + R5_3: + mes "[Friend of Youth]"; + mes "An Adventurer's Suit is so cool! Especially when a guy wears it. It just seems to add to his charm!"; + next; + mes "[Friend of Youth]"; + mes "But wear a pair of Red Sandals with it.... and that becomes just TOOOO much to bear!!"; + emotion 19; + next; + goto R5_End; + R5_4: + mes "[Friend of Youth]"; + mes "It's nice to wear expensive headgear. It's nice to wear fancy clothing too!"; + mes "But remember to make everything match or you'll look like a fool!"; + mes "You can't just wear everything that you think is fancy."; + next; + mes "[Friend of Youth]"; + mes "Make sure the things you wear go with each other and compliment one another."; + next; + goto R5_End; + R5_End: + mes "[Friend of Youth]"; + mes "Hmm... this has nothing to do with fortune telling... but still... I like talking about fashion."; + goto M_Menu; + + M_End: + close; +} + + +//<============================================ Mage Guild ===============================================>\\ +// Dark Wizard ------------------------------------------------------------------------- +geffen_in.gat,164,109,2 script Dark Wizard 64,{ + + if(Class == 2 || Class == 9) goto L_Magic; + + mes "[Dark Wizard]"; + mes "Hmf. I only speak to those with magic abilities...."; + close; + +L_Magic: + mes "[Dark Wizard]"; + mes "Oh... I can feel the mighty spirits stirring around me."; + next; + mes "[Dark Wizard]"; + mes "You there, I sense that you too use magic."; + next; + mes "[Dark Wizard]"; + mes "Magic... a great power which is dictated by cause and effect. If it is used for good then in turn positive reactions will occur."; + mes "However, if it is used for evil, then negative reactions will occur instead. When using magic you truly reap what you sew."; + next; + mes "[Dark Wizard]"; + mes "Have you ever heard of ^0000ddGemstones^000000? Some magic spells are so powerfull that they require the use of a Gemstone."; + mes "These stones amplify a magic users power and allow them to cast high level spells. They can be bought at the magic store in town."; + next; + mes "[Dark Wizard]"; + mes "Always remeber that magic should only be used for the bennefit of people, not to do them harm."; + close; +} diff --git a/npc/cities/gonryun.txt b/npc/cities/gonryun.txt new file mode 100644 index 000000000..244fe5d0e --- /dev/null +++ b/npc/cities/gonryun.txt @@ -0,0 +1,318 @@ +//===== eAthena Script ======================================= +//= Gonryun Town +//===== By: ================================================== +//= edited by x[tsk] 4/30/04 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +// +//===== Additional Comments: ================================= +// May be missing npc's and dialogue. +//============================================================ + + + +//Event–¢’²¸I + +alberta.gat,245,69,4 script Gonryun Public Relations Official 776,{ + mes "[Waba]"; + mes "Hello there! I have traveled far from the Kingdom of Gonryun, my hometown."; + mes "I invite all to visit and celebrate the diversity of Gonryun! We welcome all sorts of visitors."; + M_Menu: + next; + menu "Gonryun? What is that?",M_1, "Travel to Gonryun.",M_2, "Nevermind.",M_End; + + M_1: + mes "[Waba]"; + mes "The Kingdom of Gonryun is a sight to behold! It floats high above the sky, beyond the pillar of light!"; + next; + mes "[Waba]"; + mes "You can certainly appreciate the sights of the floating mainland! If you go, be sure to try."; + mes "The steamed dumplings and peaches, they're a Gonryun specialty not to be missed!"; + goto M_Menu; + M_2: + mes "[Waba]"; + mes "The traveling expenses are ^0000ff10,000 zeny^000000. The fee is a bit pricy but this is beacuse of the dangerous nature of the trip."; + mes "The return trip is free, however. Are you prepared to go?"; + next; + menu "Let's Go!",-, "Actually... I changed my mind, sorry.",M_End; + + if (Zeny < 10000) goto L_NoZeny; + set Zeny,Zeny-10000; + warp "gon_fild01.gat",258,82; + end; + L_Zeny: + mes "[Waba]"; + mes "I am sorry if it seems like alot, but the ^0000ff10,000 zeny^000000 we request is necessary in order to make the trip."; + close; + M_End: + mes "[Waba]"; + mes "Please see me again if you want to visit! I am pleased just to meet an honored guest from the Continent."; + close; + +} + +//=============================================================================== + +gon_fild01.gat,255,79,6 script Gonryun Public Relations Official 776,{ + mes "[Waba]"; + mes "We are ready to head back as soon as the conditions are favorable."; + next; + menu "ALBERTA.",-,"I'll stay a bit longer.",M_End; + + warp "alberta.gat",243,68; + end; + M_End: + mes "[Waba]"; + mes "Oh there's no rush! Enjoy yourself and take in all the sights!"; + close; +} + +//=============================================================================== + +gon_fild01.gat,187,239,4 script Gonryun Public Relations Official 776,{ + mes "[Choseryu]"; + mes "The sacred pillar of light connects this island to Gonryun Kingdom. There's no time to idly chit chat now, be on your way."; + mes "I hope you will have many fond memories of Gonryun before you leave."; + close; +} + +//=============================================================================== + +gonryun.gat,153,64,0 script Gonryun Public Relations Official 776,{ + mes "[Choseryu]"; + mes "If you're ready to set sail I can send you back to the harbor."; + next; + menu "Send me to the harbor.",-,"I'd like to stay a bit longer.",M_End; + + mes "[Choseryu]"; + mes "Please come back to visit soon!"; + next; + warp "gon_fild01.gat",258,82; + close; + M_End: + mes "[Choseryu]"; + mes "Be sure to see all that Gonryun has to offer!"; + close; +} + +//=============================================================================== +//In h +//=============================================================================== + +gon_in.gat,153,35,4 script Hotel Manager 702,{ + mes "[Mayouban]"; + mes "Welcome! Your face is new around here. We've had many strangers from the outside coming into the village recently."; + mes "We've been quite short-handed here at the hotel."; + next; + mes "[Mayouban]"; + mes "It always seems to be 'get me this' or 'get me that' with the customers! Never a tip or a compliment. I suppose I should really welcome all the extra business."; + next; + menu "I'd like something to drink.",-,"I'll be on my way.",M_End; + + mes "[Mayouban]"; + mes "Here you go. There have been so many rowdy customers lately sometimes I'd just like to sit down and have a drink myself."; + close; + M_End: + mes "[Mayouban]"; + mes "May you have a safe journey! Come back any time."; + close; +} + +//=============================================================================== + +gon_in.gat,173,27,2 script Kuhau 774,{ + mes "[Kuhau]"; + mes "This hotel sells the best drinks! Not only is it potent, but it tastes great, too! Of course that's only for the adults."; + next; + mes "[Kuhau]"; + mes "But what about the children? We have a secret recipe for brewing great tea! Not only is it excellent, it's also good for them."; + close; +} + +//=============================================================================== + +gon_in.gat,165,16,4 script Drunkard 748,{ + mes "[Sorubun]"; + mes "Oh my head! I had too much to drink yesterday and passed out right here on the table."; + mes "The manager told me that I shouldn't drink anymore and I should have listened."; + emotion 19; + next; + mes "[Sorubun]"; + mes "Wow, the drinks here are strong! Much stronger than anything we have back home."; + close; +} + +//=============================================================================== + +gonryun.gat,139,142,6 script Girl 772,{ + mes "[Sanfayon]"; + mes "................"; + mes "It's been great having new visitors come to the village, but........ ever since I was robbed by that Thief......."; + next; + mes "[Sanfayon]"; + mes "I have been sooooo afraid of the foreigners....."; + emotion 16; + close; +} + +//=============================================================================== + +gonryun.gat,113,135,6 script Guardsman 780,{ + mes "[Guardsman]"; + mes "Welcome to Gonryun. This is the home of our governor, Sayoumun."; + next; + mes "[Guardsman]"; + mes "We're sure your intentions are benign, but any wrong moves and we'll be forced to take action."; + next; + mes "[Guardsman]"; + mes "Such a thing rarely happens, but when it does.... we are always ready to deal with any problems!"; + close; +} + +//=============================================================================== + +gonryun.gat,113,127,6 script Guardsman 780,{ + mes "[Guardsman]"; + mes "Welcome to Gonryun. This is the home of our elder, Sayoumun. He rules all of Gonryun."; + next; + mes "[Guardsman]"; + mes "We're sure your intentions are benign, but any wrong moves and we'll be forced to take action."; + next; + mes "[Guardsman]"; + mes "Such a thing rarely happens, but when it does. We are always ready to deal with any problems!"; + close; +} + +//=============================================================================== +//‘º’·‘î +//=============================================================================== + +gon_in.gat,18,27,4 script Elder's Wife 771,{ + mes "[Sangufayon]"; + mes "Oh my! You look like an important visitor from the outside. Aren't you?"; + next; + menu "Yes, I am.",-,"Where is the village Elder?",M_End; + + mes "[Sangufayon]"; + mes "We do not get many visitors from the outside to see my husband so it's so easy to spot them. Hohohohoho!"; + close; + M_End: + //!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! + mes "[Sangufayon]"; + mes "The master of the house, hohohohoho? Why... he is upstairs on the second floor if you need to talk to him, hohohoho."; + close; +} + +//=============================================================================== + +gon_in.gat,17,93,4 script Village Elder 775,{ + mes "[Sayoumun]"; + emotion 45; + mes "Zzzzzzzzzzz......."; + next; + mes "[Sayoumun]"; + mes "Huh, a visitor?! Oh, hello! I was just, uhm, meditating. I am Sayoumun, mayor of Gonryun village. I welcome you to Gonryun."; + next; + mes "[Sayoumun]"; + mes "There used to not be many visitors to this land, until the University of Foreign Studies in Alberta began offering trips to our small island."; + next; + mes "[Sayoumun]"; + mes "I personally don't like all these outsiders coming all of the sudden. Alot of them are reckless, but I suppose it's good for business."; + next; + mes "[Sayoumun]"; + mes "These reports of a thief in my town continually worry me, however I just know he's an outsider!"; + close; +} + +//=============================================================================== + +gonryun.gat,119,111,4 script Chen Wan Sok 89,{ + mes "[Chen Wan Sok]"; + mes "The village Elder here is truly a sociable fellow. Just because he is friendly does not mean he is lax on the rules! He can get riled up sometimes."; + next; + mes "[Chen Wan Sok]"; + mes "When the Elder's blessing, you can get away with a lot of things in this town. Sometimes there are those that cause mischief, but they are always dealt with."; + close; +} + +//=============================================================================== + +gonryun.gat,100,241,5 script Unsociable Man 733,{ + emotion 9; + mes "[Saunso]"; + mes "I am too busy to talk, come back later!"; + close; +} + +//=============================================================================== + +gonryun.gat,268,88,4 script Ryan Chun Ho 776,{ + mes "[Ryan Chun Ho]"; + mes "We are an independent race, submitting to no aggressor! This is the blessed area which we will never give up."; + next; + mes "[Ryan Chun Ho]"; + mes "We believe in victory, it is our glory."; + close; +} + +//=============================================================================== + +gonryun.gat,181,161,4 script Chon Munjin 773,{ + mes "[Chon Munjin]"; + mes "The men of Gonryun must be powerful and bold! But being such a man, one just can not get married. Don't you think?"; + next; + mes "[Chon Munjin]"; + mes "There's so many more men than women now it makes it even harder to find a woman. I wonder if my son will find himself a good woman?"; + close; +} + +//=============================================================================== + +gonryun.gat,237,225,4 script Hanyon Kyou 776,{ + mes "[Hanyon Kyou]"; + mes "How could I have done something like this?"; + mes ".............."; + next; + mes "[Hanyon Kyou]"; + mes "I've dropped my lucky knife! Now it's probably gone forever."; + close; +} + +//=============================================================================== + +gonryun.gat,51,101,4 script Gaiysonchoru 778,{ + mes "[Gaiysonchoru]"; + emotion 4; + mes ".............."; + next; + mes "[Gaiysonchoru]"; + mes "Well......... I'm worried."; + next; + mes "[Gaiysonchoru]"; + mes "So very worried."; + close; +} + +//=============================================================================== + +gonryun.gat,166,196,4 script Soldier 780,{ + mes "[Wagou]"; + mes "Do you know what this is?"; + next; + menu "Yes.",-, "No.",M_End; + + mes "[Wagou]"; + mes "I just have to make sure all citizens are warned of the dangers inside before going any further."; + close; + + M_End: + mes "[Wagou]"; + mes "Long ago, this was the great hall, but once the great beast had arrived it quickly turned to ruin and became overrun with monsters."; + next; + mes "[Wagou]"; + mes "I just have to make sure all citizens are warned of the dangers inside before going any further."; + close; +} diff --git a/npc/cities/izlude.txt b/npc/cities/izlude.txt new file mode 100644 index 000000000..5e15b7448 --- /dev/null +++ b/npc/cities/izlude.txt @@ -0,0 +1,547 @@ +//===== eAthena Script ======================================= +//= Izlude Town +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 fixed 2 zeny bugs/checks [Lupus] +//============================================================ + + + +// Welcome Sign ---------------------------------------------------------- +izlude.gat,125,116,1 script Welcome Sign 111,{ + mes "~sign reads...~"; + mes "Salutations and welcome to Izlude! Izlude is the satellite of Prontera and is home to Swordsmen and the Cool Event Corp.'s Monster Arena!"; + close; +} + +// Sign: Marina ----------------------------------------------------------------- +izlude.gat,179,183,1 script Izlude Marina 111,{ + mes "~sign reads...~"; + mes "Take a boat ride to the city of Alberta or to the island of Byalan."; + close; +} + +// Sign: Swordsman Assoc. ---------------------------------------------------- +izlude.gat,54,139,1 script Swordsman Association 111,{ + mes "~sign reads...~"; + mes "The Izlude Swordsman Association is proud to provide Rune-Midgard with the bravest and strongest warriors."; + close; +} + +//Bonne----------------------------------------------------------------------------------- +izlude.gat,55,74,2 script Bonne 90,{ + mes "[Bonne]"; + mes "Izlude welcomes you."; + next; + mes "[Bonne]"; + mes "Izlude is the satellite city of Prontera, capital of the kingdom of Rune-Midgard."; + next; + mes "[Bonne]"; + mes "Izlude is veeeerrrrry important not only because the Swordsman Association resides here, but also because we guard and secure the coast line."; + next; + mes "[Bonne]"; + mes "As for this bridge, though it might look weak and feeble, it is actually state of the art, built with the most sophisticated technology the earth's ever seen."; + next; + mes "[Bonne]"; + mes "No matter how strong storms may be, or how many people may stand on it, this bridge will NEEEEVER collapse. You could test it, if you'd like."; + next; + mes "[Bonne]"; + mes "Please enjoy your visit here at Izlude."; + close; +} + + +//Cuskoal------------------------------------------------------------------------------------- +izlude.gat,119,121,1 script Cuskoal 124,{ + set @TEMP, rand(2); + mes "[Cuskoal]"; + if(@TEMP != 0) goto L_R0; + mes "The Arena is THE place for capable young people from every part of the Rune-Midgard Kingdom to test their skills."; + mes "You could battle with monsters of different levels. How many stages you can survive through will determine your ability level"; + next; + mes "[Cuskoal]"; + mes "So What'd you say?"; + close; + + L_R0: + mes "The pubs in Prontera are always full of people, from local and out-of-towners. They are very boisterous."; + next; + mes "[Cuskoal]"; + mes "They're always a good place for information and rumors because a peole are constantly comming in and out them."; + next; + mes "[Cuskoal]"; + mes "If you listen to the people carefully, you just might get lucky and get very useful information for yourself."; + close; +} + +//Charfri------------------------------------------------------------------------------------- +izlude.gat,135,78,2 script Charfri 91,{ + set @TEMP,rand(2); + mes "[Charfri]"; + if(@TEMP != 0) goto L_R0; + mes "Some people insult our city by reffering to it as just being the satellite city of Prontera.... but Izlude is actually an excellent city."; + mes "It's home to the Izlude Swordsman Association and is situated next to the sea and the beautiful island of Byalan."; + next; + mes "[Charfri]"; + mes "You'll have to board on a ship at the port to get to Byalan Island. There is a dangerous dungeon on the island, so don't go there if you plan on wandering around aimlessly."; + close; + + L_R0: + mes "Though it is very beautiful, the Byalan Island has a mysterious dungeon extending deep under the sea."; + next; + mes "[Charfri]"; + mes "People who've been there have said that some parts of the dungeon are actually underwater."; + next; + mes "[Charfri]"; + mes "Those who saw the underwater view said it was just so fantastic that they've kept dreaming of it ever since."; + mes "Unfortunately the monsters there are too strong for ordinary people to visit there."; + next; + mes "[Charfri]"; + mes "I wish I could get a glimps of the underwater view everyone talks about.... alas I can only dream."; + close; +} + +//Dega------------------------------------------------------------------------------------- +izlude.gat,150,118,3 script Dega 84,{ + set @TEMP,rand(3); + mes "[Dega]"; + if(@TEMP != 0) goto L_R0; + mes "Mt. Mjornir located north of Prontera is extremely tough to travel through. Not only is the trek up the mountain difficult, but extremely aggressive insects live there too."; + next; + mes "[Dega]"; + mes "I mean, some of them just start attacking you for no reason whatsoever."; + next; + mes "[Dega]"; + mes "If you ever want to go through Mt. Mjornir, make sure you prepare yourself and build up your confidence. Otherwise, go around it."; + close; + + L_R0: + if(@TEMP != 1) goto L_R1; + mes "Some monsters in Rune-Midgard can detect the use of a spell by a character before it is used."; + next; + mes "[Dega]"; + mes "Golems that live in the desert are one of those monsters. If you underestimate their sluggish movement and try to cast a spell on them...,"; + next; + mes "[Dega]"; + mes "(snaps fingers) just like that they'll disappear from your sight."; + close; + L_R1: + mes "There is a very delightful place where you can find every type of Poring."; + mes "It is somewhere near the bridge, connecting the forest and the desert on the way to the city called Payon to the Southeast from here."; + next; + mes "[Dega]"; + mes "There are not only pink Porings but also orange Drops, which can be found at the desert, and green PoPoring."; + next; + mes "[Dega]"; + mes "But be careful, before you know it, you might be face to face with a Ghostring that floats around in the air like a ghost."; + mes "Although most porings tend to be very cute and gentle, Ghostring is an EXCEPTION. It is very very dangerous."; + next; + mes "[Dega]"; + mes "If you are lucky enough, you might even bump into and Angelring. It's a Poring with wings like an angel."; + next; + menu "Ghostring?",-,"Angelring?",M1,"End Conversation.",MEnd; + + mes "[Dega]"; + mes "Ghostring is a grayish Poring that floats around in the air like a ghost. Since it's ghostlike, physical attack can't do any damage to it."; + next; + mes "[Dega]"; + mes "Those who rely on physical attacks, like Swordsmen and Archers, will most likely have to run for their lives if they bump into a Ghostring."; + next; + mes "[Dega]"; + mes "Of course there is hope for people in those job classes. If equiped with weapons with elemental properities, a Ghostring CAN be defeated."; + next; + close; + M1: + mes "[Dega]"; + mes "Unlike Ghostrings, Angelrings can be hit by physical attacks but are inturn immune to Magic attacks."; + mes "So Mages and Acolytes will have difficulty against Angelrings."; + next; + close; + MEnd: + mes "[Dega]"; + mes "Good Luck~"; + close; +} + +//Kylick------------------------------------------------------------------------------------- +izlude.gat,150,143,4 script Kylick 97,{ + mes "[Kylick]"; + mes "Don't you think Binoculars are really COOL?! YOU can see SUPER FAR AWAY..."; + emotion 5; + next; + mes "[Kylick]"; + mes "... Ahem~! We, here at Izlude, are responsable for maintaining peace, not only on land, but also at sea."; + next; + mes "[Kylick]"; + mes "That's why we have that huge Parascope to constantly watch over the sea and help prevent any serious problems beforehand."; + next; + mes "[Kylick]"; + mes "After all, being well prepared is always better than being unprepared."; + emotion 33; + close; +} + +// Soldier ------------------------------------------------------------------------------ +izlude.gat,124,178,4 script Soldier 105,{ + mes "[Soldier]"; + mes "HeHeHeHe... HaHaHaHa"; + mes "Huh? Why am I so happy?"; + mes "you wanna know?"; + emotion 18; + next; + menu "Sure, why?",-, "Not really, I don't care.",M_1; + + mes "[Soldier]"; + mes "Ah~~ There is not much for us to do these days. Merchants buy items which monsters drop.... you knew that, right?"; + next; + menu "Of course",sM_0, "Eh? Really?",sM_1; + + sM_0: + mes "[Soldier]"; + mes "HaHa In fact, that was actually our job."; + mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle."; + next; + mes "[Soldier]"; + mes "We had to work over time every day. Ah~~~ that was a nightmare!!!...~~~"; + emotion 16; + next; + mes "[Soldier]"; + mes "Anyways, the government made a smart move and created the Registration System."; + mes "The Office of Prize Compensation only pays those who have been registered."; + next; + mes "[Soldier]"; + mes "The requirements for registration are for a merchant to secure sufficient funds and to stay at one place all the time."; + mes "The Office gives away the registration to any merchant who fullfills those requirements."; + next; + mes "[Soldier]"; + mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~"; + next; + mes "[Soldier]"; + mes "People who have suffered are able to appreicate even the slightest in comforts."; + next; + mes "[Soldier]"; + mes "HaHaHaHaHa!"; + emotion 18; + close; + sM_1: + mes "[Soldier]"; + mes "What?! What do you mean you didn't know?!"; + emotion 1; + next; + mes "[Soldier]"; + mes "Hm... well... you know you could get items by killing monsters right?"; + mes "You could make some money out of it by selling those items to a merchant."; + next; + goto sM_0; + M_1: + mes "[Soldier]"; + mes "OK Good bye~~"; + close; +} + +//Red------------------------------------------------------------------------------------- +izlude.gat,58,126,1 script Red 98,{ + mes "[Red]"; + mes "The only skill that a Swordsman needs is 'Bash'! 'Bash'! 'Bash'! ONLY 'Bash'!"; + mes "There's no need to waste any time and effort on other minor skills ~~ unless you're some kind of wuss!"; + emotion 29; + next; + mes "[Cebalis]"; + mes "What are you talking about?"; + emotion 1; + next; + mes "[Cebalis]"; + mes "The mark of a true Swordsman is the ability to bravely stand alone against a mob of enemies and SQUASH them ALL!"; + next; + mes "[Cebalis]"; + mes "AND the only skill that can do that is 'Magnum Break'!!"; + next; + mes "[Cebalis]"; + mes "It's a little bit risky to use because the explosive impact it creates may hit un-intended targets... which will then come after you... "; + mes "but its a risk a Swordsman SHOULD BE willing to take!!"; + next; + mes "[Red]"; + mes "That's exactly why you're a dumb, idiot! The mark of a true Swordsman?! I still remmember the last time you used 'Magnum Break'...."; + emotion 32; + next; + mes "[Red]"; + mes "You were just busy running away from all of those Porings that got hit by that stupid skill! You weakling!"; + mes "'Bash' hits ONE target with DEADLY PRECISION!! No need to fear accicental mobs."; + next; + mes "[Cebalis]"; + mes "Ahem..... Why do you always have to bring up insiginfigant incidents that have long sinced passed?"; + mes "I'm TELLING YOU, 'Magnum Break' is THE skill for a SWORDSMAN~!!"; + next; + mes "[Cebalis]"; + mes "'Bash' is just a stepping stone to getting 'Magnum Break'. After all you need 5 levels of 'Bash before you can get lvl 1 'Magnum Break'."; + next; + mes "[Red]"; + mes "Ooohhh maaaann....."; + emotion 9; + next; + mes "[Red]"; + mes "Hey! You there! which do you think is better? 'Bash', a powerfull and precise blow used on a single enemy,......."; + mes "or 'Magnum Break', a firey strike that does splash damage to many enemies??"; + next; + menu "Bash",-,"Magnum Break",L1; + + mes "[Red]"; + if( callfunc("Is_Sword_Class") != 0 ) goto L00; + mes "Hahahaha!! See!? Someone who pursues a different job agrees with me~! You really are a great person!"; + mes "Hahaha!! Undoubtedly only 'Bash' is suitable for a Swordman. Please tell that to this BONEHEAD over here!! Hahaha."; + emotion 21; + close; + + L00: + mes "Hahahaha!!! I knew you'd choose 'Bash'!! Without a doubt only 'Bash' suits a Swordsman. Please tell that to the BONEHEAD over there!! Hahaha."; + emotion 21; + next; + mes "[Red]"; + mes "Hm, Let me give you a bit of advice. After you achieve level 5 'Bash', the amount of SP the skill consumes doubles, so keep an eye on your SP guage."; + close; + L1: + mes "[Cebalis]"; + if( callfunc("Is_Sword_Class") != 0 ) goto L01; + mes "Right! 'Magnum Break' is THE BEST!!! You know what you're talking about, huh? I don't know why this bonehead is sooooo stubborn."; + close; + + L01: + mes "Darn Right!! 'Magnum Break' IS the BETTER skill!! You know what your talking about freind. HaHaHa."; + next; + mes "[Cebalis]"; + mes "You want some useful information? Okay, lemme tell ya! 'Magnum Break' has the elemental Property of 'Fire'."; + mes "It won't be too effective against monsters with the 'Water' property, but it works great against 'Undead' and 'Earth' property monsters.!"; + next; + mes "[Cebalis]"; + mes "And most importantly, check your surroundings before you use it. If you don't you may end up taking on more monsters than you can handle."; + close; +} + +//Cebalis------------------------------------------------------------------------------------- +izlude.gat,56,126,7 script Cebalis 85,{ + mes "[Cebalis]"; + mes "The mark of a true Swordsman is the ability to bravely stand alone against a mob of enemies and SQUASH them ALL!!"; + emotion 29; + next; + mes "[Cebalis]"; + mes "AND the only skill that can do that is 'Magnum Break'!!"; + next; + mes "[Cebalis]"; + mes "It's a little bit risky to use because the explosive impact it creates may hit un-intended targets...which will then come after you..."; + mes "but its a risk a Swordsman SHOULD BE willing to take!"; + next; + mes "[Red]"; + mes "What are you talking about?"; + next; + mes "[Red]"; + mes "The only skill that a Swordsman needs is 'Bash'! 'Bash'! 'Bash'! ONLY 'Bash'!"; + mes "There's no need to waste any time and effort on other minor skills ~~ unless you're some kind of wuss!"; + next; + mes "[Red]"; + mes "That's exactly why you're a dumb, idiot! The mark of a true Swordsman?! I still remmember the last time you used 'Magnum Break'...."; + next; + mes "[Red]"; + mes "You were just busy running away from all of the Porings that got hit by that stupid skill! You weakling!"; + mes "'Bash' hits ONE target with DEADLY PRECISION!! No need to fear accicental mobs."; + next; + mes "[Cebalis]"; + mes "Ahem... Why do you always have to bring up insiginfigant incidents that have long sinced passed?"; + mes "I'm TELLING YOU, 'Magnum Break' is the skill for a SWORDSMAN~!!"; + emotion 4; + next; + mes "[Cebalis]"; + mes "'Bash' is just a stepping stone to getting 'Magnum Break'. After all you need 5 levels of 'Bash before you can get lvl 1 'Magnum Break'."; + next; + mes "[Red]"; + mes "Ooohhh maaaann....."; + next; + mes "[Red]"; + mes "Hey! You there! what do you think is better? 'Bash', a powerfull and precise blow used on a single enemy,......."; + mes "or 'Magnum Break', a firey strike that does splash damage to many enemies??"; + next; + menu "Bash",-,"Magnum Break",L1; + + mes "[Red]"; + if( callfunc("Is_Sword_Class") != 0 ) goto L00; + mes "Hahahaha!! See!? Someone who pursues a different job agrees with me~! You really are a great person!"; + mes "Hahaha!! Undoubtedly only 'Bash' is suitable for a Swordman. Please tell that to this BONEHEAD over here!! Hahaha."; + close; + + L00: + mes "Hahahaha!!! I knew you'd choose 'Bash'!! Without a doubt only 'Bash' suits a Swordsman. Please tell that to the BONEHEAD over there!! Hahaha."; + next; + mes "[Red]"; + mes "Hm, Let me give you a bit of advice. After you achieve level 5 'Bash', the amount of SP the skill consumes doubles, so keep an eye on your SP guage."; + close; + L1: + mes "[Cebalis]"; + if( callfunc("Is_Sword_Class") != 0 ) goto L01; + mes "Right! 'Magnum Break' is THE BEST!!! You know what you're talking about, huh? I don't know why this bonehead is sooooo stubborn."; + emotion 21; + close; + + L01: + mes "Darn Right!! 'Magnum Break' IS the BETTER skill!! You know what your talking about freind. HaHaHa."; + emotion 21; + next; + mes "[Cebalis]"; + mes "You want some useful information? Okay, lemme tell ya! 'Magnum Break' has the elemental Property of 'Fire'."; + mes "It won't be too effective against monsters with the 'Water' property, but it works great against 'Undead' and 'Earth' property monsters.!"; + next; + mes "[Cebalis]"; + mes "And most importantly, check your surroundings before you use it. If you don't you may end up taking on more monsters than you can handle."; + close; +} + +//Aaron------------------------------------------------------------------------------------- +izlude_in.gat,125,164,5 script Aaron 65,{ + mes "[Aaron]"; + mes "Hm? A Swordman?.........."; + emotion 1; + next; + mes "[Aaron]"; + mes "Do you think strong VIT and a highly trained and unique breathing method enabling quick HP recovery, are the greatest advantages of a Swordman?"; + next; + mes "[Aaron]"; + mes "If you train hard enough, you can even notice your HP recovering. The amount that recovers depends on your VIT level."; + next; + mes "[Aaron]"; + mes "So if you invest in your VIT more, then the recovery amount will increase accordingly."; + next; + mes "[Aaron]"; + mes "But of course it'd be good to have a high Attack, wouldn't it? You can either acquire a good weapon or increase your STR level to enhance your Attack."; + next; + mes "[Aaron]"; + mes "You will also need strength to handle weapons more easily as well as to increase the amount of weight you can carry."; + next; + mes "[Aaron]"; + mes "Another important thing is how accurate you can hit your opponents. DEX is the key here. Dexterity also decreases the gap between the MIN and MAX damage you can deal."; + next; + mes "[Aaron]"; + mes "Hm... Are you bored? Want me to go on?"; + emotion 20; + next; + menu "Tell me more please.",-,"End conversation",LEnd; + + mes "[Aaron]"; + mes "Hm... in that case, I'll explain about the other attributes to you briefly. In order to attack and evade quickly, you've gotta have a good amount of AGI."; + next; + mes "[Aaron]"; + mes "A high AGI level will ensure that you can avoid attacks making you almost unhittable."; + next; + mes "[Aaron]"; + mes "In case you want to land more critical hits, it's a good idea to invest in LUK. INT increases max SP, which is needed to use various skills."; + next; + mes "[Aaron]"; + mes "Well it's up to you on what you type of attributes you focus on."; + next; + LEnd: + mes "[Aaron]"; + mes "OK, train hard~~"; + emotion 21; + close; +} + +//Edgar------------------------------------------------------------------------------------- +izlude.gat,182,186,6 script Edgar 709,{ + + mes "[Edgar]"; + mes "Izlude is connected with Alberta by the harbor at the west. There is soo much traffic between the 2 cities that I sometimes feel like an Albertian. Hahahah"; +M_Menu: + next; + menu "Tell me more",-,"Can you tell me the way to Alberta?",M_1,"End Conversation",M_End; + + mes "[Edgar]"; + mes "I have a freind named Phelix in Alberta. He is a little stingy but he's a gernerally nice guy and likes helping others."; + mes "He has a big heart and can help you get some usefull items in exchange for monster drops."; + next; + mes "[Edgar]"; + mes "Latley those in Alberta have been saying that he is helping out people in exchange for Jellopies or something like that."; + mes "You might be able to save some zeny if you talk to him."; + goto M_Menu; + + M_1: + mes "[Edgar]"; + mes "Well you can always walk there. It's south of here and past the city of Payon. However the walk is rather long so I suggest you take a ship over there."; + next; + menu "Ok gotcha.",-,"Sick of walking and no money now.",sM_1; + + mes "[Edgar]"; + mes "Alright, Take Care~"; + goto M_Menu; + + sM_1: + mes "[Edgar]"; + mes "Hmm..., you hate to walk and are low on money, but you want to go there...(sigh)...Oh boy..."; + emotion 4; + next; + mes "[Edgar]"; + mes "Well I am the captian of a small ship so I could bring you there at the low price of 250 Zeny."; + next; + menu "Alright~!",-,"Bah, what a rip off!!!",sm_1b; + + if(Zeny < 250) goto sl_NoZeny; + set iz_move_alberta,1; + set Zeny, Zeny - 250; + warp "alberta.gat",195,164; + + sl_NoZeny: + mes "[Edgar]"; + mes "Oh boy you don't have enough money! Go get more."; + close; + + sm_1b: + mes "[Edgar]"; + mes "What!!... ahg... bah... guh... I'm NOT ripping you off!!!..."; + emotion 23; + close; + + M_End: + mes "[Edgar]"; + mes "Well I've got other business to attend too."; + close; + +} + +//Sailor------------------------------------------------------------------------------------- +izlude.gat,201,181,2 script Sailor 100,{ + mes "[Sailor]"; + mes "Hey Everybody, Attention! Come and Ride the Wind on a Fantastic Ship!!! Come on! Hurry up!"; + next; + menu "Byalan Island -> 150 Zeny.",-,"Alberta Marina -> 500 Zeny.",L1,"Cancel",LEnd; + + if(Zeny < 150) goto sl_NoZeny; + set Zeny, Zeny - 150; + warp "izlu2dun.gat",107,50; + close; + L1: + if(Zeny < 500) goto sl_NoZeny; + set Zeny, Zeny - 500; + warp "alberta.gat",188,169; + LEnd: + close; + sl_NoZeny: + mes "[Sailor]"; + mes "You don't have enough money!"; + close; +} + +//Sailor------------------------------------------------------------------------------------- +izlu2dun.gat,108,27,4 script Sailor 100,{ + mes "[Sailor]"; + mes "Wanna return?"; + next; + menu "Yeah, I am Tired to Death.",-,"Nope I love this place.",L1; + + warp "izlude.gat",176,182; + L1: + close; +} diff --git a/npc/cities/lutie.txt b/npc/cities/lutie.txt new file mode 100644 index 000000000..7e9022fe7 --- /dev/null +++ b/npc/cities/lutie.txt @@ -0,0 +1,999 @@ +//===== eAthena Script ======================================= +//= Lutie Town +//===== By: ================================================== +//= RoVeRT +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Not complete +//============================================================ + +aldebaran.gat,168,168,4 script Link Santa 718,{ + mes "[Shutown]"; + mes "Ho Ho Ho~"; + mes "Merry Christmas!!"; + mes "Merry Christmas - All of you !"; + next; + menu "Info about Lutie",L0,",Move to the 'Lutie'",L1,"Cancel",LEnd; + + L0: + mes "[Shutown]"; + mes "^3355FF' Lutie '^000000,the Fantastic Christmas Town!!"; + mes "Where the Christmas Spirit abound Year around,"; + mes "The place filled with Appetizing Cakes-,"; + mes "Tiny little Toy Soldiersand all things you can imagine!!"; + next; + mes "[Shutown]"; + mes "Ho Ho Ho~"; + mes "Beautiful Amazing land!"; + mes "Where the Christmas Spirit abound Year around,"; + mes "In Festive atmosphere."; + next; + mes "[Shutown]"; + mes "I am a Santa Claus guiding people"; + mes "to Lutie,the Christmas Town."; + mes "Young Man -"; + mes "You can be my guest.Do you want to try?"; + close; + L1: + mes "[Shutown]"; + mes "Ho Ho Ho~"; + mes "The only place get to the Lutie"; + mes "in the world . ."; + mes "is located here,"; + mes "Aldebaran !"; + next; + mes "[Shutown]"; + mes "I hereby keep this place -"; + mes "to personally transport people who want to visit Lutie."; + mes "Please ask Santa in there,if you want to go out the town."; + mes "My friend Santa in there will let you know,"; + mes "the way get out of Lutie~"; + next; + mes "Ho Ho Ho~"; + mes "Well,are you ready,young man ?"; + mes "Merry Christmas!!"; + mes "Have a nice trip!"; + warp "xmas_fild01.gat",78,68; + close; + LEnd: + mes "[Shutown]"; + mes "Ho Ho Ho~"; + mes "If you want to visit Lutie,"; + mes "Be my guest anytime you want~."; + mes "Well Merry Christmas,Young Man,Merry Christmas!!"; + close; +} + +xmas_in.gat,27,103,4 script Lenient Aunt 701,{ + if(xmas_npc==5) goto Xmas5; + if(xmas_npc==6) goto Xmas6; + if(xmas_npc==7) goto Xmas7; + mes "[Thachentze]"; + mes "Merry Christmas~"; + mes "Ho! Ho! Ho!"; + mes "I can feel Christmas coming in front of my nose,"; + mes "when I look at the young strangers out there -"; + mes "Ho ho ho I wish you have a merry christmas~"; + next; + mes "[Thachentze]"; + mes "We have a dungeon named `Christmas dungeon' around here."; + mes "It looks like Toy Factory....quite similar..."; + mes "Well . I don't need to tell much longer in case you heard of this from others already."; + mes "Oh well -"; + next; + mes "[Thachentze]"; + mes "I figured out one thing days ago,"; + mes "you will be able to run into creatures below there,"; + mes "which are similar types of the ones outside the town."; + mes "Well you can say they look like twins of course. ."; + mes "I think the cold weather have altered their property,"; + mes "while they are traveling to this place and that place -"; + mes "I can say they share the shape of body but their property get to be different from each other,by cause of nature."; + next; + mes "[Thachentze]"; + mes ". . . . ."; + mes "Ok now I think I'd better be ready for pickling cabbages."; + mes "My pickles?"; + mes "I can pickle Chinese Cabbages for the best!!"; + mes "Ho ho ho ho?"; + mes "Why don't you visit me again and try my pickle later?"; + close; + + Xmas5: + mes "[Thachentze]"; + mes "Hoooo ? Did the Hairy guy talk about me,didn't he?"; + mes "Well well,I know what he thinks....Ho ho ho~!"; + mes "He intends to make me feel happy and expects me to give him some free jars of pickles!"; + mes "Ho ho ho . Oh well well"; + next; + mes "[Thachentze]"; + mes "He knows too much about me..."; + mes "I can't stop him to get my pickles from me -"; + mes "Yes yes. .Even I know my pickle is the best in town !"; + mes "Hoooh ?"; + mes "Story of ^3355FF' Snowysnow '^000000?"; + mes "Oh~ . Yes yes . I see."; + next; + mes "[Thachentze]"; + mes "But I don't let you have my story for free!"; + mes "As you know the most powerful human beings are aunties!Yes that's me!!"; + mes "They never allow others to take advantageof their property,"; + mes "- There is no free lunch- get it now ?"; + mes "So I have a favour to ask of you."; + mes "Snowysnow has been kept my stuff for my favour."; + next; + mes "[Thachentze]"; + mes "Would you please take it back to me?"; + mes "^3355FF' The roughest salt in the world '^000000"; + mes "Yes that's my stuff - It is the neccessary item for pickling Cabbages."; + mes "You won't get troubled with him,"; + mes "As soon as you say my name,"; + next; + mes "[Thachentze]"; + mes "He will give you my salt -"; + mes "Now dear. Hurry up."; + mes "Return Quickly -"; + set xmas_npc,1; + close; + Xmas6: + mes "[Thachentze]"; + mes "Hohohoho -"; + mes "Let's see - - - - -"; + mes "Huh ? Didn't you yet bring it?"; + mes "Oh my goodness,my cabbages will get sour soon!"; + mes "( ? )"; + mes "Hurry up,Chop Chop -!!"; + next; + mes "[Thachentze]"; + mes "*sigh* You are really a scatterbrained person,my dear -"; + mes "I said BRING ME"; + mes "^3355FF' THE ROUGHEST SALT IN THE WORLD '^000000"; + mes "!!!!!!!!!!!!!!!!!!!!!!!!!! -"; + mes "Leave now and hurry up -"; + close; + Xmas7: + mes "[Thachentze]"; + mes "Hohohohoh hohohohoho !"; + mes "Let's see Let's see - - - - -"; + mes "Thank you my dear,Thank you -"; + next; + set xmas_npc,1; + mes "-Handed ^3355FF' The roughest salt in the world'^000000 to her-"; + next; + mes "[Thachentze]"; + mes "Now I am able to pickle my cabbages properly."; + mes "Thank you my dear,Thank you -"; + mes ". . . . . Hooo ?"; + mes "Arrr Yes Sorry I almost forgot I promised you - yes."; + mes "I remember you asked me about the gift bag of Snowysnow,didn't you?"; + next; + mes "[Thachentze]"; + mes "If you already met Uncle Cantata"; + mes "you must know by now,"; + mes "Snowysnow has been made out of some mysterious snow covering up a thick-grass filed of magical force,"; + mes "[Thachentze]"; + mes "I can't tell you what the reason was,but"; + mes "I figured out Snowysnow came to possess the gift bag within,"; + mes "due to the strange reaction between alchemy items used by Great alchemist"; + mes "and its original structure material,the mysterious snow."; + next; + mes "[Thachentze]"; + mes "Aside of it, the gift bag creates present as many as Snowysnow wants."; + mes "It seems like something not real grants Snowysnow with the same ability of Santa Claus."; + mes "If it was fell into bad man's hand,probably we were in trouble but"; + mes "Everybody knows that Snowysnow is very nice and innocent creature..."; + mes "We've never be worried about his gift..."; + next; + mes "[Thachentze]"; + mes "Hohohoho . . Ah and,"; + mes "Lately I got a shocking news from ^3355FF' Hashokii '^000000 the clown,"; + mes "it is quite interesting story. .if you wonder,"; + mes "why don't you go meet him?"; + close; +} + +xmas_in.gat,100,96,4 script Father Christmas 718,{ + mes "[Santa Claus]"; + mes "Ho Ho Ho~"; + mes "Meeerry Christmas !!"; + next; + mes "[Santa Claus]"; + mes "Ho Ho Ho~"; + mes "I am a Santa Claus,"; + mes "Bring Christmas Gifts to"; + mes "Everyone -"; + mes "Come on,Today is a special day for everyone."; + mes "You can't be an exception !"; + next; + mes "[Santa Claus]"; + mes "Ho Ho Ho~"; + mes "I will give you one useful tip."; + mes "If you want to go outside Lutie World,"; + mes "Go outside the town and head south at the first field you see."; + mes "You will be able to find a warp leading to Aldebaran."; + mes "Ho Ho Ho~ Merry Christmas !!"; + mes "Merry Christmas - - -"; + close; +} + +xmas_in.gat,165,174,4 script Christmas Girl 711,{ + if(xmas_npc==1) goto Xmas1; + mes "[Duffle]"; + mes "Merry Christmas!"; + mes "Welcome to Lutie!"; + next; + mes "[Duffle]"; + mes "Have you ever talked to the snowman in front of this town?"; + mes "Snowman in sloitude,"; + mes "made of White Snow...."; + next; + mes "[Duffle]"; + mes "However he got a warm heart"; + mes "Sometimes I talk to ' Snowysnow 'the snowman."; + mes "Without reason ..even though he is a snowman,"; + mes "He can understand and stand to listen to us"; + next; + mes "[Duffle]"; + mes ". . . . ."; + mes "When I talk to Snowysnow,"; + mes "I get to wonder about many things of him and feel something mysterious,"; + mes "I assume you will be the same as me,"; + mes "if you try to talk to him."; + next; + mes "[Duffle]"; + mes "like how he has been created,"; + mes "who granted him to posses the heart of human and can talk,"; + next; + mes "[Duffle]"; + mes "Where he was from,"; + mes "That place has a lot of snow all the time or not..."; + mes "How he came to arrive this town without legs..."; + next; + mes "[Duffle]"; + mes "Lately in this town,"; + mes "it seems the number of curious people coming to him gets increased."; + mes "If you still couldn't solve his secret after talking with him"; + next; + mes "[Duffle]"; + mes "I suggest you to talk to other towners..."; + if(xmas_npc==0) goto Xmas0; + close; + + Xmas0: + mes "Ah .I almost forgot you to tell..."; + mes "We have a Christmas Father somewhere in this town,"; + mes "who gives present to everyone visiting him."; + next; + mes "[Duffle]"; + mes "Didn't you see him yet?"; + mes "Why don't you go meet him then?"; + mes "It's not that bad I guess -"; + mes "Ok then see you again -"; + mes "Merry Christmas!!"; + close; + + Xmas1: + mes "[Duffle]"; + mes "Merry Christmas!"; + mes "Welcome to Lutie!"; + next; + mes "[Duffle]"; + mes "You got the present from Santa Claus~!"; + mes "You must be really exited,Ha ha!"; + mes "Have you ever heard that we have an equally famous feature"; + mes "as Santa Claus in here?"; + next; + mes "[Duffle]"; + mes "That is ^3355FF' Snowysnow '^000000 -"; + mes "the mysterious snowman,"; + mes "Happened to communicate with humans."; + next; + mes "[Duffle]"; + mes "Yet you didn't meet Snowysnow,"; + mes "I think you'd better try to talk to him..."; + mes "at least once."; + mes ". . . . ."; + mes "Well then - Merry Christmas !!"; + set xmas_npc,1; + close; +} + +xmas.gat,117,304,4 script Christmas Guy 712,{ + if((xmas_npc==3) || (xmas_npc==4)) goto Xmas34; + mes "[Poze]"; + mes "Merry Christmas!"; + mes "This is Blessed Christmas Town for every visitors!"; + mes "Merry Christmas !"; + next; + mes "[Poze]"; + mes "Actually this is not a temporarily exsisted place."; + mes "You can fully enjoy Christmas atmosphere in here -"; + mes "all year round."; + next; + mes "[Poze]"; + mes "Well you will see around this town...."; + mes "it is not a simple theme park only with an attraction ."; + mes "Like the others, we have convenience facilities"; + mes "in well-decorated environment."; + next; + mes "[Poze]"; + mes "I guess you won't have any big inconvenience while staying here for a while~"; + mes "Well then . May you be in a full happyness. ."; + mes "Merry Christmas-"; + close; + + Xmas34: + mes "[Poze]"; + mes "Did ^3355FF' Snowysnow '^000000 talk about me ?"; + mes "Oh I see... He is snowman having no leg,"; + mes "he couldn't make it to come . .What a shame I didn't realise.."; + mes "I appreciate you to come for him."; + mes "I will visit him someday."; + next; + mes "[Poze]"; + mes "There is a man who knows about Snowysnow's secret,"; + mes "How to come to talk."; + mes "That is ^3355FF' Uncle Hairy Cantata '^000000..."; + mes "Yes definately he is . ."; + next; + mes "[Poze]"; + mes "One day when apprentice of the great alchemist visted Lutie,"; + mes "I came to listen the conversation between uncle Cantata and him."; + mes "Once upon a time,when a great alchemist came by the hometown of Snowysnow,"; + mes "He happened to meet Snowysnow dying and melting down into the water,"; + mes "so he revived him with several ores of magic and some other stuffs."; + next; + mes "[Poze]"; + mes "Well . For the details,"; + mes "I recomand you to listen what ^3355FF' Uncle Hairy Cantata '^000000 says."; + set xmas_npc,1; + close; +} + +xmas.gat,134,112,4 script Snowman 710,{ + mes "[Snowysnow]"; + mes "*sob**sob*..."; + mes "Lonely! I am so lonely!"; + mes "I am a snowman always keeps the same place..."; + next; + menu "^0000FFSnowysnow?^000000",L0,"Info about the christmas dungeon",L1,"Quit conversation",LEnd; + + L0: + if(xmas_npc<2) goto XmasLess2; + if(xmas_npc==2) goto Xmas2; + if(xmas_npc==3) goto Xmas3; + if(xmas_npc==4) goto Xmas4; + if(xmas_npc==5) goto Xmas5; + if(xmas_npc==6) goto Xmas6; + if(xmas_npc==7) goto Xmas7; + if(xmas_npc==8) goto Xmas8; + if(xmas_npc==9) goto Xmas9; + if(xmas_npc==10) goto Xmas10; + if(xmas_npc==11) goto Xmas11; + + Xmas2: + mes "[Snowysnow]"; + mes "Did you hear something from ' Duffle '?"; + mes "Heh heh . .Towners of Christmas Town"; + mes "call me a mysterious Snowman,"; + mes "Frankly I am just nothing but a simple snowman .."; + next; + mes "[Snowysnow]"; + mes ". . . . . Besides"; + mes "I don't even know who I am."; + mes "Maybe I know myself as much as Christmast towners know...."; + next; + mes "[Snowysnow]"; + mes "Mr.^3355FF' Poze '^000000 gave me a name card of him,"; + mes "said visit him whenever I get a hard time."; + mes "But see?"; + mes "I don't have legs to come to him ..T.T "; + mes ". . . . ."; + next; + mes "[Snowysnow]"; + mes "What did get me this town......"; + mes "How can I communicate with humans.....??"; + mes "How can I . . . . .??"; + next; + mes "^3355FF- Snowysnow falls into deep thoughts -^000000"; + mes "^3355FF- He is looking ' Poze ''s name card -^000000"; + set xmas_npc,1; + close; + Xmas3: + mes "[Snowysnow]"; + mes ". . . . . . . . . . . . . . ."; + next; + mes "^3355FF- Snowysnow falls into deep thoughts -^000000"; + mes "^3355FF- He is looking ' Poze ''s name card -^000000"; + close; + Xmas4: + mes "[Snowysnow]"; + mes "You did meet ' Poze ' -"; + mes "He is a honest and diligent guy . ."; + mes "And I know . ."; + mes "He fell in love with ' Duffle '...."; + mes "Muhahahahaha...."; + next; + mes "[Snowysnow]"; + mes "I think ' Duffle ' need to be more generous."; + mes "She is very kind to everyone,"; + mes "except Poze."; + mes "But I get to know . .Duffle likes Poze as much as he does..."; + close; + Xmas5: + mes "[Snowysnow]"; + mes "You did meet ^3355FF' Uncle Hairy Cantata '^000000."; + mes "Uncle Cantata has loud voice,doesn't take shower"; + mes "and smell bad, but meanwile"; + mes "he is funny and diligent guy."; + mes "Everybody likes him."; + next; + mes "[Snowysnow]"; + mes "He enjoy drinking some strange drink."; + mes "They say. ."; + mes "It is a miracle that he doesn't have stomachahe."; + mes "Heh~ . .I love this guy too . ."; + close; + Xmas6: + mes "[Snowysnow]"; + mes "Hmmm you did meet ^3355FF' Aunt Thashintze '^000000"; + mes "the expert of pickles -"; + mes "Yeah yeah . I've kept it for sure."; + mes "There you go . It is very salt she wants."; + next; + set xmas_npc,1; + mes "^3355FF' Got the roughest salt in the world'^000000."; + next; + mes "[Snowysnow]"; + mes "I like her cookings because they are soooo delicious."; + mes "Sometimes she offers me cups of ice falkes with grape syrup..."; + mes "That salt,"; + mes "hopefully you will deliver it safely to her . ."; + close; + Xmas7: + mes "[Snowysnow]"; + mes "^3355FF' The roughest salt in the world '^000000"; + mes "hopefully you will deliver it safely to her . ."; + close; + Xmas8: + mes "[Snowysnow]"; + mes "Boring Clown ' Hashokii '"; + mes "At first glance,he looks a dumb,"; + mes "doesn't have any talent for clown."; + mes "But....he is a mad of heart,"; + mes "always taking care of 2 orphans. . . . ."; + close; + Xmas9: + mes "[Snowysnow]"; + mes "' Charucharu ' the boy of optimism."; + mes "He will make a big shot in future . ."; + mes "Just like me ! -"; + mes "Hahahaha . . . . ."; + close; + Xmas10: + mes "[Snowysnow]"; + mes ". . . . . Thank you for listening to me so far."; + mes "I am mush appreciate you to try to understand me,"; + mes "even though you are a stranger here."; + next; + mes "[Snowysnow]"; + mes "Now you become the very one who knows me a lot"; + mes "than anyone else in this town."; + mes "Hahahaha....."; + mes "I want to give you some small present,"; + mes "in return."; + next; + mes "[Snowysnow]"; + mes "Tah dah~"; + mes "Pick up anything you want"; + mes "in here - !!"; + next; + mes "^3355FF- Stir the gift bag -^000000"; + next; +// choose snownow + +// case 1 +// set xmas_npc,1; +// getitem Candy,5; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 5 Candy -^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 2 +// set xmas_npc,1; +// getitem Candy,10; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 10 Candy -^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 3 +// set xmas_npc,1; +// getitem Candy_Striper,5; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 5 Candy Cane-^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 4 +// set xmas_npc,11; +// getitem Candy_Striper,10; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 10 Candy Cane-^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 5 +// set xmas_npc,1; +// getitem Piece_of_Cake,1; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 1 Piece_of_Cake-^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 6 +// set xmas_npc,1; +// getitem Piece_of_Cake,2; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 2 Piece_of_Cake-^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 7 +// set xmas_npc,11; +// getitem Well_baked_Cookie,5; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 5 Cookie-^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; +// case 8 +// set xmas_npc,11; +// getitem Well_baked_Cookie,10; + mes "[Snowysnow]"; + mes "Wow -Congratulations!!"; + mes "^3355FF- 10 Cookie-^000000!"; + mes "Dear my friend,"; + mes "Please visit me from time to time,and take a chitchat with me."; + mes "See you soon -"; + mes "Merry Christmas!!"; + close; + Xmas11: + mes "[Snowysnow]"; + mes "Welcome dear my friend -"; + mes "You are always welcomed in this Christmas Town."; + mes "Especially by me, Snowysnow !"; + mes "Merry Christmas !!"; + close; + + XmasLess2: + mes "[Snowysnow]"; + mes "I am an artificial mortal . ."; + mes "Big Puppet of Snow made by human..."; + mes "I was born in a cold area..."; + mes "It's snowy all the time,"; + next; + mes "[Snowysnow]"; + mes "Always cold, so that it fits me perfectly..."; + mes "There... My hometown. The place much colder the Lutie . ."; + mes "I was really really happy to lead my life there."; + next; + mes "[Snowysnow]"; + mes "One day, some ugly old woman came by."; + mes "As far as I know, her name was ' Merlophechum '. . People said she was from a strange cave town where the weather is always hot."; + next; + mes "[Snowysnow]"; + mes "On 3rd night after she came.. she set my town on fire with frightenning magic."; + mes "Everybody including me was in horrible fear and chaos."; + next; + mes "[Snowysnow]"; + mes "I didn't notice how much time passed after that, I was here when I came to be concsious again."; + mes "Well, I can say this place is like heaven, = Lutie ="; + mes "Nobody's worried in here!"; + next; + mes "[Snowysnow]"; + mes "However I am so lonely without my friends in here - I mean it -"; + mes "Please be my friend."; + mes "I will be your friend, too."; + mes "Heh Heh Heh Heh . . . . ."; + close; + L1: + mes "[Snowysnow]"; + mes "Around this Christmas Town, there are Christmas Dungeon."; + mes "It is rumored it is welldecorated as Toy Factory Inside the Dungeon, so cute and pretty."; + mes "People say there are a lots of Toy Soldiers, and gift boxes, which man ever dreamed in his life."; + next; + mes "[Snowysnow]"; + mes "Aren't you getting exited with just one thought?!"; + mes "*Sigh I wish I could go there at lease once in my life time~."; + close; + LEnd: + mes "[Snowysnow]"; + mes "By bye buddy-"; + mes "Thank you for listening me~"; + mes "See you someday-"; + mes "You will be always with me!"; + close; +} + +xmas.gat,146,136,4 script Christmas Clown 715,{ + mes "[Hashokii]"; + mes "Meeee~RrrrrYYYY Christmas~!"; + mes "La La La~"; + mes "Dum di Dum di Dum"; + next; + menu "Yo Clown boy what's up?",L0,"About the Snowysnow",L1,"Quit conversation",LEnd; + + L0: + mes "[Hashokii]"; + mes "La La La~"; + mes "Dum di Dum di Dum"; + mes "Would you please leave me alone while I am thinking of the best show for my darling, Charu Charu and Marcell??"; + next; + mes "[Hashokii]"; + mes "They are getting smarter and witter day by day,"; + mes "Now it seems they don't laugh at my best joke any more..."; + mes "*sigh* I don't believe it what made them to be so smart in thier age..."; + mes "One of these days they won't be able to refuse my funny joke!!!"; + mes "I have to make myself get ready for that day!!"; + mes "La La La~"; + mes "Dum di Dum di Dum"; + mes "Merry Christmas"; + close; + L1: + if(xmas_npc==8) goto Xmas8; + mes "[Hashokii]"; + mes "Ah... - ^4040FF' Snowysnow '^000000?"; + mes "Of course I know him. If there is anyone who doesn't know Snowysnow, you can say that person is totally stranger in here."; + mes "Sometimes I have a conversation with him..."; + next; + mes "[Hashokii]"; + mes "He is a good audience for my show."; + mes "To be honost, I'm not sure he really likes my show or not..."; + mes "'Cause most of people don't care about my funny show..."; + mes "That's my problem!!"; + mes "How could they don't understand the best joke in the world!"; + next; + mes "[Hashokii]"; + mes "Hmmm sorry, anyway Snowysnow is kinda mysterious guy."; + mes "La La La~"; + mes "Dum di Dum di Dum"; + mes "Merry Christmas- !!"; + close; + + Xmas8: + mes "[Hashokii]"; + mes "Dum di Dum di Dum"; + mes "Ah ha ! Now I can assume you to hear of me from Snowysnow."; + mes "Ok ok you don't have to excuse more."; + mes "Well,after all it is nothing peculiar."; + next; + mes "[Hashokii]"; + mes "It's about two naughty kids,"; + mes "^3355FF' Charu Charu '^000000 and"; + mes "^3355FF' Marcell '^000000,they are regular customers of my show."; + mes "Did you heard about the incindent happened in the northland from Cantata by any chance?"; + next; + mes "[Hashokii]"; + mes ". . . . . Then I hope you will be able to easily remind of 2 babies,"; + mes "Who Snowysnow carried in bosom...whie his body's being melted down into the water."; + mes "Yes you're right."; + next; + mes "[Hashokii]"; + mes "Both babies were Charu Charu and Marcell."; + mes "They don't seem to know this truth between Snowysnow and them."; + mes "Snowysnow told me the story of them."; + mes "He let his body fly into the air to block the big giant fire ball rushing into 2 babies."; + next; + mes "[Hashokii]"; + mes "It means Snowysnow bestowed greatest favours onto Charu Charu and Marcell."; + mes "I can see you are quite interested in the story of Snowysnow,"; + mes "why don't you go meet those 2 children for your further information?"; + mes "They might tell you some story we've never got the chance to hear."; + mes "Ok then - Good Luck!"; + mes "Bye bye -"; + set xmas_npc,9; + close; + LEnd: + mes "[Hashokii]"; + mes "La La La~"; + mes "Dum di Dum di Dum"; + mes "Merry Christmas- "; + mes "Have a great day -"; + close; +} + +xmas.gat,176,236,4 script Uncle Hairy 712,{ + if(xmas_npc==4) goto Xmas4; + mes "[Cantata]"; + mes "Meeeerrrrrrryyyy Christmas !"; + mes "Welcome to the Christmas Town,young man!!"; + mes "Oh well,dude.You got a rosy cheek now...."; + mes "Yeah I understand Strangers can hardly bear this chilly weather,"; + mes "Well we can say you're freezing to death now!!!"; + next; + mes "[Cantata]"; + mes "Now you looks like ^3355FF' Ruddy-Cheek Dude '^000000,"; + mes "Muhahaha!"; + mes "Watch out,buddy,take care of yourself to not catch a cold."; + mes "You wouldn't survive if you caught a Christmas Town Flu."; + mes ". . . . ."; + next; + mes "[Cantata]"; + mes "Wah . Now it reminds me of my little sweetheart,"; + mes "He had a severe cold a while ago~"; + mes "By eveil destiny it was during the night and there's no place where I could get some medicine,"; + mes "it seemed to be beyond my power to save my baby that moment..."; + mes "I was deserate and ready for doing anything for my son..."; + next; + mes "[Cantata]"; + mes "I thought at least my son needed a little lump of ice for cooling down his fever."; + mes "By consequences,I intruded into the Christmas dungeon without any goal in mind."; + mes "And then,...Oh my holy mother god...Inside there,"; + mes "I encountered the creature I wanted,it was a certain creature made out of ice,"; + mes "That dude's name was ^3355FF' Iceporing '^000000 !"; + mes "Local people used to call it ' Icepantzering '"; + next; + mes "[Cantata]"; + mes "Anyway it aided my baby to cool down superheat."; + mes "I thank god to make me such convenience town.Ha!Ha!Ha!"; + mes "Oops,I talked too much."; + mes "May God lead you in heaven on earth!"; + close; + + Xmas4: +// if(((countitem("Chinese_Ink")>0) && (countitem("Sticky_Mucus")>0))) goto XmasL0; + mes "[Cantata]"; + mes "Oh yeah ? Did you hear of me from ' Poze ',didn't you?"; + mes "Haw Haw Haw ! ! Yeah - Yeah"; + mes "I know him a little bit . ."; + mes "To be honest,you can say I'm his weak point!"; + mes "'Cause I know the secret of ^3355FF' Snowysnow's birth '^000000!!"; + next; + mes "[Cantata]"; + mes "Wonder ?"; + mes "Giggle Giggle Giggle . Yeah - I can see you now..."; + mes "However! I don't think I let you get it with nothing -"; + mes "Hmm oh yeah....I am really thirsty now -"; + mes "Bring me..................."; + mes "^3355FF'1 Squid Ink '^000000 and ^3355FF' 1 Sticky Muscus '^000000!!!"; + next; + mes "[Cantata]"; + mes "Wahhahaha! What the hell is it on your face !"; + mes "Don't mind my apetite,but mind your own business,Dumb Head."; + mes "Hurry up,work it on!!!"; + mes "Otherwise you won't get what you want from me!"; + mes "Giggle giggle giggle"; + close; + + XmasL0: + mes "[Cantata]"; + mes "Oh ?! Giggle Giggle Giggle !!"; + mes "I can feel you are a reliable person -"; + mes "Gooooooood -"; + mes "Ok,get some drink first . ."; + next; +// delitem "Chinese_Ink",1; +// delitem "Sticky_Mucus",1; + mes "^3355FF- Handed him Squid Ink and -^000000"; + mes "^3355FF- Sticky Muscus. -^000000"; + next; + mes "[Cantata]"; + mes "Burrrrpppp - Ok now !"; + mes "Well ..now it's the time for my story..."; + mes "Keep in mind this is whole story at least I know,"; + mes "I am not sure how much you heard about this though . ."; + next; + mes "[Cantata]"; + mes "Long long time ago,there was a great Alchemist living in the Far northland."; + mes "His name was"; + mes "^3355FF' Philip Varsez '^000000 !!"; + next; + mes "[Cantata]"; + mes "He was eager to keep beyond the bounds of new alchemy,"; + mes "and new alchemy needed rare materials to be accomplished as he wanted."; + mes "So he decided to go travel all over the world to look for items possessing Strong Magic Force within."; + mes "Eventually he arrived at a village of freezing weather,somewhere at north-"; + next; + mes "[Cantata]"; + mes "As immediately came inside the village he encountered a grim scene,"; + mes "Everything was destoryed into pieces. .there was nothing exception."; + mes "People groaned and moaned in pain,and were dying..."; + mes "It was the worst scene he'd ever had -"; + next; + mes "[Cantata]"; + mes "In the meantiem,suddenly something strange forced him to be brought the attention to it."; + mes "That strange thing was a snowman melted down into the water..."; + mes "^3355FF' Snowysnow '^000000!"; + mes "Evenmore it carried 2 crying babies in bosom."; + mes "So great alchemist could assumed"; + mes "the snowman sacficed itself to protect them from a great danger by guesswork."; + mes "[Cantata]"; + mes "It touched Mr. Alchemist, let him save the life of snowman with his great power of alchemy."; + mes "And let him transport that snowman to Lutie,this Christmas Town,the safest place in this world."; + next; + mes "[Cantata]"; + mes "Some time later,people started to say about the rumor -"; + mes "the most reason Snowysnow could save its life,beside of mercy from Alchemist,"; + mes "was its original structure material,the snow."; + mes "The truth is,Snowysnow was made out of snow covering up the mysterious filed,"; + mes "where Magical flowers,plants grows thick all over around."; + next; + mes "[Cantata]"; + mes "Muhahaha -"; + mes "Alrighty then - It's the whole story I've ever known."; + mes "How about you now?Did my story satisfy you?"; + mes "Haw Haw Haw!!"; + next; + mes "[Cantata]"; + mes "Oh well . ."; + mes "Now I regret to say,I have no idea aout the special ability of Snowysnow,"; + mes "that creates Christmas Present without limit...."; + mes "Hummm Sorry about that .."; + mes "By Hearsay"; + next; + mes "[Cantata]"; + mes " ^3355FF' Thachentze '^000000 the excellent pickle maker"; + mes "knows about it through and through..."; + mes "If you have a wonder,"; + mes "you'd better to go visit her -"; + mes "Alrighty,Merry Christmas !!"; + set xmas_npc,5; + close; +} + +xmas.gat,206,168,4 script Little Boy 706,{ + if(xmas_npc==9) goto Xmas9; + mes "[Charu Charu]"; + mes "Merry Merry Christmas!"; + mes "Heheheheheh"; + mes "See - See"; + mes "Did you talk to that clown guy over there?"; + mes "He is hella boring guy (-.-)."; + next; + mes "[Charu Charu]"; + mes "When Marcell and I look at his show,"; + mes "We feel like getting dumb and dumber~"; + next; + mes "[Marcell]"; + mes "Charu Charu!! Watch your mouth! How dare you say that to the poor guy?"; + mes "He always tries to make us happy !"; + next; + mes "[Charu Charu]"; + mes "Oh yes yes,cut it off~Whatsoever~"; + mes "I know that~!"; + mes "But he is not funny at all!"; + mes "I'd rather stay with ^3355FF' Snowysnow '^000000~"; + mes "We can have more fun though."; + next; + mes "[Charu Charu]"; + mes "Oh well,if you didn't visit Snowysnow yet,"; + mes "try that at least once . ."; + mes "He is quite a funny guy."; + next; + mes "[Charu Charu]"; + mes "Merry Christmas!"; + mes "Enjoy your Holiday in the Christmas Town~!"; + close; + + Xmas9: + mes "[Charu Charu]"; + mes "Errr ? Snowysnow?"; + mes "Hmmm - Let me see....A nice snowman..."; + mes "You want to know about Snowysnow...."; + mes "Is this what you want? Ummm let me see again . ."; + mes "Argh - I am not that smart . . . . ."; + mes "Better ask of Marcell though !"; + close; +} + +xmas.gat,208,168,4 script Little Girl 703,{ + if(xmas_npc==10) goto Xmas10; + if(xmas_npc==9) goto Xmas9a; + mes "[Marcell]"; + mes "Merry Christmas"; + mes "Ouch.. It's freezing out here... "; + mes "Charu Charu make me colder with his unbearable joke..."; + mes "Wind's blowing so hard!!!"; + mes "Ouch - - - - -"; + next; + mes "[Marcell]"; + mes "I am not sure this is a rumor or true,"; + mes "Snowysnow has been rumored to possess"; + mes "some kind of special ability within."; + mes "Have you ever had a chance to look nemerous presents"; + next; + mes "[Marcell]"; + mes "boundlessly coming out from Santa Claus's Bag?"; + mes "People say he can make presents as many as he wants."; + mes "Wow - Isn't it great ?"; + mes "*pitapat**pitapat* . . . . ."; + next; + mes "[Marcell]"; + mes "Huh? What's that stupid look on your face?"; + mes "I don't think you understand what he can do."; + mes "Snowysnow hides a Big gift bag inside his body,"; + mes "There are numerous gifts within the bag."; + mes "Every towner who got close to Snowysnow has great exoperience"; + mes "to be given some nice Christmas present from him.."; + mes "Isn't it amazing ?"; + close; + + Xmas9a: + mes "[Marcell]"; + mes "You mean Snowysnow?"; + mes "Of course I know . ."; + mes "He is nice and funny guy."; + mes "As Charu Charu always insists,"; + mes "He is better than Hashokii-"; + mes "(But please don't tell it to Hashokii~)"; + next; + mes "[Marcell]"; + mes "Charu Charu and I am Orphans."; + mes "We don't remember our parents at all."; + mes "We've been brought up in hands of people in here,"; + mes "including Uncle Cantata and Auntie Thachentze."; + next; + mes "[Marcell]"; + mes "They are all nice and generous,"; + mes "we always apprecite all of them to take care of us."; + mes "By the way I heard Snowysnow doesn't have dad and mommy either."; + mes "And I also heard Snowysnow and we were not born in the Christmas Town."; + next; + mes "[Marcell]"; + mes "There is a rumor around that says Snowysnow and we flew away from somewhere else."; + mes "I am not actually sure about that but,"; + mes "at least surely I know Snowysnow and we have similar types of burn on our body."; + mes "Charu Charu and I have it on the back,"; + next; + mes "[Marcell]"; + mes "Snowysnow has a dark smudge on the tummy."; + mes "It makes me feel we tied up together..."; + next; + mes "[Marcell]"; + mes "Oh?Now I see . . . . ."; + mes "You became the one who knows things about Snowysnow much more than anyone else in this town."; + mes "Please try to talk to Mr.Snowysnow."; + mes "Probably he will be really delighted that you take interests in him,"; + mes "and you will be able to get somre present from him."; + mes "I wish you luck -"; + mes "Merry Christmas !!"; + set xmas_npc,1; + close; + Xmas10: + mes "[Marcell]"; + mes "You became the one who knows things about Snowysnow much more than anyone else in this town."; + mes "Please try to talk to Mr.Snowysnow."; + mes "Probably he will be really delighted that you take interests in him,"; + mes "and you will be able to get somre present from him."; + mes "I wish you luck -"; + mes "Merry Christmas !!"; + close; +} diff --git a/npc/cities/morocc.txt b/npc/cities/morocc.txt new file mode 100644 index 000000000..a24488f7e --- /dev/null +++ b/npc/cities/morocc.txt @@ -0,0 +1,557 @@ +//===== eAthena Script ======================================= +//= Morroc Town +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.3b +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= Fixed Lapidary sprite, Implemented ANTHELL trigger +//= (in both NPC/Warps) [Lupus]. Removed it from NPC and put in Warp +//= 1.3 Removed some NPC due to Assassin Job Quest [kobra_k88] +//= 1.3b mobs name corrected [Lupus] +//============================================================ + + +//==================================================== Town of Morroc ====================================================\\ + +// Old Scholar =============================== +morocc_in.gat,112,122,2 script Old Scholar 61,{ + mes "[Old Scholar]"; + mes "I've devoted my Life to researching the Pyramids. Although I not found anything significant yet, I am confindent that I will find the Tomb of Ancient King, Osiris!"; + next; + mes "[Old Scholar]"; + mes "It is within the largest of the Morroc Pyramids, that the Greatest King in History sleeps the eternal sleep. That is... if my memory serves me correctly......"; + close; +} + +// Drunk Man ================================= +morocc.gat,44,180,8 script Drunk Man 89,{ + mes "[Drunk Man]"; + mes "Heh Heh... (Hiccup)! Oh, Are you new here? Nice to meet ya, Buddy! So how was your trip?"; + mes "This was predestined that you and I meet here, I tell you what (Hiccup). Let me tell you something I just heard from the pub...."; + next; + mes "[Drunk Man]"; + mes "It's rumored that there is a special Dagger that can bring great fortune to its owner."; + mes "There is a well-know Thief in Rune-Midgard that possesses this Dagger, and has never been caught"; + next; + mes "[Drunk Man]"; + mes "What I would give to get my hands something like that(Hiccup). But only in my dreams...."; + next; + mes "[Drunk Man]"; + mes "How about you? Why don't you Look for it? It shouldn't be a problem for someone as brave as yourself?"; + mes "Kekeke keke(Hiccup)! Buy me a drink later if you ever find that dagger. Promise me, alright?(Hiccup!)"; + emotion 20; + close; +} + +// Towner ================================= +morocc.gat,68,260,8 script Towner 99,{ + mes "[Towner]"; + mes "Those giant, Triangular Buildings North West of town are called Pyramids... They have been there for thousands and thousands of years."; + next; + mes "[Towner]"; + mes "Nobody knows when and why they were built or who built them. All we know for sure is that there are tons of Horrendous Monsters inside of them."; + next; + mes "[Towner]"; + mes "I think you'd better stay away from them. The monsters in the Pyramid LOVE to feed on strangers. Kekekekek..."; + close; +} + +// Ant Man Akira ============================= +morocc.gat,76,75,4 script Ant Man Akira 47,{ + mes "[Ant Man Akira]"; + mes "About 1 map north and 3 maps east of Morroc, there lies the entrance to a cave known as ^ff0000ANTHELL^000000 ..."; +M_Menu: + next; + menu "'Anthell ?'",M_Anthell,"Ants?",M_Ants,"End conversation",M_End; + + M_Anthell: + mes "[Ant Man Akira]"; + mes "Anthell gets it's name from the fact that the cave is home to the largest colony of giant ants in Rune-Midgard."; + mes "There are litterally thousands of ants performing work for the colony while their queens lay hundreds and hundreds of eggs."; + next; + mes "[Ant Man Akira]"; + mes "Many people go there to traine because of the numerous amounts of ant eggs. But be carefull..."; + next; + mes "[Ant Man Akira]"; + mes "Attack an ant by mistake, and you'll find yourself surrounded by a swarm of them before you can even use a fly wing!"; + emotion 0; + goto M_Menu; + M_Ants: + mes "[Ant Man Akira]"; + mes "There are 3 different kinds of Ant, each with a unique color and name. Each one has a different role in the colony."; + mes "Andres are white, Pieres are green, and Deniros are red colored. Their differences are not merely cosmetic however."; + next; + mes "[Ant Man Akira]"; + mes "Andres are the weakest of the ants while Deniros are the most fiercesome of the ants. Pieres lay somewhere in the middle."; + next; + mes "[Ant Man Akira]"; + mes "Becarefull when your around them. If you hit 1 Andre the other Andres in the area with swarm and attack you."; + mes "The same goes for Deniros and Pieres. You should also know that ants are looters so watchout for your items."; + goto M_Menu; + M_End: + mes "[Ant Man Akira]"; + mes "Before you go, let me tell you about Giearths. They are not ants but they live in Anthell. Don't underestimate them because of their small size."; + mes "They are extremely tough and should only be handled by high level wariors."; + next; + mes "[Ant Man Akira]"; + mes "Well see ya around."; + close; +} + +// Poring Lady Syvia ================================== +morocc.gat,79,111,2 script Poring Lady Syvia 700,{ + mes "[Poring Lady Syvia]"; + mes "All over Rune-Midgard you can see lots of cute monsters such as Spores, the musroom type creature...."; + next; + mes "[Poring Lady Syvia]"; + mes "Or Pickys, desert chicks that wear egg shells on their heads and jump around in the Morrc Desert..!"; + mes "However you can't deny that the ^FF8888Poring^000000 is the cutest and most popular creature in all of Rune-Midgard."; + next; + mes "[Poring Lady Syvia]"; + mes "Although everybody knows about the common pink Poring, there are 2 Rare porings that live near Prontera and are getting a lot of attention."; + next; + mes "[Poring Lady Syvia]"; + mes "They are the ^ffaa00Angeling^000000 and the ^5555ffGhostring^000000"; +M_Menu: + next; + menu "Angeling?",M_Angel,"Ghostring?",M_Ghost,"Quit Conversation",M_Quit; + + M_Angel: + mes "[Poring Lady Syvia]"; + mes "The Angeling is a poring with angel wings. It is rarely seen but it is quite a sight. Don't not be fooled by it's angelic look however."; + mes "It is a high level monster armed with the Holy property. It is immune to almost all magic attacks except those of the neutral & shadow property."; + next; + mes "[Poring Lady Syvia]"; + mes "Physical attacks are definately the way to go against these monsters."; + next; + mes "[Poring Lady Syvia]"; + mes "Don't I know a lot about porings? Quite frankly I'm in love with them.... =P"; + goto M_Menu; + + M_Ghost: + mes "[Poring Lady Syvia]"; + mes "The Ghostring is an evil ghost poring. It is rarely seen and luckly so."; + next; + mes "[Poring Lady Syvia]"; + mes "It is a high-level monster armed with the ghost property. This makes it immume to physical attacks. So Archers, Swordsman, and Thieves beware!"; + mes "Only weapons with elemental properites will work on Ghostrings. Of course magic attacks work very well on them also."; + next; + mes "[Poring Lady Syvia]"; + mes "Don't I know a lot about porings? Quite frankly I'm in love with them.... =P"; + goto M_Menu; + + M_Quit: + mes "[Poring Lady Syvia]"; + mes "OMG!"; + emotion 23; + next; + mes "[Poring Lady Syvia]"; + mes "You dare dismiss a poring expert such as myself? I am proud of my knowledge about all things poring!!"; + next; + mes "[Poring Lady Syvia]"; + mes "Hmf!"; + emotion 32; + close; +} + +// Slayer Kid ==================================== +morocc.gat,123,58,4 script Slayer Kid 118,{ + mes "[Slayer Kid]"; + mes ".... An expert in hand to hand combat who polishes off enemies quickly and quietly...."; + next; + mes "[Slayer Kid]"; + mes "That is the ^ff00ffAssassin^000000!!"; +M_Menu: + next; + menu "Hmm??",M_0,"Where can I find the Assassin Clan?",M_1,"End conversation",M_End; + + M_0: + mes "[Slayer Kid]"; + mes "Assassins are a secretive group of elite killers. People say Assassins are highly trained in 'eliminating' their targets without leaving a trace."; + next; + mes "[Slayer Kid]"; + mes "It's been 3 months since I left home to search for the Assassin clan.... Just where are they??!!!"; + goto M_Menu; + M_1: + mes "[Slayer Kid]"; + mes "People say that if you go 2 maps on the east of Morroc, then 2 maps south, you'll be able to find the Assassin Clan."; + next; + mes "[Slayer Kid]"; + mes "If you are granted an Assassin Cross, the emblem of the clan master, you will be allowed to become an Assassin."; + mes "The Assassin Cross is a high honor and is given to the best Assassin among Assassins!"; + next; + mes "[Slayer Kid]"; + mes "To tell you the truth however... I don't think they the clan really exists..."; + next; + mes "[Slayer Kid]"; + mes "I've been searching for them for over 3 months now and nothing. It seems almost impossible for me to become an Assassin now......"; + goto M_Menu; + M_End: + close; + +} + +// Lapidary ======================================= +morocc.gat,150,50,8 script Lapidary 99,{ + mes "[Lapidary]"; + mes "The Queen of Jewelry is the Diamond. No one can deny its beautiful appearance. That's why it cost so much to buy..."; + next; + mes "[Lapidary]"; + mes "Many factors increase its value, with the most important factor being size."; + next; + mes "[Lapidary]"; + mes "A high quality Diamond should be perfect and not chipped or cracked in any way."; + close; +} + +// Uncle Dimitrii ========================================== +morocc.gat,180,155,4 script Uncle Dimitri 49,{ + mes "[Uncle Dimitrii]"; + mes "The avarage temperature in the Morroc Desert is many times higher than anywhere else in the Rune-Midgard Kingdom."; + next; + mes "[Uncle Dimitrii]"; + mes "Be carefull of where you choose to sit down and rest. Choose the wrong spot and your butt may catch on fire!!"; +M_Menu: + next; + menu "About the Desert sand",M_1,"About the remedy for Fatigue",M_2,"End conversation",M_End; + + M_1: + mes "[Uncle Dimitri]"; + mes ". . . . . Well"; + next; + mes "[Uncle Dimitri]"; + mes "It's SUPPOSED to be HOT!!! But it actually isn't really that hot....."; + next; + mes "[Uncle Dimitri]"; + mes "For some odd reason the sand in the Morroc desert doesn't conduct as much heat as the sand in other deserts."; + mes "Instead of being scorching hot, the sand just feels warm.... so it's ok for you to sit down for a good rest"; + next; + mes "[Uncle Dimitri]"; + mes "So everybody can recover their HP and SP without fear of catching on fire."; + goto M_Menu; + M_2: + mes "[Uncle Dimitri]"; + mes "Aaaaahhh!!!!"; + next; + mes "[Uncle Dimitri]"; + mes "Nothing beats desert fatigue like a couple of potions! The ^ff0000Red^000000 ones are especially populare because of their low cost and light weight."; + next; + mes "[Uncle Dimitri]"; + mes "They only recover a small amount of hp, but combined with a dip in a desert oasis, a couple ^ff0000Reds^000000 are all you need."; + goto M_Menu; + M_End: + mes "[Uncle Dimitri]"; + mes "Did you know that you can get ^0000bb'Milk'^000000 from a 'PecoPeco's Egg'? I wonder how that works......?"; + close; +} + +// Trader Joe ===================================== +morocc.gat,208,85,7 script Trader Joe 83,{ + mes "[Trader Joe]"; + mes "I earn a living as a Trader so I'm constantly traveling between Morroc and Prontera."; + mes "I can't even count how many times I've been across the Hot, Dry desert."; + next; + mes "[Trader Joe]"; + mes "One day, while I was out in the Desert, I unexpectedly ran out of water and became extremely thirsty."; + mes "I was desperate so I decided to try to get some water out of a cactus when......."; + next; + mes "[Trader Joe]"; + mes "ALL OF THE SUDDEN!!! The cactus let out this LOUD SCREAM and started to SHOOT its NEEDLES at me!!"; + emotion 23; + next; + mes "[Trader Joe]"; + mes "It was THE WORST experience of my ENTIRE LIFE."; + next; + mes "[Trader Joe]"; + mes "I figured out later that it wasn't a normal cactus that attacked me but it was ^00cc00Muka^000000, the cactus monster."; + next; + mes "[Trader Joe]"; + mes "So be carefull the next time you're out in the desert. You don't want to make the same mistake I made. (~Sigh~)"; + close; +} + +// Fly Man Armani =============================== +morocc.gat,234,273,3 script Fly Man Armani 54,{ + mes "[Fly Man Armani]"; + mes "I SAW IT!! I SAW IT!!!"; + emotion 5; + next; + mes "[Fly Man Armani]"; + mes "I saw the rare ^ff0000Dragon Fly^000000 just North of here! It was incredible!!"; + next; + menu "What... Dragon Fly?!",M_0,"So what?",M_1; + + M_0: + mes "[Fly Man Armani]"; + mes "It is the boss of desert flies and its much stronger than any other ordanary fly."; + mes "It's a rare sight to behold, and for anybody strong enough and lucky enough to defeat it.... "; + next; + mes "[Fly Man Armani]"; + mes "The Dragon Fly may even drop an UTLRA RARE item called a ^0000ddClip^000000!"; + mes "Clips are items that you can attach to weapons, armor, and almost everykind of accessory."; + next; + mes "[Fly Man Armani]"; + mes "Clips are ^ffaa00slotted^000000 and therefore you can insert cards into them. That's what makes them so valuable."; + mes "It seems like everyone is yearning for a clip these days."; + next; + mes "[Fly Man Armani]"; + mes "Say.... why don't YOU challenge the Dragon Fly?"; + emotion 20; + close; + M_1: + mes "[Fly Man Armani]"; + mes "SO WHAT!!??"; + emotion 23; + next; + mes "[Fly Man Armani]"; + mes "Do you dare underestimate the Dragon Fly?? Bleh! It may be a fly, but I gaurantee you THIS FLY is more than you can handle!"; + emotion 32; + next; + mes "[Fly Man Armani]"; + mes "No matter. If you ARE fortunate enough to run into it, you'll quickly see what I mean. Afterall, it IS the FLY of ALL FLIES!!!!"; + next; + mes "[Fly Man Armani]"; + mes "^ff0000Dragon Fly^000000. Remeber this name well!!"; + close; +} + +// Uncle Phlanette ================================ +morocc.gat,277,213,4 script Uncle Phlanette 48,{ + mes "[Uncle Phlanette]"; + mes "Morroc is a highly dry region surrounded by desert. There isn't a place as hot or dry as Morroc anywhere in Rune-Midgard."; +M_Menu: + next; + menu "Desert Story",M_0,"Quit Coversation",M_End; + + M_0: + mes "[Uncle Phlanette]"; + mes "Let me tell you a little about the desert....."; + next; + mes "[Uncle Phlanette]"; + mes "You see the desert is a place that is bare of vegetation due to low rainfall and a high evaporation rate."; + mes "Even so there are plants that seem to thrive in the desert. And where there are plants, there are animals."; + next; + mes "[Uncle Phlanette]"; + mes "So even with the high temperatutres, and limited water, living creatures still find a way to survive in the desert."; + next; + mes "[Uncle Phlanette]"; + mes "Unfortunately, for unkown reasons, some of the plants and animals in the desert have turned into dangerous monsters."; + mes "The ^00cc00'Mukas'^000000 are one of those mosters. They were originaly cactus plants."; + goto M_Menu; + M_End: + mes "[Uncle Phlanette]"; + mes "Sand HERE! Sand THERE! Sand EVERYWHERE!!!!"; + emotion 0; + next; + mes "[Uncle Phlanette]"; + mes "(~Sigh~) I'm SICK and TIRED of this sand and desert..."; + next; + mes "[Uncle Phlantette]"; + mes "Morroc......!! I HATE YOU!!!!!!"; + emotion 32; + close; +} + +// ZAKA ============================================ +morocc.gat,203,30,4 script ZAKA 99,{ + if(comodo_npc == 17) goto cmd_npc17; + if(comodo_npc == 18) goto cmd_npc18; + if(comodo_npc == 19) goto cmd_npc19; + if(comodo_npc == 20) goto cmd_npc20; + if(comodo_npc == 21) goto cmd_npc21; + if(comodo_npc == 22) goto cmd_npc22; + + mes "[ZAKA]"; + mes "...... The sun sets over another day. The moon rises to take it's nightly place."; + mes "As darkness creeps across the desert, the people of Morroc huddle together."; + mes "The never ending well is the life blood of the wandering nomads..... This is Morroc...."; + next; + mes "[ZAKA]"; + mes "Eh hem.... Say... Have you ever heard of the ^FF4444Doomed Swords^000000, or ^5555FFSwords of Power^000000?"; + mes "It is believed that these swords are so powerful that whoever weilds them could rule the world!"; + next; + mes "[ZAKA]"; + mes "The three swords I speak of are the ^5555FFMysteltainn, Ogre Tooth, and Executioner^000000."; + next; + mes "[ZAKA]"; + mes "These swords are hidden somewhere in this world.... have you seen any?"; + close; + + cmd_npc17: + mes "[ZAKA]"; + mes ". . . . ."; + next; + mes "[ZAKA]"; + mes "! ! ! ! ! ! !"; + next; + mes "[ZAKA]"; + mes "Isn't that ?! That tablet?!"; + mes "^3355FF`Tablet of Power'^000000"; + mes "Right?!"; + mes "Wha ! !"; + next; + mes "[ZAKA]"; + mes "Who are you? Why do you possess the 'Tablet of Power'?"; + mes "Bah, nevermind, it doesn't matter who you are."; + mes "Whoever possesses the 'Tablet of Power' is a natural-born leader."; + next; + mes "[ZAKA]"; + mes "Well, we are one of the wanderers of Morroc."; + mes "It is tradition and duty to make the possessor of^3355FF` Tablet of Power '^000000"; + mes "a ^3355FF`Book of the Tiresome Sheep'^000000"; + next; + mes "[ZAKA]"; + mes "I will craft you a 'Book of the Tiresome Sheep', only for your personal use."; + mes "As you might have expected, I will need various ingredients to make you the book."; + next; + mes "[ZAKA]"; + mes "The first thing will need are two ^3355FF`Snake Scale'^000000 , please bring them to me."; + set comodo_npc,18; + close; + cmd_npc18: + if(countitem(926) > 1) goto SoS; + mes "[ZAKA]"; + mes "If you want the 'Book of the Tiresome Sheep', I will need two pieces of snake scales."; + close; + + SoS: + mes "Gives Zaka two^3355FF`Scales of Snakes'^000000"; + delitem 926,2; + set comodo_npc,19; + next; + mes "[ZAKA]"; + mes "Now I can construct the basic layout of the book witht the snake scales, but I now need 1 piece of"; + mes "^3355FF`Scale Shell'^000000 in order to block only negative energies from the book."; + close; + cmd_npc19: + if(countitem(936) > 0) goto ScSh; + mes "[ZAKA]"; + mes "Please bring me the next ingredient needed for the 'Book of the Tiresome Sheep', I will need one"; + mes "^3355FF`Scale Shell'^000000 ??"; + mes ". . . . ."; + close; + + ScSh: + mes "Gives^3355FF`Scale Shell^000000"; + mes "to Zaka"; + delitem 936,1; + set comodo_npc,20; + next; + mes "[ZAKA]"; + mes "Alright, good."; + mes "Next, I will need one piece of ^3355FF`Shining Scale'^000000 in order to distribute the magical power equally throughout the book."; + next; + mes "[ZAKA]"; + mes "While you are getting the scale, I will continue to the next phase of crafting, good luck."; + close; + cmd_npc20: + if(countitem(954) > 0) goto ShSc; + mes "[ZAKA]"; + mes "In order to finish crafting the 'Book of the Tiresome Sheep', I will need you to gather me one piece of ^3355FF`Shining Scale'^000000, okay?"; + close; + + ShSc: + mes "Gives^3355FF`Shining Scale'^000000"; + mes "to Zaka"; + delitem 954,1; + set comodo_npc,21; + next; + mes "[ZAKA]"; + mes "Great job!"; + mes "Finally, the last ingredient I need is one ^3355FF`Stinky Scale'^000000 to complete the book, please bring it to me"; + close; + cmd_npc21: + if(countitem(959) > 0) goto RoSc; + mes "[ZAKA]"; + mes "All I need to craft the 'Book of the Tiresome Sheep' is one piece of stinky scale now, please bring one to me."; + close; + + RoSc: + mes "Gives^3355FF`Stinky Scale'^000000"; + mes "to Zaka"; + delitem 959,1; + next; + mes "[ZAKA]"; + mes "Ooo. this is all I need to finish up the book, thank you."; + next; + mes "^3355FF-Zaka is working hard in-^000000"; + mes "^3355FF-finalizing the book-^000000"; + next; + mes "^3355FF- You receive the Book of-^000000"; + mes "^3355FF- the Tiresome Sheep from Zaka-^000000"; + set comodo_npc,22; + next; + mes "[ZAKA]"; + mes "There, that's for you.."; + mes "I guess you have the required items to summon and use the Doomed Swords."; + mes "But if you are really going to use the Doomed Swords please go talk to Won, a wandering swordsman, he might have some important advice."; + next; + mes "[ZAKA]"; + mes "Legend has it that Won's sword fighting skills is already at god-like level, and he is also one of the ten most influential people in the world."; + next; + mes "[Zaka]"; + mes "Right now, he might be training inside Comodo Town, so you might be able to find him there."; + close; + cmd_npc22: + mes "[ZAKA]"; + mes "The wandering swordsman ^3355FF`Won'^000000"; + mes "should be training somwhere in Comodo, look for him very carefully."; + close; +} + +//<================================================== Assassin Guild ====================================================>\\ + +// Hashisid ==================================== +moc_fild16.gat,199,212,4 script Hashisid 48,{ + mes "[Hashisid]"; + mes "For Assassins, it is important not to look a target in the eye. If a target is smart, he/she may be able to tell what you're up too."; + next; + menu "About Assassins",M_0,"Quit Conversation",M_End; + + M_0: + mes "[Hashisid]"; + mes "Let me tell you a little bit about Assassins"; + next; + mes "[Hashisid]"; + mes "Assassin's are hired to infiltrate, gather intellegence, and even commit murder without being seen or heard."; + mes "Stealth and speed are vital to Assassins. Assassins live in the shadows and never get praise or congratulations."; + next; + mes "[Hashisid]"; + mes "It's their job to go unoticed. Though an Assassin may seem like a cruel and heartless individual...."; + mes "An Assassin will never do any harm to an innocent being. The main purpose of the Assassin to seek out and destroy evil forces!"; + close; + M_End: + close; +} + +//================================================== +// Assassin Guild Guards +//=================================================== + +moc_fild16.gat,195,281,4 script Assassin Guardian#1::SinGuard 707, +{ + mes "[Assassin Guardian]"; + if(Class == Job_Assassin) mes "Welcome."; + if(Class == Job_Assassin) close; + + set @temp, rand(1,4); + if(@temp == 1) mes "........"; + if(@temp == 2) mes "Hmmm.........."; + if(@temp == 3) mes "Hmmm... you shouldn't be here....."; + if(@temp == 4) mes "You're trespassing on forbidden grounds......."; + close; +} + +moc_fild16.gat,204,281,4 duplicate(SinGuard) Assassin Guardian#2 707 +moc_fild16.gat,207,281,4 duplicate(SinGuard) Assassin Guardian#3 707 +moc_fild16.gat,216,281,4 duplicate(SinGuard) Assassin Guardian#4 707 +moc_fild16.gat,200,231,4 duplicate(SinGuard) Assassin Guardian#5 707 +moc_fild16.gat,211,231,4 duplicate(SinGuard) Assassin Guardian#6 707 +moc_fild16.gat,200,257,4 duplicate(SinGuard) Assassin Guardian#7 707 +moc_fild16.gat,211,257,4 duplicate(SinGuard) Assassin Guardian#8 707 diff --git a/npc/cities/niflheim.txt b/npc/cities/niflheim.txt new file mode 100644 index 000000000..0dbe2f98e --- /dev/null +++ b/npc/cities/niflheim.txt @@ -0,0 +1,534 @@ +//===== eAthena Script ======================================= +//= Niflheim Script +//===== By: ================================================== +//= Fyrien, Dizzy, PKGINGO +//= Official NPCs translated and re-edited by Celest +//===== Current Version: ===================================== +//= 1.03 +//===== Compatible With: ===================================== +//= Any eAthena Version; Niflheim Required +//===== Description: ========================================= +//= Official NPC's for Niflheim +//= 1.01 Splitted file(guides, shops). Fixed rand() bugs, +//= missing labels bugs, optimization [Lupus] +//= 1.03 fixed end; -> close; +//============================================================ + +prontera.gat,164,161,4 script Traveler 68,{ + mes "[Traveler]"; + mes "I've come across some strange things in my time. Things you'd have to see to belive. Have you heard of Niffleheim, the City of the Dead?"; + next; + menu "Show me, please...",M_show, "Sounds scarey...Nevermind...",-; + + mes "[Traveler]"; + mes "A wise choice by any means..."; + close; +M_show: + warp "niflheim.gat",202,171; + close; +} + +niflheim.gat,52,174,3 script Kirz 796,{ + mes "[Kirz]"; + mes "Humans are not allowed here!"; + mes "Living things-! are not"; + mes "allowed to pass!"; + close; +} + +niflheim.gat,213,221,0 script Spirit::spirits 802,{ + mes "[Spirit]"; + mes "Welcome to my world..."; + mes "This land we call...."; + mes "Niflheim...."; + percentheal -85,-85; + close; +} + +niflheim.gat,39,146,0 duplicate(spirits) Spirit#2 802 +niflheim.gat,95,61,0 duplicate(spirits) Spirit#3 802 +niflheim.gat,313,187,0 duplicate(spirits) Spirit#4 802 +niflheim.gat,212,264,0 duplicate(spirits) Spirit#5 802 +niflheim.gat,247,72,0 duplicate(spirits) Spirit#6 802 +niflheim.gat,130,176,0 duplicate(spirits) Spirit#7 802 +niflheim.gat,173,110,0 duplicate(spirits) Spirit#8 802 +niflheim.gat,182,167,0 duplicate(spirits) Spirit#9 802 + +niflheim.gat,184,199,5 script Little Girl 793,{ + mes "[Sairin]"; + if(niflheimlost2 == 1) goto L_thanks; + if(niflheimlost == 1) goto L_foundhim; + if(lostgirl == 1) goto L_sure2; + mes "Sir, will you please help me?"; + next; + menu "Yes",-, "No",M_no; + + mes "[Sairin]"; + mes "My friend and I went for a hike and ended up wandering into a strange field."; + next; + mes "[Sairin]"; + mes "Suddenly, I found a doll. I picked it up, and it turned into a ghost!"; + next; + mes "[Sairin]"; + mes "I screamed and ran as fast as I could. When I stopped running, I ended up in this strange town.."; + next; + mes "[Sairin]"; + mes "No one here will help me, and there are ghosts everywhere! Could you help me find my friend?"; + next; + menu "Sure",-, "No",M_no; +L_sure2: + set lostgirl,1; + mes "Please find him and tell him where I am! I saw him last in Niflheim Field, the first one..."; + close; + +L_foundhim: + mes "You found him?"; + mes "Oh thank you!"; + mes "Please, take this as a token of my appreciation."; + getitem 642,1; + set niflheimlost2,1; + close; +L_thanks: + mes "Thanks again!"; +M_no: + close; +} + +nif_fild01.gat,213,268,5 script Little Boy 797,{ + mes "[Marius]"; + if(niflheimlost == 1) goto L_alreadydone; + if(lostgirl == 1) goto L_sure2; + mes "Sairin...where are you?"; + close; +L_alreadydone: + mes "Thank you for helping us!"; + close; +L_sure2: + mes "Who are you?"; + mes "..."; + mes "You found Sairin?"; + mes "She ran to Niflheim?"; + next; + set niflheimlost,1; + mes "[Marius]"; + mes "Could you tell her that I am on my way?"; + mes "I am a little slow, and its very important that she knows."; + menu "Yes",L_alreadydone, "No",-; + + close; +} + +niflheim.gat,195,211,5 script Gigantia 796,{ + mes "[Gigantia]"; + mes "The Lord of Death always sees everything..."; + close; +} + +niflheim.gat,153,215,3 script Feline 794,{ + mes "[Feline]"; + mes "Why are you in this dangerous village?"; + mes "Better go back fast..."; + close; +} + +nif_in.gat,16,27,1 script Dead Cock 800,{ + mes "[Dead Cock]"; + mes "I was eaten by humans when alive,"; + mes "now it's my turn to eat you! Gugugugu~"; + mes "Aaah, i can't believe there's such a world after death, gugugu"; + percentheal -5,0; + close; +} + +nif_in.gat,16,30,4 script Vampire Bat 799,{ + mes "[Vampire Bat]"; + mes "Alive or dead, human blood"; + mes "is always the tastiest!"; + mes "What? You want your blood"; + mes "to be sucked by me? Nice nice-!"; + percentheal -5,0; + close; +} + +nif_in.gat,156,93,5 script Child 793,{ + mes "[Anne]"; + mes "Where, is this place? I just woke up"; + mes "and found myself here... mommy..."; + mes "have you seen my mommy, hmm? ... sob..."; + mes "I want to go home..."; + next; + menu "About the witch...",L_Wizzard,"About the curse...",L_Curse,"Stop conversation",L_end; + +L_Wizzard: + mes "[Anne]"; + mes "A witch? I don't know any witches..."; + mes "although i read about them in storybooks,"; + mes "but i don't know if they're real or not,"; + mes "must be really scary if she is real..."; + next; + mes "[Anne]"; + mes "But why is it so cold?"; + if (sex == 1) mes "Aren't you cold, brother? Wierd... Hu~"; + if (sex == 0) mes "Aren't you cold, sister? Wierd... Hu~"; + mes "I miss my warm home,"; + mes "Can you help me please? Hmmm? Hmmm?"; + close; + +L_Curse: + mes "[Anne]"; + mes "Curse... My grandma told me"; + mes "she has a way to avoid any curse"; + mes "unlifteable by holy blessings..."; + next; + mes "[Anne]"; + mes "Klaatu..."; + mes "Verata....."; + mes "And... something... something... what was it?"; + mes "I can't remember the last one."; + next; + mes "[Anne]"; + mes "She said if you can pronounce these magic words"; + mes "to escape a cursed fate."; + mes "Now i can't remember what she said was important..."; + mes "looks like i forgot them too."; + close; + +L_end: + mes "[Anne]"; + mes "So cold... so cold... i wish i could"; + mes "go home... if you can please take me with you..."; + mes "it's too scary here..."; + mes "please.... help me...."; + close; +} + +niflheim.gat,350,258,5 script Cursed Soul 802,{ + killmonster "niflheim.gat","mymob"; + mes "[Aesop Bruce]"; + mes "I feel a strong curse on youaaaahhhhh"; + mes "I shall deny your existanceahhhhhhh"; + mes "Turn back or you will dieeeaaaahhhh"; + mes "Don't touch my boookkssaaaahhhh"; + next; + menu "Pick up 1st book",L_book1,"Pick up 2nd book",L_book2,"Pick up 3rd book",L_book3,"Leave silently",L_back; + +L_book1: + mes "[Aesop]"; + mes "Don't you touch my bookssssahhh!!"; + mes "Ahahaha, i curse you for being bitten, torn and clawed at!!"; + mes "Forever binded to this curse!!"; + monster "niflheim.gat",350,258,"Rideword",1478,1,"mymob"; + close; + +L_book2: + mes "[Aesop Bruce]"; + mes "I said don't touch my booksssahhh..."; + mes "Get lost...."; + mes "Don't disrupt my restingggaaahh!!"; + warp "niflheim.gat",34,162; + close; + +L_book3: + set nif_t,0; + set nif_random1,rand(1,10); + mes "[Aesop Bruce]"; + mes "Ahahaha.... i see you are brave!!"; + mes "Start reading your prayersahahahah!!"; + next; +L_MENU1: + menu "Clover.",L_MENU1_1,"Klaatu.",L_MENU1_2,"Kleitos.",L_MENU1_3; + + L_MENU1_1: + goto L_MENU2; + + L_MENU1_2: + set nif_t,nif_t + 10; + goto L_MENU2; + + L_MENU1_3: + goto L_MENU2; + +L_MENU2: + menu "Verit.",L_MENU2_1,"Veritas.",L_MENU2_2,"Verata.",L_MENU2_3; + + L_MENU2_1: + goto L_MENU3; + + L_MENU2_2: + goto L_MENU3; + + L_MENU2_3: + set nif_t,nif_t + 10; + goto L_MENU3; + +L_MENU3: + menu "Necktie.",L_MENU3_1,"Necklace.",L_MENU3_2,"Nero.",L_MENU3_3,"^FFFFFFNictu.^000000",L_MENU3_4; + + L_MENU3_1: + goto L_score; + + L_MENU3_2: + goto L_score; + + L_MENU3_3: + goto L_score; + + L_MENU3_4: + set nif_t,nif_t + 10; + goto L_score; + + +L_score: + if (nif_t == 30) goto L_sucess1; + mes "[Aesop Bruce]"; + mes "Hahahaha!! Your prayers were wrong!!"; + mes "Time to face deathohohohoho,"; + mes "May you be cured forevahahahaha!!"; + monster "niflheim.gat",349,256,"Orc Skeleton",1462,1,"mymob"; + monster "niflheim.gat",347,258,"Orc Skeleton",1462,1,"mymob"; + monster "niflheim.gat",347,254,"Orc Skeleton",1462,1,"mymob"; + monster "niflheim.gat",350,252,"Orc Skeleton",1462,1,"mymob"; + monster "niflheim.gat",344,255,"Orc Skeleton",1462,1,"mymob"; + monster "niflheim.gat",348,252,"Orc Skeleton",1462,1,"mymob"; + monster "niflheim.gat",347,259,"Orc Skeleton",1462,1,"mymob"; + close; + +L_sucess1: + if (nif_random1 == 10) goto L_sucess2; + mes "[Aesop Bruce]"; + mes "Your prayers were correctaaahhhh..."; + mes "but your curse still remainsaaahhhh!!"; + mes "Haahahahaha.....!!!"; + close; + +L_sucess2: + mes "[Aesop Bruce]"; + mes "Hahahaha!! Your curse has been lifted!!"; + mes "Gahahahaha.....!!!"; + close; + +L_back: + mes "[Aesop Bruce]"; + mes "Ahahahaha! Not bad thinking at alllhhhaahaaa..."; + mes "I shall pray that you live to returnahhhh...."; + close; +} + +niflheim.gat,224,243,3 script Alager 795,{ + mes "[Alager]"; + mes "Muahaha, i love to eat meat..."; + mes "You look... delicious!"; + next; + mes "[Alager]"; + mes "I'm going to eat you..."; + next; + mes "-Chomp bite slurp-"; + if (nif_quest1 == 1) goto L_end; + percentheal -60,0; + next; + mes "[Alager]"; + mes "Ahhh, it's been some time since i had such delicious meat!"; + // 50% made up, not the slightest idea how to translate these ^^; + mes "as an ex-barbeque chef, my favourite meat"; + mes "would be like preparing beef fillet,"; + mes "crossed and grilled to perfection"; + mes "that would be really delicious... "; + next; + mes "[Alager]"; + mes "Ah, let me thank you with this,"; + mes "I found it on the ground, hoho~"; + getitem 7184,1; + set nif_quest1, 1; + close; +L_end: + percentheal -30,0; + close; +} + +nif_in.gat,105,81,3 script Grey 794,{ + mes "[Grey]"; + mes "Ah, there was this poem..."; + mes "in which author and time of writing was unknown,"; + mes "and has been circulating since long ago..."; + next; + mes "[Grey]"; + mes "^FF0000When the sun sets in the western hills,^000000"; + mes "^FF0000Where points the velvet gloom of dawn,^000000"; + mes "^FF0000The beautiful melody surrounding thy soul,^000000"; + mes "^FF0000Is the key from Lord Death's wrath.^000000"; + next; + if (nif_quest2 == 1) goto L_end; + set nif_random,rand(1,4); + mes "[Grey]"; + mes "Heh, let me give you a little exam!"; + mes "Repeat line no. " + nif_random + " of the poem"; + mes "that you have just heard to me!"; + next; + input @inputstr1$; + if (nif_random == 2) goto L_RAN_2; + if (nif_random == 3) goto L_RAN_3; + if (nif_random == 4) goto L_RAN_4; + //if (nif_random == 1) goto L_RAN_1; + L_RAN_1: + set @str1$,"When the sun sets in the western hills,"; + goto L_RAN_B; + + L_RAN_2: + set @str1$,"Where points the velvet gloom of dawn,"; + goto L_RAN_B; + + L_RAN_3: + set @str1$,"The beautiful melody surrounding thy soul,"; + goto L_RAN_B; + + L_RAN_4: + set @str1$,"Is the key from Lord Death's wrath."; + goto L_RAN_B; + + L_RAN_B: + if (@inputstr1$ == @str1$) goto L_RAN_SC; + mes "[Grey]"; + mes "Aih... If you had paid more attention,"; + mes "you would have known the correct answer!"; + mes "Come back for the challenge again,"; + mes "when you have thought over it!"; + close; + + L_RAN_SC: + mes "[Grey]"; + mes "Hoho... I see you have paid attention!"; + mes "I am Grey, a wandering poet of yore,"; + mes "you are the best audience i have had so far,"; + mes "here, take this as a reward."; + getitem 7184,1; + set nif_quest2, 1; + next; + mes "[Grey]"; + mes "I hope you will treat other poets"; + mes "as well as you treated me, farewell."; + close; + +L_end: + mes "[Grey]"; + mes "I wonder what does it mean..."; + mes "If you read it carefully,"; + mes "it seems to have a deep meaning,"; + mes "as if there is a myterious secret"; + mes "hidden within these words..."; + close; +} + +nif_in.gat,31,20,3 script Kurtz 794,{ + mes "[Kurtz]"; + mes "Business nowadays is really bad..."; + mes "Back when i used to be alive,"; + mes "my business was this bad too~!"; + if (nif_quest3 == 1) goto L_end; + next; + mes "[Kurtz]"; + mes "Hey! You there! Dump this for me"; + mes "on the way out will you!"; + getitem 7184,1; + set nif_quest3, 1; + next; + mes "[Kurtz]"; + mes "Why is business so bad lately..."; + mes "(mumble mumble)"; + close; +L_end: + close; +} + +niflheim.gat,169,71,5 script #1 111,2,2{ + if (nif_quest4 == 1) goto L_end; +L_key1: + mes "- In the nearby tombs -"; + mes "- you see something -"; + mes "- half buried in the ground -"; + mes "- What is it? -"; + mes "- Looks like it broke off something -"; + next; + mes "- Pick it up? -"; + menu "Yes",-,"No",L_end; + getitem 7184,1; + set nif_quest4, 1; +L_end: + close; +} + +niflheim.gat,208,103,5 script #2 111,2,2{ + if (nif_quest5 == 1) goto L_key2; + if (nif_quest5 >= 2) goto L_end; + +L_key1: + mes "- In the nearby tombs -"; + mes "- you see something -"; + mes "- half buried in the ground -"; + mes "- What is it? -"; + mes "- Looks like it broke off something -"; + next; + mes "- Pick it up? -"; + menu "Yes",-,"No",L_end; + getitem 7184,1; + set nif_piano, 1; + close; +L_key2: + mes "- In the hole you have dug -"; + mes "- there is something else -"; + mes "- buried deep in the ground -"; + mes "- Looks like its another fragment -"; + next; + mes "- Pick it up? -"; + menu "Yes",-,"No",L_end; + getitem 7184,1; + set nif_piano, 2; +L_end: + close; +} + +nif_in.gat,115,181,5 script #4 111,3,3{ + mes "- You see a huge old piano -"; + mes "- with a few keys missing -"; + if ((nif_quest6 < 1) && (countitem(7184) > 5)) goto L_event; + close; + +L_event: + delitem 7184,6; + set nif_quest6, 1; + mes "- You slide the 6 piano keys one -"; + mes "- by one into the missing slots -"; + mes "- on the piano, but you realise -"; + mes "- the left-most side seems to be -"; + mes "- missing one more key. -"; + close; +} + +nif_in.gat,118,151,5 script #5 111,3,3{ + if (nif_quest6 == 1) goto L_event; + end; + +L_event: + mes "- The very moment the long shadow -"; + mes "- of your body falls on the piano -"; + next; + mes "- You suddenly seem to feel lighter -"; + mes "- and your vision starts to blur... -"; + next; + warp "nif_in.gat",179,163; + close; +} + +nif_in.gat,188,168,3 script Witch 792,{ + mes "[Kilgana]"; + mes "Hmm?... Aren't you a living human?"; + mes "Must have took you some effort"; + mes "to get to this place..."; + mes "Whatever reason though, this is not a place"; + mes "the living shall belong..."; + next; + mes "[Kilgana]"; + mes "I shall use my powers to send you back"; + mes "but you should not return in the future."; + warp "umbala.gat",138,208; + close; +} diff --git a/npc/cities/payon.txt b/npc/cities/payon.txt new file mode 100644 index 000000000..746410668 --- /dev/null +++ b/npc/cities/payon.txt @@ -0,0 +1,816 @@ +//===== eAthena Script ======================================= +//= Payon City +//===== By: ================================================== +//= Muad Dib (1.0) +//= Darkchild (1.1) +//= Muad Dib (1.2) +//= Darkchild (1.3) +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= Any eAthena Mod +//===== Description: ========================================= +//= (New) Payon City Npcs +//===== Additional Comments: ================================= +//= Most Credits To Muad Dib, Some Stuff By Me +//============================================================ + +payon.gat,190,115,0 script Lady 90,{ + mes "[Lady]"; + mes "Did you know that in the past Payon was not as prosperous as it is now? Back then we had difficulty making a living for ourselves."; + emotion 0; + next; + mes "[Lady]"; + mes "The towns people were so poor that they could not even afford to properly bury their deceased family members."; + mes "Because of this many people chose to simply place the dead corpses in the Cave near the village."; + next; + mes "[Lady]"; + mes "Not only was this a terrible way to treat those that passed away but it would later prove to have grave consiquences for this town."; + next; + mes "[Lady]"; + mes "You see, because they were not given a proper burrial, the dead were not able to leave this world and pass on to the other world."; + mes "Instead they became mindless zombies, wrethced souls that were forced to walk the earth for all eternity."; + next; + mes "[Lady]"; + mes "Their rotten bodies filled with pain and suffering, yearned for the taste of human flesh. Any living person who came near the cave would fall victim to these zombies."; + mes "In order to protect the village the Elder Chief founded the Archer Village to train young warriors who could fight the zombies."; + next; + mes "[Lady]"; + mes "To this day the battle between the living and the undead still goes on."; + mes "It is a very tragic situation, for those zombies were at one time beloved members of the Payon community."; + close; +} +payon_in01.gat,177,91,5 script Young Man 88,{ + mes "[Young Man]"; + mes "I can see you are a stranger from the appearance of your traveling outfit. You must be a well-experienced fighter otherwise you couldn't successfully arrive at this steep place with all tough those creatures outside."; + mes "However you miss something important for fights. You can't defeat those monsters only with might."; + next; + mes "[Young Man]"; + mes "Sometimes you will encounter some creatures with a hard-shell body which can't be damaged by physical attacks. Only psychic power like magic can defeat them at ease."; + mes "If you study magics, works will be easier... If you don't,you'd better accompany with somebody using magic."; + close; +} + +payon.gat,104,62,5 script Young Man 88,{ + mes "[Young Man]"; + mes "I still remember the story my grandfather told me long ago about the Amulet that possessed an Evil Power within it."; + next; + mes "[Young Man]"; + mes "According to the story the Amulet could raise the dead from their Graves!!"; + mes "I am not sure if the story is true or not, but I wonder what would happen if I summoned my grandfather from his grave with it??..."; + next; + mes "[Spooky Voice]"; + mes "~~~~My child... do not even think of such a thing!!!~~~~~"; + next; + mes "[Young Man]"; + mes "Eeeeeeeeekkkkk?! Grampa? I-I-Is-Is t-t-th-that you?? ..."; + emotion 16; + next; + mes "(you notice that his pants have become wet... eeeewwwwwwwwww!!!....)"; + close; +} + +payon_in01.gat,180,7,0 script Waitress 90,{ + mes "[Waitress]"; + mes "People in this place seem to be busy all the time, they come and go to be Archers or to buy arrows, I have to stick with this small shop."; + mes "I feell so melancholy and bored."; + emotion 28; + next; + mes "[Waitress]"; + mes "I am sick and tired of noodle soup. I have to take too many showers to get rid of the smell."; + mes "But it isn't easy to deodorize..sigh..."; + next; + mes "[Waitress]"; + mes "Where can I find the right person who is a really hot, sexy hunk, and who can take me out of this small place?"; + check Gender = 1,-,LStartF; + mes "[Waitress]"; + mes "Hello, mister?"; +LStartF: + mes "[Waitress]"; + mes "Hello, lady?"; + next; + mes "[Waitress]"; + mes "Grandma the fortuneteller told me that I would meet great luck in the near future!"; + mes "But look at me, what's wrong with me!! I am leaving a managable life everyday!!"; + mes "Oh..boy. What a dumb wishy-washy person I am."; + emotion 6; + next; + mes "[Waitress]"; + mes "I am so sorry, I should haven't said this to you. Now I am acting like i'm stupid."; + mes "I am sorry dear, please forgive my misbehaviour."; + emotion 4; + next; + mes "[Waitress]"; + mes "So, how may I help you? "; + menu "Have you ever heard of Zombies?",L_Menu1,"I want to have my fortune told.",L_Menu2,"I need some booze.",L_Menu3,"I'm good",L_Menu4; +L_Menu1: + mes "[Waitress]"; + mes "Zombies are the walking dead. You can easily spot them in this village, Payon."; + mes "It's rumored that they fear holiness. That's why Archers prefer to use arrows made out of holy metal, silver against Zombies."; + next; + mes "[Waitress]"; + mes "Legend says the chief of this town used silver arrows against walking zombies that used to be his brethren, to enlighten their souls to rest in peace."; + mes "We believe only this way, zombies can be leaded to the peaceful world beyond the realm."; + next; + mes "[Waitress]"; + mes "You might not agree on our tradition which respects the diseased."; + next; + mes "[Waitress]"; + mes "Somehow I would like to appreciate the chief to enlighten my grandfather's poor soul."; + close; +L_Menu2: + mes "[Waitress]"; + mes "Oh! I must say she is really an extraordinary person. Well, it could be your luck, she doesn't hang around here much as she used to do."; + emotion 5; + next; + mes "[Waitress]"; + mes "On the first place, she stayed here to mind her business, but ever since the chief recognized her talent, she's stayed in the central palace." + mes "You'd better go to there if you want to see her."; + close; +L_Menu3: + mes "[Waitress]"; + mes "I am so sorry they're all sold out and we can't afford to prepare alchohol anymore due to hostile creatures out there."; + mes "My master built a very strict rule of his own, that is we only provide the best drinks to customers."; + next; + mes "[Waitress]"; + mes "So please come later again."; + next; + mes "[Waitress]"; + mes "Sorry for your inconvenience."; + emotion 17; + close; +L_Menu4: + mes "[Waitress]"; + mes "Have a nice day, dear."; + mes "Sob...I wish I could be in bed of roses."; + emotion 28; + close; +} + +payon.gat,193,116,1 script Woman 66,{ + mes "[Woman]"; + mes "Welcome to Payon. You must have had a hard time getting through the thick forest? I hope you didn't run into too much trouble?"; + next; + mes "[Woman]"; + mes "I'm glad to see a new face around here. You see the number of tourists has decreased drastically due to the enormous amount of monsters outside."; + next; + mes "[Woman]"; + mes "Payon has become a very quite town because of this. There's isn't much for the towns people to do nowadays. As for myself I'm just chit-chatting with my friends."; + next; + mes "[Woman]"; + mes "To be honest, things are getting tough because of those creatures... (sighs)..."; + next; + mes "[Woman]"; + if(Sex == 0) goto LStartF; + mes "Hmm... you look as strong as a Rocker! How many monsters have you killed?"; + mes "Let me tell you about a place where you can go train and become even stronger."; + emotion 20; +LStartF: + mes "Miss, how many monsters have you killed?"; + mes "I know a very good place for you to go train and get good monster drops."; + emotion 20; + next; + mes "[Woman]"; + mes "I know of a cave near Archer Village. Just take the exit north of town and follow the path to your left."; + mes "The cave is full of monsters and their spawn rate is very high. Does it sound interesting to you?"; + next; + menu "It sounds dangerous."L_Menu1,"I think I need to fully prepare for that place.",L_Menu2,"Lady, you wear nice clothing~",L_Menu3; +L_Menu1: + mes "[Woman]"; + mes "Oh don't be such a coward! It's just a simple cave filled with normal monsters. Archer Village is near by so you shouldn't be worried~ hohoho~"; + next; + mes "[Woman]"; + mes "Of course... there are the zombies... and Munaks... and Bonguns... which can be VERY DEADLY....."; + emotion 20; + close; +L_Menu2: + mes "[Woman]"; + mes "No need to worry about prepapring yourself. There is an excellent tool dealer in front of town where you can purchase the items you need."; + next; + mes "[Woman]"; + mes "I know because he's my husban... oops... I mean an aquantence of mine... heh heh.."; + emotion 4; + close; +L_Menu3: + mes "[Woman]"; + mes "Oh hohohoho! SO you noticed! This is what's in-style in Prontera these days! The women in this town don't know anything about fashion!"; + emotion 5; + next; + mes "[Woman]"; + mes "My husband buys me these clothes with the money he makes selling overpriced items to foolish young people... oh ho oh hoho..."; + emotion 18; + close; +} + +payon.gat,190,119,5 script Woman 66,{ + mes "[Jim's Mother]"; + mes "Oh boy there she goes again. She is a confirmed gossip. Please don't mistake her for being a typical Payon citizen."; + emotion 9; + next; + mes "[Jim's Mother]"; + mes "Believe me, she's an exception. Not all of us here in Payon have big mouths. She gets too exited with fortune telling."; + next; + mes "[Jim's Mother]"; + mes "Anyway, you look like a new face. Are you new in town?"; + next; + mes "[Jim's Mother]"; + if(Sex == 0) goto LStartF; + mes "... Oh, you have broad shoulders ... tehehe! Will you go out with me? I'd like to make you a nice dinner...(bats eyelashes)"; + emotion 30; +LStartF: + mes "Don't you think your dress is too lousy?"; + mes "I don't like young ladies pounce up."; + next; + menu "Fortune Telling?",L_Menu1,"...Good Bye.",L_Menu2; +L_Menu1: + mes "[Jim's Mother]"; + mes "Oh yes, there is an extraordinary fortune teller here in town. You can find her in the central palace."; + mes "The more money you pay her the more acurate your fortune will be told."; + next; + mes "[Jim's Mother]"; + mes "I saw her recently and she told me that I would meet a handsome young man this month............"; + if(Sex == 0) goto L_2; + mes ".......... tehehe. (winks at you)"; +L_2: + emotion 3; + close; +L_Menu2: + mes "[Jim's Mother]"; + mes "What? You have to go? Awwww...Why don't you stay and chit chat with me for a while...hmm? ..."; + close; +} + +payon.gat,210,110,4 script Drunk 120,{ + if(Class != 3) goto L_Menu1_F1; + mes "[Drunk]"; + mes "Hey hey! I am wondering how stupid archers who don't know how to aim targets could drink alcohol. Hahaha~!"; + mes "Do you want to buy me a drink?"; + emotion 18; +L_Menu1_F1: + mes "[Drunk]"; + mes "Yoyo! Archer brother! Salute to your fingers stratching bowstring!"; + emotion 2; + next; + mes "[Drunk]"; + mes "Do you want to buy me a drink?"; + next; + menu "Promise me you won't drink more than one jug.",L_Menu1,"No thanks,buddy.",L_Menu2,"Oh my god~ hell no~!",L_Menu3; +L_Menu1: + if(Class == 3) goto L1L; + mes "Thanksh!... shhtrangersszz are alwayssszz a generoushhh bunch!... archer guysh are penny pinchershh nowadayssszz!..(hicup!)"; + goto L1L; +L1L: + if(Class != 3) goto L2L; + mes "Thanksh brothaaa!... archerrrzzz are alwayssszz a generoushhh bunch!...(hicup!)"; + goto L2L; +L2L: + emotion 15; + if(Zeny < 200) goto L_SUB_1; + set Zeny,Zeny-200; + mes "[Drunk]"; + mes "Thanks brother! Strangers are always generous without exception! Archer guys are pinch-pennies nowadays!"; + mes "Muhahahaha! I wasn't like that when I was young."; + mes "Back then I was young, I used to fool around with girls! One of the grannies in this village and I was really hot back then!"; + mes "She still acts like a young lady in taste for consmetics and stuff!"; + next; + mes "[Drunk]"; + mes "Gulp~Gulp~Man! This is great! Thank you may man! Thank you! Muhahahahaha!"; + emotion 21; + close; +L_SUB_1: + mes "[Drunk]"; + mes "Cheapass, don't even have enough money. Move on young one, your waisting my time!"; + close; +L_Menu2: + mes "[Drunk]"; + mes "Blah. Young people don't know how to respect elderly people!"; + mes "Fine! I won't beg you anymore! I won't..."; + emotion 32; + close; +L_Menu3: + mes "[Drunk]"; + mes "Umm, oookay. Fine by me..."; + emotion 21; + close; +} + +payon_in01.gat,47,59,5 script Archer Zakk 88,{ + mes "[Archer Zakk]"; + mes "I am so worried about one of my pals. He speaks about much crap."; + mes "Well he is an expert of archery, but I hate his big mouth..."; + mes "Our chief is also fed up with him."; + emotion 7; + next; + menu "Archer?",L_Menu1,"Chief?",L_Menu2,"Big Mouth?",L_Menu3; +L_Menu1: + mes "[Archer Zakk]"; + mes "Ah yeah yeah. My friend is the number one archer in Payon, in the same costume as me too."; + mes "He teaches newbie archers around the archer village."; + mes "Well...you'd better talk to him at lease once."; + close; +L_Menu2: + mes "[Archer Zakk]"; + mes "Chief lives in the central palace. He is the spiritual guide of Payon."; + mes "He used to dictate to the whole Payon forest carrying Gakkung. I remember the battle scene he showed when I was a little kid. Hmm~"; + mes "Even though he is old and weak now...his eyes...he still has keen-sighted eyes of his young days, he can hit targets without missing."; + next; + mes "[Archer Zakk]"; + mes "I admire him from the bottom of my heart."; + close; +L_Menu3: + mes "[Archer Zakk]"; + mes "You know a big mouth is the person who is much talkative and who doesn't stop talking."; + mes "He never stops talking as I said, one day he started to talk while we did laundry at the riverbank, he stopped talking when we realised our shirts tunrned out to get tattered."; + mes "He became a kind of legend, people used to call him as Bowing Mouth or Chatterbox instead of his real name."; + mes "I've never seen a person talk as much as him."; + next; + mes "[Archer Zakk]"; + mes "I've been many places, but I didn't see any guy who likes talking or being talkative."; + mes "Maybe other people agree on my opinion. Oh yes, I think you are with me."; + mes "As I see your face, you've got friends of few words so far! Hmm Hmm!!"; + mes "Tactiturnity is bliss, you know."; + next; + mes "[Archer Zakk]"; + mes "Ah, My friend Wolt? He doesn't have his place so he always stay at inn."; + mes "I guess you can meet him by now. Why don't you go see him?"; + close; +} + +payon_in01.gat,66,64,5 script Archer Wolt 88,{ + mes "[Archer Wolt]"; + mes "Archers should practice as much as they can. Otherwise they won't be an expert."; + mes "Are you new here? Howdy!"; + next; + mes "[Archer Wolt]"; + mes "I am Wolt the Archer. Just call me Wolt."; + mes "I know this is an expected question, do you tend to idle away your time?"; + next; + menu "Hell no.",L_Menu1,"Yeah I guess.",L_Menu2; +L_Menu1: + mes "[Archer Wolt]"; + mes "Hmm... You don't? You are born to be an archer then."; + next; + mes "[Archer Wolt]"; + mes "We Archers are constantly practicing and rarely have time to just sit around. So we hate people who are not dilligent."; + next; + mes "[Archer Wolt]"; + mes "Are you curious about HOW we practice?"; + emotion 1; + next; + mes "[Archer Wolt]"; + mes "From sunrise to sunset the Archers of Payon search the surrounding forest for monsters."; + next; + mes "[Archer Wolt]"; + mes "With a bow in our hands and arrows on our back we fight dangerous monsters in order to train ourselves as well as to help keep Payon safe"; + next; + mes "[Archer Wolt]"; + mes "For us fighting monsters is a way of life...(blah blah blah)...I once saw the sun set on a river...(blah blah blah blah)...sometimes I feel pretty...(blah blah)..."; + next; + menu "You must need a good bow.",L_sub1,"Oh well, isn't it a practice?",-; + close; +L_sub1: + mes "[Archer Wolt]"; + mes "....Well YES!! A well crafted Bow is essential to the success of an archer!"; + emotion 5; + next; + mes "[Archer Wolt]"; + mes "Bows constructed in Payon are the greatest bows you can find in Rune-Midgard! They are light yet, strong and very durable."; + emotion 21; + next; + mes "[Archer Wolt]"; + mes "This is because they are made out of high quality wood found only in the Payon Forest!"; + mes "My bow was made from a Walnut tree and will last for gererations to come."; + next; + mes "[Archer Wolt]"; + mes "Unfortunatley many of the wonderfull trees in Payon forest have been affected by the evil force that has spread throughout Rune-Midgard and have turned into horrible creatures."; + next; + mes "[Archer Wolt]"; + mes "It's a pitty to see such beatifull trees become tools of evil..."; + next; + mes "[Archer Wolt]"; + mes "Strange as it may sound, even as monsters the trees still provide high quality wood that can be used for bows."; + mes "Maybe the trees seek to help us fight the evils in the land?..."; + next; + menu "I didn't realise the forest was so dangerous",L_case,"(This guy talks way to much)",L_End; +L_case: + mes "[Archer Wolt]"; + mes "But you know monsters don't appear only in the forest. Don't you realise why the archer village was established in this place?"; + mes "Heading west, you can see a cave. Inside the cave, enormous monsters keep spawning without limit."; + mes "We are here, to protect our territory against them in obedience to our chief's order."; + next; + menu "Cave?!",L_para1,"Chief?",L_para2,"Oh man I hate this stupid town~",L_para3; +L_para1: + mes "[Archer Wolt]"; + mes "Head north of town, you can see the cave I told you about." + mes "Inside there, you will encounter lots of ugly monsters such as bastard looking like a bat or the walking dead."; + mes "If we let them out of the place, they would invade our town. We frequently clean up the cave."; + next; + mes "[Archer Wolt]"; + mes "However they are endlessly respawned. It seems we're wasting our time and labor without nothing..."; + mes "Enough already, let's cut off this crap. Even I can't talk more than this."; + mes "I have lots of things to do!"; + close; +L_para2: + mes "[Archer Wolt]"; + mes "The Elder Chief is such a great person... although he always scolds me because he says I talk too much."; + next; + mes "[Archer Wolt]"; + mes "I don't think I talk all that much...I mean..(blah blah blah)...so I said to the guy...(blah blah blah blah blah)....."; + next; + mes "[Archer Wolt]"; + mes "... uh... anyways... back to the Chief..."; + emotion 4; + next; + mes "[Archer Wolt]"; + mes "In the past he bravely protected Payon with his Gakung Bow. Now he is elderly, though he still worries about the safety of the town."; + mes "He resides in the Palace and has his own personal gaurd. Only high level warriors are allowed to speak with him."; + close; +L_para3: + mes "[Archer Wolt]"; + mes "Well thats not very nice!"; + mes "If you don't like our humble town then you should leave, bastard!"; + close; +L_Menu2: + mes "[Archer Wolt]"; + mes "Hmm...sometimes you need rest."; + mes "Do you want to listen to my story? I set fire on my house during my last holiday~ hahaha~ I fell a sleep while I heated the bath.Hahaha!"; + next; + menu "Is it ok to take a rest?",L_temp1,"But how about my training?",L_temp2,"...Blah see ya.",L_temp3; +L_temp1: + mes "[Archer Wolt]"; + mes "Umm...it won't be ok if you don't practice and just goof around. Probably our chief will get mad at you...Well you could be the drunk in the pub in the future... Hahaha. Muhahaha."; + next; + menu "Chief?",L_sub_para1,"Drunk?",L_sub_para2,"I know you're already out of your mind!",L_sub_para3; +L_sub_para1: + mes "[Archer Wolt]"; + mes "Chief? Ah he is such a great guy. Well, he always scolds me because I talk too much talking."; + mes "He always trys to keep us in safety. Lately it seems he doesn't come out of his palace."; + mes "He is inside a room guarded by a warrior."; + next; + mes "[Archer Wolt]"; + mes "Heheheh~ I will be in trouble if he gets to know I tell you this to a stranger~ hehehe~"; + mes "Well somehow I already burst it out, no use to regret!"; + mes "Ummm however I think I'd better seal my lips by now. Ok bye, see you later dude!"; + close; +L_sub_para2: + mes "[Archer Wolt]"; + mes "Ah that guy in the pub. When I get spare money I buy him a drink sometimes, I am so worried about his drinking disorder."; + mes "He is one of my villagers, I don't want to see him dead."; + mes "Hmm...he reminds me of a jug full of beer..."; + mes "I gotta go to the pub! Ok then, See you later!"; + close; +L_sub_para3: + mes "[Archer Wolt]"; + mes "Yeah dumbo."; + close; +L_temp2: + mes "[Archer Wolt]"; + mes "Hmm...You don't? You are born to be an archer then."; + mes "We, archers should not idle away without practice."; + mes "So we hate people who are not dilligent."; + next; + mes "[Archer Wolt]"; + mes "It is so amazing that lazy guy like me could be an archer."; + mes "Life is worth to live."; + mes "So live your life with passion!"; + close; +L_End: + mes "[Archer Wolt]"; + mes "...... (blah blah blah)......"; + close; +L_temp3: + close; +} + +pay_arche.gat,77,131,2 script Archer Joe 88,{ + mes "[Archer Joe]"; + mes "Payon! What a wonderful place! Superb Bows! Excellent Archers!"; + emotion 21; + next; + mes "[Archer Joe]"; + mes "Hay you! Have you heard of our fame?"; + next; + menu "Oh yeah!",L_Menu1,"Err Sorry?!",L_Menu2,"......",L_Menu3; +L_Menu1: + mes "[Archer Joe]"; + mes "Oh! You my man buddy! Archers of Payon! You know who we are!"; + emotion 33; + next; + mes "[Archer Joe]"; + mes "Arrows of Payon Archers never miss the targets! Even it can aim at the heart of the enemy from a long distance!"; + next; + menu "You like this place, huh?",L_Msub1,"Haha...",L_Msub2; +L_Msub1: + mes "[Archer Joe]"; + mes "Yes! I love this place! So now I am researching Payon!"; + mes "If you have any questions, please ask me!"; + emotion 33; + next; + menu "People are wearing unique costumes in here.",L_Mpara1,"Can you tell me what the building is in the middle of town?",L_Mpara2,"Who is the guy drinking...Over there?",L_Mpara3,"Talk to you later.",L_Mpara4; +L_Mpara1: + mes "[Archer Joe]"; + mes "Yes, I agree."; + mes "You must know this place has been isolated from the outside because of the thick forest, and people living here got to form a very unique culture, which is quite different from the one of this continent."; + mes "This costume is the one of their traditional clothing! Why don't you try? It is very comfortable!"; + close; +L_Mpara2: + mes "[Archer Joe]"; + mes "Strangers are not allowed to enter the central palace. I've never been there."; + mes "People say, royal families and their friends from outside are gathered in the place."; + mes "In fact I would like to go in there. It attracts my attention."; + close; +L_Mpara3: + mes "[Archer Joe]"; + mes "Oh! He is a notorious guy in this town! Don't treat him to drinks! You will regret that!"; + emotion 0; + close; +L_Mpara4: + mes "[Archer Joe]"; + mes "Ok! Catch you later! See ya!"; + close; +L_Msub2: + close; +L_Menu2: + mes "[Archer Joe]"; + mes "Oh boy, what a shame! How on earth can't you know there is something about archers of Payon!"; + emotion 23; + next; + mes "[Archer Joe]"; + mes "Please come back later when you become more skillfull! Let's talk about what makes archers of Payon so attractive later!"; + close; +L_Menu3: + mes "[Archer Joe]"; + mes "What makes you zip your mouth? Are you shy?"; + mes "Ummm... you don't have to be shy before me.."; + emotion 20; + close; +} + +payon_in01.gat,144,9,2 script Monster Scholar 98,{ + mes "[Monster Scholar Vuicokk]"; + mes "Nice to meet you. I am Vuicokk the cholar in the monster research organization of Rune Midgard."; + mes "Do you have any questions about monsters of Rune Midgard?"; + next; + menu "Late News.",L_Menu1,"Undead Monster.",L_Menu2,"Monster Research Organization.",L_Menu3,"Good day",L_End; +L_Menu1: + mes "[Monster Scholar Vuicokk]"; + mes "Payon is located deep inside the forest, you can easily get attacked by monster troops."; + mes "Besides a dangerous cave is near the town."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "Especially in the cave, monsters of undead attribute are spotted here and there, monster academic world is paying attention on the cave."; + mes "My mission in here is analysing their characters."; + close; +L_Menu2: + mes "[Monster Scholar Vuicokk]"; + mes "The remarkable thing about the Undead monsters of Payon is that many of them used to be citizens of Payon."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "Now they are but lost, tortured, souls seeking release from their painful existence...."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "Undead monsters are of a totaly different classification then the other monsters because of the fact that they used to be humans."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "It is for this reason that the King of Rune Midgard has a great deal of interest in our research on Undead monsters. "; + next; + mes "[Monster Scholar Vuicokk]"; + mes "To know that they used to be citizens of his kingdom is very troubling to him....."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "His Majesty Tristram the 3rd has mandated that we do all we can to find a way to remove the undead from this world."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "In order to do that we must put an end to the source of the problem. I have tremendous faith that we can succeed in doing so."; + close; +L_Menu3: + mes "The Monster Research Organization was formed to find ways to counteract the sudden and rapid growth of monsters in Rune Midgard."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "Talented scientest from all over the land have been called forth to participate in this research."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "Of course this work is not as easy as one might expect. We are constantly risking our lives when we go out into the field."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "There have already been countless injuries and fatalities suffered by the reaserch team."; + next; + mes "[Monster Scholar Vuicokk]"; + mes "However NOTHING can stop us! We will continue to perservere for the bennifit of the people of RUNE MIDGARD!!!"; + emotion 0; + next; + mes "[Monster Scholar Vuicokk]"; + mes "... Eh em... please excuse my emotional outburst... I am very passionate about this work....."; + mes "Anyway if you happen to meet other scholars like myself, please treat them kindly."; +L_End: + mes "[Monster Scholar Vuicokk]"; + mes "Have a nice day."; + close; +} + +payon_in03.gat,100,186,4 script Chief 120,{ + if(BaseLevel > 30) goto L_Menu1; + set @R_SEL_NUM,rand(2); + if(@R_SEL_NUM != 0) goto T_TALK0; + mes "[Palace Guardsman]"; + mes "Hey hey! Show your respect to the chief!"; + close; +T_TALK0: + if(@R_SEL_NUM != 1) goto T_TALK2; + mes "[Palace Guardsman]"; + mes "Hey! I said..."; + next; + mes "[Chief]"; + mes "That's fine, I am ok. It's been a long time since I talked to such young people."; + next; + menu "Please tell me about Payon.",L_Menu1,"Where the guards come from?",L_Menu2,"Please tell me about the cave.",L_Menu3,"I am wondering what archer does.",L_Menu4,"I am wondering what hunter does.",L_Menu5; +L_Menu1: + mes "[Chief]"; + mes "Payon is the city of highlanders, who'be been self-supporting and self-sufficient."; + mes "Although our ancestors couldn't take civillized cultural benefits as much as farmers or citizens did, they knew how to make their living without help."; + mes "Young acting power motivated them to survive from the elemetal forces. We, payon people including females have learned how to go hunt and how to protect ourselves from danger."; + next; + mes "[Chief]"; + mes "I heard of weak young people who fear fields or dungeons filled with monsters. But to us, battle against monsters is a part of our lives."; + mes "That's why his majesty Tristram 3rd expects us to teach young people how to efficiently fight against evil creatures."; + close; +L_Menu2: + mes "[Chief]"; + mes "Prontera has sent civil servants to Payon as I was young."; + mes "Royal troops, Kafra ladies, officers...at first we used to argue due to different customs."; + mes "However I cannot deny they've helped to activate foreign trade with other countries briskly."; + next; + mes "[Chief]"; + mes "Now young people outside Payon constitute themselves Payon villagers...I could hardly imagine this scene when I was young. Hh huh..."; + mes "I am very pleased to see them. Even though they came from other places they love Payon."; + close; +L_Menu3: + mes "[Chief]"; + mes "The cave up North is the place I used to goto sometimes."; + mes "It was harder then now, evil creatures that I'd never seen kept respawning inside without limit."; + mes "Present monsters are...different from the monsters we used to fight with."; + next; + mes "[Chief]"; + mes "Have you ever happened to see? A lasting grudge coming out of the cave...it was caused from the dead who never came back after going inside the cave to protect this village."; + next; + mes "[Chief]"; + mes "Those walking dead make another victim...ah...I am too old to endure such a severe pain...I am too old..."; + next; + mes "[Chief]"; + mes "I can do anything to stop the dead.....I can do anything...."; + close; +L_Menu4: + mes "[Chief]"; + mes "We gather enough wood from the huge forest surrounding Payon."; + mes "It is a natural benefit that we own excellent archers. You might think Forest welcomes archers to practice bowing, but it takes the side opposite yours."; + next; + mes "[Chief]"; + mes "The forest aids you in hiding yourself, blocking the way of enemies who must approch to attack."; + mes "Archers are dexterous to attack dull enemies from a long distance."; + next; + mes "[Chief]"; + mes "Besides...there is an expected merit being inside the forest. When I was young I was out of arrows while fighting against monsters in the woods, but arrows dropped by monsters saved my life from them. Muhahahaha!"; + close; +L_Menu5: + mes "[Chief]"; + mes "As foreign cultures were introduced in Payon, the battle style of ours has been changed."; + mes "Especially explosive compound and technology have remarkably affected on people's life style. It seems people were not satisfied only with bows and arrows to fight."; + next; + mes "[Chief]"; + mes "Trapping skills which enable to hunt monsters easier were invented, so the previous Chief granted them a name of hunter."; + mes "Even though it was all the go on the first place, trapping is a really dangerous skill, we hardly approve the youth to be hunters."; + next; + mes "[Chief]"; + mes "People who have enough responsibility on themselves can challange on the class."; + close; + next; +T_TALK2: + if(@R_SEL_NUM != 3) goto T_TALK3; + mes "[Chief]"; + mes "Tired... I'd better take a rest then. Take care of yourself."; + close; +T_TALK3: + mes "[Palace Guardsman]"; + mes "The Chief is taking a rest. Would you mind if I ask you to come back later?"; + close; +} + +payon.gat,160,246,4 script Palace Guardsman 708,{ + mes "[Place Guardsman]"; + mes "Halt!"; + next; + mes "[Palace Guardsman]"; + mes "You are about to enter the Royal Palace, home of the Payon Royal Family. You must be at your best behavior at all times while in the palace."; + next; + mes "[Palace Guardsman]"; + mes "I will need to disarm you for the time being. If you do not cooperate you will not be able to enter the Palace"; + nude; +//nude; will disarm you + next; + warp "payon_in03.gat",98,118; + close; +} + +payon.gat,151,246,4 script Palace Guardsman 708,{ + mes "[Palace Guardsman]"; + mes "............."; + close; +} + +payon_in03.gat,102,116,4 script Palace Guardsman 708,{ + mes "[Place Guardsman]"; + mes "What brings you here?"; + emotion 1; + next; + mes "[Palace Guardsman]"; + mes "I can see that you are not from around here. I suggest that you behave yourself while you are here."; + mes "We will not tolerate any direspectfull or abberant behavior."; + close; +} + +payon_in03.gat,95,116,4 script Palace Guardsman 708,{ + mes "[Palace Guardsman]"; + mes "............."; + close; +} + +payon_in03.gat,92,157,4 script Palace Guardsman 708,{ + mes "[Palace Guardsman]"; + mes "............."; + close; +} + +payon_in03.gat,107,157,4 script Palace Guard Chief 708,{ + if(BaseLevel < 30) goto L_Less; + mes "[Palace Guard Chief]"; + mes "I see that you are a well trained warrior. You may have the privalege of speaking with the Elder Chief. But remember to be respectfull to him at all times!!!"; + next; + mes "[Palace Guard Chief]"; + mes "If NOT......(cracks his nuckles)....!!!"; + emotion 29; + close; +L_Less: + mes "[Palace Guard Chief]"; + mes "Halt. Only mighty warriors are worthy to speak face to face with the Elder Chief. You still need to train more"; + next; + mes "[Palace Guard Chief]"; + mes "Please leave"; + next; + warp "payon_in03.gat",99,129; + close; +} + +payon.gat,160,185,0 script Billboard 111,{ + mes "^993333- The Billboard Reads -^000000"; + mes "Welcome, and enjoy your stay in"; + mes "the beautiful town of payon."; + close; +} + +// New kRO Npc's + +payon.gat,173,238,4 script Unknown 740,{ + mes "[Unknown]"; + mes "This is an new kRO Npc"; + mes "This Npc hasn't been translated yet"; + mes "I by excident you know what this npc is and could translate it"; + mes "Please contact Darkchild (eAthena Dev)"; + close; +} + +payon_in03.gat,75,129,4 script Unknown 704,{ + mes "[Unknown]"; + mes "This is an new kRO Npc"; + mes "This Npc hasn't been translated yet"; + mes "I by excident you know what this npc is and could translate it"; + mes "Please contact Darkchild (eAthena Dev)"; + close; +} + +payon_in03.gat,117,128,4 script Unknown 704,{ + mes "[Unknown]"; + mes "This is an new kRO Npc"; + mes "This Npc hasn't been translated yet"; + mes "I by excident you know what this npc is and could translate it"; + mes "Please contact Darkchild (eAthena Dev)"; + close; +} + +payon_in03.gat,118,119,8 script Unknown 101,{ + mes "[Unknown]"; + mes "This is an new kRO Npc"; + mes "This Npc hasn't been translated yet"; + mes "I by excident you know what this npc is and could translate it"; + mes "Please contact Darkchild (eAthena Dev)"; + close; +} + +payon_in03.gat,131,7,4 script Unknown 59,{ + mes "[Unknown]"; + mes "This is an new kRO Npc"; + mes "This Npc hasn't been translated yet"; + mes "I by excident you know what this npc is and could translate it"; + mes "Please contact Darkchild (eAthena Dev)"; + close; +} + diff --git a/npc/cities/prontera.txt b/npc/cities/prontera.txt new file mode 100644 index 000000000..4a75d9cac --- /dev/null +++ b/npc/cities/prontera.txt @@ -0,0 +1,618 @@ +//===== eAthena Script ======================================= +//= Prontera Town +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + + +// Tono --------------------------------------------------------------- +prontera.gat,54,240,5 script Tono 97,{ + mes "[Tono]"; + mes "Did you know the larva of a Creamy is a Fabre."; + mes "The pupa stage of a Fabre is simply called Pupa."; + mes "As you can imagine, there is another metamorphic monster out in the desert."; + next; + mes "[Tono]"; + mes "That's it! It the Peco Peco."; + mes "The infant of the Peco Peco is called the Picky"; + mes "Unlike the colourfull Peco Peco, the Picky is a very cute pink."; + close; +} + +// Dairene ---------------------------------------------------------------- +prontera.gat,78,150,3 script Dairenne 90,{ + mes "[Town girl Dairenne]"; + mes "(Cough Cough)... Nowadays the streets are too crowded. (Cough Cough)..."; + mes "Oh..So Dusty...So dirty here... Now I think the Capital City isn't all that good."; + next; + mes "[Town girl Dairenne]"; + mes "Hmm... Anyway what is the matter?"; + next; + menu "Talk",L0,"Cancel",LEnd; + + L0: + mes "[Town girl Dairenne]"; + if(Sex == 1) mes "I'm not sure if your into Girllie Dress Stuff..Hohoho..but..."; + mes "These days, the most interesting topic around here is beautiful dresses Dyed in various Colors."; + next; + mes "[Town girl Dairenne]"; + mes "To enchance your Clothing with those Dazzling Colors, you must use ^0000ffDyestuffs^000000 made in ^0000ffMorroc^000000 city... I hear they will cost you alot of money."; + next; + mes "[Town girl Dairenne]"; + mes "Ah... I wish I could wear a Dress like that just once in my life..."; + close; + + LEnd: + mes "[Town girl Dairenne]"; + mes "(Cough)....See you around."; + close; +} + +// Merideth -------------------------------------------------------------- +prontera.gat,106,117,6 script Merideth 91, +{ + mes "[Merideth]"; + mes "The weather was nice on my day off, so my family and I decided to have a picnic."; + mes "We chose to go to a somewhat secluded area and were amazed at what we saw."; + next; + mes "[Merideth]"; + mes "A HUGE swarm of hornets!! I never saw anything like it! But what was even more surprising was the Queen Bee."; + mes "The fact that she could control all of them with such ease...."; + emotion 23; + next; + mes "[Merideth]"; + mes "If only a girl like myself had that much power over guys.... NOW THAT, would be really cool!!"; + emotion 29; + close; +} + +// YuNa --------------------------------------------------------------------- +prontera.gat,146,204,2 script YuNa 700,{ + mes "[YuNa]"; + mes "Odin is the god of wisdom and war. He couragously removed one of his eyes in order to acquire ultimate wisdom. "; + next; + mes "[YuNa]"; + mes "The statue in the middle of the water fountain over there is sculpted after the god himself."; + mes "I don't know who the sculptor was, which is a pitty because.... becasue...."; + next; + mes "[YuNa]"; + mes "HE DID IT ALL WRONG!!"; + emotion 7; + next; + mes "[YuNa]"; + mes "The statue is just totally different from the Odin we all know! He insisted that it was his artistic view or something...."; + next; + mes "[YuNa]"; + mes "Look~ He doesn't have a broad brimmed hat.... he's not even riding Sleipnir.... this is just totally unacceptable~!"; + emotion 32; + close; +} + +// YuPi ----------------------------------------------------------------------- +prontera.gat,160,133,2 script YuPi 102,{ + mes "[YuPi]"; + mes "Among monsters of the same species, there are some that are MORE FEROCIOUS than others"; + mes "If you even TOUCH them by mistake, you'd better prepare yourself for what's gonna happen next."; + next; + mes "[YuPi]"; + mes "You can tell the difference between the more AGGRESSIVE ones and the more PASSSIVE ones by their body color."; + mes "The more AGGRESSIVE the monster is, the more bright, and flashy it's color is."; + close; +} + +// Shuger ------------------------------------------------------------- +prontera.gat,102,287,5 script Shuger 98, +{ + mes "[Shuger]"; + mes "In the fields outside of town, there are pink monsters called '^FF8888Porings^000000'."; + mes "Though they are cute and do not harm people, they are notorious looters. They will absorb any item that they find on the ground."; + next; + mes "[Shuger]"; + mes "There are also green colored ones, called ^008800Poporings^000000'. They are like the pink Porings but are much stronger."; + mes "It would be a HUGE MISTAKE for a newbie to attack a Poporing, thinking that it was as weak as a Poring!"; + close; +} + +// ------------------------------------------------------------------------------------------- Culvert -------------------------------------------------------------------------------\\ +// Culvert Gaurdian ---------------------------------------------------- +prt_fild05.gat,270,212,5 script Culvert Gaurdian 105,{ + if(sewer_prt == 1) goto L0; + mes "[Culvert Guardian]"; + mes "Sorry, but only volunteers for the Culvert Campaign can go inside."; + mes "Speak with the ^000077Recruiter^000000 about volunteering. He's located in the ^ff0000Prontera Chivalry^000000."; + close; + + L0: + mes "[Culvert Guardian]"; + mes "Here you are. The entrance of the Culvert. Are you sure you want to Go inside?"; + next; + menu "Sure.",L0a,"Quit.",L1a; + + L0a: + warp "prt_sewb1.gat",131,247; + close; + L1a: + close; +} + +// Recruiter ----------------------------------------------------------- +prt_in.gat,88,105,2 script Recruiter 105,{ + if(sewer_prt == 1) goto L0a; + mes "[Recruiter]"; + mes "Let me inform about the official Notice from the Capital Defense Headquarter of Rune-Midgard Kingdom"; + next; + mes "[Recruiter]"; + mes "We decided to recruit volunteers to deal with the 'issues' that have been plauging our cities' sewers."; + next; + menu "Volunteer.",L0,"Issues...?",L1,"Quit",LEnd; + + L0: + mes "[Recruiter]"; + mes "Very good!!! Your Registration is confirmed. We will try to maintain peace and order in Rune-Midgard Kingdom."; + mes "I appreciate your support of the Capital Defense Headquarter. Here are some subsidies...."; + next; + mes "[Recruiter]"; + mes "3 Red Potions, 1 Milk, and 1 Orange Potion for an emergency."; + set sewer_prt,1; + getitem 501,3; + getitem 519,1; + getitem 502,1; + next; + + L0a: + mes "[Recruiter]"; + mes "Are you ready? I will warp you to the Culvert."; + next; + warp "prt_fild05.gat",274,208; + close; + + L1: + mes "[Recruiter]"; + mes "Didn't you hear yet? The Culvert is infested with noxious insects. We found bugs, moggots, and other creatures there."; + mes "They've become a huge problem... You've Never heard of this?"; + emotion 1; + next; + mes "[Recruiter]"; + mes "Because of the severity of these 'issues',it is forbidden for the people to use the water supply for the time being."; + next; + mes "[Recruiter]"; + mes "Needless to say, the people have been greatly inconvienced by this. If this were to linger on it would cause great ill will among the people of the Prontera."; + next; + mes "[Recruiter]"; + mes "The situation is becoming critical! There is restlesness among the people!!"; + next; + mes "[Recruiter]"; + mes "Mighty Warrior!! The People NEED YOU!! Let's EXPEL these VILE creatures from our land!!!"; + emotion 27; + next; + mes "[Recruiter]"; + mes "WILL YOU volunteer????"; + next; + menu "Volunteer.",L1a,"Quit.",L1aEnd; + + L1a: + goto L0; + close; + + L1aEnd: + mes "[Recruiter]"; + mes ".............."; + emotion 4; + close; + LEnd: + close; + +} + + +//------------------------------------------------------------------------------------- Prontera Church -------------------------------------------------------------------------------\\ +// Henson --------------------------------------------------------------- +prt_church.gat,103,71,2 script Henson 120,{ + mes "[Henson]"; + mes "Our duty is not only to help others, but to also purify poor souls that have been turned into the Undead."; + mes "In order to successfully accomplish our duty, we have to learn special skills and practice them very diligently."; + next; + mes "[Henson]"; + mes "Well, what was it you wanted to ask me about?"; +qMenu: + next; + menu "About Divine Protection",L0, "About Demon Bane",L1, "About Decrease AGI",L2, "About Signum Crisis",L3, "About Pneuma",L4, + "About Ruwach",L5, "About Teleport",L6, "End conversation.",LEnd; + + L0: + mes "[Henson]"; + mes "If you want to improve your Defense against the Undead, it is a good idea to learn the skill called 'Divine Protection'."; + mes "It is the most basic skill you'll need, and it doesn't even have a time limit or anything, anyways...."; + next; + mes "[Henson]"; + mes "If you raise it to level 3, then a skill called 'Deamon Bane' will be available for you. 'Demon Bane' increases your attack against the Undead."; + mes "With 'Divine Protection' as a foundation, several high class skills such as 'Angelus' and 'Blessing' will be available to you."; + goto qMenu; + L1: + mes "[Henson]"; + mes "'Demon Bane' improves your attack against the Undead. You need 3 levels of 'Divine Protection' before you can learn Demon Bane."; + mes "As whith 'Devine Protection', 'Demon Bane' is a passive skill and requires no sp and has no time limit."; + next; + mes "[Henson]"; + mes "Also, you have to aquire 3 levels of 'Demon Bane' to use a skill called, 'Signum Crisis', which lowers the Defense of Undead and Dark property monsters."; + next; + goto qMenu; + close; + L2: + mes "[Henson]"; + mes "When you use this skill, the movement speed, attack rate, and evasion rate of a targeted monster will be reduced."; + mes "You will need to get 1 level of 'Increase AGI' first, before you can learn 'Decrease AGI."; + next; + goto qMenu; + close; + L3: + mes "[Henson]"; + mes "You can lower the defense of Undead and Dark property monsters with this skill, and the range of attack is very wide."; + mes "The success rate, however, is pretty low since it is a very difficult skill to master."; + next; + mes "[Henson]"; + mes "Do not be disappointed even if you don't successfully use this skill all the time. You need level 3 'Demon Bane' to acquire this skill."; + next; + goto qMenu; + close; + L4: + mes "[Henson]"; + mes "Once you master 'Warp Portal', you can learn this skill."; + next; + mes "[Henson]"; + mes "It generates a barrier that defends you perfectly from long-range attacks, such as archer attacks."; + next; + goto qMenu; + close; + L5: + mes "[Henson]"; + mes "Ruwach allows you to see hidden monsters or players. You also need this skill to learn 'Teleport."; + next; + goto qMenu; + close; + L6: + mes "[Henson]"; + mes "At level 1, it allows you teleport to a random spot on the map you are in. At level2 it allows you to teleport to your last save point."; + mes "You must learn Ruwach first in order to learn teleport."; + next; + goto qMenu; + close; + LEnd: + mes "[Henson]"; + mes "If you're still not certain about all of this, you are always welcome to speak with me later!"; + close; +} + +// Garnet -------------------------------------------------------------- +prt_church.gat,103,76,2 script Garnet 67,{ + mes "[Garnet]"; + mes "Oh~ you want to find pleasure in helping other people, but you don't know how to do so?"; + mes "Fortunately we have the abilities to help and support other people."; + next; + mes "[Garnet]"; + mes "We can heal people who are in poor health or awaken the potential hidden deep within others."; + next; + mes "[Garnet]"; + mes "Feel free to ask me anything. Although the preist scolds me for my lack of skill, I can assure you I have a VERY STRONG grasp of the theories."; + next; + qMenu: + menu "About Heal",L0,"About Cure",L1,"About Increase AGI",L2,"About Angelus",L3,"Abour Blessing",L4,"About Warp Portal",L5,"End conversation",LEnd; + + L0: + mes "[Garnet]"; + mes "You can recover either your own, or someone else's HP with 'Heal'."; + next; + mes "[Garnet]"; + mes "If you learned 'Heal' while you were an Acolyte, then as priest you can create an HP recovering area with the skill 'Sanctuary'."; + next; + mes "[Garnet]"; + mes "Here is a little secret... if you use 'Heal' on Undead monsters, it will actually inflict damage, not help them."; + mes "Ah~ Don't forget to hold the 'Shift' key when you use it though... Ahem~ shhhhh~~!"; + next; + goto qMenu; + close; + L1: + mes "[Garnet]"; + mes "'Cure' can allieviate any abnormal status effects you may have. You have to have level 2 'Heal' in order to learn Cure though."; + next; + goto qMenu; + close; + L2: + mes "[Garnet]"; + mes "'Increase AGI' increases your movement speed, attack rate, and evade rate. You can learn it after you've learned 3 levels of 'Heal'."; + next; + goto qMenu; + close; + L3: + mes "[Garnet]"; + mes "You can use 'Angelus' in order to increase the Defense of either yourself or your party members."; + mes "Now remember, you can only use it on members IN YOUR party."; + next; + mes "[Garnet]"; + mes "Level 3 'Divine Protection' is needed to learn this skill."; + next; + mes "[Garnet]"; + mes "If you practice 'Angelus' you'll be able to use 'Kyrie Eleison' as a Priest, which allows you to evade attacks for a short period of time."; + next; + goto qMenu; + close; + L4: + mes "[Garnet]"; + mes "'Blessing' temporarily increases STR, DEX and INT. I am sure this skill will be of great advantage for your friends."; + next; + mes "[Garnet]"; + mes "'Blessing', like 'Angelus', also requires you know 'Divine Protection'. But you'll need to have 5 levels of 'Divine Protection' to learn it."; + next; + goto qMenu; + close; + L5: + mes "[Garnet]"; + mes "In order to open a 'Warp Portal' you first need to know how to 'Teleport', and in order to 'Teleport, you need 'Ruwach'."; + next; + mes "[Garnet]"; + mes "You can remember up to 4 warp points depending on the levels of 'Warp Portal' you've learned."; + mes "But at least one place must be saved with a Kafra employee."; + next; + mes "[Garnet]"; + mes "It's a bit of a hassle, but you have to physically be at the place you want to warp to, and save the position first."; + mes "This can be very dangerous in some areas so be quick~. Go in, save, and 'Teleport' out!"; + next; + mes "[Garnet]"; + mes "Also, 'Warp Portal' consumes a huge amount of energy, so you MUST use a 'Blue Gemstone' as a catalyst."; + next; + mes "[Garnet]"; + mes "One more thing, you cannot Warp to the inside of dungeons so don't even waste your time trying to."; + next; + goto qMenu; + close; + LEnd: + mes "[Garnet]"; + mes "Hehehe, hope I wasn't showing off too much. Well, be Happy in whatever you do~~!"; + close; + +} + + +// ----------------------------------------------------------------------------------------------- PUB -----------------------------------------------------------------------------------------------------\\ +// Sir Michael (West End Pub) +prt_in.gat,26,30,1 script Sir Michael 54, +{ + mes "[Sir Michael]"; + mes "I dunno if you'll ever believe me, but I saw the WEIRDEST thing down in the ^5555FFCulvert Sewers^000000."; + mes "I've been training in the 3rd level of the sewers for a long time now, so there's nothing about that area that I don't know."; + next; + mes "[Sir Michael]"; + mes "The 4th level is a different story however, and I must have ventured there when it happened......."; + next; + mes "[Sir Michael]"; + mes "I saw a GIAGANTIC, SHIMMERING, ^FF5555GOLDEN THIEF BUG^000000."; + emotion 0; + next; + mes "[Sir Michael]"; + mes "I all my years I've never seen a thief bug as LARGE or as SHINY!!! What an amazing sight!"; + close; +} + +//Shevild ---------------------------------------------------- +prt_in.gat,173,24,2 script Shevild 85,{ + mes "[Shevild]"; + mes "Hey~Hey~ Come on over and have a drink, man. I'll tell you some exciting stories."; + mes "Do not judge me by the way I look... I've been everywhere you can imagine around Prontera."; + mes "I've been to places packed with monsters, but they also have the greatest view."; + next; + menu "Where can I find those places?",L0,"Never mind",LEnd; + + L0: + mes "[Shevild]"; + mes "In spite of how I look, I'm a all around-player~~!!!"; + mes "I go hunting, I carry waepons and stuff... and I deliver this and that..."; + mes "Some people ask, 'isn't that a job for an errand boy?....'"; + next; + mes "[Shevild]"; + mes "But personally I am very proud of myself and of what i'm doing. You should know how harsh the world can be, right?"; + mes "But for me, nothing stands in the way of me accomplishing a job ~Ahem!"; + next; + mes "[Shevild]"; + mes "Anyways, thanks to my career, I've been able to visit many interesting places where nobody has ever visited before..."; + mes "Oh~ that's the true charm of my job..."; + next; + mes "[Shevild]"; + mes "Hm... Now... I'm suddenly reminded of a mysterious dungeon and a dangerous forest...."; + emotion 20; + next; + qMenu: + menu "The mysterious Dungeon?",L00,"The dangerous forest?",L01,"End conversation",L00End; + + L00: + mes "[Shevild]"; + mes "Hm... yeah... yeah... a while ago I followed some hunters to a very mysterious dungeon to the north of Prontera."; + next; + mes "[Shevild]"; + mes "Rumor says that the monsters are very tough there, but because of the high risk that you take, you get rewarded with valuble monster drops."; + mes "So I followed some highly skilled hunters there, but as soon as we stepped into the dungeon, we became confused by the maze of tunnels..."; + next; + mes "[Shevild]"; + mes "No matter which direction you moved it seemed like you were ending up where you started."; + mes "So we just got out empty-handed. I really want to explore that dungeon again sometime."; + next; + menu "How can I get there?",L00a,"End conversation",L00End; + + L00a: + mes "[Shevild]"; + mes "Huh? What? haven't you even wandered around just outside of Prontera yet, man?"; + mes "Alright, alright. I'll tell you. If you go north from the castle of Prontera, the dungeon is at the edge ot the north-west side of the forest."; + emotion 1; + next; + goto qMenu; + + L01: + mes "[Shevild]"; + mes "There is a splendid ruin to the north-east of Prontera. I went there a while ago to deliver something to a priest there."; + mes "Before you get to the ruins, there is a forest full of monkeys called ^FF4444Yoyos^000000."; + next; + mes "You have to be very cautious. As sone as you drop something on the ground, a Yoyo jumps out of nowhere and snatches it."; + next; + menu "How can I get there?",L01a,"End conversation",L00End; + + L01a: + mes "[Shevild]"; + mes "The directions might sound a little confusing, but it really isn't, actually. Go out to the north and keep going to the east. Then you will find it."; + next; + goto qMenu; + + L00End: + mes "[Shevild]"; + mes "Okay... Anyways watch out while you're traveling outhere ~ pal!!"; + close; + LEnd: + mes "[Shevild]"; + mes "Sure... if you wanna hear more, come back here anytime. No problem~~"; + close; +} + +// Bartender --------------------------------------------------------- +prt_in.gat,181,21,2 script Bartender 61,{ + mes "[Bartender]"; + mes "Phew~ more and more people a crawling in these days."; + mes "I am getting more and more tired everyday, though business has never been better..."; + mes "To tell you the truth, it's getting hard to get the right ingredients for my special dishes."; + next; + mes "[Bartender]"; + mes "As you probably know, recently there have many more monsters appearing outside of town. I don't dare step outside of this townn anymore."; + mes "Think about it. How can I possibly make my Ultra Nice Super Special dishes with just regular ingredients?"; + next; + mes "[Bartender]"; + mes "I don't just use any ingredients from the market you know. I use ingredients that come directly from monsters slain by Super heavy level hunters I personally hired."; + mes "And they are EXTREMELY FRESH, I might add."; + mes "But it's getting very hard to get enough of what I need even from them"; + next; + mes "[Bartender]"; + mes "If thing's don't change... my special menu of 'Sour Crunches' and 'Tasty Yum-Yum' will disappear from people's memories, sob... sob..."; + emotion 28; + next; + qMenu: + menu "'Sour Crunches'?",L0,"'Tasty Yum-Yum?'",L1,"Better let him be....",LEnd; + + L0: + mes "[Bartender]"; + mes "Special Ant is the essential ingredient in making Sour Crunches. It can be found in Ant Hell on the way to the desert city of Morrocco."; + mes "The problem is that the number of ants grows exponentialy and they also get very hostile. Most hunters don't even think about going near there."; + next; + mes "[Bartender]"; + mes "I can already see the ill fate that awaits my beloved pub... (Sighs~~)"; + next; + goto qMenu; + L1: + mes "[Bartender]"; + mes "It is a very tasty dish preparred with the legs of grasshopper creatures, called Rockers, that can be caught in the area past the forest to the west. ITS tHE BEST dish we have!"; + mes "Those grasshoppers have became very hostile and, moreover, an enormous number of bees have appeared out of nowhere in that area. It's almost impossible to get them."; + next; + mes "[Bartender]"; + mes "I can already see the ill fate that awaits my beloved pub... (Sighs~~)"; + next; + goto qMenu; + LEnd: + mes "[Bartender]"; + mes "(Sighs..) Anyways, be careful and take care of yourself~."; + close; +} + +// Marvin ----------------------------------------------------------- +prt_in.gat,177,18,2 script Marvin 80,{ + mes "[Marvin]"; + mes "....Usually skills are mastered at level 10. So some people get nervous about selecting which one they should learn."; + next; + mes "[Marvin]"; + mes "'Hm... if I learn this, I won't be able to learn that...' or 'Uh-Huh? With that skill, will I have enough points to master this skill?' Like this..."; + mes "BUT every rule has an EXCEPTION~~."; + mes "Not all skills require 10 skill points to be mastered. Ta-da~~... Ahem..."; + next; + mes "[Marvin]"; + mes "you can master some skills when at level 5. Even better, some skills only requiere 1 or 2 levels."; + mes "How pitiful would it be if you didn't learn a tremendously useful skill only beacuse you were afraid of using up your skill points."; + next; + mes "[Marvin]"; + mes "But don't just willy nilly and use up all your skill points on every skill either. Collect some information about skills and plan ahead."; + mes "That way, you can use your valuable skill points very wisely without wasting any."; + close; +} + +// Tensue ----------------------------------------------------- +prt_in.gat,177,20,2 script TenSue 97,{ + mes "[TenSue]"; + set @TEMP,0; + set @TEMP,rand(3); + if(@TEMP == 2) goto Rmsg2; + if(@TEMP == 1) goto Rmsg1; + if(@TEMP == 0) goto Rmsg0; + + Rmsg2: + mes "What? You're sick and tired of killing monsters in fields and dungeons?"; + mes "Hahaha, it seems like you are very confident in your training. If you think so..."; + mes "Why don't you visit Izlude, the satelitte of Prontera."; + emotion 1; + next; + mes "[TenSue]"; + mes "Cool Event Corp. has opened up the arena called Time Limit Fight and Battle Ordeal, to fullfill the young poeple's thirst for more excitement..."; + mes "Well... Of course you will have to pay a small fee to participate..."; + next; + mes "[TenSue]"; + mes "Are you gonna give it a shot?"; + close; + Rmsg1: + mes "One time I walked all the way to a place called 'Al de Baran'. It was a very dangerous trip with all those monsters..."; + mes "Some of monsters just kept following and attacking me although I did nothing to harm them."; + next; + mes "[TenSue]"; + mes "Well.. Nonetheless, the scenic views on the way were so magnificent that I truly believe it was worth trying..."; + mes "A canal surrounding 'Al de Baran' makes the city more distinguishably beautiful."; + next; + mes "[TenSue]"; + mes "Also the Kafra Main Office is located there so you can expect great services. Haha. Don't forget to visit there once."; + close; + Rmsg0: + mes "Prontera is presently under the reign of Tristram the 3rd. Everything we have now is only avaiable thanks to his Majesty."; + next; + mes "[TenSue]"; + mes "But you know those outsiders at the corner of Prontera? Why do we have to accept them all the time...I really think that is NOT necessary at all."; + mes "His Majesty ...well...is waaaaaaay to generous.."; + close; +} + + +//------------------------------------------------------------------------------------------------- Library ----------------------------------------------------------------------------------------\\ + +// Library Girl Ellen ---------------------------------------------------- +prt_in.gat,175,50,2 script Librarian Ellen 71,{ + mes "[Librarian Ellen]"; + mes "Welcome. You can find books about monsters, organized by thier properties here. There are also books about Merchant and Blacksmith skills."; + next; + mes "[Librarian Ellen]"; + mes "Ah~! The library next door also has many interesting reading materials so please visit there too."; + close; +} + +// Gurator Guiss ------------------------------------------------------- +prt_in.gat,178,92,2 script Curator Guiss 57,{ + mes "[Curator Guiss]"; + mes "Our library keeps records of monsters in various dungeons scattered around Rune-Midgard."; + mes "They are categorized according to each dungeon where the specific monster resides. Needless to say, every record is very easily accessible."; + next; + mes "[Curator Guiss]"; + mes "There are also must-read books for adventures on the top shelves. Please take your time and read those."; + next; + mes "[Curator Guiss]"; + mes "The library next door has organized records of monsters according to thier properties."; + mes "If you are interested, you should stop by there, too."; + close; +} diff --git a/npc/cities/umbala.txt b/npc/cities/umbala.txt new file mode 100644 index 000000000..bd155cf0f --- /dev/null +++ b/npc/cities/umbala.txt @@ -0,0 +1,1664 @@ +//===== eAthena script ======================================= +//= Umbala Town script +//===== By: ================================================== +//= jAthena (1.0) +//= Fusion Dev Team (1.1) +//= Muad Dib (1.2) +//= Darkchild (1.3) +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= Any eAthena Version; RO Episode XX +//===== Description: ========================================= +//= Umbala Town Npcs +//================================================== +//Phase1.Learning the Language +//1 (Elder)First discussion +//2 (Elder)Asking about learning the language +//3 (Elder)Final step (understanding NPC speech) +//------------------------------------------ +//Phase2.Create Essence/Dismantle Stone +//4 (Shaman)Get permission to speak with her from the chief +//5 (Elder)Ask about conditions needed to be fulfilled to get permission +//6 (Elder)Get permission +//7 (Shaman)Use the shaman to create essences and dismantle elemental stones. +//===== Additional Comments: ================================= +//= 1.0 - Done By jAthena (dunno Who) +//= 1.1 - Translated by Fusion Dev Team +//= 1.2 - Fixed Something by Muad Dib +//= 1.2 - Fixed up For eA by Darkchild +//============================================================ + + +//======================================================== +// == NPCs on the road to Umbala == +//======================================================== +//Note that On_Emotion is NOT an npc command but just an trigger for DoNpcEvent!! +comodo.gat,170,137,7 script Reid 84,{ + close; +On_Emotion20: + emotion 20; + end; +On_Emotion29: + emotion 29; + end; +} + +//======================================================== +comodo.gat,171,137,1 script Heath 92,{ + mes "[Reid]"; + mes "There's a huuuuuuuge treasure hidden"; + mes "somewhere around here!"; + next; + mes "[Heath]"; + mes "If only we could get our hands on it,"; + mes "the people who call us the 'Dunce Duo'"; + mes "will certainly have to eat their words!!"; + next; + mes "[Reid]"; + mes "We'll keep looking as long as it takes!"; + next; + donpcevent "Reid::On_Emotion29"; + emotion 29; + mes "[Heath]"; + mes "Hey, Reid, come on!"; + next; + mes "[Reid]"; + mes "............"; + next; + donpcevent "Reid::On_Emotion29"; + emotion 20; + mes "[Reid]"; + mes "Okay, okay...I'm coming."; + next; + menu "Hey, wait! Treasure?",Lwhat_1; + + Lwhat_1: + mes "[Reid]"; + mes "You mean you've never heard of it?!"; + next; + emotion 29; + mes "[Heath]"; + mes "Oh, you want to hear the story of the"; + mes "treasure, huh? Well, how imporant"; + mes "is it to you, really?"; + next; + mes "[Reid and Heath]"; + donpcevent "Reid::On_Emotion29"; + emotion 29; + mes "Important enough for you to"; + mes "cough up 1000 zeny?!"; + next; + menu "Alright. I'll be a sucker today",Lzeny_1,"Dream on, Dunce Duo!",Lzeny_2; + + Lzeny_1: + if(Zeny < 1000) goto Lzeny_no; + set Zeny,Zeny-1000; + mes "[Heath]"; + mes "Alright, my 'friend'. listen up."; + next; + mes "[Reid]"; + mes "A famous adventurer named Niles"; + mes "returned to this village from his"; + mes "adventures abroad."; + mes "He was dragging..."; + next; + mes "[Heath]"; + mes "...(Whisperwhisperwhisper)"; + mes "a really big box along behind him!!"; + next; + mes "[Reid]"; + mes "He returned during the dead of night,"; + mes "hoping no one would see his cargo."; + next; + mes "[Heath]"; + mes "There has to be something"; + mes "valuable in that box!"; + mes "There's no other explanation!"; + next; + mes "[Reid]"; + mes "I'm on a search for that box!"; + mes "I'm going to find it!"; + next; + emotion 20; + mes "[Heath]"; + mes "There's just one problem."; + mes "We don't have the slightest"; + mes "idea where Niles put the treasure."; + next; + mes "[Reid]"; + mes "Niles is making us look foolish!"; + next; + menu "Where is Niles now?",Lwhere_1; + + Lwhere_1: + mes "[Reid]"; + mes "He's on the north side of the village."; + next; + mes "[Heath]"; + mes "I hope this information was worth"; + mes "it."; + next; + mes "[Reid and Heath]"; + mes "It was certainly worth it to us!"; + mes "Heh heh heh!"; + close; + + Lzeny_no: + mes "[Reid]"; + mes "Hey! Come back when you're not dirt"; + mes "poor! Gotta spend money to make money, right?"; + close; + + Lzeny_2: + donpcevent "Reid::On_Emotion20"; + emotion 20; + mes "[Heath]"; + mes "Whaaaaat?! I swear that our marks"; + mes "aren't as gullible as they used to be."; + mes "How are we supposed to make an honest zeny?!"; + close; +} + +//======================================================== +cmd_in01.gat,175,120,3 script Iria 69,{ + mes "[Iria]"; + mes "That guy over at the far table"; + mes "in the corner is the adventurer"; + mes "Niles. He seems to have a wealth"; + mes "of stories about his many adventures."; + next; + mes "[Iria]"; + mes "He's always so boisterous, saying things"; + mes "like 'Will your journey lead you to fame,"; + mes "or to certain death?!'"; + next; + mes "[Iria]"; + mes "Nevertheless, anyone who talks to Niles"; + mes "for any length of time seems to be invariably"; + mes "inspired by his passion."; + close; +} + +//======================================================== +cmd_in01.gat,164,115,1 script Niles 731,{ + mes "[Niles]"; + mes "Oh?"; + mes "Another fool come to ask about"; + mes "that idiotic rumor circulating"; + mes "around town?"; + next; + mes "[Niles]"; + mes "The story about me finding a great"; + mes "treasure is a big misunderstanding."; + mes "In reality, it's just my collection"; + mes "of modest finds."; + next; + mes "[Niles]"; + mes "That said, I think I have a lead"; + mes "on a potentially lucrative "; + mes "item just waiting to be found."; + next; + mes "[Niles]"; + mes "Don't you think that cave"; + mes "near Komodo village is interesting?"; + next; + mes "[Niles]"; + mes "I think a large jewel may be"; + mes "hidden within its confines."; + next; + mes "[Niles]"; + mes "Until recently, we didn't know how to"; + mes "reach the cave."; + next; + mes "[Niles]"; + mes "............."; + next; + mes "[Niles]"; + mes ".......Hm?"; + next; + mes "[Niles]"; + mes "Is your mind set on going there?!"; + mes "Can you imagine what you'll find?!"; + next; + mes "[Niles]"; + mes "Doesn't just talking about it make"; + mes "you want to go on an adventure?!!!"; + next; + mes "[Niles]"; + mes "Just break down any barrier in your"; + mes "path and trust your primal instincts"; + mes "to guide you to your goal!"; + next; + mes "[Niles]"; + mes "Go! Quickly!"; + next; + mes "[Niles]"; + mes "Will you find the path to fame on"; + mes "your journey, or the path to certain"; + mes "death?! Hahahaha!!!!"; + close; +} + + +//================================================================== +// Umbala NPCs and Quests +//================================================================== + +//================================================================== +//Trade money for meat +umbala.gat,70,106,3 script Utan Child#1 781,{ +if(event_umbala < 3) goto LumWord; + mes "[HHH]"; + mes "Hello! I'm a member of"; + mes "the Utan tribe."; + next; + mes "[HHH]"; + mes "My name is Hatan! Nice to"; + mes "meet you."; + emotion 18; + next; + mes "[Hatan]"; + mes "...I can't play now, because"; + mes "a recent thunderstorm caused"; + mes "the roof of our house to become"; + mes "cracked..."; + emotion 28; + next; + mes "[Hatan]"; + mes "...!"; + next; + mes "[Hatan]"; + mes "Hey! You guys seem pretty well"; + mes "off. Do you think you could"; + mes "give us a little zeny"; + mes "so we can fix the crack?"; + mes "Please!"; + emotion 28; + next; + menu "Nod",-,"Shake Head",Lend2; + + if(Zeny < 1000) goto LError2; + mes "[Hatan]"; + mes "Yay!!"; + mes "You're the best!!"; + set Zeny,Zeny-1000; + getitem 517,1; + emotion 19; + next; + mes "[Hatan]"; + mes "Please take this as a token of my gratitude."; + emotion 18; + close; + + LError2: + mes "[Hatan]"; + mes "Well, maybe I misunderestimated your"; + mes "wealth, but you shouldn't lie..."; + emotion 32; + close; + Lend2: + mes "[Hatan]"; + mes "...Awwwww."; + emotion 28; + close; + +LumWord: + mes "[HHH]"; + mes "Umba!"; + mes "Umbaluwababawamuba."; + next; + mes "[HHH]"; + mes "Umba! Umbaumba!"; + mes "Umbabama Hatan baba."; + emotion 18; + next; + mes "[Hatan]"; + mes "...Umba, Umbaumbaumba."; + mes "Umbaumbaumbababa."; + mes "Umbabawaumbaumbaba."; + mes "Umbaumba."; + mes "...Umbaumbamabababumba."; + emotion 28; + next; + mes "[Hatan]"; + mes "...!"; + next; + mes "[Hatan]"; + mes "Umba!"; + mes "Umbaumbaumbababa."; + mes "Umbababaumbawabaumba!"; + mes "Umbaumbaumbababa."; + mes "wamfuba! Umba!"; + emotion 28; + next; + menu "Nod",-,"Shake Head",Lend; + + if(Zeny < 1000) goto LError; + mes "[Hatan]"; + mes "Umbaumba!!"; + mes "Um!-babaumba-baumba-."; + mes "Umba-umba-Umbabawamamaba!"; + set Zeny,Zeny-1000; + getitem 517,1; + emotion 19; + next; + mes "[Hatan]"; + mes "Umbaumba...."; + emotion 18; + close; + + LError: + mes "[Hatan]"; + mes "Umba-Umbana!"; + emotion 32; + close; + Lend: + mes "[Hatan]"; + mes "....Umba...."; + emotion 28; + close; +} + +//================================================================== +//Trade Meat for Clover, ???, and Soft Fur +umbala.gat,59,243,5 script Utan Child#4 787,{ +if(event_umbala < 3) goto LumWord; + mes "[Kotan]"; + mes "....."; + mes "....."; + mes "...I want meat."; + mes "...Gimme meat!"; + next; + menu "Sure",-,"No way!",L2; + if(countitem(517) < 1) goto LError; + mes "[Kotan]"; + mes "Hey, thanks!"; + mes "Take these!"; + emotion 10; + delitem 517,1; + getitem 909,2; + getitem 914,2; + getitem 705,2; + close; + L2: + mes "[Kotan]"; + mes "......"; + mes "...I'm hungry!"; + mes "...Gimme meat!"; + emotion 28; + close; +LError: + mes "[Kotan]"; + mes "Hey! You said you have"; + mes "meat! So you were lying?"; + mes "I hate you!"; + emotion 6; + close; +LumWord: + mes "[HHH]"; + mes "...."; + mes "...."; + mes "...Umbaba!"; + mes "...Famba!"; + emotion 11; + next; + menu "Umba",-,"Umbabu",Lu2; + if(countitem(517) < 1) goto LuError; + mes "[HHH]"; + mes "Umbaumbaumbababa."; + mes "Umbababauma."; + emotion 10; + delitem 517,1; + getitem 909,2; + getitem 914,2; + getitem 705,2; + close; + Lu2: + mes "[HHH]"; + mes "...."; + mes "......Unguba!"; + mes "....Umbababa."; + emotion 28; + close; +LuError: + mes "[HHH]"; + mes "Umbawamufumabababa!"; + mes "Umbabababaumbaumbu!"; + emotion 6; + close; +} + +//============================================================================== +//Skeletal Gate +//============================================================================== +umbala.gat,221,193,1 script #Skeletal Gate 111,{ + if(event_umbala==7) goto LwarpNoText; + set @ryumon,0; + mes "^3355FFThe gate is shaped like a skeleton"; + mes "You cannot pass this point as the gate is"; + mes "locked. You hear sounds coming from the"; + mes "inside.^000000"; + next; + menu "Examine the skeleton",-,"Nothing",Lend; + mes "^3355FFWhen you examine the gate"; + mes "carefully, you notice that there"; + mes "is a hole about the size of a gemstone"; + mes "on the left side of the gate about where"; + mes "the skeleton's left eye should be. There is"; + mes "a matching hole on the other side.^000000"; + next; + mes "^3355FFWhat you would like to"; + mes "to do with the left socket?^000000"; + next; + menu "Nothing",-,"Insert a Blue Gemstone",L1_2,"Insert a Yellow Gemstone",L1_3,"Insert a Red Gemstone",L1_4; + mes "^3355FFNothing was inserted into the left socket.^000000"; + next; + goto LRight; + L1_2: + //Blue + if(countitem(717) < 1) goto L1_2_e; + mes "^3355FFYou inserted a Blue Gemstone into the"; + mes "left socket.^000000"; + next; + delitem 717,1; + getitem 717,1; + set @ryumon,1; + mes "^3355FFA rolling sound can be heard, and"; + mes "the gemstone comes out of the skeleton's mouth.^000000"; + next; + goto LRight; + L1_3: + //Yellow + if(countitem(715) < 1) goto L1_3_e; + mes "^3355FFYou inserted a Yellow Gemstone into the"; + mes "left socket.^000000"; + next; + delitem 715,1; + getitem 715,1; + set @ryumon,2; + mes "^3355FFA rolling sound can be heard, and"; + mes "the gemstone comes out of the skeleton's mouth.^000000"; + next; + goto LRight; + L1_4: + //Red + if(countitem(716) < 1) goto L1_4_e; + mes "^3355FFYou inserted a Red Gemstone into the"; + mes "left socket.^000000"; + next; + delitem 716,1; + getitem 716,1; + set @ryumon,3; + mes "^3355FFA rolling sound can be heard, and"; + mes "the gemstone comes out of the skeleton's mouth.^000000"; + next; + goto LRight; + L1_2_e: + mes "^3355FFYou don't have a Blue Gemstone."; + goto L1_e; + L1_3_e: + mes "^3355FFYou don't have a Yellow Gemstone."; + goto L1_e; + L1_4_e: + mes "^3355FFYou don't have a Red Gemstone."; + L1_e: + mes "Therefore, nothing was inserted into"; + mes "the left socket.^000000"; + next; + LRight: + mes "^3355FFWhat about the right"; + mes "socket?^000000"; + next; + menu "Nothing",-,"Insert a Blue Gemstone",L2_2,"Insert a Yellow Gemstone",L2_3,"Insert a Red Gemstone",L2_4; + mes "^3355FFNothing was inserted into the right socket.^000000"; + next; + goto Lfin; + L2_2: + //Blue + if(countitem(717) < 1) goto L2_2_e; + mes "^3355FFYou inserted a Blue Gemstone into the"; + mes "left socket.^000000"; + next; + delitem 717,1; + getitem 717,1; + set @ryumon,@ryumon+10; + mes "^3355FFA rolling sound can be heard, and"; + mes "the gemstone comes out of the skeleton's mouth.^000000"; + next; + goto Lfin; + L2_3: + //Yellow + if(countitem(715) < 1) goto L2_3_e; + mes "^3355FFYou inserted a Yellow Gemstone into the"; + mes "left socket.^000000"; + next; + delitem 715,1; + getitem 715,1; + set @ryumon,@ryumon+20; + mes "^3355FFA rolling sound can be heard, and"; + mes "the gemstone comes out of the skeleton's mouth.^000000"; + next; + goto Lfin; + L2_4: + //Red + if(countitem(716) < 1) goto L2_4_e; + mes "^3355FFYou inserted a Red Gemstone into the"; + mes "left socket.^000000"; + next; + delitem 716,1; + getitem 716,1; + set @ryumon,@ryumon+30; + mes "^3355FFA rolling sound can be heard, and"; + mes "the gemstone comes out of the skeleton's mouth.^000000"; + next; + goto Lfin; + L2_2_e: + mes "^3355FFYou don't have a Blue Gemstone."; + goto L2_e; + L2_3_e: + mes "^3355FFYou don't have a Yellow Gemstone."; + goto L2_e; + L2_4_e: + mes "^3355FFYou don't have a Red Gemstone."; + L2_e: + mes "Therefore, nothing was inserted into"; + mes "the right socket.^000000"; + next; + Lfin: + mes "^3355FF..........^000000"; + next; + mes "^3355FF..................."; + mes ".....................^000000"; + next; + mes "^3355FF......................."; + mes "........................."; + mes ".........................^000000"; + next; + if(event_umbala < 6) goto LLSecondCheck; + if(@ryumon == 33) goto Lwarp; + LSecondCheck: + if(event_umbala >= 6) goto LLNewEnd; + if(@ryumon == 13) goto Lwarp; + LNewEnd: + mes "^3355FFNothing happened."; + mes "You hear a faint laugh, but"; + mes "decide that it's all in"; + mes "your head.^000000"; + close; + Lwarp: + mes "^3355FFA rumbling sound can be"; + mes "heard as the gate opens."; + mes "As you step across the threshold."; + mes "you feel as if you're walking in"; + mes "into the arms of death itself.^000000"; + next; + LwarpNoText: + warp "um_in.gat",32,71; + close; +Lend: + mes "^3355FFAfter hitting the gate a few"; + mes "times with no result, you decide to give"; + mes "up.^000000"; + close; +} + +//============================================================================== +//Umbala Event +//============================================================================== +um_in.gat,39,122,5 script Utan Tribal Elder 784,{ + if(event_umbala == 1) goto LStart2; + if(event_umbala == 2) goto LStart3; + if(event_umbala == 3) goto LStart4; + if(event_umbala == 4) goto LStart5; + if(event_umbala == 5) goto LStart6; + if(event_umbala == 6) goto LStart4; + if(event_umbala == 7) goto LStart4; + mes "[Karukatan]"; + mes "Aha, You're new to the Utan"; + mes "family's little village, aren't"; + mes "you? I would remember such a face"; + mes "had I met you before."; + next; + mes "[Karukatan]"; + mes "We know there is a wide world around"; + mes "us, but the there is something to"; + mes "be appreciated in the simple life"; + mes "we lead here."; + next; + mes "[Karukatan]"; + mes "All decisions in the village are made"; + mes "by me or with my input"; + next; + mes "[Karukatan]"; + mes "You want to know how I speak your"; + mes "language when it seems no one else in"; + mes "the village does? A fair question."; + mes "I picked up your tongue from the"; + mes "adventurers who sometimes pass"; + mes "through this village."; + next; + mes "[Karukatan]"; + mes "Some outsiders have also settled near here"; + mes "over time. In exchange for information"; + mes "about their customs and culture, I"; + mes "teach them the language and customs"; + mes "of the Utan tribe."; + next; + mes "[Karukatan]"; + mes "If you want to learn our language,"; + mes "you must immerse yourselves in"; + mes "our customs and cultural traditions."; + mes "You should even try and look as much"; + mes "like us as you can."; + next; + mes "[Karukatan]"; + mes "I hope you're worthy of my confidence."; + mes "Some members of the tribe have expressed"; + mes "the sentiment that welcoming outsiders"; + mes "is dangerous to the village."; + next; + mes "[Karukatan]"; + mes "When you want to begin learning the"; + mes "language, come and visit me. Don't"; + mes "forget to make yourself appear as"; + mes "much like us as you can."; + set event_umbala,1; + close; +LStart2: + mes "[Karukatan]"; + mes "Ahh, have you looked around the"; + mes "village a bit? Did other people"; + mes "from the tribe hide from you when"; + mes "they saw you? Don't worry. They"; + mes "were just surprised to see a new face."; + next; + mes "[Karukatan]"; + mes "Hmm? You need something from me?"; + mes "How can I make your stay in the village"; + mes "more pleasent?"; + next; + menu "I want to learn the tribal language",-,"Umbaumbaba?",L2,"Forget it",L3; + if ((getequipisequiped(9)>0) && (getequipisequiped(10)>0)) goto L1_mask; + mes "[Karukatan]"; + mes "Well, in order to understand our"; + mes "language, you need to assimilate"; + mes "our cultural values, too. Trying to"; + mes "understand a language in the context of an"; + mes "alien culture is foolish, right?"; + next; + mes "[Karukatan]"; + mes "Besides, if the tribesmen in the"; + mes "village fear you, how will you"; + mes "ever get them to speak with you?"; + mes "You should try making yourself"; + mes "look like us in order to be more"; + mes "accepted."; + close; + L1_mask: + mes "[Karukatan]"; + mes "What a cute mask. The Utan tribe"; + mes "appreciates its traditional masks"; + mes "because sometimes by hiding your"; + mes "face, you can express more geniune"; + mes "feelings."; + next; + mes "[Karukatan]"; + mes "Over time, the mask itself"; + mes "has come to symbolize trust among"; + mes "the members of the Utan tribe."; + next; + mes "[Karukatan]"; + mes "Now that you're prepared, I will"; + mes "begin teaching you the Utan"; + mes "language as promised. First,"; + mes "you need to make some preparations,"; + mes "however..."; + next; + mes "[Karukatan]"; + mes "First, I need some paper. With"; + mes "paper, I can write down the words"; + mes "I intend to teach."; + next; + mes "[Karukatan]"; + mes "I need ^3377FF10x Oily Paper^000000, and ^3377FF5x Smooth Paper^000000."; + mes "I also need something to write with."; + mes "of course."; + mes "For that, ^3377FF1x India Ink^000000 and ^3377FF1x Bird Feather^000000"; + mes "will do nicely."; + next; + mes "[Karukatan]"; + mes "Once you get these, I can start"; + mes "teaching you the language."; + set event_umbala,2; + close; + L2: + mes "[Karukatan]"; + mes "Haha. Only imitating the sound"; + mes "of the words is useless. Even"; + mes "though it sounds random, there is"; + mes "a specific way of combining the"; + mes "words."; + next; + mes "[Karukatan]"; + mes "Also, our language has depends a"; + mes "a lot on emotion to convey its"; + mes "meaning. Outsiders can't pick up"; + mes "the subtlety right away, even though"; + mes "we're the same race, "; + next; + mes "[Karukatan]"; + mes "It seems you have an interest"; + mes "in learning the language of the"; + mes "Utan tribe. If that's the case,"; + mes "come visit me and I'll teach you."; + next; + mes "[Karukatan]"; + mes "Then, you won't sound so silly."; + close; + L3: + mes "[Karukatan]"; + mes "Ah. If you want to continue your"; + mes "trip, please keep this village in"; + mes "your memories."; + close; +LStart3: + if ((countitem(7151)>=10) && (countitem(7111)>=5) && (countitem(1024)>=1) && (countitem(916)>=1)) goto Lchkok; + mes "[Karukatan]"; + mes "It seems you've not yet prepared the"; + mes "proper items. Did you forget what"; + mes "you need to gather before I can"; + mes "teach you the language? You need to gather"; + next; + mes "[Karukatan]"; + mes "^3377FF10x Oily Paper^000000,"; + mes "^3377FF5x Smooth Paper^000000,"; + mes "^3377FF1x India Ink^000000, and"; + mes "^3377FF1x Bird Feather^000000."; + mes "Once you have gathered those, I can teach"; + mes "you Utan tribal language."; + close; +Lchkok: + mes "[Karukatan]"; + mes "Good. You've prepared all the"; + mes "necessary materials. Now, I can"; + mes "begin to teach you the Utan tribal"; + mes "language."; + next; + mes "[Karukatan]"; + mes "............"; + next; + mes "[Karukatan]"; + mes "............"; + mes "............"; + next; + mes "[Karukatan]"; + mes "............"; + mes "............"; + mes "............"; + next; + mes "[Karukatan]"; + mes "Do you feel more enlightened now?"; + mes "Try talking to others in the Utan"; + mes "tribe. They'll warm up to your quickly"; + mes "now that you speak the language."; + delitem 7151,10; + delitem 7111,5; + delitem 1024,1; + delitem 916,1; + set event_umbala,3; + next; + mes "[Karukatan]"; + mes "If you need something while you're"; + mes "here, don't hesitate to visit me."; + close; +LStart4: +//fin + mes "[Karukatan]"; + mes "Do you need something?"; + mes "If you need someone to guide you around"; + mes "the village, you should ask someone else."; + mes "I can't leave here right now."; + next; + mes "[Karukatan]"; + mes "The best way to get a feel for"; + mes "the village is to just walk"; + mes "around and see the sights. By doing"; + mes "that, you can form a personal"; + mes "bond with the village."; + close; +LStart5: + mes "[Karukatan]"; + mes "Oh, it seems you're enjoying yourself here."; + mes "You need something else?"; + next; + mes "[Karukatan]"; + mes "It seems you want to ask the"; + mes "shaman Putsuchiratan something"; + mes "and you're seeking my permission"; + mes "to do so."; + next; + mes "[Karukatan]"; + mes "Well...There's a mask from"; + mes "abroad that Putsuchiratan and I"; + mes "have both always desired. Putsuchiratan"; + mes "heard about it some time ago."; + next; + mes "[Karukatan]"; + mes "If I could have the ^3377FFSmile Mask^000000,"; + mes "it would be a great honor, but"; + mes "I promised I would give it to"; + mes "to Putsuchiratan as a gift if I ever"; + mes "came across one. If you can find a Smile Mask for me,"; + mes "I'll give you permission to speak with her."; + set event_umbala,5; + close; +LStart6: + if(countitem(2278) > 0) goto Lsmileok; + mes "[Karukatan]"; + mes "Did you find the ^3377FFSmile Mask^000000 yet?"; + mes "In order to let you see the shaman,"; + mes "you need to collect one."; + mes "A gift will put Putsuchiritan in"; + mes "a good mood, also."; + close; +Lsmileok: + mes "[Karukatan]"; + mes "Ahh! It's a Smile Mask!"; + mes "I would really like to put this"; + mes "on just once, but I promised to"; + mes "give this to Putsuchiritan as"; + mes "a gift."; + delitem 2278,1; + set event_umbala,6; + next; + mes "[Karukatan]"; + mes "I'll tell Putsuchiritan to allow you"; + mes "to meet with her. I'm certain that you"; + mes "will find her talents to be a tremendous"; + mes "help on your journey."; + close; +} + +//===================================================================== +um_in.gat,44,71,2 script Utan Tribe Shaman 782,{ + if(event_umbala < 3) goto LumWord; + if(event_umbala == 4) goto LStart2; + if(event_umbala == 5) goto LStart2; + if(event_umbala == 6) goto LStart3; + if(event_umbala == 7) goto LStart4; + mes "[Putsuchiritan]"; + mes "I will not see outsiders that are"; + mes "not from the Utan tribe."; + mes "...There are many things about the"; + mes "nature of our society that you do"; + mes "not yet understand."; + next; + mes "[Putsuchiritan]"; + mes "Others of your type will do anything"; + mes "to set foot on land which is sacred"; + mes "to the Utan tribe. We fear that"; + mes "revealing our secrets will expose"; + mes "use to danger."; + next; + mes "[Putsuchiritan]"; + mes "What's worse, I don't think that"; + mes "outsiders understand our desire"; + mes "to preserve our tribal culture."; + next; + mes "[Putsuchiritan]"; + mes "As my talents are foremost for"; + mes "the use of the Utan tribe, you"; + mes "must get permission from the elder"; + mes "if you want my assistance."; + mes "Also, don't be stirring up trouble"; + mes "among the tribesmen."; + set event_umbala,4; + close; +LStart2: + mes "[Putsuchiritan]"; + mes "Didn't you hear me? You need"; + mes "to get the elder's permission before"; + mes "I can help you."; + close; +LStart3: + mes "[Putsuchiritan]"; + mes "You seem to have gotten permission from"; + mes "the elder. Fine, I'll help you, though"; + mes "I don't really want to."; + next; + mes "[Putsuchiritan]"; + mes "I can call forth hidden talents"; + mes "buried deep within your psyche"; + mes "and tap the power hidden in"; + mes "elemental stones."; + next; + mes "[Putsuchiritan]"; + mes "I need to prepare my rituals."; + mes "When you're ready to proceed, please"; + mes "talk to me again."; + set event_umbala,7; + close; +LStart4: + set @umchange[1],0; + set @umchange[2],0; + set @umchange[3],0; + set @umchange[4],0; + mes "[Putsuchiritan]"; + mes "I don't know whether my talents"; + mes "will be useful to you, but I'll"; + mes "help you anyway."; + next; + mes "[Putsuchiritan]"; + mes "I can create elemental essence from natural objects,"; + mes "or, dismantle elemental stones into their component essences."; + mes "Which would you like to do?"; + next; + menu "Create Essence",L1,"Dismantle Elemental Stone",L2,"Nothing",-; + mes "[Putsuchiritan]"; + mes "If you don't wish my help at the moment,"; + mes "that's fine. When you do, please come"; + mes "by again."; + close; +L1: + mes "[Putsuchiritan]"; + mes "Which elemental essence would you"; + mes "like to create? I can create earth, water,"; + mes "fire, and wind essence."; + next; + menu "Earth",L1_1,"Water",L1_2,"Fire",L1_3,"Wind",L1_4; + L1_1: + if (countitem(947)<15) goto L1_1e; + set @umchange[1],947; + set @umchange[2],15; + set @umchange[3],993; + goto L1_ketugou; + L1_2: + if (countitem(946)<20) goto L1_2e; + set @umchange[1],946; + set @umchange[2],20; + set @umchange[3],991; + goto L1_ketugou; + L1_3: + if (countitem(904)<20) goto L1_3e; + set @umchange[1],904; + set @umchange[2],20; + set @umchange[3],990; + goto L1_ketugou; + L1_4: + if (countitem(1013)<25) goto L1_4e; + set @umchange[1],1013; + set @umchange[2],25; + set @umchange[3],992; + goto L1_ketugou; + L1_ketugou: + mes "[Putsuchiritan]"; + mes "Now, I will try to tap the"; + mes "source of power hidden deep within"; + mes "you. Choose a number between 1 and 9."; + mes "If you don't want to create essence"; + mes "after all, choose 0."; + next; + L1_input: + input @umchange[4]; + if (@umchange[4]==0) goto L1_cancel; + if (@umchange[4]>9) goto L1_numError; + mes "[Putsuchiritan]"; + if (@umchange[1]==947) mes "The horn begins to vibrate."; + if (@umchange[1]==904) mes "The tail begins to vibrate."; + if ((@umchange[1]==1013) && (@umchange[1]==946)) mes "The skin begins to vibrate."; +//End Possible Conversion + mes "I will now chant a holy mantra."; + mes "Imagine the number in your mind"; + mes "and imagine power radiating forth from"; + mes "your body."; + next; + mes "[Putsuchiritan]"; + mes "Amba Omba Sanba! Unba Chi!"; + mes "Wanbatauma Eurukaba! Unba! Ba!"; + mes "Jyur! Fumuba Rurara! Wamba! Ra!"; + mes "Damtsuha Ombabaraka! Unba! Shi!"; + mes "Sukatamba Aburumba! Umba! Shi!"; + next; + delitem @umchange[1],@umchange[2]; + getitem @umchange[3],@umchange[4]; + mes "[Putsuchiritan]"; + mes "There. Your inner power has converted"; + mes "these objects from nature into"; + mes "elemental essence. Put"; + mes "it to good use."; + close; +L1_cancel: + mes "[Putsuchiritan]"; + mes "If you don't wish my help at the moment,"; + mes "that's fine. When you do, please come"; + mes "by again."; + close; +L1_numError: + mes "[Putsuchiritan]"; + mes "You must choose a number between"; + mes "1 and 9. It is very important that"; + mes "you choose the number most dear to"; + mes "your heart."; + next; + goto L1_input; +L1_1e: + mes "[Putsuchiritan]"; + mes "Earth...You need that which is"; + mes "a friend of the earth. Explore"; + mes "the verdant forest and find"; + mes "^3377FF15x Horn^000000 for the ritual."; + goto L1_empty; +L1_2e: + mes "[Putsuchiritan]"; + mes "Water...You need that which is"; + mes "saturated with water. Explore"; + mes "the area around here and find"; + mes "^3377FF20x Katashimuri Skin^000000 for the ritual."; + goto L1_empty; +L1_3e: + mes "[Putsuchiritan]"; + mes "Fire...You need that which"; + mes "can withstand the roiling heat"; + mes "of perpetual flame. Explore the"; + mes "desert and find ^3377FF20x Scorpion Tail^000000"; + mes "for the ritual."; + goto L1_empty; +L1_4e: + mes "[Putsuchiritan]"; + mes "Wind...You need that which"; + mes "has an easy camaraderie with"; + mes "the sky itself."; + mes "You need ^3377FF25x Radiant Pelt^000000"; + mes "to complete the ritual."; +L1_empty: + next; + mes "[Putsuchiritan]"; + mes "Once you've prepared these"; + mes "objects from nature, please return here"; + mes "so we can complete the ritual."; + close; +//---------------------------------------------------------- +L2: + mes "[Putsuchiritan]"; + mes "What type of stone would you like to"; + mes "dismantle? Please choose earth, water,"; + mes "fire, or wind."; + next; + menu "Earth",L2_1,"Water",L2_2,"Fire",L2_3,"Wind",L2_4; + L2_1: + if (countitem(997)<1) goto L2_1e; + set @umchange[1],997; + set @umchange[2],1; + set @umchange[3],993; + goto L2_bunkai; + L2_2: + if (countitem(995)<1) goto L2_2e; + set @umchange[1],995; + set @umchange[2],1; + set @umchange[3],991; + goto L2_bunkai; + L2_3: + if (countitem(994)<1) goto L2_3e; + set @umchange[1],994; + set @umchange[2],1; + set @umchange[3],990; + goto L2_bunkai; + L2_4: + if (countitem(996)<1) goto L2_4e; + set @umchange[1],996; + set @umchange[2],1; + set @umchange[3],992; + goto L2_bunkai; + L2_bunkai: + mes "[Putsuchiritan]"; + if (@umchange[1]==997) mes "I will dismantle your earth crystal"; + if (@umchange[1]==995) mes "I will dismantle your frozen crystal"; + if (@umchange[1]==994) mes "I will dismantle your heart of flame"; + if (@umchange[1]==996) mes "I will dismantle your rough wind stone"; + mes "into its component essence."; + mes "Choose a number between 1 and 9."; + mes "If you don't want me to dismantle the"; + mes "stone, choose 0."; + next; + L2_input: + input @umchange[4]; + if (@umchange[4]==0) goto L2_cancel; + if (@umchange[4]>9) goto L2_numError; +//Calculating number of essences + set @umchange[4],rand(5)+@umchange[4]; + set @umchange,@umchange + @rand; + if (@umchange[4]>10) set @umchange[4],@umchange[4]-10; + if (@umchange[4]<5) set @umchange[4],@umchange[4]+5; + mes "[Putsuchiritan]"; + mes "Please place the elemental stone"; + mes "inside this holy circle. I will chant a"; + mes "a mantra. I don't know if I can"; + mes "completely dismantle the stone,"; + mes "but here goes..."; + next; + mes "[Putsuchiritan]"; + mes "Unba Unba Karama! Unba! Ta!"; + mes "Rukara! Ukarere! Un! Unba! Ka!"; + mes "Anburaka Taburaka Taburakan! Unba Ra!"; + mes "Onbaruzu Zan Kata! Unba Ka!"; + mes "Kan Tsun Rakarakan! Unba! Ha!"; + next; + delitem @umchange[1],@umchange[2]; + getitem @umchange[3],@umchange[4]; + mes "[Putsuchiritan]"; + mes "The elemental stone has been"; + mes "dismantled into its natural"; + mes "essence. Please put it to"; + mes "good use."; + close; +L2_cancel: + mes "[Putsuchiritan]"; + mes "If you don't wish my help at the moment,"; + mes "that's fine. When you do, please come"; + mes "by again."; + close; +L2_numError: + mes "[Putsuchiritan]"; + mes "You must choose a number between"; + mes "1 and 9. It is very important that"; + mes "you choose the number most dear to"; + mes "your heart."; + next; + goto L2_input; +L2_1e: mes "[Putsuchiritan]"; + mes "You need to have"; + mes "^3377FF1x Great Nature^000000"; + mes "to disassemble into its"; + mes "component essence."; + goto L2_empty; +L2_2e: + mes "[Putsuchiritan]"; + mes "You need to have"; + mes "^3377FF1x Mystic Frozen^000000"; + mes "to disassemble into its"; + mes "component essence."; + goto L2_empty; +L2_3e: + mes "[Putsuchiritan]"; + mes "You need to have"; + mes "^3377FF1x Flaming Heart^000000"; + mes "to disassemble into its"; + mes "component essence."; + goto L2_empty; +L2_4e: + mes "[Putsuchiritan]"; + mes "You need to have"; + mes "^3377FF1x Rough Wind^000000"; + mes "to disassemble into its"; + mes "component essence."; +L2_empty: + next; + mes "[Putsuchiritan]"; + mes "Once you have the necessary stone,"; + mes "please come back and visit me"; + mes "so that the ritual can be completed."; + close; +LumWord: + mes "[HHHHH]"; + mes "Umbaumbaumbaba Utan Umbaba"; + mes "Umbaumbaumbafumbabauma..."; + mes "Umbabaumbaumbabaumbabaumba"; + mes "Umbabaumbabaumbaumbabaumba"; + mes "Fumbaumba."; + next; + warp "umbala.gat",217,186; + close; +} + +//===================================================================== +umbala.gat,177,153,3 script Bast 97,{ + if (event_umbala>=3) emotion 0; + mes "[Bast]"; + mes "Oh! Another outsider. It's"; + mes "great to encounter another one"; + mes "in this village! My name is"; + mes "Bast."; + next; + mes "[Bast]"; + mes "Because Umbala village is isolated"; + mes "within a deep forest, its culture"; + mes "is unaffected by the steady pull"; + mes "of progress."; + next; + mes "[Bast]"; + mes "Not only that, but the natives' skin color"; + mes "and language are also different."; + mes "Aren't you confused by their"; + mes "alien gestures and expressions?"; + next; + mes "[Bast]"; + mes "Even the things you would expect"; + mes "to transcend culture have a"; + mes "different meaning in Umbala."; + next; + mes "[Bast]"; + mes "Just because a tribeman's face laughs"; + mes "doesn't necessarily mean his"; + mes "heart is laughing. Understand?"; + next; + emotion 28; + mes "[Bast]"; + mes "Because of that, people in the village"; + mes "who know our language may have trouble!!"; + close; +} + +//===================================================================== +umbala.gat,80,146,4 script Yuki 753,{ + mes "[Yuki]"; + mes "Umbaubaugau...Oh!"; + mes "You're from abroad? That's"; + mes "wonderful! I didn't think that"; + mes "I would meet someone else from abroad."; + mes "Hahaha."; + next; + mes "[Yuki]"; + mes "I came here looking for strong"; + mes "companions, but I was unable"; + mes "to understand the language."; + mes "I had to listen to the language being spoken"; + mes "for some time before I picked it up."; + mes "Hahaha."; + next; + mes "[Yuki]"; + mes "The people here seem to want to"; + mes "preserve their native culture while"; + mes "eschewing the trappings of modern life."; + mes "The tribesmen are really prone to"; + mes "mischief-making."; + next; + mes "[Yuki]"; + mes "The primitive atmosphere here is really"; + mes "refreshing. Tribal law is very lax and"; + mes "doesn't intrude upon one's enjoyment of"; + mes "the village. It's really wonderful."; + close; +} + +//===================================================================== +um_in.gat,101,73,3 script Yunatan 783,{ + if(event_umbala < 3) goto LumWord; + mes "[Yunatan]"; + mes "I'm standing out here because I"; + mes "can't stand to lay eyes on"; + mes "that lecher Wambokoriotan."; + mes "I hate his guts!"; + close; +LumWord: + mes "[Yunatan]"; + mes "Umbaba! Umbaumbaugaga"; + mes "Ugugumubaugaumuumu."; + mes "Umbabababababababa."; + close; +} + +//===================================================================== +um_in.gat,94,123,5 script Bartsutan 783,{ + if(event_umbala < 30) goto LumWord; + mes "[Bartsutan]"; + mes "I want to see Wambokoriotan"; + mes "morph into an insect so I can"; + mes "have the satisfaction of crushing"; + mes "his skull! I hate him and his"; + mes "advances! I wish he would just stay"; + mes "away from me."; + close; +LumWord: + mes "[Bartsutan]"; + mes "Umbarugumbarumbauma!"; + mes "Umuguugumubarumba."; + mes "Umba...uumu."; + close; +} + +//===================================================================== +umbala.gat,140,157,6 script Utan Tribe Young Adult#1 785,{ + if(event_umbala < 3) goto LumWord; + mes "[Seirutan]"; + mes "Bungy jumping is extremely dangerous."; + mes "As such, completing a successful"; + mes "jump is a prerequisite for recognition"; + mes "as an adult in the Utan tribe."; + close; +LumWord: + mes "[HHHHH]"; + mes "Umbaumbafumba."; + mes "Uwambaunbaumbabaufumba"; + mes "Umbababaumbaumba."; + close; +} + +//===================================================================== +umbala.gat,146,157,4 script Utan Young Adult#2 786,{ + if(event_umbala < 3) goto LumWord; + mes "[Arotan]"; + mes "Making a safe bungy jump is a"; + mes "really big deal. When someone makes"; + mes "their first jump safely, many people"; + mes "gather for a large feast."; + close; +LumWord: + mes "[HHHH]"; + mes "Umbaumbaumbabaumbaba."; + mes "Umbaumbabaumbababaumufumuba."; + close; +} + +//===================================================================== +umbala.gat,149,165,4 script Utan Young Adult#3 781,{ + if(event_umbala < 3) goto LumWord; + mes "[Kryubatan]"; + mes "I'm really afraid of heights,"; + mes "so I really don't want to jump,"; + mes "but I must in order to be"; + mes "recognized as a courageous"; + mes "member of the Utan tribe."; + close; +LumWord: + mes "[HHHHHH]"; + mes "Umbaumbaumbababa."; + mes "Umbaumbaumumbabaumfumuba."; + mes "Umbaumbaumumubafumba."; + close; +} + +//===================================================================== +umbala.gat,92,159,4 script Hartan 785,{ + if(event_umbala < 3) goto LumWord; + mes "[Hartan]"; + mes "You want to know why our"; + mes "skin is jet-black?"; + mes "......"; + next; + mes "[Hartan]"; + mes "Well..."; + mes "Every night before we sleep,"; + mes "we eat lots of chocolate!"; + next; + mes "[Hartan]"; + mes "Mmmmmmm...Chocolate..."; + close; +LumWord: + mes "[HHHH]"; + mes "Umbaumbaumba"; + mes "Umbaumbaumba"; + mes "Umbaumbaumba"; + next; + mes "[HHHH]"; + mes "Umbaumbabaungaha."; + emotion 28; + close; +} + +//===================================================================== +umbala.gat,194,104,4 script Utan Tribe Child#2 787,{ + if(event_umbala < 3) goto LumWord; + mes "[Burkatan]"; + mes "An outsider?"; + mes "Are you here to try bungy jumping?"; + next; + menu "You got it",-,"Well....",L2; + mes "[Burkatan]"; + mes "What courage!"; + mes "The Utan tribe welcomes those"; + mes "with courageous hearts."; + close; + L2: + mes "[Burkatan]"; + mes "The adults don't want me to even"; + mes "get close to the bungy jumping area."; + mes "In this tribe, bungy jumping is a rite"; + mes "of passage. If I can show them that"; + mes "I'm big enough to brave bungy jumping,"; + mes "they'll have to recognize me as an adult!"; + close; +LumWord: + mes "[HHH]"; + mes "Umbaumbababaumfumuba."; + mes "Umbababaumbabaumbaumba."; + next; + menu "Um...yes?",-,"Nope...",Lu2; + mes "[HHH]"; + mes "Umbaumbaumbababa."; + mes "Umbaumbaumubaba."; + close; + Lu2: + mes "[HHH]"; + mes "Umbaumbaumuam."; + mes "Umbaumbaumbaba."; + mes "Umbaumfumababaumu."; + close; +} + +//===================================================================== +umbala.gat,193,208,6 script Utan Child#3 789,{ + if(event_umbala < 3) goto LumWord; + mes "[Fuitan]"; + mes "When I was younger, I went bungy"; + mes "jumping even though it was extremely"; + mes "dangerous. I did it, though, and my"; + mes "chest swelled with a feeling of achievement."; + mes "The tradition encourages rash behavior, but"; + mes "boys will be boys, don't you think?"; + close; +LumWord: + mes "[HHHH]"; + mes "Umbaumbababa."; + mes "Umbamubafumabaumumbabamua"; + mes "Umumbababaumbafuma."; + close; +} + +//===================================================================== +umbala.gat,139,205,4 script Utan Tribe Young Adult#5 785,{ + if(event_umbala < 3) goto LumWord; + mes "[Tsunitan]"; + mes "Awesome! I haven't seen an outsider in some time."; + mes "You're just in time to watch as"; + mes "youth from all over the village bungy"; + mes "jump to prove their courage!"; + next; + mes "[Tsunitan]"; + mes "After you jump, you can use the"; + mes "cord to climb. Also, if you search"; + mes "underwater, you might be able to find"; + mes "a submerged cave. Of course, there have"; + mes "been unlucky souls who have died..."; + next; + mes "[Tsunitan]"; + mes "You may also feel sick"; + mes "as the bottom draws near, because"; + mes "the ominous shapes of aquatic monsters"; + mes "drift slowly under the surface."; + mes "If you linger underwater, you might die..."; + close; +LumWord: + mes "[HHHH]"; + mes "Umbaumba!"; + mes "Umbaumbabababaumumba."; + mes "Babaum Utan Umbaumbaba"; + mes "Umbababafumu."; + mes "Umfumubabaumbaumbaumbaba."; + next; + mes "[HHHH]"; + mes "Umbafumumababaumba."; + mes "Umbabatanumbaumba."; + mes "Umumu. Umbaumbaumbaum."; + mes "Umbabaumbaumbaumubaamum."; + mes "Umbaumbaumbafumu."; + close; +} + +//===================================================================== +um_in.gat,158,71,3 script Utan Tribesman 787,{ + if(event_umbala < 3) goto LumWord; + mes "[Mutakutan]"; + mes "Umbala has enough interesting trees"; + mes "that studying them never gets old!"; + next; + mes "[Mutakutan]"; + mes "My favorite tree near Umbala is huge!"; + mes "It stretches into the sky as far"; + mes "as the eye can see!"; + mes "It's supposed to be the tallest tree in the world!"; + emotion 33; + next; + mes "[Mutakutan]"; + mes "It's so old and large that"; + mes "the top can't even be seen!"; + next; + mes "[Mutakutan]"; + mes "Even after climbing the tree"; + mes "to quite a height, the top was not"; + mes "in sight. I consider myself"; + mes "a tree-climbing expert, so this"; + mes "was quite distressing."; + next; + mes "[Mutakutan]"; + mes "That said, the fruit I was able"; + mes "to pick off of some of the higher"; + mes "branches is yummy!"; + emotion 21; + next; + mes "[Mutakutan]"; + mes "It has a slightly sour taste. Eating"; + mes "it makes me feel all tingly inside!!"; + emotion 21; + next; + mes "[Mutakutan]"; + mes "At the same time, a terrible illness"; + mes "was ravaging Umbala village."; + next; + mes "[Mutakutan]"; + mes "The elder's health was declining"; + mes "and he was in danger of dying, but"; + mes "when I gave him a piece of that"; + mes "fruit, his health improved"; + mes "dramatically in a short time. Surely"; + mes "this fruit was a gift from the forest!"; + emotion 28; + next; + mes "[Mutakutan]"; + mes "The tree is north of the village. Why"; + mes "not visit it if you're over that way?"; + close; +LumWord: + mes "[HHHH]"; + mes "Umbaumbaumbabaumba!"; + mes "Umbaumbaumbababaumba"; + mes "Umbaumbaumba"; + mes "Umbabaumbaumbaba."; + close; +} + +//===================================================================== +umbala.gat,145,217,3 script Chibibatan 783,{ + if(event_umbala < 3) goto LumWord; + mes "[Chibibatan]"; + mes "I want to have some fun with"; + mes "Wambokoriotan, but after seeing"; + mes "how his wife can be, I don't know if"; + mes "I want to end up being on her bad side."; + close; +LumWord: + mes "[Chibibatan]"; + mes "Umbaba."; + mes "Ugaugumbarumbaruuuu!"; + mes "Ugugauwubaruguagumbagua."; + close; +} + +//===================================================================== +um_in.gat,139,48,5 script Purenotan 783,{ + if(event_umbala < 3) goto LumWord; + mes "[Purenotan]"; + mes "See that loser over there?"; + mes "I'm on to him. He hasn't"; + mes "exactly made a secret of his desire"; + mes "to have an affair or three."; + mes "He needs to be smacked in the nuts, HARD."; + close; +LumWord: + mes "[Purenotan]"; + mes "Umbaumbaugaga!"; + mes "Umbaumbabababa!"; + mes "Umbaumba!"; + emotion 6; + next; + mes "[Purenotan]"; + mes "Umbaumabaumbaumbaba!"; + mes "Umbababababaugau!"; + mes "Uguugaumbabaumbagumba!"; + emotion 24; + next; + emotion 27; + close; +On_emo: +emotion 6; +end; +} + +//===================================================================== +um_in.gat,144,45,5 script Wambokoriotan 789,{ + if(event_umbala < 3) goto LumWord; + mes "[Wambokoriotan]"; + mes "Ahhh...My wife is a real"; + mes "hothead. Ouch...ouch."; + next; + mes "[Wambokoriotan]"; + mes "Yunatan, Bartsutan, Chibibatan..."; + mes "I want Umbala's babes as much"; + mes "as they want me...Ouch...ouch!"; + close; +LumWord: + mes "[Wambokoriotan]"; + mes "Umbaumbaba....."; + mes "Umbaugua!"; + mes "Umbagumumbabagumbagaga!"; + emotion 18; + next; + donpcevent "Purenotan::On_emo"; + close; +} + +//============================================================================== +//Bungee jumping! +//============================================================================== +//umbala.gat,140,197,0 script #Shibonochikka 139,0,1,{ +set @jumprand,rand(4); +if (@jumprand == 1) goto L1; +if (@jumprand == 2) goto L2; +if (@jumprand == 3) goto L3; +mapannounce "umbala.gat","Bungy Jumping Area: " + strcharinfo(0) + " : Iyahaaaaahh!",8; +end; + +L1: +//Dead +mapannounce "umbala.gat","Bungy Jumping Area: " + strcharinfo(0) + " : Ukiyaaaaaaaaaa!",8; + percentheal -100,0; +end; + +L2: +//HP50% Damage +mapannounce "umbala.gat","Bungy Jumping Area: " + strcharinfo(0) + " : Kyaaaaaaaaaaa!",8; + percentheal -50,0; +end; + +L3: +//HP99%‚Ì Damage +mapannounce "umbala.gat","Bungy Jumping Area: " + strcharinfo(0) + " : Waaaaaaaaaah!",8; + percentheal -99,0; +end; +} + +//===================================================================== +umbala.gat,136,195,0 script #Warp Point 139,1,1,{ + warp "umbala.gat",145,166; + end; +} diff --git a/npc/cities/yuno.txt b/npc/cities/yuno.txt new file mode 100644 index 000000000..8bd391811 --- /dev/null +++ b/npc/cities/yuno.txt @@ -0,0 +1,616 @@ +//===== eAthena Script ======================================= +//= Yuno City +//===== By: ================================================== +//= KitsuneStarwind, kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Added additional npcs. Added Metto quest. [kobra_k88] +//= Moved item quest to quest folder. Re-edited a majority of the npcs. [kobra_k88] +//= Removed duplicate npcs already found in the sage quest. +//============================================================ + + + + +//=================================================================================================// +// NPCs Found outside +//=================================================================================================// + +//====================================================================================== +yuno.gat,156,87,4 script Citizen of Yuno 47,{ + mes "[Hans]"; + mes "If you go north from Al De Baran you will arrive at 'Elmeth Plateau'."; + mes "It is a place that was once covered with molten rocks and lava."; + next; + mes "[Hans]"; + mes "At the top of a mountain connected to the plateau, you can find a bridge that will lead you here to Yuno."; + next; + mes "[Hans]"; + mes "Here in Yuno, you can visit world famous places such as the:"; + mes "^5533FF'Yuphero Plaza'"; + mes "'Yuno Conference Hall'"; + mes "'Schweicherbil Magic Academy'^000000"; + mes "and the ^5533FF'Museum of Monsters'^000000"; + next; + mes "[Hans]"; + mes "There is also the ^5533FF'Sage Castle'^000000 which is the greatest attraction in this city."; + mes "The castle is where people go to become Sages."; + next; + mes "[Hans]"; + mes "If you have any interest in becoming a Sage, why not have a look around the castle?"; + close; +} + +//======================================================================================= +yuno.gat,158,205,4 script Artisan 54,{ + mes "[Artisan]"; + mes "~(mumbling to himself.......)~"; + next; + mes "[Artisan]"; + mes "Oh hello there. Let me introduce myself. I am an artisan who is trying to carry on the traditions and duties of the master craftsmen here in Yuno."; + M_Menu: + next; + menu "About powerful equipment.",M_1,"About special items",M_2,"About authentic foods",M_3,"End conversation",M_End; + + M_1: + mes "[Artisan]"; + mes "For Crusaders, I suggest looking into the ^5533FF'Holy Guard' and 'Holy Avenger'^000000."; + mes "They are both light weight pieces of equipment and they perform remarkably well."; + next; + mes "[Artisan]"; + mes "They also posses the holy property so they are even more powerful against undead and ghost creatures,"; + next; + mes "[Artisan]"; + mes "I've heard that these pieces of equipment are quite rare, and that only a chosen few are able to obtain them."; + goto M_Menu; + + M_2: + mes "[Artisan]"; + mes "One item that I know about is a magic scroll called the ^5533FF'Worn-Out Magic Scroll'^000000."; + mes "It is described to have a circle inside of another circle.... and a star...... "; + next; + mes "[Artisan]"; + mes "Although the scroll is very old and tattered, it very special to many Sages who use it for their research."; + mes "Apparently it can be used with very high level magic spells."; + goto M_Menu; + + M_3: + mes "[Artisan]"; + mes "^5533FF'Rice Cake'^000000!! A traditional food that has been a favorite of many people over the years."; + mes "It has a way of reminding people of those old traditional markets and fairs."; + next; + mes "[Artisan]"; + mes "Ah.... Rice Cake..... I sure wish I could eat some now.............."; + //possible quest here .. not sure though + goto M_Menu; + + M_End: + mes "[Artisan]"; + mes "Although Yuno is known as the city of Sages,.............."; + mes "I hope you will understand that Yuno is also home to many kind and gentle people who live ordinary lives."; + next; + mes "[Artisan]"; + mes "Please enjoy everything this unique city has to offer."; + close; +} + +//====================================================================================== +yuno.gat,336,227,4 script Yuno Granny 103, +{ + mes "[Granny]"; + mes "Here you are......... I am an elderly Sage who can forsee everything before it happens."; + next; + mes "[Granny]"; + mes "Have you heard about the boss monster, who's name has been buzzing around Yuno for the longest time?"; + mes "It's called ^FF3355'Lord of the Dead'^000000. Rumor has it that it comes form the realm of the dead."; + next; + mes "[Granny]"; + mes "It brings with it many undead monsters that are intent on leading the living to the cold and icy land of the dead."; + next; + mes "[Granny]"; + mes "I know that you have already chosen whether or not you will fight the Lord of the Dead."; + mes "The only thing left for you to do is find out why you made that choice......"; + close; +} + +//======================================================================================== +yuno.gat,329,239,4 script Yuno Fighter 732, +{ + mes "[Sergiof]"; + mes "My name is Sergiof and I am Granny's protector."; + next; + mes "[Sergiof]"; + mes "Let me tell you about the ^5533FF'Grand Peco'^000000, which is a high level Peco Peco."; + mes "The Grand Peco is faster than regular Peco Pecos and has aggressive tendencies."; + next; + mes "[Sergiof]"; + mes "It attacks its targets using its strong bill. It is always surrounded by a large group of Peco Pecos."; + next; + mes "[Sergiof]"; + mes ".... Unfortunately it is time for us to part...... farewell..........."; + close; +} + +//======================================================================================== +yuno.gat,344,68,4 script Yuno Tyrant 730, +{ + mes "[Ninno]"; + mes "Have you ever heard of an Egyptian king who was once believed to be the son of a god?"; + mes "His name was ^5533FF'Pharaoh'^000000"; + next; + mes "[Ninno]"; + mes "Rumor has it that he was a high sorcerer and that he used his abilities to curse innocent people."; + mes "There are people that say he is still around, and continues to place curses on people."; + next; + mes "[Ninno]"; + mes "Have you ever seen him before?"; + close; +} + +//======================================================================================= +yuno.gat,261,98,4 script Ykla 735,{ + mes "[Ykla]"; + mes "^5533FFYuphero^000000......,"; + mes "That was the name of the ancient city where the most intelligent and talented people used to live."; + next; + mes "[Ykla]"; + mes "By finding a way to harness the power from the pieces of Ymir's heart, they became the most advanced city know to man."; + next; + mes "[Ykla]"; + mes "However, over time they came to abuse that power and ended up destroying themselves."; + next; + mes "[Ykla]"; + mes "If you ever find yourself in the position of acquiring this kind of power, make sure you remain humble to it."; + next; + mes "[Ykla]"; + mes "Power without humility is nothing more than a fools path to destruction."; + close; +} + +//========================================================================================= +yuno.gat,306,207,6 script Sage Sykla 735, +{ + mes "[Sykla]"; + mes "There is talk about a suspicious man living somewhere here in Yuno."; + mes "Apparently he is a dangerous person who is immersed in some kind of wicked research."; + next; + mes "[Sykla]"; + mes "This so called 'Mad Scientist' spends his time working on complex ideas that cannot be understood by normal people."; + next; + mes "[Sykla]"; + mes "Just outside of town you will find a monster called ^FF3355'Blazer'^000000."; + mes "This ball of magic flame attacks any living creature it finds with horrible spells such as fire bolt and fire ball."; + next; + mes "[Sykla]"; + mes "This hiddeous creature is feared my most, if not all, of the people here in Yuno."; + mes "But what's even more frightening than the monster itself, is the rumor that the mad scientist was the one who created it...."; + next; + mes "[Sykla]"; + mes "Imagine if this mad man were to create more of these creatures..... possibly create monsters even more powerfull than Blazer...."; + close; +} + +//========================================================================================== +yuno.gat,162,328,4 script Sage Eskla 735, +{ + mes "[Eskla]"; + mes "I remember seeing it once........ Yeah... I remember now....... "; + mes "There was this piece of paper floating in the air. I asked myself, 'Hmm... who lost a piece of paper out here?'."; + next; + mes "[Eskla]"; + mes "Then... without warning.... the piece of paper attacked me!! ME! One of the GREATEST Sages in Yuno!!"; + emotion 23; + next; + mes "[Eskla]"; + mes "I said to the piece of paper, 'How dare you attack me you little piece of paper!!' and struck it with my trusty sword."; + mes "But that piece of paper was persistant and annoying at that."; + emotion 0; + next; + mes "[Eskla]"; + mes "Using its paper thin body it dodged my sword simply by turning itself. The way it was turned I couldn't even tell if it was still there."; + mes "Dammint it was thin!!!"; + next; + mes "[Eskla]"; + mes "I decided to finally put an end to things and used a powerful magic spell to destroy that little piece of paper."; + mes "Because I had so much difficulty in defeating it, I decided to ask my collegues if they knew anything about it."; + next; + mes "[Eskla]"; + mes "I found out what I had fought was called ^FF3355'The Paper'^000000."; + mes "People say that it used to be part of an old book that contained a great deal of ancient knowledge about Yuno."; + next; + mes "[Eskla]"; + mes "Somehow it became a monster....... isn't that weird?"; + close; +} + + + +//====================================================================================== +yuno.gat,166,111,4 script Remorpheous 120,{ + mes "[Remorpheous]"; + mes "'Apocalypse'. he, an artificial human being,"; + mes "was the chief of gatekeepers and in charge of public order of the city"; + mes "of [Yuno] during the Ancient times civilization..."; + close; + mes "[Remorpheus]"; + mes "....similar to Robot. After living for a long time,"; + mes "its A.I. totally screwed up,it couldn't recognize friend or foe anymore,"; + mes "so without consideration of friends or foe......"; + close; + mes "[Remorpheus]"; + mes ".... it became a monster that attacks anyone regardless"; + close; +} + +//===================================================================================== +yuno.gat,185,173,3 script Impressor 729,{ + mes "[Impressor]"; + mes "Scholar's city, 'Yuno' is made of 3 big islands."; + next; + mes "[Impressor]"; + mes "those are,"; + mes "The island of Glory - Solomon"; + mes "The island of Prosperity - Minetta"; + mes "The island of Wisdom - Snottra"; + next; + mes "[Impressor]"; + mes "Each island's location are:"; + mes "Northwest: Solomon"; + mes "Northeast: Snottra"; + mes "South: Minetta"; + close; +} + +//===================================================================================== +yuno.gat,80,150,4 script Young Woman 746,{ + mes "[Young Woman]"; + mes "Have you ever seen such a beautiful city?"; + mes "And Yuno at night time is so wonderful with its lights shiny through the clouds"; + next; + mes "[Young Woman]"; + mes "I'm sorry i got carried away , its my first time being here in the City of Sages"; + mes "i sugest you go look around and enjoy your self"; + next; + mes "[Young Woman]"; + mes "I believe i shall wait around here till nightfall just so i can see the lights clearly"; + mes "maybe i will see you here later"; + close; +} + + +//===================================================================================================// +// Metto Quest +//===================================================================================================// + +//======================================================================== +yuno_in03.gat,25,39,3 script Metto 709, +{ + mes "[Metto]"; + if(metto_q == 2 || metto_q == 4 || metto_q == 6) goto L_Check; + if(metto_q == 1) goto L_Stang; + if(metto_q == 3) goto L_Kato; + if(metto_q == 5) goto L_Cici; + if(metto_q == 7) goto L_Ruined; + if(metto_q > 7) goto L_Done; + mes "Whether it be today, tommorrow, or the next day, I spend every moment I have on my research."; + mes "My whole life has been dedicated to making............"; + next; + mes "[Metto]"; + mes "NEW YUNO, my own kingdom. In order to do that I must research how this city floats in the air."; + mes "If I'm able to do so..... my goals will no longer be a mere dream, but a reality!!"; + next; + mes "[Metto]"; + mes "That ^5544FFWagan^000000 thinks my research means nothing......"; + mes "But he doesn't realize that my ideas have been blessed by the Gods themselves!"; + close; + +L_Stang: + mes "I'm going to ask my colleague ^5533FFStangckle^000000 to help me. I am sure he will be more than willing to help out an old friend."; + next; + mes "[Metto]"; + mes "Hmmm.... If I had that fellow's hellp, this would be much easier.... Pray! Pray to whatever God you believe in that we will succed!"; + set metto_q, 2; + close; +L_Kato: + mes "What??!! That fool Stangckle said he doesn't want to help me?? This is not good...... My research will slow down considerably."; + mes "......... What will I do now?!?!?"; + emotion 19; + next; + mes "[Metto]"; + mes "Luckily I have a backup plan. I'm certain that my friend and colleague ^5533FFKato^000000 will lend me a hand."; + next; + mes "[Metto]"; + mes "If I could only get a chance to study his super robot, the 'Great Z', I could continue my research......."; + next; + mes "[Metto]"; + mes "That Stangckle can have it his way for all I care. Even if he doesn't help me, my research will still go on.... it must!"; + next; + mes "[Metto]"; + mes "Expect great things from me young friend..... MUHAHAHAHAH!!!!"; + set metto_q, 4; + emotion 29; + close; +L_Cici: + mes "WHAT!?!? You're telling me that the very thing I need to continue my research with... the Great Z.... has been DESTROYED!?!?"; + emotion 16; + next; + mes "[Metto]"; + mes "NOOOOOOO!!! Why?? How?? Why would he do that? Are the Gods cursing me?!?"; + emotion 6; + next; + mes "[Metto]"; + mes "Wait.... I need to calm down..."; + mes "If I can just get the help of professor ^5533FFCiCi^000000 with his 'Riding Engine Theory', I may be able to finish my research......."; + next; + mes "[Metto]"; + mes "*sigggghhhh* I still have hope...... YES I DO!! HAHAHA!!!"; + set metto_q, 6; + emotion 29; + close; +L_Check: + mes "I better get going so I can check this new thing out..... What are you still doing here?"; + mes "I'll be leaving in a bit. I need to get ready so why don't you go ahead and just take off......."; + close; +L_Ruined: + mes "............................"; + next; + mes "[Metto]"; + mes "How could something like this happen?? All 3 of my colleagues abandoning me all at once?!?!"; + mes "It's true....... the Gods HAVE forsaken me..... I'm ruined...... RUINED!!!"; + emotion 28; + next; + mes "[Metto]"; + mes "What else can I do now? Has the time really come for me to let go of all of my research?...."; + mes "Those many, many years of research?........"; + emotion 28; + next; + mes "[Metto]"; + mes "You must be disappointed...... but please, forget about all of this... forget about me........"; + mes "Who would do this to me? What kind of malicious person would shatter a man's dreams??"; + next; + mes "[Metto]"; + mes "I suddenly feel tired now....... It's time for me to give up....... It's all over. Please don't be too disappointed......."; + set metto_q, 8; + close; +L_Done: + mes "Maybe I should look into getting a job change. I hear it's a popular thing to do these days. I wonder what profession I should go into?"; + mes "All I know for sure is that I don't want to be a scientist anymore."; + next; + mes "[Metto]"; + mes "I'm done with research forever............."; + close; +} + +//===================================================================== +yuno_in01.gat,18,95,5 script Stangckle 99, +{ + mes "[Stangckle]"; + if(metto_q > 2) goto L_Done; + if(metto_q == 2) goto L_Start; + mes "I am one of the scientists in this city. My name is ^5533FFStangckle^000000."; + mes "Remember my name for it may be useful to you in the future. Who knows, I may just invent something incredible."; + close; +L_Start: + mes "What can I do for you? My colleague Metto is coming here soon, so I don't have much time."; + mes "So what did you say you needed??"; + next; + menu "I need to talk to you about Metto!!",-, "Actually I don't need anything.",M_End; + + mes "[Stangckle]"; + mes "......................"; + next; + mes "[Stangckle]"; + mes ".................................."; + next; + mes "[Stangckle]"; + mes "Is this true?? Metto doesn't think of me as a colleague, and is only USING me?"; + mes "He sees me as a lowly assisstant and is going to STEAL all the CREDIT for our discoveries?!!"; + emotion 23; + next; + mes "[Stangckle]"; + mes "I can't believe I trusted him..... the rumors were true.... he IS a selfish mad man!!!......."; + mes "And to think I respected a scumbag like that!!"; + emotion 32; + next; + mes "[Stangckle]"; + mes "I don't think I can even bear to see his distugusting face anymore....."; + next; + mes "[Stangckle]"; + mes "I'm glad that an honest and trustworthy person such as yourself had the guts to tell me the ugly truth about Metto."; + mes "Thank you for sharing that information with me."; + next; + mes "[Stangckle]"; + mes "Now if you'll excuse me, I have some work to do."; + set metto_q, 3; + close; + M_End: + mes "[Stangckle]"; + mes "What are you doing here then? Stop wasting my time."; + emotion 4; + close; +L_Done: + mes "So Metto was truly a mad scientist afterall...... I guess he will be the one who will ultimately pay for that choice......."; + close; +} + +//=================================================================== +yuno_in01.gat,19,182,3 script Kato 55, +{ + mes "[Kato]"; + if(metto_q > 4) goto L_Done; + if(metto_q == 4) goto L_Start; + mes "I am a scientist that specializes in ^5533FFArtificial Intelligence and Robotics^000000."; + mes "Although I'm not working on a specific project at this moment, my lastest creation the 'Great Z' is truly a work of sheer genius!"; + close; + +L_Start: + mes "As a scientist I research many different things.... of course this research is private. What can I do for you?"; + next; + menu "I have news from Metto!",-, "Just wanted to say hello.",M_End; + + mes "[Kato]"; + mes "WHAT!!?? Metto said my Great Z is INFERIOR to Stangckles research!!??"; + mes "He.... he said I should rename it to 'LAME Z'??......."; + emotion 23; + next; + mes "[Kato]"; + mes "*Sniff* I... I don't believe it.... *sob* how could he say that?..... If... if my invention is no good....."; + mes "Then I guess I should destory it.... my Great Z.... *sigh*"; + emotion 28; + next; + mes "[Kato]"; + mes "How could that Metto be such a heartless bastard?? Thank you for letting me know Metto's TRUE feelings about my work."; + set metto_q, 5; + close; + M_End: + mes "[Kato]"; + mes "........... Okay.... Um.... Hey........"; + close; + +L_Done: + mes "I am interested in researching artificial intelligence. You know, like robots."; + mes "I know that it is something very difficult to accomplish, but where there's a will, there's a way."; + next; + mes "[Kato]"; + mes "If you ever see something amazing that is similar to what I described, you'll know that it's my handywork."; + close; +} + +//=================================================================== +yuno_in03.gat,179,43,5 script CiCi 121, +{ + mes "[CiCi]"; + if(metto_q > 6) goto L_Done; + mes "My name is ^5533FFCiCi^000000. I am one of the ^5533FF3 great scientists^000000 that live in this city."; + mes "Although there are many great scientists in this town, being one of the top 3 is a true honor don't you think??"; + if(metto_q == 6) goto L_Start; + close; + +L_Start: + next; + mes "[CiCi]"; + mes "Heh, I guess I was being a little to egostical there.... anyways what can I do for you?"; + next; + menu "Metto wanted me to tell you this......",-, "Nothing, just saying hey.",M_End; + + mes "[CiCi]"; + mes "Hmm?? Metto said that he doesn't need my Riding Engine Theory?? Hmphf! How dare he!!!"; + emotion 32; + next; + mes "[CiCi]"; + mes "I have half a mind to teach him a little something about TRUE science and INTELLIGENT research!!"; + emotion 7; + next; + mes "[CiCi]"; + mes "... Whatever.... I don't have the necessary equipment to help him anyways."; + mes "I guess, either way, he didn't have a chance."; + next; + mes "[CiCi]"; + mes "Let him know that I didn't really want to be a part of what he was doing in the first place."; + mes "He isn't even doing the type of research that could be publicized........."; + set metto_q, 7; + close; + + M_End: + mes "[CiCi]"; + mes "What? That's it? You just wanted to waste some time?..........."; + emotion 4; + close; + +L_Done: + mes "Hmm... I want to improve the Riding Engine but I lack the necessary parts. What a headache...."; + mes "Metto never offered me any help at all. This is not going to be easy......."; + close; +} + +//=================================================================== +yuno_in01.gat,18,30,3 script Wagan 85, +{ + mes "[Wagan]"; + if(metto_q > 0) goto L_Check; + mes "I'm sure you know that our village has been able to prosper for many years because of the brilliant research done here."; + mes "We owe a great deal to those who have dedicated their lives to research and study."; + next; + mes "[Wagan]"; + mes "It is because of them that we can enjoy such a wonderful quality of life here."; + mes "They have been able to work together and support each other which is great to see."; + next; + mes "[Wagan]"; + mes "Unfortunately there are a few 'bad apples' that cause problems within this solid community of researchers."; + next; + mes "[Wagan]"; + mes "These people just drive me crazy!"; + emotion 6; + next; + mes "[Wagan]"; + mes "They think only of themselves and their crazy actions make it much more difficult for everyone else."; + mes "Out of those few selfish mad men, ^FF3333'Metto'^000000 must be the worst by far."; + next; + mes "[Wagan]"; + mes "This disturbed individual does nothing but destroy public facilities, create harmful pollutants, disrupt other peoples lives......"; + next; + mes "[Wagan]"; + mes "..... the list goes on and on. What's worse..... He tries to justify his dreadful actions by calling it 'research'!!!!"; + mes "He has definately lost his sanity and has gone too far!!"; + emotion 7; + next; + mes "[Wagan]"; + mes "If only there was a way to stop this mad man from destroying our community......"; + mes "I just wish there was someone capable and brave enough to put an end to ^FF3333Metto's^000000 insanity......."; + next; + menu "Leave it to me.",-, "I wish your city the best of luck...",M_End; + + mes "[Wagan]"; + mes "Oh?? Are you really going to help us stop Metto? Our city would be very grateful if you could do this......."; + mes "But how exactly do you plan on accomplishing this rather difficult task?"; + emotion 1; + next; + menu "Yeah it's pretty hard....",M_End, "Well, I guess I need to think of a plan now.....",-; + + mes "[Wagan]"; + mes "Yes a solid plan will be necessary to put a stop to Metto. You will need to trick him into quitting his evil experiments somehow......"; + mes "It will have to be something subtle like....... hmm........"; + next; + mes "[Wagan]"; + mes "... Sabotaging his experiments in a way that makes it look like he was destined to fail."; + mes "He is talkative so you may be able to get him to tell you everything you need to know about his work."; + next; + mes "[Wagan]"; + mes "To be honest.... I have been thinking about this plan for a while........."; + set metto_q, 1; + close; + M_End: + mes "[Wagan]"; + mes "We will have to hope that fate will be on our side as we wait for things to unfold......"; + mes "Come to think of it.... Metto is a strong believer in fate..... If we could only use that to your advantage somehow...."; + close; +L_Check: + if(metto_q == 8) goto L_Thank; + if(metto_q == 9) goto L_Done; + mes "How goes your work on sabotaging Metto's experiments? Hopefully the plan is going well."; + mes "I'm sorry to involve you in our city's problems, but we really do appreicate you efforts."; + close; +L_Thank: + mes "Is this true? You were able to shut down Metto's research? Thank you sooo much for your help."; + mes "Without Metto causing trouble we have a lot less to worry about."; + emotion 5; + next; + mes "[Wagan]"; + mes "The people of this city are greateful to you. Here is a little token of our appreciation......"; + next; + mes "[Wagan]"; + mes "Thank you once again for your assisstance! I wish you the best of luck in all of your future endeavors!!!"; + getitem 715,10; + emotion 15; + set metto_q, 9; + close; +L_Done: + mes "Things have been much more peaceful around here now that Metto has been shut down. Thank you once again for your help."; + emotion 15; + close; +} diff --git a/npc/events/alchemist.txt b/npc/events/alchemist.txt new file mode 100644 index 000000000..cc64e5654 --- /dev/null +++ b/npc/events/alchemist.txt @@ -0,0 +1,166 @@ +//=========================================================== +//Alchemist Event script 2004/02/14 by kalen +//=========================================================== + +ama_in02.gat,61,27,6 script ˜B‹àpŽt 749,{ + mes "[ƒOƒŒƒSƒŠ[]"; + mes "ƒLƒLƒLƒLƒLƒPƒPƒPƒPƒPI"; + mes "‹Á‚­‚ׂ«Œ‹‰Ê‚ªo‚½I"; + mes "‚±‚ñ‚ÈŽÀŒ±Œ‹‰Ê‚ªo‚½‚Ì‚Í"; + mes "¶‚Ü‚ê‚ĉ‚ß‚Ä‚¾I"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚±‚ñ‚Ȃɉ“‚­‚Ü‚Å—ˆ‚ÄŽ„‚Ì”\—Í‚ð"; + mes "”­Šö‚Å‚«‚é‚Æ‚ÍŽv‚¢‚à‚æ‚ç‚È‚©‚Á‚½‚¼I"; + mes "éŽå‚ÉŽdŽ–‚𗊂܂ꂽ‚ªcc"; + mes "“z‚͈ӊO‚É‚¨‚à‚µ‚ë‚¢“z‚¾‚Á‚½‚¼B"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "ƒNƒNƒNcc‚µ‚©‚µ‹C‚ð‚‚¯‚Ë‚Îcc"; + mes "‚±‚¢‚‚̒²‡•û–@‚ð‚©‚¬‚‚¯‚ç‚ꂽ‚ç"; + mes "ˆù‚ñ‚¾“z‚ª‰Î‚𕬂¢‚Ä“{‚écc"; + mes "ƒPƒPƒPƒPcc"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚ñA‚Æ‚±‚ë‚ÅŽ„‚ɉ½‚©—p‚©H"; + mes "ŠÏŒõ‚Å—ˆ‚½‚ñ‚È‚ç©‚É‘º‚Å‚à"; + mes "Œ©‚Ä‚¢‚­‚ñ‚¾‚ÈB"; + mes "‚³‚à‚È‚­‚΃AƒVƒbƒhƒ{ƒgƒ‹"; + mes "‚Å‚à–¡‡‚킹‚Ä‚â‚邼IƒLƒLcc"; + next; + menu "Ž¸—炵‚Ü‚µ‚½",L1,"‚¨Žè“`‚¢‚·‚鎖‚Å‚à‚ ‚è‚Ü‚·‚©H",L2; +L1: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚悵‚悵cc"; + mes "‰½‚©•·‚¢‚Ä‚à‚·‚®‚É–Y‚ê‚ëB"; + mes "‚»‚ꂪ’·‚­¶‚«‚éƒRƒc‚³cc"; + mes "ƒLƒLƒLƒLƒLcc"; + close; +L2: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "Žè“`‚¤‚ÆH"; + mes "‚»‚¤‚©cc"; + mes "‚à‚¤Ž„‚ÌŠè‚Á‚½‚à‚Ì‚Í‚à‚¤­‚µ‚Å"; + mes "Š®¬‚·‚éBƒLƒLƒLƒLƒLcc"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "Ž„‚ªŽÀŒ±‚·‚é‚Ì‚É•K—v‚È‘®«Î‚ð"; + mes "‚¢‚­‚‚©—pˆÓ‚µ‚Ä‚­‚ê‚é‚Æ‚ ‚肪‚½‚¢B"; + mes "¡Ž‚Á‚Ä‚¢‚镨‚ª‚ ‚é‚©H"; + next; + menu "‚¢‚¢‚¦",L2_1,"‚¢‚­‚‚©‚ ‚è‚Ü‚·",L2_2; +L2_1: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚»‚ê‚Ȃ猾‚¨‚¤B"; + mes "‚Ç‚ê‚Å‚à‚¢‚¢‚©‚瓯‚¶Ží—Þ‚Ì"; + mes "‘®«Î‚ð8ŒÂ‚¸‚ÂW‚ß‚Ä‚Ù‚µ‚¢B"; + mes "‚»‚¤‚·‚ê‚ÎAŽ„‚ª—Ç‚¢•¨‚É"; + mes "•Ï‚¦‚Ä‚â‚邼B"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚à‚µŠÔˆá‚Á‚½•¨‚ðŽ‚Á‚Ä‚«‚½‚çA"; + mes "‘«Œ³‚Ƀtƒ@ƒCƒA[ƒ{ƒgƒ‹‚ð"; + mes "“Š‚°‚邼I"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚»‚ê‚Å‚ÍAŽè“`‚¤‚ÆŒ¾‚Á‚½ˆÈã"; + mes "–ñ‘©‚ÍŽç‚é‚ñ‚¾‚¼IƒLƒLƒLƒLcc"; + close; +L2_2: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚悵A‰½‚ðŽ‚Á‚Ä‚¢‚éH"; + next; + menu "ƒ~ƒXƒeƒBƒbƒNƒtƒ[ƒYƒ“",L2_2_1,"ƒOƒŒƒCƒgƒlƒCƒ`ƒƒ",L2_2_2,"ƒtƒŒƒCƒ€ƒn[ƒg",L2_2_3,"ƒ‰ƒtƒEƒBƒ“ƒh",L2_2_4; + L2_2_1: + if (countitem(995) < 8) goto Llowitem; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚»‚ê‚ð8ŒÂ‚ð‚à‚炤‘ã‚í‚è‚É"; + mes "‘¼‚Ì‘®«Î‚ðˆê‚Âì‚Á‚Ä‚â‚낤B"; + mes "ˆ«‚¢Žæˆø‚¶‚á‚È‚¢‚¾‚낤H"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚Ù‚çA‚Ç‚ê‚ðì‚낤‚©H"; + next; + menu "ƒOƒŒƒCƒgƒlƒCƒ`ƒƒ",L2_2_1_1,"ƒtƒŒƒCƒ€ƒn[ƒg",L2_2_1_2,"ƒ‰ƒtƒEƒBƒ“ƒh",L2_2_1_3,"Žæˆø‚ð‚â‚ß‚é",LEnd; +L2_2_1_1: + delitem 995,8;getitem 997,1;goto Lfinal; +L2_2_1_2: + delitem 995,8;getitem 994,1;goto Lfinal; +L2_2_1_3: + delitem 995,8;getitem 996,1;goto Lfinal; + L2_2_2: + if (countitem(997) < 8) goto Llowitem; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚»‚ê‚ð8ŒÂ‚ð‚à‚炤‘ã‚í‚è‚É"; + mes "‘¼‚Ì‘®«Î‚ðˆê‚Âì‚Á‚Ä‚â‚낤B"; + mes "ˆ«‚¢Žæˆø‚¶‚á‚È‚¢‚¾‚낤H"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚Ù‚çA‚Ç‚ê‚ðì‚낤‚©H"; + next; + menu "ƒ~ƒXƒeƒBƒbƒNƒtƒ[ƒYƒ“",L2_2_2_1,"ƒtƒŒƒCƒ€ƒn[ƒg",L2_2_2_2,"ƒ‰ƒtƒEƒBƒ“ƒh",L2_2_2_3,"Žæˆø‚ð‚â‚ß‚é",LEnd; +L2_2_2_1: + delitem 997,8;getitem 995,1;goto Lfinal; +L2_2_2_2: + delitem 997,8;getitem 994,1;goto Lfinal; +L2_2_2_3: + delitem 997,8;getitem 996,1;goto Lfinal; + L2_2_3: + if (countitem(994) < 8) goto Llowitem; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚»‚ê‚ð8ŒÂ‚ð‚à‚炤‘ã‚í‚è‚É"; + mes "‘¼‚Ì‘®«Î‚ðˆê‚Âì‚Á‚Ä‚â‚낤B"; + mes "ˆ«‚¢Žæˆø‚¶‚á‚È‚¢‚¾‚낤H"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚Ù‚çA‚Ç‚ê‚ðì‚낤‚©H"; + next; + menu "ƒ~ƒXƒeƒBƒbƒNƒtƒ[ƒYƒ“",L2_2_3_1,"ƒOƒŒƒCƒgƒlƒCƒ`ƒƒ",L2_2_3_2,"ƒ‰ƒtƒEƒBƒ“ƒh",L2_2_3_3,"Žæˆø‚ð‚â‚ß‚é",LEnd; +L2_2_3_1: + delitem 994,8;getitem 995,1;goto Lfinal; +L2_2_3_2: + delitem 994,8;getitem 997,1;goto Lfinal; +L2_2_3_3: + delitem 994,8;getitem 996,1;goto Lfinal; + L2_2_4: + if (countitem(996) < 8) goto Llowitem; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚»‚ê‚ð8ŒÂ‚ð‚à‚炤‘ã‚í‚è‚É"; + mes "‘¼‚Ì‘®«Î‚ðˆê‚Âì‚Á‚Ä‚â‚낤B"; + mes "ˆ«‚¢Žæˆø‚¶‚á‚È‚¢‚¾‚낤H"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚Ù‚çA‚Ç‚ê‚ðì‚낤‚©H"; + next; + menu "ƒ~ƒXƒeƒBƒbƒNƒtƒ[ƒYƒ“",L2_2_4_1,"ƒOƒŒƒCƒgƒlƒCƒ`ƒƒ",L2_2_4_2,"ƒtƒŒƒCƒ€ƒn[ƒg",L2_2_4_3,"Žæˆø‚ð‚â‚ß‚é",LEnd; +L2_2_4_1: + delitem 996,8;getitem 995,1;goto Lfinal; +L2_2_4_2: + delitem 996,8;getitem 997,1;goto Lfinal; +L2_2_4_3: + delitem 996,8;getitem 994,1;goto Lfinal; +Lfinal: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "ƒWƒWƒWccƒKƒŠƒKƒŠƒSƒŠcc"; + mes "‚¤‚ÞA‚Å‚«‚½B"; + mes "‚Ù‚çA‘厖‚ÉŽg‚¤‚悤‚ÉB"; + mes "‚Ü‚½‚ ‚ê‚ÎŽ‚Á‚Ä‚«‚È‚³‚¢B"; + close; +Llowitem: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "ƒWƒWƒWccƒKƒŠƒKƒŠƒSƒŠcc"; + mes "‚ñcc‘®«Î‚Í‚Ç‚¤‚µ‚½H"; + mes "‚Ç‚±‚©‚Å‚È‚­‚µ‚Ä‚«‚½‚©H"; + next; + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚Ü‚½Ž‚Á‚Ä‚«‚È‚³‚¢I"; + mes "Žè“`‚¤‚ÆŒ¾‚Á‚½ˆÈã"; + mes "–ñ‘©‚ÍŽç‚é‚ñ‚¾‚¼IƒLƒLƒLƒLcc"; + close; +LEnd: + mes "[ƒOƒŒƒSƒŠ[]"; + mes "‚­cc‚Ü‚Ÿ‚¢‚¢‚ªcc"; + mes "Ž„‚ª‚±‚±‚É‹‚邱‚Æ‚Í“à‚¾‚¼B"; + mes "–ñ‘©‚¾‚¼I"; + close; +} diff --git a/npc/events/custom/draculax.txt b/npc/events/custom/draculax.txt new file mode 100644 index 000000000..87020e9f6 --- /dev/null +++ b/npc/events/custom/draculax.txt @@ -0,0 +1,130 @@ +//===== eAthena Script ======================================= +//= Dracula X Script +//===== By: ================================================== +//= valaris (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena RC4+ +//===== Description: ========================================= +//= Custom Dracula X Event +//============================================================ + + +mag_dun02.gat,72,182,1 script Dracula's Coffin::Dracula_Init -1,{ + +OnInit: + set $dracula_event,0; + Break; + +OnKilled: + MapAnnounce "mag_dun02.gat","Dracula's curse has been lifted!",17; + set $dracula_event,0; + initnpctimer; + Break; + +OnTimer7200000: + if($dracula_event==0) + stopnpctimer; + enablenpc "Dracula_Event"; + Break; +} + +mag_dun02.gat,72,182,1 script Dracula's Coffin::Dracula_Event 801,{ + + if($dracula_event==1) + close; + + set $dracula_event,1; + MapAnnounce "mag_dun02.gat","Count Dracula : Who has awakened me from my slumber?",17; + npcskilleffect 21,10,66,175; + initnpctimer; + Break; + +OnTimer500: + npcskilleffect 21,10,74,187; + Break; + +OnTimer1000: + npcskilleffect 21,10,80,180; + Break; + +OnTimer1500: + npcskilleffect 21,10,79,183; + Break; + +OnTimer2000: + npcskilleffect 21,10,66,175; + Break; + +OnTimer2500: + npcskilleffect 21,10,63,186; + Break; + +OnTimer3000: + npcskilleffect 21,10,75,186; + Break; + +OnTimer3500: + npcskilleffect 21,10,75,173; + Break; + +OnTimer4000: + npcskilleffect 21,10,80,170; + Break; + +OnTimer4500: + npcskilleffect 21,10,60,179; + Break; + +OnTimer5000: + npcskilleffect 21,10,74,187; + Break; + +OnTimer6000: + npcskilleffect 21,10,69,182; + Break; + +OnTimer6500: + npcskilleffect 21,10,80,180; + Break; + +OnTimer7000: + npcskilleffect 21,10,60,179; + Break; + +OnTimer7500: + npcskilleffect 21,10,66,175; + Break; + +OnTimer8000: + npcskilleffect 21,10,80,187; + Break; + +OnTimer8500: + npcskilleffect 21,10,75,186; + Break; + +OnTimer9000: + npcskilleffect 21,10,75,173; + Break; + +OnTimer9500: + npcskilleffect 21,10,80,170; + Break; + +OnTimer10000: + npcskilleffect 21,10,63,186; + Break; + +OnTimer10500: + npcskilleffect 21,10,74,187; + Break; + +OnTimer11000: + npcskilleffect 21,10,72,182; + monster "mag_dun02.gat",72,182,"Count Dracula",1389,1,"Dracula_Init::OnKilled"; + stopnpctimer; + disablenpc "Dracula_Event"; + Break; +} \ No newline at end of file diff --git a/npc/events/twintowers.txt b/npc/events/twintowers.txt new file mode 100644 index 000000000..cdb5d7962 --- /dev/null +++ b/npc/events/twintowers.txt @@ -0,0 +1,93 @@ +//===== eAthena Script ======================================= +//= Twin Towers NPCs +//===== By: ================================================== +//= sEiKaN (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= Any Athena Version; 0315+ +//===== Description: ========================================= +//= mRO Event: Twin Towers NPCs +//===== Additional Comments: ================================= +//= 1.1 by Akaru +//= 1.2 by Akaru +//============================================================ + +prontera.gat,146,92,4 script Twin Towers#tt1::Twin-Towers 813,{ + mes "[Twin Towers]"; + mes "How are you? We are the Twin Towers."; + mes "It is such a pleasure to be able to meet you here."; + mes "I supposed you know that this is Ragnarok Online, a land of dreams and fantasies."; + mes "Are you having a joyous adventure and exciting experience?"; + next; + mes "[Twin Towers]"; + mes "Although we can't move around and can't live the way you do,"; + mes "but we love the world, as much as you do!"; + next; + mes "[Twin Towers]"; + mes "May you experience the sensation of this lovely world"; + mes "For this reason, we are here at your service with our special magic."; + mes "Kindly let us know."; + next; + menu "I shall accept your offer.",YES,"I'll ask for your service next time.",NO; + + NO: + mes "[Twin Towers]"; + mes "Er, what a pity. Travelling by yourself is still the best evidence of adventure."; + mes "Isn't this proving that you are still young?"; + mes "We respect brave hearts like this"; + next; + mes "[Twin Towers]"; + mes "There are good and bad times in life, morever, adventure isn't an easy task in the first place."; + mes "Isn't this true?"; + mes "Feel free to come to us when you are having time, we will always be there to serve you."; + next; + mes "[Twin Towers]"; + mes "Forget all your troubles, and create a splendid legend in this wonderful world."; + mes "This is such a wonderful world, and you'll always be a great adventurer!"; + close; + YES: + mes "[Twin Towers]"; + mes "The flaming passion of adventurer,"; + mes "The desire to explore the unknown realms,"; + mes "The dedication and commitment to achieve the aspiration..."; + mes "You are simply a true adventurer with what compassion."; + next; + mes "[Twin Towers]"; + mes "We wish to help passionate adventurers."; + mes "Although we are not able to move, luckily we have the special ability that can warp you to places of danger and excitement."; + next; + mes "[Twin Towers]"; + mes "Come on! Where do you wish to go?"; + mes "Just let us know yout desired destination and we will send your there!"; + menu "Hidden Temple", HiddenTemple,"Orc Dungeon",OrcDungeon,"Ant Hell",AntHell,"Mjolnir Waste Pit",MjolnirWastePit,"Sphinx",Sphinx,"Glast Heim",GlastHeim,"Comodo",Comodo; + HiddenTemple: + warp "prt_fild01.gat",136,368; + close; + OrcDungeon: + warp "gef_fild10.gat",67,334; + close; + AntHell: + warp "moc_fild04.gat",210,329; + close; + MjolnirWastePit: + warp "mjolnir_02.gat",79,361; + close; + Sphinx: + warp "moc_fild19",105,99; + close; + GlastHeim: + warp "gef_fild06",45,304; + close; + Comodo: + warp "cmd_fild01",30,317; + close; +} + +morocc.gat,160,97,4 duplicate(Twin-Towers) Twin Towers#tt2 812 +payon.gat,101,116,4 duplicate(Twin-Towers) Twin Towers#tt3 812 +izlude.gat,134,92,4 duplicate(Twin-Towers) Twin Towers#tt4 812 +alberta.gat,25,238,4 duplicate(Twin-Towers) Twin Towers#tt5 812 +geffen.gat,120,60,4 duplicate(Twin-Towers) Twin Towers#tt6 812 +aldebaran.gat,145,118,4 duplicate(Twin-Towers) Twin Towers#tt7 812 +comodo.gat,194,158,4 duplicate(Twin-Towers) Twin Towers#tt7 812 \ No newline at end of file diff --git a/npc/events/valentines_day.txt b/npc/events/valentines_day.txt new file mode 100644 index 000000000..1669c1b22 --- /dev/null +++ b/npc/events/valentines_day.txt @@ -0,0 +1,272 @@ +//Valentine Script 2004-02-12 +// input exploit fixed [Lupus] + + +alberta.gat,26,243,4 script Trader 58,{ +//’j—w“ü‰Â”\ + mes "[Marco Bascinio]"; + mes "A special treat... Not easily found"; + mes "in Rune-Midgard Kingdom!"; + mes "No one can resist the temptation"; + mes "of its wonderful taste!"; + mes "Makes a great gift for a friend, or even for yourself!"; + next; + mes "[Marco Bascinio]"; + mes "A gorgeous fancy looking chocolate for..."; + mes "only 5000z each!"; + next; + menu "I want it!",L1,"Nah, I'll pass",Lend; +Lend: + mes "[Marco Bascinio]"; + mes "ƒEƒzH‚±`‚ñ‚ȃXƒyƒVƒƒƒ‹‚ȃ`ƒ‡ƒRƒŒ["; + mes "ƒg‚ª—~‚µ‚­‚È‚¢‚ÆccŽc”O‚Å‚·‚ËI"; + mes "¡‚¾‚¯‚µ‚©”ƒ‚¦‚È‚¢ƒXƒyƒVƒƒƒ‹‚Å“Á•Ê‚È"; + mes "‚¨‰ÙŽq‚Å‚·‚æIl‚¦’¼‚µ‚ÄAƒ`ƒ‡ƒRƒŒ["; + mes "ƒg‚ª—~‚µ‚­‚È‚Á‚½‚祔ñ¥”ñ¥”ñ‚Ü‚½"; + mes "—ˆ‚Ä‚­‚¾‚³‚¢I‚¨‘Ò‚¿‚µ‚Ä‚¨‚è‚Ü‚·I"; + close; +L1: + mes "[Marco Bascinio]"; + mes "No way! The chocolate has the spirit of it's maker!"; + mes "That is why I only sell not more than five to each person"; + mes "If you want more than five, come back again"; + mes "So how many do you want?"; + next; + goto Linput; +Linput: + input @choconum; + if (@choconum > 5) goto LError; + if (@choconum <= 0) goto Lend; + set @chocoprice,@choconum*5000; + if (Zeny < @chocoprice) goto LError2; + set Zeny,Zeny-@chocoprice; + getitem 558,@choconum; + mes "[Marco Bascinio]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·I"; + mes "Ž„‚ÍA‚à‚¤‚µ‚΂炭‚±‚±‚É‚¢‚Ü‚·‚©‚ç"; + mes "ƒ`ƒ‡ƒRƒŒ[ƒg‚ª—~‚µ‚­‚È‚Á‚½‚çA‚Ü‚½"; + mes "‚Ç‚¤‚¼I‚¨‘Ò‚¿‚µ‚Ä‚¨‚è‚Ü‚·I"; + close; +LError: + mes "[Marco Bascinio]"; + mes "ƒEƒzƒzƒzƒzƒzƒzA‘Ê–ÚA‘Ê–Ú‘Ê–ÚI"; + mes "ˆê‰ñ‚Ì‚¨”ƒ‚¢ã‚°‚Å5ŒÂ‚Ü‚Å‚Æà–¾‚µ‚Ü"; + mes "‚µ‚½‚æ‚ËIŽ„‚Í‚½‚­‚³[‚ñ‚Ìl‚ÉA‚±‚Ì"; + mes "ƒ`ƒ‡ƒRƒŒ[ƒg‚ð–¡‚í‚Á‚Ä—~‚µ‚¢‚Ì‚Å‚·I"; + mes "‚»‚ê‚ÉAH‚ׂ·‚¬‚é‚Æ‘¾‚è‚Ü‚·I"; + next; + goto Linput; +LError2: + mes "[Marco Bascinio]"; + mes "ƒEƒzH‚ ‚ê‚ ‚êA‚ ‚ê‚êcc‚¨‹q‚³‚ñI"; + mes "‚¨‹à‚ª‘«‚è‚Ü‚¹‚ñ‚æB‚»‚ê‚ł̓`ƒ‡ƒR"; + mes "ƒŒ[ƒg‚𔄂邱‚Æ‚Ío—ˆ‚Ü‚¹‚ñI"; + mes "Ž„‚ÍA‚à‚¤‚µ‚΂炭‚±‚±‚É‚¢‚Ü‚·‚©‚ç"; + mes "‚¨‹à‚ªo—ˆ‚½‚ç‚Ü‚½‚Ç‚¤‚¼I"; + close; +} + +alberta.gat,29,243,4 script ƒ`ƒ‡ƒRƒŒ[ƒg¤l‚Ì—öl 53,{ + if ((Sex == 0) && (countitem(7182) >= 5) && (countitem(7134) >= 1) && (countitem(519) >= 1) && (countitem(612) >= 1)) goto Lmake; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "‚±‚ñ‚É‚¿‚ÍBŽÀ‚ÍAŽ„‚̔ނª”„‚Á‚Ä‚¢‚é"; + mes "ƒ`ƒ‡ƒRƒŒ[ƒg‚ÍŽ„‚ªì‚Á‚Ä‚¢‚é‚ñ‚Å‚·B"; + mes "ŠO‘‚ÅAì‚é•û–@‚ðŠw‚ñ‚Å‚«‚½‚Ì‚Å‚·B"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "ŠO‘‚Å‚ÍA‚±‚ÌŽžŠú‚ÉD‚«‚Èl‚Ƀ`ƒ‡ƒR"; + mes "ƒŒ[ƒg‚ðƒvƒŒƒ[ƒ“ƒg‚·‚é•—K‚ª‚ ‚è‚Ü"; + mes "‚·BŠÃ‚¢‹CŽ‚¿‚ðAŠÃ‚¢ƒ`ƒ‡ƒRƒŒ[ƒg‚É"; + mes "‘õ‚·cc‚·‚΂炵‚¢‚ÆŽv‚¢‚Ü‚¹‚ñ‚©H"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "Ž„‚̃`ƒ‡ƒRƒŒ[ƒg‚ª­‚µ‚Å‚à‚¨–ð‚É—§‚Ä"; + mes "‚ê‚΂ÆA‚½‚­‚³‚ñ‚½‚­‚³‚ñAƒ`ƒ‡ƒRƒŒ["; + mes "ƒg‚ðì‚Á‚½‚ñ‚Å‚·B"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "”Þ‚ÍA‚»‚ñ‚ÈŽ„‚ðŒ©‚Ä¢Ž©•ª‚Éo—ˆ‚é"; + mes "‚±‚Æ‚ð‚·‚é‚ñ‚¾£‚Á‚ÄŠæ’£‚Á‚ă`ƒ‡ƒR"; + mes "ƒŒ[ƒg‚𔄂Á‚Ä‚­‚ê‚Ä‚¢‚é‚ñ‚Å‚·B"; + mes "‚»‚Ì‹CŽ‚¿‚àŠð‚µ‚¢‚¯‚ÇAƒ`ƒ‡ƒRƒŒ["; + mes "ƒg‚𔃂Á‚Ä‚­‚ꂽ•ûX‚ÌΊ炪A‰½‚æ‚è"; + mes "Ž„‚ðK‚¹‚É‚µ‚Ä‚­‚ê‚é‚ñ‚Å‚·B"; + next; + if (Sex == 1) goto LMan; +LWoman: + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "æ‚Ù‚Ç‚àŒ¾‚¢‚Ü‚µ‚½‚ªAŠO‘‚Å‚Í‚±‚ÌŽžŠú"; + mes "D‚«‚Èl‚Ƀ`ƒ‡ƒRƒŒ[ƒg‚ðƒvƒŒƒ[ƒ“ƒg"; + mes "‚·‚é‚ñ‚Å‚·B‚à‚µAD‚«‚È•û‚ª‚¢‚é‚È‚ç"; + mes "ƒ`ƒ‡ƒRƒŒ[ƒg‚ƈê‚É‹CŽ‚¿‚ð“`‚¦‚Ä"; + mes "‚Ý‚Ü‚¹‚ñ‚©H"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "Þ—¿‚ðŽ‚Á‚Ä—ˆ‚Ä‚­‚ê‚ê‚ÎAƒ`ƒ‡ƒRƒŒ["; + mes "ƒg‚ðì‚è‚Ü‚·BŽ„‚̔ނª”„‚Á‚Ä‚¢‚éƒ`ƒ‡"; + mes "ƒRƒŒ[ƒg‚Å‚à‚¢‚¢‚Ì‚Å‚·‚ªcc"; + mes "‚¨‹à‚Å”ƒ‚¤‚æ‚èAŽ©•ª‚ÅW‚ß‚½Þ—¿‚Å"; + mes "ì‚Á‚½ƒ`ƒ‡ƒRƒŒ[ƒg‚Ì‚Ù‚¤‚ªA‚»‚Ìcc"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "Ž©•ª‚Ì‹CŽ‚¿‚ª‘ŠŽè‚É“`‚í‚é‚悤‚È‹C‚ª"; + mes "‚µ‚Ü‚¹‚ñ‚©H"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "Þ—¿‚Å‚·‚ªAƒƒ‚‚Ì€”õ‚Í‚¢‚¢‚Å‚·‚©H"; + mes "^3355ffƒJƒJƒI 5ŒÂ"; + mes "ƒ~ƒ‹ƒN 1ŒÂ"; + mes "“û”« 1ŒÂ"; + mes "Œg‘Ñ—p—nz˜F 1ŒÂ^000000"; + next; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "€”õ‚ª‚Å‚«‚½‚çA‹³‚¦‚Ä‚­‚¾‚³‚¢B"; + mes "”ü–¡‚µ‚¢ƒ`ƒ‡ƒRƒŒ[ƒg‚ðì‚点‚Ä"; + mes "‚¢‚½‚¾‚«‚Ü‚·B"; + close; +LMan: + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "‚¾‚©‚çAˆêŒÂˆêŒÂ‘厖‚ɑ厖‚Éì‚Á‚Ä"; + mes "‚¢‚é‚ñ‚Å‚·BŽ©•ª‚Å‚à”ü–¡‚µ‚­‚Å‚«‚½"; + mes "‚ÆŽv‚¢‚Ü‚·‚µAˆê“x¢‚µã‚ª‚Á‚Ä‚Ý‚Ä"; + mes "‚­‚¾‚³‚¢‚ËB‚Ó‚¤AŠæ’£‚Á‚Ä‚à‚Á‚Æ"; + mes "ì‚ç‚È‚«‚áI"; + close; +Lmake: + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "€”õ‚ªo—ˆ‚½‚ñ‚Å‚·‚ËI‚Å‚ÍA‘‘¬˜r‚ð"; + mes "•±‚킹‚Ä‚¢‚½‚¾‚«‚Ü‚·I"; + mes "‚ A—ׂɂ¢‚é”Þ‚É‚Í“à‚Å‚·‚æB"; + next; + delitem 7182,5; + delitem 7134,1; + delitem 519,1; + delitem 612,1; + getitem 558,1; + mes "[ƒGƒXƒeƒ‹=ƒ[ƒY]"; + mes "‚Í‚¢Ao—ˆã‚ª‚è‚Ü‚µ‚½I"; + mes "ƒvƒŒƒ[ƒ“ƒg‚È‚³‚é‚Ì‚Å‚·‚©H"; + mes "‹CŽ‚¿‚ª“`‚í‚é‚Æ‚¢‚¢‚Å‚·‚ËB"; + mes "K‚¹‚É‚È‚Á‚Ä‚­‚¾‚³‚¢`B"; + close; +} + +prt_castle.gat,42,35,3 script Dessert Manager 47,{ + if (Sex == 1) goto LStartMan; +LStartWomen: + mes "[Charl Orleang]"; + mes "ƒIƒDAƒ}ƒhƒ‚ƒAƒ[ƒ‹I"; + mes "‹M•û‚ª‚»‚±‚É‚¢‚邾‚¯‚ÅA‚±‚Ì‚Þ‚³"; + mes "‹ê‚µ‚¢êŠ‚ª“V‘‚É“™‚µ‚­‚È‚éB"; + next; + mes "[Charl Orleang]"; + mes "“VŽg‚̂悤‚Ɉ¤‚­‚邵‚¢‹M•û‚ª"; + mes "‚¢‚Á‚½‚¢‰½—p‚Å‚±‚±‚É‚¢‚炵‚½‚Ì‚©‚ÈH"; + mes "ƒƒ^ƒNƒV‚߂ł悯‚ê‚ÎA‰½‚Å‚àŠè‚¢‚ð"; + mes "•·‚«‚Ü‚µ‚傤B"; + next; + menu "ƒ`ƒ‡ƒRƒŒ[ƒg‚ðì‚Á‚Ä‚­‚ê‚Ü‚·‚©H",L1,"‚¨”æ‚ê—l‚Å‚·B",-; + mes "[Charl Orleang]"; + mes "ƒIƒDA‚»‚̈ꌾccƒƒ^ƒNƒV‚Ì‘¶Ý‚ð"; + mes "–³‚É‹A‚·‚悤‚Ècc‚»‚Ì•X‚Ìn‚̂悤‚È"; + mes "ˆêŒ¾‚ªAŽ„‚Ìg‚ðí‚èA°‚³‚¦‘‰‚¹Š‚¦"; + mes "‚³‚¹‚Ä‚µ‚Ü‚¤cc"; + next; + mes "[Charl Orleang]"; + mes "ƒIƒDAƒ}ƒhƒ‚ƒAƒ[ƒ‹I"; + mes "‚Ç‚¤‚·‚ê‚΂ǂ¤‚·‚ê‚Îcc‹M•û‚ÌS‚ð"; + mes "Ăуƒ^ƒNƒV‚Ì—¸‚Æo—ˆ‚é‚Ì‚©!?"; + close; +L1: + if (countitem(558) >= 3) goto L2; + mes "[Charl Orleang]"; + mes "ƒIƒDAƒ}ƒhƒ‚ƒAƒ[ƒ‹I"; + mes "ƒƒ^ƒNƒV‚Í_‚Å‚à˜B‹àpŽt‚Å‚à‚È‚¢‚Ì‚Å"; + mes "‚·B•Ï‚ÈÞ—¿‚©‚çŒ|p•i‚ð‘n‚èo‚·‚±‚Æ"; + mes "‚È‚Ço—ˆ‚Ü‚¹‚ñI‚»‚µ‚ÄA•½–}‚ȃAƒCƒe"; + mes "ƒ€‚©‚畽–}‚Èì•i‚ðì‚é‚È‚ÇAˆÌ‘å‚ÈŒ|"; + mes "p‰Æ‚̃ƒ^ƒNƒV‚É‚Í•s‰Â”\!!"; + next; + mes "[Charl Orleang]"; + mes "ƒƒ^ƒNƒV‚ª‘n‘¢‚·‚镨‚ÍA¢ŠE’†‚Ì’N‚à"; + mes "‚ªŠ´’Q‚Ì‚½‚ß‘§‚ð“f‚­A’N‚É‚à“ž’ê^Ž—"; + mes "o—ˆ‚È‚¢Œ|p•i‚È‚Ì‚Å‚·B"; + next; + mes "[Charl Orleang]"; + mes "ƒƒ^ƒNƒV‚ª‹M•û‚Ì‹ê˜J‚É•ñ‚¢‚éˆ×‚É‚Í"; + mes "^3355ffƒ`ƒ‡ƒRƒŒ[ƒg3ŒÂ^000000‚ªâ‘ΕK—v‚È‚Ì‚Å‚·B"; + mes "‚»‚êˆÈ‰º‚Å‚àA‚»‚êˆÈã‚Å‚à‚È‚¢B"; + mes "ƒsƒbƒ^ƒŠ3ŒÂccB"; + next; + mes "[Charl Orleang]"; + mes "ƒ}ƒhƒ‚ƒAƒ[ƒ‹‚ÌŒõ‹P‚­”ü–e‚Ɖؚø‚Èg‚É"; + mes "‰B‚³‚ꂽ‹­x‚Ȉӎu‚È‚çA‚«‚Á‚ÆŽè‚É"; + mes "“ü‚ê‚Ä‚­‚邱‚Æ‚ª‰Â”\‚Å‚µ‚傤B"; + next; + mes "[Charl Orleang]"; + mes "‚¢‚¢‚Å‚·‚©B^3355ffƒ`ƒ‡ƒRƒŒ[ƒg3ŒÂ^000000‚ðŽ‚Á‚Ä"; + mes "—ˆ‚Ä‚­‚¾‚³‚¢Bo—ˆ‚邱‚Æ‚È‚ç‰Î‚Ì’†"; + mes "…‚Ì’†A’n–‚Ì’ê‚Ö‚Å‚àA‹M•û‚ׂ̈É"; + mes "ƒƒ^ƒNƒV‚ª’¼ÚŽè‚É“ü‚ê‚Ä·‚µã‚°‚½‚¢"; + mes "‚ªA¡‚̃ƒ^ƒNƒV‚͉¤‹{‚Ì‹Æ–±‚ÉIŽn"; + mes "I‚í‚ê‚égccƒIƒDcc"; + next; + mes "[Charl Orleang]"; + mes "ƒI ƒŒƒ”ƒHƒ[ ƒ}ƒhƒ‚ƒAƒ[ƒ‹cc"; + mes "‹M•û‚Ì‹A‚è‚ðS‚©‚炨‘Ò‚¿‚µ‚Ä"; + mes "‚¨‚è‚Ü‚·cc"; + close; +L2: + mes "[Charl Orleang]"; + mes "ƒIƒDAƒ}ƒhƒ‚ƒAƒ[ƒ‹I"; + mes "ƒƒ^ƒNƒV‚ÌŽ‚Ä‚é‘S‚Ä‚ÌŠ´«‚ðŽ‚Á‚Ä"; + mes "‹M•û‚̃`ƒ‡ƒRƒŒ[ƒg‚ð”ü‚µ‚­‚·‚΂炵‚­"; + mes "àŠ‚Ñ‚â‚©‚ÈŒ|p‚ւƸ‰Ø‚³‚¹‚Ä‚¢‚½‚¾"; + mes "‚«‚Ü‚µ‚傤I"; + next; + mes "[Charl Orleang]"; + mes "‹M•û‚Ì“µ‚Æ‚¢‚¤•ó΂ªA¢ŠE’†‚Ì’N‚à‚ð"; + mes "–£—¹‚·‚éA“§–¾‚Å_”é“I‚Ȉ¤‚ÌŒõ‚ð•ú‚Â"; + mes "‚悤‚Écc"; + next; + mes "[Charl Orleang]"; + mes "ƒAƒ“ ƒhƒD ƒgƒƒ ƒNƒ@ƒgƒ‹cc"; + mes "‚Ý‚É‚­‚¢ƒAƒqƒ‹‚ÌŽq‚ª”ü‚µ‚¢”’’¹‚É•Ïg"; + mes "‚µ‚½‚悤‚Écc•½–}‚ȃ`ƒ‡ƒRƒŒ[ƒg‚ª”ü"; + mes "‚µ‚¢Œ|p‚É•Ïg‚·‚é‚Ì‚¾cc!!"; + next; + mes "[Charl Orleang]"; + mes "’g‚©‚­•ï‚Ýž‚Ýcc‚»‚µ‚Ä‚Ó‚ñ‚í‚è‚Æ"; + mes "•Ï‰»‚·‚邪‚¢‚¢I"; + mes "‹­x‚É‚ÄAˆÌ‘å‚Ȃ鎞‘ã‚Ì–¼ì‚æccI"; + next; + delitem 558,3; + getitem 559,1; + mes "[Charl Orleang]"; + mes "ƒIƒDAƒtƒFƒŠƒVƒ^ƒVƒIƒ“IƒIƒD`ƒ‰ƒ‰ô"; + mes "‚±‚ñ‚È‘f“G‚Èì•i‚ðì‚èo‚¹‚é‚Æ‚Ícc"; + mes "ƒƒ^ƒNƒV‚Í‚È‚ñ‚Æß[‚¢‚Ì‚¾ccI"; + mes "ƒ}ƒhƒ‚ƒAƒ[ƒ‹A‚±‚Ì‹M•û‚ÌŽŠ‹É‚Ì”÷΂Ý"; + mes "‚Æ‚àŒ¾‚¦‚éŒ|p•iA‹C‚É“ü‚Á‚Ä‚¢‚½‚¾‚¯"; + mes "‚½‚©‚ÈB"; + next; + mes "[Charl Orleang]"; + mes "‚Å‚ÍAƒI ƒŒƒ”ƒHƒ`B"; + close; +LStartMan: + mes "[Charl Orleang]"; + mes "ƒ{ƒ“ƒWƒ…`ƒ‹_ƒ€ƒbƒVƒ…[Bƒƒ^ƒNƒV‚Í"; + mes "—y‚©‰“‚¢êŠ‚©‚çŒ|p‚ð¶‚Ýo‚·‚½‚ßA"; + mes "‚±‚̃AƒgƒŠƒG‚É•‘‚¢~‚肽‚Æ‚±‚ë‚È‚Ì"; + mes "‚Å‚·B"; + next; + mes "[Charl Orleang]"; + mes "ƒIƒDAƒmƒ“ƒmƒ“IŽ„‚Ì´‚ç‚©‚È“µ‚Í"; + mes "ˆ¤‚炵‚¢—«‚Ì‚Ý‚ð‰f‚·‹¾‚È‚Ì‚Å‚·B"; + next; + mes "[Charl Orleang]"; + mes "ƒIƒD`A‚»‚ê‚Å‚È‚­‚Ä‚à–Z‚µ‚¢‚Ì‚É"; + mes "‚±‚̃Vƒƒƒ‹ƒ‹=ƒIƒ‹ƒŒƒAƒ“‚ð”ς킹‚é"; + mes "‚È‚ñ‚ÄBƒIƒD`Aƒmƒ“ƒmƒ“ƒmƒ“B"; + close; +} \ No newline at end of file diff --git a/npc/guides/guides_alb.txt b/npc/guides/guides_alb.txt new file mode 100644 index 000000000..53ad0530a --- /dev/null +++ b/npc/guides/guides_alb.txt @@ -0,0 +1,109 @@ +//===== eAthena Script ======================================= +//= Alberta Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= v1.1 Now using duplicate command. +//============================================================ + + + + +// North -------------------------------------------------------- +alberta.gat,23,238,4 script Guide#1::Guide 105,{ + cutin "prt_soldier",2; + mes "[Alberta Soldier]"; + mes "Welcome to Alberta, the Port Town."; + next; + mes "[Alberta Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime."; + mes "Oh, and if you're a newbie you should read the notice first."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Alberta Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Alberta Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Merchant Guild^000000",sM_2a,"Armory",sM_2b,"Item Shop",sM_2c,"Inn",sM_2d, "Wipe all indications from mini-map.",sM_2e, "Cancel",M_End; + + sM_2a: + mes "[Alberta Soldier]"; + mes "The 'Merchant Guild' is located in the SouthWestern part of town. The Merchant Guild is the place to go to become a merchant."; + viewpoint 1,33,41,1,0xFF0000; + goto sL_Wipe; + sM_2b: + mes "[Alberta Soldier]"; + mes "The 'Armory' is located in the Southern part of town. Go there to buy weapons and armor."; + viewpoint 1,148,57,2,0x6666FF; + goto sL_Wipe; + sM_2c: + mes "[Alberta Soldier]"; + mes "The 'Item Shop' is located in the Centre of town."; + viewpoint 1,98,154,3,0xFF00FF; + goto sL_Wipe; + sM_2d: + mes "[Alberta Soldier]"; + mes "There are 2 'Inns' located in the Northern and Southern parts of town. Go there if you need to rest."; + viewpoint 1,65,233,4,0xF5AD05; + viewpoint 1,136,38,5,0xF5AD05; + goto sL_Wipe; + sM_2e: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,33,41,1,0xFF0000; + viewpoint 2,148,57,2,0x6666FF; + viewpoint 2,98,154,3,0xFF00FF; + viewpoint 2,65,233,4,0xF5AD05; + viewpoint 2,136,38,5,0xF5AD05; + if(@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Alberta Soldier]"; + mes "All indications have been removed"; + cutin "prt_soldier",255; + close; + + M_2: + mes "[Alberta Soldier]"; + mes "We upgraded the Location Guide to the newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Alberta Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Alberta Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Alberta Soldier]"; + mes "Ta Ta."; + cutin "prt_soldier",255; + close; +} + +// South -------------------------------------------------------- +alberta.gat,120,60,3 duplicate(Guide) Guide#2 105 diff --git a/npc/guides/guides_alde.txt b/npc/guides/guides_alde.txt new file mode 100644 index 000000000..3443f9c2a --- /dev/null +++ b/npc/guides/guides_alde.txt @@ -0,0 +1,116 @@ +//===== eAthena Script ======================================= +//= Al De Baran Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Corrected building locations and descriptions +//============================================================ + + + + +aldebaran.gat,139,63,4 script Soldier 105,{ + cutin "prt_soldier",2; + mes "[Al De Baran Guard]"; + mes "Welcome to Al De Baran, the home of the lovely Kafras!"; + next; + mes "[Al De Baran Guard]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Al De Baran Guard]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Al De Baran Guard]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Kafra Main Office^000000",sM_2a, "Armory",sM_2b, "Item Shop",sM_2c, "Pub",sM_2d, + "^00AAFFSorcerer Guild (Closed)^000000",sM_2e, "^DDAA00Chemical Academy^000000",sM_2f, + "Wipe all indications from mini-map",sM_2g, "Cancel", M_End; + + sM_2a: + mes "[Al De Baran Guard]"; + mes "The 'Kafra Main Office' is the place where you can redeem your special researve points."; + viewpoint 1,56,225,1,0xFF0000; + goto sL_Wipe; + sM_2b: + mes "[Al De Baran Guard]"; + mes "Go to the 'Armory' to buy weapons and armor."; + viewpoint 1,72,194,2,0x0000FF; + goto sL_Wipe; + sM_2c: + mes "[Al De Baran Guard]"; + mes "The 'Item Shop' has all sort of usefull tools for you to buy."; + viewpoint 1,197,68,3,0x00FF00; + goto sL_Wipe; + sM_2d: + mes "[Al De Baran Guard]"; + mes "Stop by the 'Pub' to relax and have a drink."; + viewpoint 1,231,107,4,0xFF00FF; + goto sL_Wipe; + sM_2e: + mes "[Al De Baran Guard]"; + mes "The 'Sorcerer Guild' is closed right now."; + //viewpoint 1,48,198,5,0x00AAFF; + goto sL_Wipe; + sM_2f: + mes "[Al De Baran Guard]"; + mes "The ^DDAA00'Chemical Academy'^000000 is where Merchants go to become Alchemists."; + viewpoint 1,58,61,6,0xDDAA00; + goto sL_Wipe; + sM_2g: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,56,225,1,0xFF0000; + viewpoint 2,72,194,2,0x0000FF; + viewpoint 2,197,68,3,0x00FF00; + viewpoint 2,231,107,4,0xFF00FF; + viewpoint 2,48,198,5,0x00AAFF; + viewpoint 2,58,61,6,0xDDAA00; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Al De Baran Guard]"; + mes "All indications have been removed"; + cutin "prt_soldier",255; + close; + + M_2: + mes "[Al De Baran Guard]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Al De Baran Guard]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Al De Baran Guard]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Al De Baran Guard]"; + mes "Good day."; + cutin "prt_soldier",255; + close; +} diff --git a/npc/guides/guides_com.txt b/npc/guides/guides_com.txt new file mode 100644 index 000000000..033e11158 --- /dev/null +++ b/npc/guides/guides_com.txt @@ -0,0 +1,141 @@ +//===== eAthena Script ======================================= +//= Comodo Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= v1.1 Now using duplicate command. +//============================================================ + + + + +// East ------------------------------------------------------------------------------------- +comodo.gat,322,178,4 script Comodo Guide#1::Comodo_Guide 724,{ + mes "[Comodo Guide]"; + mes "The city of Dreams and Fantasy, where the night life continues 24 hours a day, we welcome you to the land of Comodo!"; + next; + mes "[Comodo Guide]"; + mes "I know the area very well. If you need directions, ask me for asistance anytime."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Comodo Guide]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Comodo Guide]"; + mes "Please choose a building to view."; + next; + sM_Menu: + mes "[Comodo Guide]"; + menu "^FF8000Casino^000000",sM_1, "^34B4A0Hula dancing stage^000000",sM_2, "Weapons and Armor Shop",sM_3, "Tool store",sM_4, + "Tourist Shop",sM_5, "^F1BE0EKafra Corp. Western Branch^000000",sM_6, "^FF5555Chief's House^000000",sM_7, "Pub",sM_8, + "^00B200Camp Grounds^000000",sM_9, "Clear all indications from mini-map.",sM_10, "End Conversation",M_End; + + sM_1: + mes "The heart of Comodo's night life!"; + mes "A heaven of rest for tired travelers!"; + mes "The Comodo Casino ~!"; + viewpoint 1,140,98,1,0xFF8000; + goto sL_Wipe; + sM_2: + mes "Hula Hula - Hula Hula"; + next; + mes "[Comodo Guide]"; + mes "When you become more comfortable performing on stage, you should consider changing your job to a '^FF0000Dancer^000000'."; + viewpoint 1,188,168,2,0x34B4A0; + goto sL_Wipe; + sM_3: + mes "Here in Comodo, you can find unique weapons and armor only found in this area."; + viewpoint 1,266,70,3,0xFF00FF; + goto sL_Wipe; + sM_4: + mes "Here in Comodo, you can find usefull items only found in this area."; + mes "'Comodo Tool Store'"; + viewpoint 1,86,128,4,0xFF00FF; + goto sL_Wipe; + sM_5: + mes "Here in Comodo, you can find unique gifts only found in this area."; + mes "'Comodo Tourist Shop'"; + viewpoint 1,298,124,5,0x00FFFF; + goto sL_Wipe; + sM_6: + mes "Kafra Corp.'s Western Branch center is located here in Comodo, offering you superior service."; + viewpoint 1,136,202,6,0xF1BE0E; + goto sL_Wipe; + sM_7: + mes "This is the house where the Chief of Comodo resides."; + mes "If you are one who posseses a serious interest in Comodo, you can meet the Chief in person."; + mes "I think that would be okay with him."; + viewpoint 1,114,294,7,0xFF5555; + goto sL_Wipe; + sM_8: + mes "The pub is a place where tourists from all over the world come to converse and exchange ideas."; + viewpoint 1,166,298,8,0x6666FF; + goto sL_Wipe; + sM_9: + mes "Freinds and family often come to the Comodo Camp Grounds for the mermorable experiences."; + mes "It is also the place to experience Comodo's unique, ethinic BBQ!!"; + viewpoint 1,210,308,9,0x00B200; + goto sL_Wipe; + sM_10: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; // avoids a double 'next' when 'wipe indications' is chosen + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,140,98,1,0xFF8000; + viewpoint 2,188,168,2,0x34B4A0; + viewpoint 2,266,70,3,0xFF00FF; + viewpoint 2,86,128,4,0xFF00FF; + viewpoint 2,298,124,5,0x00FFFF; + viewpoint 2,136,202,6,0xF1BE0E; + viewpoint 2,114,294,7,0xFF5555; + viewpoint 2,166,298,8,0x6666FF; + viewpoint 2,210,308,9,0x00B200; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "All indications have been removed"; + close; + + M_2: + mes "[Comodo Guide]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Comodo Guide]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Comodo Guide]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Comodo Guide]"; + mes "Because Comodo is located in a cave, there is absolutely no sunlight. It is dark 24 hours a day!"; + mes "The residents of Comodo are using this unusual circumstance to draw tourists to our area..."; + close; +} + +// North ---------------------------------------------------------------------------------------- +comodo.gat,176,350,4 duplicate(Comodo_Guide) Comodo Guide#2 724 +// West ----------------------------------------------------------------------------------------- +comodo.gat,37,219,4 duplicate(Comodo_Guide) Comodo Guide#3 724 + diff --git a/npc/guides/guides_gef.txt b/npc/guides/guides_gef.txt new file mode 100644 index 000000000..f09cf781c --- /dev/null +++ b/npc/guides/guides_gef.txt @@ -0,0 +1,135 @@ +//===== eAthena Script ======================================= +//= Geffen Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working. Added a guide at every exit. +//= v1.1 Now using duplicate command. +//============================================================ + + + + + + + +// North -------------------------------------------- +geffen.gat,123,202,5 script Guide#1::Guide 705,{ + cutin "gef_soldier",2; + mes "[Geffen Soldier]"; + mes "Welcome to Geffen, the City of Magic."; + next; + mes "[Geffen Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime you need help."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Geffen Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Geffen Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Magic Acadamy^000000",M_1_1, "^00A500Blacksmith Workshop^000000",M_1_2, "^4444FFGeffen Tower^000000",M_1_3, + "Armory",M_1_4, "Item Shop",M_1_5, "Pub",M_1_6, "Inn",M_1_7, "Wipe all indications from mini-map",M_1_8, "Cancel", M_End; + + M_1_1: + mes "[Geffen Soldier]"; + mes "'The 'Magic Acadamy' is the home of magical theorists, and the place for would be Mages."; + viewpoint 1,61,180,1,0xFF5555; + goto sL_Wipe; + M_1_2: + mes "[Geffen Soldier]"; + mes "The 'Blacksmith Workshop' is SouthEast of Geffen Tower. It is where Merchants train to become Blacksmiths."; + mes "You can also get your weapons and armor upgraded there."; + viewpoint 1,182,59,2,0x44FF44; + goto sL_Wipe; + M_1_3: + mes "[Geffen Soldier]"; + mes "The lower levels of 'Geffen Tower' are spawning grounds for monsters. People go there to train."; + mes "The top floor of the Tower is home to the ^0000FF'Wizard's Guild'^000000. Mages can go there to become Wizards."; + viewpoint 1,120,120,3,0x5555FF; + goto sL_Wipe; + M_1_4: + mes "[Geffen Soldier]"; + mes "Head over to the 'Armory' to equip yourself with a variety of weapons and armor."; + viewpoint 1,99,140,4,0xFF00FF; + goto sL_Wipe; + M_1_5: + mes "[Geffen Soldier]"; + mes "The 'Item Shop' is the place to go when you need to stock up on things like potions and fly-wings."; + viewpoint 1,44,86,5,0xFF00FF; + goto sL_Wipe; + M_1_6: + mes "[Geffen Soldier]"; + mes "The 'Pub' is a great place to meet people and have fun."; + viewpoint 1,138,138,6,0xF0C40F; + goto sL_Wipe; + M_1_7: + mes "[Geffen Soldier]"; + mes "The 'Inn' is a good place to rest and replenish your hp and sp."; + viewpoint 1,172,174,7,0xFF8000; + goto sL_Wipe; + M_1_8: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; // avoids a double 'next' when 'wipe indications' is chosen + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,61,180,1,0xFF5555; + viewpoint 2,182,59,2,0x44FF44; + viewpoint 2,120,120,3,0x5555FF; + viewpoint 2,99,140,4,0xFF00FF; + viewpoint 2,44,86,5,0xFF00FF; + viewpoint 2,138,138,6,0xF0C40F; + viewpoint 2,172,174,7,0xFF8000; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Geffen Soldier]"; + mes "All indications have been removed"; + cutin "gef_soldier",255; + close; + + M_2: + mes "[Geffen Soldier]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Geffen Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Geffen Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Geffen Soldier]"; + mes "Have a nice day."; + cutin "gef_soldier",255; + close; +} + +// South ------------------------------------------ +geffen.gat,118,62,0 duplicate(Guide) Guide#2 705 +// East ----------------------------------------------------- +geffen.gat,203,116,2 duplicate(Guide) Guide#3 705 +// West ---------------------------------------------- +geffen.gat,37,123,5 duplicate(Guide) Guide#4 705 diff --git a/npc/guides/guides_izl.txt b/npc/guides/guides_izl.txt new file mode 100644 index 000000000..dc66e834e --- /dev/null +++ b/npc/guides/guides_izl.txt @@ -0,0 +1,118 @@ +//===== eAthena Script ======================================= +//= Izlude Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + + + +// South ---------------------------------------- +izlude.gat,123,87,6 script Guide 105,{ + cutin "prt_soldier",2; + mes "[Izlude Soldier]"; + mes "Welcome to Izlude, the satelite city of Prontera and home to the Swordsman Association!."; + next; + mes "[Izlude Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime you need help."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Izlude Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Izlude Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Swordsman Association^000000",M_1_1, "Swordsman Hall",M_1_2, "The Arena",M_1_3, + "Izlude Marina",M_1_4, "Armory",M_1_5, "Item Shop",M_1_6, "Wipe all Indications on Mini-Map",M_1_7, "Cancel",M_End; + + M_1_1: + mes "[Izlude Soldier]"; + mes "Do you want to be a Swordsman? Then head over to the Swordsman Association in the Western part of town."; + viewpoint 1,52,140,1,0xFF0000; + goto sL_Wipe; + M_1_2: + mes "[Izlude Soldier]"; + mes "Swordman Hall, the official Training Center of the Swordsman Assosiation, is located in the Eastern part of town."; + viewpoint 1,214,130,2,0x00FF00; + goto sL_Wipe; + M_1_3: + mes "[Izlude Soldier]"; + mes "The 'Arena' is a popular place for young warriors to train. Just head north and you'll find it."; + mes "You can have fun there, you know."; + viewpoint 1,128,225,3,0x00FF00; + goto sL_Wipe; + M_1_4: + mes "[Izlude Soldier]"; + mes "The beautifull Marina is where you should go if you would like to take a ship to 'Alberta' or 'Byalan Island'. It is in the Northeastern part of town."; + viewpoint 1,200,180,4,0xFF0000; + goto sL_Wipe; + M_1_5: + mes "[Izlude Soldier]"; + mes "The Armory is located NorthWest of the Center Food Court."; + viewpoint 1,111,149,5,0xFF00FF; + goto sL_Wipe; + M_1_6: + mes "[Izlude Soldier]"; + mes "The Item Shop is located NorthEast of the Center Food Court."; + viewpoint 1,148,148,6,0xFF00FF; + goto sL_Wipe; + M_1_7: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,52,140,1,0xFF0000; + viewpoint 2,214,130,2,0x00FF00; + viewpoint 2,128,225,3,0x00FF00; + viewpoint 2,200,180,4,0xFF0000; + viewpoint 2,111,149,5,0xFF00FF; + viewpoint 2,148,148,6,0xFF00FF; + if(@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Izlude Soldier]"; + mes "All indications have been removed"; + cutin "prt_soldier",255; + close; + + M_2: + mes "[Izlude Soldier]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Izlude Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Izlude Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Izlude Soldier]"; + mes "Try not to get lost."; + cutin "prt_soldier",255; + close; +} diff --git a/npc/guides/guides_mor.txt b/npc/guides/guides_mor.txt new file mode 100644 index 000000000..17f47e89b --- /dev/null +++ b/npc/guides/guides_mor.txt @@ -0,0 +1,121 @@ +//===== eAthena Script ======================================= +//= Morroc Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working. Added a guide at every exit. +//= v1.1 Now using duplicate command. +//============================================================ + + + + + +// North ------------------------------------------------ +morocc.gat,153,286,6 script Guide#1::Guide 707,{ + cutin "moc_soldier",2; + mes "[Morroc Soldier]"; + mes "Welcome to Morroc, the Desert Frontier!"; + next; + mes "[Morroc Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime you need help."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Morroc Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Morroc Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Thief Guild^000000",M_1_1, "Armory",M_1_2, "Inn",M_1_3, "Pub",M_1_4, "Mercenary Guild",M_1_5, + "Wipe all indications from mini-map.",M_1_6, "Cancel",M_End; + + M_1_1: + mes "[Morocc Soldier]"; + mes "The 'Thief Guild'.... I hear that it's the place to go if you want to be a Thief....."; + viewpoint 1,24,297,1,0xFF0000; + goto sL_Wipe; + M_1_2: + mes "[Morocc Soldier]"; + mes "Head over to the 'Armory' to equip yourself with a variety of weapons and armor."; + viewpoint 1,253,56,2,0xFF00FF; + goto sL_Wipe; + M_1_3: + mes "[Morocc Soldier]"; + mes "In Morroc there are 2 'Inn's' located in the South and NorthEastern parts of town."; + viewpoint 1,274,269,3,0xFF00FF; + viewpoint 1,197,66,4,0xFF00FF; + goto sL_Wipe; + M_1_4: + mes "[Morocc Soldier]"; + mes "The 'Pub' is located to the NorthWest of town."; + viewpoint 1,52,259,5,0xFF00FF; + goto sL_Wipe; + M_1_5: + mes "[Morocc Soldier]"; + mes "The 'Mercenary Guild' is in the Eastern corner of town."; + viewpoint 1,284,171,6,0x00FF00; + goto sL_Wipe; + M_1_6: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; // avoids a double 'next' when 'wipe indications' is chosen + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,24,297,1,0xFF0000; + viewpoint 2,253,56,2,0xFF00FF; + viewpoint 2,274,269,3,0xFF00FF; + viewpoint 2,197,66,4,0xFF00FF; + viewpoint 2,52,259,5,0xFF00FF; + viewpoint 2,284,171,6,0x00FF00; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Morroc Soldier]"; + mes "All indications have been removed"; + cutin "moc_soldier",255; + close; + + M_2: + mes "[Morroc Soldier]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Morroc Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Morroc Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Morocc Soldier]"; + mes "Good by for now."; + cutin "moc_soldier",255; + close; +} + +// South -------------------------------------------- +morocc.gat,162,97,6 duplicate(Guide) Guide#2 707 +// West -------------------------------------------- +morocc.gat,28,161,6 duplicate(Guide) Guide#3 707 +// East -------------------------------------------- +morocc.gat,294,203,9 duplicate(Guide) Guide#4 707 diff --git a/npc/guides/guides_nif.txt b/npc/guides/guides_nif.txt new file mode 100644 index 000000000..cf382e95a --- /dev/null +++ b/npc/guides/guides_nif.txt @@ -0,0 +1,82 @@ +//===== eAthena Script ======================================= +//= Niflheim Guide +//===== By: ================================================== +//= +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= 1.1 Fixed location command format [Lupus] +//============================================================ + + +//===================================================================================== +niflheim.gat,186,190,5 script Wandering Man 798,{ + mes "[Wandering Man]"; + mes "Why are you in this scary city? I guess you lost your way too, heh."; + mes "I was attracted here by the tall trees, but still can't find my way out after so long..."; + next; + mes "[Wandering Man]"; + mes "But instead i have become familiar with the village surroundings,"; + mes "perhaps it may be useful for escaping sometimes."; + next; + menu "Enquire locations",-,"Wipe indications",L_MENU_2,"Cancel",L_end; + mes "[Wandering Man]"; + mes "Where do you want to know about?"; + next; + menu "Witch's Hut",M_Magic,"Equipment Shop",M_item,"Weapon Shop",M_weapon,"Inn",M_hotel,"Cancel",L_cancel; + + M_Magic: + viewpoint 1,255,194,1,0xFF3366; + mes "[Wandering Man]"; + mes "In Niflheim lives a terrible witch,"; + mes "you'll see her house right ^FF3366there^000000,"; + mes "it was so scary i fled right after going in!"; + close; + + M_item: + viewpoint 1,219,198,2,0xCC6600; + mes "[Wandering Man]"; + mes "The equipment shop should be over ^CC6600here^000000"; + mes "they sell several items not available to the outside world."; + close; + + M_weapon: + viewpoint 1,219,170,3,0x66FF33; + mes "[Wandering Man]"; + mes "The weapon shop should be over ^66FF33here^000000"; + mes "they sell several items not available to the outside world."; + close; + + M_hotel: + viewpoint 1,189,210,4,0x3366FF; + mes "[Wandering Man]"; + mes "^3366FFThat^000000 would be the inn,"; + mes "occasionally the spirits throw a party in there."; + close; + + L_cancel: + mes "[Wandering Man]"; + mes "To remove all indications of the minimap"; + mes "come back and talk to me again."; + close; + + L_MENU_2: + viewpoint 2,255,194,1,0xFF3366; + viewpoint 2,219,198,2,0xCC6600; + viewpoint 2,219,170,3,0x66FF33; + viewpoint 2,189,210,4,0x3366FF; + mes "[Wandering Man]"; + mes "I removed all the indications,"; + mes "If you still need any directions, come back and talk to me again."; + close; + + L_end: + mes "[Wandering Man]"; + mes "Wandering around by yourself is dangerous..."; + mes "please take care."; + close; +} diff --git a/npc/guides/guides_pay.txt b/npc/guides/guides_pay.txt new file mode 100644 index 000000000..bc6a553e3 --- /dev/null +++ b/npc/guides/guides_pay.txt @@ -0,0 +1,193 @@ +//===== eAthena Script ======================================= +//= Payon Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= v1.1 Now using duplicate command. +//= New Payon Locations [Darkchild] +//============================================================ + + + + +payon.gat,148,213,4 script Guide 708,{ + cutin "pay_soldier",2; + mes "[Payon Soldier]"; + mes "Welcome to Payon, the peacefull city hidden in the forest!."; + next; + mes "[Payon Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime you need help."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Payon Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Payon Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Archer Guild^000000",M_1_1, "Armory",M_1_2, "Item Shop",M_1_3, "Inn",M_1_4, "Central Palace",M_1_5, + "Wipe all indications from mini-map.",M_1_6, "Cancel",M_End; + + M_1_1: + mes "[Payon Soldier]"; + mes "The 'Archer Guild' is located in Archer Village. Go there if you want to be an archer."; + viewpoint 1,227,323,1,0xFF0000; + goto sL_Wipe; + M_1_2: + mes "[Payon Soldier]"; + mes "The 'Armory' is located a bit West of the middle of the town."; + viewpoint 1,138,158,2,0xFF00FF; + goto sL_Wipe; + M_1_3: + mes "[Payon Soldier]"; + mes "The 'Item Shop' is located to the south."; + viewpoint 1,161,95,3,0xFF00FF; + goto sL_Wipe; + M_1_4: + mes "[Payon Soldier]"; + mes "The 'Inn' is located in the SouthEastern part of the town."; + viewpoint 1,219,117,4,0xFF00FF; + goto sL_Wipe; + M_1_5: + mes "[Payon Soldier]"; + mes "The 'Central Palace' is the home of the Payon Royal Family. Mind your manners when you enter the palace."; + viewpoint 1,156,243,5,0x00FF00; + goto sL_Wipe; + M_1_6: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; // avoids a double 'next' when 'wipe indications' is chosen + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,227,323,1,0xFF0000; + viewpoint 2,138,158,2,0xFF00FF; + viewpoint 2,161,95,3,0xFF00FF; + viewpoint 2,219,117,4,0xFF00FF; + viewpoint 2,156,243,5,0x00FF00; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Payon Soldier]"; + mes "All indications have been removed"; + cutin "pay_soldier",255; + close; + + M_2: + mes "[Payon Soldier]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Payon Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Payon Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Payon Soldier]"; + mes "Bon Voyage, Wanderer."; + cutin "pay_soldier",255; + close; +} + +// Archer Village ---------------------------------------------------------------- +pay_arche.gat,85,30,2 script Guide 708,{ + cutin "pay_soldier",2; + mes "[Payon Soldier]"; + mes "Welcome to Payon, the peacefull city hidden in the forest!."; + next; + mes "[Payon Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime you need help."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Payon Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Payon Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "^FF0000Archer Guild^000000",M_1_1, "Item Shop",M_1_2, "^0000FFPayon Cave^000000",M_1_3, + "Wipe all indications from mini-map.",M_1_4, "Cancel",M_End; + + M_1_1: + mes "[Payon Soldier]"; + mes "The 'Archer Guild' located in the NorthEastern part of Archer Village. Go there to become an Archer"; + viewpoint 1,144,164,1,0xFF0000; + goto sL_Wipe; + M_1_2: + mes "[Payon Soldier]"; + mes "The 'Item Shop' is located in the Northwest corner of the Archer Village."; + viewpoint 1,71,156,2,0xFF00FF; + goto sL_Wipe; + M_1_3: + mes "[Payon Soldier]"; + mes "The 'Payon Cave' is filled with zombies and monsters. Becarefull when you enter."; + viewpoint 1,34,132,3,0x0000FF; + goto sL_Wipe; + M_1_4: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; // avoids a double 'next' when 'wipe indications' is chosen + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,144,164,1,0xFF0000; + viewpoint 2,71,156,2,0xFF00FF; + viewpoint 2,34,132,3,0x0000FF; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Payon Soldier]"; + mes "All indications have been removed"; + cutin "pay_soldier",255; + goto M_Menu; + + M_2: + mes "[Payon Soldier]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Payon Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Payon Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Payon Soldier]"; + mes "Bon Voyage, Wanderer."; + cutin "pay_soldier",255; + close; +} diff --git a/npc/guides/guides_pron.txt b/npc/guides/guides_pron.txt new file mode 100644 index 000000000..67458d4e1 --- /dev/null +++ b/npc/guides/guides_pron.txt @@ -0,0 +1,206 @@ +//===== eAthena Script ======================================= +//= Prontera Guides +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= v1.1 Now using duplicate command. +//============================================================ + + + + + +// Center --------------------------------------------------------- +prontera.gat,154,187,4 script Guide#1::Guide 105,{ + cutin "prt_soldier",2; + mes "[Prontera Soldier]"; + mes "Welcome to Prontera, the capital city of Rune-Midgard Kingdom."; + next; + mes "[Prontera Soldier]"; + mes "We are here to help you find your way. Please feel free to speak to us anytime you need help."; +M_Menu: + next; + menu "View Buildings",M_1, "Notice",M_2, "Cancel",M_End; + + M_1: + mes "[Prontera Soldier]"; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "No Thanks",sM_1a,"Yes Please",sM_1b; + + sM_1a: + set @COMPASS_CHECK,0; + goto L_Cont; + + sM_1b: + set @COMPASS_CHECK,1; + + L_Cont: + mes "[Prontera Soldier]"; + mes "Please choose a building to view."; + next; + sM_Menu: + menu "Swordman Asosiation",M_1_1, "^9999F5Sanctuary^000000",M_1_2, "^ff0000Prontera Chivalry^000000",M_1_3, "Armory",M_1_4, + "Item Shop",M_1_5, "Inn",M_1_6, "Trading Post",M_1_7, "Pub",M_1_8, "^FF8800Library^000000",M_1_9, "Job Agency",M_1_10, + "^AABBCCCastle of Prontera^000000",M_1_11, "City Hall",M_1_12, "Forge Workshop",M_1_13, + "Wipe all indications from mini-map.",M_1_14, "Cancel",M_End; + + M_1_1: + mes "[Prontera Soldier]"; + mes "The 'Swordman Assosiation' has moved to Izlude, the Sattelite of Prontera. That building is now empty"; + viewpoint 1,237,41,1,0x2222AA; + goto sL_Wipe; + M_1_2: + mes "[Prontera Soldier]"; + mes "The main Church of the Rune-Midgard Kingdom, the `Santuary', is located in the Northeast part of town."; + mes "This is where you go to pray or serve the church as an Acolyte."; + viewpoint 1,236,316,2,0xAAAAF5; + goto sL_Wipe; + M_1_3: + mes "[Prontera Soldier]"; + mes "The 'Prontera Chivalry' trains Knights and serves as Prontera's protectors. It is located in the Northwest part of town."; + viewpoint 1,46,345,3,0xFF0000; + goto sL_Wipe; + M_1_4: + mes "[Prontera Soldier]"; + mes "The 'Armory' has an excellent selection of weapons and armor."; + viewpoint 1,175,220,4,0xFF00FF; + goto sL_Wipe; + M_1_5: + mes "[Prontera Soldier]"; + mes "You can find many usefull things at the 'Item Shop'."; + viewpoint 1,134,221,5,0xFF00FF; + goto sL_Wipe; + M_1_6: + mes "[Prontera Soldier]"; + mes "There are 2 'Inn's' located on the far Western and Eastern sides of town."; + viewpoint 1,204,195,6,0x00DD55; + viewpoint 1,107,212,7,0x00DD55; + goto sL_Wipe; + M_1_7: + mes "[Prontera Soldier]"; + mes "The 'Trading Post' is located Southeast of the Fountain."; + viewpoint 1,179,184,8,0x7901AD; + goto sL_Wipe; + M_1_8: + mes "[Prontera Soldier]"; + mes "The 'Pub' is Prontera's hot spot."; + viewpoint 1,208,154,9,0xAA0077; + goto sL_Wipe; + M_1_9: + mes "[Prontera Soldier]"; + mes "The 'Library' houses a vast amount of information on the monsters of Rune-Midgard. There are 2 Buildings that make up the 'Library'."; + viewpoint 1,120,267,10,0xFF8800; + viewpoint 1,192,267,11,0xFF8800; + goto sL_Wipe; + M_1_10: + mes "[Prontera Soldier]"; + mes "The 'Job Agency' is located SouthWest of the Fountain."; + viewpoint 1,133,183,12,0x4444FF; + goto sL_Wipe; + M_1_11: + mes "[Prontera Soldier]"; + mes "The 'Castle Of Prontera' is located in the Northern most part of the city."; + mes "On the other side of the Castle is North Prontera Field."; + viewpoint 1,156,360,13,0xAABBCC; + goto sL_Wipe; + M_1_12: + mes "[Prontera Soldier]"; + mes "'City Hall' is located in the SouthWest corner of town."; + viewpoint 1,75,91,14,0xAAEE00; + goto sL_Wipe; + + M_1_13: + mes "[Prontera Soldier]"; + mes "The 'Forge Workshop' is where you can refine your weapons and armor."; + viewpoint 1,180,183,15,0xFF4477; + goto sL_Wipe; + M_1_14: + set @COMPASS_CHECK, 2; + + sL_Wipe: + if(@COMPASS_CHECK != 2) next; // avoids a double 'next' when 'wipe indications' is chosen + if(@COMPASS_CHECK == 1) goto sM_Menu; + viewpoint 2,237,41,1,0x2222AA; + viewpoint 2,236,316,2,0xAAAAF5; + viewpoint 2,46,345,3,0xFF0000; + viewpoint 2,175,220,4,0xFF00FF; + viewpoint 2,134,221,5,0xFF00FF; + viewpoint 2,204,195,6,0x00DD55; + viewpoint 2,107,212,7,0x00DD55; + viewpoint 2,179,184,8,0x7901AD; + viewpoint 2,208,154,9,0xAA0077; + viewpoint 2,120,267,10,0xFF8800; + viewpoint 2,192,267,11,0xFF8800; + viewpoint 2,133,183,12,0x4444FF; + viewpoint 2,156,360,13,0xAABBCC; + viewpoint 2,75,91,14,0xAAEE00; + viewpoint 2,180,183,15,0xFF4477; + if (@COMPASS_CHECK == 0) goto sM_Menu; + mes "[Prontera Soldier]"; + mes "All indications have been removed"; + cutin "prt_soldier",255; + close; + + M_2: + mes "[Prontera Soldier]"; + mes "We upgraded the Location Guide to the Newest Digital Style. We hope you like this gorgeous new system."; + next; + mes "[Prontera Soldier]"; + mes "Don't forget to refer to the Mini-Map on the Upper-Right corner of your screen."; + next; + mes "[Prontera Soldier]"; + mes "If you can't see the Mini-Map, just hit ^0000ff'ctrl+tab'^000000 or Click the ^0000ff'map'^000000 button in the Basic Information Window"; + mes "Remeber to use the ^ff0000+,-^000000 buttons to adjust the map to your liking."; + goto M_Menu; + + M_End: + mes "[Prontera Soldier]"; + mes "Have a nice day."; + cutin "prt_soldier",255; + close; +} + +// East ---------------------------------------------------- +prontera.gat,282,208,2 duplicate(Guide) Guide#2 105 +//West -------------------------------------------------- +prontera.gat,29,200,6 duplicate(Guide) Guide#3 105 +// South ----------------------------------------------------- +prontera.gat,160,29,0 duplicate(Guide) Guide#4 105 +// North ----------------------------------------------- +prontera.gat,151,330,4 duplicate(Guide) Guide#5 105 + + +// Guard ----------------------------------------------------- +prontera.gat,160,330,4 script Guard#1::Guard 105,{ + mes "Welcome to Prontera."; + close; +} + +prontera.gat,223,99,1 duplicate(Guard) Guard#2 105 +prontera.gat,229,104,1 duplicate(Guard) Guard#3 105 +prontera.gat,47,339,5 duplicate(Guard) Guard#4 105 +prontera.gat,52,344,5 duplicate(Guard) Guard#5 105 + + +//---------------------------------------------------------------------------------------- Prontera Maze ----------------------------------------------------------------------------------\\ +prt_maze02.gat,100,69,4 script Soldier 105,{ + mes "[Soldier]"; + mes "Yo yo, you'd be better not to go in there. It has rumored there is a Demon living in the forest."; + mes "Of course it is just a rumor because no one see the people turning back from the palce."; + mes "hmmm... it's up to you to go in or leave."; + close; +} +prt_maze02.gat,110,69,4 script Soldier 105,{ + mes "[Soldier]"; + mes "Sigh... the last guy entered this place haven't come back either. He didn't listen to me and went in to gather herbs or something like that..."; + mes "He was a really stupid, if I were him, I wouldn't give up my life just for those lame herbs or something."; + close; +} diff --git a/npc/guides/guides_umb.txt b/npc/guides/guides_umb.txt new file mode 100644 index 000000000..95f303f18 --- /dev/null +++ b/npc/guides/guides_umb.txt @@ -0,0 +1,107 @@ +//===== eAthena Script ======================================= +//= Umbala Guides +//===== By: ================================================== +//= Dizzy +//= Translated by Celest +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= 1.1 Fixed location command format [Lupus] +//============================================================ + + +//===================================================================================== +//umbala.gat,174,147,5 script Umbalian Guide 789,{ +// mes "[Umbalian Guide]"; +// mes "-Under Development-"; +// close; +//} + +// Umbala tour guide +//=========================================================================== +umbala.gat,128,94,3 script Ricard 702,{ + mes "[Ricard]"; + mes "This sure is an odd place,"; + mes "perhaps due to the fact that it hasn't been developed,"; + mes "the roads here can be very perilous."; + next; + mes "[Ricard]"; + mes "Good thing i've already been here "; + mes "for quite some time, so i know the details of the village quite well,"; + mes "You may ask me for directions if you want."; + next; + menu "View buildings",-,"Clear indications",L_MENU_2,"Cancel",L_end1; + +L_MENU_1: + mes "[Ricard]"; + mes "Where would you want to know about?"; + next; + menu "Village Chieftain's house",L_room1,"Village Shaman's house",L_room2,"Weapon shop",L_room3,"Equipment shop",L_room4,"Bungee Jumping Spot",L_room5,"Cancel",L_end2; + + L_room1: + mes "[Ricard]"; + mes "The chieftain lives ^FF0000here^000000,"; + mes "only he understands the languages of outsiders,"; + mes "perhaps you should see him first."; + viewpoint 1,68,251,1,0xFF0000; + close; + + L_room2: + mes "[Ricard]"; + mes "The shaman is known to possess mysterious powers,"; + mes "his house would be right ^996600here^000000,"; + mes "it is said that he can manipulate the elements of the Earth easily!"; + viewpoint 1,218,187,2,0x996600; + close; + + L_room3: + mes "[Ricard]"; + mes "The weapon shop is ^009933over there^000000,"; + mes "because of threats from the outside world,"; + mes "they have been stocking up on"; + mes "all kinds of weapons."; + viewpoint 1,125,155,3,0x009933; + close; + + L_room4: + mes "[Ricard]"; + mes "^3333FFThat^000000 would be the equipment shop,"; + mes "they sell all types of useful equipment"; + mes "you should have a look there before continueing your travels."; + viewpoint 1,136,127,4,0x3333FF; + close; + + L_room5: + mes "[Ricard]"; + mes "In Umbala there is a 'Bungee Jumping Spot' not seen anywhere else in the world"; + mes "as you can see ^66CC33over here^000000,"; + mes "you can try it out if you're feeling brave enough."; + viewpoint 1,138,198,5,0x66CC33; + close; + + L_end2: + mes "[Ricard]"; + mes "To remove all indications of the minimap"; + mes "come back and talk to me again."; + close; + +L_MENU_2: + viewpoint 2,68,251,1,0xFF0000; + viewpoint 2,218,187,2,0x996600; + viewpoint 2,125,155,3,0x009933; + viewpoint 2,136,127,4,0x3333FF; + viewpoint 2,138,198,5,0x66CC33; + mes "[Ricard]"; + mes "I removed all the indications,"; + mes "If you still need any directions, come back and talk to me again."; + close; + +L_end1: + mes "[Ricard]"; + mes "Exploring around to know the paths better is fun, but do be careful."; + close; +} diff --git a/npc/guides/guides_yun.txt b/npc/guides/guides_yun.txt new file mode 100644 index 000000000..bb9507616 --- /dev/null +++ b/npc/guides/guides_yun.txt @@ -0,0 +1,223 @@ +//===== eAthena Script ======================================= +//= Yuno Guides +//===== By: ================================================== +//= KitsuneStarwind, usul, kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Edited Miss Yoon text. Added town soldiers by usul. Edited town soldiers +//= and added map location option for them. [kobra_k88] +//============================================================ + + + +//===================================================================================== +yuno.gat,153,47,4 script Yuno Guide 700,{ + mes "[Miss Yoon]"; + mes "A place that understands the present and envisions the future............"; + mes "This is Yuno, the city of Sages. Welcome to Yuno."; + set @name$,"[Miss Yoon]"; + next; + callfunc "F_YunoLoc",2; +} + +//===================================================================== +yuno.gat,333,182,2 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "^5533FF'Dagger of Counter'^000000....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "Among the Sage class weapons, there is a dagger called ^5533FF'The Dagger of Counter'^000000."; + mes "It increases the chances for landing a critical attack and can only be used by Sages."; + next; + mes "[Yuno Soldier]"; + mes "Not only is this dagger very useful but it is very stylish as well."; + callfunc "F_YunoLoc",1; +} + +//===================================================================== +yuno.gat,264,320,2 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "Holy shield, ^5533FF'Sacred Mission'^000000....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "There is a holy shield named ^5533FF'Sacred Mission'^000000, that can only be used by Cusadors."; + mes "The shield itself is long and narrow and has the wings of an angel engraved on its front."; + next; + mes "[Yuno Soldier]"; + mes "This shield is especially effective against the undead and other demonic monsters."; + callfunc "F_YunoLoc",1; +} + +//===================================================================== +yuno.gat,228,292,2 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "^FF3355'False Angel'^000000....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "Near Yuno, there lives a fallen angel known as ^FF3355''False Angel'^000000."; + mes "It pretends to be a real angel by blessing adventurers, but then it stabs them in the back afterwards."; + next; + mes "[Yuno Soldier]"; + mes "Do not be fooled by its beautifull appereance, otherwise you will find yourself in great peril."; + callfunc "F_YunoLoc",1; +} + +//===================================================================== +yuno.gat,164,283,4 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "^FF3355'Geographer'^000000....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "There is a monster called the ^FF3355'Geographer'^000000 that looks like a flower in bloom."; + mes "Although it is planted firmly into the ground, this creature has the ability to extend itself a great distance."; + next; + mes "[Yuno Soldier]"; + mes "Its name comes from a story about a poor geographer who was eaten by one of these monsters while studying."; + mes "Unless you want to end up like that poor geographer, I suggest you stay away from these creatures."; + callfunc "F_YunoLoc",1; +} + +//===================================================================== +yuno.gat,151,283,4 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "^FF3355'Lava Golem'^000000....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "There is a monster called the ^FF3355'Lava Golem'^000000."; + mes "It is made out of stone heart that gained magical powers while being swept away by molten lava."; + next; + mes "[Yuno Soldier]"; + mes "The lava that dripps down its body is so hot that it can melt weapons and armor made out of even the highest quality steel."; + next; + mes "[Yuno Soldier]"; + mes "Be very careful if you ever encounter this monster. Before you know it your equipment will become nothing more than metled pieces of junk."; + mes "More importantly, the damage it will inflict on you will turn you into a...... well I think you get the point......"; + callfunc "F_YunoLoc",1; +} + +//===================================================================== +yuno.gat,164,228,4 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "Killer ^FF3355'Goats'^000000....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "^FF3355'Goats'^000000 are monsters that used to be antelopes that lived high up the montains of Yuno."; + mes "No one has ever survived a direct hit from a Goat's mighty horns."; + next; + mes "[Yuno Soldier]"; + mes "As fierce as those horns are, the legs of a Goat are also to be feared. They are tough and strong because of all of the climbing Goats do."; + callfunc "F_YunoLoc",1; +} + +//===================================================================== +yuno.gat,151,228,4 script Yuno Soldier 105, +{ + cutin "prt_soldier",2; + set @name$, "[Yuno Soldier]"; + set @menu1$, "Large Jellopy....."; + callfunc "F_YunoLoc",0; + mes "[Yuno Soldier]"; + mes "Have you ever seen that extraordinarily large jellopy?? It's huuuuge!!! It's a very, very, large and shiny jellopy!!"; + emotion 1; + callfunc "F_YunoLoc",1; +} + + +//====================================================================== +function script F_YunoLoc { + + if(getarg(0) == 1) goto M_Menu; + if(getarg(0) == 2) menu "View city locations.",M_0, "End conversation.",M_End; + mes @name$; + mes "Welcome to Yuno, the city of noble-mindedness."; + M_Menu: + next; + menu "View city locations.",M_0, @menu1$,M_1, "End conversation.",M_End; + + M_0: + mes @name$; + mes "Please choose a building to view..."; + sM_Menu: + next; + menu "Armory",sM_1, "Tool Dealer",sM_2, "Sage Castle",sM_3, "Street of Book Stores",sM_4, "Yuphero Plaza",sM_5, + "Library of the Republic",sM_6, "Schwheicherbil Magic Academy",sM_7, "Museum of Monsters",sM_8, + "Wipe all indications from mini-map",sM_Wipe, "Cancel",M_End; + + sM_1: + mes @name$; + mes "This is the Weapon and Armor Shop."; + viewpoint 1,117,135,1,0xFF0000; + goto sM_Menu; + sM_2: + mes @name$; + mes "This is the Tool Dealer."; + viewpoint 1,163,189,2,0xFFFF00; + goto sM_Menu; + sM_3: + mes @name$; + mes "Sage Castle is where Mages can go to become Sages."; + viewpoint 1,89,320,3,0xff00FF; + goto sM_Menu; + sM_4: + mes @name$; + mes "The Street of Books. This is where you will find the largest selection of books for sale"; + viewpoint 1,196,138,4,0x00ff00; + goto sM_Menu; + sM_5: + mes @name$; + mes "Yuphero Plaza is the main gathering place in Yuno."; + viewpoint 1,157,327,5,0x00ffff; + goto sM_Menu; + sM_6: + mes "[Miss Yoon]"; + mes "The Library of Republic houses an extensive collection of important historical books."; + viewpoint 1,335,204,6,0x0000ff; + goto sM_Menu; + sM_7: + mes @name$; + mes "The Shchweicherbil Magic Academy is a prestigous school where Mages study to become Sages."; + viewpoint 1,323,280,7,0xFFCCFF; + goto sM_Menu; + sM_8: + mes @name$; + mes "The Museum of Monsters contains many exhibits of the monsters found throughout Rune Midgard."; + viewpoint 1,278,291,8,0xFFFFFF; + goto sM_Menu; + sM_Wipe: + viewpoint 2,117,135,1,0xFF0000; + viewpoint 2,163,189,2,0xFFFF00; + viewpoint 2,89,320,3,0xff00FF; + viewpoint 2,196,138,4,0x00ff00; + viewpoint 2,157,327,5,0x00ffff; + viewpoint 2,335,204,6,0x0000ff; + viewpoint 2,323,280,7,0xFFCCFF; + viewpoint 2,278,291,8,0xFFFFFF; + mes @name$; + mes "All indications have been wiped."; + cutin "prt_soldier",255; + close; + M_1: + return; + M_End: + mes @name$; + mes "Have a nice day."; + cutin "prt_soldier",255; + close; +} diff --git a/npc/guild/aldeg/aldeg_dunsw.txt b/npc/guild/aldeg/aldeg_dunsw.txt new file mode 100644 index 000000000..dc1acfb25 --- /dev/null +++ b/npc/guild/aldeg/aldeg_dunsw.txt @@ -0,0 +1,51 @@ +//===== eAthena Script ======================================= +//= War of Emperium Dungeon Switch for Al De Baran Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Switch that warps guild members to the guild dungeon +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + + +// Castle 1 =============================================== +aldeg_cas01.gat,212,181,0 script Switch#DunA01 111,{ + callfunc "F_GldDunSw","aldeg_cas01","02",32,122; + close; +} + + +// Castle 2 =============================================== +aldeg_cas02.gat,194,136,0 script Switch#DunA02 111,{ + callfunc "F_GldDunSw","aldeg_cas02","02",79,32; + close; +} + + +// Castle 3 =============================================== +aldeg_cas03.gat,200,177,0 script Switch#DunA03 111,{ + callfunc "F_GldDunSw","aldeg_cas03","02",165,38; + close; +} + + +// Castle 4 =============================================== +aldeg_cas04.gat,38,76,0 script Switch#DunA04 111,{ + callfunc "F_GldDunSw","aldeg_cas04","02",160,148; + close; +} + + +// Castle 5 =============================================== + +aldeg_cas05.gat,22,205,0 script Switch#DunA05 111,{ + callfunc "F_GldDunSw","aldeg_cas05","02",103,169; + close; +} diff --git a/npc/guild/aldeg/aldeg_ev_agit.txt b/npc/guild/aldeg/aldeg_ev_agit.txt new file mode 100644 index 000000000..bdbc85e81 --- /dev/null +++ b/npc/guild/aldeg/aldeg_ev_agit.txt @@ -0,0 +1,130 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Al De Baran Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Geffen Guild Wars +//===== Additional Comments: ================================= +//= v1.2 Now using functions for OnAgitStart and OnAgitBreak. [kobra_k88] +//============================================================ + + +// Castle 1 ================================================================ +aldeg_cas01.gat,216,24,0 script Agit_A01 -1,{ +OnInterIfInit: + GetCastleData "aldeg_cas01.gat",0,"::OnRecvCastleA01"; + end; +OnRecvCastleA01: + RequestGuildInfo GetCastleData("aldeg_cas01.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","aldeg_cas01","A01",216,24; + end; +OnAgitBreak: + callfunc "F_AgitBreak","aldeg_cas01","A01"; + end; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas01.gat",GetCastleData("aldeg_cas01.gat",1),6; + Monster "aldeg_cas01.gat",216,24,"EMPERIUM",1288,1,"Agit_A01::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","aldeg_cas01","A01"; + end; +} + +// Castle 2 ================================================================ +aldeg_cas02.gat,214,24,0 script Agit_A02 -1,{ +OnInterIfInit: + GetCastleData "aldeg_cas02.gat",0,"::OnRecvCastleA02"; + end; +OnRecvCastleA02: + RequestGuildInfo GetCastleData("aldeg_cas02.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","aldeg_cas02","A02",214,24; + end; +OnAgitBreak: + callfunc "F_AgitBreak","aldeg_cas02","A02"; + end; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas02.gat",GetCastleData("aldeg_cas02.gat",1),6; + Monster "aldeg_cas02.gat",214,24,"EMPERIUM",1288,1,"Agit_A02::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","aldeg_cas02","A02"; + end; +} + +// Castle 3 ================================================================ +aldeg_cas03.gat,206,32,0 script Agit_A03 -1,{ +OnInterIfInit: + GetCastleData "aldeg_cas03.gat",0,"::OnRecvCastleA03"; + end; +OnRecvCastleA03: + RequestGuildInfo GetCastleData("aldeg_cas03.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","aldeg_cas03","A03",206,32; + end; +OnAgitBreak: + callfunc "F_AgitBreak","aldeg_cas03","A03"; + end; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas03.gat",GetCastleData("aldeg_cas03.gat",1),6; + Monster "aldeg_cas03.gat",206,32,"EMPERIUM",1288,1,"Agit_A03::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","aldeg_cas03","A03"; + end; +} + +// Castle 4 ================================================================ +aldeg_cas04.gat,36,218,0 script Agit_A04 -1,{ +OnInterIfInit: + GetCastleData "aldeg_cas04.gat",0,"::OnRecvCastleA04"; + end; +OnRecvCastleA04: + RequestGuildInfo GetCastleData("aldeg_cas04.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","aldeg_cas04","A04",36,218; + end; +OnAgitBreak: + callfunc "F_AgitBreak","aldeg_cas04","A04"; + end; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas04.gat",GetCastleData("aldeg_cas04.gat",1),6; + Monster "aldeg_cas04.gat",36,218,"EMPERIUM",1288,1,"Agit_A04::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","aldeg_cas04","A04"; + end; +} + +// Castle 5 ================================================================ +aldeg_cas05.gat,28,102,0 script Agit_A05 -1,{ +OnInterIfInit: + GetCastleData "aldeg_cas05.gat",0,"::OnRecvCastleA05"; + end; +OnRecvCastleA05: + RequestGuildInfo GetCastleData("aldeg_cas05.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","aldeg_cas05","A05",28,102; + end; +OnAgitBreak: + callfunc "F_AgitBreak","aldeg_cas05","A05"; + end; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas05.gat",GetCastleData("aldeg_cas05.gat",1),6; + Monster "aldeg_cas05.gat",28,102,"EMPERIUM",1288,1,"Agit_A05::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","aldeg_cas05","A05"; + end; +} diff --git a/npc/guild/aldeg/aldeg_flags.txt b/npc/guild/aldeg/aldeg_flags.txt new file mode 100644 index 000000000..ec4969e88 --- /dev/null +++ b/npc/guild/aldeg/aldeg_flags.txt @@ -0,0 +1,199 @@ +//===== eAthena Script ======================================= +//= War of Emperium Al De Baran Guild Flags +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= WoE flag scripts. Display guild emblems on flags. +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//================================================================================// +// Castle 1 +//================================================================================// +aldebaran.gat,152,97,4 script Noisyubantian#a1-1::Noisyubantian 722,{ + callfunc "F_Flags","Al De Baran","aldeg_cas01",218,170; + close; + +OnRecvCastleA01: + FlagEmblem GetCastleData("aldeg_cas01.gat",1); + end; +} + +// In Guild ============================================= +alde_gld.gat,61,87,6 duplicate(Noisyubantian) Noisyubantian#a1-2 722 +alde_gld.gat,61,79,6 duplicate(Noisyubantian) Noisyubantian#a1-3 722 +alde_gld.gat,45,87,8 duplicate(Noisyubantian) Noisyubantian#a1-4 722 +alde_gld.gat,51,87,8 duplicate(Noisyubantian) Noisyubantian#a1-5 722 +// In Castle ============================================ +aldeg_cas01.gat,30,248,4 duplicate(Noisyubantian) Noisyubantian#a1-6 722 +aldeg_cas01.gat,30,246,4 duplicate(Noisyubantian) Noisyubantian#a1-7 722 +aldeg_cas01.gat,37,248,4 duplicate(Noisyubantian) Noisyubantian#a1-8 722 +aldeg_cas01.gat,37,246,4 duplicate(Noisyubantian) Noisyubantian#a1-9 722 +aldeg_cas01.gat,95,80,2 duplicate(Noisyubantian) Noisyubantian#a1-10 722 +aldeg_cas01.gat,95,59,2 duplicate(Noisyubantian) Noisyubantian#a1-11 722 +aldeg_cas01.gat,62,75,2 duplicate(Noisyubantian) Noisyubantian#a1-12 722 +aldeg_cas01.gat,70,75,2 duplicate(Noisyubantian) Noisyubantian#a1-13 722 +aldeg_cas01.gat,74,75,2 duplicate(Noisyubantian) Noisyubantian#a1-14 722 +aldeg_cas01.gat,62,64,2 duplicate(Noisyubantian) Noisyubantian#a1-15 722 +aldeg_cas01.gat,66,64,2 duplicate(Noisyubantian) Noisyubantian#a1-16 722 +aldeg_cas01.gat,70,64,2 duplicate(Noisyubantian) Noisyubantian#a1-17 722 +aldeg_cas01.gat,74,64,2 duplicate(Noisyubantian) Noisyubantian#a1-18 722 +aldeg_cas01.gat,203,150,4 duplicate(Noisyubantian) Noisyubantian#a1-19 722 +aldeg_cas01.gat,210,150,4 duplicate(Noisyubantian) Noisyubantian#a1-20 722 + + + + +//================================================================================// +// Castle 2 +//================================================================================// +aldebaran.gat,149,97,4 script Hohensyubangawoo#a2-1::Hohensyubangawoo 722,{ + callfunc "F_Flags","Al De Baran","aldeg_cas02",85,72; + close; + +OnRecvCastleA02: + FlagEmblem GetCastleData("aldeg_cas02.gat",1); + end; +} + +// In Guild ================================================= +alde_gld.gat,93,250,5 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-2 722 +alde_gld.gat,98,250,5 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-3 722 +// In Castle ============================================= +aldeg_cas02.gat,82,71,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-4 722 +aldeg_cas02.gat,67,30,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-5 722 +aldeg_cas02.gat,183,140,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-6 722 +aldeg_cas02.gat,212,152,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-7 722 +aldeg_cas02.gat,108,39,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-8 722 +aldeg_cas02.gat,57,213,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-9 722 +aldeg_cas02.gat,91,181,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-10 722 +aldeg_cas02.gat,103,53,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-11 722 +aldeg_cas02.gat,73,53,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-12 722 +aldeg_cas02.gat,63,41,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-13 722 +aldeg_cas02.gat,229,6,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-14 722 +aldeg_cas02.gat,230,40,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-15 722 +aldeg_cas02.gat,197,40,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-16 722 +aldeg_cas02.gat,32,213,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-17 722 +aldeg_cas02.gat,88,180,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-18 722 +aldeg_cas02.gat,121,29,2 duplicate(Hohensyubangawoo) Hohensyubangawoo#a2-19 722 + + + + +//================================================================================// +// Castle 3 +//================================================================================// +aldebaran.gat,134,97,4 script Nyirenverk#a3-1::Nyirenverk 722,{ + callfunc "F_Flags","Al De Baran","aldeg_cas03",118,76; + close; + +OnRecvCastleA03: + FlagEmblem GetCastleData("aldeg_cas03.gat",1); + end; +} +// In Guild =============================================== +alde_gld.gat,139,83,1 duplicate(Nyirenverk) Nyirenverk#a3-2 722 +alde_gld.gat,145,83,1 duplicate(Nyirenverk) Nyirenverk#a3-3 722 +// In Castle ============================================= +aldeg_cas03.gat,176,175,2 duplicate(Nyirenverk) Nyirenverk#a3-4 722 +aldeg_cas03.gat,85,103,2 duplicate(Nyirenverk) Nyirenverk#a3-5 722 +aldeg_cas03.gat,77,115,2 duplicate(Nyirenverk) Nyirenverk#a3-6 722 +aldeg_cas03.gat,77,215,2 duplicate(Nyirenverk) Nyirenverk#a3-7 722 +aldeg_cas03.gat,112,107,2 duplicate(Nyirenverk) Nyirenverk#a3-8 722 +aldeg_cas03.gat,112,117,2 duplicate(Nyirenverk) Nyirenverk#a3-9 722 +aldeg_cas03.gat,69,71,2 duplicate(Nyirenverk) Nyirenverk#a3-10 722 +aldeg_cas03.gat,91,69,2 duplicate(Nyirenverk) Nyirenverk#a3-11 722 +aldeg_cas03.gat,108,60,2 duplicate(Nyirenverk) Nyirenverk#a3-12 722 +aldeg_cas03.gat,121,73,2 duplicate(Nyirenverk) Nyirenverk#a3-13 722 +aldeg_cas03.gat,121,73,2 duplicate(Nyirenverk) Nyirenverk#a3-14 722 +aldeg_cas03.gat,75,102,2 duplicate(Nyirenverk) Nyirenverk#a3-15 722 +aldeg_cas03.gat,199,169,2 duplicate(Nyirenverk) Nyirenverk#a3-16 722 +aldeg_cas03.gat,181,179,2 duplicate(Nyirenverk) Nyirenverk#a3-17 722 +aldeg_cas03.gat,192,44,2 duplicate(Nyirenverk) Nyirenverk#a3-18 722 +aldeg_cas03.gat,88,108,2 duplicate(Nyirenverk) Nyirenverk#a3-19 722 +aldeg_cas03.gat,208,145,2 duplicate(Nyirenverk) Nyirenverk#a3-20 722 +aldeg_cas03.gat,207,75,2 duplicate(Nyirenverk) Nyirenverk#a3-21 722 +aldeg_cas03.gat,96,62,2 duplicate(Nyirenverk) Nyirenverk#a3-22 722 + + + + +//================================================================================// +// Castle 4 +//================================================================================// +aldebaran.gat,131,97,4 script Byirtsburi#a4-1::Byirtsburi 722,{ + callfunc "F_Flags","Al De Baran","aldeg_cas04",45,88; + close; + +OnRecvCastleA04: + FlagEmblem GetCastleData("aldeg_cas04.gat",1); + end; +} +// In Guild =============================================== +alde_gld.gat,239,247,1 duplicate(Byirtsburi) Byirtsburi#a4-2 722 +alde_gld.gat,234,247,1 duplicate(Byirtsburi) Byirtsburi#a4-3 722 +alde_gld.gat,241,239,7 duplicate(Byirtsburi) Byirtsburi#a4-4 722 +alde_gld.gat,241,234,7 duplicate(Byirtsburi) Byirtsburi#a4-5 722 +// In Castle ============================================= +aldeg_cas04.gat,167,61,2 duplicate(Byirtsburi) Byirtsburi#a4-6 722 +aldeg_cas04.gat,164,90,2 duplicate(Byirtsburi) Byirtsburi#a4-7 722 +aldeg_cas04.gat,143,209,2 duplicate(Byirtsburi) Byirtsburi#a4-8 722 +aldeg_cas04.gat,129,193,2 duplicate(Byirtsburi) Byirtsburi#a4-9 722 +aldeg_cas04.gat,112,206,2 duplicate(Byirtsburi) Byirtsburi#a4-10 722 +aldeg_cas04.gat,113,212,2 duplicate(Byirtsburi) Byirtsburi#a4-11 722 +aldeg_cas04.gat,77,117,2 duplicate(Byirtsburi) Byirtsburi#a4-12 722 +aldeg_cas04.gat,186,42,2 duplicate(Byirtsburi) Byirtsburi#a4-13 722 +aldeg_cas04.gat,30,69,2 duplicate(Byirtsburi) Byirtsburi#a4-14 722 +aldeg_cas04.gat,55,97,2 duplicate(Byirtsburi) Byirtsburi#a4-15 722 +aldeg_cas04.gat,45,98,2 duplicate(Byirtsburi) Byirtsburi#a4-16 722 +aldeg_cas04.gat,33,116,2 duplicate(Byirtsburi) Byirtsburi#a4-17 722 +aldeg_cas04.gat,130,180,2 duplicate(Byirtsburi) Byirtsburi#a4-18 722 +aldeg_cas04.gat,129,193,2 duplicate(Byirtsburi) Byirtsburi#a4-19 722 +aldeg_cas04.gat,142,209,2 duplicate(Byirtsburi) Byirtsburi#a4-20 722 +aldeg_cas04.gat,33,107,2 duplicate(Byirtsburi) Byirtsburi#a4-21 722 +aldeg_cas04.gat,133,220,2 duplicate(Byirtsburi) Byirtsburi#a4-22 722 +aldeg_cas04.gat,169,22,2 duplicate(Byirtsburi) Byirtsburi#a4-23 722 +aldeg_cas04.gat,169,15,2 duplicate(Byirtsburi) Byirtsburi#a4-24 722 + + + + +//================================================================================// +// Castle 5 +//================================================================================// +aldebaran.gat,128,97,4 script Rotenburk#a5-1::Rotenburk 722,{ + callfunc "F_Flags","Al De Baran","aldeg_cas05",31,190; + close; + +OnRecvCastleA05: + FlagEmblem GetCastleData("aldeg_cas05.gat",1); + end; +} +// In Guild =============================================== +alde_gld.gat,266,92,7 duplicate(Rotenburk) Rotenburk#a5-2 722 +alde_gld.gat,266,88,7 duplicate(Rotenburk) Rotenburk#a5-3 722 +// In Castle ============================================= +aldeg_cas05.gat,170,85,2 duplicate(Rotenburk) Rotenburk#a5-4 722 +aldeg_cas05.gat,142,212,2 duplicate(Rotenburk) Rotenburk#a5-5 722 +aldeg_cas05.gat,149,196,2 duplicate(Rotenburk) Rotenburk#a5-6 722 +aldeg_cas05.gat,41,180,2 duplicate(Rotenburk) Rotenburk#a5-7 722 +aldeg_cas05.gat,38,201,2 duplicate(Rotenburk) Rotenburk#a5-8 722 +aldeg_cas05.gat,65,182,2 duplicate(Rotenburk) Rotenburk#a5-9 722 +aldeg_cas05.gat,65,205,2 duplicate(Rotenburk) Rotenburk#a5-10 722 +aldeg_cas05.gat,10,218,2 duplicate(Rotenburk) Rotenburk#a5-11 722 +aldeg_cas05.gat,164,201,2 duplicate(Rotenburk) Rotenburk#a5-12 722 +aldeg_cas05.gat,216,96,2 duplicate(Rotenburk) Rotenburk#a5-13 722 +aldeg_cas05.gat,217,80,2 duplicate(Rotenburk) Rotenburk#a5-14 722 +aldeg_cas05.gat,14,117,2 duplicate(Rotenburk) Rotenburk#a5-15 722 +aldeg_cas05.gat,10,225,2 duplicate(Rotenburk) Rotenburk#a5-16 722 +aldeg_cas05.gat,187,59,2 duplicate(Rotenburk) Rotenburk#a5-17 722 +aldeg_cas05.gat,154,51,2 duplicate(Rotenburk) Rotenburk#a5-18 722 +aldeg_cas05.gat,22,211,2 duplicate(Rotenburk) Rotenburk#a5-19 722 +aldeg_cas05.gat,150,202,2 duplicate(Rotenburk) Rotenburk#a5-20 722 diff --git a/npc/guild/aldeg/aldeg_guardians.txt b/npc/guild/aldeg/aldeg_guardians.txt new file mode 100644 index 000000000..3cd10972d --- /dev/null +++ b/npc/guild/aldeg/aldeg_guardians.txt @@ -0,0 +1,111 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Re-spawns guardians on server start if they have been +//= purchased. Also announces when a guardian dies. +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//= 1.2a Guardians for all aldeg castles are now in this file. +//= Minor optimizations.[kobra_k88] +//============================================================ + + +aldeg_cas01.gat,216,24,0 script Guardian_A01 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas01.gat",10) == 1) guardian "aldeg_cas01.gat",18,219,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",0; + if (GetCastleData("aldeg_cas01.gat",11) == 1) guardian "aldeg_cas01.gat",117,42,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",1; + if (GetCastleData("aldeg_cas01.gat",12) == 1) guardian "aldeg_cas01.gat",207,153,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",2; + if (GetCastleData("aldeg_cas01.gat",13) == 1) guardian "aldeg_cas01.gat",68,70,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",3; + if (GetCastleData("aldeg_cas01.gat",14) == 1) guardian "aldeg_cas01.gat",187,140,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",4; + if (GetCastleData("aldeg_cas01.gat",15) == 1) guardian "aldeg_cas01.gat",62,204,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",5; + if (GetCastleData("aldeg_cas01.gat",16) == 1) guardian "aldeg_cas01.gat",113,100,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",6; + if (GetCastleData("aldeg_cas01.gat",17) == 1) guardian "aldeg_cas01.gat",211,174,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas01.gat","A Guardian Has Fallen",17; + end; + +//NoSpawn: +// break; +} +//------------------------------------------------------------------------------ +aldeg_cas02.gat,214,24,0 script Guardian_A02 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas02.gat",10) == 1) guardian "aldeg_cas02.gat",22,186,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",0; + if (GetCastleData("aldeg_cas02.gat",11) == 1) guardian "aldeg_cas02.gat",88,31,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",1; + if (GetCastleData("aldeg_cas02.gat",12) == 1) guardian "aldeg_cas02.gat",207,176,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",2; + if (GetCastleData("aldeg_cas02.gat",13) == 1) guardian "aldeg_cas02.gat",50,201,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",3; + if (GetCastleData("aldeg_cas02.gat",14) == 1) guardian "aldeg_cas02.gat",197,146,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",4; + if (GetCastleData("aldeg_cas02.gat",15) == 1) guardian "aldeg_cas02.gat",71,193,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",5; + if (GetCastleData("aldeg_cas02.gat",16) == 1) guardian "aldeg_cas02.gat",88,31,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",6; + if (GetCastleData("aldeg_cas02.gat",17) == 1) guardian "aldeg_cas02.gat",219,148,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas02.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +aldeg_cas03.gat,206,32,0 script Guardian_A03 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas03.gat",10) == 1) guardian "aldeg_cas03.gat",57,216,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",0; + if (GetCastleData("aldeg_cas03.gat",11) == 1) guardian "aldeg_cas03.gat",80,108,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",1; + if (GetCastleData("aldeg_cas03.gat",12) == 1) guardian "aldeg_cas03.gat",199,183,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",2; + if (GetCastleData("aldeg_cas03.gat",13) == 1) guardian "aldeg_cas03.gat",98,267,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",3; + if (GetCastleData("aldeg_cas03.gat",14) == 1) guardian "aldeg_cas03.gat",91,88,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",4; + if (GetCastleData("aldeg_cas03.gat",15) == 1) guardian "aldeg_cas03.gat",78,121,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",5; + if (GetCastleData("aldeg_cas03.gat",16) == 1) guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",6; + if (GetCastleData("aldeg_cas03.gat",17) == 1) guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas03.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +aldeg_cas04.gat,36,218,0 script Guardian_A04 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas04.gat",10) == 1) guardian "aldeg_cas04.gat",181,33,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",0; + if (GetCastleData("aldeg_cas04.gat",11) == 1) guardian "aldeg_cas04.gat",50,68,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",1; + if (GetCastleData("aldeg_cas04.gat",12) == 1) guardian "aldeg_cas04.gat",50,119,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",2; + if (GetCastleData("aldeg_cas04.gat",13) == 1) guardian "aldeg_cas04.gat",169,49,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",3; + if (GetCastleData("aldeg_cas04.gat",14) == 1) guardian "aldeg_cas04.gat",133,196,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",4; + if (GetCastleData("aldeg_cas04.gat",15) == 1) guardian "aldeg_cas04.gat",177,87,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",5; + if (GetCastleData("aldeg_cas04.gat",16) == 1) guardian "aldeg_cas04.gat",50,119,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",6; + if (GetCastleData("aldeg_cas04.gat",17) == 1) guardian "aldeg_cas04.gat",133,196,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas04.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +aldeg_cas05.gat,28,102,0 script Guardian_A05 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas05.gat",10) == 1) guardian "aldeg_cas05.gat",157,192,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",0; + if (GetCastleData("aldeg_cas05.gat",11) == 1) guardian "aldeg_cas05.gat",194,46,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",1; + if (GetCastleData("aldeg_cas05.gat",12) == 1) guardian "aldeg_cas05.gat",146,214,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",2; + if (GetCastleData("aldeg_cas05.gat",13) == 1) guardian "aldeg_cas05.gat",223,95,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",3; + if (GetCastleData("aldeg_cas05.gat",14) == 1) guardian "aldeg_cas05.gat",131,223,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",4; + if (GetCastleData("aldeg_cas05.gat",15) == 1) guardian "aldeg_cas05.gat",191,68,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",5; + if (GetCastleData("aldeg_cas05.gat",16) == 1) guardian "aldeg_cas05.gat",160,194,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",6; + if (GetCastleData("aldeg_cas05.gat",17) == 1) guardian "aldeg_cas05.gat",49,225,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas05.gat","A Guardian Has Fallen",17; + end; +} diff --git a/npc/guild/aldeg/aldeg_kafras.txt b/npc/guild/aldeg/aldeg_kafras.txt new file mode 100644 index 000000000..c2005f95a --- /dev/null +++ b/npc/guild/aldeg/aldeg_kafras.txt @@ -0,0 +1,61 @@ +//===== eAthena Script ======================================= +//= War of Emperium Kafras for Al De Baran Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Provides Kafra services for guild members of Al De Baran Castles. +//= Used in conjuction with function F_Kafra. +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 =============================================== +aldeg_cas01.gat,218,170,0 script Kafra Service#A01 117,{ + callfunc "F_GKafra", "aldeg_cas01", "Al De Baran"; + end; +OnRecvCastleA01: + if (GetCastleData("aldeg_cas01.gat",9) < 1) disablenpc "Kafra Service#A01"; + end; +} + +// Castle 2 =============================================== +aldeg_cas02.gat,84,74,0 script Kafra Service#A02 117,{ + callfunc "F_GKafra", "aldeg_cas02", "Al De Baran"; + end; +OnRecvCastleA02: + if (GetCastleData("aldeg_cas02.gat",9) < 1) disablenpc "Kafra Service#A02"; + end; +} + +// Castle 3 =============================================== +aldeg_cas03.gat,118,76,0 script Kafra Service#A03 117,{ + callfunc "F_GKafra", "aldeg_cas03", "Al De Baran"; + end; +OnRecvCastleA03: + if (GetCastleData("aldeg_cas03.gat",9) < 1) disablenpc "Kafra Service#A03"; + end; +} + +// Castle 4 =============================================== +aldeg_cas04.gat,45,88,0 script Kafra Service#A04 117,{ + callfunc "F_GKafra", "aldeg_cas04", "Al De Baran"; + end; +OnRecvCastleA04: + if (GetCastleData("aldeg_cas04.gat",9) < 1) disablenpc "Kafra Service#A04"; + end; +} + +// Castle 5 =============================================== +aldeg_cas05.gat,31,190,0 script Kafra Service#A05 117,{ + callfunc "F_GKafra", "aldeg_cas05", "Al De Baran"; + end; +OnRecvCastleA05: + if (GetCastleData("aldeg_cas05.gat",9) < 1) disablenpc "Kafra Service#A05"; + end; +} diff --git a/npc/guild/aldeg/aldeg_managers.txt b/npc/guild/aldeg/aldeg_managers.txt new file mode 100644 index 000000000..e0f2e65dd --- /dev/null +++ b/npc/guild/aldeg/aldeg_managers.txt @@ -0,0 +1,110 @@ +//===== eAthena Script ======================================= +//= War of Emperium Managers for Al De Baran Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================================================== +aldeg_cas01.gat,218,175,0 script Arl Fredo 55,{ + + if(callfunc("F_GldManager","Arl Fredo","aldeg_cas01",119,223,"A01") == 0) close; + + if(@GDnum==10) guardian "aldeg_cas01.gat",18,219,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas01.gat",117,42,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas01.gat",207,153,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas01.gat",68,70,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas01.gat",187,140,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas01.gat",62,204,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas01.gat",113,100,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas01.gat",211,174,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",7; + mes "[Arl Fredo]"; + mes "Guardian has been installed, the guardian will protect our guild base against enemies."; + close; +} + + +// Castle 2 ================================================================================== +aldeg_cas02.gat,78,74,0 script Chen Lee 55,{ + + if(callfunc("F_GldManager","Chen Lee","aldeg_cas02",135,231,"A02") == 0) close; + + if(@GDnum==10) guardian "aldeg_cas02.gat",22,186,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas02.gat",88,31,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas02.gat",207,176,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas02.gat",50,201,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas02.gat",197,146,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas02.gat",71,193,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas02.gat",88,31,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas02.gat",219,148,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",7; + mes "[ Chen Lee ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 3 ================================================================================== +aldeg_cas03.gat,110,118,0 script Chen Lee 55,{ + + if(callfunc("F_GldManager","Chen Lee","aldeg_cas03",225,269,"A03") == 0) close; + + if(@GDnum==10) guardian "aldeg_cas03.gat",57,216,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas03.gat",80,108,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas03.gat",199,183,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas03.gat",98,267,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas03.gat",91,88,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas03.gat",78,121,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",7; + mes "[ Chen Lee ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 4 ================================================================================== +aldeg_cas04.gat,53,89,0 script Brimhemsen 55,{ +//aldeg_cas04.gat,67,116,0 script Brimhemsen 55,{ + + if(callfunc("F_GldManager","Brimhemsen","aldeg_cas04",85,12,"A04") == 0) close; + + if(@GDnum==10) guardian "aldeg_cas04.gat",181,33,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas04.gat",50,68,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas04.gat",50,119,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas04.gat",169,49,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas04.gat",133,196,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas04.gat",177,87,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas04.gat",50,119,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas04.gat",133,196,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",7; + mes "[ Brimhemsen ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 5 ================================================================================== +aldeg_cas05.gat,52,179,0 script Brimhemsen 55,{ + + if(callfunc("F_GldManager","Brimhemsen","aldeg_cas05",66,11,"A05") == 0) close; + + if(@GDnum==10) guardian "aldeg_cas05.gat",157,192,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas05.gat",194,46,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas05.gat",146,214,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas05.gat",223,95,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas05.gat",131,223,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas05.gat",191,68,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas05.gat",160,194,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas05.gat",49,225,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",7; + mes "[ Brimhemsen ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} diff --git a/npc/guild/aldeg/aldeg_treas.txt b/npc/guild/aldeg/aldeg_treas.txt new file mode 100644 index 000000000..a6f9ffb61 --- /dev/null +++ b/npc/guild/aldeg/aldeg_treas.txt @@ -0,0 +1,141 @@ +//===== eAthena Script ======================================= +//= War of Emperium Treasure Rooms for Al De Baran Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//<=============================== Castle 1 =================================>\\ + +// Treasure Spawn ----------------------- +aldeg_cas01.gat,1,1,1 script Treasure_A01 -1,{ + +OnRecvCastleA01: + if($boxNumA01 == 0) end; + set $@bxA01, $boxNumA01; + callfunc "F_GldTreas","aldeg_cas01","A01",$boxNumA01,$@bxA01,$@boxIdA01,1324,114,218,123,227,1; + end; +OnClock1200: + callfunc "F_GldTreas","aldeg_cas01","A01",$boxNumA01,$@bxA01,$@boxIdA01,1324,114,218,123,227,0; + end; +OnDied: + mapannounce "aldeg_cas01.gat","Treasure Chest Broken Open",17; + set $boxNumA01, $boxNumA01 -1; + if($boxNumA01 == 0) mapannounce "aldeg_cas01.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch -------------------- +aldeg_cas01.gat,123,223,0 script Switch#TresA01 111,{ + callfunc "F_GldTreasSw", "aldeg_cas01",218,176; + end; +} + +//<================================ Castle 2 ================================>\\ + +// Treasure Spawn ---------------------------- +aldeg_cas02.gat,1,1,1 script Treasure_A02 -1,{ + +OnRecvCastleA02: + if($boxNumA02 == 0) end; + set $@bxA02, $boxNumA02; + callfunc "F_GldTreas","aldeg_cas02","A02",$boxNumA02,$@bxA02,$@boxIdA02,1326,130,226,138,235,1; + end; +OnClock1200: + callfunc "F_GldTreas","aldeg_cas02","A02",$boxNumA02,$@bxA02,$@boxIdA02,1326,130,226,138,235,0; + end; +OnDied: + mapannounce "aldeg_cas02.gat","Treasure Chest Broken Open",17; + set $boxNumA02, $boxNumA02 -1; + if($boxNumA02 == 0) mapannounce "aldeg_cas02.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------- +aldeg_cas02.gat,139,235,0 script Switch#TresA02 111,{ + callfunc "F_GldTreasSw", "aldeg_cas02",78,75; +} + +//<================================ Castle 3 ================================>\\ + +// Treasure Spawn --------------------------- +aldeg_cas03.gat,1,1,1 script Treasure_A03 -1,{ + +OnRecvCastleA03: + if($boxNumA03 == 0) end; + set $@bxA03, $boxNumA03; + callfunc "F_GldTreas","aldeg_cas03","A03",$boxNumA03,$@bxA03,$@boxIdA03,1328,220,264,229,273,1; + end; +OnClock1200: + callfunc "F_GldTreas","aldeg_cas03","A03",$boxNumA03,$@bxA03,$@boxIdA03,1328,220,264,229,273,0; + end; +OnDied: + mapannounce "aldeg_cas03.gat","Treasure Chest Broken Open",17; + set $boxNumA03, $boxNumA03 -1; + if($boxNumA03 == 0) mapannounce "aldeg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ----------------------- +aldeg_cas03.gat,229,267,0 script Switch#TresA03 111,{ + callfunc "F_GldTreasSw", "aldeg_cas03",110,119; +} + +//<================================ Castle 4 ================================>\\ + +// Treasure Spawn ------------------------------- +aldeg_cas04.gat,1,1,1 script Treasure_A04 -1,{ + +OnRecvCastleA04: + if($boxNumA04 == 0) end; + set $@bxA04, $boxNumA04; + callfunc "F_GldTreas","aldeg_cas04","A04",$boxNumA04,$@bxA04,$@boxIdA04,1330,80,8,89,17,1; + end; +OnClock1200: + callfunc "F_GldTreas","aldeg_cas04","A04",$boxNumA04,$@bxA04,$@boxIdA04,1330,80,8,89,17,0; + end; +OnDied: + mapannounce "aldeg_cas04.gat","Treasure Chest Broken Open",17; + set $boxNumA04, $boxNumA04 -1; + if($boxNumA04 == 0) mapannounce "aldeg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; + +} +// Treasure Room Switch ------------------------- +aldeg_cas04.gat,83,17,0 script Switch#TresA04 111,{ + callfunc "F_GldTreasSw", "aldeg_cas04",67,117; +} + +//<================================ Castle 5 ================================>\\ + +// Treasure Spawn ------------------------------------ +aldeg_cas05.gat,1,1,1 script Treasure_A05 -1,{ + +OnRecvCastleA05: + if($boxNumA05 == 0) end; + set $@bxA05, $boxNumA05; + callfunc "F_GldTreas","aldeg_cas05","A05",$boxNumA05,$@bxA05,$@boxIdA05,1332,58,8,65,15,1; + end; +OnClock1200: + callfunc "F_GldTreas","aldeg_cas05","A05",$boxNumA05,$@bxA05,$@boxIdA05,1332,58,8,65,15,0; + end; +OnDied: + mapannounce "aldeg_cas05.gat","Treasure Chest Broken Open",17; + set $boxNumA05, $boxNumA05 -1; + if($boxNumA05 == 0) mapannounce "aldeg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch --------------------------------- +aldeg_cas05.gat,64,8,0 script Switch#TresA05 111,{ + callfunc "F_GldTreasSw", "aldeg_cas05",51,179; +} diff --git a/npc/guild/ev_agit_event.txt b/npc/guild/ev_agit_event.txt new file mode 100644 index 000000000..49946d92d --- /dev/null +++ b/npc/guild/ev_agit_event.txt @@ -0,0 +1,41 @@ +//===== eAthena Script ======================================= +//= War of Emperium - WoE Auto-Start +//===== By: ================================================== +//= kalen (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Auto Start for War of Emperium +//============================================= +//= gettime(3): Gets hour (24 hour time) +//= gettime(4): Use it if you only want to have WoE start on +//= certain days. +//= 1=Monday, 2=Tuesday, 3=Wednesday, 4=Thursday, etc. +//===== Additional Comments: ================================= +//= v1.1a changed OnInit to OnAgitInit.[kobra_k88] +//= v1.2 added gettime checks. removed $AgitStarted var.[kobra_k88] +//============================================================ + +// Auto Start Agit NPC +- script Agit_Event -1,{ + end; + +OnAgitInit: + if(gettime(3) >= 21 || gettime(3) < 11) goto L_Stop; + +OnClock1100: +// if(gettime(4)!=1 || gettime(4)!=3 || gettime(4)!=6) end; + Announce "The War Of Emperium has begun!",8; + AgitStart; + Break; + +OnClock2100: +L_Stop: +// if(gettime(4)!=1 || gettime(4)!=3 || gettime(4)!=6) end; + Announce "The War Of Emperium is over!",8; + AgitEnd; + Break; +} diff --git a/npc/guild/gefg/gefg_dunsw.txt b/npc/guild/gefg/gefg_dunsw.txt new file mode 100644 index 000000000..f7f794fd2 --- /dev/null +++ b/npc/guild/gefg/gefg_dunsw.txt @@ -0,0 +1,49 @@ +//===== eAthena Script ======================================= +//= War of Emperium Dungeon Switch for Geffen Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Switch that warps guild members to the guild dungeon +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================ +gefg_cas01.gat,78,84,0 script Switch#DunG01 111,{ + callfunc "F_GldDunSw","gefg_cas01","04",39,258; + close; +} + + +// Castle 2 ================================================ +gefg_cas02.gat,167,40,0 script Switch#DunG02 111,{ + callfunc "F_GldDunSw","gefg_cas02","04",125,270; + close; +} + + +// Castle 3 ================================================ +gefg_cas03.gat,221,43,0 script Switch#DunG03 111,{ + callfunc "F_GldDunSw","gefg_cas03","04",268,251; + close; +} + + +// Castle 4 ================================================ +gefg_cas04.gat,58,75,0 script Switch#DunG04 111,{ + callfunc "F_GldDunSw","gefg_cas04","04",268,108; + close; +} + + +// Castle 5 ================================================ +gefg_cas05.gat,66,29,0 script Switch#DunG05 111,{ + callfunc "F_GldDunSw","gefg_cas05","04",230,35; + close; +} diff --git a/npc/guild/gefg/gefg_ev_agit.txt b/npc/guild/gefg/gefg_ev_agit.txt new file mode 100644 index 000000000..48417b2af --- /dev/null +++ b/npc/guild/gefg/gefg_ev_agit.txt @@ -0,0 +1,130 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Geffen Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Geffen Guild Wars +//===== Additional Comments: ================================= +//= v1.2 Now using functions for OnAgitStart and OnAgitBreak. [kobra_k88] +//============================================================ + + +// Castle 1 ================================================================ +gefg_cas01.gat,198,182,0 script Agit_G01 -1,{ +OnInterIfInit: + GetCastleData "gefg_cas01.gat",0,"::OnRecvCastleG01"; + end; +OnRecvCastleG01: + RequestGuildInfo GetCastleData("gefg_cas01.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","gefg_cas01","G01",198,182; + end; +OnAgitBreak: + callfunc "F_AgitBreak","gefg_cas01","G01"; + end; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas01.gat",GetCastleData("gefg_cas01.gat",1),6; + Monster "gefg_cas01.gat",198,182,"EMPERIUM",1288,1,"Agit_G01::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","gefg_cas01","G01"; + end; +} + +// Castle 2 ================================================================ +gefg_cas02.gat,176,178,0 script Agit_G02 -1,{ +OnInterIfInit: + GetCastleData "gefg_cas02.gat",0,"::OnRecvCastleG02"; + end; +OnRecvCastleG02: + RequestGuildInfo GetCastleData("gefg_cas02.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","gefg_cas02","G02",176,178; + end; +OnAgitBreak: + callfunc "F_AgitBreak","gefg_cas02","G02"; + end; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas02.gat",GetCastleData("gefg_cas02.gat",1),6; + Monster "gefg_cas02.gat",176,178,"EMPERIUM",1288,1,"Agit_G02::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","gefg_cas02","G02"; + end; +} + +// Castle 3 ================================================================ +gefg_cas03.gat,245,167,0 script Agit_G03 -1,{ +OnInterIfInit: + GetCastleData "gefg_cas03.gat",0,"::OnRecvCastleG03"; + end; +OnRecvCastleG03: + RequestGuildInfo GetCastleData("gefg_cas03.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","gefg_cas03","G03",245,167; + end; +OnAgitBreak: + callfunc "F_AgitBreak","gefg_cas03","G03"; + end; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas03.gat",GetCastleData("gefg_cas03.gat",1),6; + Monster "gefg_cas03.gat",245,167,"EMPERIUM",1288,1,"Agit_G03::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","gefg_cas03","G03"; + end; +} + +// Castle 4 ================================================================ +gefg_cas04.gat,174,178,0 script Agit_G04 -1,{ +OnInterIfInit: + GetCastleData "gefg_cas04.gat",0,"::OnRecvCastleG04"; + end; +OnRecvCastleG04: + RequestGuildInfo GetCastleData("gefg_cas04.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","gefg_cas04","G04",174,178; + end; +OnAgitBreak: + callfunc "F_AgitBreak","gefg_cas04","G04"; + end; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas04.gat",GetCastleData("gefg_cas04.gat",1),6; + Monster "gefg_cas04.gat",174,178,"EMPERIUM",1288,1,"Agit_G04::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","gefg_cas04","G04"; + end; +} + +// Castle 5 ================================================================ +gefg_cas05.gat,194,184,0 script Agit_G05 -1,{ +OnInterIfInit: + GetCastleData "gefg_cas05.gat",0,"::OnRecvCastleG05"; + end; +OnRecvCastleG05: + RequestGuildInfo GetCastleData("gefg_cas05.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","gefg_cas05","G05",194,184; + end; +OnAgitBreak: + callfunc "F_AgitBreak","gefg_cas05","G05"; + end; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas05.gat",GetCastleData("gefg_cas05.gat",1),6; + Monster "gefg_cas05.gat",194,184,"EMPERIUM",1288,1,"Agit_G05::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","gefg_cas05","G05"; + end; +} diff --git a/npc/guild/gefg/gefg_flags.txt b/npc/guild/gefg/gefg_flags.txt new file mode 100644 index 000000000..d31db1f69 --- /dev/null +++ b/npc/guild/gefg/gefg_flags.txt @@ -0,0 +1,154 @@ +//===== eAthena Script ======================================= +//= War of Emperium Geffen Guild Flags +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= WoE flag scripts. Display guild emblems on flags. +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//================================================================================// +// Castle 1 +//================================================================================// +geffen.gat,109,123,2 script Reprion#g1-1::Reprion 722, +{ + callfunc "F_Flags","Geffen","gefg_cas01",83,47; + close; + +OnRecvCastleG01: + FlagEmblem GetCastleData("gefg_cas01.gat",1); + end; +} +// In Guild =============================================== +gef_fild13.gat,148,51,5 duplicate(Reprion) Reprion#g1-2 722 +gef_fild13.gat,155,54,5 duplicate(Reprion) Reprion#g1-3 722 +gef_fild13.gat,212,79,6 duplicate(Reprion) Reprion#g1-4 722 +gef_fild13.gat,211,71,6 duplicate(Reprion) Reprion#g1-5 722 +// In Castle ============================================= +gefg_cas01.gat,28,157,4 duplicate(Reprion) Reprion#g1-6 722 +gefg_cas01.gat,32,157,4 duplicate(Reprion) Reprion#g1-7 722 +gefg_cas01.gat,22,156,5 duplicate(Reprion) Reprion#g1-8 722 +gefg_cas01.gat,68,185,3 duplicate(Reprion) Reprion#g1-9 722 +gefg_cas01.gat,17,171,5 duplicate(Reprion) Reprion#g1-10 722 +gefg_cas01.gat,59,16,4 duplicate(Reprion) Reprion#g1-11 722 +gefg_cas01.gat,64,16,4 duplicate(Reprion) Reprion#g1-12 722 + + + +//===================================================================================// +// Castle 2 +//===================================================================================// +geffen.gat,112,129,1 script Yolbriger#g2-1::Yolbriger 722, +{ + callfunc "F_Flags","Geffen","gefg_cas02",23,66; + close; + +OnRecvCastleG02: + FlagEmblem GetCastleData("gefg_cas02.gat",1); + end; +} +// In Guild ============================================== +gef_fild13.gat,303,243,4 duplicate(Yolbriger) Yolbriger#g2-2 722 +gef_fild13.gat,312,243,4 duplicate(Yolbriger) Yolbriger#g2-3 722 +gef_fild13.gat,290,243,4 duplicate(Yolbriger) Yolbriger#g2-4 722 +gef_fild13.gat,324,243,4 duplicate(Yolbriger) Yolbriger#g2-5 722 +// In Castle ============================================ +gefg_cas02.gat,65,130,5 duplicate(Yolbriger) Yolbriger#g2-6 722 +gefg_cas02.gat,30,123,5 duplicate(Yolbriger) Yolbriger#g2-7 722 +gefg_cas02.gat,65,139,6 duplicate(Yolbriger) Yolbriger#g2-8 722 +gefg_cas02.gat,37,177,6 duplicate(Yolbriger) Yolbriger#g2-9 722 +gefg_cas02.gat,37,168,6 duplicate(Yolbriger) Yolbriger#g2-10 722 +gefg_cas02.gat,68,47,2 duplicate(Yolbriger) Yolbriger#g2-11 722 +gefg_cas02.gat,68,36,2 duplicate(Yolbriger) Yolbriger#g2-12 722 + + + +//================================================================================// +// Castle 3 +//================================================================================// +geffen.gat,120,132,8 script Isinlife#g3-1::Isinlife 722, +{ + callfunc "F_Flags","Geffen","gefg_cas03",116,89; + close; + +OnRecvCastleG03: + FlagEmblem GetCastleData("gefg_cas03.gat",1); + end; +} +// In Guild =============================================== +gef_fild13.gat,78,182,4 duplicate(Isinlife) Isinlife#g3-2 722 +gef_fild13.gat,87,182,4 duplicate(Isinlife) Isinlife#g3-3 722 +gef_fild13.gat,73,295,7 duplicate(Isinlife) Isinlife#g3-4 722 +gef_fild13.gat,113,274,7 duplicate(Isinlife) Isinlife#g3-5 722 +gef_fild13.gat,144,235,6 duplicate(Isinlife) Isinlife#g3-6 722 +gef_fild13.gat,144,244,4 duplicate(Isinlife) Isinlife#g3-7 722 +// In Castle ============================================= +gefg_cas03.gat,122,220,6 duplicate(Isinlife) Isinlife#g3-8 722 +gefg_cas03.gat,122,229,6 duplicate(Isinlife) Isinlife#g3-9 722 +gefg_cas03.gat,91,257,7 duplicate(Isinlife) Isinlife#g3-10 722 +gefg_cas03.gat,52,276,7 duplicate(Isinlife) Isinlife#g3-11 722 +gefg_cas03.gat,56,164,4 duplicate(Isinlife) Isinlife#g3-12 722 +gefg_cas03.gat,65,164,4 duplicate(Isinlife) Isinlife#g3-13 722 +gefg_cas03.gat,37,214,1 duplicate(Isinlife) Isinlife#g3-14 722 +gefg_cas03.gat,34,208,1 duplicate(Isinlife) Isinlife#g3-15 722 + + + +//================================================================================// +// Castle 4 +//================================================================================// +geffen.gat,127,130,7 script Berigel#g4-1::Berigel 722, +{ + callfunc "F_Flags","Geffen","gefg_cas04",59,70; + close; + +OnRecvCastleG04: + FlagEmblem GetCastleData("gefg_cas04.gat",1); + end; +} +// In Guild =============================================== +gef_fild13.gat,190,283,3 duplicate(Berigel) Berigel#g4-2 722 +gef_fild13.gat,199,274,3 duplicate(Berigel) Berigel#g4-3 722 +// In Castle ============================================= +gefg_cas04.gat,24,157,4 duplicate(Berigel) Berigel#g4-4 722 +gefg_cas04.gat,35,158,4 duplicate(Berigel) Berigel#g4-5 722 +gefg_cas04.gat,44,184,4 duplicate(Berigel) Berigel#g4-6 722 +gefg_cas04.gat,51,184,4 duplicate(Berigel) Berigel#g4-7 722 +gefg_cas04.gat,39,212,7 duplicate(Berigel) Berigel#g4-8 722 +gefg_cas04.gat,29,212,1 duplicate(Berigel) Berigel#g4-9 722 +gefg_cas04.gat,24,73,1 duplicate(Berigel) Berigel#g4-10 722 +gefg_cas04.gat,35,73,4 duplicate(Berigel) Berigel#g4-11 722 + + + +//================================================================================// +// Castle 5 +//================================================================================// +geffen.gat,131,123,6 script Melsedetsu#g5-1::Melsedetsu 722, +{ + callfunc "F_Flags","Geffen","gefg_cas05",61,52; + close; + +OnRecvCastleG05: + FlagEmblem GetCastleData("gefg_cas05.gat",1); + end; +} +// In Guild =============================================== +gef_fild13.gat,302,87,7 duplicate(Melsedetsu) Melsedetsu#g5-2 722 +gef_fild13.gat,313,83,0 duplicate(Melsedetsu) Melsedetsu#g5-3 722 +gef_fild13.gat,252,51,2 duplicate(Melsedetsu) Melsedetsu#g5-4 722 +gef_fild13.gat,26,147,2 duplicate(Melsedetsu) Melsedetsu#g5-5 722 +// In Castle ============================================= +gefg_cas05.gat,77,185,7 duplicate(Melsedetsu) Melsedetsu#g5-6 722 +gefg_cas05.gat,92,181,0 duplicate(Melsedetsu) Melsedetsu#g5-7 722 +gefg_cas05.gat,83,158,1 duplicate(Melsedetsu) Melsedetsu#g5-8 722 +gefg_cas05.gat,62,144,7 duplicate(Melsedetsu) Melsedetsu#g5-9 722 +gefg_cas05.gat,62,66,4 duplicate(Melsedetsu) Melsedetsu#g5-10 722 +gefg_cas05.gat,69,66,4 duplicate(Melsedetsu) Melsedetsu#g5-11 722 diff --git a/npc/guild/gefg/gefg_guardians.txt b/npc/guild/gefg/gefg_guardians.txt new file mode 100644 index 000000000..13947fd12 --- /dev/null +++ b/npc/guild/gefg/gefg_guardians.txt @@ -0,0 +1,108 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Re-spawns guardians on server start if they have been +//= purchased. Also announces when a guardian dies. +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//= 1.2a Guardians for all gefg castles are now in this file. +//= Minor optimizations.[kobra_k88] +//============================================================ + + +gefg_cas01.gat,198,182,0 script Guardian_G01 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas01.gat",10) == 1) guardian "gefg_cas01.gat",30,178,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",0; + if (GetCastleData("gefg_cas01.gat",11) == 1) guardian "gefg_cas01.gat",64,180,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",1; + if (GetCastleData("gefg_cas01.gat",12) == 1) guardian "gefg_cas01.gat",61,25,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",2; + if (GetCastleData("gefg_cas01.gat",13) == 1) guardian "gefg_cas01.gat",61,44,"Archer Guardian",1285,1,"Guardian_G01::OnGuardianDied",3; + if (GetCastleData("gefg_cas01.gat",14) == 1) guardian "gefg_cas01.gat",189,43,"Archer Guardian",1285,1,"Guardian_G01::OnGuardianDied",4; + if (GetCastleData("gefg_cas01.gat",15) == 1) guardian "gefg_cas01.gat",51,192,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",5; + if (GetCastleData("gefg_cas01.gat",16) == 1) guardian "gefg_cas01.gat",49,67,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",6; + if (GetCastleData("gefg_cas01.gat",17) == 1) guardian "gefg_cas01.gat",181,14,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas01.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +gefg_cas02.gat,176,178,0 script Guardian_G02 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas02.gat",10) == 1) guardian "gefg_cas02.gat",22,135,"Soldier Guardian",1287,1,"Guardian_G02::OnGuardianDied",0; + if (GetCastleData("gefg_cas02.gat",11) == 1) guardian "gefg_cas02.gat",33,40,"Soldier Guardian",1287,1,"Guardian_G02::OnGuardianDied",1; + if (GetCastleData("gefg_cas02.gat",12) == 1) guardian "gefg_cas02.gat",158,11,"Soldier Guardian",1287,1,"Guardian_G02::OnGuardianDied",2; + if (GetCastleData("gefg_cas02.gat",13) == 1) guardian "gefg_cas02.gat",64,140,"Archer Guardian",1285,1,"Guardian_G02::OnGuardianDied",3; + if (GetCastleData("gefg_cas02.gat",14) == 1) guardian "gefg_cas02.gat",36,140,"Archer Guardian",1285,1,"Guardian_G02::OnGuardianDied",4; + if (GetCastleData("gefg_cas02.gat",15) == 1) guardian "gefg_cas02.gat",166,45,"Knight Guardian",1286,1,"Guardian_G02::OnGuardianDied",5; + if (GetCastleData("gefg_cas02.gat",16) == 1) guardian "gefg_cas02.gat",10,39,"Knight Guardian",1286,1,"Guardian_G02::OnGuardianDied",6; + if (GetCastleData("gefg_cas02.gat",17) == 1) guardian "gefg_cas02.gat",166,35,"Knight Guardian",1286,1,"Guardian_G02::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas02.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +gefg_cas03.gat,245,167,0 script Guardian_G03 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas03.gat",10) == 1) guardian "gefg_cas03.gat",101,53,"Soldier Guardian",1287,1,"Guardian_G03::OnGuardianDied",0; + if (GetCastleData("gefg_cas03.gat",11) == 1) guardian "gefg_cas03.gat",158,40,"Soldier Guardian",1287,1,"Guardian_G03::OnGuardianDied",1; + if (GetCastleData("gefg_cas03.gat",12) == 1) guardian "gefg_cas03.gat",158,67,"Soldier Guardian",1287,1,"Guardian_G03::OnGuardianDied",2; + if (GetCastleData("gefg_cas03.gat",13) == 1) guardian "gefg_cas03.gat",229,53,"Archer Guardian",1285,1,"Guardian_G03::OnGuardianDied",3; + if (GetCastleData("gefg_cas03.gat",14) == 1) guardian "gefg_cas03.gat",248,53,"Archer Guardian",1285,1,"Guardian_G03::OnGuardianDied",4; + if (GetCastleData("gefg_cas03.gat",15) == 1) guardian "gefg_cas03.gat",122,53,"Knight Guardian",1286,1,"Guardian_G03::OnGuardianDied",5; + if (GetCastleData("gefg_cas03.gat",16) == 1) guardian "gefg_cas03.gat",243,35,"Knight Guardian",1286,1,"Guardian_G03::OnGuardianDied",6; + if (GetCastleData("gefg_cas03.gat",17) == 1) guardian "gefg_cas03.gat",234,33,"Knight Guardian",1286,1,"Guardian_G03::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas03.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +gefg_cas04.gat,174,178,0 script Guardian_G04 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas04.gat",10) == 1) guardian "gefg_cas04.gat",49,203,"Soldier Guardian",1287,1,"Guardian_G04::OnGuardianDied",0; + if (GetCastleData("gefg_cas04.gat",11) == 1) guardian "gefg_cas04.gat",148,50,"Soldier Guardian",1287,1,"Guardian_G04::OnGuardianDied",1; + if (GetCastleData("gefg_cas04.gat",12) == 1) guardian "gefg_cas04.gat",57,20,"Soldier Guardian",1287,1,"Guardian_G04::OnGuardianDied",2; + if (GetCastleData("gefg_cas04.gat",13) == 1) guardian "gefg_cas04.gat",34,218,"Archer Guardian",1285,1,"Guardian_G04::OnGuardianDied",3; + if (GetCastleData("gefg_cas04.gat",14) == 1) guardian "gefg_cas04.gat",167,42,"Archer Guardian",1285,1,"Guardian_G04::OnGuardianDied",4; + if (GetCastleData("gefg_cas04.gat",15) == 1) guardian "gefg_cas04.gat",18,52,"Knight Guardian",1286,1,"Guardian_G04::OnGuardianDied",5; + if (GetCastleData("gefg_cas04.gat",16) == 1) guardian "gefg_cas04.gat",50,48,"Knight Guardian",1286,1,"Guardian_G04::OnGuardianDied",6; + if (GetCastleData("gefg_cas04.gat",17) == 1) guardian "gefg_cas04.gat",160,66,"Knight Guardian",1286,1,"Guardian_G04::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas04.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +gefg_cas05.gat,194,184,0 script Guardian_G05 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas05.gat",10) == 1) guardian "gefg_cas05.gat",54,149,"Soldier Guardian",1287,1,"Guardian_G05::OnGuardianDied",0; + if (GetCastleData("gefg_cas05.gat",11) == 1) guardian "gefg_cas05.gat",80,31,"Soldier Guardian",1287,1,"Guardian_G05::OnGuardianDied",1; + if (GetCastleData("gefg_cas05.gat",12) == 1) guardian "gefg_cas05.gat",52,32,"Soldier Guardian",1287,1,"Guardian_G05::OnGuardianDied",2; + if (GetCastleData("gefg_cas05.gat",13) == 1) guardian "gefg_cas05.gat",77,149,"Archer Guardian",1285,1,"Guardian_G05::OnGuardianDied",3; + if (GetCastleData("gefg_cas05.gat",14) == 1) guardian "gefg_cas05.gat",65,18,"Archer Guardian",1285,1,"Guardian_G05::OnGuardianDied",4; + if (GetCastleData("gefg_cas05.gat",15) == 1) guardian "gefg_cas05.gat",66,54,"Knight Guardian",1286,1,"Guardian_G05::OnGuardianDied",5; + if (GetCastleData("gefg_cas05.gat",16) == 1) guardian "gefg_cas05.gat",187,43,"Knight Guardian",1286,1,"Guardian_G05::OnGuardianDied",6; + if (GetCastleData("gefg_cas05.gat",17) == 1) guardian "gefg_cas05.gat",167,43,"Knight Guardian",1286,1,"Guardian_G05::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas05.gat","A Guardian Has Fallen",17; + end; +} diff --git a/npc/guild/gefg/gefg_kafras.txt b/npc/guild/gefg/gefg_kafras.txt new file mode 100644 index 000000000..77fccddfa --- /dev/null +++ b/npc/guild/gefg/gefg_kafras.txt @@ -0,0 +1,71 @@ +//===== eAthena Script ======================================= +//= War of Emperium Kafras for Geffen Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Provides Kafra services for guild members of Geffen Castles. +//= Used in conjuction with function F_Kafra. +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 =============================================== +//gefg_cas01.gat,96,173,0 script Kafra Service#G01 117,{ +gefg_cas01.gat,35,37,0 script Kafra Service#G01 117, +{ + callfunc "F_GKafra", "gefg_cas01", "Geffen"; + end; +OnRecvCastleG01: + if (GetCastleData("gefg_cas01.gat",9) < 1) disablenpc "Kafra Service#G01"; + end; +} + + +// Castle 2 =============================================== +gefg_cas02.gat,23,66,3 script Kafra Service#G02 117, +{ + callfunc "F_GKafra", "gefg_cas02", "Geffen"; + end; +OnRecvCastleG02: + if (GetCastleData("gefg_cas02.gat",9) < 1) disablenpc "Kafra Service#G02"; + end; +} + + +// Castle 3 =============================================== +gefg_cas03.gat,116,89,5 script Kafra Service#G03 117, +{ + callfunc "F_GKafra", "gefg_cas03", "Geffen"; + end; +OnRecvCastleG03: + if (GetCastleData("gefg_cas03.gat",9) < 1) disablenpc "Kafra Service#G03"; + end; +} + + +// Castle 4 =============================================== +gefg_cas04.gat,59,70,3 script Kafra Service#G04 117, +{ + callfunc "F_GKafra", "gefg_cas04", "Geffen"; + end; +OnRecvCastleG04: + if (GetCastleData("gefg_cas04.gat",9) < 1) disablenpc "Kafra Service#G04"; + end; +} + + +// Castle 5 =============================================== +gefg_cas05.gat,61,52,5 script Kafra Service#G05 117, +{ + callfunc "F_GKafra", "gefg_cas05", "Geffen"; + end; +OnRecvCastleG05: + if (GetCastleData("gefg_cas05.gat",9) < 1) disablenpc "Kafra Service#G05"; + end; +} diff --git a/npc/guild/gefg/gefg_managers.txt b/npc/guild/gefg/gefg_managers.txt new file mode 100644 index 000000000..07e62e5bc --- /dev/null +++ b/npc/guild/gefg/gefg_managers.txt @@ -0,0 +1,104 @@ +//===== eAthena Script ======================================= +//= War of Emperium Managers for Geffen Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================================================== +gefg_cas01.gat,40,48,5 script Gnaucher 55,{ + if(callfunc("F_GldManager","Gnaucher","gefg_cas01",155,112,"G01") == 0) close; + + if(@GDnum==10) guardian "gefg_cas01.gat",30,178,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas01.gat",64,180,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas01.gat",61,25,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas01.gat",61,44,"Archer Guardian",1285,1,"Guardian_G01::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas01.gat",189,43,"Archer Guardian",1285,1,"Guardian_G01::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas01.gat",51,192,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas01.gat",49,67,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas01.gat",181,14,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",7; + mes "[ Gnaucher ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 2 ================================================================================== +gefg_cas02.gat,12,66,5 script Esmark 55,{ + if(callfunc("F_GldManager","Esmark","gefg_cas02",141,115,"G02") == 0) close; + + if(@GDnum==10) guardian "gefg_cas02.gat",22,135,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas02.gat",33,40,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas02.gat",158,11,"Soldier Guardian",1287,1,"Guardian_G01::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas02.gat",64,140,"Archer Guardian",1285,1,"Guardian_G01::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas02.gat",36,140,"Archer Guardian",1285,1,"Guardian_G01::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas02.gat",166,45,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas02.gat",10,39,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas02.gat",166,35,"Knight Guardian",1286,1,"Guardian_G01::OnGuardianDied",7; + mes "[ Esmark ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 3 ================================================================================== +gefg_cas03.gat,106,23,5 script Jyang 55,{ + if(callfunc("F_GldManager","Jyang","gefg_cas03",270,290,"G03") == 0) close; + + if(@GDnum==10) guardian "gefg_cas03.gat",101,53,"Soldier Guardian",1287,1,"Guardian_G03::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas03.gat",158,40,"Soldier Guardian",1287,1,"Guardian_G03::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas03.gat",158,67,"Soldier Guardian",1287,1,"Guardian_G03::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas03.gat",229,53,"Archer Guardian",1285,1,"Guardian_G03::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas03.gat",248,53,"Archer Guardian",1285,1,"Guardian_G03::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas03.gat",122,53,"Knight Guardian",1286,1,"Guardian_G03::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas03.gat",243,35,"Knight Guardian",1286,1,"Guardian_G03::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas03.gat",234,33,"Knight Guardian",1286,1,"Guardian_G03::OnGuardianDied",7; + mes "[ Jyang ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 4 ================================================================================== +gefg_cas04.gat,73,46,5 script Kelbany 55,{ + if(callfunc("F_GldManager","Kelbany","gefg_cas04",116,118,"G04") == 0) close; + + if(@GDnum==10) guardian "gefg_cas04.gat",49,203,"Soldier Guardian",1287,1,"Guardian_G04::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas04.gat",148,50,"Soldier Guardian",1287,1,"Guardian_G04::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas04.gat",57,20,"Soldier Guardian",1287,1,"Guardian_G04::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas04.gat",34,218,"Archer Guardian",1285,1,"Guardian_G04::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas04.gat",167,42,"Archer Guardian",1285,1,"Guardian_G04::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas04.gat",18,52,"Knight Guardian",1286,1,"Guardian_G04::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas04.gat",50,48,"Knight Guardian",1286,1,"Guardian_G04::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas04.gat",160,66,"Knight Guardian",1286,1,"Guardian_G04::OnGuardianDied",7; + mes "[ Kelbany ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 5 ================================================================================== +gefg_cas05.gat,70,52,5 script Beeor 55,{ + if(callfunc("F_GldManager","Beeor","gefg_cas05",144,110,"G05") == 0) close; + + if(@GDnum==10) guardian "gefg_cas05.gat",54,149,"Soldier Guardian",1287,1,"Guardian_G05::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas05.gat",80,31,"Soldier Guardian",1287,1,"Guardian_G05::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas05.gat",52,32,"Soldier Guardian",1287,1,"Guardian_G05::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas05.gat",77,149,"Archer Guardian",1285,1,"Guardian_G05::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas05.gat",65,18,"Archer Guardian",1285,1,"Guardian_G05::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas05.gat",66,54,"Knight Guardian",1286,1,"Guardian_G05::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas05.gat",187,43,"Knight Guardian",1286,1,"Guardian_G05::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas05.gat",167,43,"Knight Guardian",1286,1,"Guardian_G05::OnGuardianDied",7; + mes "[ Beeor ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} diff --git a/npc/guild/gefg/gefg_treas.txt b/npc/guild/gefg/gefg_treas.txt new file mode 100644 index 000000000..331756b79 --- /dev/null +++ b/npc/guild/gefg/gefg_treas.txt @@ -0,0 +1,148 @@ +//===== eAthena Script ======================================= +//= War of Emperium Treasure Rooms for Geffen Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//<============================ Castle 1 ==================================>\\ + +// Treasure Spawn --------------------------------------------------------- +gefg_cas01.gat,1,1,1 script Treasure_G01 -1,{ + +OnRecvCastleG01: + if($boxNumG01 == 0) end; + set $@bxG01, $boxNumG01; + callfunc "F_GldTreas","gefg_cas01","G01",$boxNumG01,$@bxG01,$@boxIdG01,1334,150,108,158,114,1; + end; +OnClock1200: + callfunc "F_GldTreas","gefg_cas01","G01",$boxNumG01,$@bxG01,$@boxIdG01,1334,150,108,158,114,0; + end; +OnDied: + mapannounce "gefg_cas01.gat","Treasure Chest Broken Open",17; + set $boxNumG01, $boxNumG01 -1; + if($boxNumG01 == 0) mapannounce "gefg_cas01.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Room Switch --------------------------------------------------------- +gefg_cas01.gat,152,117,0 script Switch#TresG01 111,{ + callfunc "F_GldTreasSw","gefg_cas01",40,49; + end; +} + + +//<================================ Castle 2 ================================>\\ + +// Treasure Spawn --------------------------------------------------------- +gefg_cas02.gat,1,1,1 script Treasure_G02 -1,{ + +OnRecvCastleG02: + if($boxNumG02 == 0) end; + set $@bxG02, $boxNumG02; + callfunc "F_GldTreas","gefg_cas02","G02",$boxNumG02,$@bxG02,$@boxIdG02,1336,136,112,145,118,1; + end; +OnClock1200: + callfunc "F_GldTreas","gefg_cas02","G02",$boxNumG02,$@bxG02,$@boxIdG02,1336,136,112,145,118,0; + end; +OnDied: + mapannounce "gefg_cas02.gat","Treasure Chest Broken Open",17; + set $boxNumG02, $boxNumG02 -1; + if($boxNumG02 == 0) mapannounce "gefg_cas02.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Room Switch --------------------------------------------------------- +gefg_cas02.gat,145,115,0 script Switch#TresG02 111,{ + callfunc "F_GldTreasSw", "gefg_cas02",12,67; +} + + +//<================================= Castle 3 ===============================>\\ + +// Treasure Spawn --------------------------------------------------------- +gefg_cas03.gat,1,1,1 script Treasure_G03 -1,{ + +OnRecvCastleG03: + if($boxNumG03 == 0) end; + set $@bxG03, $boxNumG03; + callfunc "F_GldTreas","gefg_cas03","G03",$boxNumG03,$@bxG03,$@boxIdG03,1338,266,286,275,293,1; + end; +OnClock1200: + callfunc "F_GldTreas","gefg_cas03","G03",$boxNumG03,$@bxG03,$@boxIdG03,1338,266,286,275,293,0; + end; +OnDied: + mapannounce "gefg_cas03.gat","Treasure Chest Broken Open",17; + set $boxNumG03, $boxNumG03 -1; + if($boxNumG03 == 0) mapannounce "gefg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Room Switch --------------------------------------------------------- +gefg_cas03.gat,275,289,0 script Switch#TresG03 111,{ + callfunc "F_GldTreasSw", "gefg_cas03",106,24; + end; +} + + +//<=============================== Castle 4 ================================>\\ + +// Treasure Spawn --------------------------------------------------------- +gefg_cas04.gat,1,1,1 script Treasure_G04 -1,{ + +OnRecvCastleG04: + if($boxNumG04 == 0) end; + set $@bxG04, $boxNumG04; + callfunc "F_GldTreas","gefg_cas04","G04",$boxNumG04,$@bxG04,$@boxIdG04,1340,112,114,119,123,1; + end; +OnClock1200: + callfunc "F_GldTreas","gefg_cas04","G04",$boxNumG04,$@bxG04,$@boxIdG04,1340,112,114,119,123,0; + end; +OnDied: + mapannounce "gefg_cas04.gat","Treasure Chest Broken Open",17; + set $boxNumG04, $boxNumG04 -1; + if($boxNumG04 == 0) mapannounce "gefg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Room Switch --------------------------------------------------------- +gefg_cas04.gat,117,123,0 script Switch#TresG04 111,{ + callfunc "F_GldTreasSw", "gefg_cas04",73,47; + end; +} + + +//<================================ Castle 5 ================================>\\ + +// Treasure Spawn --------------------------------------------------------- +gefg_cas05.gat,1,1,1 script Treasure_G05 -1,{ + +OnRecvCastleG05: + if($boxNumG05 == 0) end; + set $@bxG05, $boxNumG05; + callfunc "F_GldTreas","gefg_cas05","G05",$boxNumG05,$@bxG05,$@boxIdG05,1342,140,106,147,113,1; + end; +OnClock1200: + callfunc "F_GldTreas","gefg_cas05","G05",$boxNumG05,$@bxG05,$@boxIdG05,1342,140,106,147,113,0; + end; +OnDied: + mapannounce "gefg_cas05.gat","Treasure Chest Broken Open",17; + set $boxNumG05, $boxNumG05 -1; + if($boxNumG05 == 0) mapannounce "gefg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Room Switch --------------------------------------------------------- +gefg_cas05.gat,149,107,0 script Switch#TresG05 111,{ + callfunc "F_GldTreasSw", "gefg_cas05",70,53; + close; +} diff --git a/npc/guild/gldfunc_dunsw.txt b/npc/guild/gldfunc_dunsw.txt new file mode 100644 index 000000000..ebcda54fa --- /dev/null +++ b/npc/guild/gldfunc_dunsw.txt @@ -0,0 +1,42 @@ +//===== eAthena Script ======================================= +//= War of Emperium Guild Dungeon Switch Function +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Switch that warps guild members to guild dungeon. +//========================================== +//= Break down of arguments used in the function: +//= arg(0): name of guild castle. +//= arg(1): guild dungeon level. +//= arg(2): x1 coordinate for warp +//= arg(3): y1 coordinate for warp +//===== Additional Comments: ================================= +//= v1.2: All guild Dungeon Switch npcs use this function.[kobra_k88] +//============================================================ + +//================================================== +function script F_GldDunSw { + + mes "[ Mysterious Voice ]"; + mes " ' Only brave warriors may lead the guild base.. '"; + next; + mes "(There is little switch over here....... Would you like to pull the switch?)"; + next; + menu "Yes",-,"No",M_No; + + set @GID, GetCastleData(getarg(0)+".gat",1); + if (getcharid(2) != @GID) goto L_NotGLead; + warp "gld_dun"+getarg(1)+".gat",getarg(2),getarg(3); + end; + + L_NotGLead: + mes "[ Mysterious Voice ]"; + mes " ' ..... it seems that you are not brave enough...... ' "; + M_No: + return; +} diff --git a/npc/guild/gldfunc_ev_agit.txt b/npc/guild/gldfunc_ev_agit.txt new file mode 100644 index 000000000..460f95ffa --- /dev/null +++ b/npc/guild/gldfunc_ev_agit.txt @@ -0,0 +1,149 @@ +//===== eAthena Script ======================================= +//= War of Emperium Guild Event AgitStart/AgitBreak Functions +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= F_AgitStart is in charge of spawning Emperium and mobs in castles +//= when WoE is started. +//= F_AgitBreak resets guild castle data when a castle has been taken over. +//= It then sets the data for the new guild master if there is one. +//======================================= +//= Break down of arguments used in F_AgitStart: +//= arg(0): name of specific guild castle. +//= arg(1): name of specific agit castle script. +//= arg(2): x1 for Emperium and monster spawn +//= arg(3): y1 for Emperium and monster spawn +//= Break down of arguments used in F_AgitBreak: +//= arg(0): name of specific guild castle. +//= arg(1): name of specific OnRevCastle label. +//===== Additional Comments: ================================= +//= v1.2: All OnAgitStart and OnAgitBreak calls will use these functions.[kobra_k88] +//= v1.2a: Added OnAgitEnd function.[kobra_k88] +//============================================================ + + + +// Function for OnAgitStart ========================================= +function script F_AgitStart { + + MapRespawnGuildID getarg(0)+".gat",GetCastleData(getarg(0)+".gat",1),2; + Monster getarg(0)+".gat",getarg(2),getarg(3),"EMPERIUM",1288,1,"Agit_"+getarg(1)+"::OnAgitBreak"; + GvgOn getarg(0)+".gat"; + if (GetCastleData(getarg(0)+".gat",1) != 0) return; + if(getarg(0) == "aldeg_cas01" || getarg(0) == "aldeg_cas02" || getarg(0) == "aldeg_cas03" || getarg(0) == "aldeg_cas04" || getarg(0) == "aldeg_cas05" || getarg(0) == "nguild_alde") goto L_AldegCas; + if(getarg(0) == "gefg_cas01" || getarg(0) == "gefg_cas02" || getarg(0) == "gefg_cas03" || getarg(0) == "gefg_cas04" || getarg(0) == "gefg_cas05" || getarg(0) == "nguild_gef") goto L_GefgCas; + if(getarg(0) == "payg_cas01" || getarg(0) == "payg_cas02" || getarg(0) == "payg_cas03" || getarg(0) == "payg_cas04" || getarg(0) == "payg_cas05" || getarg(0) == "nguild_pay") goto L_PaygCas; + if(getarg(0) == "prtg_cas01" || getarg(0) == "prtg_cas02" || getarg(0) == "prtg_cas03" || getarg(0) == "prtg_cas04" || getarg(0) == "prtg_cas05" || getarg(0) == "nguild_prt") goto L_PrtgCas; + +L_AldegCas: + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1117,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1132,4; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1219,2; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1205,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1216,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1193,17; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1269,9; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1276,7; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1208,3; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1275,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1268,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1272,1; + monster getarg(0)+".gat",(getarg(2)+1),getarg(3),"--ja--",1272,1; + monster getarg(0)+".gat",(getarg(2)-1),getarg(3),"--ja--",1270,4; + monster getarg(0)+".gat",getarg(2),(getarg(3)+1),"--ja--",1268,1; + monster getarg(0)+".gat",getarg(2),(getarg(3)-1),"--ja--",1219,1; + monster getarg(0)+".gat",getarg(2),getarg(3),"--ja--",1276,5; + return; +L_GefgCas: + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1117,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1263,11; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1102,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1130,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1140,20; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1163,9; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1275,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1219,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1150,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1159,1; + monster getarg(0)+".gat",(getarg(2)+1),getarg(3),"--ja--",1203,1; + monster getarg(0)+".gat",(getarg(2)-1),getarg(3),"--ja--",1087,1; + monster getarg(0)+".gat",getarg(2),(getarg(3)+1),"--ja--",1213,7; + monster getarg(0)+".gat",getarg(2),(getarg(3)-1),"--ja--",1189,7; + return; +L_PaygCas: + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1277,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1208,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1262,5; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1102,5; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1150,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1115,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1129,11; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1276,5; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1282,4; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1253,5; + monster getarg(0)+".gat",getarg(2),getarg(3),"--ja--",1150,1; + monster getarg(0)+".gat",getarg(2),getarg(3),"--ja--",1115,1; + monster getarg(0)+".gat",getarg(2),(getarg(3)+1),"--ja--",1208,6; + monster getarg(0)+".gat",getarg(2),(getarg(3)-1),"--ja--",1276,5; + return; +L_PrtgCas: + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1163,15; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1132,10; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1219,5; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1268,5; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1251,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1252,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1276,5; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1259,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1283,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1275,1; + areamonster getarg(0)+".gat",0,0,300,300,"--ja--",1200,1; + monster getarg(0)+".gat",(getarg(2)+1),getarg(3),"--ja--",1268,1; + monster getarg(0)+".gat",(getarg(2)-1),getarg(3),"--ja--",1251,1; + monster getarg(0)+".gat",getarg(2),(getarg(3)+1),"--ja--",1252,1; + monster getarg(0)+".gat",getarg(2),(getarg(3)-1),"--ja--",1219,2; + monster getarg(0)+".gat",getarg(2),getarg(3),"--ja--",1276,5; + return; +} + + +// Function for OnAgitBreak ====================================== +function script F_AgitBreak { + //killmonsterall getarg(0)+".gat"; + set @GID,getcharid(2); + if (@GID <= 0) return; + set @Economy,GetCastleData(getarg(0)+".gat",2); + SetCastleData getarg(0)+".gat",2, @Economy-5; + if (GetCastleData(getarg(0)+".gat",2) < 0) SetCastleData getarg(0)+".gat",2,0; + set @Defence,GetCastleData(getarg(0)+".gat",3); + SetCastleData getarg(0)+".gat",3, @Defence-5; + if (GetCastleData(getarg(0)+".gat",3) < 0) SetCastleData getarg(0)+".gat",3,0; + SetCastleData getarg(0)+".gat",1, @GID; + MapAnnounce getarg(0)+".gat","The emperium has been destroyed.",17; + Announce "Guild Base [" + GetCastleName(getarg(0)+".gat") + "] has been taken by the [" + GetGuildName(@GID) + "] guild.",0; + GetCastleData getarg(0)+".gat",0,"::OnRecvCastle"+getarg(1); + + disablenpc "Kafra Service#"+getarg(1); + set @i, 3; + + L_Loop: + set @i, @i + 1; + SetCastleData getarg(0)+".gat",@i,0; + if(@i < 25) goto L_Loop; + return; +} + + +// Function for OnAgitEnd ====================================== +function script F_AgitEnd { +// if (GetCastleData(getarg(0)+".gat",1) == 0) return; + MapRespawnGuildID getarg(0)+".gat",GetCastleData(getarg(0)+".gat",1),4; + KillMonster getarg(0)+".gat","Agit_"+getarg(1)+"::OnAgitBreak"; + GvgOff getarg(0)+".gat"; + end; +} diff --git a/npc/guild/gldfunc_flag.txt b/npc/guild/gldfunc_flag.txt new file mode 100644 index 000000000..d24076cda --- /dev/null +++ b/npc/guild/gldfunc_flag.txt @@ -0,0 +1,58 @@ +//===== eAthena Script ======================================= +//= War of Emperium Guild Flags Function +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Flags display messages stating whether or not a guild castle has been captured. +//= Allows the guild members to return to a captured castle. +//====================================== +//= Break down of arguments used in the function: +//= arg(0): name of City. +//= arg(1): name of guild castle. +//= arg(2): x1 coordinate for warp +//= arg(3): y1 coordinate for warp +//===== Additional Comments: ================================= +//= v1.2: All Guild flags scripts use this function. [kobra_k88] +//============================================================ + +function script F_Flags { + + set @GID, GetCastleData(getarg(1)+".gat",1); + if (@GID != 0) goto L_Startg; + + mes "[ Edict of the Divine Rune Midgard Kingdom of " + getarg(0) + " ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of " + getarg(0) + ", this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians that are protecting the guild base and eliminate the Emperium."; + return; +L_Startg: + if (getcharid(2) == @GID) goto L_Startg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of "+ getarg(0) +" ]"; + mes " "; + mes "1. Honoring the ordinance of the"; + mes "Divine Rune Midgard Kingdom of "; + mes getarg(0) +", we approve that this"; + mes "base is in the private possession"; + mes "of the ^ff0000" + GetGuildName(@GID) + "^000000 guild."; + mes " "; + mes "2. The guild master of the"; + mes "^ff0000"+ GetGuildName(@GID) + "^000000 guild, is ^0000FF" + GetGuildMaster(@GID) + "^000000."; + mes "If anyone objects to that, raise your sword to honor yourself."; + return; +L_Startg2: + mes "[ Ringing Voice ]"; + mes "Brave one... would you return to your honorable be?"; + next; + menu "Go back to your Guild Castle.",M_Enter,"Cancel.",-; + return; + + M_Enter: + warp getarg(1)+".gat",getarg(2),getarg(3); + return; +} diff --git a/npc/guild/gldfunc_kafra.txt b/npc/guild/gldfunc_kafra.txt new file mode 100644 index 000000000..f70c62af4 --- /dev/null +++ b/npc/guild/gldfunc_kafra.txt @@ -0,0 +1,37 @@ +//===== eAthena Script ======================================= +//= War of Emperium Kafras Function +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Kafra service for guild members +//====================================== +//= Break down of arguments used in the function: +//= arg(0): name of City. +//= arg(1): name of guild castle. +//= arg(2): x1 coordinate for warp +//= arg(3): y1 coordinate for warp +//===== Additional Comments: ================================= +//= v1.2: All Guild kafra scripts use this function. [kobra_k88] +//============================================================ + +function script F_GKafra { + cutin "kafra_01",2; + set @GID, GetCastleData(getarg(0)+".gat",1); + if (getcharid(2) == @GID) goto L_StartG; + + mes "[Kafra Service]"; + mes "I am here to serve only ^5533FF" + GetGuildName(@GID) + "^000000 members. Please use different Kafra Service. Thank you."; + cutin "",255; + close; +L_StartG: + set @wrpP[0], 0; + set @wrpD$[0], getarg(1); + setarray @wrpC$[0], @wrpD$[0], "Cancel", "", "", "",""; + callfunc "F_Kafra",2; + end; +} diff --git a/npc/guild/gldfunc_manager.txt b/npc/guild/gldfunc_manager.txt new file mode 100644 index 000000000..7b192a96d --- /dev/null +++ b/npc/guild/gldfunc_manager.txt @@ -0,0 +1,429 @@ +//===== eAthena Script ======================================= +//= War of Emperium Guild Manager Function +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2b +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= The Guild Manager allows the Guildmaster to invest in comerce +//= and defense, hire guardians and kafras, go to the treasure room, +//= and surrender the guild castle. +//============================================== +//= Break down of arguments used in the function: +//= arg(0): name of Castle Manager +//= arg(1): name of guild castle. +//= arg(2): x1 coordinate for warp to treasure room +//= arg(3): y1 coordinate for warp to treasure room +//= arg(4): guild script suffix for kafra, gaurdian scripts etc. +//===== Additional Comments: ================================= +//= v1.2: All Guild manager scripts use this function. Optimized +//= Comerce and Defense investment. [kobra_k88] +//= v1.2a Function now returns to script that called it. +//= Added disablenpc line to surrender castle option to remove kafra +//= upon surrender.[kobra_k88] +//= v1.2b U can't surrender the base during WOE [Lupus] +//============================================================ + + + +//============================================== +function script F_GldManager { + + set @GID, GetCastleData(getarg(1)+".gat",1); + if (strcharinfo(0) == getguildmaster(@GID)) goto L_Start; + if (@GID == 0) goto L_NotOwn; + if (getcharid(2) == @GID) goto L_Mem; + +L_NotMem: + mes "[ "+getarg(0)+" ]"; + mes "I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command! Hey! Your not even a part of the guild!!"; + mes "Where are the guardians? Destroy these intruders!"; + return 0; + +L_NotOwn: + mes "[ "+getarg(0)+" ]"; + mes "I am waiting for my master. Brave adventurer, follow your destiny!"; + return 0; + +L_Mem: + mes "[ "+getarg(0)+" ]"; + mes "You're not ^5533FF" + getguildmaster(@GID) + "^000000! I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command only"; + return 0; + +L_Start: + mes "[ "+getarg(0)+" ]"; + mes "Welcome Master ^5533FF" + getguildmaster(@GID) + "^000000 ! I will assist you in any way I can!"; + next; + menu "Guild Base Briefing",M_Base, "Commerce Investment",M_Comrc, "Defence Investment",M_Def, "Guardian Installation",M_Gaurd, + "Kafra Service Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Surrender Guild Base",M_Sur, "Cancel",M_End; + + //======================== + M_Base: + //========= + mes "[ "+getarg(0)+" ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : ^FF3322" + GetCastleData(getarg(1)+".gat",2) + "^000000 points."; + mes "^0000ff - You have invested " + GetCastleData(getarg(1)+".gat",4) + " times today.^000000"; + next; + mes "[ "+getarg(0)+" ]"; + mes "Current Defence Investment is : ^FF3322" + GetCastleData(getarg(1)+".gat",3) + "^000000 points."; + mes "^0000ff- You have invested " + GetCastleData(getarg(1)+".gat",5) + " times today.^000000"; + mes " "; + mes "That is about it."; + return 0; + + //======================== + M_Comrc: + //========= + set @TriggerE,GetCastleData(getarg(1)+".gat",4); + set @Economy,GetCastleData(getarg(1)+".gat",2); + if(@Economy < 8) set @eco_invest,10000; + if(@Economy >= 8) set @eco_invest,20000; + if(@Economy >= 16) set @eco_invest,40000; + if(@Economy >= 25) set @eco_invest,80000; + if(@Economy >= 34) set @eco_invest,160000; + if(@Economy >= 44) set @eco_invest,320000; + if(@Economy >= 54) set @eco_invest,640000; + if(@Economy >= 65) set @eco_invest,1280000; + if(@Economy >= 76) set @eco_invest,2560000; + if(@Economy >= 88) set @eco_invest,5120000; + + mes "[ "+getarg(0)+" ]"; + if(@TriggerE == 2) goto L_MaxTimesC; + if(@Economy >= 100) goto L_MaxInvesC; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods."; + mes "So an investment will be required if you're considering future growth."; + next; + mes "[ "+getarg(0)+" ]"; + if(@TriggerE == 0) mes "You can invest up to two times a day, but the second time costs more"; + if(@TriggerE == 0) mes "The needed investment amount is ^5533FF" + @eco_invest + "^000000 zeny."; + if(@TriggerE == 1) set @eco_invest,@eco_invest*4; + if(@TriggerE == 1) mes "You've already invested once today, but you can invest again at ^5533FF" + @eco_invest + "^000000 Zeny."; + next; + mes "[ "+getarg(0)+" ]"; + mes "Would you like to invest?"; + next; + menu "Invest Commerce.",-,"Cancel.",M_End; + + if(Zeny < @eco_invest) goto sL_NoZenyC; + set Zeny,Zeny-@eco_invest; + SetCastleData getarg(1)+".gat",4,@TriggerE+1; + SetCastleData getarg(1)+".gat",2,@Economy+1; + mes "[ "+getarg(0)+" ]"; + mes "You have invested successfully."; + return 0; + + sL_NoZenyC: + mes "[ "+getarg(0)+" ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + return 0; + L_MaxTimesC: + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + return 0; + L_MaxInvestC: + mes "[ "+getarg(0)+" ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + return 0; + + //========================= + M_Def: + //======== + set @TriggerD,GetCastleData(getarg(1)+".gat",5); + set @Defence,GetCastleData(getarg(1)+".gat",3); + if(@Defence < 8) set @def_invest,20000; + if(@Defence >= 8) set @def_invest,40000; + if(@Defence >= 16) set @def_invest,80000; + if(@Defence >= 25) set @def_invest,160000; + if(@Defence >= 34) set @def_invest,320000; + if(@Defence >= 44) set @def_invest,640000; + if(@Defence >= 54) set @def_invest,1280000; + if(@Defence >= 65) set @def_invest,2560000; + if(@Defence >= 76) set @def_invest,5120000; + if(@Defence >= 88) set @def_invest,10240000; + + mes "[ "+getarg(0)+" ]"; + if(@TriggerD == 2) goto L_MaxTimesD; + if(@Defence >= 100) goto L_MaxInvestD; + mes "If you improve investment of defence, the durability of our Guardians and the Emperium will increase."; + mes "So if you consider our future battles, an investment will be required."; + next; + mes "[ "+getarg(0)+" ]"; + if(@TriggerD == 0) mes "You can invest up to two times a day, but the second time costs more"; + if(@TriggerD == 0) mes "The needed investment amount is ^5533FF" + @def_invest + "^000000 zeny."; + if(@TriggerD == 1) set @def_invest,@def_invest*4; + if(@TriggerD == 1) mes "You've already invested once today, but you can invest again at ^5533FF" + @def_invest + "^000000 Zeny."; + next; + mes "[ "+getarg(0)+" ]"; + mes "Would you like to invest?"; + next; + menu "Invest Defence.",-, "Cancel",M_End; + + if(Zeny < @def_invest) goto sL_NoZenyD; + set Zeny,Zeny-@def_invest; + SetCastleData getarg(1)+".gat",5,@TriggerD+1; + SetCastleData getarg(1)+".gat",3,@Defence+1; + mes "[ "+getarg(0)+" ]"; + mes "You have invested successfully."; + return 0; + + sL_NoZenyD: + mes "[ "+getarg(0)+" ]"; + mes "Master, you do not have enough money to invest in Defence. Defence investment has been cancelled."; + return 0; + L_MaxTimesD: + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + return 0; + L_MaxInvestD: + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + return 0; + + //========================= + M_Gaurd: + //========= + if (getgdskilllv(@GID,10002) == 0) goto L_NoSkGuard; + set @Defence,GetCastleData(getarg(1)+".gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ "+getarg(0)+" ]"; + mes "Would you like to install a guardian? Guardians will protect the guild base from enemies."; + mes "Please choose a guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 + "/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 + "/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData(getarg(1)+".gat",10) == 1) goto L_GotGuard; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData(getarg(1)+".gat",11) == 1) goto L_GotGuard; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData(getarg(1)+".gat",12) == 1) goto L_GotGuard; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData(getarg(1)+".gat",13) == 1) goto L_GotGuard; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData(getarg(1)+".gat",14) == 1) goto L_GotGuard; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData(getarg(1)+".gat",15) == 1) goto L_GotGuard; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData(getarg(1)+".gat",16) == 1) goto L_GotGuard; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData(getarg(1)+".gat",17) == 1) goto L_GotGuard; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + L4_9: + mes "[ "+getarg(0)+" ]"; + mes "Would you really like to install a guardian? You need ^5533FF10,000 zeny^000000 to install one...."; + next; + menu "Install",-, "Cancel",M_End; + + if (Zeny < 10000) goto sL_NoZenyG; + set Zeny,Zeny-10000; + SetCastleData getarg(1)+".gat",@GDnum,1; + SetCastleData getarg(1)+".gat",@GDnum2,@GuardianHP; + return 1; + + sL_NoZenyG: + mes "[ "+getarg(0)+" ]"; + mes "I'm sorry Master, but you do not have enough zeny for a Guardian."; + return 0; + L_NoSkGuard: + mes "[ "+getarg(0)+" ]"; + mes "I'm sorry Master but you cannot install any guardians right now. Your guild must learn the Guild skill ^5533FFGuardian Research^000000 first."; + mes "Guardian Installation has been cancelled."; + return 0; + L_GotGuard: + mes "[ "+getarg(0)+" ]"; + mes "Excuse me Master, but that guardian has already been installed....."; + emotion 4; + return 0; + + //=========================== + M_Kaf: + //====== + mes "[ "+getarg(0)+" ]"; + if (GetCastleData(getarg(1)+".gat",9) == 1) goto L_Dismiss; + if (getgdskilllv(@GID,10001) == 0) goto L_NoSkKaf; + + L_Hire: + mes "Would you like to employ the services of a Kafra? You will need ^5533FF10,000 Zeny^000000 to do so... "; + next; + menu "Employ Kafra.",-,"Cancel",sM_KafEnd; + + mes "[ "+getarg(0)+" ]"; + if (Zeny < 10000) goto sL_NoZenyK; + set Zeny,Zeny-10000; + enablenpc "Kafra Service#"+getarg(4); + SetCastleData getarg(1)+".gat",9,1; + mes "You have created a contract with the Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I'm here to provide you with helpful service! I'll do the best I can to serve you."; + next; + cutin "kafra_01",255; + mes "[ "+getarg(0)+" ]"; + mes "Your employment contract lasts ^5533FF1 month^000000. After this term is over you will have to create a new contract."; + mes "I think the Kafra Service will benefit our guild members."; + return 0; + + sL_NoZenyK: + mes "Master, you do not have enough money to employ a Kafra. Employment has been cancelled."; + return 0; + sM_KafEnd: + mes "[ "+getarg(0)+" ]"; + mes "As you wish Master. But I suggest we get a Kafra as soon as possible!"; + return 0; + + L_Dismiss: + mes "Would you like to dismiss the current Kafra?"; + next; + menu "Dismissal",-,"Cancel",sM_KafEnd2; + + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I done anything wrong? If I did, will you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",ssM_KafEnd2; + + mes "[ Kafra Service ]"; + mes "It's unfortunate that I won't be able to serve your guild anymore...."; + next; + disablenpc "Kafra Service#"+getarg(4); + SetCastleData getarg(1)+".gat",9,0; + cutin "kafra_01",255; + mes "[ "+getarg(0)+" ]"; + mes "The Kafra has been dismissed. But... we should really get a Kafra as soon as possible!"; + return 0; + ssM_KafEnd2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + return 0; + sM_KafEnd2: + mes "[ "+getarg(0)+" ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + return 0; + + L_NoSkKaf: + mes "Master, you don't have a contract with the Kafra Service Company."; + mes "In order to hire a Kafra, you must first learn the Guild skill ^5533FFContract With Kafra^000000."; + return 0; + + //========================= + M_Treas: + //======== + mes "[ "+getarg(0)+" ]"; + mes "Would you to go to our Treasure Room? Only you, the Guild Master, are allowed to enter this room."; + next; + menu "Enter Treasure room.",-,"Cancel",sM_TresEnd; + + mes "[ "+getarg(0)+" ]"; + mes "Please follow me through the secret passage way."; + mes "You must pull down on the secret switch in order to get out."; + next; + warp getarg(1)+".gat",getarg(2),getarg(3); + return 0; + sM_TresEnd: + mes "[ "+getarg(0)+" ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + return 0; + + //========================== + M_Sur: + //======= + mes "[ "+getarg(0)+" ]"; + emotion 19; + if(agitcheck(0) == 0) goto L_No_WOE; + mes "Master.... don't you know that we can't give up this guild base during the War Of Emperium?!!"; + close; + return 0; + L_No_WOE: + mes "Master.... Do you really want to give up this guild base?? It is not worth it master!!! Please reconsider, master!!"; + + next; + menu "Surrender Guild Base",-, "Cancel",sM_SurEnd; + + mes "[ "+getarg(0)+" ]"; + mes "Master, please reconsider...!!"; + emotion 16; + next; + menu "Surrender Guild Base",-, "Cancel",sM_SurEnd; + + mes "[ "+getarg(0)+" ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + disablenpc "Kafra Service#"+getarg(4); + set @i, 0; + L_Loop: + set @i, @i + 1; + SetCastleData getarg(1)+".gat",@i,0; + if(@i < 25) goto L_Loop; + + Announce "[" + GetGuildName(@GID) + "] has surrendered the Guild Castle [" + GetCastleName(getarg(1)+".gat") + "]",0; + MapRespawnGuildID getarg(1)+".gat",GetCastleData(getarg(1)+".gat",1),7; + return 0; + sM_SurEnd: + mes "[ "+getarg(0)+" ]"; + mes "I knew it master!! Please, don't scare me like that again."; + emotion 33; + return 0; + + //========================== + M_End: + //======= + mes "[ "+getarg(0)+" ]"; + mes "As you wish, master."; + return 0; +} diff --git a/npc/guild/gldfunc_treasure.txt b/npc/guild/gldfunc_treasure.txt new file mode 100644 index 000000000..2e6b85b07 --- /dev/null +++ b/npc/guild/gldfunc_treasure.txt @@ -0,0 +1,78 @@ +//===== eAthena Script ======================================= +//= War of Emperium Guild Treasure Room Functions +//===== By: ================================================== +//= holyAngelX (1.0) +//= 1.1 by Akaru and ho|yAnge|X +//===== Current Version: ===================================== +//= 1.2b +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= F_GldTreas spawns treasure chests used by the guild master. +//= F_GldTreasSw allows the player to get out of the treasure room. +//============================================== +//= Break down of arguments used in the F_GldTreas: +//= arg(0): name of guild castle +//= arg(1): name of script that called the function +//= arg(2): $variable for number of boxes to spawn for specific castle +//= arg(2): $variable to be used as a counter +//= arg(4): $variable for box/monster id number. +//= arg(5): box/monster id# +//= arg(6): x1 coordinate for areamonster call +//= arg(7): y1 coordinate for areamonster call +//= arg(8): x2 coordinate for areamonster call +//= arg(9): y1 coordinate for areamonster call +//= arg(10): +//= Break down of arguments used in the F_GldTreasSw: +//= arg(0): name of guild castle. +//= arg(1): x1 coordinate for warp back to guild castle +//= arg(2): y1 coordinate for warp back to guild castle +//===== Additional Comments: ================================= +//= v1.2 Treasure room Spawn, and Treasure room Switch scripts now use these functions.[kobra_k88] +//= v1.2a Function now returns to script that called it. Removed TreasureSpawn2. +//= Changed back to using specific global variables for number of boxes and the box id. [kobra_k88] +//= v1.2b Added a check to allow un broken treasure chests to respawn after map server restart.[kobra_k88] +//============================================================ + + +//================================================ +// Treasure Spawning Script +//================================================ + +function script F_GldTreas { + + if(getarg(10) == 1) goto TreasureSpawn; + SetCastleData getarg(0)+".gat",4,0; + SetCastleData getarg(0)+".gat",5,0; + KillMonster getarg(0)+".gat","Treasure_"+getarg(1)+"::OnDied"; + if (GetCastleData(getarg(0)+".gat",2) > 100) return; + if (GetCastleData(getarg(0)+".gat",1) == 0) return; + set getarg(2),GetCastleData(getarg(0)+".gat",2)/5+4; + if (getarg(2) <= 0) return; + set getarg(3), getarg(2); //sets the counter variable = to the box number amount + +TreasureSpawn: + set getarg(4), getarg(5); //sets the box id variable = to the box id + set $@temp, rand(4); + if ($@temp > 2) set getarg(4), getarg(4) + 1; + areamonster getarg(0)+".gat",getarg(6),getarg(7),getarg(8),getarg(9),"Treasure Chest",getarg(4),1,"Treasure_"+getarg(1)+"::OnDied"; + set getarg(3), getarg(3) - 1; + if(getarg(3) > 0) goto TreasureSpawn; + return; +} + +//============================================================== +// Treasure Room Switch +//=============================================================== +function script F_GldTreasSw { + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",M_1,"No",-; + close; + + M_1: + warp getarg(0)+".gat",getarg(1),getarg(2); + return; +} diff --git a/npc/guild/nguild/nguild_dunsw.txt b/npc/guild/nguild/nguild_dunsw.txt new file mode 100644 index 000000000..8e8b779fc --- /dev/null +++ b/npc/guild/nguild/nguild_dunsw.txt @@ -0,0 +1,39 @@ +//===== eAthena Script ======================================= +//= War of Emperium Dungeon Switch for NGuild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Switch that warps guild members to the guild dungeon +//===== Additional Comments: ================================= +//Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] +//============================================================ + + +// Castle 1 =============================================== +nguild_alde.gat,212,181,0 script Switch#DunN01 111,{ + callfunc "F_GldDunSw","nguild_alde","02",32,122; + close; +} + +// Castle 2 =============================================== +nguild_gef.gat,78,84,0 script Switch#DunN02 111,{ + callfunc "F_GldDunSw","nguild_gef","04",39,258; + close; +} + +// Castle 3 =============================================== +nguild_pay.gat,101,25,0 script Switch#DunN03 111,{ + callfunc "F_GldDunSw","nguild_pay","01",186,165; + close; +} + +// Castle 4 =============================================== +nguild_prt.gat,94,200,0 script Switch#DunN04 111,{ + callfunc "F_GldDunSw","nguild_prt","03",28,251; + close; +} diff --git a/npc/guild/nguild/nguild_ev_agit.txt b/npc/guild/nguild/nguild_ev_agit.txt new file mode 100644 index 000000000..75d2c1990 --- /dev/null +++ b/npc/guild/nguild/nguild_ev_agit.txt @@ -0,0 +1,107 @@ +//===== eAthena Script ======================================= +//= War of Emperium - NGuild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers for NGuild Wars +//===== Additional Comments: ================================= +// Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================================ +nguild_alde.gat,0,0,0 script Agit_N01 -1,{ +OnInterIfInit: + GetCastleData "nguild_alde.gat",0,"::OnRecvCastleN01"; + end; +OnRecvCastleN01: + RequestGuildInfo GetCastleData("nguild_alde.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","nguild_alde","N01",216,24; + end; +OnAgitBreak: + callfunc "F_AgitBreak","nguild_alde","N01"; + end; +OnAgitEliminate: + MapRespawnGuildID "nguild_alde.gat",GetCastleData("nguild_alde.gat",1),6; + Monster "nguild_alde.gat",216,24,"EMPERIUM",1288,1,"Agit_N01::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","nguild_alde","N01"; + end; +} + +// Castle 2 ================================================================ +nguild_gef.gat,0,0,0 script Agit_N02 -1,{ +OnInterIfInit: + GetCastleData "nguild_gef.gat",0,"::OnRecvCastleN02"; + end; +OnRecvCastleN02: + RequestGuildInfo GetCastleData("nguild_gef.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","nguild_gef","N02",198,182; + end; +OnAgitBreak: + callfunc "F_AgitBreak","nguild_gef","N02"; + end; +OnAgitEliminate: + MapRespawnGuildID "nguild_gef.gat",GetCastleData("nguild_gef.gat",1),6; + Monster "nguild_gef.gat",198,182,"EMPERIUM",1288,1,"Agit_N02::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","nguild_gef","N02"; + end; +} + +// Castle 3 ================================================================ +nguild_pay.gat,0,0,0 script Agit_N03 -1,{ +OnInterIfInit: + GetCastleData "nguild_pay.gat",0,"::OnRecvCastleN03"; + end; +OnRecvCastleN03: + RequestGuildInfo GetCastleData("nguild_pay.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","nguild_pay","N03",139,139; + end; +OnAgitBreak: + callfunc "F_AgitBreak","nguild_pay","N03"; + end; +OnAgitEliminate: + MapRespawnGuildID "nguild_pay.gat",GetCastleData("nguild_pay.gat",1),6; + Monster "nguild_pay.gat",139,139,"EMPERIUM",1288,1,"Agit_N03::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","nguild_pay","N03"; + end; +} + +// Castle 4 ================================================================ +nguild_prt.gat,0,0,0 script Agit_N04 -1,{ +OnInterIfInit: + GetCastleData "nguild_prt.gat",0,"::OnRecvCastleN04"; + end; +OnRecvCastleN04: + RequestGuildInfo GetCastleData("nguild_prt.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","nguild_prt","N04",197,197; + end; +OnAgitBreak: + callfunc "F_AgitBreak","nguild_prt","N04"; + end; +OnAgitEliminate: + MapRespawnGuildID "nguild_prt.gat",GetCastleData("nguild_prt.gat",1),6; + Monster "nguild_prt.gat",197,197,"EMPERIUM",1288,1,"Agit_N04::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","nguild_prt","N04"; + end; +} diff --git a/npc/guild/nguild/nguild_flags.txt b/npc/guild/nguild/nguild_flags.txt new file mode 100644 index 000000000..7536bb2ac --- /dev/null +++ b/npc/guild/nguild/nguild_flags.txt @@ -0,0 +1,113 @@ +//===== eAthena Script ======================================= +//= War of Emperium N Guild Flags +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= WoE flag scripts. Display guild emblems on flags. +//===== Additional Comments: ================================= +// Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] +//============================================================ + + +//============================================================================// +// Castle 1 +//============================================================================// +n_castle.gat,110,96,1 script NGuild Aldebaran#a1-1::NGuildAlde 722,{ + callfunc "F_Flags","Al De Baran","nguild_alde",218,170; + close; + +OnRecvCastleN01: + FlagEmblem GetCastleData("nguild_alde.gat",1); + end; +} +// In Castle ============================================ +nguild_alde.gat,30,248,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-6 722 +nguild_alde.gat,30,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-7 722 +nguild_alde.gat,37,248,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-8 722 +nguild_alde.gat,37,246,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-9 722 +nguild_alde.gat,95,80,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-10 722 +nguild_alde.gat,95,59,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-11 722 +nguild_alde.gat,62,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-12 722 +nguild_alde.gat,70,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-13 722 +nguild_alde.gat,74,75,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-14 722 +nguild_alde.gat,62,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-15 722 +nguild_alde.gat,66,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-16 722 +nguild_alde.gat,70,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-17 722 +nguild_alde.gat,74,64,2 duplicate(NGuildAlde) NGuild Aldebaran#a1-18 722 +nguild_alde.gat,203,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-19 722 +nguild_alde.gat,210,150,4 duplicate(NGuildAlde) NGuild Aldebaran#a1-20 722 + + + + +//============================================================================// +// Castle 2 +//============================================================================// +n_castle.gat,110,109,3 script NGuild Geffen#g1-1::NGuildGef 722,{ + callfunc "F_Flags","Geffen","nguild_gef",83,47; + close; + +OnRecvCastleN02: + FlagEmblem GetCastleData("nguild_gef.gat",1); + end; +} +// In Castle ============================================= +nguild_gef.gat,28,157,4 duplicate(NGuildGef) NGuild Geffen#g1-6 722 +nguild_gef.gat,32,157,4 duplicate(NGuildGef) NGuild Geffen#g1-7 722 +nguild_gef.gat,22,156,5 duplicate(NGuildGef) NGuild Geffen#g1-8 722 +nguild_gef.gat,68,185,3 duplicate(NGuildGef) NGuild Geffen#g1-9 722 +nguild_gef.gat,17,171,5 duplicate(NGuildGef) NGuild Geffen#g1-10 722 +nguild_gef.gat,59,16,4 duplicate(NGuildGef) NGuild Geffen#g1-11 722 +nguild_gef.gat,64,16,4 duplicate(NGuildGef) NGuild Geffen#g1-12 722 + + + +//============================================================================// +// Castle 3 +//============================================================================// +n_castle.gat,94,109,5 script NGuild Payon#f1-1::NGuildPay 722,{ + callfunc "F_Flags","Payon","nguild_pay",87,29; + close; + +OnRecvCastleN03: + FlagEmblem GetCastleData("nguild_pay.gat",1); + end; +} +// In Castle =============================================== +nguild_pay.gat,238,67,4 duplicate(NGuildPay) NGuild Payon#f1-6 722 +nguild_pay.gat,233,67,4 duplicate(NGuildPay) NGuild Payon#f1-7 722 +nguild_pay.gat,221,123,4 duplicate(NGuildPay) NGuild Payon#f1-8 722 +nguild_pay.gat,221,116,4 duplicate(NGuildPay) NGuild Payon#f1-9 722 +nguild_pay.gat,206,108,4 duplicate(NGuildPay) NGuild Payon#f1-10 722 +nguild_pay.gat,212,108,4 duplicate(NGuildPay) NGuild Payon#f1-11 722 + + + + +//=============================================================================// +// Castle 4 +//=============================================================================// +n_castle.gat,94,96,7 script NGuild Prontera#p1-1::NGuildPrt 722,{ + callfunc "F_Flags","Prontera","nguild_prt",97,174; + close; + +OnRecvCastleN04: + FlagEmblem GetCastleData("nguild_prt.gat",1); + end; +} +// In Castle ============================================= +nguild_prt.gat,58,56,4 duplicate(NGuildPrt) NGuild Prontera#p1-7 722 +nguild_prt.gat,64,56,4 duplicate(NGuildPrt) NGuild Prontera#p1-8 722 +nguild_prt.gat,76,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-9 722 +nguild_prt.gat,84,32,4 duplicate(NGuildPrt) NGuild Prontera#p1-10 722 +nguild_prt.gat,94,39,4 duplicate(NGuildPrt) NGuild Prontera#p1-11 722 +nguild_prt.gat,94,24,4 duplicate(NGuildPrt) NGuild Prontera#p1-12 722 +nguild_prt.gat,73,14,4 duplicate(NGuildPrt) NGuild Prontera#p1-13 722 +nguild_prt.gat,73,6,4 duplicate(NGuildPrt) NGuild Prontera#p1-14 722 +nguild_prt.gat,55,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-15 722 +nguild_prt.gat,45,46,4 duplicate(NGuildPrt) NGuild Prontera#p1-16 722 diff --git a/npc/guild/nguild/nguild_guardians.txt b/npc/guild/nguild/nguild_guardians.txt new file mode 100644 index 000000000..bed162100 --- /dev/null +++ b/npc/guild/nguild/nguild_guardians.txt @@ -0,0 +1,91 @@ +//===== eAthena Script ======================================= +//= War of Emperium - nguild guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Re-spawns guardians on server start if they have been +//= purchased. Also announces when a guardian dies. +//===== Additional Comments: ================================= +//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] +//============================================================ + + +//------------------------------------------------------------------------------ +nguild_alde.gat,216,24,0 script Guardian_N01 -1,{ +OnAgitInit: + if (GetCastleData("nguild_alde.gat",10) == 1) guardian "nguild_alde.gat",18,219,"Soldier Guardian",1287,1,"Guardian_N01::OnGuardianDied",0; + if (GetCastleData("nguild_alde.gat",11) == 1) guardian "nguild_alde.gat",117,42,"Soldier Guardian",1287,1,"Guardian_N01::OnGuardianDied",1; + if (GetCastleData("nguild_alde.gat",12) == 1) guardian "nguild_alde.gat",207,153,"Soldier Guardian",1287,1,"Guardian_N01::OnGuardianDied",2; + if (GetCastleData("nguild_alde.gat",13) == 1) guardian "nguild_alde.gat",68,70,"Archer Guardian",1285,1,"Guardian_N01::OnGuardianDied",3; + if (GetCastleData("nguild_alde.gat",14) == 1) guardian "nguild_alde.gat",187,140,"Archer Guardian",1285,1,"Guardian_N01::OnGuardianDied",4; + if (GetCastleData("nguild_alde.gat",15) == 1) guardian "nguild_alde.gat",62,204,"Knight Guardian",1286,1,"Guardian_N01::OnGuardianDied",5; + if (GetCastleData("nguild_alde.gat",16) == 1) guardian "nguild_alde.gat",113,100,"Knight Guardian",1286,1,"Guardian_N01::OnGuardianDied",6; + if (GetCastleData("nguild_alde.gat",17) == 1) guardian "nguild_alde.gat",211,174,"Knight Guardian",1286,1,"Guardian_N01::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "nguild_alde.gat","A Guardian Has Fallen",17; + end; +} + +//------------------------------------------------------------------------------ +nguild_gef.gat,198,182,0 script Guardian_N02 -1,{ +OnAgitInit: + if (GetCastleData("nguild_gef.gat",10) == 1) guardian "nguild_gef.gat",30,178,"Soldier Guardian",1287,1,"Guardian_N02::OnGuardianDied",0; + if (GetCastleData("nguild_gef.gat",11) == 1) guardian "nguild_gef.gat",64,180,"Soldier Guardian",1287,1,"Guardian_N02::OnGuardianDied",1; + if (GetCastleData("nguild_gef.gat",12) == 1) guardian "nguild_gef.gat",61,25,"Soldier Guardian",1287,1,"Guardian_N02::OnGuardianDied",2; + if (GetCastleData("nguild_gef.gat",13) == 1) guardian "nguild_gef.gat",61,44,"Archer Guardian",1285,1,"Guardian_N02::OnGuardianDied",3; + if (GetCastleData("nguild_gef.gat",14) == 1) guardian "nguild_gef.gat",189,43,"Archer Guardian",1285,1,"Guardian_N02::OnGuardianDied",4; + if (GetCastleData("nguild_gef.gat",15) == 1) guardian "nguild_gef.gat",51,192,"Knight Guardian",1286,1,"Guardian_N02::OnGuardianDied",5; + if (GetCastleData("nguild_gef.gat",16) == 1) guardian "nguild_gef.gat",49,67,"Knight Guardian",1286,1,"Guardian_N02::OnGuardianDied",6; + if (GetCastleData("nguild_gef.gat",17) == 1) guardian "nguild_gef.gat",181,14,"Knight Guardian",1286,1,"Guardian_N02::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "nguild_gef.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +nguild_pay.gat,139,139,0 script Guardian_N03 -1,{ +OnAgitInit: + if (GetCastleData("nguild_pay.gat",10) == 1) guardian "nguild_pay.gat",210,120,"Soldier Guardian",1287,1,"Guardian_N03::OnGuardianDied",0; + if (GetCastleData("nguild_pay.gat",11) == 1) guardian "nguild_pay.gat",69,26,"Soldier Guardian",1287,1,"Guardian_N03::OnGuardianDied",1; + if (GetCastleData("nguild_pay.gat",12) == 1) guardian "nguild_pay.gat",23,141,"Soldier Guardian",1287,1,"Guardian_N03::OnGuardianDied",2; + if (GetCastleData("nguild_pay.gat",13) == 1) guardian "nguild_pay.gat",224,87,"Archer Guardian",1285,1,"Guardian_N03::OnGuardianDied",3; + if (GetCastleData("nguild_pay.gat",14) == 1) guardian "nguild_pay.gat",81,45,"Archer Guardian",1285,1,"Guardian_N03::OnGuardianDied",4; + if (GetCastleData("nguild_pay.gat",15) == 1) guardian "nguild_pay.gat",214,53,"Knight Guardian",1286,1,"Guardian_N03::OnGuardianDied",5; + if (GetCastleData("nguild_pay.gat",16) == 1) guardian "nguild_pay.gat",69,26,"Knight Guardian",1286,1,"Guardian_N03::OnGuardianDied",6; + if (GetCastleData("nguild_pay.gat",17) == 1) guardian "nguild_pay.gat",23,141,"Knight Guardian",1286,1,"Guardian_N03::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "nguild_pay.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +nguild_prt.gat,197,197,0 script Guardian_N04 -1,{ +OnAgitInit: + if (GetCastleData("nguild_prt.gat",10) == 1) guardian "nguild_prt.gat",196,92,"Soldier Guardian",1287,1,"Guardian_N04::OnGuardianDied",0; + if (GetCastleData("nguild_prt.gat",11) == 1) guardian "nguild_prt.gat",113,200,"Soldier Guardian",1287,1,"Guardian_N04::OnGuardianDied",1; + if (GetCastleData("nguild_prt.gat",12) == 1) guardian "nguild_prt.gat",111,186,"Soldier Guardian",1287,1,"Guardian_N04::OnGuardianDied",2; + if (GetCastleData("nguild_prt.gat",13) == 1) guardian "nguild_prt.gat",76,202,"Archer Guardian",1285,1,"Guardian_N04::OnGuardianDied",3; + if (GetCastleData("nguild_prt.gat",14) == 1) guardian "nguild_prt.gat",90,26,"Archer Guardian",1285,1,"Guardian_N04::OnGuardianDied",4; + if (GetCastleData("nguild_prt.gat",15) == 1) guardian "nguild_prt.gat",58,59,"Knight Guardian",1286,1,"Guardian_N04::OnGuardianDied",5; + if (GetCastleData("nguild_prt.gat",16) == 1) guardian "nguild_prt.gat",112,200,"Knight Guardian",1286,1,"Guardian_N04::OnGuardianDied",6; + if (GetCastleData("nguild_prt.gat",17) == 1) guardian "nguild_prt.gat",101,194,"Knight Guardian",1286,1,"Guardian_N04::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "nguild_prt.gat","A Guardian Has Fallen",17; + end; +} diff --git a/npc/guild/nguild/nguild_kafras.txt b/npc/guild/nguild/nguild_kafras.txt new file mode 100644 index 000000000..b5d6b2d3a --- /dev/null +++ b/npc/guild/nguild/nguild_kafras.txt @@ -0,0 +1,53 @@ +//===== eAthena Script ======================================= +//= War of Emperium Kafras for N Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Provides Kafra services for guild members of NGuild Castles. +//= Used in conjuction with function F_Kafra. +//===== Additional Comments: ================================= +//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] +//============================================================ + + +// Castle 1 =============================================== +nguild_alde.gat,218,170,0 script Kafra Service#N01 117,{ + callfunc "F_GKafra", "nguild_alde", "Al De Baran"; + end; +OnRecvCastleN01: + if (GetCastleData("nguild_alde.gat",9) < 1) disablenpc "Kafra Service#N01"; + end; +} + +// Castle 2 =============================================== +//nguild_gef,96,173,0 script Kafra Service#N02 117,{ +nguild_gef.gat,35,37,0 script Kafra Service#N02 117,{ + callfunc "F_GKafra", "nguild_gef", "Geffen"; + end; +OnRecvCastleN02: + if (GetCastleData("nguild_gef.gat",9) < 1) disablenpc "Kafra Service#N02"; + end; +} + +// Castle 3 =============================================== +nguild_pay.gat,128,58,3 script Kafra Service#N03 117,{ + callfunc "F_GKafra", "nguild_pay", "Payon"; + end; +OnRecvCastleN03: + if (GetCastleData("nguild_pay.gat",9) < 1) disablenpc "Kafra Service#N03"; + end; +} + +// Castle 4 =============================================== +nguild_prt.gat,96,173,0 script Kafra Service#N04 117,{ + callfunc "F_GKafra", "nguild_prt", "Prontera"; + end; +OnRecvCastleN04: + if (GetCastleData("nguild_prt.gat",9) < 1) disablenpc "Kafra Service#N04"; + end; +} diff --git a/npc/guild/nguild/nguild_managers.txt b/npc/guild/nguild/nguild_managers.txt new file mode 100644 index 000000000..81377c95d --- /dev/null +++ b/npc/guild/nguild/nguild_managers.txt @@ -0,0 +1,86 @@ +//===== eAthena Script ======================================= +//= War of Emperium Managers for N Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Based off existing guild scripts. Do not know if it is accurate.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================================================== +nguild_alde.gat,218,175,0 script Frolo 55,{ + if(callfunc("F_GldManager","Frolo","nguild_alde",119,223,"N01") == 0) close; + + if(@GDnum==10) guardian "nguild_alde.gat",18,219,"Soldier Guardian",1287,1,"Guardian_N01::OnGuardianDied",0; + if(@GDnum==11) guardian "nguild_alde.gat",117,42,"Soldier Guardian",1287,1,"Guardian_N01::OnGuardianDied",1; + if(@GDnum==12) guardian "nguild_alde.gat",207,153,"Soldier Guardian",1287,1,"Guardian_N01::OnGuardianDied",2; + if(@GDnum==13) guardian "nguild_alde.gat",68,70,"Archer Guardian",1285,1,"Guardian_N01::OnGuardianDied",3; + if(@GDnum==14) guardian "nguild_alde.gat",187,140,"Archer Guardian",1285,1,"Guardian_N01::OnGuardianDied",4; + if(@GDnum==15) guardian "nguild_alde.gat",62,204,"Knight Guardian",1286,1,"Guardian_N01::OnGuardianDied",5; + if(@GDnum==16) guardian "nguild_alde.gat",113,100,"Knight Guardian",1286,1,"Guardian_N01::OnGuardianDied",6; + if(@GDnum==17) guardian "nguild_alde.gat",211,174,"Knight Guardian",1286,1,"Guardian_N01::OnGuardianDied",7; + mes "[Arl Fredo]"; + mes "Guardian has been installed, the guardian will protect our guild base against enemies."; + close; +} + + +// Castle 2 ================================================================================== +nguild_gef.gat,40,48,5 script Leiber 55,{ + if(callfunc("F_GldManager","Leiber","nguild_gef",155,112,"N02") == 0) close; + + if(@GDnum==10) guardian "nguild_gef.gat",30,178,"Soldier Guardian",1287,1,"Guardian_N02::OnGuardianDied",0; + if(@GDnum==11) guardian "nguild_gef.gat",64,180,"Soldier Guardian",1287,1,"Guardian_N02::OnGuardianDied",1; + if(@GDnum==12) guardian "nguild_gef.gat",61,25,"Soldier Guardian",1287,1,"Guardian_N02::OnGuardianDied",2; + if(@GDnum==13) guardian "nguild_gef.gat",61,44,"Archer Guardian",1285,1,"Guardian_N02::OnGuardianDied",3; + if(@GDnum==14) guardian "nguild_gef.gat",189,43,"Archer Guardian",1285,1,"Guardian_N02::OnGuardianDied",4; + if(@GDnum==15) guardian "nguild_gef.gat",51,192,"Knight Guardian",1286,1,"Guardian_N02::OnGuardianDied",5; + if(@GDnum==16) guardian "nguild_gef.gat",49,67,"Knight Guardian",1286,1,"Guardian_N02::OnGuardianDied",6; + if(@GDnum==17) guardian "nguild_gef.gat",181,14,"Knight Guardian",1286,1,"Guardian_N02::OnGuardianDied",7; + mes "[ Gnaucher ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 3 ================================================================================== +nguild_pay.gat,120,58,4 script Dundar 55,{ + if(callfunc("F_GldManager","Dundar","nguild_pay",290,7,"N03") == 0) close; + + if(@GDnum==10) guardian "nguild_pay.gat",210,120,"Soldier Guardian",1287,1,"Guardian_N03::OnGuardianDied",0; + if(@GDnum==11) guardian "nguild_pay.gat",69,26,"Soldier Guardian",1287,1,"Guardian_N03::OnGuardianDied",1; + if(@GDnum==12) guardian "nguild_pay.gat",23,141,"Soldier Guardian",1287,1,"Guardian_N03::OnGuardianDied",2; + if(@GDnum==13) guardian "nguild_pay.gat",224,87,"Archer Guardian",1285,1,"Guardian_N03::OnGuardianDied",3; + if(@GDnum==14) guardian "nguild_pay.gat",81,45,"Archer Guardian",1285,1,"Guardian_N03::OnGuardianDied",4; + if(@GDnum==15) guardian "nguild_pay.gat",214,53,"Knight Guardian",1286,1,"Guardian_N03::OnGuardianDied",5; + if(@GDnum==16) guardian "nguild_pay.gat",69,26,"Knight Guardian",1286,1,"Guardian_N03::OnGuardianDied",6; + if(@GDnum==17) guardian "nguild_pay.gat",23,141,"Knight Guardian",1286,1,"Guardian_N03::OnGuardianDied",7; + mes "[ Grunday ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 4 ================================================================================== +nguild_prt.gat,112,181,0 script Thefton 55,{ + if(callfunc("F_GldManager","Thefton","nguild_prt",15,209,"N04") == 0) close; + + if(@GDnum==10) guardian "nguild_prt.gat",196,92,"Soldier Guardian",1287,1,"Guardian_N04::OnGuardianDied",0; + if(@GDnum==11) guardian "nguild_prt.gat",113,200,"Soldier Guardian",1287,1,"Guardian_N04::OnGuardianDied",1; + if(@GDnum==12) guardian "nguild_prt.gat",111,186,"Soldier Guardian",1287,1,"Guardian_N04::OnGuardianDied",2; + if(@GDnum==13) guardian "nguild_prt.gat",76,202,"Archer Guardian",1285,1,"Guardian_N04::OnGuardianDied",3; + if(@GDnum==14) guardian "nguild_prt.gat",90,26,"Archer Guardian",1285,1,"Guardian_N04::OnGuardianDied",4; + if(@GDnum==15) guardian "nguild_prt.gat",58,59,"Knight Guardian",1286,1,"Guardian_N04::OnGuardianDied",5; + if(@GDnum==16) guardian "nguild_prt.gat",112,200,"Knight Guardian",1286,1,"Guardian_N04::OnGuardianDied",6; + if(@GDnum==17) guardian "nguild_prt.gat",101,194,"Knight Guardian",1286,1,"Guardian_N04::OnGuardianDied",7; + mes "[ Abrai ]"; + mes "Guardian has been installed, the guardian will protect our guild base against enemies."; + close; +} diff --git a/npc/guild/nguild/nguild_treas.txt b/npc/guild/nguild/nguild_treas.txt new file mode 100644 index 000000000..f71f8368f --- /dev/null +++ b/npc/guild/nguild/nguild_treas.txt @@ -0,0 +1,117 @@ +//===== eAthena Script ======================================= +//= War of Emperium Treasure Rooms for Al De Baran Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//<=============================== Castle 1 =================================>\\ + +// Treasure Spawn ----------------------- +nguild_alde.gat,1,1,1 script Treasure_N01 -1,{ + +OnRecvCastleN01: + if($boxNumN01 == 0) end; + set $@bxN01, $boxNumN01; + callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,1; + end; +OnClock1200: + callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,0; + end; +OnDied: + mapannounce "nguild_alde.gat","Treasure Chest Broken Open",17; + set $boxNumN01, $boxNumN01 -1; + if($boxNumN01 == 0) mapannounce "nguild_alde.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch -------------------- +nguild_alde.gat,123,223,0 script Switch#TresN01 111,{ + callfunc "F_GldTreasSw", "nguild_alde",218,176; + end; +} + +//<================================ Castle 2 ================================>\\ + +// Treasure Spawn ---------------------------- +nguild_gef.gat,1,1,1 script Treasure_N02 -1,{ + +OnRecvCastleN02: + if($boxNumN02 == 0) end; + set $@bxN02, $boxNumN02; + callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,1; + end; +OnClock1200: + callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,0; + end; +OnDied: + mapannounce "nguild_gef.gat","Treasure Chest Broken Open",17; + set $boxNumN02, $boxNumN02 -1; + if($boxNumN02 == 0) mapannounce "nguild_gef.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Room Switch --------------------------------------------------------- +nguild_gef.gat,152,117,0 script Switch#TresN02 111,{ + callfunc "F_GldTreasSw","nguild_gef",40,49; + end; +} + +//<================================ Castle 3 ================================>\\ + +// Treasure Spawn --------------------------- +nguild_pay.gat,1,1,0 script Treasure_N03 -1,{ +OnRecvCastleN03: + if($boxNumN03 == 0) end; + set $@bxN03, $boxNumN03; + callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,1; + end; +OnClock1200: + callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,0; + end; +OnDied: + mapannounce "nguild_pay.gat","Treasure Chest Broken Open",17; + set $boxNumN03, $boxNumN03 -1; + if($boxNumN03 == 0) mapannounce "nguild_pay.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch --------------------------------------------------- +nguild_pay.gat,295,8,0 script Switch#TresN03 111,{ + callfunc "F_GldTreasSw", "nguild_pay",120,59; + end; +} + +//<================================ Castle 4 ================================>\\ + +// Treasure Spawn ------------------------------- +nguild_prt.gat,1,1,0 script Treasure_N04 -1,{ +OnRecvCastleN04: + if($boxNumN04 == 0) end; + set $@bxN04, $boxNumN04; + callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,1; + end; +OnClock1200: + callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,0; + end; +OnDied: + mapannounce "nguild_prt.gat","Treasure Chest Broken Open",17; + set $boxNumN04, $boxNumN04 -1; + if($boxNumN04 == 0) mapannounce "nguild_prt.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +nguild_prt.gat,15,209,0 script Switch#TresN04 111,{ + callfunc "F_GldTreasSw", "nguild_prt",109,179; + end; +} diff --git a/npc/guild/old/aldeg_cas01.txt b/npc/guild/old/aldeg_cas01.txt new file mode 100644 index 000000000..d61a2d5c7 --- /dev/null +++ b/npc/guild/old/aldeg_cas01.txt @@ -0,0 +1,675 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas01 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in aldeg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +aldeg_cas01.gat,30,248,4 script Noisyubantian#a1-6::NoisyubantianNW 722,{ + set @GIDa1,GetCastleData("aldeg_cas01.gat",1); + if (@GIDa1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA01: + FlagEmblem GetCastleData("aldeg_cas01.gat",1); + break; +} + +aldeg_cas01.gat,30,246,4 duplicate(NoisyubantianNW) Noisyubantian#a1-7 722 +aldeg_cas01.gat,37,248,4 duplicate(NoisyubantianNW) Noisyubantian#a1-8 722 +aldeg_cas01.gat,37,246,4 duplicate(NoisyubantianNW) Noisyubantian#a1-9 722 +aldeg_cas01.gat,95,80,2 duplicate(NoisyubantianNW) Noisyubantian#a1-10 722 +aldeg_cas01.gat,95,59,2 duplicate(NoisyubantianNW) Noisyubantian#a1-11 722 +aldeg_cas01.gat,62,75,2 duplicate(NoisyubantianNW) Noisyubantian#a1-12 722 +aldeg_cas01.gat,70,75,2 duplicate(NoisyubantianNW) Noisyubantian#a1-13 722 +aldeg_cas01.gat,74,75,2 duplicate(NoisyubantianNW) Noisyubantian#a1-14 722 +aldeg_cas01.gat,62,64,2 duplicate(NoisyubantianNW) Noisyubantian#a1-15 722 +aldeg_cas01.gat,66,64,2 duplicate(NoisyubantianNW) Noisyubantian#a1-16 722 +aldeg_cas01.gat,70,64,2 duplicate(NoisyubantianNW) Noisyubantian#a1-17 722 +aldeg_cas01.gat,74,64,2 duplicate(NoisyubantianNW) Noisyubantian#a1-18 722 +aldeg_cas01.gat,203,150,4 duplicate(NoisyubantianNW) Noisyubantian#a1-19 722 +aldeg_cas01.gat,210,150,4 duplicate(NoisyubantianNW) Noisyubantian#a1-20 722 + +//================================================ +// Kafra Service +//================================================ +aldeg_cas01.gat,218,170,0 script Kafra Service#alde1 117,{ + cutin "kafra_01",2; + set @GIDa1,GetCastleData("aldeg_cas01.gat",1); + if (getcharid(2) == @GIDa1) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDa1) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDa1) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Al de Baran -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "aldebaran.gat",132,103; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("aldeg_cas01.gat",9) == 1) break; + disablenpc "Kafra Service#alde1"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +aldeg_cas01.gat,123,223,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDa1,GetCastleData("aldeg_cas01.gat",1); + if (getcharid(2) != @GIDa1) goto L1n; + warp "gld_dun02.gat",32,122; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +aldeg_cas01.gat,218,175,0 script Arl Fredo 55,{ + set @GIDa1,GetCastleData("aldeg_cas01.gat",1); + if (@GIDa1 == 0) goto LStart; + if (getcharid(2) != @GIDa1) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDa1)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Arl Fredo ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDa1) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDa1) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Arl Fredo ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Arl Fredo ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDa1) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Arl Fredo ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDa1) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Arl Fredo ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("aldeg_cas01.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("aldeg_cas01.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("aldeg_cas01.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("aldeg_cas01.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("aldeg_cas01.gat",4); + set @Economy,GetCastleData("aldeg_cas01.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Arl Fredo ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Arl Fredo ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Arl Fredo ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas01.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas01.gat",2,@Economy+1; + mes "[ Arl Fredo ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Arl Fredo ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Arl Fredo ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas01.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas01.gat",2,@Economy+1; + mes "[ Arl Fredo ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Arl Fredo ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Arl Fredo ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("aldeg_cas01.gat",5); + set @Defence,GetCastleData("aldeg_cas01.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Arl Fredo ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Arl Fredo ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Arl Fredo ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas01.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas01.gat",3,@Defence+1; + mes "[ Arl Fredo ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Arl Fredo ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Arl Fredo ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas01.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas01.gat",3,@Defence+1; + mes "[ Arl Fredo ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Arl Fredo ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Arl Fredo ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("aldeg_cas01.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Arl Fredo ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("aldeg_cas01.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("aldeg_cas01.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("aldeg_cas01.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("aldeg_cas01.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("aldeg_cas01.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("aldeg_cas01.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("aldeg_cas01.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("aldeg_cas01.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Arl Fredo ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Arl Fredo ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "aldeg_cas01.gat",@GDnum,1; + SetCastleData "aldeg_cas01.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "aldeg_cas01.gat",18,219,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas01.gat",117,42,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas01.gat",207,153,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas01.gat",68,70,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas01.gat",187,140,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas01.gat",62,204,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas01.gat",113,100,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas01.gat",211,174,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",7; + mes "[ Arl Fredo ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Arl Fredo ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Arl Fredo ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Arl Fredo ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("aldeg_cas01.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Arl Fredo ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Arl Fredo ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Arl Fredo ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#alde1"; + SetCastleData "aldeg_cas01.gat",9,1; + mes "[ Arl Fredo ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Arl Fredo ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to alde again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Arl Fredo ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Arl Fredo ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#alde1"; + SetCastleData "aldeg_cas01.gat",9,0; + cutin "kafra_01",255; + mes "[ Arl Fredo ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Arl Fredo ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Arl Fredo ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Arl Fredo ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "aldeg_cas01",119,223; + L6_1: + mes "[ Arl Fredo ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Arl Fredo ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Arl Fredo ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Arl Fredo ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "aldeg_cas01.gat",1,0; + SetCastleData "aldeg_cas01.gat",2,0; + SetCastleData "aldeg_cas01.gat",3,0; + SetCastleData "aldeg_cas01.gat",4,0; + SetCastleData "aldeg_cas01.gat",5,0; + SetCastleData "aldeg_cas01.gat",6,0; + SetCastleData "aldeg_cas01.gat",7,0; + SetCastleData "aldeg_cas01.gat",8,0; + SetCastleData "aldeg_cas01.gat",9,0; + SetCastleData "aldeg_cas01.gat",10,0; + SetCastleData "aldeg_cas01.gat",11,0; + SetCastleData "aldeg_cas01.gat",12,0; + SetCastleData "aldeg_cas01.gat",13,0; + SetCastleData "aldeg_cas01.gat",14,0; + SetCastleData "aldeg_cas01.gat",15,0; + SetCastleData "aldeg_cas01.gat",16,0; + SetCastleData "aldeg_cas01.gat",17,0; + SetCastleData "aldeg_cas01.gat",18,0; + SetCastleData "aldeg_cas01.gat",19,0; + SetCastleData "aldeg_cas01.gat",20,0; + SetCastleData "aldeg_cas01.gat",21,0; + SetCastleData "aldeg_cas01.gat",22,0; + SetCastleData "aldeg_cas01.gat",23,0; + SetCastleData "aldeg_cas01.gat",24,0; + SetCastleData "aldeg_cas01.gat",25,0; + Announce "[" + GetGuildName(@GIDa1) + "] has surrendered Agit [" + GetCastleName("aldeg_cas01.gat") + "]",0; + MapRespawnGuildID "aldeg_cas01.gat",GetCastleData("aldeg_cas01.gat",1),7; + break; + L7_2: + mes "[ Arl Fredo ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/aldeg_cas02.txt b/npc/guild/old/aldeg_cas02.txt new file mode 100644 index 000000000..cfe9c8071 --- /dev/null +++ b/npc/guild/old/aldeg_cas02.txt @@ -0,0 +1,676 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas02 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in aldeg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +aldeg_cas02.gat,82,71,2 script Hohensyubangawoo#a2-4::HohensyubangawooNW 722,{ + set @GIDa2,GetCastleData("aldeg_cas02.gat",1); + if (@GIDa2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA02: + FlagEmblem GetCastleData("aldeg_cas02.gat",1); + break; +} + +aldeg_cas02.gat,67,30,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-5 722 +aldeg_cas02.gat,183,140,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-6 722 +aldeg_cas02.gat,212,152,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-7 722 +aldeg_cas02.gat,108,39,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-8 722 +aldeg_cas02.gat,57,213,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-9 722 +aldeg_cas02.gat,91,181,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-10 722 +aldeg_cas02.gat,103,53,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-11 722 +aldeg_cas02.gat,73,53,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-12 722 +aldeg_cas02.gat,63,41,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-13 722 +aldeg_cas02.gat,229,6,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-14 722 +aldeg_cas02.gat,230,40,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-15 722 +aldeg_cas02.gat,197,40,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-16 722 +aldeg_cas02.gat,32,213,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-17 722 +aldeg_cas02.gat,88,180,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-18 722 +aldeg_cas02.gat,121,29,2 duplicate(HohensyubangawooNW) Hohensyubangawoo#a2-19 722 + +//================================================ +// Kafra Service +//================================================ +aldeg_cas02.gat,84,74,0 script Kafra Service#alde2 117,{ + cutin "kafra_01",2; + set @GIDa2,GetCastleData("aldeg_cas02.gat",1); + if (getcharid(2) == @GIDa2) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDa2) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDa2) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Al de Baran -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "aldebaran.gat",132,103; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("aldeg_cas02.gat",9) == 1) break; + disablenpc "Kafra Service#alde2"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +aldeg_cas02.gat,194,136,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDa2,GetCastleData("aldeg_cas02.gat",1); + if (getcharid(2) != @GIDa2) goto L1n; + warp "gld_dun02.gat",79,30; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +aldeg_cas02.gat,78,74,0 script Chen Lee 55,{ + set @GIDa2,GetCastleData("aldeg_cas02.gat",1); + if (@GIDa2 == 0) goto LStart; + if (getcharid(2) != @GIDa2) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDa2)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Chen Lee ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDa2) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDa2) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Chen Lee ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Chen Lee ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDa2) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Chen Lee ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDa2) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Chen Lee ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("aldeg_cas02.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("aldeg_cas02.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("aldeg_cas02.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("aldeg_cas02.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("aldeg_cas02.gat",4); + set @Economy,GetCastleData("aldeg_cas02.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Chen Lee ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Chen Lee ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas02.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas02.gat",2,@Economy+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Chen Lee ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas02.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas02.gat",2,@Economy+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Chen Lee ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("aldeg_cas02.gat",5); + set @Defence,GetCastleData("aldeg_cas02.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Chen Lee ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Chen Lee ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas02.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas02.gat",3,@Defence+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Chen Lee ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas02.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas02.gat",3,@Defence+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Chen Lee ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("aldeg_cas02.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Chen Lee ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("aldeg_cas02.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("aldeg_cas02.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("aldeg_cas02.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("aldeg_cas02.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("aldeg_cas02.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("aldeg_cas02.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("aldeg_cas02.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("aldeg_cas02.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Chen Lee ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Chen Lee ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "aldeg_cas02.gat",@GDnum,1; + SetCastleData "aldeg_cas02.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "aldeg_cas02.gat",22,186,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas02.gat",88,31,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas02.gat",207,176,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas02.gat",50,201,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas02.gat",197,146,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas02.gat",71,193,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas02.gat",88,31,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas02.gat",219,148,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",7; + mes "[ Chen Lee ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Chen Lee ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Chen Lee ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("aldeg_cas02.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Chen Lee ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Chen Lee ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#alde2"; + SetCastleData "aldeg_cas02.gat",9,1; + mes "[ Chen Lee ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Chen Lee ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to alde again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Chen Lee ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Chen Lee ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#alde2"; + SetCastleData "aldeg_cas02.gat",9,0; + cutin "kafra_01",255; + mes "[ Chen Lee ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Chen Lee ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Chen Lee ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Chen Lee ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "aldeg_cas02",135,231; + L6_1: + mes "[ Chen Lee ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Chen Lee ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Chen Lee ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Chen Lee ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "aldeg_cas02.gat",1,0; + SetCastleData "aldeg_cas02.gat",2,0; + SetCastleData "aldeg_cas02.gat",3,0; + SetCastleData "aldeg_cas02.gat",4,0; + SetCastleData "aldeg_cas02.gat",5,0; + SetCastleData "aldeg_cas02.gat",6,0; + SetCastleData "aldeg_cas02.gat",7,0; + SetCastleData "aldeg_cas02.gat",8,0; + SetCastleData "aldeg_cas02.gat",9,0; + SetCastleData "aldeg_cas02.gat",10,0; + SetCastleData "aldeg_cas02.gat",11,0; + SetCastleData "aldeg_cas02.gat",12,0; + SetCastleData "aldeg_cas02.gat",13,0; + SetCastleData "aldeg_cas02.gat",14,0; + SetCastleData "aldeg_cas02.gat",15,0; + SetCastleData "aldeg_cas02.gat",16,0; + SetCastleData "aldeg_cas02.gat",17,0; + SetCastleData "aldeg_cas02.gat",18,0; + SetCastleData "aldeg_cas02.gat",19,0; + SetCastleData "aldeg_cas02.gat",20,0; + SetCastleData "aldeg_cas02.gat",21,0; + SetCastleData "aldeg_cas02.gat",22,0; + SetCastleData "aldeg_cas02.gat",23,0; + SetCastleData "aldeg_cas02.gat",24,0; + SetCastleData "aldeg_cas02.gat",25,0; + Announce "[" + GetGuildName(@GIDa2) + "] has surrendered Agit [" + GetCastleName("aldeg_cas02.gat") + "]",0; + MapRespawnGuildID "aldeg_cas02.gat",GetCastleData("aldeg_cas02.gat",1),7; + break; + L7_2: + mes "[ Chen Lee ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/aldeg_cas03.txt b/npc/guild/old/aldeg_cas03.txt new file mode 100644 index 000000000..92e61414d --- /dev/null +++ b/npc/guild/old/aldeg_cas03.txt @@ -0,0 +1,679 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas03 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in aldeg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +aldeg_cas03.gat,176,175,2 script Nyirenverk#a3-4::NyirenverkNW 722,{ + set @GIDa3,GetCastleData("aldeg_cas03.gat",1); + if (@GIDa3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA03: + FlagEmblem GetCastleData("aldeg_cas03.gat",1); + break; +} + +aldeg_cas03.gat,85,103,2 duplicate(NyirenverkNW) Nyirenverk#a3-5 722 +aldeg_cas03.gat,77,115,2 duplicate(NyirenverkNW) Nyirenverk#a3-6 722 +aldeg_cas03.gat,77,215,2 duplicate(NyirenverkNW) Nyirenverk#a3-7 722 +aldeg_cas03.gat,112,107,2 duplicate(NyirenverkNW) Nyirenverk#a3-8 722 +aldeg_cas03.gat,112,117,2 duplicate(NyirenverkNW) Nyirenverk#a3-9 722 +aldeg_cas03.gat,69,71,2 duplicate(NyirenverkNW) Nyirenverk#a3-10 722 +aldeg_cas03.gat,91,69,2 duplicate(NyirenverkNW) Nyirenverk#a3-11 722 +aldeg_cas03.gat,108,60,2 duplicate(NyirenverkNW) Nyirenverk#a3-12 722 +aldeg_cas03.gat,121,73,2 duplicate(NyirenverkNW) Nyirenverk#a3-13 722 +aldeg_cas03.gat,121,73,2 duplicate(NyirenverkNW) Nyirenverk#a3-14 722 +aldeg_cas03.gat,75,102,2 duplicate(NyirenverkNW) Nyirenverk#a3-15 722 +aldeg_cas03.gat,199,169,2 duplicate(NyirenverkNW) Nyirenverk#a3-16 722 +aldeg_cas03.gat,181,179,2 duplicate(NyirenverkNW) Nyirenverk#a3-17 722 +aldeg_cas03.gat,192,44,2 duplicate(NyirenverkNW) Nyirenverk#a3-18 722 +aldeg_cas03.gat,88,108,2 duplicate(NyirenverkNW) Nyirenverk#a3-19 722 +aldeg_cas03.gat,208,145,2 duplicate(NyirenverkNW) Nyirenverk#a3-20 722 +aldeg_cas03.gat,207,75,2 duplicate(NyirenverkNW) Nyirenverk#a3-21 722 +aldeg_cas03.gat,96,62,2 duplicate(NyirenverkNW) Nyirenverk#a3-22 722 + +//================================================ +// Kafra Service +//================================================ +aldeg_cas03.gat,118,76,0 script Kafra Service#alde3 117,{ + cutin "kafra_01",2; + set @GIDa3,GetCastleData("aldeg_cas03.gat",1); + if (getcharid(2) == @GIDa3) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDa3) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDa3) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Al de Baran -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "aldebaran.gat",132,103; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("aldeg_cas03.gat",9) == 1) break; + disablenpc "Kafra Service#alde3"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +aldeg_cas03.gat,200,177,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDa3,GetCastleData("aldeg_cas03.gat",1); + if (getcharid(2) != @GIDa3) goto L1n; + warp "gld_dun02.gat",165,38; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +aldeg_cas03.gat,110,118,0 script Chen Lee 55,{ + set @GIDa3,GetCastleData("aldeg_cas03.gat",1); + if (@GIDa3 == 0) goto LStart; + if (getcharid(2) != @GIDa3) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDa3)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Chen Lee ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDa3) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDa3) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Chen Lee ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Chen Lee ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDa3) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Chen Lee ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDa3) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Chen Lee ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("aldeg_cas03.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("aldeg_cas03.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("aldeg_cas03.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("aldeg_cas03.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("aldeg_cas03.gat",4); + set @Economy,GetCastleData("aldeg_cas03.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Chen Lee ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Chen Lee ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas03.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas03.gat",2,@Economy+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Chen Lee ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas03.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas03.gat",2,@Economy+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Chen Lee ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("aldeg_cas03.gat",5); + set @Defence,GetCastleData("aldeg_cas03.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Chen Lee ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Chen Lee ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas03.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas03.gat",3,@Defence+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Chen Lee ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Chen Lee ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas03.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas03.gat",3,@Defence+1; + mes "[ Chen Lee ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Chen Lee ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("aldeg_cas03.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Chen Lee ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("aldeg_cas03.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("aldeg_cas03.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("aldeg_cas03.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("aldeg_cas03.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("aldeg_cas03.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("aldeg_cas03.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("aldeg_cas03.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("aldeg_cas03.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Chen Lee ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Chen Lee ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "aldeg_cas03.gat",@GDnum,1; + SetCastleData "aldeg_cas03.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "aldeg_cas03.gat",57,216,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas03.gat",80,108,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas03.gat",199,183,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas03.gat",98,267,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas03.gat",91,88,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas03.gat",78,121,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",7; + mes "[ Chen Lee ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Chen Lee ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Chen Lee ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("aldeg_cas03.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Chen Lee ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Chen Lee ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Chen Lee ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#alde3"; + SetCastleData "aldeg_cas03.gat",9,1; + mes "[ Chen Lee ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Chen Lee ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to alde again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Chen Lee ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Chen Lee ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#alde3"; + SetCastleData "aldeg_cas03.gat",9,0; + cutin "kafra_01",255; + mes "[ Chen Lee ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Chen Lee ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Chen Lee ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Chen Lee ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "aldeg_cas03",225,269; + L6_1: + mes "[ Chen Lee ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Chen Lee ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Chen Lee ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Chen Lee ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "aldeg_cas03.gat",1,0; + SetCastleData "aldeg_cas03.gat",2,0; + SetCastleData "aldeg_cas03.gat",3,0; + SetCastleData "aldeg_cas03.gat",4,0; + SetCastleData "aldeg_cas03.gat",5,0; + SetCastleData "aldeg_cas03.gat",6,0; + SetCastleData "aldeg_cas03.gat",7,0; + SetCastleData "aldeg_cas03.gat",8,0; + SetCastleData "aldeg_cas03.gat",9,0; + SetCastleData "aldeg_cas03.gat",10,0; + SetCastleData "aldeg_cas03.gat",11,0; + SetCastleData "aldeg_cas03.gat",12,0; + SetCastleData "aldeg_cas03.gat",13,0; + SetCastleData "aldeg_cas03.gat",14,0; + SetCastleData "aldeg_cas03.gat",15,0; + SetCastleData "aldeg_cas03.gat",16,0; + SetCastleData "aldeg_cas03.gat",17,0; + SetCastleData "aldeg_cas03.gat",18,0; + SetCastleData "aldeg_cas03.gat",19,0; + SetCastleData "aldeg_cas03.gat",20,0; + SetCastleData "aldeg_cas03.gat",21,0; + SetCastleData "aldeg_cas03.gat",22,0; + SetCastleData "aldeg_cas03.gat",23,0; + SetCastleData "aldeg_cas03.gat",24,0; + SetCastleData "aldeg_cas03.gat",25,0; + Announce "[" + GetGuildName(@GIDa3) + "] has surrendered Agit [" + GetCastleName("aldeg_cas03.gat") + "]",0; + MapRespawnGuildID "aldeg_cas03.gat",GetCastleData("aldeg_cas03.gat",1),7; + break; + L7_2: + mes "[ Chen Lee ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/aldeg_cas04.txt b/npc/guild/old/aldeg_cas04.txt new file mode 100644 index 000000000..f93ebac09 --- /dev/null +++ b/npc/guild/old/aldeg_cas04.txt @@ -0,0 +1,679 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas04 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in aldeg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +aldeg_cas04.gat,167,61,2 script Byirtsburi#a4-4::ByirtsburiNW 722,{ + set @GIDa4,GetCastleData("aldeg_cas04.gat",1); + if (@GIDa4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA04: + FlagEmblem GetCastleData("aldeg_cas04.gat",1); + break; +} + +aldeg_cas04.gat,164,90,2 duplicate(ByirtsburiNW) Byirtsburi#a4-5 722 +aldeg_cas04.gat,143,209,2 duplicate(ByirtsburiNW) Byirtsburi#a4-6 722 +aldeg_cas04.gat,129,193,2 duplicate(ByirtsburiNW) Byirtsburi#a4-7 722 +aldeg_cas04.gat,112,206,2 duplicate(ByirtsburiNW) Byirtsburi#a4-8 722 +aldeg_cas04.gat,113,212,2 duplicate(ByirtsburiNW) Byirtsburi#a4-9 722 +aldeg_cas04.gat,77,117,2 duplicate(ByirtsburiNW) Byirtsburi#a4-10 722 +aldeg_cas04.gat,186,42,2 duplicate(ByirtsburiNW) Byirtsburi#a4-11 722 +aldeg_cas04.gat,30,69,2 duplicate(ByirtsburiNW) Byirtsburi#a4-12 722 +aldeg_cas04.gat,55,97,2 duplicate(ByirtsburiNW) Byirtsburi#a4-13 722 +aldeg_cas04.gat,45,98,2 duplicate(ByirtsburiNW) Byirtsburi#a4-14 722 +aldeg_cas04.gat,33,116,2 duplicate(ByirtsburiNW) Byirtsburi#a4-15 722 +aldeg_cas04.gat,130,180,2 duplicate(ByirtsburiNW) Byirtsburi#a4-16 722 +aldeg_cas04.gat,129,193,2 duplicate(ByirtsburiNW) Byirtsburi#a4-17 722 +aldeg_cas04.gat,142,209,2 duplicate(ByirtsburiNW) Byirtsburi#a4-18 722 +aldeg_cas04.gat,33,107,2 duplicate(ByirtsburiNW) Byirtsburi#a4-19 722 +aldeg_cas04.gat,133,220,2 duplicate(ByirtsburiNW) Byirtsburi#a4-20 722 +aldeg_cas04.gat,169,22,2 duplicate(ByirtsburiNW) Byirtsburi#a4-21 722 +aldeg_cas04.gat,169,15,2 duplicate(ByirtsburiNW) Byirtsburi#a4-22 722 + +//================================================ +// Kafra Service +//================================================ +aldeg_cas04.gat,45,88,0 script Kafra Service#alde4 117,{ + cutin "kafra_01",2; + set @GIDa4,GetCastleData("aldeg_cas04.gat",1); + if (getcharid(2) == @GIDa4) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDa4) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDa4) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Al de Baran -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "aldebaran.gat",132,103; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("aldeg_cas04.gat",9) == 1) break; + disablenpc "Kafra Service#alde4"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +aldeg_cas04.gat,76,64,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDa4,GetCastleData("aldeg_cas04.gat",1); + if (getcharid(2) != @GIDa4) goto L1n; + warp "gld_dun02.gat",160,148; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +aldeg_cas04.gat,218,175,0 script Brimhemsen 55,{ + set @GIDa4,GetCastleData("aldeg_cas04.gat",1); + if (@GIDa4 == 0) goto LStart; + if (getcharid(2) != @GIDa4) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDa4)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Brimhemsen ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDa4) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDa4) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Brimhemsen ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Brimhemsen ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDa4) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Brimhemsen ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDa4) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Brimhemsen ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("aldeg_cas04.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("aldeg_cas04.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("aldeg_cas04.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("aldeg_cas04.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("aldeg_cas04.gat",4); + set @Economy,GetCastleData("aldeg_cas04.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Brimhemsen ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Brimhemsen ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas04.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas04.gat",2,@Economy+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Brimhemsen ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas04.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas04.gat",2,@Economy+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Brimhemsen ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("aldeg_cas04.gat",5); + set @Defence,GetCastleData("aldeg_cas04.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Brimhemsen ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Brimhemsen ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas04.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas04.gat",3,@Defence+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Brimhemsen ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas04.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas04.gat",3,@Defence+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Brimhemsen ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("aldeg_cas04.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Brimhemsen ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("aldeg_cas04.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("aldeg_cas04.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("aldeg_cas04.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("aldeg_cas04.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("aldeg_cas04.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("aldeg_cas04.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("aldeg_cas04.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("aldeg_cas04.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Brimhemsen ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Brimhemsen ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "aldeg_cas04.gat",@GDnum,1; + SetCastleData "aldeg_cas04.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "aldeg_cas04.gat",181,33,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas04.gat",50,68,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas04.gat",50,119,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas04.gat",169,49,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas04.gat",133,196,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas04.gat",177,87,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas04.gat",50,119,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas04.gat",133,196,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",7; + mes "[ Brimhemsen ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Brimhemsen ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Brimhemsen ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("aldeg_cas04.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Brimhemsen ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Brimhemsen ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#alde4"; + SetCastleData "aldeg_cas04.gat",9,1; + mes "[ Brimhemsen ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Brimhemsen ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to alde again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Brimhemsen ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Brimhemsen ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#alde4"; + SetCastleData "aldeg_cas04.gat",9,0; + cutin "kafra_01",255; + mes "[ Brimhemsen ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Brimhemsen ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Brimhemsen ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Brimhemsen ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "aldeg_cas04",85,12; + L6_1: + mes "[ Brimhemsen ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Brimhemsen ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Brimhemsen ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Brimhemsen ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "aldeg_cas04.gat",1,0; + SetCastleData "aldeg_cas04.gat",2,0; + SetCastleData "aldeg_cas04.gat",3,0; + SetCastleData "aldeg_cas04.gat",4,0; + SetCastleData "aldeg_cas04.gat",5,0; + SetCastleData "aldeg_cas04.gat",6,0; + SetCastleData "aldeg_cas04.gat",7,0; + SetCastleData "aldeg_cas04.gat",8,0; + SetCastleData "aldeg_cas04.gat",9,0; + SetCastleData "aldeg_cas04.gat",10,0; + SetCastleData "aldeg_cas04.gat",11,0; + SetCastleData "aldeg_cas04.gat",12,0; + SetCastleData "aldeg_cas04.gat",13,0; + SetCastleData "aldeg_cas04.gat",14,0; + SetCastleData "aldeg_cas04.gat",15,0; + SetCastleData "aldeg_cas04.gat",16,0; + SetCastleData "aldeg_cas04.gat",17,0; + SetCastleData "aldeg_cas04.gat",18,0; + SetCastleData "aldeg_cas04.gat",19,0; + SetCastleData "aldeg_cas04.gat",20,0; + SetCastleData "aldeg_cas04.gat",21,0; + SetCastleData "aldeg_cas04.gat",22,0; + SetCastleData "aldeg_cas04.gat",23,0; + SetCastleData "aldeg_cas04.gat",24,0; + SetCastleData "aldeg_cas04.gat",25,0; + Announce "[" + GetGuildName(@GIDa4) + "] has surrendered Agit [" + GetCastleName("aldeg_cas04.gat") + "]",0; + MapRespawnGuildID "aldeg_cas04.gat",GetCastleData("aldeg_cas04.gat",1),7; + break; + L7_2: + mes "[ Brimhemsen ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/aldeg_cas05.txt b/npc/guild/old/aldeg_cas05.txt new file mode 100644 index 000000000..a1a64863c --- /dev/null +++ b/npc/guild/old/aldeg_cas05.txt @@ -0,0 +1,677 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas05 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in aldeg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +aldeg_cas05.gat,170,85,2 script Rotenburk#a5-4::RotenburkNW 722,{ + set @GIDa5,GetCastleData("aldeg_cas05.gat",1); + if (@GIDa5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA05: + FlagEmblem GetCastleData("aldeg_cas05.gat",1); + break; +} + +aldeg_cas05.gat,142,212,2 duplicate(RotenburkNW) Rotenburk#a5-5 722 +aldeg_cas05.gat,149,196,2 duplicate(RotenburkNW) Rotenburk#a5-6 722 +aldeg_cas05.gat,41,180,2 duplicate(RotenburkNW) Rotenburk#a5-7 722 +aldeg_cas05.gat,38,201,2 duplicate(RotenburkNW) Rotenburk#a5-8 722 +aldeg_cas05.gat,65,182,2 duplicate(RotenburkNW) Rotenburk#a5-9 722 +aldeg_cas05.gat,65,205,2 duplicate(RotenburkNW) Rotenburk#a5-10 722 +aldeg_cas05.gat,10,218,2 duplicate(RotenburkNW) Rotenburk#a5-11 722 +aldeg_cas05.gat,164,201,2 duplicate(RotenburkNW) Rotenburk#a5-12 722 +aldeg_cas05.gat,216,96,2 duplicate(RotenburkNW) Rotenburk#a5-13 722 +aldeg_cas05.gat,217,80,2 duplicate(RotenburkNW) Rotenburk#a5-14 722 +aldeg_cas05.gat,14,117,2 duplicate(RotenburkNW) Rotenburk#a5-15 722 +aldeg_cas05.gat,10,225,2 duplicate(RotenburkNW) Rotenburk#a5-16 722 +aldeg_cas05.gat,187,59,2 duplicate(RotenburkNW) Rotenburk#a5-17 722 +aldeg_cas05.gat,154,51,2 duplicate(RotenburkNW) Rotenburk#a5-18 722 +aldeg_cas05.gat,22,211,2 duplicate(RotenburkNW) Rotenburk#a5-19 722 +aldeg_cas05.gat,150,202,2 duplicate(RotenburkNW) Rotenburk#a5-20 722 + +//================================================ +// Kafra Service +//================================================ +aldeg_cas05.gat,31,190,0 script Kafra Service#alde5 117,{ + cutin "kafra_01",2; + set @GIDa5,GetCastleData("aldeg_cas05.gat",1); + if (getcharid(2) == @GIDa5) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDa5) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDa5) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Al de Baran -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "aldebaran.gat",132,103; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("aldeg_cas05.gat",9) == 1) break; + disablenpc "Kafra Service#alde5"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +aldeg_cas05.gat,22,205,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDa5,GetCastleData("aldeg_cas05.gat",1); + if (getcharid(2) != @GIDa5) goto L1n; + warp "gld_dun02.gat",103,169; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +aldeg_cas05.gat,51,179,0 script Brimhemsen 55,{ + set @GIDa5,GetCastleData("aldeg_cas05.gat",1); + if (@GIDa5 == 0) goto LStart; + if (getcharid(2) != @GIDa5) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDa5)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Brimhemsen ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDa5) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDa5) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Brimhemsen ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Brimhemsen ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDa5) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Brimhemsen ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDa5) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Brimhemsen ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("aldeg_cas05.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("aldeg_cas05.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("aldeg_cas05.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("aldeg_cas05.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("aldeg_cas05.gat",4); + set @Economy,GetCastleData("aldeg_cas05.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Brimhemsen ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Brimhemsen ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas05.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas05.gat",2,@Economy+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Brimhemsen ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "aldeg_cas05.gat",4,@TriggerE+1; + SetCastleData "aldeg_cas05.gat",2,@Economy+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Brimhemsen ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("aldeg_cas05.gat",5); + set @Defence,GetCastleData("aldeg_cas05.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Brimhemsen ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Brimhemsen ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas05.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas05.gat",3,@Defence+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Brimhemsen ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Brimhemsen ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "aldeg_cas05.gat",5,@TriggerD+1; + SetCastleData "aldeg_cas05.gat",3,@Defence+1; + mes "[ Brimhemsen ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Brimhemsen ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("aldeg_cas05.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Brimhemsen ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("aldeg_cas05.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("aldeg_cas05.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("aldeg_cas05.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("aldeg_cas05.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("aldeg_cas05.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("aldeg_cas05.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("aldeg_cas05.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("aldeg_cas05.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Brimhemsen ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Brimhemsen ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "aldeg_cas05.gat",@GDnum,1; + SetCastleData "aldeg_cas05.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "aldeg_cas05.gat",157,192,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",0; + if(@GDnum==11) guardian "aldeg_cas05.gat",194,46,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",1; + if(@GDnum==12) guardian "aldeg_cas05.gat",146,214,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",2; + if(@GDnum==13) guardian "aldeg_cas05.gat",223,95,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",3; + if(@GDnum==14) guardian "aldeg_cas05.gat",131,223,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",4; + if(@GDnum==15) guardian "aldeg_cas05.gat",191,68,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",5; + if(@GDnum==16) guardian "aldeg_cas05.gat",160,194,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",6; + if(@GDnum==17) guardian "aldeg_cas05.gat",49,225,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",7; + mes "[ Brimhemsen ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Brimhemsen ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Brimhemsen ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("aldeg_cas05.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Brimhemsen ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Brimhemsen ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Brimhemsen ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#alde5"; + SetCastleData "aldeg_cas05.gat",9,1; + mes "[ Brimhemsen ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Brimhemsen ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to alde again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Brimhemsen ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Brimhemsen ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#alde5"; + SetCastleData "aldeg_cas05.gat",9,0; + cutin "kafra_01",255; + mes "[ Brimhemsen ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Brimhemsen ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Brimhemsen ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Brimhemsen ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "aldeg_cas05",15,209; + L6_1: + mes "[ Brimhemsen ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Brimhemsen ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Brimhemsen ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Brimhemsen ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "aldeg_cas05.gat",1,0; + SetCastleData "aldeg_cas05.gat",2,0; + SetCastleData "aldeg_cas05.gat",3,0; + SetCastleData "aldeg_cas05.gat",4,0; + SetCastleData "aldeg_cas05.gat",5,0; + SetCastleData "aldeg_cas05.gat",6,0; + SetCastleData "aldeg_cas05.gat",7,0; + SetCastleData "aldeg_cas05.gat",8,0; + SetCastleData "aldeg_cas05.gat",9,0; + SetCastleData "aldeg_cas05.gat",10,0; + SetCastleData "aldeg_cas05.gat",11,0; + SetCastleData "aldeg_cas05.gat",12,0; + SetCastleData "aldeg_cas05.gat",13,0; + SetCastleData "aldeg_cas05.gat",14,0; + SetCastleData "aldeg_cas05.gat",15,0; + SetCastleData "aldeg_cas05.gat",16,0; + SetCastleData "aldeg_cas05.gat",17,0; + SetCastleData "aldeg_cas05.gat",18,0; + SetCastleData "aldeg_cas05.gat",19,0; + SetCastleData "aldeg_cas05.gat",20,0; + SetCastleData "aldeg_cas05.gat",21,0; + SetCastleData "aldeg_cas05.gat",22,0; + SetCastleData "aldeg_cas05.gat",23,0; + SetCastleData "aldeg_cas05.gat",24,0; + SetCastleData "aldeg_cas05.gat",25,0; + Announce "[" + GetGuildName(@GIDa5) + "] has surrendered Agit [" + GetCastleName("aldeg_cas05.gat") + "]",0; + MapRespawnGuildID "aldeg_cas05.gat",GetCastleData("aldeg_cas05.gat",1),7; + break; + L7_2: + mes "[ Brimhemsen ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/aldeg_flag.txt b/npc/guild/old/aldeg_flag.txt new file mode 100644 index 000000000..feec15fd3 --- /dev/null +++ b/npc/guild/old/aldeg_flag.txt @@ -0,0 +1,351 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Al de Baran Guild Flags +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Castle Guild Flags in aldebaran and alde_gld +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//============================================================ + +//Al de Baran Castle 01 - Noisyubantian + +aldebaran.gat,155,190,4 script Noisyubantian#a1-1 722,{ + set @GIDa1,GetCastleData("aldeg_cas01.gat",1); + if (@GIDa1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA01: + FlagEmblem GetCastleData("aldeg_cas01.gat",1); + break; +} + +alde_gld.gat,61,87,6 script Noisyubantian#a1-2::NoisyubantianW 722,{ + set @GIDa1,GetCastleData("aldeg_cas01.gat",1); + if (@GIDa1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDa1) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "aldeg_cas01.gat",218,170; + break; +OnRecvCastleA01: + FlagEmblem GetCastleData("aldeg_cas01.gat",1); + break; +} + +alde_gld.gat,61,79,6 duplicate(NoisyubantianW) Noisyubantian#a1-3 722 +alde_gld.gat,45,87,8 duplicate(NoisyubantianW) Noisyubantian#a1-4 722 +alde_gld.gat,51,87,8 duplicate(NoisyubantianW) Noisyubantian#a1-5 722 + +//Al de Baran Castle 02 - Hohensyubangawoo + +aldebaran.gat,146,194,3 script Hohensyubangawoo#a2-1 722,{ + set @GIDa2,GetCastleData("aldeg_cas02.gat",1); + if (@GIDa2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA02: + FlagEmblem GetCastleData("aldeg_cas02.gat",1); + break; +} + +alde_gld.gat,93,250,5 script Hohensyubangawoo#a2-2::HohensyubangawooW 722,{ + set @GIDa2,GetCastleData("aldeg_cas02.gat",1); + if (@GIDa2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDa2) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "aldeg_cas02.gat",84,74; + break; +OnRecvCastleA02: + FlagEmblem GetCastleData("aldeg_cas02.gat",1); + break; +} + +alde_gld.gat,98,250,5 duplicate(HohensyubangawooW) Hohensyubangawoo#a2-3 722 + +//Al de Baran Castle 03 - Nyirenverk + +aldebaran.gat,143,203,2 script Nyirenverk#a3-1 722,{ + set @GIDa3,GetCastleData("aldeg_cas03.gat",1); + if (@GIDa3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA03: + FlagEmblem GetCastleData("aldeg_cas03.gat",1); + break; +} + +alde_gld.gat,139,83,1 script Nyirenverk#a3-2::NyirenverkW 722,{ + set @GIDa3,GetCastleData("aldeg_cas03.gat",1); + if (@GIDa3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDa3) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "aldeg_cas03.gat",118,76; + break; +OnRecvCastleA03: + FlagEmblem GetCastleData("aldeg_cas03.gat",1); + break; +} + +alde_gld.gat,145,83,1 duplicate(NyirenverkW) Nyirenverk#a3-3 722 + +//Al de Baran Castle 04 - Byirtsburi + +aldebaran.gat,167,203,6 script Byirtsburi#a4-1 722,{ + set @GIDa4,GetCastleData("aldeg_cas04.gat",1); + if (@GIDa4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA04: + FlagEmblem GetCastleData("aldeg_cas04.gat",1); + break; +} + + +alde_gld.gat,239,247,1 script Byirtsburi#a4-2::ByirtsburiW 722,{ + set @GIDa4,GetCastleData("aldeg_cas04.gat",1); + if (@GIDa4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDa4) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "aldeg_cas04.gat",45,88; + break; +OnRecvCastleA04: + FlagEmblem GetCastleData("aldeg_cas04.gat",1); + break; +} + +alde_gld.gat,234,247,1 duplicate(ByirtsburiW) Byirtsburi#a4-3 722 + +//Al de Baran Castle 05 - Rotenburk + +aldebaran.gat,165,194,5 script Rotenburk#a5-1 722,{ + set @GIDa5,GetCastleData("aldeg_cas05.gat",1); + if (@GIDa5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleA05: + FlagEmblem GetCastleData("aldeg_cas05.gat",1); + break; +} + +alde_gld.gat,266,92,7 script Rotenburk#a5-2::RotenburkW 722,{ + set @GIDa5,GetCastleData("aldeg_cas05.gat",1); + if (@GIDa5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDa5) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Al de Baran ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Al de Baran,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDa5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDa5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDa5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "aldeg_cas05.gat",31,190; + break; +OnRecvCastleA05: + FlagEmblem GetCastleData("aldeg_cas05.gat",1); + break; +} + +alde_gld.gat,266,88,7 duplicate(RotenburkW) Rotenburk#a5-3 722 \ No newline at end of file diff --git a/npc/guild/old/ev_agit_aldeg.txt b/npc/guild/old/ev_agit_aldeg.txt new file mode 100644 index 000000000..617836cc6 --- /dev/null +++ b/npc/guild/old/ev_agit_aldeg.txt @@ -0,0 +1,476 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Al de Baran Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Al de Baran Guild Wars +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//= 1.2 by Akaru (Castle spawn/conquering fix) +//============================================================ + + +aldeg_cas01.gat,216,24,0 script Agit_A01 -1,{ +OnAgitInit: + GetCastleData "aldeg_cas01.gat",0; + Break; +OnInterIfInit: + GetCastleData "aldeg_cas01.gat",0,"::OnRecvCastleA01"; + Break; +OnRecvCastleA01: + RequestGuildInfo GetCastleData("aldeg_cas01.gat",1); + Break; +OnAgitStart: + if (GetCastleData("aldeg_cas01.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas01.gat",GetCastleData("aldeg_cas01.gat",1),2; + Monster "aldeg_cas01.gat",216,24,"EMPERIUM",1288,1,"Agit_A01::OnAgitBreak"; + GvgOn "aldeg_cas01.gat"; + Break; +OnAgitBreak: + set @GIDa1,getcharid(2); + if (@GIDa1 <= 0) Break; + set @Economy,GetCastleData("aldeg_cas01.gat",2); + SetCastleData "aldeg_cas01.gat",2,@Economy-5; + if (GetCastleData("aldeg_cas01.gat",2) < 0) SetCastleData "aldeg_cas01.gat",2,0; + set @Defence,GetCastleData("aldeg_cas01.gat",3); + SetCastleData "aldeg_cas01.gat",3,@Defence-5; + if (GetCastleData("aldeg_cas01.gat",3) < 0) SetCastleData "aldeg_cas01.gat",3,0; + SetCastleData "aldeg_cas01.gat",1,@GIDa1; + Announce "Guild Base [" + GetCastleName("aldeg_cas01.gat") + "] has been taken by the [" + GetGuildName(@GIDa1) + "] guild.",0; + MapAnnounce "aldeg_cas01.gat","The emperium has been destroyed.",17; + GetCastleData "aldeg_cas01.gat",0,"::OnRecvCastleA01"; + SetCastleData "aldeg_cas01.gat",2,0; + SetCastleData "aldeg_cas01.gat",3,0; + SetCastleData "aldeg_cas01.gat",4,0; + SetCastleData "aldeg_cas01.gat",5,0; + SetCastleData "aldeg_cas01.gat",6,0; + SetCastleData "aldeg_cas01.gat",7,0; + SetCastleData "aldeg_cas01.gat",8,0; + SetCastleData "aldeg_cas01.gat",9,0; + SetCastleData "aldeg_cas01.gat",10,0; + SetCastleData "aldeg_cas01.gat",11,0; + SetCastleData "aldeg_cas01.gat",12,0; + SetCastleData "aldeg_cas01.gat",13,0; + SetCastleData "aldeg_cas01.gat",14,0; + SetCastleData "aldeg_cas01.gat",15,0; + SetCastleData "aldeg_cas01.gat",16,0; + SetCastleData "aldeg_cas01.gat",17,0; + SetCastleData "aldeg_cas01.gat",18,0; + SetCastleData "aldeg_cas01.gat",19,0; + SetCastleData "aldeg_cas01.gat",20,0; + SetCastleData "aldeg_cas01.gat",21,0; + SetCastleData "aldeg_cas01.gat",22,0; + SetCastleData "aldeg_cas01.gat",23,0; + SetCastleData "aldeg_cas01.gat",24,0; + SetCastleData "aldeg_cas01.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas01.gat",GetCastleData("aldeg_cas01.gat",1),6; + Monster "aldeg_cas01.gat",216,24,"EMPERIUM",1288,1,"Agit_A01::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("aldeg_cas01.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas01.gat",GetCastleData("aldeg_cas01.gat",1),4; + KillMonster "aldeg_cas01.gat","Agit_A01::OnAgitBreak"; + GvgOff "aldeg_cas01.gat"; + Break; +OnInit: +initnpctimer "Agit_A01_Timer"; +} + +aldeg_cas01.gat,1,1,1 script Agit_A01_Timer -1,{ +OnTimer500: + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1117,10; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1132,4; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1219,2; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1205,1; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1216,10; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1193,17; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1269,9; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1276,7; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1208,3; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1275,1; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1268,1; + areamonster "aldeg_cas01.gat",0,0,300,300,"--ja--",1272,1; + monster "aldeg_cas01.gat",216,23,"--ja--",1272,1; + monster "aldeg_cas01.gat",216,23,"--ja--",1270,4; + monster "aldeg_cas01.gat",216,23,"--ja--",1268,1; + monster "aldeg_cas01.gat",216,23,"--ja--",1219,1; + monster "aldeg_cas01.gat",216,23,"--ja--",1276,5; + Monster "aldeg_cas01.gat",216,24,"EMPERIUM",1288,1,"Agit_A01::OnAgitBreak"; + stopnpctimer "Agit_A01_Timer"; + Break; + } +//-------------------------------------------------------------------------------------------------------------------------- +aldeg_cas02.gat,214,24,0 script Agit_A02 -1,{ +OnAgitInit: + GetCastleData "aldeg_cas02.gat",0; + Break; +OnInterIfInit: + GetCastleData "aldeg_cas02.gat",0,"::OnRecvCastleA02"; + Break; +OnRecvCastleA02: + RequestGuildInfo GetCastleData("aldeg_cas02.gat",1); + Break; +OnAgitStart: + if (GetCastleData("aldeg_cas02.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas02.gat",GetCastleData("aldeg_cas02.gat",1),2; + Monster "aldeg_cas02.gat",214,24,"EMPERIUM",1288,1,"Agit_A02::OnAgitBreak"; + GvgOn "aldeg_cas02.gat"; + Break; +OnAgitBreak: + set @GIDa2,getcharid(2); + if (@GIDa2 <= 0) Break; + set @Economy,GetCastleData("aldeg_cas02.gat",2); + SetCastleData "aldeg_cas02.gat",2,@Economy-5; + if (GetCastleData("aldeg_cas02.gat",2) < 0) SetCastleData "aldeg_cas02.gat",2,0; + set @Defence,GetCastleData("aldeg_cas02.gat",3); + SetCastleData "aldeg_cas02.gat",3,@Defence-5; + if (GetCastleData("aldeg_cas02.gat",3) < 0) SetCastleData "aldeg_cas02.gat",3,0; + SetCastleData "aldeg_cas02.gat",1,@GIDa2; + Announce "Guild Base [" + GetCastleName("aldeg_cas02.gat") + "] has been taken by the [" + GetGuildName(@GIDa2) + "] guild.",0; + MapAnnounce "aldeg_cas02.gat","The emperium has been destroyed.",17; + GetCastleData "aldeg_cas02.gat",0,"::OnRecvCastleA02"; + SetCastleData "aldeg_cas02.gat",2,0; + SetCastleData "aldeg_cas02.gat",3,0; + SetCastleData "aldeg_cas02.gat",4,0; + SetCastleData "aldeg_cas02.gat",5,0; + SetCastleData "aldeg_cas02.gat",6,0; + SetCastleData "aldeg_cas02.gat",7,0; + SetCastleData "aldeg_cas02.gat",8,0; + SetCastleData "aldeg_cas02.gat",9,0; + SetCastleData "aldeg_cas02.gat",10,0; + SetCastleData "aldeg_cas02.gat",11,0; + SetCastleData "aldeg_cas02.gat",12,0; + SetCastleData "aldeg_cas02.gat",13,0; + SetCastleData "aldeg_cas02.gat",14,0; + SetCastleData "aldeg_cas02.gat",15,0; + SetCastleData "aldeg_cas02.gat",16,0; + SetCastleData "aldeg_cas02.gat",17,0; + SetCastleData "aldeg_cas02.gat",18,0; + SetCastleData "aldeg_cas02.gat",19,0; + SetCastleData "aldeg_cas02.gat",20,0; + SetCastleData "aldeg_cas02.gat",21,0; + SetCastleData "aldeg_cas02.gat",22,0; + SetCastleData "aldeg_cas02.gat",23,0; + SetCastleData "aldeg_cas02.gat",24,0; + SetCastleData "aldeg_cas02.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas02.gat",GetCastleData("aldeg_cas02.gat",1),6; + Monster "aldeg_cas02.gat",214,24,"EMPERIUM",1288,1,"Agit_A02::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("aldeg_cas02.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas02.gat",GetCastleData("aldeg_cas02.gat",1),4; + KillMonster "aldeg_cas02.gat","Agit_A02::OnAgitBreak"; + GvgOff "aldeg_cas02.gat"; + Break; +OnInit: +initnpctimer "Agit_A02_Timer"; +} + +aldeg_cas02.gat,1,1,1 script Agit_A02_Timer -1,{ +OnTimer500: + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1117,10; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1132,4; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1219,2; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1205,1; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1216,10; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1193,18; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1269,9; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1276,7; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1208,3; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1275,1; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1268,1; + areamonster "aldeg_cas02.gat",0,0,300,300,"--ja--",1272,1; + monster "aldeg_cas02.gat",213,23,"--ja--",1272,1; + monster "aldeg_cas02.gat",213,23,"--ja--",1270,4; + monster "aldeg_cas02.gat",213,23,"--ja--",1268,1; + monster "aldeg_cas02.gat",213,23,"--ja--",1219,1; + monster "aldeg_cas02.gat",213,23,"--ja--",1276,5; + Monster "aldeg_cas02.gat",214,24,"EMPERIUM",1288,1,"Agit_A02::OnAgitBreak"; + stopnpctimer "Agit_A02_Timer"; + Break; + } +//-------------------------------------------------------------------------------------------------------------------------- +aldeg_cas03.gat,206,32,0 script Agit_A03 -1,{ +OnAgitInit: + GetCastleData "aldeg_cas03.gat",0; + Break; +OnInterIfInit: + GetCastleData "aldeg_cas03.gat",0,"::OnRecvCastleA03"; + Break; +OnRecvCastleA03: + RequestGuildInfo GetCastleData("aldeg_cas03.gat",1); + Break; +OnAgitStart: + if (GetCastleData("aldeg_cas03.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas03.gat",GetCastleData("aldeg_cas03.gat",1),2; + Monster "aldeg_cas03.gat",206,32,"EMPERIUM",1288,1,"Agit_A03::OnAgitBreak"; + GvgOn "aldeg_cas03.gat"; + Break; +OnAgitBreak: + set @GIDa3,getcharid(2); + if (@GIDa3 <= 0) Break; + set @Economy,GetCastleData("aldeg_cas03.gat",2); + SetCastleData "aldeg_cas03.gat",2,@Economy-5; + if (GetCastleData("aldeg_cas03.gat",2) < 0) SetCastleData "aldeg_cas03.gat",2,0; + set @Defence,GetCastleData("aldeg_cas03.gat",3); + SetCastleData "aldeg_cas03.gat",3,@Defence-5; + if (GetCastleData("aldeg_cas01.gat",3) < 0) SetCastleData "aldeg_cas03.gat",3,0; + SetCastleData "aldeg_cas03.gat",1,@GIDa3; + Announce "Guild Base [" + GetCastleName("aldeg_cas03.gat") + "] has been taken by the [" + GetGuildName(@GIDa3) + "] guild.",0; + MapAnnounce "aldeg_cas03.gat","The emperium has been destroyed.",17; + GetCastleData "aldeg_cas03.gat",0,"::OnRecvCastleA03"; + SetCastleData "aldeg_cas03.gat",2,0; + SetCastleData "aldeg_cas03.gat",3,0; + SetCastleData "aldeg_cas03.gat",4,0; + SetCastleData "aldeg_cas03.gat",5,0; + SetCastleData "aldeg_cas03.gat",6,0; + SetCastleData "aldeg_cas03.gat",7,0; + SetCastleData "aldeg_cas03.gat",8,0; + SetCastleData "aldeg_cas03.gat",9,0; + SetCastleData "aldeg_cas03.gat",10,0; + SetCastleData "aldeg_cas03.gat",11,0; + SetCastleData "aldeg_cas03.gat",12,0; + SetCastleData "aldeg_cas03.gat",13,0; + SetCastleData "aldeg_cas03.gat",14,0; + SetCastleData "aldeg_cas03.gat",15,0; + SetCastleData "aldeg_cas03.gat",16,0; + SetCastleData "aldeg_cas03.gat",17,0; + SetCastleData "aldeg_cas03.gat",18,0; + SetCastleData "aldeg_cas03.gat",19,0; + SetCastleData "aldeg_cas03.gat",20,0; + SetCastleData "aldeg_cas03.gat",21,0; + SetCastleData "aldeg_cas03.gat",22,0; + SetCastleData "aldeg_cas03.gat",23,0; + SetCastleData "aldeg_cas03.gat",24,0; + SetCastleData "aldeg_cas03.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas03.gat",GetCastleData("aldeg_cas03.gat",1),6; + Monster "aldeg_cas03.gat",206,32,"EMPERIUM",1288,1,"Agit_A03::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("aldeg_cas03.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas03.gat",GetCastleData("aldeg_cas03.gat",1),4; + KillMonster "aldeg_cas03.gat","Agit_A03::OnAgitBreak"; + GvgOff "aldeg_cas03.gat"; + Break; +OnInit: +initnpctimer "Agit_A03_Timer"; +} + +aldeg_cas03.gat,1,1,1 script Agit_A03_Timer -1,{ +OnTimer500: + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1117,10; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1132,4; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1219,2; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1205,1; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1216,10; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1193,18; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1269,9; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1276,7; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1208,3; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1275,1; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1268,1; + areamonster "aldeg_cas03.gat",0,0,300,300,"--ja--",1272,1; + monster "aldeg_cas03.gat",205,31,"--ja--",1272,1; + monster "aldeg_cas03.gat",205,31,"--ja--",1270,4; + monster "aldeg_cas03.gat",205,31,"--ja--",1268,1; + monster "aldeg_cas03.gat",205,31,"--ja--",1219,1; + monster "aldeg_cas03.gat",205,31,"--ja--",1276,5; + Monster "aldeg_cas03.gat",206,32,"EMPERIUM",1288,1,"Agit_A03::OnAgitBreak"; + stopnpctimer "Agit_A03_Timer"; + Break; + } +//-------------------------------------------------------------------------------------------------------------------------- +aldeg_cas04.gat,36,218,0 script Agit_A04 -1,{ +OnAgitInit: + GetCastleData "aldeg_cas04.gat",0; + Break; +OnInterIfInit: + GetCastleData "aldeg_cas04.gat",0,"::OnRecvCastleA04"; + Break; +OnRecvCastleA04: + RequestGuildInfo GetCastleData("aldeg_cas04.gat",1); + Break; +OnAgitStart: + if (GetCastleData("aldeg_cas04.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas04.gat",GetCastleData("aldeg_cas04.gat",1),2; + Monster "aldeg_cas04.gat",36,218,"EMPERIUM",1288,1,"Agit_A04::OnAgitBreak"; + GvgOn "aldeg_cas04.gat"; + Break; +OnAgitBreak: + set @GIDa4,getcharid(2); + if (@GIDa4 <= 0) Break; + set @Economy,GetCastleData("aldeg_cas04.gat",2); + SetCastleData "aldeg_cas04.gat",2,@Economy-5; + if (GetCastleData("aldeg_cas04.gat",2) < 0) SetCastleData "aldeg_cas04.gat",2,0; + set @Defence,GetCastleData("aldeg_cas04.gat",3); + SetCastleData "aldeg_cas04.gat",3,@Defence-5; + if (GetCastleData("aldeg_cas04.gat",3) < 0) SetCastleData "aldeg_cas04.gat",3,0; + SetCastleData "aldeg_cas04.gat",1,@GIDa4; + Announce "Guild Base [" + GetCastleName("aldeg_cas04.gat") + "] has been taken by the [" + GetGuildName(@GIDa4) + "] guild.",0; + MapAnnounce "aldeg_cas04.gat","The emperium has been destroyed.",17; + GetCastleData "aldeg_cas04.gat",0,"::OnRecvCastleA04"; + SetCastleData "aldeg_cas04.gat",2,0; + SetCastleData "aldeg_cas04.gat",3,0; + SetCastleData "aldeg_cas04.gat",4,0; + SetCastleData "aldeg_cas04.gat",5,0; + SetCastleData "aldeg_cas04.gat",6,0; + SetCastleData "aldeg_cas04.gat",7,0; + SetCastleData "aldeg_cas04.gat",8,0; + SetCastleData "aldeg_cas04.gat",9,0; + SetCastleData "aldeg_cas04.gat",10,0; + SetCastleData "aldeg_cas04.gat",11,0; + SetCastleData "aldeg_cas04.gat",12,0; + SetCastleData "aldeg_cas04.gat",13,0; + SetCastleData "aldeg_cas04.gat",14,0; + SetCastleData "aldeg_cas04.gat",15,0; + SetCastleData "aldeg_cas04.gat",16,0; + SetCastleData "aldeg_cas04.gat",17,0; + SetCastleData "aldeg_cas04.gat",18,0; + SetCastleData "aldeg_cas04.gat",19,0; + SetCastleData "aldeg_cas04.gat",20,0; + SetCastleData "aldeg_cas04.gat",21,0; + SetCastleData "aldeg_cas04.gat",22,0; + SetCastleData "aldeg_cas04.gat",23,0; + SetCastleData "aldeg_cas04.gat",24,0; + SetCastleData "aldeg_cas04.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas04.gat",GetCastleData("aldeg_cas04.gat",1),6; + Monster "aldeg_cas04.gat",36,218,"EMPERIUM",1288,1,"Agit_A04::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("aldeg_cas04.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas04.gat",GetCastleData("aldeg_cas04.gat",1),4; + KillMonster "aldeg_cas04.gat","Agit_A04::OnAgitBreak"; + GvgOff "aldeg_cas04.gat"; + Break; +OnInit: +initnpctimer "Agit_A04_Timer"; +} + +aldeg_cas04.gat,1,1,1 script Agit_A04_Timer -1,{ +OnTimer500: + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1117,10; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1132,4; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1219,2; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1205,1; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1216,10; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1193,18; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1269,9; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1276,7; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1208,3; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1275,1; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1268,1; + areamonster "aldeg_cas04.gat",0,0,300,300,"--ja--",1272,1; + monster "aldeg_cas04.gat",36,217,"--ja--",1272,1; + monster "aldeg_cas04.gat",36,217,"--ja--",1270,4; + monster "aldeg_cas04.gat",36,217,"--ja--",1268,1; + monster "aldeg_cas04.gat",36,217,"--ja--",1219,1; + monster "aldeg_cas04.gat",36,217,"--ja--",1276,5; + Monster "aldeg_cas04.gat",36,218,"EMPERIUM",1288,1,"Agit_A04::OnAgitBreak"; + stopnpctimer "Agit_A04_Timer"; + Break; + } +//-------------------------------------------------------------------------------------------------------------------------- +aldeg_cas05.gat,28,102,0 script Agit_A05 -1,{ +OnAgitInit: + GetCastleData "aldeg_cas05.gat",0; + Break; +OnInterIfInit: + GetCastleData "aldeg_cas05.gat",0,"::OnRecvCastleA05"; + Break; +OnRecvCastleA05: + RequestGuildInfo GetCastleData("aldeg_cas05.gat",1); + Break; +OnAgitStart: + if (GetCastleData("aldeg_cas05.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas05.gat",GetCastleData("aldeg_cas05.gat",1),2; + Monster "aldeg_cas05.gat",28,102,"EMPERIUM",1288,1,"Agit_A05::OnAgitBreak"; + GvgOn "aldeg_cas05.gat"; + Break; +OnAgitBreak: + set @GIDa5,getcharid(2); + if (@GIDa5 <= 0) Break; + set @Economy,GetCastleData("aldeg_cas05.gat",2); + SetCastleData "aldeg_cas05.gat",2,@Economy-5; + if (GetCastleData("aldeg_cas05.gat",2) < 0) SetCastleData "aldeg_cas05.gat",2,0; + set @Defence,GetCastleData("aldeg_cas05.gat",3); + SetCastleData "aldeg_cas05.gat",3,@Defence-5; + if (GetCastleData("aldeg_cas05.gat",3) < 0) SetCastleData "aldeg_cas05.gat",3,0; + SetCastleData "aldeg_cas05.gat",1,@GIDa5; + Announce "Guild Base [" + GetCastleName("aldeg_cas05.gat") + "] has been taken by [" + GetGuildName(@GIDa5) + "] guild.",0; + MapAnnounce "aldeg_cas05.gat","The emperium has been destroyed.",17; + GetCastleData "aldeg_cas05.gat",0,"::OnRecvCastleA05"; + SetCastleData "aldeg_cas05.gat",2,0; + SetCastleData "aldeg_cas05.gat",3,0; + SetCastleData "aldeg_cas05.gat",4,0; + SetCastleData "aldeg_cas05.gat",5,0; + SetCastleData "aldeg_cas05.gat",6,0; + SetCastleData "aldeg_cas05.gat",7,0; + SetCastleData "aldeg_cas05.gat",8,0; + SetCastleData "aldeg_cas05.gat",9,0; + SetCastleData "aldeg_cas05.gat",10,0; + SetCastleData "aldeg_cas05.gat",11,0; + SetCastleData "aldeg_cas05.gat",12,0; + SetCastleData "aldeg_cas05.gat",13,0; + SetCastleData "aldeg_cas05.gat",14,0; + SetCastleData "aldeg_cas05.gat",15,0; + SetCastleData "aldeg_cas05.gat",16,0; + SetCastleData "aldeg_cas05.gat",17,0; + SetCastleData "aldeg_cas05.gat",18,0; + SetCastleData "aldeg_cas05.gat",19,0; + SetCastleData "aldeg_cas05.gat",20,0; + SetCastleData "aldeg_cas05.gat",21,0; + SetCastleData "aldeg_cas05.gat",22,0; + SetCastleData "aldeg_cas05.gat",23,0; + SetCastleData "aldeg_cas05.gat",24,0; + SetCastleData "aldeg_cas05.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "aldeg_cas05.gat",GetCastleData("aldeg_cas05.gat",1),6; + Monster "aldeg_cas05.gat",28,102,"EMPERIUM",1288,1,"Agit_A05::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("aldeg_cas05.gat",1) == 0) break; + MapRespawnGuildID "aldeg_cas05.gat",GetCastleData("aldeg_cas05.gat",1),4; + KillMonster "aldeg_cas05.gat","Agit_A05::OnAgitBreak"; + GvgOff "aldeg_cas05.gat"; + Break; +OnInit: +initnpctimer "Agit_A05_Timer"; +} + +aldeg_cas05.gat,1,1,1 script Agit_A05_Timer -1,{ +OnTimer500: + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1117,10; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1132,4; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1219,2; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1205,1; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1216,10; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1193,18; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1269,9; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1276,7; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1208,3; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1275,1; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1268,1; + areamonster "aldeg_cas05.gat",0,0,300,300,"--ja--",1272,1; + monster "aldeg_cas05.gat",27,101,"--ja--",1272,1; + monster "aldeg_cas05.gat",27,101,"--ja--",1270,4; + monster "aldeg_cas05.gat",27,101,"--ja--",1268,1; + monster "aldeg_cas05.gat",27,101,"--ja--",1219,1; + monster "aldeg_cas05.gat",27,101,"--ja--",1276,5; + Monster "aldeg_cas05.gat",28,102,"EMPERIUM",1288,1,"Agit_A05::OnAgitBreak"; + stopnpctimer "Agit_A05_Timer"; + Break; + } +//-------------------------------------------------------------------------------------------------------------------------- diff --git a/npc/guild/old/ev_agit_event.txt b/npc/guild/old/ev_agit_event.txt new file mode 100644 index 000000000..c68bec74a --- /dev/null +++ b/npc/guild/old/ev_agit_event.txt @@ -0,0 +1,34 @@ +//===== eAthena Script ======================================= +//= War of Emperium - WoE Auto-Start +//===== By: ================================================== +//= kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Auto Start for War of Emperium +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//============================================================ + +// Auto Start Agit NPC +prontera.gat,116,72,0 script Agit_Event -1,{ +OnInit: + if ($AgitStarted == 1) goto AgitReboot; + Break; +OnClock1900: + Announce "The War Of Emperium has begun!",8; + AgitStart; + set $AgitStarted,1; + Break; +OnClock2100: + Announce "The War Of Emperium is over!",8; + AgitEnd; + set $AgitStarted,0; + Break; +AgitReboot: + AgitStart; + set $AgitStarted,1; + Break; +} diff --git a/npc/guild/old/ev_agit_gefg.txt b/npc/guild/old/ev_agit_gefg.txt new file mode 100644 index 000000000..bcb6640ac --- /dev/null +++ b/npc/guild/old/ev_agit_gefg.txt @@ -0,0 +1,464 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Geffen Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Geffen Guild Wars +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//= 1.2 by Akaru (Castle spawn/conquering fix) +//============================================================ + + +gefg_cas01.gat,198,182,0 script Agit_B01 -1,{ +OnAgitInit: + GetCastleData "gefg_cas01.gat",0; + Break; +OnInterIfInit: + GetCastleData "gefg_cas01.gat",0,"::OnRecvCastleG01"; + Break; +OnRecvCastleG01: + RequestGuildInfo GetCastleData("gefg_cas01.gat",1); + Break; +OnAgitStart: + if (GetCastleData("gefg_cas01.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas01.gat",GetCastleData("gefg_cas01.gat",1),2; + Monster "gefg_cas01.gat",198,182,"EMPERIUM",1288,1,"Agit_B01::OnAgitBreak"; + GvgOn "gefg_cas01.gat"; + Break; +OnAgitBreak: + set @GIDa1,getcharid(2); + if (@GIDa1 <= 0) Break; + set @Economy,GetCastleData("gefg_cas01.gat",2); + SetCastleData "gefg_cas01.gat",2,@Economy-5; + if (GetCastleData("gefg_cas01.gat",2) < 0) SetCastleData "gefg_cas01.gat",2,0; + set @Defence,GetCastleData("gefg_cas01.gat",3); + SetCastleData "gefg_cas01.gat",3,@Defence-5; + if (GetCastleData("gefg_cas01.gat",3) < 0) SetCastleData "gefg_cas01.gat",3,0; + SetCastleData "gefg_cas01.gat",1,@GIDa1; + Announce "Guild Base [" + GetCastleName("gefg_cas01.gat") + "] has been taken by the [" + GetGuildName(@GIDa1) + "] guild.",0; + MapAnnounce "gefg_cas01.gat","The emperium has been destroyed.",17; + GetCastleData "gefg_cas01.gat",0,"::OnRecvCastleG01"; + SetCastleData "gefg_cas01.gat",2,0; + SetCastleData "gefg_cas01.gat",3,0; + SetCastleData "gefg_cas01.gat",4,0; + SetCastleData "gefg_cas01.gat",5,0; + SetCastleData "gefg_cas01.gat",6,0; + SetCastleData "gefg_cas01.gat",7,0; + SetCastleData "gefg_cas01.gat",8,0; + SetCastleData "gefg_cas01.gat",9,0; + SetCastleData "gefg_cas01.gat",10,0; + SetCastleData "gefg_cas01.gat",11,0; + SetCastleData "gefg_cas01.gat",12,0; + SetCastleData "gefg_cas01.gat",13,0; + SetCastleData "gefg_cas01.gat",14,0; + SetCastleData "gefg_cas01.gat",15,0; + SetCastleData "gefg_cas01.gat",16,0; + SetCastleData "gefg_cas01.gat",17,0; + SetCastleData "gefg_cas01.gat",18,0; + SetCastleData "gefg_cas01.gat",19,0; + SetCastleData "gefg_cas01.gat",20,0; + SetCastleData "gefg_cas01.gat",21,0; + SetCastleData "gefg_cas01.gat",22,0; + SetCastleData "gefg_cas01.gat",23,0; + SetCastleData "gefg_cas01.gat",24,0; + SetCastleData "gefg_cas01.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas01.gat",GetCastleData("gefg_cas01.gat",1),6; + Monster "gefg_cas01.gat",198,182,"EMPERIUM",1288,1,"Agit_B01::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("gefg_cas01.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas01.gat",GetCastleData("gefg_cas01.gat",1),4; + KillMonster "gefg_cas01.gat","Agit_B01::OnAgitBreak"; + GvgOff "gefg_cas01.gat"; + Break; +OnInit: +initnpctimer "Agit_B01_Timer"; +} + +gefg_cas01.gat,1,1,1 script Agit_B01_Timer -1,{ +OnTimer500: + if (GetCastleData("gefg_cas01.gat",1) != 0) break; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1117,10; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1263,11; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1102,10; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1130,10; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1140,20; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1163,9; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1275,1; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1219,1; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1150,1; + areamonster "gefg_cas01.gat",0,0,300,300,"--ja--",1159,1; + monster "gefg_cas01.gat",197,181,"--ja--",1203,1; + monster "gefg_cas01.gat",197,181,"--ja--",1087,1; + monster "gefg_cas01.gat",197,181,"--ja--",1213,10; + monster "gefg_cas01.gat",197,181,"--ja--",1189,10; + monster "gefg_cas01.gat",198,182,"EMPERIUM",1288,1,"Agit_B01::OnAgitBreak"; + stopnpctimer "Agit_B01_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +gefg_cas02.gat,176,178,0 script Agit_B02 -1,{ +OnAgitInit: + GetCastleData "gefg_cas02.gat",0; + Break; +OnInterIfInit: + GetCastleData "gefg_cas02.gat",0,"::OnRecvCastleG02"; + Break; +OnRecvCastleG02: + RequestGuildInfo GetCastleData("gefg_cas02.gat",1); + Break; +OnAgitStart: + if (GetCastleData("gefg_cas02.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas02.gat",GetCastleData("gefg_cas02.gat",1),2; + Monster "gefg_cas02.gat",176,178,"EMPERIUM",1288,1,"Agit_B02::OnAgitBreak"; + GvgOn "gefg_cas02.gat"; + Break; +OnAgitBreak: + set @GIDa2,getcharid(2); + if (@GIDa2 <= 0) Break; + set @Economy,GetCastleData("gefg_cas02.gat",2); + SetCastleData "gefg_cas02.gat",2,@Economy-5; + if (GetCastleData("gefg_cas02.gat",2) < 0) SetCastleData "gefg_cas02.gat",2,0; + set @Defence,GetCastleData("gefg_cas02.gat",3); + SetCastleData "gefg_cas02.gat",3,@Defence-5; + if (GetCastleData("gefg_cas02.gat",3) < 0) SetCastleData "gefg_cas02.gat",3,0; + SetCastleData "gefg_cas02.gat",1,@GIDa2; + Announce "Guild Base [" + GetCastleName("gefg_cas02.gat") + "] has been taken by the [" + GetGuildName(@GIDa2) + "] guild.",0; + MapAnnounce "gefg_cas02.gat","The emperium has been destroyed.",17; + GetCastleData "gefg_cas02.gat",0,"::OnRecvCastleG02"; + SetCastleData "gefg_cas02.gat",2,0; + SetCastleData "gefg_cas02.gat",3,0; + SetCastleData "gefg_cas02.gat",4,0; + SetCastleData "gefg_cas02.gat",5,0; + SetCastleData "gefg_cas02.gat",6,0; + SetCastleData "gefg_cas02.gat",7,0; + SetCastleData "gefg_cas02.gat",8,0; + SetCastleData "gefg_cas02.gat",9,0; + SetCastleData "gefg_cas02.gat",10,0; + SetCastleData "gefg_cas02.gat",11,0; + SetCastleData "gefg_cas02.gat",12,0; + SetCastleData "gefg_cas02.gat",13,0; + SetCastleData "gefg_cas02.gat",14,0; + SetCastleData "gefg_cas02.gat",15,0; + SetCastleData "gefg_cas02.gat",16,0; + SetCastleData "gefg_cas02.gat",17,0; + SetCastleData "gefg_cas02.gat",18,0; + SetCastleData "gefg_cas02.gat",19,0; + SetCastleData "gefg_cas02.gat",20,0; + SetCastleData "gefg_cas02.gat",21,0; + SetCastleData "gefg_cas02.gat",22,0; + SetCastleData "gefg_cas02.gat",23,0; + SetCastleData "gefg_cas02.gat",24,0; + SetCastleData "gefg_cas02.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas02.gat",GetCastleData("gefg_cas02.gat",1),6; + Monster "gefg_cas02.gat",176,178,"EMPERIUM",1288,1,"Agit_B02::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("gefg_cas02.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas02.gat",GetCastleData("gefg_cas02.gat",1),4; + KillMonster "gefg_cas02.gat","Agit_B02::OnAgitBreak"; + GvgOff "gefg_cas02.gat"; + Break; +OnInit: +initnpctimer "Agit_B02_Timer"; +} + +gefg_cas02.gat,1,1,1 script Agit_B02_Timer -1,{ +OnTimer500: + if (GetCastleData("gefg_cas02.gat",1) != 0) break; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1117,10; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1263,11; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1102,10; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1130,10; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1140,20; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1163,9; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1275,1; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1219,1; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1150,1; + areamonster "gefg_cas02.gat",0,0,300,300,"--ja--",1159,1; + monster "gefg_cas02.gat",176,178,"--ja--",1203,1; + monster "gefg_cas02.gat",176,178,"--ja--",1087,1; + monster "gefg_cas02.gat",176,178,"--ja--",1213,7; + monster "gefg_cas02.gat",176,178,"--ja--",1189,7; + Monster "gefg_cas02.gat",176,178,"EMPERIUM",1288,1,"Agit_B02::OnAgitBreak"; + stopnpctimer "Agit_B02_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +gefg_cas03.gat,245,167,0 script Agit_B03 -1,{ +OnAgitInit: + GetCastleData "gefg_cas03.gat",0; + Break; +OnInterIfInit: + GetCastleData "gefg_cas03.gat",0,"::OnRecvCastleG03"; + Break; +OnRecvCastleG03: + RequestGuildInfo GetCastleData("gefg_cas03.gat",1); + Break; +OnAgitStart: + if (GetCastleData("gefg_cas03.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas03.gat",GetCastleData("gefg_cas03.gat",1),2; + Monster "gefg_cas03.gat",245,167,"EMPERIUM",1288,1,"Agit_B03::OnAgitBreak"; + GvgOn "gefg_cas03.gat"; + Break; +OnAgitBreak: + set @GIDa3,getcharid(2); + if (@GIDa3 <= 0) Break; + set @Economy,GetCastleData("gefg_cas03.gat",2); + SetCastleData "gefg_cas03.gat",2,@Economy-5; + if (GetCastleData("gefg_cas03.gat",2) < 0) SetCastleData "gefg_cas03.gat",2,0; + set @Defence,GetCastleData("gefg_cas03.gat",3); + SetCastleData "gefg_cas03.gat",3,@Defence-5; + if (GetCastleData("gefg_cas01.gat",3) < 0) SetCastleData "gefg_cas03.gat",3,0; + SetCastleData "gefg_cas03.gat",1,@GIDa3; + Announce "Guild Base [" + GetCastleName("gefg_cas03.gat") + "] has been taken by the [" + GetGuildName(@GIDa3) + "] guild.",0; + MapAnnounce "gefg_cas03.gat","The emperium has been destroyed.",17; + GetCastleData "gefg_cas03.gat",0,"::OnRecvCastleG03"; + SetCastleData "gefg_cas03.gat",2,0; + SetCastleData "gefg_cas03.gat",3,0; + SetCastleData "gefg_cas03.gat",4,0; + SetCastleData "gefg_cas03.gat",5,0; + SetCastleData "gefg_cas03.gat",6,0; + SetCastleData "gefg_cas03.gat",7,0; + SetCastleData "gefg_cas03.gat",8,0; + SetCastleData "gefg_cas03.gat",9,0; + SetCastleData "gefg_cas03.gat",10,0; + SetCastleData "gefg_cas03.gat",11,0; + SetCastleData "gefg_cas03.gat",12,0; + SetCastleData "gefg_cas03.gat",13,0; + SetCastleData "gefg_cas03.gat",14,0; + SetCastleData "gefg_cas03.gat",15,0; + SetCastleData "gefg_cas03.gat",16,0; + SetCastleData "gefg_cas03.gat",17,0; + SetCastleData "gefg_cas03.gat",18,0; + SetCastleData "gefg_cas03.gat",19,0; + SetCastleData "gefg_cas03.gat",20,0; + SetCastleData "gefg_cas03.gat",21,0; + SetCastleData "gefg_cas03.gat",22,0; + SetCastleData "gefg_cas03.gat",23,0; + SetCastleData "gefg_cas03.gat",24,0; + SetCastleData "gefg_cas03.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas03.gat",GetCastleData("gefg_cas03.gat",1),6; + Monster "gefg_cas03.gat",245,167,"EMPERIUM",1288,1,"Agit_B03::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("gefg_cas03.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas03.gat",GetCastleData("gefg_cas03.gat",1),4; + KillMonster "gefg_cas03.gat","Agit_B03::OnAgitBreak"; + GvgOff "gefg_cas03.gat"; + Break; +OnInit: +initnpctimer "Agit_B03_Timer"; +} + +gefg_cas03.gat,1,1,1 script Agit_B03_Timer -1,{ +OnTimer500: + if (GetCastleData("gefg_cas03.gat",1) != 0) break; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1117,10; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1263,11; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1102,10; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1130,10; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1140,20; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1163,9; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1275,1; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1219,1; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1150,1; + areamonster "gefg_cas03.gat",0,0,300,300,"--ja--",1159,1; + monster "gefg_cas03.gat",244,166,"--ja--",1203,1; + monster "gefg_cas03.gat",244,166,"--ja--",1087,1; + monster "gefg_cas03.gat",244,166,"--ja--",1213,7; + monster "gefg_cas03.gat",244,166,"--ja--",1189,7; + Monster "gefg_cas03.gat",245,167,"EMPERIUM",1288,1,"Agit_B03::OnAgitBreak"; + stopnpctimer "Agit_B03_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +gefg_cas04.gat,174,178,0 script Agit_B04 -1,{ +OnAgitInit: + GetCastleData "gefg_cas04.gat",0; + Break; +OnInterIfInit: + GetCastleData "gefg_cas04.gat",0,"::OnRecvCastleG04"; + Break; +OnRecvCastleG04: + RequestGuildInfo GetCastleData("gefg_cas04.gat",1); + Break; +OnAgitStart: + if (GetCastleData("gefg_cas04.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas04.gat",GetCastleData("gefg_cas04.gat",1),2; + Monster "gefg_cas04.gat",174,178,"EMPERIUM",1288,1,"Agit_B04::OnAgitBreak"; + GvgOn "gefg_cas04.gat"; + Break; +OnAgitBreak: + set @GIDa4,getcharid(2); + if (@GIDa4 <= 0) Break; + set @Economy,GetCastleData("gefg_cas04.gat",2); + SetCastleData "gefg_cas04.gat",2,@Economy-5; + if (GetCastleData("gefg_cas04.gat",2) < 0) SetCastleData "gefg_cas04.gat",2,0; + set @Defence,GetCastleData("gefg_cas04.gat",3); + SetCastleData "gefg_cas04.gat",3,@Defence-5; + if (GetCastleData("gefg_cas04.gat",3) < 0) SetCastleData "gefg_cas04.gat",3,0; + SetCastleData "gefg_cas04.gat",1,@GIDa4; + Announce "Guild Base [" + GetCastleName("gefg_cas04.gat") + "] has been taken by the [" + GetGuildName(@GIDa4) + "] guild.",0; + MapAnnounce "gefg_cas04.gat","The emperium has been destroyed.",17; + GetCastleData "gefg_cas04.gat",0,"::OnRecvCastleG04"; + SetCastleData "gefg_cas04.gat",2,0; + SetCastleData "gefg_cas04.gat",3,0; + SetCastleData "gefg_cas04.gat",4,0; + SetCastleData "gefg_cas04.gat",5,0; + SetCastleData "gefg_cas04.gat",6,0; + SetCastleData "gefg_cas04.gat",7,0; + SetCastleData "gefg_cas04.gat",8,0; + SetCastleData "gefg_cas04.gat",9,0; + SetCastleData "gefg_cas04.gat",10,0; + SetCastleData "gefg_cas04.gat",11,0; + SetCastleData "gefg_cas04.gat",12,0; + SetCastleData "gefg_cas04.gat",13,0; + SetCastleData "gefg_cas04.gat",14,0; + SetCastleData "gefg_cas04.gat",15,0; + SetCastleData "gefg_cas04.gat",16,0; + SetCastleData "gefg_cas04.gat",17,0; + SetCastleData "gefg_cas04.gat",18,0; + SetCastleData "gefg_cas04.gat",19,0; + SetCastleData "gefg_cas04.gat",20,0; + SetCastleData "gefg_cas04.gat",21,0; + SetCastleData "gefg_cas04.gat",22,0; + SetCastleData "gefg_cas04.gat",23,0; + SetCastleData "gefg_cas04.gat",24,0; + SetCastleData "gefg_cas04.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas04.gat",GetCastleData("gefg_cas04.gat",1),6; + Monster "gefg_cas04.gat",174,178,"EMPERIUM",1288,1,"Agit_B04::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("gefg_cas04.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas04.gat",GetCastleData("gefg_cas04.gat",1),4; + KillMonster "gefg_cas04.gat","Agit_B04::OnAgitBreak"; + GvgOff "gefg_cas04.gat"; + Break; +OnInit: +initnpctimer "Agit_B04_Timer"; +} + +gefg_cas04.gat,1,1,1 script Agit_B04_Timer -1,{ +OnTimer500: + if (GetCastleData("gefg_cas04.gat",1) != 0) break; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1117,10; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1263,11; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1102,10; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1130,10; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1140,20; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1163,9; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1275,1; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1219,1; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1150,1; + areamonster "gefg_cas04.gat",0,0,300,300,"--ja--",1159,1; + monster "gefg_cas04.gat",174,177,"--ja--",1203,1; + monster "gefg_cas04.gat",174,177,"--ja--",1087,1; + monster "gefg_cas04.gat",174,177,"--ja--",1213,7; + monster "gefg_cas04.gat",174,177,"--ja--",1189,7; + Monster "gefg_cas04.gat",174,178,"EMPERIUM",1288,1,"Agit_B04::OnAgitBreak"; + stopnpctimer "Agit_B04_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +gefg_cas05.gat,194,184,0 script Agit_B05 -1,{ +OnAgitInit: + GetCastleData "gefg_cas05.gat",0; + Break; +OnInterIfInit: + GetCastleData "gefg_cas05.gat",0,"::OnRecvCastleG05"; + Break; +OnRecvCastleG05: + RequestGuildInfo GetCastleData("gefg_cas05.gat",1); + Break; +OnAgitStart: + if (GetCastleData("gefg_cas05.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas05.gat",GetCastleData("gefg_cas05.gat",1),2; + Monster "gefg_cas05.gat",194,184,"EMPERIUM",1288,1,"Agit_B05::OnAgitBreak"; + GvgOn "gefg_cas05.gat"; + Break; +OnAgitBreak: + set @GIDa5,getcharid(2); + if (@GIDa5 <= 0) Break; + set @Economy,GetCastleData("gefg_cas05.gat",2); + SetCastleData "gefg_cas05.gat",2,@Economy-5; + if (GetCastleData("gefg_cas05.gat",2) < 0) SetCastleData "gefg_cas05.gat",2,0; + set @Defence,GetCastleData("gefg_cas05.gat",3); + SetCastleData "gefg_cas05.gat",3,@Defence-5; + if (GetCastleData("gefg_cas05.gat",3) < 0) SetCastleData "gefg_cas05.gat",3,0; + SetCastleData "gefg_cas05.gat",1,@GIDa5; + Announce "Guild Base [" + GetCastleName("gefg_cas05.gat") + "] has been taken by [" + GetGuildName(@GIDa5) + "] guild.",0; + MapAnnounce "gefg_cas05.gat","The emperium has been destroyed.",17; + GetCastleData "gefg_cas05.gat",0,"::OnRecvCastleG05"; + SetCastleData "gefg_cas05.gat",2,0; + SetCastleData "gefg_cas05.gat",3,0; + SetCastleData "gefg_cas05.gat",4,0; + SetCastleData "gefg_cas05.gat",5,0; + SetCastleData "gefg_cas05.gat",6,0; + SetCastleData "gefg_cas05.gat",7,0; + SetCastleData "gefg_cas05.gat",8,0; + SetCastleData "gefg_cas05.gat",9,0; + SetCastleData "gefg_cas05.gat",10,0; + SetCastleData "gefg_cas05.gat",11,0; + SetCastleData "gefg_cas05.gat",12,0; + SetCastleData "gefg_cas05.gat",13,0; + SetCastleData "gefg_cas05.gat",14,0; + SetCastleData "gefg_cas05.gat",15,0; + SetCastleData "gefg_cas05.gat",16,0; + SetCastleData "gefg_cas05.gat",17,0; + SetCastleData "gefg_cas05.gat",18,0; + SetCastleData "gefg_cas05.gat",19,0; + SetCastleData "gefg_cas05.gat",20,0; + SetCastleData "gefg_cas05.gat",21,0; + SetCastleData "gefg_cas05.gat",22,0; + SetCastleData "gefg_cas05.gat",23,0; + SetCastleData "gefg_cas05.gat",24,0; + SetCastleData "gefg_cas05.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "gefg_cas05.gat",GetCastleData("gefg_cas05.gat",1),6; + Monster "gefg_cas05.gat",194,184,"EMPERIUM",1288,1,"Agit_B05::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("gefg_cas05.gat",1) == 0) break; + MapRespawnGuildID "gefg_cas05.gat",GetCastleData("gefg_cas05.gat",1),4; + KillMonster "gefg_cas05.gat","Agit_B05::OnAgitBreak"; + GvgOff "gefg_cas05.gat"; + Break; +OnInit: +initnpctimer "Agit_B05_Timer"; +} + +gefg_cas05.gat,1,1,1 script Agit_B05_Timer -1,{ +OnTimer500: + if (GetCastleData("gefg_cas05.gat",1) != 0) break; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1117,10; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1263,11; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1102,10; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1130,10; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1140,20; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1163,9; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1275,1; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1219,1; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1150,1; + areamonster "gefg_cas05.gat",0,0,300,300,"--ja--",1159,1; + monster "gefg_cas05.gat",194,184,"--ja--",1203,1; + monster "gefg_cas05.gat",194,184,"--ja--",1087,1; + monster "gefg_cas05.gat",194,184,"--ja--",1213,7; + monster "gefg_cas05.gat",194,184,"--ja--",1189,7; + Monster "gefg_cas05.gat",194,184,"EMPERIUM",1288,1,"Agit_B05::OnAgitBreak"; +} +//-------------------------------------------------------------------------------------------------------------------------- diff --git a/npc/guild/old/ev_agit_payg.txt b/npc/guild/old/ev_agit_payg.txt new file mode 100644 index 000000000..6857f10b1 --- /dev/null +++ b/npc/guild/old/ev_agit_payg.txt @@ -0,0 +1,466 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Payon Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Payon Guild Wars +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//= 1.2 by Akaru (Castle spawn/conquering fix) +//============================================================ + + +payg_cas01.gat,139,139,0 script Agit_C01 -1,{ +OnAgitInit: + GetCastleData "payg_cas01.gat",0; + Break; +OnInterIfInit: + GetCastleData "payg_cas01.gat",0,"::OnRecvCastleF01"; + Break; +OnRecvCastleF01: + RequestGuildInfo GetCastleData("payg_cas01.gat",1); + Break; +OnAgitStart: + if (GetCastleData("payg_cas01.gat",1) == 0) break; + MapRespawnGuildID "payg_cas01.gat",GetCastleData("payg_cas01.gat",1),2; + Monster "payg_cas01.gat",139,139,"EMPERIUM",1288,1,"Agit_C01::OnAgitBreak"; + GvgOn "payg_cas01.gat"; + Break; +OnAgitBreak: + set @GIDf1,getcharid(2); + if (@GIDf1 <= 0) Break; + set @Economy,GetCastleData("payg_cas01.gat",2); + SetCastleData "payg_cas01.gat",2,@Economy-5; + if (GetCastleData("payg_cas01.gat",2) < 0) SetCastleData "payg_cas01.gat",2,0; + set @Defence,GetCastleData("payg_cas01.gat",3); + SetCastleData "payg_cas01.gat",3,@Defence-5; + if (GetCastleData("payg_cas01.gat",3) < 0) SetCastleData "payg_cas01.gat",3,0; + SetCastleData "payg_cas01.gat",1,@GIDf1; + Announce "Guild Base [" + GetCastleName("payg_cas01.gat") + "] has been taken by the [" + GetGuildName(@GIDf1) + "] guild.",0; + MapAnnounce "payg_cas01.gat","The emperium has been destroyed.",17; + GetCastleData "payg_cas01.gat",0,"::OnRecvCastleF01"; + SetCastleData "payg_cas01.gat",2,0; + SetCastleData "payg_cas01.gat",3,0; + SetCastleData "payg_cas01.gat",4,0; + SetCastleData "payg_cas01.gat",5,0; + SetCastleData "payg_cas01.gat",6,0; + SetCastleData "payg_cas01.gat",7,0; + SetCastleData "payg_cas01.gat",8,0; + SetCastleData "payg_cas01.gat",9,0; + SetCastleData "payg_cas01.gat",10,0; + SetCastleData "payg_cas01.gat",11,0; + SetCastleData "payg_cas01.gat",12,0; + SetCastleData "payg_cas01.gat",13,0; + SetCastleData "payg_cas01.gat",14,0; + SetCastleData "payg_cas01.gat",15,0; + SetCastleData "payg_cas01.gat",16,0; + SetCastleData "payg_cas01.gat",17,0; + SetCastleData "payg_cas01.gat",18,0; + SetCastleData "payg_cas01.gat",19,0; + SetCastleData "payg_cas01.gat",20,0; + SetCastleData "payg_cas01.gat",21,0; + SetCastleData "payg_cas01.gat",22,0; + SetCastleData "payg_cas01.gat",23,0; + SetCastleData "payg_cas01.gat",24,0; + SetCastleData "payg_cas01.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "payg_cas01.gat",GetCastleData("payg_cas01.gat",1),6; + Monster "payg_cas01.gat",139,139,"EMPERIUM",1288,1,"Agit_C01::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("payg_cas01.gat",1) == 0) break; + MapRespawnGuildID "payg_cas01.gat",GetCastleData("payg_cas02.gat",1),4; + KillMonster "payg_cas01.gat","Agit_C01::OnAgitBreak"; + GvgOff "payg_cas01.gat"; + Break; +OnInit: +initnpctimer "Agit_C01_Timer"; +} + +payg_cas01.gat,1,1,1 script Agit_C01_Timer -1,{ +OnTimer500: + if (GetCastleData("payg_cas01.gat",1) != 0) break; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1277,10; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1208,10; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1262,5; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1102,5; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1150,1; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1115,1; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1129,11; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1276,5; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1282,4; + areamonster "payg_cas01.gat",0,0,300,300,"--ja--",1253,5; + monster "payg_cas01.gat",138,138,"--ja--",1150,1; + monster "payg_cas01.gat",138,138,"--ja--",1115,1; + monster "payg_cas01.gat",138,138,"--ja--",1208,6; + monster "payg_cas01.gat",138,138,"--ja--",1276,5; + monster "payg_cas01.gat",139,139,"EMPERIUM",1288,1,"Agit_C01::OnAgitBreak"; + stopnpctimer "Agit_C01_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +payg_cas02.gat,39,25,0 script Agit_C02 -1,{ +OnAgitInit: + GetCastleData "payg_cas02.gat",0; + Break; +OnInterIfInit: + GetCastleData "payg_cas02.gat",0,"::OnRecvCastleF02"; + Break; +OnRecvCastleF02: + RequestGuildInfo GetCastleData("payg_cas02.gat",1); + Break; +OnAgitStart: + if (GetCastleData("payg_cas02.gat",1) == 0) break; + MapRespawnGuildID "payg_cas02.gat",GetCastleData("payg_cas02.gat",1),2; + Monster "payg_cas02.gat",39,25,"EMPERIUM",1288,1,"Agit_C02::OnAgitBreak"; + GvgOn "payg_cas02.gat"; + Break; +OnAgitBreak: + set @GIDf2,getcharid(2); + if (@GIDf2 <= 0) Break; + set @Economy,GetCastleData("payg_cas02.gat",2); + SetCastleData "payg_cas02.gat",2,@Economy-5; + if (GetCastleData("payg_cas02.gat",2) < 0) SetCastleData "payg_cas02.gat",2,0; + set @Defence,GetCastleData("payg_cas02.gat",3); + SetCastleData "payg_cas02.gat",3,@Defence-5; + if (GetCastleData("payg_cas02.gat",3) < 0) SetCastleData "payg_cas02.gat",3,0; + SetCastleData "payg_cas02.gat",1,@GIDf2; + Announce "Guild Base [" + GetCastleName("payg_cas02.gat") + "] has been taken by the [" + GetGuildName(@GIDf2) + "] guild.",0; + MapAnnounce "payg_cas02.gat","The emperium has been destroyed.",17; + GetCastleData "payg_cas02.gat",0,"::OnRecvCastleF02"; + SetCastleData "payg_cas02.gat",2,0; + SetCastleData "payg_cas02.gat",3,0; + SetCastleData "payg_cas02.gat",4,0; + SetCastleData "payg_cas02.gat",5,0; + SetCastleData "payg_cas02.gat",6,0; + SetCastleData "payg_cas02.gat",7,0; + SetCastleData "payg_cas02.gat",8,0; + SetCastleData "payg_cas02.gat",9,0; + SetCastleData "payg_cas02.gat",10,0; + SetCastleData "payg_cas02.gat",11,0; + SetCastleData "payg_cas02.gat",12,0; + SetCastleData "payg_cas02.gat",13,0; + SetCastleData "payg_cas02.gat",14,0; + SetCastleData "payg_cas02.gat",15,0; + SetCastleData "payg_cas02.gat",16,0; + SetCastleData "payg_cas02.gat",17,0; + SetCastleData "payg_cas02.gat",18,0; + SetCastleData "payg_cas02.gat",19,0; + SetCastleData "payg_cas02.gat",20,0; + SetCastleData "payg_cas02.gat",21,0; + SetCastleData "payg_cas02.gat",22,0; + SetCastleData "payg_cas02.gat",23,0; + SetCastleData "payg_cas02.gat",24,0; + SetCastleData "payg_cas02.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "payg_cas02.gat",GetCastleData("payg_cas02.gat",1),6; + Monster "payg_cas02.gat",39,25,"EMPERIUM",1288,1,"Agit_C02::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("payg_cas02.gat",1) == 0) break; + MapRespawnGuildID "payg_cas02.gat",GetCastleData("payg_cas02.gat",1),4; + KillMonster "payg_cas02.gat","Agit_C02::OnAgitBreak"; + GvgOff "payg_cas02.gat"; + Break; +OnInit: +initnpctimer "Agit_C02_Timer"; +} + +payg_cas02.gat,1,1,1 script Agit_C02_Timer -1,{ +OnTimer500: + if (GetCastleData("payg_cas02.gat",1) != 0) break; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1277,10; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1208,10; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1262,5; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1102,5; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1150,1; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1115,1; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1129,11; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1276,5; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1282,4; + areamonster "payg_cas02.gat",0,0,300,300,"--ja--",1253,5; + monster "payg_cas02.gat",138,138,"--ja--",1150,1; + monster "payg_cas02.gat",138,138,"--ja--",1115,1; + monster "payg_cas02.gat",138,138,"--ja--",1208,6; + monster "payg_cas02.gat",138,138,"--ja--",1276,5; + monster "payg_cas02.gat",39,25,"EMPERIUM",1288,1,"Agit_C02::OnAgitBreak"; + stopnpctimer "Agit_C02_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +payg_cas03.gat,269,265,0 script Agit_C03 -1,{ +OnAgitInit: + GetCastleData "payg_cas03.gat",0; + Break; +OnInterIfInit: + GetCastleData "payg_cas03.gat",0,"::OnRecvCastleF03"; + Break; +OnRecvCastleF03: + RequestGuildInfo GetCastleData("payg_cas03.gat",1); + Break; +OnAgitStart: + if (GetCastleData("payg_cas03.gat",1) == 0) break; + MapRespawnGuildID "payg_cas03.gat",GetCastleData("payg_cas03.gat",1),2; + Monster "payg_cas03.gat",269,265,"EMPERIUM",1288,1,"Agit_C03::OnAgitBreak"; + GvgOn "payg_cas03.gat"; + Break; +OnAgitBreak: + set @GIDf3,getcharid(2); + if (@GIDf3 <= 0) Break; + set @Economy,GetCastleData("payg_cas03.gat",2); + SetCastleData "payg_cas03.gat",2,@Economy-5; + if (GetCastleData("payg_cas03.gat",2) < 0) SetCastleData "payg_cas03.gat",2,0; + set @Defence,GetCastleData("payg_cas03.gat",3); + SetCastleData "payg_cas03.gat",3,@Defence-5; + if (GetCastleData("payg_cas01.gat",3) < 0) SetCastleData "payg_cas03.gat",3,0; + SetCastleData "payg_cas03.gat",1,@GIDf3; + Announce "Guild Base [" + GetCastleName("payg_cas03.gat") + "] has been taken by the [" + GetGuildName(@GIDf3) + "] guild.",0; + MapAnnounce "payg_cas03.gat","The emperium has been destroyed.",17; + GetCastleData "payg_cas03.gat",0,"::OnRecvCastleF03"; + SetCastleData "payg_cas03.gat",2,0; + SetCastleData "payg_cas03.gat",3,0; + SetCastleData "payg_cas03.gat",4,0; + SetCastleData "payg_cas03.gat",5,0; + SetCastleData "payg_cas03.gat",6,0; + SetCastleData "payg_cas03.gat",7,0; + SetCastleData "payg_cas03.gat",8,0; + SetCastleData "payg_cas03.gat",9,0; + SetCastleData "payg_cas03.gat",10,0; + SetCastleData "payg_cas03.gat",11,0; + SetCastleData "payg_cas03.gat",12,0; + SetCastleData "payg_cas03.gat",13,0; + SetCastleData "payg_cas03.gat",14,0; + SetCastleData "payg_cas03.gat",15,0; + SetCastleData "payg_cas03.gat",16,0; + SetCastleData "payg_cas03.gat",17,0; + SetCastleData "payg_cas03.gat",18,0; + SetCastleData "payg_cas03.gat",19,0; + SetCastleData "payg_cas03.gat",20,0; + SetCastleData "payg_cas03.gat",21,0; + SetCastleData "payg_cas03.gat",22,0; + SetCastleData "payg_cas03.gat",23,0; + SetCastleData "payg_cas03.gat",24,0; + SetCastleData "payg_cas03.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "payg_cas03.gat",GetCastleData("payg_cas03.gat",1),6; + Monster "payg_cas03.gat",269,265,"EMPERIUM",1288,1,"Agit_C03::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("payg_cas02.gat",1) == 0) break; + MapRespawnGuildID "payg_cas03.gat",GetCastleData("payg_cas03.gat",1),4; + KillMonster "payg_cas03.gat","Agit_C03::OnAgitBreak"; + GvgOff "payg_cas03.gat"; + Break; +OnInit: +initnpctimer "Agit_C03_Timer"; +} + +payg_cas03.gat,1,1,1 script Agit_C03_Timer -1,{ +OnTimer500: + if (GetCastleData("payg_cas03.gat",1) != 0) break; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1277,10; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1208,10; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1262,5; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1102,5; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1150,1; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1115,1; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1129,11; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1276,5; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1282,4; + areamonster "payg_cas03.gat",0,0,300,300,"--ja--",1253,5; + monster "payg_cas03.gat",268,264,"--ja--",1150,1; + monster "payg_cas03.gat",268,264,"--ja--",1115,1; + monster "payg_cas03.gat",268,264,"--ja--",1208,6; + monster "payg_cas03.gat",268,264,"--ja--",1276,5; + monster "payg_cas03.gat",269,265,"EMPERIUM",1288,1,"Agit_C03::OnAgitBreak"; + stopnpctimer "Agit_C03_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +payg_cas04.gat,271,29,0 script Agit_C04 -1,{ +OnAgitInit: + GetCastleData "payg_cas04.gat",0; + Break; +OnInterIfInit: + GetCastleData "payg_cas04.gat",0,"::OnRecvCastleF04"; + Break; +OnRecvCastleF04: + RequestGuildInfo GetCastleData("payg_cas04.gat",1); + Break; +OnAgitStart: + if (GetCastleData("payg_cas04.gat",1) == 0) break; + MapRespawnGuildID "payg_cas04.gat",GetCastleData("payg_cas04.gat",1),2; + Monster "payg_cas04.gat",271,29,"EMPERIUM",1288,1,"Agit_C04::OnAgitBreak"; + GvgOn "payg_cas04.gat"; + Break; +OnAgitBreak: + set @GIDf4,getcharid(2); + if (@GIDf4 <= 0) Break; + set @Economy,GetCastleData("payg_cas04.gat",2); + SetCastleData "payg_cas04.gat",2,@Economy-5; + if (GetCastleData("payg_cas04.gat",2) < 0) SetCastleData "payg_cas04.gat",2,0; + set @Defence,GetCastleData("payg_cas04.gat",3); + SetCastleData "payg_cas04.gat",3,@Defence-5; + if (GetCastleData("payg_cas04.gat",3) < 0) SetCastleData "payg_cas04.gat",3,0; + SetCastleData "payg_cas04.gat",1,@GIDf4; + Announce "Guild Base [" + GetCastleName("payg_cas04.gat") + "] has been taken by the [" + GetGuildName(@GIDf4) + "] guild.",0; + MapAnnounce "payg_cas04.gat","The emperium has been destroyed.",17; + GetCastleData "payg_cas04.gat",0,"::OnRecvCastleF04"; + SetCastleData "payg_cas04.gat",2,0; + SetCastleData "payg_cas04.gat",3,0; + SetCastleData "payg_cas04.gat",4,0; + SetCastleData "payg_cas04.gat",5,0; + SetCastleData "payg_cas04.gat",6,0; + SetCastleData "payg_cas04.gat",7,0; + SetCastleData "payg_cas04.gat",8,0; + SetCastleData "payg_cas04.gat",9,0; + SetCastleData "payg_cas04.gat",10,0; + SetCastleData "payg_cas04.gat",11,0; + SetCastleData "payg_cas04.gat",12,0; + SetCastleData "payg_cas04.gat",13,0; + SetCastleData "payg_cas04.gat",14,0; + SetCastleData "payg_cas04.gat",15,0; + SetCastleData "payg_cas04.gat",16,0; + SetCastleData "payg_cas04.gat",17,0; + SetCastleData "payg_cas04.gat",18,0; + SetCastleData "payg_cas04.gat",19,0; + SetCastleData "payg_cas04.gat",20,0; + SetCastleData "payg_cas04.gat",21,0; + SetCastleData "payg_cas04.gat",22,0; + SetCastleData "payg_cas04.gat",23,0; + SetCastleData "payg_cas04.gat",24,0; + SetCastleData "payg_cas04.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "payg_cas04.gat",GetCastleData("payg_cas04.gat",1),6; + Monster "payg_cas04.gat",271,29,"EMPERIUM",1288,1,"Agit_C04::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("payg_cas04.gat",1) == 0) break; + MapRespawnGuildID "payg_cas04.gat",GetCastleData("payg_cas04.gat",1),4; + KillMonster "payg_cas04.gat","Agit_C04::OnAgitBreak"; + GvgOff "payg_cas04.gat"; + Break; +OnInit: +initnpctimer "Agit_C04_Timer"; +} + +payg_cas04.gat,1,1,1 script Agit_C04_Timer -1,{ +OnTimer500: + if (GetCastleData("payg_cas04.gat",1) != 0) break; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1277,10; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1208,10; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1262,5; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1102,5; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1150,1; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1115,1; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1129,11; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1276,5; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1282,4; + areamonster "payg_cas04.gat",0,0,300,300,"--ja--",1253,5; + monster "payg_cas04.gat",270,28,"--ja--",1150,1; + monster "payg_cas04.gat",270,28,"--ja--",1115,1; + monster "payg_cas04.gat",270,28,"--ja--",1208,6; + monster "payg_cas04.gat",270,28,"--ja--",1276,5; + monster "payg_cas04.gat",271,29,"EMPERIUM",1288,1,"Agit_C04::OnAgitBreak"; + stopnpctimer "Agit_C04_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +payg_cas05.gat,30,30,0 script Agit_C05 -1,{ +OnAgitInit: + GetCastleData "payg_cas05.gat",0; + Break; +OnInterIfInit: + GetCastleData "payg_cas05.gat",0,"::OnRecvCastleF05"; + Break; +OnRecvCastleF05: + RequestGuildInfo GetCastleData("payg_cas05.gat",1); + Break; +OnAgitStart: + if (GetCastleData("payg_cas05.gat",1) == 0) break; + MapRespawnGuildID "payg_cas05.gat",GetCastleData("payg_cas05.gat",1),2; + Monster "payg_cas05.gat",30,30,"EMPERIUM",1288,1,"Agit_C05::OnAgitBreak"; + GvgOn "payg_cas05.gat"; + Break; +OnAgitBreak: + set @GIDf5,getcharid(2); + if (@GIDf5 <= 0) Break; + set @Economy,GetCastleData("payg_cas05.gat",2); + SetCastleData "payg_cas05.gat",2,@Economy-5; + if (GetCastleData("payg_cas05.gat",2) < 0) SetCastleData "payg_cas05.gat",2,0; + set @Defence,GetCastleData("payg_cas05.gat",3); + SetCastleData "payg_cas05.gat",3,@Defence-5; + if (GetCastleData("payg_cas05.gat",3) < 0) SetCastleData "payg_cas05.gat",3,0; + SetCastleData "payg_cas05.gat",1,@GIDf5; + Announce "Guild Base [" + GetCastleName("payg_cas05.gat") + "] has been taken by [" + GetGuildName(@GIDf5) + "] guild.",0; + MapAnnounce "payg_cas05.gat","The emperium has been destroyed.",17; + GetCastleData "payg_cas05.gat",0,"::OnRecvCastleF05"; + SetCastleData "payg_cas05.gat",2,0; + SetCastleData "payg_cas05.gat",3,0; + SetCastleData "payg_cas05.gat",4,0; + SetCastleData "payg_cas05.gat",5,0; + SetCastleData "payg_cas05.gat",6,0; + SetCastleData "payg_cas05.gat",7,0; + SetCastleData "payg_cas05.gat",8,0; + SetCastleData "payg_cas05.gat",9,0; + SetCastleData "payg_cas05.gat",10,0; + SetCastleData "payg_cas05.gat",11,0; + SetCastleData "payg_cas05.gat",12,0; + SetCastleData "payg_cas05.gat",13,0; + SetCastleData "payg_cas05.gat",14,0; + SetCastleData "payg_cas05.gat",15,0; + SetCastleData "payg_cas05.gat",16,0; + SetCastleData "payg_cas05.gat",17,0; + SetCastleData "payg_cas05.gat",18,0; + SetCastleData "payg_cas05.gat",19,0; + SetCastleData "payg_cas05.gat",20,0; + SetCastleData "payg_cas05.gat",21,0; + SetCastleData "payg_cas05.gat",22,0; + SetCastleData "payg_cas05.gat",23,0; + SetCastleData "payg_cas05.gat",24,0; + SetCastleData "payg_cas05.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "payg_cas05.gat",GetCastleData("payg_cas05.gat",1),6; + Monster "payg_cas05.gat",30,30,"EMPERIUM",1288,1,"Agit_C05::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("payg_cas05.gat",1) == 0) break; + MapRespawnGuildID "payg_cas05.gat",GetCastleData("payg_cas05.gat",1),4; + KillMonster "payg_cas05.gat","Agit_C05::OnAgitBreak"; + GvgOff "payg_cas05.gat"; + Break; +OnInit: +initnpctimer "Agit_C05_Timer"; +} + +payg_cas05.gat,1,1,1 script Agit_C05_Timer -1,{ +OnTimer500: + if (GetCastleData("payg_cas05.gat",1) != 0) break; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1277,10; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1208,10; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1262,5; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1102,5; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1150,1; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1115,1; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1129,11; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1276,5; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1282,4; + areamonster "payg_cas05.gat",0,0,300,300,"--ja--",1253,5; + monster "payg_cas05.gat",30,30,"--ja--",1150,1; + monster "payg_cas05.gat",30,30,"--ja--",1115,1; + monster "payg_cas05.gat",30,30,"--ja--",1208,6; + monster "payg_cas05.gat",30,30,"--ja--",1276,5; + monster "payg_cas05.gat",30,30,"EMPERIUM",1288,1,"Agit_C05::OnAgitBreak"; + stopnpctimer "Agit_C05_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- diff --git a/npc/guild/old/ev_agit_prtg.txt b/npc/guild/old/ev_agit_prtg.txt new file mode 100644 index 000000000..85de425fd --- /dev/null +++ b/npc/guild/old/ev_agit_prtg.txt @@ -0,0 +1,476 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Prontera Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Prontera Guild Wars +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//= 1.2 by Akaru (Castle spawn/conquering fix) +//============================================================ + + +prtg_cas01.gat,197,197,0 script Agit_D01 -1,{ +OnAgitInit: + GetCastleData "prtg_cas01.gat",0; + Break; +OnInterIfInit: + GetCastleData "prtg_cas01.gat",0,"::OnRecvCastleP01"; + Break; +OnRecvCastleP01: + RequestGuildInfo GetCastleData("prtg_cas01.gat",1); + Break; +OnAgitStart: + if (GetCastleData("prtg_cas01.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),2; + Monster "prtg_cas01.gat",197,197,"EMPERIUM",1288,1,"Agit_D01::OnAgitBreak"; + GvgOn "prtg_cas01.gat"; + Break; +OnAgitBreak: + set @GIDp1,getcharid(2); + if (@GIDp1 <= 0) Break; + set @Economy,GetCastleData("prtg_cas01.gat",2); + SetCastleData "prtg_cas01.gat",2,@Economy-5; + if (GetCastleData("prtg_cas01.gat",2) < 0) SetCastleData "prtg_cas01.gat",2,0; + set @Defence,GetCastleData("prtg_cas01.gat",3); + SetCastleData "prtg_cas01.gat",3,@Defence-5; + if (GetCastleData("prtg_cas01.gat",3) < 0) SetCastleData "prtg_cas01.gat",3,0; + SetCastleData "prtg_cas01.gat",1,@GIDp1; + Announce "Guild Base [" + GetCastleName("prtg_cas01.gat") + "] has been taken by the [" + GetGuildName(@GIDp1) + "] guild.",0; + MapAnnounce "prtg_cas01.gat","The emperium has been destroyed.",17; + GetCastleData "prtg_cas01.gat",0,"::OnRecvCastleP01"; + SetCastleData "prtg_cas01.gat",2,0; + SetCastleData "prtg_cas01.gat",3,0; + SetCastleData "prtg_cas01.gat",4,0; + SetCastleData "prtg_cas01.gat",5,0; + SetCastleData "prtg_cas01.gat",6,0; + SetCastleData "prtg_cas01.gat",7,0; + SetCastleData "prtg_cas01.gat",8,0; + SetCastleData "prtg_cas01.gat",9,0; + SetCastleData "prtg_cas01.gat",10,0; + SetCastleData "prtg_cas01.gat",11,0; + SetCastleData "prtg_cas01.gat",12,0; + SetCastleData "prtg_cas01.gat",13,0; + SetCastleData "prtg_cas01.gat",14,0; + SetCastleData "prtg_cas01.gat",15,0; + SetCastleData "prtg_cas01.gat",16,0; + SetCastleData "prtg_cas01.gat",17,0; + SetCastleData "prtg_cas01.gat",18,0; + SetCastleData "prtg_cas01.gat",19,0; + SetCastleData "prtg_cas01.gat",20,0; + SetCastleData "prtg_cas01.gat",21,0; + SetCastleData "prtg_cas01.gat",22,0; + SetCastleData "prtg_cas01.gat",23,0; + SetCastleData "prtg_cas01.gat",24,0; + SetCastleData "prtg_cas01.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),6; + Monster "prtg_cas01.gat",197,197,"EMPERIUM",1288,1,"Agit_D01::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("prtg_cas01.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),4; + KillMonster "prtg_cas01.gat","Agit_D01::OnAgitBreak"; + GvgOff "prtg_cas01.gat"; + Break; +OnInit: +initnpctimer "Agit_D01_Timer"; +} + +prtg_cas01.gat,1,1,1 script Agit_D01_Timer -1,{ +OnTimer500: + if (GetCastleData("prtg_cas01.gat",1) != 0) break; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1163,15; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1132,10; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1219,5; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1268,5; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1251,1; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1252,1; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1276,5; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1259,1; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1283,1; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1275,1; + areamonster "prtg_cas01.gat",0,0,300,300,"--ja--",1200,1; + monster "prtg_cas01.gat",197,197,"--ja--",1268,1; + monster "prtg_cas01.gat",197,197,"--ja--",1251,1; + monster "prtg_cas01.gat",197,197,"--ja--",1252,1; + monster "prtg_cas01.gat",197,197,"--ja--",1219,2; + monster "prtg_cas01.gat",197,197,"--ja--",1276,5; + Monster "prtg_cas01.gat",197,197,"EMPERIUM",1288,1,"Agit_D01::OnAgitBreak"; + stopnpctimer "Agit_D01_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +prtg_cas02.gat,158,174,0 script Agit_D02 -1,{ +OnAgitInit: + GetCastleData "prtg_cas02.gat",0; + Break; +OnInterIfInit: + GetCastleData "prtg_cas02.gat",0,"::OnRecvCastleP02"; + Break; +OnRecvCastleP02: + RequestGuildInfo GetCastleData("prtg_cas02.gat",1); + Break; +OnAgitStart: + if (GetCastleData("prtg_cas02.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),2; + Monster "prtg_cas02.gat",158,174,"EMPERIUM",1288,1,"Agit_D02::OnAgitBreak"; + GvgOn "prtg_cas02.gat"; + Break; +OnAgitBreak: + set @GIDp2,getcharid(2); + if (@GIDp2 <= 0) Break; + set @Economy,GetCastleData("prtg_cas02.gat",2); + SetCastleData "prtg_cas02.gat",2,@Economy-5; + if (GetCastleData("prtg_cas02.gat",2) < 0) SetCastleData "prtg_cas02.gat",2,0; + set @Defence,GetCastleData("prtg_cas02.gat",3); + SetCastleData "prtg_cas02.gat",3,@Defence-5; + if (GetCastleData("prtg_cas02.gat",3) < 0) SetCastleData "prtg_cas02.gat",3,0; + SetCastleData "prtg_cas02.gat",1,@GIDp2; + Announce "Guild Base [" + GetCastleName("prtg_cas02.gat") + "] has been taken by the [" + GetGuildName(@GIDp2) + "] guild.",0; + MapAnnounce "prtg_cas02.gat","The emperium has been destroyed.",17; + GetCastleData "prtg_cas02.gat",0,"::OnRecvCastleP02"; + SetCastleData "prtg_cas02.gat",2,0; + SetCastleData "prtg_cas02.gat",3,0; + SetCastleData "prtg_cas02.gat",4,0; + SetCastleData "prtg_cas02.gat",5,0; + SetCastleData "prtg_cas02.gat",6,0; + SetCastleData "prtg_cas02.gat",7,0; + SetCastleData "prtg_cas02.gat",8,0; + SetCastleData "prtg_cas02.gat",9,0; + SetCastleData "prtg_cas02.gat",10,0; + SetCastleData "prtg_cas02.gat",11,0; + SetCastleData "prtg_cas02.gat",12,0; + SetCastleData "prtg_cas02.gat",13,0; + SetCastleData "prtg_cas02.gat",14,0; + SetCastleData "prtg_cas02.gat",15,0; + SetCastleData "prtg_cas02.gat",16,0; + SetCastleData "prtg_cas02.gat",17,0; + SetCastleData "prtg_cas02.gat",18,0; + SetCastleData "prtg_cas02.gat",19,0; + SetCastleData "prtg_cas02.gat",20,0; + SetCastleData "prtg_cas02.gat",21,0; + SetCastleData "prtg_cas02.gat",22,0; + SetCastleData "prtg_cas02.gat",23,0; + SetCastleData "prtg_cas02.gat",24,0; + SetCastleData "prtg_cas02.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),6; + Monster "prtg_cas02.gat",158,174,"EMPERIUM",1288,1,"Agit_D02::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("prtg_cas02.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),4; + KillMonster "prtg_cas02.gat","Agit_D02::OnAgitBreak"; + GvgOff "prtg_cas02.gat"; + Break; +OnInit: +initnpctimer "Agit_D02_Timer"; +} + +prtg_cas02.gat,1,1,1 script Agit_D02_Timer -1,{ +OnTimer500: + if (GetCastleData("prtg_cas02.gat",1) != 0) break; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1163,15; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1132,10; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1219,5; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1268,5; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1251,1; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1252,1; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1276,5; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1259,1; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1283,1; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1275,1; + areamonster "prtg_cas02.gat",0,0,300,300,"--ja--",1200,1; + monster "prtg_cas02.gat",157,174,"--ja--",1268,1; + monster "prtg_cas02.gat",157,174,"--ja--",1251,1; + monster "prtg_cas02.gat",157,174,"--ja--",1252,1; + monster "prtg_cas02.gat",157,174,"--ja--",1219,2; + monster "prtg_cas02.gat",157,174,"--ja--",1276,5; + Monster "prtg_cas02.gat",158,174,"EMPERIUM",1288,1,"Agit_D02::OnAgitBreak"; + stopnpctimer "Agit_D02_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +prtg_cas03.gat,17,221,0 script Agit_D03 -1,{ +OnAgitInit: + GetCastleData "prtg_cas03.gat",0; + Break; +OnInterIfInit: + GetCastleData "prtg_cas03.gat",0,"::OnRecvCastleP03"; + Break; +OnRecvCastleP03: + RequestGuildInfo GetCastleData("prtg_cas03.gat",1); + Break; +OnAgitStart: + if (GetCastleData("prtg_cas03.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),2; + Monster "prtg_cas03.gat",17,221,"EMPERIUM",1288,1,"Agit_D03::OnAgitBreak"; + GvgOn "prtg_cas03.gat"; + Break; +OnAgitBreak: + set @GIDp3,getcharid(2); + if (@GIDp3 <= 0) Break; + set @Economy,GetCastleData("prtg_cas03.gat",2); + SetCastleData "prtg_cas03.gat",2,@Economy-5; + if (GetCastleData("prtg_cas03.gat",2) < 0) SetCastleData "prtg_cas03.gat",2,0; + set @Defence,GetCastleData("prtg_cas03.gat",3); + SetCastleData "prtg_cas03.gat",3,@Defence-5; + if (GetCastleData("prtg_cas01.gat",3) < 0) SetCastleData "prtg_cas03.gat",3,0; + SetCastleData "prtg_cas03.gat",1,@GIDp3; + Announce "Guild Base [" + GetCastleName("prtg_cas03.gat") + "] has been taken by the [" + GetGuildName(@GIDp3) + "] guild.",0; + MapAnnounce "prtg_cas03.gat","The emperium has been destroyed.",17; + GetCastleData "prtg_cas03.gat",0,"::OnRecvCastleP03"; + SetCastleData "prtg_cas03.gat",2,0; + SetCastleData "prtg_cas03.gat",3,0; + SetCastleData "prtg_cas03.gat",4,0; + SetCastleData "prtg_cas03.gat",5,0; + SetCastleData "prtg_cas03.gat",6,0; + SetCastleData "prtg_cas03.gat",7,0; + SetCastleData "prtg_cas03.gat",8,0; + SetCastleData "prtg_cas03.gat",9,0; + SetCastleData "prtg_cas03.gat",10,0; + SetCastleData "prtg_cas03.gat",11,0; + SetCastleData "prtg_cas03.gat",12,0; + SetCastleData "prtg_cas03.gat",13,0; + SetCastleData "prtg_cas03.gat",14,0; + SetCastleData "prtg_cas03.gat",15,0; + SetCastleData "prtg_cas03.gat",16,0; + SetCastleData "prtg_cas03.gat",17,0; + SetCastleData "prtg_cas03.gat",18,0; + SetCastleData "prtg_cas03.gat",19,0; + SetCastleData "prtg_cas03.gat",20,0; + SetCastleData "prtg_cas03.gat",21,0; + SetCastleData "prtg_cas03.gat",22,0; + SetCastleData "prtg_cas03.gat",23,0; + SetCastleData "prtg_cas03.gat",24,0; + SetCastleData "prtg_cas03.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),6; + Monster "prtg_cas03.gat",17,221,"EMPERIUM",1288,1,"Agit_D03::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("prtg_cas03.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),4; + KillMonster "prtg_cas03.gat","Agit_D03::OnAgitBreak"; + GvgOff "prtg_cas03.gat"; + Break; +OnInit: +initnpctimer "Agit_D03_Timer"; +} + +prtg_cas03.gat,1,1,1 script Agit_D03_Timer -1,{ +OnTimer500: + if (GetCastleData("prtg_cas03.gat",1) != 0) break; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1163,15; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1132,10; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1219,5; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1268,5; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1251,1; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1252,1; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1276,5; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1259,1; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1283,1; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1275,1; + areamonster "prtg_cas03.gat",0,0,300,300,"--ja--",1200,1; + monster "prtg_cas03.gat",16,220,"--ja--",1268,1; + monster "prtg_cas03.gat",16,220,"--ja--",1251,1; + monster "prtg_cas03.gat",16,220,"--ja--",1252,1; + monster "prtg_cas03.gat",16,220,"--ja--",1219,2; + monster "prtg_cas03.gat",16,220,"--ja--",1276,5; + Monster "prtg_cas03.gat",17,221,"EMPERIUM",1288,1,"Agit_D03::OnAgitBreak"; + stopnpctimer "Agit_D03_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +prtg_cas04.gat,292,14,0 script Agit_D04 -1,{ +OnAgitInit: + GetCastleData "prtg_cas04.gat",0; + Break; +OnInterIfInit: + GetCastleData "prtg_cas04.gat",0,"::OnRecvCastleP04"; + Break; +OnRecvCastleP04: + RequestGuildInfo GetCastleData("prtg_cas04.gat",1); + Break; +OnAgitStart: + if (GetCastleData("prtg_cas04.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),2; + Monster "prtg_cas04.gat",292,14,"EMPERIUM",1288,1,"Agit_D04::OnAgitBreak"; + GvgOn "prtg_cas04.gat"; + Break; +OnAgitBreak: + set @GIDp4,getcharid(2); + if (@GIDp4 <= 0) Break; + set @Economy,GetCastleData("prtg_cas04.gat",2); + SetCastleData "prtg_cas04.gat",2,@Economy-5; + if (GetCastleData("prtg_cas04.gat",2) < 0) SetCastleData "prtg_cas04.gat",2,0; + set @Defence,GetCastleData("prtg_cas04.gat",3); + SetCastleData "prtg_cas04.gat",3,@Defence-5; + if (GetCastleData("prtg_cas04.gat",3) < 0) SetCastleData "prtg_cas04.gat",3,0; + SetCastleData "prtg_cas04.gat",1,@GIDp4; + Announce "Guild Base [" + GetCastleName("prtg_cas04.gat") + "] has been taken by the [" + GetGuildName(@GIDp4) + "] guild.",0; + MapAnnounce "prtg_cas04.gat","The emperium has been destroyed.",17; + GetCastleData "prtg_cas04.gat",0,"::OnRecvCastleP04"; + SetCastleData "prtg_cas04.gat",2,0; + SetCastleData "prtg_cas04.gat",3,0; + SetCastleData "prtg_cas04.gat",4,0; + SetCastleData "prtg_cas04.gat",5,0; + SetCastleData "prtg_cas04.gat",6,0; + SetCastleData "prtg_cas04.gat",7,0; + SetCastleData "prtg_cas04.gat",8,0; + SetCastleData "prtg_cas04.gat",9,0; + SetCastleData "prtg_cas04.gat",10,0; + SetCastleData "prtg_cas04.gat",11,0; + SetCastleData "prtg_cas04.gat",12,0; + SetCastleData "prtg_cas04.gat",13,0; + SetCastleData "prtg_cas04.gat",14,0; + SetCastleData "prtg_cas04.gat",15,0; + SetCastleData "prtg_cas04.gat",16,0; + SetCastleData "prtg_cas04.gat",17,0; + SetCastleData "prtg_cas04.gat",18,0; + SetCastleData "prtg_cas04.gat",19,0; + SetCastleData "prtg_cas04.gat",20,0; + SetCastleData "prtg_cas04.gat",21,0; + SetCastleData "prtg_cas04.gat",22,0; + SetCastleData "prtg_cas04.gat",23,0; + SetCastleData "prtg_cas04.gat",24,0; + SetCastleData "prtg_cas04.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),6; + Monster "prtg_cas04.gat",292,14,"EMPERIUM",1288,1,"Agit_D04::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("prtg_cas04.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),4; + KillMonster "prtg_cas04.gat","Agit_D04::OnAgitBreak"; + GvgOff "prtg_cas04.gat"; + Break; +OnInit: +initnpctimer "Agit_D04_Timer"; +} + +prtg_cas04.gat,1,1,1 script Agit_D04_Timer -1,{ +OnTimer500: + if (GetCastleData("prtg_cas04.gat",1) != 0) break; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1163,15; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1132,10; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1219,5; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1268,5; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1251,1; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1252,1; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1276,5; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1259,1; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1283,1; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1275,1; + areamonster "prtg_cas04.gat",0,0,300,300,"--ja--",1200,1; + monster "prtg_cas04.gat",291,14,"--ja--",1268,1; + monster "prtg_cas04.gat",291,14,"--ja--",1251,1; + monster "prtg_cas04.gat",291,14,"--ja--",1252,1; + monster "prtg_cas04.gat",291,14,"--ja--",1219,2; + monster "prtg_cas04.gat",291,14,"--ja--",1276,5; + Monster "prtg_cas04.gat",292,14,"EMPERIUM",1288,1,"Agit_D04::OnAgitBreak"; + stopnpctimer "Agit_D04_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- +prtg_cas05.gat,266,266,0 script Agit_D05 -1,{ +OnAgitInit: + GetCastleData "prtg_cas05.gat",0; + Break; +OnInterIfInit: + GetCastleData "prtg_cas05.gat",0,"::OnRecvCastleP05"; + Break; +OnRecvCastleP05: + RequestGuildInfo GetCastleData("prtg_cas05.gat",1); + Break; +OnAgitStart: + if (GetCastleData("prtg_cas05.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),2; + Monster "prtg_cas05.gat",266,266,"EMPERIUM",1288,1,"Agit_D05::OnAgitBreak"; + GvgOn "prtg_cas05.gat"; + Break; +OnAgitBreak: + set @GIDp5,getcharid(2); + if (@GIDp5 <= 0) Break; + set @Economy,GetCastleData("prtg_cas05.gat",2); + SetCastleData "prtg_cas05.gat",2,@Economy-5; + if (GetCastleData("prtg_cas05.gat",2) < 0) SetCastleData "prtg_cas05.gat",2,0; + set @Defence,GetCastleData("prtg_cas05.gat",3); + SetCastleData "prtg_cas05.gat",3,@Defence-5; + if (GetCastleData("prtg_cas05.gat",3) < 0) SetCastleData "prtg_cas05.gat",3,0; + SetCastleData "prtg_cas05.gat",1,@GIDp5; + Announce "Guild Base [" + GetCastleName("prtg_cas05.gat") + "] has been taken by [" + GetGuildName(@GIDp5) + "] guild.",0; + MapAnnounce "prtg_cas05.gat","The emperium has been destroyed.",17; + GetCastleData "prtg_cas05.gat",0,"::OnRecvCastleP05"; + SetCastleData "prtg_cas05.gat",2,0; + SetCastleData "prtg_cas05.gat",3,0; + SetCastleData "prtg_cas05.gat",4,0; + SetCastleData "prtg_cas05.gat",5,0; + SetCastleData "prtg_cas05.gat",6,0; + SetCastleData "prtg_cas05.gat",7,0; + SetCastleData "prtg_cas05.gat",8,0; + SetCastleData "prtg_cas05.gat",9,0; + SetCastleData "prtg_cas05.gat",10,0; + SetCastleData "prtg_cas05.gat",11,0; + SetCastleData "prtg_cas05.gat",12,0; + SetCastleData "prtg_cas05.gat",13,0; + SetCastleData "prtg_cas05.gat",14,0; + SetCastleData "prtg_cas05.gat",15,0; + SetCastleData "prtg_cas05.gat",16,0; + SetCastleData "prtg_cas05.gat",17,0; + SetCastleData "prtg_cas05.gat",18,0; + SetCastleData "prtg_cas05.gat",19,0; + SetCastleData "prtg_cas05.gat",20,0; + SetCastleData "prtg_cas05.gat",21,0; + SetCastleData "prtg_cas05.gat",22,0; + SetCastleData "prtg_cas05.gat",23,0; + SetCastleData "prtg_cas05.gat",24,0; + SetCastleData "prtg_cas05.gat",25,0; + Break; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),6; + Monster "prtg_cas05.gat",266,266,"EMPERIUM",1288,1,"Agit_D05::OnAgitBreak"; + Break; +OnAgitEnd: + if (GetCastleData("prtg_cas05.gat",1) == 0) break; + MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),4; + KillMonster "prtg_cas05.gat","Agit_D05::OnAgitBreak"; + GvgOff "prtg_cas05.gat"; + Break; +OnInit: +initnpctimer "Agit_D05_Timer"; +} + +prtg_cas05.gat,1,1,1 script Agit_D05_Timer -1,{ +OnTimer500: + if (GetCastleData("prtg_cas05.gat",1) != 0) break; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1163,15; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1132,10; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1219,5; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1268,5; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1251,1; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1252,1; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1276,5; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1259,1; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1283,1; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1275,1; + areamonster "prtg_cas05.gat",0,0,300,300,"--ja--",1200,1; + monster "prtg_cas05.gat",266,266,"--ja--",1268,1; + monster "prtg_cas05.gat",266,266,"--ja--",1251,1; + monster "prtg_cas05.gat",266,266,"--ja--",1252,1; + monster "prtg_cas05.gat",266,266,"--ja--",1219,2; + monster "prtg_cas05.gat",266,266,"--ja--",1276,5; + Monster "prtg_cas05.gat",266,266,"EMPERIUM",1288,1,"Agit_D05::OnAgitBreak"; + stopnpctimer "Agit_D05_Timer"; + Break; +} +//-------------------------------------------------------------------------------------------------------------------------- diff --git a/npc/guild/old/gefg_cas01.txt b/npc/guild/old/gefg_cas01.txt new file mode 100644 index 000000000..ccfdc658e --- /dev/null +++ b/npc/guild/old/gefg_cas01.txt @@ -0,0 +1,667 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas01 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in gefg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +gefg_cas01.gat,28,157,4 script Reprion#g1-6::ReprionNW 722,{ + set @GIDg1,GetCastleData("gefg_cas01.gat",1); + if (@GIDg1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG01: + FlagEmblem GetCastleData("gefg_cas01.gat",1); + break; +} + +gefg_cas01.gat,28,157,4 duplicate(ReprionNW) Reprion#g1-7 722 +gefg_cas01.gat,22,156,5 duplicate(ReprionNW) Reprion#g1-8 722 +gefg_cas01.gat,68,185,3 duplicate(ReprionNW) Reprion#g1-9 722 +gefg_cas01.gat,17,171,5 duplicate(ReprionNW) Reprion#g1-10 722 +gefg_cas01.gat,59,16,4 duplicate(ReprionNW) Reprion#g1-11 722 +gefg_cas01.gat,64,16,4 duplicate(ReprionNW) Reprion#g1-12 722 + +//================================================ +// Kafra Service +//================================================ +gefg_cas01.gat,96,173,0 script Kafra Service#gef1 117,{ + cutin "kafra_01",2; + set @GIDg1,GetCastleData("gefg_cas01.gat",1); + if (getcharid(2) == @GIDg1) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDg1) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDg1) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Geffen -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "geffen.gat",120,39; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("gefg_cas01.gat",9) == 1) break; + disablenpc "Kafra Service#gef1"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +gefg_cas01.gat,78,84,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDg1,GetCastleData("gefg_cas01.gat",1); + if (getcharid(2) != @GIDg1) goto L1n; + warp "gld_dun04.gat",39,258; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +gefg_cas01.gat,40,48,5 script Gnaucher 55,{ + set @GIDg1,GetCastleData("gefg_cas01.gat",1); + if (@GIDg1 == 0) goto LStart; + if (getcharid(2) != @GIDg1) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDg1)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Gnaucher ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDg1) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDg1) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Gnaucher ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Gnaucher ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDg1) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Gnaucher ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDg1) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Gnaucher ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("gefg_cas01.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("gefg_cas01.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("gefg_cas01.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("gefg_cas01.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("gefg_cas01.gat",4); + set @Economy,GetCastleData("gefg_cas01.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Gnaucher ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Gnaucher ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Gnaucher ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas01.gat",4,@TriggerE+1; + SetCastleData "gefg_cas01.gat",2,@Economy+1; + mes "[ Gnaucher ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Gnaucher ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Gnaucher ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas01.gat",4,@TriggerE+1; + SetCastleData "gefg_cas01.gat",2,@Economy+1; + mes "[ Gnaucher ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Gnaucher ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Gnaucher ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("gefg_cas01.gat",5); + set @Defence,GetCastleData("gefg_cas01.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Gnaucher ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Gnaucher ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Gnaucher ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas01.gat",5,@TriggerD+1; + SetCastleData "gefg_cas01.gat",3,@Defence+1; + mes "[ Gnaucher ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Gnaucher ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Gnaucher ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas01.gat",5,@TriggerD+1; + SetCastleData "gefg_cas01.gat",3,@Defence+1; + mes "[ Gnaucher ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Gnaucher ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Gnaucher ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("gefg_cas01.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Gnaucher ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("gefg_cas01.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("gefg_cas01.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("gefg_cas01.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("gefg_cas01.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("gefg_cas01.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("gefg_cas01.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("gefg_cas01.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("gefg_cas01.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Gnaucher ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Gnaucher ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "gefg_cas01.gat",@GDnum,1; + SetCastleData "gefg_cas01.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "gefg_cas01.gat",30,178,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas01.gat",64,180,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas01.gat",61,25,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas01.gat",61,44,"Archer Guardian",1285,1,"Guardian_B01::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas01.gat",189,43,"Archer Guardian",1285,1,"Guardian_B01::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas01.gat",51,192,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas01.gat",49,67,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas01.gat",181,14,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",7; + mes "[ Gnaucher ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Gnaucher ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Gnaucher ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Gnaucher ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("gefg_cas01.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Gnaucher ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Gnaucher ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Gnaucher ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#gef1"; + SetCastleData "gefg_cas01.gat",9,1; + mes "[ Gnaucher ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Gnaucher ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Gnaucher ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Gnaucher ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#gef1"; + SetCastleData "gefg_cas01.gat",9,0; + cutin "kafra_01",255; + mes "[ Gnaucher ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Gnaucher ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Gnaucher ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Gnaucher ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "gefg_cas01",155,112; + L6_1: + mes "[ Gnaucher ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Gnaucher ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Gnaucher ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Gnaucher ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "gefg_cas01.gat",1,0; + SetCastleData "gefg_cas01.gat",2,0; + SetCastleData "gefg_cas01.gat",3,0; + SetCastleData "gefg_cas01.gat",4,0; + SetCastleData "gefg_cas01.gat",5,0; + SetCastleData "gefg_cas01.gat",6,0; + SetCastleData "gefg_cas01.gat",7,0; + SetCastleData "gefg_cas01.gat",8,0; + SetCastleData "gefg_cas01.gat",9,0; + SetCastleData "gefg_cas01.gat",10,0; + SetCastleData "gefg_cas01.gat",11,0; + SetCastleData "gefg_cas01.gat",12,0; + SetCastleData "gefg_cas01.gat",13,0; + SetCastleData "gefg_cas01.gat",14,0; + SetCastleData "gefg_cas01.gat",15,0; + SetCastleData "gefg_cas01.gat",16,0; + SetCastleData "gefg_cas01.gat",17,0; + SetCastleData "gefg_cas01.gat",18,0; + SetCastleData "gefg_cas01.gat",19,0; + SetCastleData "gefg_cas01.gat",20,0; + SetCastleData "gefg_cas01.gat",21,0; + SetCastleData "gefg_cas01.gat",22,0; + SetCastleData "gefg_cas01.gat",23,0; + SetCastleData "gefg_cas01.gat",24,0; + SetCastleData "gefg_cas01.gat",25,0; + Announce "[" + GetGuildName(@GIDg1) + "] has surrendered Agit [" + GetCastleName("gefg_cas01.gat") + "]",0; + MapRespawnGuildID "gefg_cas01.gat",GetCastleData("gefg_cas01.gat",1),7; + break; + L7_2: + mes "[ Gnaucher ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/gefg_cas02.txt b/npc/guild/old/gefg_cas02.txt new file mode 100644 index 000000000..d03415a49 --- /dev/null +++ b/npc/guild/old/gefg_cas02.txt @@ -0,0 +1,667 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas02 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in gefg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +gefg_cas02.gat,65,130,5 script Yolbriger#g2-6::YolbrigerNW 722,{ + set @GIDg2,GetCastleData("gefg_cas02.gat",1); + if (@GIDg2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG02: + FlagEmblem GetCastleData("gefg_cas02.gat",1); + break; +} + +gefg_cas02.gat,30,123,5 duplicate(YolbrigerNW) Yolbriger#g2-7 722 +gefg_cas02.gat,65,139,6 duplicate(YolbrigerNW) Yolbriger#g2-8 722 +gefg_cas02.gat,37,177,6 duplicate(YolbrigerNW) Yolbriger#g2-9 722 +gefg_cas02.gat,37,168,6 duplicate(YolbrigerNW) Yolbriger#g2-10 722 +gefg_cas02.gat,68,47,2 duplicate(YolbrigerNW) Yolbriger#g2-11 722 +gefg_cas02.gat,68,36,2 duplicate(YolbrigerNW) Yolbriger#g2-12 722 + +//================================================ +// Kafra Service +//================================================ +gefg_cas02.gat,23,66,3 script Kafra Service#gef2 117,{ + cutin "kafra_01",2; + set @GIDg2,GetCastleData("gefg_cas02.gat",1); + if (getcharid(2) == @GIDg2) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDg2) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDg2) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Geffen -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "geffen.gat",120,39; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("gefg_cas02.gat",9) == 1) break; + disablenpc "Kafra Service#gef2"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +gefg_cas02.gat,145,115,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDg2,GetCastleData("gefg_cas02.gat",1); + if (getcharid(2) != @GIDg2) goto L1n; + warp "gld_dun04.gat",125,270; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +gefg_cas02.gat,12,66,5 script Esmark 55,{ + set @GIDg2,GetCastleData("gefg_cas02.gat",1); + if (@GIDg2 == 0) goto LStart; + if (getcharid(2) != @GIDg2) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDg2)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Esmark ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDg2) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDg2) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Esmark ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Esmark ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDg2) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Esmark ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDg2) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Esmark ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("gefg_cas02.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("gefg_cas02.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("gefg_cas02.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("gefg_cas02.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("gefg_cas02.gat",4); + set @Economy,GetCastleData("gefg_cas02.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Esmark ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Esmark ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Esmark ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas02.gat",4,@TriggerE+1; + SetCastleData "gefg_cas02.gat",2,@Economy+1; + mes "[ Esmark ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Esmark ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Esmark ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas02.gat",4,@TriggerE+1; + SetCastleData "gefg_cas02.gat",2,@Economy+1; + mes "[ Esmark ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Esmark ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Esmark ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("gefg_cas02.gat",5); + set @Defence,GetCastleData("gefg_cas02.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Esmark ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Esmark ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Esmark ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas02.gat",5,@TriggerD+1; + SetCastleData "gefg_cas02.gat",3,@Defence+1; + mes "[ Esmark ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Esmark ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Esmark ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas02.gat",5,@TriggerD+1; + SetCastleData "gefg_cas02.gat",3,@Defence+1; + mes "[ Esmark ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Esmark ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Esmark ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("gefg_cas02.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Esmark ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("gefg_cas02.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("gefg_cas02.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("gefg_cas02.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("gefg_cas02.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("gefg_cas02.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("gefg_cas02.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("gefg_cas02.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("gefg_cas02.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Esmark ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Esmark ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "gefg_cas02.gat",@GDnum,1; + SetCastleData "gefg_cas02.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "gefg_cas02.gat",22,135,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas02.gat",33,40,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas02.gat",158,11,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas02.gat",64,140,"Archer Guardian",1285,1,"Guardian_B01::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas02.gat",36,140,"Archer Guardian",1285,1,"Guardian_B01::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas02.gat",166,45,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas02.gat",10,39,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas02.gat",166,35,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",7; + mes "[ Esmark ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Esmark ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Esmark ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Esmark ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("gefg_cas02.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Esmark ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Esmark ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Esmark ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#gef2"; + SetCastleData "gefg_cas02.gat",9,1; + mes "[ Esmark ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Esmark ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Esmark ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Esmark ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#gef2"; + SetCastleData "gefg_cas02.gat",9,0; + cutin "kafra_01",255; + mes "[ Esmark ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Esmark ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Esmark ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Esmark ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "gefg_cas02",141,115; + L6_1: + mes "[ Esmark ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Esmark ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Esmark ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Esmark ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "gefg_cas02.gat",1,0; + SetCastleData "gefg_cas02.gat",2,0; + SetCastleData "gefg_cas02.gat",3,0; + SetCastleData "gefg_cas02.gat",4,0; + SetCastleData "gefg_cas02.gat",5,0; + SetCastleData "gefg_cas02.gat",6,0; + SetCastleData "gefg_cas02.gat",7,0; + SetCastleData "gefg_cas02.gat",8,0; + SetCastleData "gefg_cas02.gat",9,0; + SetCastleData "gefg_cas02.gat",10,0; + SetCastleData "gefg_cas02.gat",11,0; + SetCastleData "gefg_cas02.gat",12,0; + SetCastleData "gefg_cas02.gat",13,0; + SetCastleData "gefg_cas02.gat",14,0; + SetCastleData "gefg_cas02.gat",15,0; + SetCastleData "gefg_cas02.gat",16,0; + SetCastleData "gefg_cas02.gat",17,0; + SetCastleData "gefg_cas02.gat",18,0; + SetCastleData "gefg_cas02.gat",19,0; + SetCastleData "gefg_cas02.gat",20,0; + SetCastleData "gefg_cas02.gat",21,0; + SetCastleData "gefg_cas02.gat",22,0; + SetCastleData "gefg_cas02.gat",23,0; + SetCastleData "gefg_cas02.gat",24,0; + SetCastleData "gefg_cas02.gat",25,0; + Announce "[" + GetGuildName(@GIDg2) + "] has surrendered Agit [" + GetCastleName("gefg_cas02.gat") + "]",0; + MapRespawnGuildID "gefg_cas02.gat",GetCastleData("gefg_cas02.gat",1),7; + break; + L7_2: + mes "[ Esmark ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/gefg_cas03.txt b/npc/guild/old/gefg_cas03.txt new file mode 100644 index 000000000..4c8e46b47 --- /dev/null +++ b/npc/guild/old/gefg_cas03.txt @@ -0,0 +1,668 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas03 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in gefg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +gefg_cas03.gat,122,220,6 script Isinlife#g3-8::IsinlifeNW 722,{ + set @GIDg3,GetCastleData("gefg_cas03.gat",1); + if (@GIDg3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG03: + FlagEmblem GetCastleData("gefg_cas03.gat",1); + break; +} + +gefg_cas03.gat,122,229,6 duplicate(IsinlifeNW) Isinlife#g3-8 722 +gefg_cas03.gat,91,257,7 duplicate(IsinlifeNW) Isinlife#g3-9 722 +gefg_cas03.gat,52,276,7 duplicate(IsinlifeNW) Isinlife#g3-10 722 +gefg_cas03.gat,56,164,4 duplicate(IsinlifeNW) Isinlife#g3-11 722 +gefg_cas03.gat,65,164,4 duplicate(IsinlifeNW) Isinlife#g3-12 722 +gefg_cas03.gat,37,214,1 duplicate(IsinlifeNW) Isinlife#g3-13 722 +gefg_cas03.gat,34,208,1 duplicate(IsinlifeNW) Isinlife#g3-14 722 + +//================================================ +// Kafra Service +//================================================ +gefg_cas03.gat,116,89,5 script Kafra Service#gef3 117,{ + cutin "kafra_01",2; + set @GIDg3,GetCastleData("gefg_cas03.gat",1); + if (getcharid(2) == @GIDg3) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDg3) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDg3) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Geffen -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "geffen.gat",120,39; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("gefg_cas03.gat",9) == 1) break; + disablenpc "Kafra Service#gef3"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +gefg_cas03.gat,221,43,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDg3,GetCastleData("gefg_cas03.gat",1); + if (getcharid(2) != @GIDg3) goto L1n; + warp "gld_dun04.gat",268,251; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +gefg_cas03.gat,106,23,5 script Jyang 55,{ + set @GIDg3,GetCastleData("gefg_cas03.gat",1); + if (@GIDg3 == 0) goto LStart; + if (getcharid(2) != @GIDg3) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDg3)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Jyang ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDg3) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDg3) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Jyang ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Jyang ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDg3) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Jyang ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDg3) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Jyang ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("gefg_cas03.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("gefg_cas03.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("gefg_cas03.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("gefg_cas03.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("gefg_cas03.gat",4); + set @Economy,GetCastleData("gefg_cas03.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Jyang ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Jyang ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Jyang ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas03.gat",4,@TriggerE+1; + SetCastleData "gefg_cas03.gat",2,@Economy+1; + mes "[ Jyang ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Jyang ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Jyang ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas03.gat",4,@TriggerE+1; + SetCastleData "gefg_cas03.gat",2,@Economy+1; + mes "[ Jyang ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Jyang ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Jyang ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("gefg_cas03.gat",5); + set @Defence,GetCastleData("gefg_cas03.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Jyang ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Jyang ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Jyang ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas03.gat",5,@TriggerD+1; + SetCastleData "gefg_cas03.gat",3,@Defence+1; + mes "[ Jyang ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Jyang ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Jyang ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas03.gat",5,@TriggerD+1; + SetCastleData "gefg_cas03.gat",3,@Defence+1; + mes "[ Jyang ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Jyang ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Jyang ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("gefg_cas03.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Jyang ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("gefg_cas03.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("gefg_cas03.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("gefg_cas03.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("gefg_cas03.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("gefg_cas03.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("gefg_cas03.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("gefg_cas03.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("gefg_cas03.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Jyang ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Jyang ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "gefg_cas03.gat",@GDnum,1; + SetCastleData "gefg_cas03.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "gefg_cas03.gat",101,53,"Soldier Guardian",1287,1,"Guardian_B03::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas03.gat",158,40,"Soldier Guardian",1287,1,"Guardian_B03::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas03.gat",158,67,"Soldier Guardian",1287,1,"Guardian_B03::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas03.gat",229,53,"Archer Guardian",1285,1,"Guardian_B03::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas03.gat",248,53,"Archer Guardian",1285,1,"Guardian_B03::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas03.gat",122,53,"Knight Guardian",1286,1,"Guardian_B03::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas03.gat",243,35,"Knight Guardian",1286,1,"Guardian_B03::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas03.gat",234,33,"Knight Guardian",1286,1,"Guardian_B03::OnGuardianDied",7; + mes "[ Jyang ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Jyang ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Jyang ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Jyang ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("gefg_cas03.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Jyang ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Jyang ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Jyang ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#gef3"; + SetCastleData "gefg_cas03.gat",9,1; + mes "[ Jyang ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Jyang ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Jyang ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Jyang ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#gef3"; + SetCastleData "gefg_cas03.gat",9,0; + cutin "kafra_01",255; + mes "[ Jyang ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Jyang ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Jyang ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Jyang ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "gefg_cas03",270,290; + L6_1: + mes "[ Jyang ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Jyang ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Jyang ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Jyang ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "gefg_cas03.gat",1,0; + SetCastleData "gefg_cas03.gat",2,0; + SetCastleData "gefg_cas03.gat",3,0; + SetCastleData "gefg_cas03.gat",4,0; + SetCastleData "gefg_cas03.gat",5,0; + SetCastleData "gefg_cas03.gat",6,0; + SetCastleData "gefg_cas03.gat",7,0; + SetCastleData "gefg_cas03.gat",8,0; + SetCastleData "gefg_cas03.gat",9,0; + SetCastleData "gefg_cas03.gat",10,0; + SetCastleData "gefg_cas03.gat",11,0; + SetCastleData "gefg_cas03.gat",12,0; + SetCastleData "gefg_cas03.gat",13,0; + SetCastleData "gefg_cas03.gat",14,0; + SetCastleData "gefg_cas03.gat",15,0; + SetCastleData "gefg_cas03.gat",16,0; + SetCastleData "gefg_cas03.gat",17,0; + SetCastleData "gefg_cas03.gat",18,0; + SetCastleData "gefg_cas03.gat",19,0; + SetCastleData "gefg_cas03.gat",20,0; + SetCastleData "gefg_cas03.gat",21,0; + SetCastleData "gefg_cas03.gat",22,0; + SetCastleData "gefg_cas03.gat",23,0; + SetCastleData "gefg_cas03.gat",24,0; + SetCastleData "gefg_cas03.gat",25,0; + Announce "[" + GetGuildName(@GIDg3) + "] has surrendered Agit [" + GetCastleName("gefg_cas03.gat") + "]",0; + MapRespawnGuildID "gefg_cas03.gat",GetCastleData("gefg_cas03.gat",1),7; + break; + L7_2: + mes "[ Jyang ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/gefg_cas04.txt b/npc/guild/old/gefg_cas04.txt new file mode 100644 index 000000000..88b8649e3 --- /dev/null +++ b/npc/guild/old/gefg_cas04.txt @@ -0,0 +1,668 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas04 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in gefg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +gefg_cas04.gat,24,157,4 script Berigel#g4-4::BerigelNW 722,{ + set @GIDg4,GetCastleData("gefg_cas04.gat",1); + if (@GIDg4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG04: + FlagEmblem GetCastleData("gefg_cas04.gat",1); + break; +} + +gefg_cas04.gat,35,158,4 duplicate(BerigelNW) Berigel#g4-5 722 +gefg_cas04.gat,44,184,4 duplicate(BerigelNW) Berigel#g4-6 722 +gefg_cas04.gat,51,184,4 duplicate(BerigelNW) Berigel#g4-7 722 +gefg_cas04.gat,39,212,7 duplicate(BerigelNW) Berigel#g4-8 722 +gefg_cas04.gat,29,212,1 duplicate(BerigelNW) Berigel#g4-9 722 +gefg_cas04.gat,24,73,1 duplicate(BerigelNW) Berigel#g4-10 722 +gefg_cas04.gat,35,73,4 duplicate(BerigelNW) Berigel#g4-11 722 + +//================================================ +// Kafra Service +//================================================ +gefg_cas04.gat,59,70,3 script Kafra Service#gef4 117,{ + cutin "kafra_01",2; + set @GIDg4,GetCastleData("gefg_cas04.gat",1); + if (getcharid(2) == @GIDg4) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDg4) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDg4) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Geffen -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "geffen.gat",120,39; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("gefg_cas04.gat",9) == 1) break; + disablenpc "Kafra Service#gef4"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +gefg_cas04.gat,58,75,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDg4,GetCastleData("gefg_cas04.gat",1); + if (getcharid(2) != @GIDg4) goto L1n; + warp "gld_dun04.gat",268,108; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +gefg_cas04.gat,73,46,5 script Kelbany 55,{ + set @GIDg4,GetCastleData("gefg_cas04.gat",1); + if (@GIDg4 == 0) goto LStart; + if (getcharid(2) != @GIDg4) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDg4)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Kelbany ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDg4) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDg4) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Kelbany ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Kelbany ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDg4) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Kelbany ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDg4) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Kelbany ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("gefg_cas04.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("gefg_cas04.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("gefg_cas04.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("gefg_cas04.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("gefg_cas04.gat",4); + set @Economy,GetCastleData("gefg_cas04.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Kelbany ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Kelbany ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Kelbany ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas04.gat",4,@TriggerE+1; + SetCastleData "gefg_cas04.gat",2,@Economy+1; + mes "[ Kelbany ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Kelbany ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Kelbany ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas04.gat",4,@TriggerE+1; + SetCastleData "gefg_cas04.gat",2,@Economy+1; + mes "[ Kelbany ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Kelbany ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Kelbany ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("gefg_cas04.gat",5); + set @Defence,GetCastleData("gefg_cas04.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Kelbany ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Kelbany ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Kelbany ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas04.gat",5,@TriggerD+1; + SetCastleData "gefg_cas04.gat",3,@Defence+1; + mes "[ Kelbany ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Kelbany ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Kelbany ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas04.gat",5,@TriggerD+1; + SetCastleData "gefg_cas04.gat",3,@Defence+1; + mes "[ Kelbany ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Kelbany ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Kelbany ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("gefg_cas04.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Kelbany ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("gefg_cas04.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("gefg_cas04.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("gefg_cas04.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("gefg_cas04.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("gefg_cas04.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("gefg_cas04.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("gefg_cas04.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("gefg_cas04.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Kelbany ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Kelbany ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "gefg_cas04.gat",@GDnum,1; + SetCastleData "gefg_cas04.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "gefg_cas04.gat",49,203,"Soldier Guardian",1287,1,"Guardian_B04::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas04.gat",148,50,"Soldier Guardian",1287,1,"Guardian_B04::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas04.gat",57,20,"Soldier Guardian",1287,1,"Guardian_B04::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas04.gat",34,218,"Archer Guardian",1285,1,"Guardian_B04::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas04.gat",167,42,"Archer Guardian",1285,1,"Guardian_B04::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas04.gat",18,52,"Knight Guardian",1286,1,"Guardian_B04::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas04.gat",50,48,"Knight Guardian",1286,1,"Guardian_B04::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas04.gat",160,66,"Knight Guardian",1286,1,"Guardian_B04::OnGuardianDied",7; + mes "[ Kelbany ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Kelbany ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Kelbany ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Kelbany ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("gefg_cas04.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Kelbany ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Kelbany ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Kelbany ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#gef4"; + SetCastleData "gefg_cas04.gat",9,1; + mes "[ Kelbany ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Kelbany ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Kelbany ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Kelbany ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#gef4"; + SetCastleData "gefg_cas04.gat",9,0; + cutin "kafra_01",255; + mes "[ Kelbany ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Kelbany ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Kelbany ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Kelbany ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "gefg_cas04",116,118; + L6_1: + mes "[ Kelbany ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Kelbany ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Kelbany ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Kelbany ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "gefg_cas04.gat",1,0; + SetCastleData "gefg_cas04.gat",2,0; + SetCastleData "gefg_cas04.gat",3,0; + SetCastleData "gefg_cas04.gat",4,0; + SetCastleData "gefg_cas04.gat",5,0; + SetCastleData "gefg_cas04.gat",6,0; + SetCastleData "gefg_cas04.gat",7,0; + SetCastleData "gefg_cas04.gat",8,0; + SetCastleData "gefg_cas04.gat",9,0; + SetCastleData "gefg_cas04.gat",10,0; + SetCastleData "gefg_cas04.gat",11,0; + SetCastleData "gefg_cas04.gat",12,0; + SetCastleData "gefg_cas04.gat",13,0; + SetCastleData "gefg_cas04.gat",14,0; + SetCastleData "gefg_cas04.gat",15,0; + SetCastleData "gefg_cas04.gat",16,0; + SetCastleData "gefg_cas04.gat",17,0; + SetCastleData "gefg_cas04.gat",18,0; + SetCastleData "gefg_cas04.gat",19,0; + SetCastleData "gefg_cas04.gat",20,0; + SetCastleData "gefg_cas04.gat",21,0; + SetCastleData "gefg_cas04.gat",22,0; + SetCastleData "gefg_cas04.gat",23,0; + SetCastleData "gefg_cas04.gat",24,0; + SetCastleData "gefg_cas04.gat",25,0; + Announce "[" + GetGuildName(@GIDg4) + "] has surrendered Agit [" + GetCastleName("gefg_cas04.gat") + "]",0; + MapRespawnGuildID "gefg_cas04.gat",GetCastleData("gefg_cas04.gat",1),7; + break; + L7_2: + mes "[ Kelbany ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/gefg_cas05.txt b/npc/guild/old/gefg_cas05.txt new file mode 100644 index 000000000..02e30ee78 --- /dev/null +++ b/npc/guild/old/gefg_cas05.txt @@ -0,0 +1,666 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas05 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in gefg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +gefg_cas05.gat,77,185,7 script Melsedetsu#g5-6::MelsedetsuNW 722,{ + set @GIDg5,GetCastleData("gefg_cas05.gat",1); + if (@GIDg5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG05: + FlagEmblem GetCastleData("gefg_cas05.gat",1); + break; +} + +gefg_cas05.gat,92,181,0 duplicate(MelsedetsuNW) Melsedetsu#g5-7 722 +gefg_cas05.gat,83,158,1 duplicate(MelsedetsuNW) Melsedetsu#g5-8 722 +gefg_cas05.gat,62,144,7 duplicate(MelsedetsuNW) Melsedetsu#g5-9 722 +gefg_cas05.gat,62,66,4 duplicate(MelsedetsuNW) Melsedetsu#g5-10 722 +gefg_cas05.gat,69,66,4 duplicate(MelsedetsuNW) Melsedetsu#g5-11 722 + +//================================================ +// Kafra Service +//================================================ +gefg_cas05.gat,61,52,5 script Kafra Service#gef5 117,{ + cutin "kafra_01",2; + set @GIDg5,GetCastleData("gefg_cas05.gat",1); + if (getcharid(2) == @GIDg5) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDg5) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDg5) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Geffen -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "geffen.gat",120,39; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("gefg_cas05.gat",9) == 1) break; + disablenpc "Kafra Service#gef5"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +gefg_cas05.gat,65,22,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDg5,GetCastleData("gefg_cas05.gat",1); + if (getcharid(2) != @GIDg5) goto L1n; + warp "gld_dun04.gat",230,35; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +gefg_cas05.gat,70,52,5 script Beeor 55,{ + set @GIDg5,GetCastleData("gefg_cas05.gat",1); + if (@GIDg5 == 0) goto LStart; + if (getcharid(2) != @GIDg5) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDg5)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Beeor ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDg5) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDg5) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Beeor ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Beeor ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDg5) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Beeor ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDg5) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Beeor ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("gefg_cas05.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("gefg_cas05.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("gefg_cas05.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("gefg_cas05.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("gefg_cas05.gat",4); + set @Economy,GetCastleData("gefg_cas05.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Beeor ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Beeor ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Beeor ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas05.gat",4,@TriggerE+1; + SetCastleData "gefg_cas05.gat",2,@Economy+1; + mes "[ Beeor ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Beeor ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Beeor ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "gefg_cas05.gat",4,@TriggerE+1; + SetCastleData "gefg_cas05.gat",2,@Economy+1; + mes "[ Beeor ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Beeor ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Beeor ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("gefg_cas05.gat",5); + set @Defence,GetCastleData("gefg_cas05.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Beeor ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Beeor ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Beeor ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas05.gat",5,@TriggerD+1; + SetCastleData "gefg_cas05.gat",3,@Defence+1; + mes "[ Beeor ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Beeor ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Beeor ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "gefg_cas05.gat",5,@TriggerD+1; + SetCastleData "gefg_cas05.gat",3,@Defence+1; + mes "[ Beeor ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Beeor ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Beeor ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("gefg_cas05.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Beeor ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("gefg_cas05.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("gefg_cas05.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("gefg_cas05.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("gefg_cas05.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("gefg_cas05.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("gefg_cas05.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("gefg_cas05.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("gefg_cas05.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Beeor ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Beeor ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "gefg_cas05.gat",@GDnum,1; + SetCastleData "gefg_cas05.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "gefg_cas05.gat",54,149,"Soldier Guardian",1287,1,"Guardian_B05::OnGuardianDied",0; + if(@GDnum==11) guardian "gefg_cas05.gat",80,31,"Soldier Guardian",1287,1,"Guardian_B05::OnGuardianDied",1; + if(@GDnum==12) guardian "gefg_cas05.gat",52,32,"Soldier Guardian",1287,1,"Guardian_B05::OnGuardianDied",2; + if(@GDnum==13) guardian "gefg_cas05.gat",77,149,"Archer Guardian",1285,1,"Guardian_B05::OnGuardianDied",3; + if(@GDnum==14) guardian "gefg_cas05.gat",65,18,"Archer Guardian",1285,1,"Guardian_B05::OnGuardianDied",4; + if(@GDnum==15) guardian "gefg_cas05.gat",66,54,"Knight Guardian",1286,1,"Guardian_B05::OnGuardianDied",5; + if(@GDnum==16) guardian "gefg_cas05.gat",187,43,"Knight Guardian",1286,1,"Guardian_B05::OnGuardianDied",6; + if(@GDnum==17) guardian "gefg_cas05.gat",167,43,"Knight Guardian",1286,1,"Guardian_B05::OnGuardianDied",7; + mes "[ Beeor ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Beeor ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Beeor ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Beeor ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("gefg_cas05.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Beeor ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Beeor ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Beeor ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#gef5"; + SetCastleData "gefg_cas05.gat",9,1; + mes "[ Beeor ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Beeor ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Beeor ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Beeor ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#gef5"; + SetCastleData "gefg_cas05.gat",9,0; + cutin "kafra_01",255; + mes "[ Beeor ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Beeor ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Beeor ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Beeor ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "gefg_cas05",144,110; + L6_1: + mes "[ Beeor ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Beeor ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Beeor ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Beeor ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "gefg_cas05.gat",1,0; + SetCastleData "gefg_cas05.gat",2,0; + SetCastleData "gefg_cas05.gat",3,0; + SetCastleData "gefg_cas05.gat",4,0; + SetCastleData "gefg_cas05.gat",5,0; + SetCastleData "gefg_cas05.gat",6,0; + SetCastleData "gefg_cas05.gat",7,0; + SetCastleData "gefg_cas05.gat",8,0; + SetCastleData "gefg_cas05.gat",9,0; + SetCastleData "gefg_cas05.gat",10,0; + SetCastleData "gefg_cas05.gat",11,0; + SetCastleData "gefg_cas05.gat",12,0; + SetCastleData "gefg_cas05.gat",13,0; + SetCastleData "gefg_cas05.gat",14,0; + SetCastleData "gefg_cas05.gat",15,0; + SetCastleData "gefg_cas05.gat",16,0; + SetCastleData "gefg_cas05.gat",17,0; + SetCastleData "gefg_cas05.gat",18,0; + SetCastleData "gefg_cas05.gat",19,0; + SetCastleData "gefg_cas05.gat",20,0; + SetCastleData "gefg_cas05.gat",21,0; + SetCastleData "gefg_cas05.gat",22,0; + SetCastleData "gefg_cas05.gat",23,0; + SetCastleData "gefg_cas05.gat",24,0; + SetCastleData "gefg_cas05.gat",25,0; + Announce "[" + GetGuildName(@GIDg5) + "] has surrendered Agit [" + GetCastleName("gefg_cas05.gat") + "]",0; + MapRespawnGuildID "gefg_cas05.gat",GetCastleData("gefg_cas05.gat",1),7; + break; + L7_2: + mes "[ Beeor ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/gefg_flag.txt b/npc/guild/old/gefg_flag.txt new file mode 100644 index 000000000..5e0158cca --- /dev/null +++ b/npc/guild/old/gefg_flag.txt @@ -0,0 +1,359 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Geffen Guild Flags +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Castle Guild Flags in prontera and prt_gld +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//============================================================ + +//Geffen Castle 01 - Reprion + +geffen.gat,109,123,2 script Reprion#g1-1 722,{ + set @GIDg1,GetCastleData("gefg_cas01.gat",1); + if (@GIDg1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG01: + FlagEmblem GetCastleData("gefg_cas01.gat",1); + break; +} + +gef_fild13.gat,148,51,5 script Reprion#g1-2::ReprionW 722,{ + set @GIDg1,GetCastleData("gefg_cas01.gat",1); + if (@GIDg1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDg1) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "gefg_cas01.gat",83,47; + break; +OnRecvCastleG01: + FlagEmblem GetCastleData("gefg_cas01.gat",1); + break; +} + +gef_fild13.gat,155,54,5 duplicate(ReprionW) Reprion#g1-3 722 +gef_fild13.gat,212,79,6 duplicate(ReprionW) Reprion#g1-4 722 +gef_fild13.gat,211,71,6 duplicate(ReprionW) Reprion#g1-5 722 + + +//Geffen Castle 02 - Yolbriger + +geffen.gat,112,129,1 script Yolbriger#g2-1 722,{ + set @GIDg2,GetCastleData("gefg_cas02.gat",1); + if (@GIDg2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG02: + FlagEmblem GetCastleData("gefg_cas02.gat",1); + break; +} + +gef_fild13.gat,303,243,4 script Yolbriger#g2-2::YolbrigerW 722,{ + set @GIDg2,GetCastleData("gefg_cas02.gat",1); + if (@GIDg2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDg2) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "gefg_cas02.gat",23,66; + break; +OnRecvCastleG02: + FlagEmblem GetCastleData("gefg_cas02.gat",1); + break; +} + +gef_fild13.gat,312,243,4 duplicate(YolbrigerW) Yolbriger#g2-3 722 +gef_fild13.gat,290,243,4 duplicate(YolbrigerW) Yolbriger#g2-4 722 +gef_fild13.gat,324,243,4 duplicate(YolbrigerW) Yolbriger#g2-5 722 + +//Geffen Castle 03 - Isinlife + +geffen.gat,120,132,8 script Isinlife#g3-1 722,{ + set @GIDg3,GetCastleData("gefg_cas03.gat",1); + if (@GIDg3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleG03: + FlagEmblem GetCastleData("gefg_cas03.gat",1); + break; +} + +gef_fild13.gat,78,182,4 script Isinlife#g3-2::IsinlifeW 722,{ + set @GIDg3,GetCastleData("gefg_cas03.gat",1); + if (@GIDg3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDg3) goto LStartg3; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg3: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "gefg_cas03.gat",116,89; + break; +OnRecvCastleG03: + FlagEmblem GetCastleData("gefg_cas03.gat",1); + break; +} + +gef_fild13.gat,87,182,4 duplicate(IsinlifeW) Isinlife#g3-3 722 +gef_fild13.gat,73,295,7 duplicate(IsinlifeW) Isinlife#g3-4 722 +gef_fild13.gat,113,274,7 duplicate(IsinlifeW) Isinlife#g3-5 722 +gef_fild13.gat,144,235,6 duplicate(IsinlifeW) Isinlife#g3-6 722 +gef_fild13.gat,144,244,4 duplicate(IsinlifeW) Isinlife#g3-7 722 + +//Geffen Castle 04 - Berigel + +geffen.gat,127,130,7 script Berigel#g4-1 722,{ + set @GIDg4,GetCastleData("gefg_cas04.gat",1); + if (@GIDg4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleg04: + FlagEmblem GetCastleData("gefg_cas04.gat",1); + break; +} + +gef_fild13.gat,190,283,3 script Berigel#g4-2::BerigelW 722,{ + set @GIDg4,GetCastleData("gefg_cas04.gat",1); + if (@GIDg4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDg4) goto LStartg4; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg4: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "gefg_cas04.gat",59,70; + break; +OnRecvCastleG04: + FlagEmblem GetCastleData("gefg_cas04.gat",1); + break; +} + +gef_fild13.gat,199,274,3 duplicate(BerigelW) Berigel#g4-3 722 + +//Geffen Castle 05 - Melsedetsu + +geffen.gat,131,123,6 script Melsedetsu#g5-1 722,{ + set @GIDg5,GetCastleData("gefg_cas05.gat",1); + if (@GIDg5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleg05: + FlagEmblem GetCastleData("gefg_cas05.gat",1); + break; +} + +gef_fild13.gat,302,87,7 script Melsedetsu#g5-2::MelsedetsuW 722,{ + set @GIDg5,GetCastleData("gefg_cas05.gat",1); + if (@GIDg5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDg5) goto LStartg5; + mes "[ Edict of the Divine Rune Midgard Kingdom of Geffen ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Geffen,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDg5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDg5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDg5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg5: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "gefg_cas05.gat",61,52; + break; +OnRecvCastleG05: + FlagEmblem GetCastleData("gefg_cas05.gat",1); + break; +} + +gef_fild13.gat,313,83,0 duplicate(MelsedetsuW) Melsedetsu#g5-3 722 +gef_fild13.gat,252,51,2 duplicate(MelsedetsuW) Melsedetsu#g5-4 722 +gef_fild13.gat,26,147,2 duplicate(MelsedetsuW) Melsedetsu#g5-5 722 \ No newline at end of file diff --git a/npc/guild/old/gswitch.txt b/npc/guild/old/gswitch.txt new file mode 100644 index 000000000..b0b19aeb1 --- /dev/null +++ b/npc/guild/old/gswitch.txt @@ -0,0 +1,444 @@ +//Payon City for Athena by Script&DB Team + +payg_cas01.gat,287,5,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "payg_cas01.gat",120,59; +L2: + close; +} + +payg_cas01.gat,101,25,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun01.gat",186,165; +L2: +close; +} + +payg_cas02.gat,141,141,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "payg_cas02.gat",22,261; +L2: + close; +} + +payg_cas02.gat,278,247,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun01.gat.gat",54,165; +L2: +close; +} + + +payg_cas03.gat,155,165,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "payg_cas03.gat",50,261; +L2: + close; +} + +payg_cas03.gat,38,42,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun01.gat",54,39; +L2: +close; +} + + +payg_cas04.gat,143,45,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "payg_cas04.gat",38,285; +L2: + close; +} + +payg_cas04.gat,52,48,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun01.gat",186,39; +L2: +close; +} + + +payg_cas05.gat,153,129,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "payg_cas05.gat",277,250; +L2: + close; +} + +payg_cas05.gat,248,14,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun01.gat",223,202; +L2: +close; +} + +prtg_cas01.gat,15,208,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "prtg_cas01.gat",110,181; +L2: +close; +} + +prtg_cas01.gat,94,200,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun03.gat",28,251; +L2: +close; +} + +prtg_cas02.gat,206,228,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "prtg_cas02.gat",94,62; +L2: +close; +} + +prtg_cas02.gat,84,72,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun03.gat",164,268; +L2: +close; +} + +prtg_cas03.gat,192,134,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "prtg_cas03.gat",51,101; +L2: +close; +} + +prtg_cas03.gat,5,70,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun03.gat",164,179; +L2: +close; +} + +prtg_cas04.gat,274,160,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "prtg_cas04.gat",259,265; +L2: +close; +} + +prtg_cas04.gat,56,283,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun03.gat",268,203; +L2: +close; +} + +prtg_cas05.gat,280,177,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "prtg_cas05.gat",36,38; +L2: +close; +} + +prtg_cas05.gat,212,95,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun03.gat",199,28; +L2: +close; +} + +aldeg_cas01.gat,123,223,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "aldeg_cas01.gat",218,176; +L2: + close; +} + +aldeg_cas01.gat,123,233,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun02.gat",32,122; +L2: +close; +} + +aldeg_cas02.gat,139,234,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "aldeg_cas02.gat",78,75; +L2: + close; +} + +aldeg_cas02.gat,194,236,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun02.gat",79,30; +L2: +close; +} + +aldeg_cas03.gat,219,259,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "aldeg_cas03.gat",110,119; +L2: + close; +} + +aldeg_cas03.gat,200,177,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun02.gat",165,38; +L2: +close; +} + +aldeg_cas04.gat,79,15,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "aldeg_cas04.gat",67,117; +L2: + close; +} + +aldeg_cas04.gat,76,64,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun02.gat",160,148; +L2: +close; +} + +aldeg_cas05.gat,68,13,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: + warp "aldeg_cas05.gat",51,179; +L2: + close; +} + +aldeg_cas05.gat,22,205,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun02.gat",103,169; +L2: +close; +} + +gefg_cas01.gat,151,109,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gefg_cas01.gat",40,49; +L2: +close; +} + +gefg_cas01.gat,78,84,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun04.gat",39,258; +L2: +close; +} + +gefg_cas02.gat,137,113,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gefg_cas02.gat",12,67; +L2: +close; +} + +gefg_cas02.gat,167,40,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun04.gat",125,270; +L2: +close; +} + +gefg_cas03.gat,267,287,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gefg_cas03.gat",106,24; +L2: +close; +} + +gefg_cas03.gat,221,43,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun04.gat",268,251; +L2: +close; +} + +gefg_cas04.gat,113,115,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gefg_cas04.gat",73,47; +L2: +close; +} + +gefg_cas04.gat,58,75,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun04.gat",268,108; +L2: +close; +} + +gefg_cas05.gat,141,187,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gefg_cas05.gat",70,53; +L2: +close; +} + +gefg_cas05.gat,62,22,0 script Switch 111,{ +mes " "; +mes "There is a little switch here. Would you like to pull the switch down?"; +next; +menu "Yes",L1,"No",L2; +L1: +warp "gld_dun04.gat",230,35; +L2: +close; +} \ No newline at end of file diff --git a/npc/guild/old/guardian/aldeg_cas01_guardian.txt b/npc/guild/old/guardian/aldeg_cas01_guardian.txt new file mode 100644 index 000000000..9a636a2e1 --- /dev/null +++ b/npc/guild/old/guardian/aldeg_cas01_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas01 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in aldeg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +aldeg_cas01.gat,216,24,0 script Guardian_A01 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas01.gat",10) <= 0) goto Guardian2; + guardian "aldeg_cas01.gat",18,219,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("aldeg_cas01.gat",11) <= 0) goto Guardian3; + guardian "aldeg_cas01.gat",117,42,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("aldeg_cas01.gat",12) <= 0) goto Guardian4; + guardian "aldeg_cas01.gat",207,153,"Soldier Guardian",1287,1,"Guardian_A01::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("aldeg_cas01.gat",13) <= 0) goto Guardian5; + guardian "aldeg_cas01.gat",68,70,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("aldeg_cas01.gat",14) <= 0) goto Guardian6; + guardian "aldeg_cas01.gat",187,140,"Archer Guardian",1285,1,"Guardian_A01::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("aldeg_cas01.gat",15) <= 0) goto Guardian7; + guardian "aldeg_cas01.gat",62,204,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("aldeg_cas01.gat",16) <= 0) goto Guardian8; + guardian "aldeg_cas01.gat",113,100,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("aldeg_cas01.gat",17) <= 0) goto NoSpawn; + guardian "aldeg_cas01.gat",211,174,"Knight Guardian",1286,1,"Guardian_A01::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "aldeg_cas01.gat","Guardian_A01::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas01.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/aldeg_cas02_guardian.txt b/npc/guild/old/guardian/aldeg_cas02_guardian.txt new file mode 100644 index 000000000..64671a472 --- /dev/null +++ b/npc/guild/old/guardian/aldeg_cas02_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas02 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in aldeg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +aldeg_cas02.gat,214,24,0 script Guardian_A02 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas02.gat",10) <= 0) goto Guardian2; + guardian "aldeg_cas02.gat",22,186,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("aldeg_cas02.gat",11) <= 0) goto Guardian3; + guardian "aldeg_cas02.gat",88,31,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("aldeg_cas02.gat",12) <= 0) goto Guardian4; + guardian "aldeg_cas02.gat",207,176,"Soldier Guardian",1287,1,"Guardian_A02::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("aldeg_cas02.gat",13) <= 0) goto Guardian5; + guardian "aldeg_cas02.gat",50,201,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("aldeg_cas02.gat",14) <= 0) goto Guardian6; + guardian "aldeg_cas02.gat",197,146,"Archer Guardian",1285,1,"Guardian_A02::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("aldeg_cas02.gat",15) <= 0) goto Guardian7; + guardian "aldeg_cas02.gat",71,193,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("aldeg_cas02.gat",16) <= 0) goto Guardian8; + guardian "aldeg_cas02.gat",88,31,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("aldeg_cas02.gat",17) <= 0) goto NoSpawn; + guardian "aldeg_cas02.gat",219,148,"Knight Guardian",1286,1,"Guardian_A02::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "aldeg_cas02.gat","Guardian_A02::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas02.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/aldeg_cas03_guardian.txt b/npc/guild/old/guardian/aldeg_cas03_guardian.txt new file mode 100644 index 000000000..30fd74dd7 --- /dev/null +++ b/npc/guild/old/guardian/aldeg_cas03_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas03 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in aldeg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +aldeg_cas03.gat,206,32,0 script Guardian_A03 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas03.gat",10) <= 0) goto Guardian2; + guardian "aldeg_cas03.gat",57,216,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("aldeg_cas03.gat",11) <= 0) goto Guardian3; + guardian "aldeg_cas03.gat",80,108,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("aldeg_cas03.gat",12) <= 0) goto Guardian4; + guardian "aldeg_cas03.gat",199,183,"Soldier Guardian",1287,1,"Guardian_A03::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("aldeg_cas03.gat",13) <= 0) goto Guardian5; + guardian "aldeg_cas03.gat",98,267,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("aldeg_cas03.gat",14) <= 0) goto Guardian6; + guardian "aldeg_cas03.gat",91,88,"Archer Guardian",1285,1,"Guardian_A03::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("aldeg_cas03.gat",15) <= 0) goto Guardian7; + guardian "aldeg_cas03.gat",78,121,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("aldeg_cas03.gat",16) <= 0) goto Guardian8; + guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("aldeg_cas03.gat",17) <= 0) goto NoSpawn; + guardian "aldeg_cas03.gat",200,164,"Knight Guardian",1286,1,"Guardian_A03::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "aldeg_cas03.gat","Guardian_A03::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas03.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/aldeg_cas04_guardian.txt b/npc/guild/old/guardian/aldeg_cas04_guardian.txt new file mode 100644 index 000000000..26b6ccd79 --- /dev/null +++ b/npc/guild/old/guardian/aldeg_cas04_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas04 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in aldeg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +aldeg_cas04.gat,36,218,0 script Guardian_A04 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas04.gat",10) <= 0) goto Guardian2; + guardian "aldeg_cas04.gat",181,33,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("aldeg_cas04.gat",11) <= 0) goto Guardian3; + guardian "aldeg_cas04.gat",50,68,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("aldeg_cas04.gat",12) <= 0) goto Guardian4; + guardian "aldeg_cas04.gat",50,119,"Soldier Guardian",1287,1,"Guardian_A04::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("aldeg_cas04.gat",13) <= 0) goto Guardian5; + guardian "aldeg_cas04.gat",169,49,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("aldeg_cas04.gat",14) <= 0) goto Guardian6; + guardian "aldeg_cas04.gat",133,196,"Archer Guardian",1285,1,"Guardian_A04::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("aldeg_cas04.gat",15) <= 0) goto Guardian7; + guardian "aldeg_cas04.gat",177,87,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("aldeg_cas04.gat",16) <= 0) goto Guardian8; + guardian "aldeg_cas04.gat",50,119,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("aldeg_cas04.gat",17) <= 0) goto NoSpawn; + guardian "aldeg_cas04.gat",133,196,"Knight Guardian",1286,1,"Guardian_A04::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "aldeg_cas04.gat","Guardian_A04::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas04.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/aldeg_cas05_guardian.txt b/npc/guild/old/guardian/aldeg_cas05_guardian.txt new file mode 100644 index 000000000..9e8a400ec --- /dev/null +++ b/npc/guild/old/guardian/aldeg_cas05_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas05 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in aldeg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +aldeg_cas05.gat,28,102,0 script Guardian_A05 -1,{ +OnAgitInit: + if (GetCastleData("aldeg_cas05.gat",10) <= 0) goto Guardian2; + guardian "aldeg_cas05.gat",157,192,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("aldeg_cas05.gat",11) <= 0) goto Guardian3; + guardian "aldeg_cas05.gat",194,46,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("aldeg_cas05.gat",12) <= 0) goto Guardian4; + guardian "aldeg_cas05.gat",146,214,"Soldier Guardian",1287,1,"Guardian_A05::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("aldeg_cas05.gat",13) <= 0) goto Guardian5; + guardian "aldeg_cas05.gat",223,95,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("aldeg_cas05.gat",14) <= 0) goto Guardian6; + guardian "aldeg_cas05.gat",131,223,"Archer Guardian",1285,1,"Guardian_A05::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("aldeg_cas05.gat",15) <= 0) goto Guardian7; + guardian "aldeg_cas05.gat",191,68,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("aldeg_cas05.gat",16) <= 0) goto Guardian8; + guardian "aldeg_cas05.gat",160,194,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("aldeg_cas05.gat",17) <= 0) goto NoSpawn; + guardian "aldeg_cas05.gat",49,225,"Knight Guardian",1286,1,"Guardian_A05::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "aldeg_cas05.gat","Guardian_A05::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "aldeg_cas05.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/gefg_cas01_guardian.txt b/npc/guild/old/guardian/gefg_cas01_guardian.txt new file mode 100644 index 000000000..06996e4d5 --- /dev/null +++ b/npc/guild/old/guardian/gefg_cas01_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas01 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in gefg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +gefg_cas01.gat,198,182,0 script Guardian_B01 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas01.gat",10) <= 0) goto Guardian2; + guardian "gefg_cas01.gat",30,178,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("gefg_cas01.gat",11) <= 0) goto Guardian3; + guardian "gefg_cas01.gat",64,180,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("gefg_cas01.gat",12) <= 0) goto Guardian4; + guardian "gefg_cas01.gat",61,25,"Soldier Guardian",1287,1,"Guardian_B01::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("gefg_cas01.gat",13) <= 0) goto Guardian5; + guardian "gefg_cas01.gat",61,44,"Archer Guardian",1285,1,"Guardian_B01::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("gefg_cas01.gat",14) <= 0) goto Guardian6; + guardian "gefg_cas01.gat",189,43,"Archer Guardian",1285,1,"Guardian_B01::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("gefg_cas01.gat",15) <= 0) goto Guardian7; + guardian "gefg_cas01.gat",51,192,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("gefg_cas01.gat",16) <= 0) goto Guardian8; + guardian "gefg_cas01.gat",49,67,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("gefg_cas01.gat",17) <= 0) goto NoSpawn; + guardian "gefg_cas01.gat",181,14,"Knight Guardian",1286,1,"Guardian_B01::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "gefg_cas01.gat","Guardian_B01::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas01.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/gefg_cas02_guardian.txt b/npc/guild/old/guardian/gefg_cas02_guardian.txt new file mode 100644 index 000000000..4d50c0ce2 --- /dev/null +++ b/npc/guild/old/guardian/gefg_cas02_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas02 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in gefg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +gefg_cas02.gat,176,178,0 script Guardian_B02 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas02.gat",10) <= 0) goto Guardian2; + guardian "gefg_cas02.gat",22,135,"Soldier Guardian",1287,1,"Guardian_B02::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("gefg_cas02.gat",11) <= 0) goto Guardian3; + guardian "gefg_cas02.gat",33,40,"Soldier Guardian",1287,1,"Guardian_B02::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("gefg_cas02.gat",12) <= 0) goto Guardian4; + guardian "gefg_cas02.gat",158,11,"Soldier Guardian",1287,1,"Guardian_B02::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("gefg_cas02.gat",13) <= 0) goto Guardian5; + guardian "gefg_cas02.gat",64,140,"Archer Guardian",1285,1,"Guardian_B02::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("gefg_cas02.gat",14) <= 0) goto Guardian6; + guardian "gefg_cas02.gat",36,140,"Archer Guardian",1285,1,"Guardian_B02::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("gefg_cas02.gat",15) <= 0) goto Guardian7; + guardian "gefg_cas02.gat",166,45,"Knight Guardian",1286,1,"Guardian_B02::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("gefg_cas02.gat",16) <= 0) goto Guardian8; + guardian "gefg_cas02.gat",10,39,"Knight Guardian",1286,1,"Guardian_B02::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("gefg_cas02.gat",17) <= 0) goto NoSpawn; + guardian "gefg_cas02.gat",166,35,"Knight Guardian",1286,1,"Guardian_B02::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "gefg_cas02.gat","Guardian_B02::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas02.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/gefg_cas03_guardian.txt b/npc/guild/old/guardian/gefg_cas03_guardian.txt new file mode 100644 index 000000000..882118a73 --- /dev/null +++ b/npc/guild/old/guardian/gefg_cas03_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas03 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in gefg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +gefg_cas03.gat,245,167,0 script Guardian_B03 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas03.gat",10) <= 0) goto Guardian2; + guardian "gefg_cas03.gat",101,53,"Soldier Guardian",1287,1,"Guardian_B03::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("gefg_cas03.gat",11) <= 0) goto Guardian3; + guardian "gefg_cas03.gat",158,40,"Soldier Guardian",1287,1,"Guardian_B03::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("gefg_cas03.gat",12) <= 0) goto Guardian4; + guardian "gefg_cas03.gat",158,67,"Soldier Guardian",1287,1,"Guardian_B03::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("gefg_cas03.gat",13) <= 0) goto Guardian5; + guardian "gefg_cas03.gat",229,53,"Archer Guardian",1285,1,"Guardian_B03::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("gefg_cas03.gat",14) <= 0) goto Guardian6; + guardian "gefg_cas03.gat",248,53,"Archer Guardian",1285,1,"Guardian_B03::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("gefg_cas03.gat",15) <= 0) goto Guardian7; + guardian "gefg_cas03.gat",122,53,"Knight Guardian",1286,1,"Guardian_B03::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("gefg_cas03.gat",16) <= 0) goto Guardian8; + guardian "gefg_cas03.gat",243,35,"Knight Guardian",1286,1,"Guardian_B03::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("gefg_cas03.gat",17) <= 0) goto NoSpawn; + guardian "gefg_cas03.gat",234,33,"Knight Guardian",1286,1,"Guardian_B03::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "gefg_cas03.gat","Guardian_B03::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas03.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/gefg_cas04_guardian.txt b/npc/guild/old/guardian/gefg_cas04_guardian.txt new file mode 100644 index 000000000..fef453ee3 --- /dev/null +++ b/npc/guild/old/guardian/gefg_cas04_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas04 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in gefg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +gefg_cas04.gat,174,178,0 script Guardian_B04 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas04.gat",10) <= 0) goto Guardian2; + guardian "gefg_cas04.gat",49,203,"Soldier Guardian",1287,1,"Guardian_B04::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("gefg_cas04.gat",11) <= 0) goto Guardian3; + guardian "gefg_cas04.gat",148,50,"Soldier Guardian",1287,1,"Guardian_B04::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("gefg_cas04.gat",12) <= 0) goto Guardian4; + guardian "gefg_cas04.gat",57,20,"Soldier Guardian",1287,1,"Guardian_B04::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("gefg_cas04.gat",13) <= 0) goto Guardian5; + guardian "gefg_cas04.gat",34,218,"Archer Guardian",1285,1,"Guardian_B04::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("gefg_cas04.gat",14) <= 0) goto Guardian6; + guardian "gefg_cas04.gat",167,42,"Archer Guardian",1285,1,"Guardian_B04::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("gefg_cas04.gat",15) <= 0) goto Guardian7; + guardian "gefg_cas04.gat",18,52,"Knight Guardian",1286,1,"Guardian_B04::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("gefg_cas04.gat",16) <= 0) goto Guardian8; + guardian "gefg_cas04.gat",50,48,"Knight Guardian",1286,1,"Guardian_B04::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("gefg_cas04.gat",17) <= 0) goto NoSpawn; + guardian "gefg_cas04.gat",160,66,"Knight Guardian",1286,1,"Guardian_B04::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "gefg_cas04.gat","Guardian_B04::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas04.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/gefg_cas05_guardian.txt b/npc/guild/old/guardian/gefg_cas05_guardian.txt new file mode 100644 index 000000000..c3254cab5 --- /dev/null +++ b/npc/guild/old/guardian/gefg_cas05_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas05 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in gefg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +gefg_cas05.gat,194,184,0 script Guardian_B05 -1,{ +OnAgitInit: + if (GetCastleData("gefg_cas05.gat",10) <= 0) goto Guardian2; + guardian "gefg_cas05.gat",54,149,"Soldier Guardian",1287,1,"Guardian_B05::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("gefg_cas05.gat",11) <= 0) goto Guardian3; + guardian "gefg_cas05.gat",80,31,"Soldier Guardian",1287,1,"Guardian_B05::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("gefg_cas05.gat",12) <= 0) goto Guardian4; + guardian "gefg_cas05.gat",52,32,"Soldier Guardian",1287,1,"Guardian_B05::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("gefg_cas05.gat",13) <= 0) goto Guardian5; + guardian "gefg_cas05.gat",77,149,"Archer Guardian",1285,1,"Guardian_B05::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("gefg_cas05.gat",14) <= 0) goto Guardian6; + guardian "gefg_cas05.gat",65,18,"Archer Guardian",1285,1,"Guardian_B05::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("gefg_cas05.gat",15) <= 0) goto Guardian7; + guardian "gefg_cas05.gat",66,54,"Knight Guardian",1286,1,"Guardian_B05::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("gefg_cas05.gat",16) <= 0) goto Guardian8; + guardian "gefg_cas05.gat",187,43,"Knight Guardian",1286,1,"Guardian_B05::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("gefg_cas05.gat",17) <= 0) goto NoSpawn; + guardian "gefg_cas05.gat",167,43,"Knight Guardian",1286,1,"Guardian_B05::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "gefg_cas05.gat","Guardian_B05::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "gefg_cas05.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/payg_cas01_guardian.txt b/npc/guild/old/guardian/payg_cas01_guardian.txt new file mode 100644 index 000000000..8431608d9 --- /dev/null +++ b/npc/guild/old/guardian/payg_cas01_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas01 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in payg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +payg_cas01.gat,139,139,0 script Guardian_C01 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas01.gat",10) <= 0) goto Guardian2; + guardian "payg_cas01.gat",210,120,"Soldier Guardian",1287,1,"Guardian_C01::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("payg_cas01.gat",11) <= 0) goto Guardian3; + guardian "payg_cas01.gat",69,26,"Soldier Guardian",1287,1,"Guardian_C01::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("payg_cas01.gat",12) <= 0) goto Guardian4; + guardian "payg_cas01.gat",23,141,"Soldier Guardian",1287,1,"Guardian_C01::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("payg_cas01.gat",13) <= 0) goto Guardian5; + guardian "payg_cas01.gat",224,87,"Archer Guardian",1285,1,"Guardian_C01::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("payg_cas01.gat",14) <= 0) goto Guardian6; + guardian "payg_cas01.gat",81,45,"Archer Guardian",1285,1,"Guardian_C01::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("payg_cas01.gat",15) <= 0) goto Guardian7; + guardian "payg_cas01.gat",214,53,"Knight Guardian",1286,1,"Guardian_C01::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("payg_cas01.gat",16) <= 0) goto Guardian8; + guardian "payg_cas01.gat",69,26,"Knight Guardian",1286,1,"Guardian_C01::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("payg_cas01.gat",17) <= 0) goto NoSpawn; + guardian "payg_cas01.gat",23,141,"Knight Guardian",1286,1,"Guardian_C01::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "payg_cas01.gat","Guardian_C01::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas01.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/payg_cas02_guardian.txt b/npc/guild/old/guardian/payg_cas02_guardian.txt new file mode 100644 index 000000000..ff2235c4f --- /dev/null +++ b/npc/guild/old/guardian/payg_cas02_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas02 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in payg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +payg_cas02.gat,39,25,0 script Guardian_C02 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas02.gat",10) <= 0) goto Guardian2; + guardian "payg_cas02.gat",208,37,"Soldier Guardian",1287,1,"Guardian_C02::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("payg_cas02.gat",11) <= 0) goto Guardian3; + guardian "payg_cas02.gat",51,245,"Soldier Guardian",1287,1,"Guardian_C02::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("payg_cas02.gat",12) <= 0) goto Guardian4; + guardian "payg_cas02.gat",286,245,"Soldier Guardian",1287,1,"Guardian_C02::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("payg_cas02.gat",13) <= 0) goto Guardian5; + guardian "payg_cas02.gat",217,42,"Archer Guardian",1285,1,"Guardian_C02::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("payg_cas02.gat",14) <= 0) goto Guardian6; + guardian "payg_cas02.gat",264,266,"Archer Guardian",1285,1,"Guardian_C02::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("payg_cas02.gat",15) <= 0) goto Guardian7; + guardian "payg_cas02.gat",51,245,"Knight Guardian",1286,1,"Guardian_C02::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("payg_cas02.gat",16) <= 0) goto Guardian8; + guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_C02::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("payg_cas02.gat",17) <= 0) goto NoSpawn; + guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_C02::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "payg_cas02.gat","Guardian_C02::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas02.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/payg_cas03_guardian.txt b/npc/guild/old/guardian/payg_cas03_guardian.txt new file mode 100644 index 000000000..05150bd9e --- /dev/null +++ b/npc/guild/old/guardian/payg_cas03_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas03 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in payg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +payg_cas03.gat,269,265,0 script Guardian_C03 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas03.gat",10) <= 0) goto Guardian2; + guardian "payg_cas03.gat",252,39,"Soldier Guardian",1287,1,"Guardian_C03::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("payg_cas03.gat",11) <= 0) goto Guardian3; + guardian "payg_cas03.gat",23,283,"Soldier Guardian",1287,1,"Guardian_C03::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("payg_cas03.gat",12) <= 0) goto Guardian4; + guardian "payg_cas03.gat",34,283,"Soldier Guardian",1287,1,"Guardian_C03::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("payg_cas03.gat",13) <= 0) goto Guardian5; + guardian "payg_cas03.gat",57,36,"Archer Guardian",1285,1,"Guardian_C03::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("payg_cas03.gat",14) <= 0) goto Guardian6; + guardian "payg_cas03.gat",20,36,"Archer Guardian",1285,1,"Guardian_C03::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("payg_cas03.gat",15) <= 0) goto Guardian7; + guardian "payg_cas03.gat",34,283,"Knight Guardian",1286,1,"Guardian_C03::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("payg_cas03.gat",16) <= 0) goto Guardian8; + guardian "payg_cas03.gat",23,283,"Knight Guardian",1286,1,"Guardian_C03::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("payg_cas03.gat",17) <= 0) goto NoSpawn; + guardian "payg_cas03.gat",28,253,"Knight Guardian",1286,1,"Guardian_C03::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "payg_cas03.gat","Guardian_C03::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas03.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/payg_cas04_guardian.txt b/npc/guild/old/guardian/payg_cas04_guardian.txt new file mode 100644 index 000000000..fa303988e --- /dev/null +++ b/npc/guild/old/guardian/payg_cas04_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas04 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in payg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +payg_cas04.gat,271,29,0 script Guardian_C04 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas04.gat",10) <= 0) goto Guardian2; + guardian "payg_cas04.gat",236,172,"Soldier Guardian",1287,1,"Guardian_C04::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("payg_cas04.gat",11) <= 0) goto Guardian3; + guardian "payg_cas04.gat",14,260,"Soldier Guardian",1287,1,"Guardian_C04::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("payg_cas04.gat",12) <= 0) goto Guardian4; + guardian "payg_cas04.gat",15,30,"Soldier Guardian",1287,1,"Guardian_C04::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("payg_cas04.gat",13) <= 0) goto Guardian5; + guardian "payg_cas04.gat",257,166,"Archer Guardian",1285,1,"Guardian_C04::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("payg_cas04.gat",14) <= 0) goto Guardian6; + guardian "payg_cas04.gat",65,261,"Archer Guardian",1285,1,"Guardian_C04::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("payg_cas04.gat",15) <= 0) goto Guardian7; + guardian "payg_cas04.gat",65,261,"Knight Guardian",1286,1,"Guardian_C04::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("payg_cas04.gat",16) <= 0) goto Guardian8; + guardian "payg_cas04.gat",52,29,"Knight Guardian",1286,1,"Guardian_C04::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("payg_cas04.gat",17) <= 0) goto NoSpawn; + guardian "payg_cas04.gat",15,30,"Knight Guardian",1286,1,"Guardian_C04::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "payg_cas04.gat","Guardian_C04::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas04.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/payg_cas05_guardian.txt b/npc/guild/old/guardian/payg_cas05_guardian.txt new file mode 100644 index 000000000..526de5d4f --- /dev/null +++ b/npc/guild/old/guardian/payg_cas05_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas05 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in payg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +payg_cas05.gat,30,30,0 script Guardian_C05 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas05.gat",10) <= 0) goto Guardian2; + guardian "payg_cas05.gat",51,258,"Soldier Guardian",1287,1,"Guardian_C05::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("payg_cas05.gat",11) <= 0) goto Guardian3; + guardian "payg_cas05.gat",286,235,"Soldier Guardian",1287,1,"Guardian_C05::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("payg_cas05.gat",12) <= 0) goto Guardian4; + guardian "payg_cas05.gat",282,277,"Soldier Guardian",1287,1,"Guardian_C05::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("payg_cas05.gat",13) <= 0) goto Guardian5; + guardian "payg_cas05.gat",46,273,"Archer Guardian",1285,1,"Guardian_C05::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("payg_cas05.gat",14) <= 0) goto Guardian6; + guardian "payg_cas05.gat",289,256,"Archer Guardian",1285,1,"Guardian_C05::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("payg_cas05.gat",15) <= 0) goto Guardian7; + guardian "payg_cas05.gat",275,42,"Knight Guardian",1286,1,"Guardian_C05::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("payg_cas05.gat",16) <= 0) goto Guardian8; + guardian "payg_cas05.gat",254,9,"Knight Guardian",1286,1,"Guardian_C05::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("payg_cas05.gat",17) <= 0) goto NoSpawn; + guardian "payg_cas05.gat",236,256,"Knight Guardian",1286,1,"Guardian_C05::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "payg_cas05.gat","Guardian_C05::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas05.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/prtg_cas01_guardian.txt b/npc/guild/old/guardian/prtg_cas01_guardian.txt new file mode 100644 index 000000000..d8ffaf243 --- /dev/null +++ b/npc/guild/old/guardian/prtg_cas01_guardian.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas01 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in prtg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +prtg_cas01.gat,197,197,0 script Guardian_D01 -1,{ +OnAgitInit: + if (GetCastleData("prtg_cas01.gat",10) <= 0) goto Guardian2; + guardian "prtg_cas01.gat",196,92,"Soldier Guardian",1287,1,"Guardian_D01::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("prtg_cas01.gat",11) <= 0) goto Guardian3; + guardian "prtg_cas01.gat",113,200,"Soldier Guardian",1287,1,"Guardian_D01::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("prtg_cas01.gat",12) <= 0) goto Guardian4; + guardian "prtg_cas01.gat",111,186,"Soldier Guardian",1287,1,"Guardian_D01::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("prtg_cas01.gat",13) <= 0) goto Guardian5; + guardian "prtg_cas01.gat",76,202,"Archer Guardian",1285,1,"Guardian_D01::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("prtg_cas01.gat",14) <= 0) goto Guardian6; + guardian "prtg_cas01.gat",90,26,"Archer Guardian",1285,1,"Guardian_D01::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("prtg_cas01.gat",15) <= 0) goto Guardian7; + guardian "prtg_cas01.gat",58,59,"Knight Guardian",1286,1,"Guardian_D01::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("prtg_cas01.gat",16) <= 0) goto Guardian8; + guardian "prtg_cas01.gat",112,200,"Knight Guardian",1286,1,"Guardian_D01::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("prtg_cas01.gat",17) <= 0) goto NoSpawn; + guardian "prtg_cas01.gat",101,194,"Knight Guardian",1286,1,"Guardian_D01::OnGuardianDied",7; + break; + +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "prtg_cas01.gat","Guardian_D01::GuardianDied"; + break; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas01.gat","A Guardian Has Fallen",17; + break; + +OnAgitEnd: + break; + +NoSpawn: + break; + +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/prtg_cas02_guardian.txt b/npc/guild/old/guardian/prtg_cas02_guardian.txt new file mode 100644 index 000000000..3858f1c64 --- /dev/null +++ b/npc/guild/old/guardian/prtg_cas02_guardian.txt @@ -0,0 +1,62 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas02 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in prtg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +prtg_cas02.gat,158,174,0 script Guardian_D02 -1,{ +OnAgitStart: + if (GetCastleData("prtg_cas02.gat",10) <= 0) goto Guardian2; + guardian "prtg_cas02.gat",75,71,"Soldier Guardian",1287,1,"Guardian_D02::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("prtg_cas02.gat",11) <= 0) goto Guardian3; + guardian "prtg_cas02.gat",56,31,"Soldier Guardian",1287,1,"Guardian_D02::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("prtg_cas02.gat",12) <= 0) goto Guardian4; + guardian "prtg_cas02.gat",42,223,"Soldier Guardian",1287,1,"Guardian_D02::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("prtg_cas02.gat",13) <= 0) goto Guardian5; + guardian "prtg_cas02.gat",44,195,"Archer Guardian",1285,1,"Guardian_D02::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("prtg_cas02.gat",14) <= 0) goto Guardian6; + guardian "prtg_cas02.gat",197,22,"Archer Guardian",1285,1,"Guardian_D02::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("prtg_cas02.gat",15) <= 0) goto Guardian7; + guardian "prtg_cas02.gat",68,71,"Knight Guardian",1286,1,"Guardian_D02::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("prtg_cas02.gat",16) <= 0) goto Guardian8; + guardian "prtg_cas02.gat",202,27,"Knight Guardian",1286,1,"Guardian_D02::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("prtg_cas02.gat",17) <= 0) goto NoSpawn; + guardian "prtg_cas02.gat",59,24,"Knight Guardian",1286,1,"Guardian_D02::OnGuardianDied",7; + break; +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "prtg_cas02.gat","Guardian_D02::GuardianDied"; + break; +GuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas02.gat","A Guardian Has Fallen",17; + break; +OnAgitEnd: + break; +NoSpawn: + break; +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/prtg_cas03_guardian.txt b/npc/guild/old/guardian/prtg_cas03_guardian.txt new file mode 100644 index 000000000..1f5becb9e --- /dev/null +++ b/npc/guild/old/guardian/prtg_cas03_guardian.txt @@ -0,0 +1,62 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas03 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in prtg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +prtg_cas03.gat,17,221,0 script Guardian_D03 -1,{ +OnAgitStart: + if (GetCastleData("prtg_cas03.gat",10) <= 0) goto Guardian2; + guardian "prtg_cas03.gat",165,55,"Soldier Guardian",1287,1,"Guardian_D03::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("prtg_cas03.gat",11) <= 0) goto Guardian3; + guardian "prtg_cas03.gat",161,181,"Soldier Guardian",1287,1,"Guardian_D03::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("prtg_cas03.gat",12) <= 0) goto Guardian4; + guardian "prtg_cas03.gat",165,199,"Soldier Guardian",1287,1,"Guardian_D03::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("prtg_cas03.gat",13) <= 0) goto Guardian5; + guardian "prtg_cas03.gat",169,22,"Archer Guardian",1285,1,"Guardian_D03::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("prtg_cas03.gat",14) <= 0) goto Guardian6; + guardian "prtg_cas03.gat",165,191,"Archer Guardian",1285,1,"Guardian_D03::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("prtg_cas03.gat",15) <= 0) goto Guardian7; + guardian "prtg_cas03.gat",175,13,"Knight Guardian",1286,1,"Guardian_D03::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("prtg_cas03.gat",16) <= 0) goto Guardian8; + guardian "prtg_cas03.gat",169,180,"Knight Guardian",1286,1,"Guardian_D03::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("prtg_cas03.gat",17) <= 0) goto NoSpawn; + guardian "prtg_cas03.gat",142,217,"Knight Guardian",1286,1,"Guardian_D03::OnGuardianDied",7; + break; +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "prtg_cas03.gat","Guardian_D03::OnGuardianDied"; + break; +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas03.gat","A Guardian Has Fallen",17; + break; +OnAgitEnd: + break; +NoSpawn: + break; +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/prtg_cas04_guardian.txt b/npc/guild/old/guardian/prtg_cas04_guardian.txt new file mode 100644 index 000000000..7a5d86062 --- /dev/null +++ b/npc/guild/old/guardian/prtg_cas04_guardian.txt @@ -0,0 +1,62 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas04 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in prtg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +prtg_cas04.gat,292,14,0 script Guardian_D04 -1,{ +OnAgitStart: + if (GetCastleData("prtg_cas04.gat",10) <= 0) goto Guardian2; + guardian "prtg_cas04.gat",30,234,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("prtg_cas04.gat",11) <= 0) goto Guardian3; + guardian "prtg_cas04.gat",38,234,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("prtg_cas04.gat",12) <= 0) goto Guardian4; + guardian "prtg_cas04.gat",63,26,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("prtg_cas04.gat",13) <= 0) goto Guardian5; + guardian "prtg_cas04.gat",253,274,"Archer Guardian",1285,1,"Guardian_D04::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("prtg_cas04.gat",14) <= 0) goto Guardian6; + guardian "prtg_cas04.gat",269,256,"Archer Guardian",1285,1,"Guardian_D04::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("prtg_cas04.gat",15) <= 0) goto Guardian7; + guardian "prtg_cas04.gat",267,271,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("prtg_cas04.gat",16) <= 0) goto Guardian8; + guardian "prtg_cas04.gat",34,281,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("prtg_cas04.gat",17) <= 0) goto NoSpawn; + guardian "prtg_cas04.gat",33,232,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",7; + break; +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "prtg_cas04.gat","Guardian_D04::OnGuardianDied"; + break; +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas04.gat","A Guardian Has Fallen",17; + break; +OnAgitEnd: + break; +NoSpawn: + break; +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/guardian/prtg_cas05_guardian.txt b/npc/guild/old/guardian/prtg_cas05_guardian.txt new file mode 100644 index 000000000..392623a11 --- /dev/null +++ b/npc/guild/old/guardian/prtg_cas05_guardian.txt @@ -0,0 +1,62 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas05 guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guardians Spawn Script in prtg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//============================================================ + +prtg_cas05.gat,266,266,0 script Guardian_D05 -1,{ +OnAgitStart: + if (GetCastleData("prtg_cas05.gat",10) <= 0) goto Guardian2; + guardian "prtg_cas05.gat",244,15,"Soldier Guardian",1287,1,"Guardian_D05::OnGuardianDied",0; + goto Guardian2; +Guardian2: + if (GetCastleData("prtg_cas05.gat",11) <= 0) goto Guardian3; + guardian "prtg_cas05.gat",241,14,"Soldier Guardian",1287,1,"Guardian_D05::OnGuardianDied",1; + goto Guardian3; +Guardian3: + if (GetCastleData("prtg_cas05.gat",12) <= 0) goto Guardian4; + guardian "prtg_cas05.gat",68,40,"Soldier Guardian",1287,1,"Guardian_D05::OnGuardianDied",2; + goto Guardian4; +Guardian4: + if (GetCastleData("prtg_cas05.gat",13) <= 0) goto Guardian5; + guardian "prtg_cas05.gat",62,264,"Archer Guardian",1285,1,"Guardian_D05::OnGuardianDied",3; + goto Guardian5; +Guardian5: + if (GetCastleData("prtg_cas05.gat",14) <= 0) goto Guardian6; + guardian "prtg_cas05.gat",244,61,"Archer Guardian",1285,1,"Guardian_D05::OnGuardianDied",4; + goto Guardian6; +Guardian6: + if (GetCastleData("prtg_cas05.gat",15) <= 0) goto Guardian7; + guardian "prtg_cas05.gat",34,24,"Knight Guardian",1286,1,"Guardian_D05::OnGuardianDied",5; + goto Guardian7; +Guardian7: + if (GetCastleData("prtg_cas05.gat",16) <= 0) goto Guardian8; + guardian "prtg_cas05.gat",208,86,"Knight Guardian",1286,1,"Guardian_D05::OnGuardianDied",6; + goto Guardian8; +Guardian8: + if (GetCastleData("prtg_cas05.gat",17) <= 0) goto NoSpawn; + guardian "prtg_cas05.gat",43,70,"Knight Guardian",1286,1,"Guardian_D05::OnGuardianDied",7; + break; +OnAgitEliminate: + //Kill all guardians on castle takeover + //killmonster "prtg_cas05.gat","Guardian_D05::OnGuardianDied"; + break; +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas05.gat","A Guardian Has Fallen",17; + break; +OnAgitEnd: + break; +NoSpawn: + break; +} +//------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ diff --git a/npc/guild/old/payg_cas01.txt b/npc/guild/old/payg_cas01.txt new file mode 100644 index 000000000..16992f39d --- /dev/null +++ b/npc/guild/old/payg_cas01.txt @@ -0,0 +1,667 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas01 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in payg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +payg_cas01.gat,238,67,4 script Mingting#f1-6::MingtingNW 722,{ + set @GIDf1,GetCastleData("payg_cas01.gat",1); + if (@GIDf1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF01: + FlagEmblem GetCastleData("payg_cas01.gat",1); + break; +} + + +payg_cas01.gat,233,67,4 duplicate(MingtingNW) Mingting#f1-7 722 +payg_cas01.gat,221,123,4 duplicate(MingtingNW) Mingting#f1-8 722 +payg_cas01.gat,221,116,4 duplicate(MingtingNW) Mingting#f1-9 722 +payg_cas01.gat,206,108,4 duplicate(MingtingNW) Mingting#f1-10 722 +payg_cas01.gat,212,108,4 duplicate(MingtingNW) Mingting#f1-11 722 + +//================================================ +// Kafra Service +//================================================ +payg_cas01.gat,128,58,3 script Kafra Service#pay1 117,{ + cutin "kafra_01",2; + set @GIDf1,GetCastleData("payg_cas01.gat",1); + if (getcharid(2) == @GIDf1) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDf1) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDf1) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Payon -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "payon.gat",82,128; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("payg_cas01.gat",9) == 1) break; + disablenpc "Kafra Service#pay1"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +payg_cas01.gat,101,25,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDf1,GetCastleData("payg_cas01.gat",1); + if (getcharid(2) != @GIDf1) goto L1n; + warp "gld_dun01.gat",186,165; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +payg_cas01.gat,120,58,4 script Grunday 55,{ + set @GIDf1,GetCastleData("payg_cas01.gat",1); + if (@GIDf1 == 0) goto LStart; + if (getcharid(2) != @GIDf1) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDf1)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Grunday ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDf1) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDf1) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Grunday ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Grunday ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDf1) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Grunday ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDf1) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Grunday ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("payg_cas01.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("payg_cas01.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("payg_cas01.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("payg_cas01.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("payg_cas01.gat",4); + set @Economy,GetCastleData("payg_cas01.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Grunday ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Grunday ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Grunday ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas01.gat",4,@TriggerE+1; + SetCastleData "payg_cas01.gat",2,@Economy+1; + mes "[ Grunday ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Grunday ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Grunday ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas01.gat",4,@TriggerE+1; + SetCastleData "payg_cas01.gat",2,@Economy+1; + mes "[ Grunday ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Grunday ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Grunday ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("payg_cas01.gat",5); + set @Defence,GetCastleData("payg_cas01.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Grunday ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Grunday ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Grunday ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas01.gat",5,@TriggerD+1; + SetCastleData "payg_cas01.gat",3,@Defence+1; + mes "[ Grunday ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Grunday ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Grunday ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas01.gat",5,@TriggerD+1; + SetCastleData "payg_cas01.gat",3,@Defence+1; + mes "[ Grunday ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Grunday ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Grunday ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("payg_cas01.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Grunday ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("payg_cas01.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("payg_cas01.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("payg_cas01.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("payg_cas01.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("payg_cas01.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("payg_cas01.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("payg_cas01.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("payg_cas01.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Grunday ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Grunday ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "payg_cas01.gat",@GDnum,1; + SetCastleData "payg_cas01.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "payg_cas01.gat",210,120,"Soldier Guardian",1287,1,"Guardian_C01::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas01.gat",69,26,"Soldier Guardian",1287,1,"Guardian_C01::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas01.gat",23,141,"Soldier Guardian",1287,1,"Guardian_C01::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas01.gat",224,87,"Archer Guardian",1285,1,"Guardian_C01::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas01.gat",81,45,"Archer Guardian",1285,1,"Guardian_C01::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas01.gat",214,53,"Knight Guardian",1286,1,"Guardian_C01::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas01.gat",69,26,"Knight Guardian",1286,1,"Guardian_C01::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas01.gat",23,141,"Knight Guardian",1286,1,"Guardian_C01::OnGuardianDied",7; + mes "[ Grunday ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Grunday ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Grunday ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Grunday ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("payg_cas01.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Grunday ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Grunday ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Grunday ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#pay1"; + SetCastleData "payg_cas01.gat",9,1; + mes "[ Grunday ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Grunday ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Grunday ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Grunday ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#pay1"; + SetCastleData "payg_cas01.gat",9,0; + cutin "kafra_01",255; + mes "[ Grunday ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Grunday ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Grunday ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Grunday ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "payg_cas01",290,7; + L6_1: + mes "[ Grunday ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Grunday ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Grunday ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Grunday ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "payg_cas01.gat",1,0; + SetCastleData "payg_cas01.gat",2,0; + SetCastleData "payg_cas01.gat",3,0; + SetCastleData "payg_cas01.gat",4,0; + SetCastleData "payg_cas01.gat",5,0; + SetCastleData "payg_cas01.gat",6,0; + SetCastleData "payg_cas01.gat",7,0; + SetCastleData "payg_cas01.gat",8,0; + SetCastleData "payg_cas01.gat",9,0; + SetCastleData "payg_cas01.gat",10,0; + SetCastleData "payg_cas01.gat",11,0; + SetCastleData "payg_cas01.gat",12,0; + SetCastleData "payg_cas01.gat",13,0; + SetCastleData "payg_cas01.gat",14,0; + SetCastleData "payg_cas01.gat",15,0; + SetCastleData "payg_cas01.gat",16,0; + SetCastleData "payg_cas01.gat",17,0; + SetCastleData "payg_cas01.gat",18,0; + SetCastleData "payg_cas01.gat",19,0; + SetCastleData "payg_cas01.gat",20,0; + SetCastleData "payg_cas01.gat",21,0; + SetCastleData "payg_cas01.gat",22,0; + SetCastleData "payg_cas01.gat",23,0; + SetCastleData "payg_cas01.gat",24,0; + SetCastleData "payg_cas01.gat",25,0; + Announce "[" + GetGuildName(@GIDf1) + "] has surrendered Agit [" + GetCastleName("payg_cas01.gat") + "]",0; + MapRespawnGuildID "payg_cas01.gat",GetCastleData("payg_cas01.gat",1),7; + break; + L7_2: + mes "[ Grunday ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/payg_cas02.txt b/npc/guild/old/payg_cas02.txt new file mode 100644 index 000000000..4dae578cd --- /dev/null +++ b/npc/guild/old/payg_cas02.txt @@ -0,0 +1,666 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas02 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in payg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +payg_cas02.gat,254,40,6 script Tiantan#f2-6::TiantanNW 722,{ + set @GIDf2,GetCastleData("payg_cas02.gat",1); + if (@GIDf2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF02: + FlagEmblem GetCastleData("payg_cas02.gat",1); + break; +} + +payg_cas02.gat,254,48,6 duplicate(TiantanNW) Tiantan#f2-7 722 +payg_cas02.gat,202,49,0 duplicate(TiantanNW) Tiantan#f2-8 722 +payg_cas02.gat,209,49,0 duplicate(TiantanNW) Tiantan#f2-9 722 +payg_cas02.gat,59,282,4 duplicate(TiantanNW) Tiantan#f2-10 722 +payg_cas02.gat,70,282,4 duplicate(TiantanNW) Tiantan#f2-11 722 + +//================================================ +// Kafra Service +//================================================ +payg_cas02.gat,22,275,5 script Kafra Service#pay2 117,{ + cutin "kafra_01",2; + set @GIDf2,GetCastleData("payg_cas02.gat",1); + if (getcharid(2) == @GIDf2) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDf2) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDf2) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Payon -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "payon.gat",82,128; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("payg_cas02.gat",9) == 1) break; + disablenpc "Kafra Service#pay2"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +payg_cas02.gat,278,247,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDf2,GetCastleData("payg_cas02.gat",1); + if (getcharid(2) != @GIDf2) goto L1n; + warp "gld_dun01.gat",54,165; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +payg_cas02.gat,22,260,7 script Cherrios 55,{ + set @GIDf2,GetCastleData("payg_cas02.gat",1); + if (@GIDf2 == 0) goto LStart; + if (getcharid(2) != @GIDf2) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDf2)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Cherrios ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDf2) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDf2) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Cherrios ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Cherrios ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDf2) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Cherrios ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDf2) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Cherrios ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("payg_cas02.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("payg_cas02.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("payg_cas02.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("payg_cas02.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("payg_cas02.gat",4); + set @Economy,GetCastleData("payg_cas02.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Cherrios ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Cherrios ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Cherrios ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas02.gat",4,@TriggerE+1; + SetCastleData "payg_cas02.gat",2,@Economy+1; + mes "[ Cherrios ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Cherrios ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Cherrios ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas02.gat",4,@TriggerE+1; + SetCastleData "payg_cas02.gat",2,@Economy+1; + mes "[ Cherrios ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Cherrios ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Cherrios ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("payg_cas02.gat",5); + set @Defence,GetCastleData("payg_cas02.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Cherrios ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Cherrios ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Cherrios ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas02.gat",5,@TriggerD+1; + SetCastleData "payg_cas02.gat",3,@Defence+1; + mes "[ Cherrios ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Cherrios ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Cherrios ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas02.gat",5,@TriggerD+1; + SetCastleData "payg_cas02.gat",3,@Defence+1; + mes "[ Cherrios ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Cherrios ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Cherrios ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("payg_cas02.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Cherrios ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("payg_cas02.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("payg_cas02.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("payg_cas02.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("payg_cas02.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("payg_cas02.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("payg_cas02.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("payg_cas02.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("payg_cas02.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Cherrios ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Cherrios ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "payg_cas02.gat",@GDnum,1; + SetCastleData "payg_cas02.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "payg_cas02.gat",208,37,"Soldier Guardian",1287,1,"Guardian_C02::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas02.gat",51,245,"Soldier Guardian",1287,1,"Guardian_C02::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas02.gat",286,245,"Soldier Guardian",1287,1,"Guardian_C02::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas02.gat",217,42,"Archer Guardian",1285,1,"Guardian_C02::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas02.gat",264,266,"Archer Guardian",1285,1,"Guardian_C02::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas02.gat",51,245,"Knight Guardian",1286,1,"Guardian_C02::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_C02::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_C02::OnGuardianDied",7; + mes "[ Cherrios ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Cherrios ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Cherrios ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Cherrios ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("payg_cas02.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Cherrios ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Cherrios ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Cherrios ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#pay2"; + SetCastleData "payg_cas02.gat",9,1; + mes "[ Cherrios ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Cherrios ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Cherrios ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Cherrios ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#pay2"; + SetCastleData "payg_cas02.gat",9,0; + cutin "kafra_01",255; + mes "[ Cherrios ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Cherrios ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Cherrios ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Cherrios ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "payg_cas02",145,143; + L6_1: + mes "[ Cherrios ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Cherrios ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Cherrios ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Cherrios ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "payg_cas02.gat",1,0; + SetCastleData "payg_cas02.gat",2,0; + SetCastleData "payg_cas02.gat",3,0; + SetCastleData "payg_cas02.gat",4,0; + SetCastleData "payg_cas02.gat",5,0; + SetCastleData "payg_cas02.gat",6,0; + SetCastleData "payg_cas02.gat",7,0; + SetCastleData "payg_cas02.gat",8,0; + SetCastleData "payg_cas02.gat",9,0; + SetCastleData "payg_cas02.gat",10,0; + SetCastleData "payg_cas02.gat",11,0; + SetCastleData "payg_cas02.gat",12,0; + SetCastleData "payg_cas02.gat",13,0; + SetCastleData "payg_cas02.gat",14,0; + SetCastleData "payg_cas02.gat",15,0; + SetCastleData "payg_cas02.gat",16,0; + SetCastleData "payg_cas02.gat",17,0; + SetCastleData "payg_cas02.gat",18,0; + SetCastleData "payg_cas02.gat",19,0; + SetCastleData "payg_cas02.gat",20,0; + SetCastleData "payg_cas02.gat",21,0; + SetCastleData "payg_cas02.gat",22,0; + SetCastleData "payg_cas02.gat",23,0; + SetCastleData "payg_cas02.gat",24,0; + SetCastleData "payg_cas02.gat",25,0; + Announce "[" + GetGuildName(@GIDf2) + "] has surrendered Agit [" + GetCastleName("payg_cas02.gat") + "]",0; + MapRespawnGuildID "payg_cas02.gat",GetCastleData("payg_cas02.gat",1),7; + break; + L7_2: + mes "[ Cherrios ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/payg_cas03.txt b/npc/guild/old/payg_cas03.txt new file mode 100644 index 000000000..7d9aee3e9 --- /dev/null +++ b/npc/guild/old/payg_cas03.txt @@ -0,0 +1,666 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas03 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in payg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +payg_cas03.gat,236,54,2 script Fuying#f3-6::FuyingNW 722,{ + set @GIDf3,GetCastleData("payg_cas03.gat",1); + if (@GIDf3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF03: + FlagEmblem GetCastleData("payg_cas03.gat",1); + break; +} + +payg_cas03.gat,236,45,2 duplicate(FuyingNW) Fuying#f3-7 722 +payg_cas03.gat,259,66,4 duplicate(FuyingNW) Fuying#f3-8 722 +payg_cas03.gat,266,66,4 duplicate(FuyingNW) Fuying#f3-9 722 +payg_cas03.gat,34,31,4 duplicate(FuyingNW) Fuying#f3-10 722 +payg_cas03.gat,43,31,4 duplicate(FuyingNW) Fuying#f3-11 722 + +//================================================ +// Kafra Service +//================================================ +payg_cas03.gat,9,263,5 script Kafra Service#pay3 117,{ + cutin "kafra_01",2; + set @GIDf3,GetCastleData("payg_cas03.gat",1); + if (getcharid(2) == @GIDf3) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDf3) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDf3) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Payon -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "payon.gat",82,128; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("payg_cas03.gat",9) == 1) break; + disablenpc "Kafra Service#pay3"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +payg_cas03.gat,38,42,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDf3,GetCastleData("payg_cas03.gat",1); + if (getcharid(2) != @GIDf3) goto L1n; + warp "gld_dun01.gat",54,39; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +payg_cas03.gat,268,264,0 script Garriet 55,{ + set @GIDf3,GetCastleData("payg_cas03.gat",1); + if (@GIDf3 == 0) goto LStart; + if (getcharid(2) != @GIDf3) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDf3)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Garriet ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDf3) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDf3) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Garriet ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Garriet ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDf3) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Garriet ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDf3) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Garriet ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("payg_cas03.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("payg_cas03.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("payg_cas03.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("payg_cas03.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("payg_cas03.gat",4); + set @Economy,GetCastleData("payg_cas03.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Garriet ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Garriet ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Garriet ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas03.gat",4,@TriggerE+1; + SetCastleData "payg_cas03.gat",2,@Economy+1; + mes "[ Garriet ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Garriet ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Garriet ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas03.gat",4,@TriggerE+1; + SetCastleData "payg_cas03.gat",2,@Economy+1; + mes "[ Garriet ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Garriet ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Garriet ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("payg_cas03.gat",5); + set @Defence,GetCastleData("payg_cas03.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Garriet ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Garriet ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Garriet ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas03.gat",5,@TriggerD+1; + SetCastleData "payg_cas03.gat",3,@Defence+1; + mes "[ Garriet ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Garriet ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Garriet ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas03.gat",5,@TriggerD+1; + SetCastleData "payg_cas03.gat",3,@Defence+1; + mes "[ Garriet ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Garriet ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Garriet ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("payg_cas03.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Garriet ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("payg_cas03.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("payg_cas03.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("payg_cas03.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("payg_cas03.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("payg_cas03.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("payg_cas03.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("payg_cas03.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("payg_cas03.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Garriet ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Garriet ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "payg_cas03.gat",@GDnum,1; + SetCastleData "payg_cas03.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "payg_cas03.gat",252,39,"Soldier Guardian",1287,1,"Guardian_C03::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas03.gat",23,283,"Soldier Guardian",1287,1,"Guardian_C03::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas03.gat",34,283,"Soldier Guardian",1287,1,"Guardian_C03::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas03.gat",57,36,"Archer Guardian",1285,1,"Guardian_C03::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas03.gat",20,36,"Archer Guardian",1285,1,"Guardian_C03::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas03.gat",34,283,"Knight Guardian",1286,1,"Guardian_C03::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas03.gat",23,283,"Knight Guardian",1286,1,"Guardian_C03::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas03.gat",28,253,"Knight Guardian",1286,1,"Guardian_C03::OnGuardianDied",7; + mes "[ Garriet ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Garriet ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Garriet ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Garriet ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("payg_cas03.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Garriet ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Garriet ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Garriet ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#pay3"; + SetCastleData "payg_cas03.gat",9,1; + mes "[ Garriet ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Garriet ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Garriet ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Garriet ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#pay3"; + SetCastleData "payg_cas03.gat",9,0; + cutin "kafra_01",255; + mes "[ Garriet ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Garriet ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Garriet ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Garriet ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "payg_cas03",158,168; + L6_1: + mes "[ Garriet ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Garriet ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Garriet ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Garriet ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "payg_cas03.gat",1,0; + SetCastleData "payg_cas03.gat",2,0; + SetCastleData "payg_cas03.gat",3,0; + SetCastleData "payg_cas03.gat",4,0; + SetCastleData "payg_cas03.gat",5,0; + SetCastleData "payg_cas03.gat",6,0; + SetCastleData "payg_cas03.gat",7,0; + SetCastleData "payg_cas03.gat",8,0; + SetCastleData "payg_cas03.gat",9,0; + SetCastleData "payg_cas03.gat",10,0; + SetCastleData "payg_cas03.gat",11,0; + SetCastleData "payg_cas03.gat",12,0; + SetCastleData "payg_cas03.gat",13,0; + SetCastleData "payg_cas03.gat",14,0; + SetCastleData "payg_cas03.gat",15,0; + SetCastleData "payg_cas03.gat",16,0; + SetCastleData "payg_cas03.gat",17,0; + SetCastleData "payg_cas03.gat",18,0; + SetCastleData "payg_cas03.gat",19,0; + SetCastleData "payg_cas03.gat",20,0; + SetCastleData "payg_cas03.gat",21,0; + SetCastleData "payg_cas03.gat",22,0; + SetCastleData "payg_cas03.gat",23,0; + SetCastleData "payg_cas03.gat",24,0; + SetCastleData "payg_cas03.gat",25,0; + Announce "[" + GetGuildName(@GIDf3) + "] has surrendered Agit [" + GetCastleName("payg_cas03.gat") + "]",0; + MapRespawnGuildID "payg_cas03.gat",GetCastleData("payg_cas03.gat",1),7; + break; + L7_2: + mes "[ Garriet ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/payg_cas04.txt b/npc/guild/old/payg_cas04.txt new file mode 100644 index 000000000..634560c59 --- /dev/null +++ b/npc/guild/old/payg_cas04.txt @@ -0,0 +1,666 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas04 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in payg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +payg_cas04.gat,255,259,0 script Honglou#f4-6::HonglouNW 722,{ + set @GIDf4,GetCastleData("payg_cas04.gat",1); + if (@GIDf4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF04: + FlagEmblem GetCastleData("payg_cas04.gat",1); + break; +} + +payg_cas04.gat,248,259,0 duplicate(HonglouNW) Honglou#f4-7 722 +payg_cas04.gat,248,168,6 duplicate(HonglouNW) Honglou#f4-8 722 +payg_cas04.gat,248,160,6 duplicate(HonglouNW) Honglou#f4-9 722 +payg_cas04.gat,232,181,4 duplicate(HonglouNW) Honglou#f4-10 722 +payg_cas04.gat,239,181,4 duplicate(HonglouNW) Honglou#f4-11 722 + +//================================================ +// Kafra Service +//================================================ +payg_cas04.gat,40,235,1 script Kafra Service#pay4 117,{ + cutin "kafra_01",2; + set @GIDf4,GetCastleData("payg_cas04.gat",1); + if (getcharid(2) == @GIDf4) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDf4) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDf4) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Payon -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "payon.gat",82,128; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("payg_cas04.gat",9) == 1) break; + disablenpc "Kafra Service#pay4"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +payg_cas04.gat,52,48,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDf4,GetCastleData("payg_cas04.gat",1); + if (getcharid(2) != @GIDf4) goto L1n; + warp "gld_dun01.gat",186,39; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +payg_cas04.gat,38,284,3 script DJ 55,{ + set @GIDf4,GetCastleData("payg_cas04.gat",1); + if (@GIDf4 == 0) goto LStart; + if (getcharid(2) != @GIDf4) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDf4)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ DJ ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDf4) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDf4) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ DJ ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ DJ ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDf4) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ DJ ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDf4) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ DJ ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("payg_cas04.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("payg_cas04.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("payg_cas04.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("payg_cas04.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("payg_cas04.gat",4); + set @Economy,GetCastleData("payg_cas04.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ DJ ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ DJ ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ DJ ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas04.gat",4,@TriggerE+1; + SetCastleData "payg_cas04.gat",2,@Economy+1; + mes "[ DJ ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ DJ ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ DJ ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas04.gat",4,@TriggerE+1; + SetCastleData "payg_cas04.gat",2,@Economy+1; + mes "[ DJ ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ DJ ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ DJ ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("payg_cas04.gat",5); + set @Defence,GetCastleData("payg_cas04.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ DJ ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ DJ ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ DJ ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas04.gat",5,@TriggerD+1; + SetCastleData "payg_cas04.gat",3,@Defence+1; + mes "[ DJ ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ DJ ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ DJ ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas04.gat",5,@TriggerD+1; + SetCastleData "payg_cas04.gat",3,@Defence+1; + mes "[ DJ ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ DJ ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ DJ ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("payg_cas04.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ DJ ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("payg_cas04.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("payg_cas04.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("payg_cas04.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("payg_cas04.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("payg_cas04.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("payg_cas04.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("payg_cas04.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("payg_cas04.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ DJ ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ DJ ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "payg_cas04.gat",@GDnum,1; + SetCastleData "payg_cas04.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "payg_cas04.gat",236,172,"Soldier Guardian",1287,1,"Guardian_C04::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas04.gat",14,260,"Soldier Guardian",1287,1,"Guardian_C04::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas04.gat",15,30,"Soldier Guardian",1287,1,"Guardian_C04::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas04.gat",257,166,"Archer Guardian",1285,1,"Guardian_C04::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas04.gat",65,261,"Archer Guardian",1285,1,"Guardian_C04::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas04.gat",65,261,"Knight Guardian",1286,1,"Guardian_C04::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas04.gat",52,29,"Knight Guardian",1286,1,"Guardian_C04::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas04.gat",15,30,"Knight Guardian",1286,1,"Guardian_C04::OnGuardianDied",7; + mes "[ DJ ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ DJ ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ DJ ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ DJ ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("payg_cas04.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ DJ ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ DJ ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ DJ ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#pay4"; + SetCastleData "payg_cas04.gat",9,1; + mes "[ DJ ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ DJ ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ DJ ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ DJ ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#pay4"; + SetCastleData "payg_cas04.gat",9,0; + cutin "kafra_01",255; + mes "[ DJ ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ DJ ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ DJ ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ DJ ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "payg_cas04",146,48; + L6_1: + mes "[ DJ ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ DJ ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ DJ ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ DJ ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "payg_cas04.gat",1,0; + SetCastleData "payg_cas04.gat",2,0; + SetCastleData "payg_cas04.gat",3,0; + SetCastleData "payg_cas04.gat",4,0; + SetCastleData "payg_cas04.gat",5,0; + SetCastleData "payg_cas04.gat",6,0; + SetCastleData "payg_cas04.gat",7,0; + SetCastleData "payg_cas04.gat",8,0; + SetCastleData "payg_cas04.gat",9,0; + SetCastleData "payg_cas04.gat",10,0; + SetCastleData "payg_cas04.gat",11,0; + SetCastleData "payg_cas04.gat",12,0; + SetCastleData "payg_cas04.gat",13,0; + SetCastleData "payg_cas04.gat",14,0; + SetCastleData "payg_cas04.gat",15,0; + SetCastleData "payg_cas04.gat",16,0; + SetCastleData "payg_cas04.gat",17,0; + SetCastleData "payg_cas04.gat",18,0; + SetCastleData "payg_cas04.gat",19,0; + SetCastleData "payg_cas04.gat",20,0; + SetCastleData "payg_cas04.gat",21,0; + SetCastleData "payg_cas04.gat",22,0; + SetCastleData "payg_cas04.gat",23,0; + SetCastleData "payg_cas04.gat",24,0; + SetCastleData "payg_cas04.gat",25,0; + Announce "[" + GetGuildName(@GIDf4) + "] has surrendered Agit [" + GetCastleName("payg_cas04.gat") + "]",0; + MapRespawnGuildID "payg_cas04.gat",GetCastleData("payg_cas04.gat",1),7; + break; + L7_2: + mes "[ DJ ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/payg_cas05.txt b/npc/guild/old/payg_cas05.txt new file mode 100644 index 000000000..90261b0e8 --- /dev/null +++ b/npc/guild/old/payg_cas05.txt @@ -0,0 +1,666 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas05 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in payg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +payg_cas05.gat,32,249,4 script Zhulinxian#f5-6::ZhulinxianNW 722,{ + set @GIDf5,GetCastleData("payg_cas05.gat",1); + if (@GIDf5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF05: + FlagEmblem GetCastleData("payg_cas05.gat",1); + break; +} + +payg_cas05.gat,24,249,4 duplicate(ZhulinxianNW) Zhulinxian#f5-7 722 +payg_cas05.gat,62,271,0 duplicate(ZhulinxianNW) Zhulinxian#f5-8 722 +payg_cas05.gat,57,271,0 duplicate(ZhulinxianNW) Zhulinxian#f5-9 722 +payg_cas05.gat,55,252,2 duplicate(ZhulinxianNW) Zhulinxian#f5-10 722 +payg_cas05.gat,55,260,2 duplicate(ZhulinxianNW) Zhulinxian#f5-11 722 + +//================================================ +// Kafra Service +//================================================ +payg_cas05.gat,276,227,1 script Kafra Service#pay5 117,{ + cutin "kafra_01",2; + set @GIDf5,GetCastleData("payg_cas05.gat",1); + if (getcharid(2) == @GIDf5) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDf5) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDf5) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Payon -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "payon.gat",82,128; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("payg_cas05.gat",9) == 1) break; + disablenpc "Kafra Service#pay5"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +payg_cas05.gat,238,11,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDf5,GetCastleData("payg_cas05.gat",1); + if (getcharid(2) != @GIDf5) goto L1n; + warp "gld_dun01.gat",223,202; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +payg_cas05.gat,277,249,3 script Najarf 55,{ + set @GIDf5,GetCastleData("payg_cas05.gat",1); + if (@GIDf5 == 0) goto LStart; + if (getcharid(2) != @GIDf5) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDf5)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Najarf ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDf5) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDf5) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Najarf ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Najarf ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDf5) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Najarf ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDf5) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Najarf ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("payg_cas05.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("payg_cas05.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("payg_cas05.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("payg_cas05.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("payg_cas05.gat",4); + set @Economy,GetCastleData("payg_cas05.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Najarf ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Najarf ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Najarf ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas05.gat",4,@TriggerE+1; + SetCastleData "payg_cas05.gat",2,@Economy+1; + mes "[ Najarf ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Najarf ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Najarf ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "payg_cas05.gat",4,@TriggerE+1; + SetCastleData "payg_cas05.gat",2,@Economy+1; + mes "[ Najarf ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Najarf ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Najarf ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("payg_cas05.gat",5); + set @Defence,GetCastleData("payg_cas05.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Najarf ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Najarf ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Najarf ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas05.gat",5,@TriggerD+1; + SetCastleData "payg_cas05.gat",3,@Defence+1; + mes "[ Najarf ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Najarf ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Najarf ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "payg_cas05.gat",5,@TriggerD+1; + SetCastleData "payg_cas05.gat",3,@Defence+1; + mes "[ Najarf ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Najarf ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Najarf ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("payg_cas05.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Najarf ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("payg_cas05.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("payg_cas05.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("payg_cas05.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("payg_cas05.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("payg_cas05.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("payg_cas05.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("payg_cas05.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("payg_cas05.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Najarf ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Najarf ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "payg_cas05.gat",@GDnum,1; + SetCastleData "payg_cas05.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "payg_cas05.gat",51,258,"Soldier Guardian",1287,1,"Guardian_C05::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas05.gat",286,235,"Soldier Guardian",1287,1,"Guardian_C05::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas05.gat",282,277,"Soldier Guardian",1287,1,"Guardian_C05::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas05.gat",46,273,"Archer Guardian",1285,1,"Guardian_C05::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas05.gat",289,256,"Archer Guardian",1285,1,"Guardian_C05::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas05.gat",275,42,"Knight Guardian",1286,1,"Guardian_C05::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas05.gat",254,9,"Knight Guardian",1286,1,"Guardian_C05::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas05.gat",236,256,"Knight Guardian",1286,1,"Guardian_C05::OnGuardianDied",7; + mes "[ Najarf ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Najarf ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Najarf ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Najarf ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("payg_cas05.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Najarf ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Najarf ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Najarf ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#pay5"; + SetCastleData "payg_cas05.gat",9,1; + mes "[ Najarf ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Najarf ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Najarf ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Najarf ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#pay5"; + SetCastleData "payg_cas05.gat",9,0; + cutin "kafra_01",255; + mes "[ Najarf ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Najarf ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Najarf ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Najarf ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "payg_cas05",156,131; + L6_1: + mes "[ Najarf ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Najarf ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Najarf ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Najarf ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "payg_cas05.gat",1,0; + SetCastleData "payg_cas05.gat",2,0; + SetCastleData "payg_cas05.gat",3,0; + SetCastleData "payg_cas05.gat",4,0; + SetCastleData "payg_cas05.gat",5,0; + SetCastleData "payg_cas05.gat",6,0; + SetCastleData "payg_cas05.gat",7,0; + SetCastleData "payg_cas05.gat",8,0; + SetCastleData "payg_cas05.gat",9,0; + SetCastleData "payg_cas05.gat",10,0; + SetCastleData "payg_cas05.gat",11,0; + SetCastleData "payg_cas05.gat",12,0; + SetCastleData "payg_cas05.gat",13,0; + SetCastleData "payg_cas05.gat",14,0; + SetCastleData "payg_cas05.gat",15,0; + SetCastleData "payg_cas05.gat",16,0; + SetCastleData "payg_cas05.gat",17,0; + SetCastleData "payg_cas05.gat",18,0; + SetCastleData "payg_cas05.gat",19,0; + SetCastleData "payg_cas05.gat",20,0; + SetCastleData "payg_cas05.gat",21,0; + SetCastleData "payg_cas05.gat",22,0; + SetCastleData "payg_cas05.gat",23,0; + SetCastleData "payg_cas05.gat",24,0; + SetCastleData "payg_cas05.gat",25,0; + Announce "[" + GetGuildName(@GIDf5) + "] has surrendered Agit [" + GetCastleName("payg_cas05.gat") + "]",0; + MapRespawnGuildID "payg_cas05.gat",GetCastleData("payg_cas05.gat",1),7; + break; + L7_2: + mes "[ Najarf ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/payg_flag.txt b/npc/guild/old/payg_flag.txt new file mode 100644 index 000000000..e00a87c08 --- /dev/null +++ b/npc/guild/old/payg_flag.txt @@ -0,0 +1,360 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Payon Guild Flags +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.4 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Castle Guild Flags in Payon and pay_gld +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//= 1.2 Darkchild/MissActek Flags moved to a better spot till we know exact +//= 1.3 To exact spot +//= 1.4 Better spots +//============================================================ + +//Payon Castle 01 - Mingting +payon.gat,165,177,3 script Mingting#f1-1 722,{ + set @GIDf1,GetCastleData("payg_cas01.gat",1); + if (@GIDf1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF01: + FlagEmblem GetCastleData("payg_cas01.gat",1); + break; +} + +pay_gld.gat,125,236,4 script Mingting#f1-2::MingtingW 722,{ + set @GIDf1,GetCastleData("payg_cas01.gat",1); + if (@GIDf1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDf1) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "payg_cas01.gat",87,29; + break; +OnRecvCastleF01: + FlagEmblem GetCastleData("payg_cas01.gat",1); + break; +} + +pay_gld.gat,110,233,4 duplicate(MingtingW) Mingting#f1-3 722 +pay_gld.gat,116,233,4 duplicate(MingtingW) Mingting#f1-4 722 +pay_gld.gat,91,239,2 duplicate(MingtingW) Mingting#f1-5 722 + +//Payon Castle 02 - Tiantan + +payon.gat,165,173,3 script Tiantan#f2-1 722,{ + set @GIDf2,GetCastleData("payg_cas02.gat",1); + if (@GIDf2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF02: + FlagEmblem GetCastleData("payg_cas02.gat",1); + break; +} + +pay_gld.gat,292,112,6 script Tiantan#f2-2::TiantanW 722,{ + set @GIDf2,GetCastleData("payg_cas02.gat",1); + if (@GIDf2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDf2) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "payg_cas02.gat",22,275; + break; +OnRecvCastleF02: + FlagEmblem GetCastleData("payg_cas02.gat",1); + break; +} + +pay_gld.gat,292,120,6 duplicate(TiantanW) Tiantan#f2-3 722 +pay_gld.gat,291,135,6 duplicate(TiantanW) Tiantan#f2-4 722 +pay_gld.gat,271,163,0 duplicate(TiantanW) Tiantan#f2-5 722 + +//Payon Castle 03 - Fuying + +payon.gat,165,169,3 script Fuying#f3-1 722,{ + set @GIDf3,GetCastleData("payg_cas03.gat",1); + if (@GIDf3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF03: + FlagEmblem GetCastleData("payg_cas03.gat",1); + break; +} + +pay_gld.gat,321,298,2 script Fuying#f3-2::FuyingW 722,{ + set @GIDf3,GetCastleData("payg_cas03.gat",1); + if (@GIDf3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDf3) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "payg_cas03.gat",9,263; + break; +OnRecvCastleF03: + FlagEmblem GetCastleData("payg_cas03.gat",1); + break; +} + +pay_gld.gat,321,289,2 duplicate(FuyingW) Fuying#f3-3 722 +pay_gld.gat,327,304,1 duplicate(FuyingW) Fuying#f3-4 722 +pay_gld.gat,333,254,4 duplicate(FuyingW) Fuying#f3-5 722 + +//Payon Castle 04 - Honglou + +payon.gat,165,165,3 script Honglou#f4-1 722,{ + set @GIDf4,GetCastleData("payg_cas04.gat",1); + if (@GIDf4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF04: + FlagEmblem GetCastleData("payg_cas04.gat",1); + break; +} + +pay_gld.gat,143,160,0 script Honglou#f4-2::HonglouW 722,{ + set @GIDf4,GetCastleData("payg_cas04.gat",1); + if (@GIDf4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDf4) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "payg_cas04.gat",40,235; + break; +OnRecvCastleF04: + FlagEmblem GetCastleData("payg_cas04.gat",1); + break; +} + +pay_gld.gat,143,160,0 duplicate(HonglouW) Honglou#f4-3 722 +pay_gld.gat,133,151,2 duplicate(HonglouW) Honglou#f4-4 722 +pay_gld.gat,153,166,1 duplicate(HonglouW) Honglou#f4-5 722 + +//Payon Castle 05 - Zhulinxian + +payon.gat,165,161,3 script Zhulinxian#f5-1 722,{ + set @GIDf5,GetCastleData("payg_cas05.gat",1); + if (@GIDf5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleF05: + FlagEmblem GetCastleData("payg_cas05.gat",1); + break; +} + +pay_gld.gat,208,268,4 script Zhulinxian#f5-2::ZhulinxianW 722,{ + set @GIDf5,GetCastleData("payg_cas05.gat",1); + if (@GIDf5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDf5) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Payon ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Payon,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDf5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDf5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDf5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "payg_cas05.gat",276,227; + break; +OnRecvCastleF05: + FlagEmblem GetCastleData("payg_cas05.gat",1); + break; +} + +pay_gld.gat,199,268,4 duplicate(ZhulinxianW) Zhulinxian#f5-3 722 +pay_gld.gat,190,277,3 duplicate(ZhulinxianW) Zhulinxian#f5-4 722 +pay_gld.gat,187,294,2 duplicate(ZhulinxianW) Zhulinxian#f5-5 722 \ No newline at end of file diff --git a/npc/guild/old/prtg_cas01.txt b/npc/guild/old/prtg_cas01.txt new file mode 100644 index 000000000..e1698b435 --- /dev/null +++ b/npc/guild/old/prtg_cas01.txt @@ -0,0 +1,670 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas01 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in prtg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +prtg_cas01.gat,58,56,4 script Creamhilt#p1-7::CreamhiltNW 722,{ + set @GIDp1,GetCastleData("prtg_cas01.gat",1); + if (@GIDp1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP01: + FlagEmblem GetCastleData("prtg_cas01.gat",1); + break; +} + +prtg_cas01.gat,64,56,4 duplicate(CreamhiltNW) Creamhilt#p1-8 722 +prtg_cas01.gat,76,32,4 duplicate(CreamhiltNW) Creamhilt#p1-9 722 +prtg_cas01.gat,84,32,4 duplicate(CreamhiltNW) Creamhilt#p1-10 722 +prtg_cas01.gat,94,39,4 duplicate(CreamhiltNW) Creamhilt#p1-11 722 +prtg_cas01.gat,94,24,4 duplicate(CreamhiltNW) Creamhilt#p1-12 722 +prtg_cas01.gat,73,14,4 duplicate(CreamhiltNW) Creamhilt#p1-13 722 +prtg_cas01.gat,73,6,4 duplicate(CreamhiltNW) Creamhilt#p1-14 722 +prtg_cas01.gat,55,46,4 duplicate(CreamhiltNW) Creamhilt#p1-15 722 +prtg_cas01.gat,45,46,4 duplicate(CreamhiltNW) Creamhilt#p1-16 722 + +//================================================ +// Kafra Service +//================================================ +prtg_cas01.gat,96,173,0 script Kafra Service#prt1 117,{ + cutin "kafra_01",2; + set @GIDp1,GetCastleData("prtg_cas01.gat",1); + if (getcharid(2) == @GIDp1) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDp1) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDp1) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Prontera -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "prontera.gat",278,211; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("prtg_cas01.gat",9) == 1) break; + disablenpc "Kafra Service#prt1"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +prtg_cas01.gat,94,200,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDp1,GetCastleData("prtg_cas01.gat",1); + if (getcharid(2) != @GIDp1) goto L1n; + warp "gld_dun03.gat",28,251; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +prtg_cas01.gat,112,181,0 script Abrai 55,{ + set @GIDp1,GetCastleData("prtg_cas01.gat",1); + if (@GIDp1 == 0) goto LStart; + if (getcharid(2) != @GIDp1) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDp1)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Abrai ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDp1) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDp1) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Abrai ]"; + mes "I am waiting for my master."; + mes "Brave Player! Follow your destiny!"; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Abrai ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDp1) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Abrai ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDp1) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Abrai ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("prtg_cas01.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("prtg_cas01.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("prtg_cas01.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("prtg_cas01.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("prtg_cas01.gat",4); + set @Economy,GetCastleData("prtg_cas01.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Abrai ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Abrai ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Abrai ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas01.gat",4,@TriggerE+1; + SetCastleData "prtg_cas01.gat",2,@Economy+1; + mes "[ Abrai ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Abrai ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Abrai ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas01.gat",4,@TriggerE+1; + SetCastleData "prtg_cas01.gat",2,@Economy+1; + mes "[ Abrai ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Abrai ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Abrai ]"; + mes "Master, you do not have enough money to invest. Investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("prtg_cas01.gat",5); + set @Defence,GetCastleData("prtg_cas01.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Abrai ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Abrai ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Abrai ]"; + mes "As you wish, master."; + close; + + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas01.gat",5,@TriggerD+1; + SetCastleData "prtg_cas01.gat",3,@Defence+1; + mes "[ Abrai ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Abrai ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Abrai ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas01.gat",5,@TriggerD+1; + SetCastleData "prtg_cas01.gat",3,@Defence+1; + mes "[ Abrai ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Abrai ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Abrai ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("prtg_cas01.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Abrai ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("prtg_cas01.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("prtg_cas01.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("prtg_cas01.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("prtg_cas01.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("prtg_cas01.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("prtg_cas01.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("prtg_cas01.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("prtg_cas01.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + + L4_9: + mes "[ Abrai ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Abrai ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "prtg_cas01.gat",@GDnum,1; + SetCastleData "prtg_cas01.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "prtg_cas01.gat",196,92,"Soldier Guardian",1287,1,"Guardian_D01::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas01.gat",113,200,"Soldier Guardian",1287,1,"Guardian_D01::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas01.gat",111,186,"Soldier Guardian",1287,1,"Guardian_D01::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas01.gat",76,202,"Archer Guardian",1285,1,"Guardian_D01::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas01.gat",90,26,"Archer Guardian",1285,1,"Guardian_D01::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas01.gat",58,59,"Knight Guardian",1286,1,"Guardian_D01::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas01.gat",112,200,"Knight Guardian",1286,1,"Guardian_D01::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas01.gat",101,194,"Knight Guardian",1286,1,"Guardian_D01::OnGuardianDied",7; + mes "[ Abrai ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Abrai ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Abrai ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Abrai ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("prtg_cas01.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Abrai ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Abrai ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Abrai ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#prt1"; + SetCastleData "prtg_cas01.gat",9,1; + mes "[ Abrai ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Abrai ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Abrai ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Abrai ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#prt1"; + SetCastleData "prtg_cas01.gat",9,0; + cutin "kafra_01",255; + mes "[ Abrai ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Abrai ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Abrai ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Abrai ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "prtg_cas01",15,209; + L6_1: + mes "[ Abrai ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Abrai ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Abrai ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Abrai ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "prtg_cas01.gat",1,0; + SetCastleData "prtg_cas01.gat",2,0; + SetCastleData "prtg_cas01.gat",3,0; + SetCastleData "prtg_cas01.gat",4,0; + SetCastleData "prtg_cas01.gat",5,0; + SetCastleData "prtg_cas01.gat",6,0; + SetCastleData "prtg_cas01.gat",7,0; + SetCastleData "prtg_cas01.gat",8,0; + SetCastleData "prtg_cas01.gat",9,0; + SetCastleData "prtg_cas01.gat",10,0; + SetCastleData "prtg_cas01.gat",11,0; + SetCastleData "prtg_cas01.gat",12,0; + SetCastleData "prtg_cas01.gat",13,0; + SetCastleData "prtg_cas01.gat",14,0; + SetCastleData "prtg_cas01.gat",15,0; + SetCastleData "prtg_cas01.gat",16,0; + SetCastleData "prtg_cas01.gat",17,0; + SetCastleData "prtg_cas01.gat",18,0; + SetCastleData "prtg_cas01.gat",19,0; + SetCastleData "prtg_cas01.gat",20,0; + SetCastleData "prtg_cas01.gat",21,0; + SetCastleData "prtg_cas01.gat",22,0; + SetCastleData "prtg_cas01.gat",23,0; + SetCastleData "prtg_cas01.gat",24,0; + SetCastleData "prtg_cas01.gat",25,0; + Announce "[" + GetGuildName(@GIDp1) + "] has surrendered Agit [" + GetCastleName("prtg_cas01.gat") + "]",0; + MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),7; + break; + L7_2: + mes "[ Abrai ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/prtg_cas02.txt b/npc/guild/old/prtg_cas02.txt new file mode 100644 index 000000000..cb38318c6 --- /dev/null +++ b/npc/guild/old/prtg_cas02.txt @@ -0,0 +1,667 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas02 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in prtg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +prtg_cas02.gat,40,227,4 script Sbanhealt#p2-7::SbanhealtNW 722,{ + set @GIDp2,GetCastleData("prtg_cas02.gat",1); + if (@GIDp2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP02: + FlagEmblem GetCastleData("prtg_cas02.gat",1); + break; +} + +prtg_cas02.gat,46,227,4 duplicate(SbanhealtNW) Sbanhealt#p2-8 722 +prtg_cas02.gat,11,219,4 duplicate(SbanhealtNW) Sbanhealt#p2-9 722 +prtg_cas02.gat,11,214,4 duplicate(SbanhealtNW) Sbanhealt#p2-10 722 +prtg_cas02.gat,20,219,4 duplicate(SbanhealtNW) Sbanhealt#p2-11 722 +prtg_cas02.gat,20,214,4 duplicate(SbanhealtNW) Sbanhealt#p2-12 722 +prtg_cas02.gat,79,227,8 duplicate(SbanhealtNW) Sbanhealt#p2-13 722 +prtg_cas02.gat,70,227,8 duplicate(SbanhealtNW) Sbanhealt#p2-14 722 +prtg_cas02.gat,38,189,8 duplicate(SbanhealtNW) Sbanhealt#p2-15 722 +prtg_cas02.gat,34,189,8 duplicate(SbanhealtNW) Sbanhealt#p2-16 722 +prtg_cas02.gat,153,161,4 duplicate(SbanhealtNW) Sbanhealt#p2-17 722 +prtg_cas02.gat,162,161,4 duplicate(SbanhealtNW) Sbanhealt#p2-18 722 + +//================================================ +// Kafra Service +//================================================ +prtg_cas02.gat,71,36,4 script Kafra Service#prt2 117,{ + cutin "kafra_01",2; + set @GIDp2,GetCastleData("prtg_cas02.gat",1); + if (getcharid(2) == @GIDp2) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDp2) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome, ^ff0000" + GetGuildName(@GIDp2) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Prontera -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "prontera.gat",278,211; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("prtg_cas02.gat",9) == 1) break; + disablenpc "Kafra Service#prt2"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ +prtg_cas02.gat,84,72,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDp2,GetCastleData("prtg_cas02.gat",1); + if (getcharid(2) != @GIDp2) goto L1n; + warp "gld_dun03.gat",164,268; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} +//================================================ +// Guild Castle Manager +//================================================ + +prtg_cas02.gat,94,61,0 script Rhay 55,{ + set @GIDp2,GetCastleData("prtg_cas02.gat",1); + if (@GIDp2 == 0) goto LStart; + if (getcharid(2) != @GIDp2) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDp2)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Rhay ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDp2) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDp2) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Rhay ]"; + mes "I am waiting for my master."; + mes "Brave Player! follow your destiny!..."; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Rhay ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDp2) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Rhay ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDp2) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employement / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Rhay ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("prtg_cas02.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("prtg_cas02.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("prtg_cas02.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("prtg_cas02.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("prtg_cas02.gat",4); + set @Economy,GetCastleData("prtg_cas02.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Rhay ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Rhay ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Rhay ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas02.gat",4,@TriggerE+1; + SetCastleData "prtg_cas02.gat",2,@Economy+1; + mes "[ Rhay ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Rhay ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Rhay ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas02.gat",4,@TriggerE+1; + SetCastleData "prtg_cas02.gat",2,@Economy+1; + mes "[ Rhay ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Rhay ]"; + mes " "; + mes "^ff0000This Castle's Commerce Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Rhay ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("prtg_cas02.gat",5); + set @Defence,GetCastleData("prtg_cas02.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Rhay ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Rhay ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Rhay ]"; + mes "As you wish, master."; + close; + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas02.gat",5,@TriggerD+1; + SetCastleData "prtg_cas02.gat",3,@Deffence+1; + mes "[ Rhay ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Rhay ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Rhay ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas02.gat",5,@TriggerD+1; + SetCastleData "prtg_cas02.gat",3,@Defence+1; + mes "[ Rhay ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Rhay ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Rhay ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("prtg_cas02.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + mes "[ Rhay ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("prtg_cas02.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("prtg_cas02.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("prtg_cas02.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("prtg_cas02.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("prtg_cas02.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("prtg_cas02.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("prtg_cas02.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("prtg_cas02.gat",17) == 1) goto L4Error2; + set @GDnum,17; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_9: + mes "[ Rhay ]"; + mes "Would you really like to install guardian? You need 10000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Rhay ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "prtg_cas02.gat",@GDnum,1; +SetCastleData "prtg_cas01.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "prtg_cas02.gat",75,71,"Soldier Guardian",1287,1,"Guardian_D02::GuardianDied",0; + if(@GDnum==11) guardian "prtg_cas02.gat",56,31,"Soldier Guardian",1287,1,"Guardian_D02::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas02.gat",42,223,"Soldier Guardian",1287,1,"Guardian_D02::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas02.gat",44,195,"Archer Guardian",1285,1,"Guardian_D02::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas02.gat",197,22,"Archer Guardian",1285,1,"Guardian_D02::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas02.gat",68,71,"Knight Guardian",1286,1,"Guardian_D02::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas02.gat",202,27,"Knight Guardian",1286,1,"Guardian_D02::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas02.gat",59,24,"Knight Guardian",1286,1,"Guardian_D02::OnGuardianDied",7; + mes "[ Rhay ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Rhay ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Rhay ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Rhay ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; + +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("prtg_cas02.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Rhay ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Rhay ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Rhay ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#prt2"; + SetCastleData "prtg_cas02.gat",9,1; + mes "[ Rhay ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Rhay ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Rhay ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Rhay ]"; + mes "Would you like to dismiss the current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "Have I did anything wrong? If yes, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#prt2"; + SetCastleData "prtg_cas02.gat",9,0; + cutin "kafra_01",255; + mes "[ Rhay ]"; +mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Rhay ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Rhay ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Rhay ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "prtg_cas02",15,209; + L6_1: + mes "[ Rhay ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Rhay ]"; + mes "Master!!"; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Rhay ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Rhay ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "prtg_cas02.gat",1,0; + SetCastleData "prtg_cas02.gat",2,0; + SetCastleData "prtg_cas02.gat",3,0; + SetCastleData "prtg_cas02.gat",4,0; + SetCastleData "prtg_cas02.gat",5,0; + SetCastleData "prtg_cas02.gat",6,0; + SetCastleData "prtg_cas02.gat",7,0; + SetCastleData "prtg_cas02.gat",8,0; + SetCastleData "prtg_cas02.gat",9,0; + SetCastleData "prtg_cas02.gat",10,0; + SetCastleData "prtg_cas02.gat",11,0; + SetCastleData "prtg_cas02.gat",12,0; + SetCastleData "prtg_cas02.gat",13,0; + SetCastleData "prtg_cas02.gat",14,0; + SetCastleData "prtg_cas02.gat",15,0; + SetCastleData "prtg_cas02.gat",16,0; + SetCastleData "prtg_cas02.gat",17,0; + SetCastleData "prtg_cas02.gat",18,0; + SetCastleData "prtg_cas02.gat",19,0; + SetCastleData "prtg_cas02.gat",20,0; + SetCastleData "prtg_cas02.gat",21,0; + SetCastleData "prtg_cas02.gat",22,0; + SetCastleData "prtg_cas02.gat",23,0; + SetCastleData "prtg_cas02.gat",24,0; + SetCastleData "prtg_cas02.gat",25,0; + Announce "[" + GetGuildName(@GIDp2) + "] has surrendered Agit [" + GetCastleName("prtg_cas02.gat") + "]",0; + MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),7; + break; + L7_2: + mes "[ Rhay ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; + +} diff --git a/npc/guild/old/prtg_cas03.txt b/npc/guild/old/prtg_cas03.txt new file mode 100644 index 000000000..ef81bbef9 --- /dev/null +++ b/npc/guild/old/prtg_cas03.txt @@ -0,0 +1,667 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas03 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in prtg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + + +prtg_cas03.gat,168,28,4 script Lazrigees#p3-7::LazrigeesNW 722,{ + set @GIDp3,GetCastleData("prtg_cas03.gat",1); + if (@GIDp3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP03: + FlagEmblem GetCastleData("prtg_cas03.gat",1); + break; +} + +prtg_cas03.gat,182,28,4 duplicate(LazrigeesNW) Lazrigees#p3-8 722 +prtg_cas03.gat,43,50,4 duplicate(LazrigeesNW) Lazrigees#p3-9 722 +prtg_cas03.gat,48,50,4 duplicate(LazrigeesNW) Lazrigees#p3-10 722 +prtg_cas03.gat,43,58,4 duplicate(LazrigeesNW) Lazrigees#p3-11 722 +prtg_cas03.gat,48,58,4 duplicate(LazrigeesNW) Lazrigees#p3-12 722 +prtg_cas03.gat,158,210,4 duplicate(LazrigeesNW) Lazrigees#p3-13 722 +prtg_cas03.gat,169,210,4 duplicate(LazrigeesNW) Lazrigees#p3-14 722 +prtg_cas03.gat,162,201,4 duplicate(LazrigeesNW) Lazrigees#p3-15 722 +prtg_cas03.gat,165,201,4 duplicate(LazrigeesNW) Lazrigees#p3-16 722 + +//================================================ +// Kafra Service +//================================================ +prtg_cas03.gat,181,215,4 script Kafra Service#prt3 117,{ + cutin "kafra_01",2; + set @GIDp3,GetCastleData("prtg_cas03.gat",1); + if (getcharid(2) == @GIDp3) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDp3) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome. ^ff0000" + GetGuildName(@GIDp3) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Prontera -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "prontera.gat",278,211; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("prtg_cas03.gat",9) == 1) break; + disablenpc "Kafra Service#prt3"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ + +prtg_cas03.gat,5,70,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDp3,GetCastleData("prtg_cas03.gat",1); + if (getcharid(2) != @GIDp3) goto L1n; + warp "gld_dun03.gat",164,179; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +prtg_cas03.gat,51,100,4 script Stick 55,{ + set @GIDp3,GetCastleData("prtg_cas03.gat",1); + if (@GIDp3 == 0) goto LStart; + if (getcharid(2) != @GIDp3) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDp3)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Stick ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDp3) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDp3) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Stick ]"; + mes "I am waiting for my master."; + mes "Brave Player! follow your destiny!..."; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Stick ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDp3) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Stick ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDp3) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Stick ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("prtg_cas03.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("prtg_cas03.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("prtg_cas03.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("prtg_cas03.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("prtg_cas03.gat",4); + set @Economy,GetCastleData("prtg_cas03.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Stick ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Stick ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Stick ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas03.gat",4,@TriggerE+1; + SetCastleData "prtg_cas03.gat",2,@Economy+1; + mes "[ Stick ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Stick ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Stick ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas03.gat",4,@TriggerE+1; + SetCastleData "prtg_cas03.gat",2,@Economy+1; + mes "[ Stick ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Stick ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Stick ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("prtg_cas03.gat",5); + set @Defence,GetCastleData("prtg_cas03.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Stick ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Stick ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Stick ]"; + mes "As you wish, master."; + close; + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas03.gat",5,@TriggerD+1; + SetCastleData "prtg_cas03.gat",3,@Defence+1; + mes "[ Stick ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Stick ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Stick ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas03.gat",5,@TriggerD+1; + SetCastleData "prtg_cas03.gat",3,@Defence+1; + mes "[ Stick ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Stick ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Stick ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("prtg_cas03.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Stick ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("prtg_cas03.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("prtg_cas03.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("prtg_cas03.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("prtg_cas03.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("prtg_cas03.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("prtg_cas03.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("prtg_cas03.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("prtg_cas03.gat",17) == 1) goto L4Error2; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_9: + mes "[ Stick ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Stick ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "prtg_cas03.gat",@GDnum,1; + SetCastleData "prtg_cas03.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "prtg_cas03.gat",165,55,"Soldier Guardian",1287,1,"Guardian_D03::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas03.gat",161,181,"Soldier Guardian",1287,1,"Guardian_D03::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas03.gat",165,199,"Soldier Guardian",1287,1,"Guardian_D03::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas03.gat",169,22,"Archer Guardian",1285,1,"Guardian_D03::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas03.gat",165,191,"Archer Guardian",1285,1,"Guardian_D03::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas03.gat",175,13,"Knight Guardian",1286,1,"Guardian_D03::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas03.gat",169,180,"Knight Guardian",1286,1,"Guardian_D03::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas03.gat",142,217,"Knight Guardian",1286,1,"Guardian_D03::OnGuardianDied",7; + mes "[ Stick ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Stick ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Stick ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Stick ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("prtg_cas03.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Stick ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Stick ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Stick ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#prt3"; + SetCastleData "prtg_cas03.gat",9,1; + mes "[ Stick ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Stick ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Stick ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Stick ]"; + mes "Would you like to dismiss current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "What have I done wrong? if so, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#prt3"; + SetCastleData "prtg_cas03.gat",9,0; + cutin "kafra_01",255; + mes "[ Stick ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Stick ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Stick ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Stick ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "prtg_cas03",189,132; + L6_1: + mes "[ Stick ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Stick ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Stick ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Stick ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "prtg_cas03.gat",1,0; + SetCastleData "prtg_cas03.gat",2,0; + SetCastleData "prtg_cas03.gat",3,0; + SetCastleData "prtg_cas03.gat",4,0; + SetCastleData "prtg_cas03.gat",5,0; + SetCastleData "prtg_cas03.gat",6,0; + SetCastleData "prtg_cas03.gat",7,0; + SetCastleData "prtg_cas03.gat",8,0; + SetCastleData "prtg_cas03.gat",9,0; + SetCastleData "prtg_cas03.gat",10,0; + SetCastleData "prtg_cas03.gat",11,0; + SetCastleData "prtg_cas03.gat",12,0; + SetCastleData "prtg_cas03.gat",13,0; + SetCastleData "prtg_cas03.gat",14,0; + SetCastleData "prtg_cas03.gat",15,0; + SetCastleData "prtg_cas03.gat",16,0; + SetCastleData "prtg_cas03.gat",17,0; + SetCastleData "prtg_cas03.gat",18,0; + SetCastleData "prtg_cas03.gat",19,0; + SetCastleData "prtg_cas03.gat",20,0; + SetCastleData "prtg_cas03.gat",21,0; + SetCastleData "prtg_cas03.gat",22,0; + SetCastleData "prtg_cas03.gat",23,0; + SetCastleData "prtg_cas03.gat",24,0; + SetCastleData "prtg_cas03.gat",25,0; + Announce "[" + GetGuildName(@GIDp3) + "] has surrendered Agit [" + GetCastleName("prtg_cas03.gat") + "]",0; + MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),7; + break; + L7_2: + mes "[ Stick ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; +} diff --git a/npc/guild/old/prtg_cas04.txt b/npc/guild/old/prtg_cas04.txt new file mode 100644 index 000000000..8579401ae --- /dev/null +++ b/npc/guild/old/prtg_cas04.txt @@ -0,0 +1,666 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas04 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in prtg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +prtg_cas04.gat,82,29,4 script Squagul#p4-7::SquagulNW 722,{ + set @GIDp4,GetCastleData("prtg_cas04.gat",1); + if (@GIDp4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP04: + FlagEmblem GetCastleData("prtg_cas04.gat",1); + break; +} + +prtg_cas04.gat,75,29,4 duplicate(SquagulNW) Squagul#p4-8 722 +prtg_cas04.gat,75,27,4 duplicate(SquagulNW) Squagul#p4-9 722 +prtg_cas04.gat,82,27,4 duplicate(SquagulNW) Squagul#p4-10 722 +prtg_cas04.gat,59,29,4 duplicate(SquagulNW) Squagul#p4-11 722 +prtg_cas04.gat,67,29,4 duplicate(SquagulNW) Squagul#p4-12 722 +prtg_cas04.gat,258,25,4 duplicate(SquagulNW) Squagul#p4-13 722 +prtg_cas04.gat,258,20,4 duplicate(SquagulNW) Squagul#p4-14 722 +prtg_cas04.gat,263,20,4 duplicate(SquagulNW) Squagul#p4-15 722 +prtg_cas04.gat,263,27,4 duplicate(SquagulNW) Squagul#p4-16 722 + +//================================================ +// Kafra Service +//================================================ +prtg_cas04.gat,258,247,4 script Kafra Service#prt4 117,{ + cutin "kafra_01",2; + set @GIDp4,GetCastleData("prtg_cas04.gat",1); + if (getcharid(2) == @GIDp4) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDp4) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome. ^ff0000" + GetGuildName(@GIDp4) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Prontera -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "prontera.gat",278,211; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; +//No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("prtg_cas04.gat",9) == 1) break; + disablenpc "Kafra Service#prt4"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ + +prtg_cas04.gat,56,283,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDp4,GetCastleData("prtg_cas04.gat",1); + if (getcharid(2) != @GIDp4) goto L1n; + warp "gld_dun03.gat",268,203; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +prtg_cas04.gat,259,265,4 script Bandred 55,{ + set @GIDp4,GetCastleData("prtg_cas04.gat",1); + if (@GIDp4 == 0) goto LStart; + if (getcharid(2) != @GIDp4) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDp4)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Bandred ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDp4) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDp4) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Bandred ]"; + mes "I am waiting for my master."; + mes "Brave Player! follow your destiny!..."; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Bandred ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDp4) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Bandred ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDp4) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Bandred ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("prtg_cas04.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("prtg_cas04.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("prtg_cas04.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("prtg_cas04.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("prtg_cas04.gat",4); + set @Economy,GetCastleData("prtg_cas04.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Bandred ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Bandred ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Bandred ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas04.gat",4,@TriggerE+1; + SetCastleData "prtg_cas04.gat",2,@Economy+1; + mes "[ Bandred ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Bandred ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Bandred ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas04.gat",4,@TriggerE+1; + SetCastleData "prtg_cas04.gat",2,@Economy+1; + mes "[ Bandred ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Bandred ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Bandred ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("prtg_cas04.gat",5); + set @Defence,GetCastleData("prtg_cas04.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Bandred ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Bandred ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Bandred ]"; + mes "As you wish, master."; + close; + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas04.gat",5,@TriggerD+1; + SetCastleData "prtg_cas04.gat",3,@Defence+1; + mes "[ Bandred ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Bandred ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Bandred ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas04.gat",5,@TriggerD+1; + SetCastleData "prtg_cas04.gat",3,@Defence+1; + mes "[ Bandred ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Bandred ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Bandred ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("prtg_cas04.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Bandred ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("prtg_cas04.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("prtg_cas04.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("prtg_cas04.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("prtg_cas04.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("prtg_cas04.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("prtg_cas04.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("prtg_cas04.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("prtg_cas04.gat",17) == 1) goto L4Error2; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_9: + mes "[ Bandred ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Bandred ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "prtg_cas04.gat",@GDnum,1; + SetCastleData "prtg_cas04.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "prtg_cas04.gat",30,234,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas04.gat",38,234,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas04.gat",63,26,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas04.gat",253,274,"Archer Guardian",1285,1,"Guardian_D04::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas04.gat",269,256,"Archer Guardian",1285,1,"Guardian_D04::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas04.gat",267,271,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas04.gat",34,281,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas04.gat",33,232,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",7; + mes "[ Bandred ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Bandred ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Bandred ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Bandred ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("prtg_cas04.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Bandred ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Bandred ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Bandred ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#prt4"; + SetCastleData "prtg_cas04.gat",9,1; + mes "[ Bandred ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Bandred ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Bandred ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Bandred ]"; + mes "Would you like to dismiss current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "What have I done wrong? if so, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#prt4"; + SetCastleData "prtg_cas04.gat",9,0; + cutin "kafra_01",255; + mes "[ Bandred ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Bandred ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Bandred ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Bandred ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "prtg_cas04",271,162; + L6_1: + mes "[ Bandred ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Bandred ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Bandred ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Bandred ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "prtg_cas04.gat",1,0; + SetCastleData "prtg_cas04.gat",2,0; + SetCastleData "prtg_cas04.gat",3,0; + SetCastleData "prtg_cas04.gat",4,0; + SetCastleData "prtg_cas04.gat",5,0; + SetCastleData "prtg_cas04.gat",6,0; + SetCastleData "prtg_cas04.gat",7,0; + SetCastleData "prtg_cas04.gat",8,0; + SetCastleData "prtg_cas04.gat",9,0; + SetCastleData "prtg_cas04.gat",10,0; + SetCastleData "prtg_cas04.gat",11,0; + SetCastleData "prtg_cas04.gat",12,0; + SetCastleData "prtg_cas04.gat",13,0; + SetCastleData "prtg_cas04.gat",14,0; + SetCastleData "prtg_cas04.gat",15,0; + SetCastleData "prtg_cas04.gat",16,0; + SetCastleData "prtg_cas04.gat",17,0; + SetCastleData "prtg_cas04.gat",18,0; + SetCastleData "prtg_cas04.gat",19,0; + SetCastleData "prtg_cas04.gat",20,0; + SetCastleData "prtg_cas04.gat",21,0; + SetCastleData "prtg_cas04.gat",22,0; + SetCastleData "prtg_cas04.gat",23,0; + SetCastleData "prtg_cas04.gat",24,0; + SetCastleData "prtg_cas04.gat",25,0; + Announce "[" + GetGuildName(@GIDp4) + "] has surrendered Agit [" + GetCastleName("prtg_cas04.gat") + "]",0; + MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),7; + break; + L7_2: + mes "[ Bandred ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; +} \ No newline at end of file diff --git a/npc/guild/old/prtg_cas05.txt b/npc/guild/old/prtg_cas05.txt new file mode 100644 index 000000000..8f39492e0 --- /dev/null +++ b/npc/guild/old/prtg_cas05.txt @@ -0,0 +1,664 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas05 script +//===== By: ================================================== +//= jAthena - kalen (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Guild Flags, Kafra and Guild Manager scripts in prtg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//============================================================ + +prtg_cas05.gat,19,247,4 script Guindull#p5-7::GuindullNW 722,{ + set @GIDp5,GetCastleData("prtg_cas05.gat",1); + if (@GIDp5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP04: + FlagEmblem GetCastleData("prtg_cas05.gat",1); + break; +} + +prtg_cas05.gat,19,243,4 duplicate(GuindullNW) Guindull#p5-8 722 +prtg_cas05.gat,26,247,4 duplicate(GuindullNW) Guindull#p5-9 722 +prtg_cas05.gat,26,243,4 duplicate(GuindullNW) Guindull#p5-10 722 +prtg_cas05.gat,249,289,4 duplicate(GuindullNW) Guindull#p5-11 722 +prtg_cas05.gat,256,289,4 duplicate(GuindullNW) Guindull#p5-12 722 +prtg_cas05.gat,253,271,4 duplicate(GuindullNW) Guindull#p5-13 722 +prtg_cas05.gat,273,257,4 duplicate(GuindullNW) Guindull#p5-14 722 + +//================================================ +// Kafra Service +//================================================ +prtg_cas05.gat,52,41,4 script Kafra Service#prt5 117,{ + cutin "kafra_01",2; + set @GIDp5,GetCastleData("prtg_cas05.gat",1); + if (getcharid(2) == @GIDp5) goto LStartg; + mes "[Kafra Service]"; + mes "I am here to serve only ^ff0000" + GetGuildName(@GIDp5) + "^000000 members. Please use different Kafra Service. Thank you."; + goto L_EXIT; +LStartg: + mes "[Kafra Service]"; + mes "Welcome. ^ff0000" + GetGuildName(@GIDp5) + "^000000 members"; + mes "We will stay with you wherever you go"; + next; + menu "Open Storage",L2,"Teleport Service",L3,"Use Cart Service",L4,"Cancel",L7; +//================================================ +// Storage +//================================================ +L2: + if(getskilllv(1) < 6) goto Lerror2_1; + openstorage; + goto L_EXIT; + Lerror2_1: + mes "[Kafra Service]"; + mes "You must have lvl 6 or higher novice skill."; + goto L_EXIT; +//================================================ +// Teleport Service +//================================================ +L3: + mes "[Kafra Service]"; + mes "Please confirm your destination."; + next; + menu "Prontera -> 200 z",L3_1,"Cancel",L3_2; + L3_1: + if (Zeny < 200) goto Lerror3; + set Zeny,Zeny-200; + warp "prontera.gat",278,211; +break; + L3_2: + mes "[Kafra Service]"; + mes "Kafra Service always trying to offer best service for you."; + mes "Thank you for using our service."; + goto L_EXIT; + Lerror3: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough Zeny to use the teleport service."; + goto L_EXIT; +//================================================ +// Cart Rental +//================================================ +L4: + if (!((Class == 5) || (Class == 10) || (Class == 18) || (Class == 4006) || (Class == 4011) || (Class == 4019))) goto Lerror4_1; + if (checkcart(0) == 1) goto Lerror4_3; + mes "[Kafra Service]"; + mes "The cart rental fee is 800 Zeny."; + mes "Would you like to rent a cart?"; + next; + menu "Rent a Cart",L4_1,"Cancel",-; + mes "[Kafra Service]"; + mes "We always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; + L4_1: + If(getskilllv(39) == 0) goto Lerror4_4; + if (Zeny < 800) goto Lerror4_2; + set Zeny,Zeny-800; + setcart; + goto L_EXIT; + //Not a merchant class + Lerror4_1: + mes "[Kafra Service]"; + mes "Sorry, the cart rental service is only for the merchant class."; + goto L_EXIT; + //Not enough zenny + Lerror4_2: + mes "[Kafra Service]"; + mes "Sorry, you don't have enough zeny. You need 800 Zeny."; + goto L_EXIT; + //Already have cart + Lerror4_3: + mes "[Kafra Service]"; + mes "Sorry, you already have a cart now."; + mes "Return when you dont have one and are in need of our service."; + goto L_EXIT; + //No Pushcart Skill + Lerror4_4: + mes "[Kafra Service]"; + mes "Sorry, you need to learn the skill [Pushcart] first"; + goto L_EXIT; +//================================================ +// Cancel +//================================================ +L7: + mes "[Kafra Service]"; + mes "We will always try to serve you better."; + mes "Thank you for using our service."; + goto L_EXIT; +L_EXIT: + cutin "kafra_01",255; + close; +OnInit: + if (GetCastleData("prtg_cas05.gat",9) == 1) break; + disablenpc "Kafra Service#prt5"; + break; +} + +//================================================ +// Guild Dungeon Switch +//================================================ + +prtg_cas05.gat,56,283,0 script Switch 111,{ + mes "[ Vibration of Man's Voice ]"; + mes " ' Only brave man get to lead the guild base.. '"; + next; + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",-,"No",L2; + set @GIDp5,GetCastleData("prtg_cas05.gat",1); + if (getcharid(2) != @GIDp5) goto L1n; + warp "gld_dun03.gat",199,28; + break; +L1n: + mes "[ Vibration of Man's Voice ]"; + mes " ' ... ' "; +L2: + close; +} + +//================================================ +// Guild Castle Manager +//================================================ + +prtg_cas05.gat,36,37,4 script Reiner 55,{ + set @GIDp5,GetCastleData("prtg_cas05.gat",1); + if (@GIDp5 == 0) goto LStart; + if (getcharid(2) != @GIDp5) goto LStart2; + if (strcharinfo(0) == getguildmaster(@GIDp5)) goto LStart3; + goto LStart1; + +//================================================ +// Guild Members +//================================================ +LStart1: + mes "[ Reiner ]"; + mes "You're not ^ff0000" + getguildmaster(@GIDp5) + "^000000 ! I am here to follow ^ff0000" + getguildmaster(@GIDp5) + "^000000 's command only"; + close; +//================================================ +// Castle not owned +//================================================ +LStart: + mes "[ Reiner ]"; + mes "I am waiting for my master."; + mes "Brave Player! follow your destiny!..."; + close; +//================================================ +// Non-Guild Members +//================================================ +LStart2: + mes "[ Reiner ]"; + mes "I am here to follow ^ff0000" + getguildmaster(@GIDp5) + "^000000 's command! Where are the guardians? Destroy these bastards!"; + close; +//================================================ +// Guild Leader +//================================================ +LStart3: + mes "[ Reiner ]"; + mes "Welcome Master ^ff0000" + getguildmaster(@GIDp5) + "^000000 !"; + mes "I'll do anything you tell me to do sir!."; + next; + menu "Guild Base Briefing",L1,"Commerce Investment",L2,"Defence Investment",L3,"Guardian Installation",L4,"Kafra Service Employment / Dismissal",L5,"Enter Master's Room",L6,"Empty Guild Base",L7; +//----------------------------------------------------------- +//================================================ +// Guild Base Briefing +//================================================ +L1: + mes "[ Reiner ]"; + mes "Guild Base Investment Information."; + mes " "; + mes "Current Commerce Investment is : " + GetCastleData("prtg_cas05.gat",2) + " points."; + mes "^0000ff - You have invested " + GetCastleData("prtg_cas05.gat",4) + "times today.^000000"; + mes " "; + mes "Current Defence Investment is : " + GetCastleData("prtg_cas05.gat",3) + "points."; + mes "^0000ff- You have invested" + GetCastleData("prtg_cas05.gat",5) + "times today.^000000"; + mes " "; + mes "That is about it."; + close; +//================================================ +// Commerce Investment +//================================================ +L2: + set @TriggerE,GetCastleData("prtg_cas05.gat",4); + set @Economy,GetCastleData("prtg_cas05.gat",2); + if(@Economy < 8) set $eco_invest,10000; + if(@Economy >= 8) set $eco_invest,20000; + if(@Economy >= 16) set $eco_invest,40000; + if(@Economy >= 25) set $eco_invest,80000; + if(@Economy >= 34) set $eco_invest,160000; + if(@Economy >= 44) set $eco_invest,320000; + if(@Economy >= 54) set $eco_invest,640000; + if(@Economy >= 65) set $eco_invest,1280000; + if(@Economy >= 76) set $eco_invest,2560000; + if(@Economy >= 88) set $eco_invest,5120000; + if(@TriggerE == 0) goto L2_1; + if(@TriggerE == 1) goto L2_1_2; + if(@Economy >= 100) goto L2_2; + mes "[ Reiner ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; +L2_1: + if(@TriggerE == 1) goto L2_1_2; + mes "[ Reiner ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $eco_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Commerce.",L2_1_1,"Cancel.",-; + mes "[ Reiner ]"; + mes "As you wish, master."; + close; + L2_1_1: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas05.gat",4,@TriggerE+1; + SetCastleData "prtg_cas05.gat",2,@Economy+1; + mes "[ Reiner ]"; + mes "You have invested successfully."; + close; + +L2_1_2: + set $eco_invest,$eco_invest*4; + mes "[ Reiner ]"; + mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods. So an investment will be required if you consider the future"; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Commerce.",L2_1_3,"Cancel.",-; + mes "[ Reiner ]"; + mes "As you wish, master."; + close; + L2_1_3: + if(Zeny < $eco_invest) goto L2_error; + set Zeny,Zeny-$eco_invest; + SetCastleData "prtg_cas05.gat",4,@TriggerE+1; + SetCastleData "prtg_cas05.gat",2,@Economy+1; + mes "[ Reiner ]"; + mes "You have invested successfully"; + close; + +L2_2: + mes "[ Reiner ]"; + mes " "; + mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; + +L2_error: + mes "[ Reiner ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Defence Investment +//================================================ +L3: + set @TriggerD,GetCastleData("prtg_cas05.gat",5); + set @Defence,GetCastleData("prtg_cas05.gat",3); + if(@Defence < 8) set $def_invest,20000; + if(@Defence >= 8) set $def_invest,40000; + if(@Defence >= 16) set $def_invest,80000; + if(@Defence >= 25) set $def_invest,160000; + if(@Defence >= 34) set $def_invest,320000; + if(@Defence >= 44) set $def_invest,640000; + if(@Defence >= 54) set $def_invest,1280000; + if(@Defence >= 65) set $def_invest,2560000; + if(@Defence >= 76) set $def_invest,5120000; + if(@Defence >= 88) set $def_invest,10240000; + if(@TriggerD == 0) goto L3_1; + if(@TriggerD == 1) goto L3_1_2; + if(@Defence >= 100) goto L3_2; + mes "[ Reiner ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level."; + close; + +L3_1: + if(@TriggerD == 1) goto L3_1_2; + mes "[ Reiner ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "The needed investment amount is ^ff0000" + $def_invest + "^000000 zeny. Would you like to invest?"; + next; + menu "Invest Defence.",L3_1_1,"Cancel",-; + mes "[ Reiner ]"; + mes "As you wish, master."; + close; + L3_1_1: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas05.gat",5,@TriggerD+1; + SetCastleData "prtg_cas05.gat",3,@Defence+1; + mes "[ Reiner ]"; + mes "You have invested successfully."; + close; +L3_1_2: + set $def_invest,$def_invest*4; + mes "[ Reiner ]"; + mes "If you improve investment of defence, the durability of our guardians and the emperium will increase. So if you consider our future battles, an investment will be required."; + mes " "; + mes "You can invest up to two times a day, but the second time costs more"; + mes " "; + mes "You've already invested once today, but you can invest again at ^ff0000" + $eco_invest + "^000000 Zeny. Would you like to invest again?"; + next; + menu "Invest Defence.",L3_1_3,"Cancel",-; + mes "[ Reiner ]"; + mes "As you wish, master."; + close; + + L3_1_3: + if(Zeny < $def_invest) goto L3_error; + set Zeny,Zeny-$def_invest; + SetCastleData "prtg_cas05.gat",5,@TriggerD+1; + SetCastleData "prtg_cas05.gat",3,@Defence+1; + mes "[ Reiner ]"; + mes "You have invested successfully."; + close; +L3_2: + mes "[ Reiner ]"; + mes " "; + mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000"; + close; +L3_error: + mes "[ Reiner ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Guardian Installation +//================================================ +L4: + If(getskilllv(10002) == 0) goto L4Error; + set @Defence,GetCastleData("prtg_cas05.gat",3); + set @Guardian0,guardianinfo(0); + set @Guardian1,guardianinfo(1); + set @Guardian2,guardianinfo(2); + set @Guardian3,guardianinfo(3); + set @Guardian4,guardianinfo(4); + set @Guardian5,guardianinfo(5); + set @Guardian6,guardianinfo(6); + set @Guardian7,guardianinfo(7); + set @SGuardian,strmobinfo(4,1287)+2000*@Defence; + set @AGuardian,strmobinfo(4,1286)+2000*@Defence; + set @KGuardian,strmobinfo(4,1285)+2000*@Defence; + + mes "[ Reiner ]"; + mes "Would you like to install a guardian? Guardian will protect guild base from enemies."; + mes "Please choose guardian."; + next; + + menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1, + "Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2, + "Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3, + "Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4, + "Archer Guardian (" + @Guardian4 +"/" + @AGuardian + ")",L4_5, + "Knight Guardian (" + @Guardian5 +"/" + @KGuardian + ")",L4_6, + "Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7, + "Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8; + + L4_1: + if (GetCastleData("prtg_cas05.gat",10) == 1) goto L4Error2; + set @GDnum,10; + set @GDnum2,18; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_2: + if (GetCastleData("prtg_cas05.gat",11) == 1) goto L4Error2; + set @GDnum,11; + set @GDnum2,19; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_3: + if (GetCastleData("prtg_cas05.gat",12) == 1) goto L4Error2; + set @GDnum,12; + set @GDnum2,20; + set @GuardianHP,@SGuardian; + goto L4_9; + L4_4: + if (GetCastleData("prtg_cas05.gat",13) == 1) goto L4Error2; + set @GDnum,13; + set @GDnum2,21; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_5: + if (GetCastleData("prtg_cas05.gat",14) == 1) goto L4Error2; + set @GDnum,14; + set @GDnum2,22; + set @GuardianHP,@AGuardian; + goto L4_9; + L4_6: + if (GetCastleData("prtg_cas05.gat",15) == 1) goto L4Error2; + set @GDnum,15; + set @GDnum2,23; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_7: + if (GetCastleData("prtg_cas05.gat",16) == 1) goto L4Error2; + set @GDnum,16; + set @GDnum2,24; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_8: + if (GetCastleData("prtg_cas05.gat",17) == 1) goto L4Error2; + set @GDnum2,25; + set @GuardianHP,@KGuardian; + goto L4_9; + L4_9: + mes "[ Reiner ]"; + mes "Would you really like to install guardian? You need 10,000 zeny to install."; + next; + menu "Install",L4_9_1,"Cancel",-; + mes "[ Reiner ]"; + mes "I'll follow your order sir, but it is worth to have a guardian soon or later."; + close; + L4_9_1: + if (Zeny < 10000) goto L4Error3; + set Zeny,Zeny-10000; + SetCastleData "prtg_cas05.gat",@GDnum,1; + SetCastleData "prtg_cas05.gat",@GDnum2,@GuardianHP; + if(@GDnum==10) guardian "prtg_cas05.gat",244,15,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas05.gat",241,14,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas05.gat",68,40,"Soldier Guardian",1287,1,"Guardian_D04::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas05.gat",62,264,"Archer Guardian",1285,1,"Guardian_D04::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas05.gat",244,61,"Archer Guardian",1285,1,"Guardian_D04::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas05.gat",34,24,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas05.gat",208,86,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas05.gat",43,70,"Knight Guardian",1286,1,"Guardian_D04::OnGuardianDied",7; + mes "[ Reiner ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +L4Error: + mes "[ Reiner ]"; + mes "Master, you cannot install guardians because the guild had not learnt the ^ff0000Guardian Research^000000 skill. Guardian Installation has been cancelled."; + close; +L4Error2: + mes "[ Reiner ]"; + mes "Master, that guardian has already been installed.."; + close; +L4Error3: + mes "[ Reiner ]"; + mes "Master, you do not have enough money to invest, investment has been cancelled."; + close; +//================================================ +// Kafra Employment +//================================================ +L5: + if (GetCastleData("prtg_cas05.gat",9) == 1) goto Lkafra_dimi; +//================================================ +//(When Kafra is off) Employment +//================================================ + If(getskilllv(10001) == 0) goto L_k_a; + mes "[ Reiner ]"; + mes "Would you like to employ the services of a Kafra Service?"; + mes "^ff0000 You need 10,000 Zeny to employ... "; + next; + menu "Employ Kafra.",L_k_0,"Cancel",L_k_E; + + L_k_a: + mes "[ Reiner ]"; + mes "Master, you don't have a contract with the Kafra Service Company. In order to hire, a kafra, it is important to be contracted with the Kafra Service by having Guild Skill ^ff0000Contract With Kafra^000000. Employment has been cancelled ."; + close; + L_k_0: + if (Zeny > 10000) goto L_k_1; + mes "[ Reiner ]"; + mes "Master, you do not have enough money to employ Kafra. Employment has been cancelled."; + close; + L_k_1: + set Zeny,Zeny-10000; + enablenpc "Kafra Service#prt5"; + SetCastleData "prtg_cas05.gat",9,1; + mes "[ Reiner ]"; + mes "You have been contracted with Kafra Service Company."; + next; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "How do you do? I came here to follow your orders!."; + mes "I'll do the best I can to serve you better."; + next; + cutin "kafra_01",255; + mes "[ Reiner ]"; + mes "Your employment contract lasts one month."; + mes "After this term, you'll have to pay again."; + mes "I think the Kafra Service will benefit our guild members."; + close; +L_k_e: + mes "[ Reiner ]"; + mes "Yes, Master. But we should really get a Kafra as soon as possible!"; + close; +//========================= +//(When Kafra is on) Dismissal +//========================= +Lkafra_dimi: + mes "[ Reiner ]"; + mes "Would you like to dismiss current Kafra Service?"; + next; + menu "Dismissal",-,"Cancel",L_D_1; + cutin "kafra_01",2; + mes "[ Kafra Service ]"; + mes "What have I done wrong? if so, would you please forgive me?"; + next; + menu "Dismiss",-,"Cancel",L_D_2; + mes "[ Kafra Service ]"; + mes "It's such unfortunate that I'm unable to serve master anymore"; + next; + disablenpc "Kafra Service#prt5"; + SetCastleData "prtg_cas05.gat",9,0; + cutin "kafra_01",255; + mes "[ Reiner ]"; + mes "The Kafra Service had been dismissed"; + mes "But... we should really get a Kafra as soon as possible!"; + close; + L_D_2: + mes "[ Kafra Service ]"; + mes "Thank you master, I'll do my best! ^^."; + cutin "kafra_01",255; + close; + L_D_1: + mes "[ Reiner ]"; + mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us"; + close; +L5_1: +//================================================ +// Guild Treasure Room +//================================================ +L6: + mes "[ Reiner ]"; + mes "Would you like to get into our treasure room?"; + mes "That place is only for guild master, which means you are the only one who has access to enter."; + next; + menu "Enter Master's room.",-,"Cancel",L6_1; + mes "[ Reiner ]"; + mes "Please follow me through the secret way."; + mes "You must push down the secret switch in order to get out."; + next; + warp "prtg_cas05",15,209; + L6_1: + mes "[ Reiner ]"; + mes "The goods are produced everyday."; + mes "You should get them whenever you can because they might dissapear if you take them at the wrong time."; + close; +//================================================ +// Surrender Castle +//================================================ +L7: + mes "[ Reiner ]"; + mes "Master.."; + mes "Do you really want to give up this guild base?"; + mes "It is not worth it to give up this guild base, master!!!"; + mes "Please reconsider, master!!"; + next; + menu "Empty Guild Base",L7_1,"Cancel",L7_2; + L7_1: + mes "[ Reiner ]"; + mes "Master, please reconsider...!!"; + next; + menu "Cancel",L7_2,"Empty Guild Base",-; + mes "[ Reiner ]"; + mes "Master!!....."; + mes "Oh well.."; + next; + SetCastleData "prtg_cas05.gat",1,0; + SetCastleData "prtg_cas05.gat",2,0; + SetCastleData "prtg_cas05.gat",3,0; + SetCastleData "prtg_cas05.gat",4,0; + SetCastleData "prtg_cas05.gat",5,0; + SetCastleData "prtg_cas05.gat",6,0; + SetCastleData "prtg_cas05.gat",7,0; + SetCastleData "prtg_cas05.gat",8,0; + SetCastleData "prtg_cas05.gat",9,0; + SetCastleData "prtg_cas05.gat",10,0; + SetCastleData "prtg_cas05.gat",11,0; + SetCastleData "prtg_cas05.gat",12,0; + SetCastleData "prtg_cas05.gat",13,0; + SetCastleData "prtg_cas05.gat",14,0; + SetCastleData "prtg_cas05.gat",15,0; + SetCastleData "prtg_cas05.gat",16,0; + SetCastleData "prtg_cas05.gat",17,0; + SetCastleData "prtg_cas05.gat",18,0; + SetCastleData "prtg_cas05.gat",19,0; + SetCastleData "prtg_cas05.gat",20,0; + SetCastleData "prtg_cas05.gat",21,0; + SetCastleData "prtg_cas05.gat",22,0; + SetCastleData "prtg_cas05.gat",23,0; + SetCastleData "prtg_cas05.gat",24,0; + SetCastleData "prtg_cas05.gat",25,0; + Announce "[" + GetGuildName(@GIDp5) + "] has surrendered Agit [" + GetCastleName("prtg_cas05.gat") + "]",0; + MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),7; + break; + L7_2: + mes "[ Reiner ]"; + mes "I knew it master!!"; + mes "Please, don't freak me out like that again."; + close; +} \ No newline at end of file diff --git a/npc/guild/old/prtg_flag.txt b/npc/guild/old/prtg_flag.txt new file mode 100644 index 000000000..156b3b09c --- /dev/null +++ b/npc/guild/old/prtg_flag.txt @@ -0,0 +1,364 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Prontera Guild Flags +//===== By: ================================================== +//= jAthena (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Castle Guild Flags in prontera and prt_gld +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge| +//============================================================ + +//Prontera Castle 01 - Creamhilt + +prontera.gat,155,190,4 script Creamhilt#p1-1 722,{ + set @GIDp1,GetCastleData("prtg_cas01.gat",1); + if (@GIDp1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP01: + FlagEmblem GetCastleData("prtg_cas01.gat",1); + break; +} + +prt_gld.gat,131,60,6 script Creamhilt#p1-2::CreamhiltW 722,{ + set @GIDp1,GetCastleData("prtg_cas01.gat",1); + if (@GIDp1 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDp1) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp1) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp1) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp1) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "prtg_cas01.gat",97,174; + break; +OnRecvCastleP01: + FlagEmblem GetCastleData("prtg_cas01.gat",1); + break; +} + +prt_gld.gat,138,68,6 duplicate(CreamhiltW) Creamhilt#p1-3 722 +prt_gld.gat,138,60,6 duplicate(CreamhiltW) Creamhilt#p1-4 722 +prt_gld.gat,135,60,6 duplicate(CreamhiltW) Creamhilt#p1-5 722 +prt_gld.gat,160,210,4 duplicate(CreamhiltW) Creamhilt#p1-6 722 + +//Prontera Castle 02 - Sbanhealt + +prontera.gat,146,194,3 script Sbanhealt#p2-1 722,{ + set @GIDp2,GetCastleData("prtg_cas02.gat",1); + if (@GIDp2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP02: + FlagEmblem GetCastleData("prtg_cas02.gat",1); + break; +} + +prt_gld.gat,153,213,3 script Sbanhealt#p2-2::SbanhealtW 722,{ + set @GIDp2,GetCastleData("prtg_cas02.gat",1); + if (@GIDp2 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDp2) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp2) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp2) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp2) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "prtg_cas02.gat",71,36; + break; +OnRecvCastleP02: + FlagEmblem GetCastleData("prtg_cas02.gat",1); + break; +} + +prt_gld.gat,244,126,8 duplicate(SbanhealtW) Sbanhealt#p2-3 722 +prt_gld.gat,244,128,8 duplicate(SbanhealtW) Sbanhealt#p2-4 722 +prt_gld.gat,236,126,8 duplicate(SbanhealtW) Sbanhealt#p2-5 722 +prt_gld.gat,236,128,8 duplicate(SbanhealtW) Sbanhealt#p2-6 722 + +//Prontera Castle 03 - Lazrigees + +prontera.gat,143,203,2 script Lazrigees#p3-1 722,{ + set @GIDp3,GetCastleData("prtg_cas03.gat",1); + if (@GIDp3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP03: + FlagEmblem GetCastleData("prtg_cas03.gat",1); + break; +} + +prt_gld.gat,150,220,2 script Lazrigees#p3-2::LazrigeesW 722,{ + set @GIDp3,GetCastleData("prtg_cas03.gat",1); + if (@GIDp3 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDp3) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp3) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp3) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp3) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "prtg_cas03.gat",97,174; + break; +OnRecvCastleP03: + FlagEmblem GetCastleData("prtg_cas03.gat",1); + break; +} + +prt_gld.gat,147,140,4 duplicate(LazrigeesW) Lazrigees#p3-3 722 +prt_gld.gat,147,136,4 duplicate(LazrigeesW) Lazrigees#p3-4 722 +prt_gld.gat,158,140,4 duplicate(LazrigeesW) Lazrigees#p3-5 722 +prt_gld.gat,158,136,4 duplicate(LazrigeesW) Lazrigees#p3-6 722 + +//Prontera Castle 04 - Squagul + +prontera.gat,167,203,6 script Squagul#p4-1 722,{ + set @GIDp4,GetCastleData("prtg_cas04.gat",1); + if (@GIDp4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP04: + FlagEmblem GetCastleData("prtg_cas04.gat",1); + break; +} + + +prt_gld.gat,169,220,6 script Squagul#p4-2::SquagulW 722,{ + set @GIDp4,GetCastleData("prtg_cas04.gat",1); + if (@GIDp4 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDp4) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp4) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp4) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp4) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "prtg_cas04.gat",97,174; + break; +OnRecvCastleP04: + FlagEmblem GetCastleData("prtg_cas04.gat",1); + break; +} + +prt_gld.gat,120,243,6 duplicate(SquagulW) Squagul#p4-3 722 +prt_gld.gat,120,236,6 duplicate(SquagulW) Squagul#p4-4 722 +prt_gld.gat,122,243,6 duplicate(SquagulW) Squagul#p4-5 722 +prt_gld.gat,122,246,6 duplicate(SquagulW) Squagul#p4-6 722 + +//Prontera Castle 05 - Guindull + +prontera.gat,165,194,5 script Guindull#p5-1 722,{ + set @GIDp5,GetCastleData("prtg_cas05.gat",1); + if (@GIDp5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +OnRecvCastleP05: + FlagEmblem GetCastleData("prtg_cas05.gat",1); + break; +} + +prt_gld.gat,167,213,5 script Guindull#p5-2::GuindullW 722,{ + set @GIDp5,GetCastleData("prtg_cas05.gat",1); + if (@GIDp5 != 0) goto LStartg; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " this guild base has not been taken by any guild yet"; + mes " "; + mes "2. In order to take this guild base, you must defeat all the guardians"; + mes " that are protecting the guild base and eliminate the Emperium"; + close; +LStartg: + if (getcharid(2) == @GIDp5) goto LStartg2; + mes "[ Edict of the Divine Rune Midgard Kingdom of Prontera ]"; + mes " "; + mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of Prontera,"; + mes " we approve that this base is in the private possession of ^ff0000" + GetGuildName(@GIDp5) + "^000000 guild"; + mes " "; + mes "2. The guild master of ^ff0000" + GetGuildName(@GIDp5) + "^000000 is"; + mes " ^ff0000" + GetGuildMaster(@GIDp5) + "^000000. If anyone who objects to that,"; + mes " raise your sword to honor yourself."; + close; +LStartg2: + mes "[ Ringing Voice ]"; + mes "Brave man..."; + mes "Would you return to your honorable be?"; + next; + menu "Go back to your agitating point",Lenter,"Cancel",-; + close; +Lenter: + warp "prtg_cas05.gat",97,174; + break; +OnRecvCastleP05: + FlagEmblem GetCastleData("prtg_cas05.gat",1); + break; +} + +prt_gld.gat,199,243,2 duplicate(GuindullW) Guindull#p5-3 722 +prt_gld.gat,199,236,2 duplicate(GuindullW) Guindull#p5-4 722 +prt_gld.gat,197,243,2 duplicate(GuindullW) Guindull#p5-5 722 +prt_gld.gat,197,236,2 duplicate(GuindullW) Guindull#p5-6 722 \ No newline at end of file diff --git a/npc/guild/old/treasure/aldeg_cas01_treasure.txt b/npc/guild/old/treasure/aldeg_cas01_treasure.txt new file mode 100644 index 000000000..7ee9a5d93 --- /dev/null +++ b/npc/guild/old/treasure/aldeg_cas01_treasure.txt @@ -0,0 +1,72 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas01 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in aldeg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +aldeg_cas01.gat,123,223,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "aldeg_cas01.gat",218,176; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +aldeg_cas01.gat,119,223,0 script Treasure_A01 -1,{ +OnClock1200: + SetCastleData "aldeg_cas01.gat",4,0; + SetCastleData "aldeg_cas01.gat",5,0; + KillMonster "aldeg_cas01.gat","Treasure_A01::TreasureDied"; + set $Economy,GetCastleData("aldeg_cas01.gat",2); + if ($Economy > 100) break; + if (GetCastleData("aldeg_cas01.gat",1) == 0) break; + set $boxnum,GetCastleData("aldeg_cas01.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum <= 0) break; + set $boxid,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid > 2) goto TreasureSpawn2; + areamonster "aldeg_cas01.gat",114,218,123,227,"Treasure Chest",1324,1,"Treasure_A01::TreasureDied"; + set $boxnum,$boxnum-1; + if ($boxnum <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "aldeg_cas01.gat",114,218,123,227,"Treasure Chest",1325,1,"Treasure_A01::TreasureDied"; + set $boxnum,$boxnum-1; + if ($boxnum <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "aldeg_cas01.gat","Treasure Chest Broken Open",17; + break; + +Rehash: + set $boxid,1324; + areamonster "aldeg_cas01.gat",114,218,123,227,"Treasure Chest",$boxid,$boxnum,"Treasure_A01::TreasureDied"; + break; +} diff --git a/npc/guild/old/treasure/aldeg_cas02_treasure.txt b/npc/guild/old/treasure/aldeg_cas02_treasure.txt new file mode 100644 index 000000000..9144bd2a6 --- /dev/null +++ b/npc/guild/old/treasure/aldeg_cas02_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas02 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in aldeg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +aldeg_cas02.gat,139,235,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "aldeg_cas02.gat",78,75; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +aldeg_cas02.gat,135,231,0 script Treasure_A02 -1,{ +OnClock1200: + SetCastleData "aldeg_cas02.gat",4,0; + SetCastleData "aldeg_cas02.gat",5,0; + KillMonster "aldeg_cas02.gat","Treasure_A02::TreasureDied"; + set $Economy1,GetCastleData("aldeg_cas02.gat",2); + if ($Economy1 > 100) break; + if (GetCastleData("aldeg_cas02.gat",1) == 0) break; + set $boxnum1,GetCastleData("aldeg_cas02.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum1 <= 0) break; + set $boxid1,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid1 > 2) goto TreasureSpawn2; + areamonster "aldeg_cas02.gat",130,226,138,235,"Treasure Chest",1326,1,"Treasure_A02::TreasureDied"; + set $boxnum1,$boxnum1-1; + if ($boxnum1 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "aldeg_cas02.gat",130,226,138,235,"Treasure Chest",1327,1,"Treasure_A02::TreasureDied"; + set $boxnum1,$boxnum1-1; + if ($boxnum1 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "aldeg_cas02.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/aldeg_cas03_treasure.txt b/npc/guild/old/treasure/aldeg_cas03_treasure.txt new file mode 100644 index 000000000..4b75e4b48 --- /dev/null +++ b/npc/guild/old/treasure/aldeg_cas03_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas03 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in aldeg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +aldeg_cas03.gat,229,267,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "aldeg_cas03.gat",110,119; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +aldeg_cas03.gat,225,269,0 script Treasure_A03 -1,{ +OnClock1200: + SetCastleData "aldeg_cas03.gat",4,0; + SetCastleData "aldeg_cas03.gat",5,0; + KillMonster "aldeg_cas03.gat","Treasure_A03::TreasureDied"; + set $Economy2,GetCastleData("aldeg_cas03.gat",2); + if ($Economy2 > 100) break; + if (GetCastleData("aldeg_cas03.gat",1) == 0) break; + set $boxnum2,GetCastleData("aldeg_cas03.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum2 <= 0) break; + set $boxid2,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid2 > 2) goto TreasureSpawn2; + areamonster "aldeg_cas03.gat",220,264,229,273,"Treasure Chest",1328,1,"Treasure_A03::TreasureDied"; + set $boxnum2,$boxnum2-1; + if ($boxnum2 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "aldeg_cas03.gat",220,264,229,273,"Treasure Chest",1329,1,"Treasure_A03::TreasureDied"; + set $boxnum2,$boxnum2-1; + if ($boxnum2 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "aldeg_cas03.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/aldeg_cas04_treasure.txt b/npc/guild/old/treasure/aldeg_cas04_treasure.txt new file mode 100644 index 000000000..346a905a3 --- /dev/null +++ b/npc/guild/old/treasure/aldeg_cas04_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas04 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in aldeg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +aldeg_cas04.gat,83,17,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "aldeg_cas04.gat",67,117; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +aldeg_cas04.gat,85,12,0 script Treasure_A04 -1,{ +OnClock1200: + SetCastleData "aldeg_cas04.gat",4,0; + SetCastleData "aldeg_cas04.gat",5,0; + KillMonster "aldeg_cas04.gat","Treasure_A04::TreasureDied"; + set $Economy3,GetCastleData("aldeg_cas04.gat",2); + if ($Economy3 > 100) break; + if (GetCastleData("aldeg_cas04.gat",1) == 0) break; + set $boxnum3,GetCastleData("aldeg_cas04.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum3 <= 0) break; + set $boxid3,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid3 > 2) goto TreasureSpawn2; + areamonster "aldeg_cas04.gat",80,8,89,17,"Treasure Chest",1330,1,"Treasure_A04::TreasureDied"; + set $boxnum3,$boxnum3-1; + if ($boxnum3 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "aldeg_cas04.gat",80,8,89,17,"Treasure Chest",1331,1,"Treasure_A04::TreasureDied"; + set $boxnum3,$boxnum3-1; + if ($boxnum3 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "aldeg_cas04.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/aldeg_cas05_treasure.txt b/npc/guild/old/treasure/aldeg_cas05_treasure.txt new file mode 100644 index 000000000..3a3bbbc86 --- /dev/null +++ b/npc/guild/old/treasure/aldeg_cas05_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - aldeg_cas05 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in aldeg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +aldeg_cas05.gat,64,8,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "aldeg_cas05.gat",51,179; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +aldeg_cas05.gat,62,12,0 script Treasure_A05 -1,{ +OnClock1200: + SetCastleData "aldeg_cas05.gat",4,0; + SetCastleData "aldeg_cas05.gat",5,0; + KillMonster "aldeg_cas05.gat","Treasure_A05::TreasureDied"; + set $Economy4,GetCastleData("aldeg_cas05.gat",2); + if ($Economy4 > 100) break; + if (GetCastleData("aldeg_cas05.gat",1) == 0) break; + set $boxnum4,GetCastleData("aldeg_cas05.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum4 <= 0) break; + set $boxid4,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid4 > 2) goto TreasureSpawn2; + areamonster "aldeg_cas05.gat",58,8,65,15,"Treasure Chest",1332,1,"Treasure_A05::TreasureDied"; + set $boxnum4,$boxnum4-1; + if ($boxnum4 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "aldeg_cas05.gat",58,8,65,15,"Treasure Chest",1333,1,"Treasure_A05::TreasureDied"; + set $boxnum4,$boxnum4-1; + if ($boxnum4 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "aldeg_cas05.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/gefg_cas01_treasure.txt b/npc/guild/old/treasure/gefg_cas01_treasure.txt new file mode 100644 index 000000000..122fb660b --- /dev/null +++ b/npc/guild/old/treasure/gefg_cas01_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas01 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in gefg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +gefg_cas01.gat,151,109,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "gefg_cas01.gat",40,49; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +gefg_cas01.gat,155,112,0 script Treasure_B01 -1,{ +OnClock1200: + SetCastleData "gefg_cas01.gat",4,0; + SetCastleData "gefg_cas01.gat",5,0; + KillMonster "gefg_cas01.gat","Treasure_B01::TreasureDied"; + set $Economy5,GetCastleData("gefg_cas01.gat",2); + if ($Economy5 > 100) break; + if (GetCastleData("gefg_cas01.gat",1) == 0) break; + set $boxnum5,GetCastleData("gefg_cas01.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum5 <= 0) break; + set $boxid5,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid5 > 2) goto TreasureSpawn2; + areamonster "gefg_cas01.gat",150,108,158,114,"Treasure Chest",1334,1,"Treasure_B01::TreasureDied"; + set $boxnum5,$boxnum5-1; + if ($boxnum5 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "gefg_cas01.gat",150,108,158,114,"Treasure Chest",1335,1,"Treasure_B01::TreasureDied"; + set $boxnum5,$boxnum5-1; + if ($boxnum5 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "gefg_cas01.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/gefg_cas02_treasure.txt b/npc/guild/old/treasure/gefg_cas02_treasure.txt new file mode 100644 index 000000000..a161f7190 --- /dev/null +++ b/npc/guild/old/treasure/gefg_cas02_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas02 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in gefg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +gefg_cas02.gat,137,113,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "gefg_cas02.gat",12,67; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +gefg_cas02.gat,141,115,0 script Treasure_B02 -1,{ +OnClock1200: + SetCastleData "gefg_cas02.gat",4,0; + SetCastleData "gefg_cas02.gat",5,0; + KillMonster "gefg_cas02.gat","Treasure_B02::TreasureDied"; + set $Economy6,GetCastleData("gefg_cas02.gat",2); + if ($Economy6 > 100) break; + if (GetCastleData("gefg_cas02.gat",1) == 0) break; + set $boxnum6,GetCastleData("gefg_cas02.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum6 <= 0) break; + set $boxid6,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid6 > 2) goto TreasureSpawn2; + areamonster "gefg_cas02.gat",136,112,145,118,"Treasure Chest",1336,1,"Treasure_B02::TreasureDied"; + set $boxnum6,$boxnum6-1; + if ($boxnum6 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "gefg_cas02.gat",136,112,145,118,"Treasure Chest",1337,1,"Treasure_B02::TreasureDied"; + set $boxnum6,$boxnum6-1; + if ($boxnum6 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "gefg_cas02.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/gefg_cas03_treasure.txt b/npc/guild/old/treasure/gefg_cas03_treasure.txt new file mode 100644 index 000000000..7cf919115 --- /dev/null +++ b/npc/guild/old/treasure/gefg_cas03_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas03 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in gefg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +gefg_cas03.gat,275,289,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "gefg_cas03.gat",106,24; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +gefg_cas03.gat,270,290,0 script Treasure_B03 -1,{ +OnClock1200: + SetCastleData "gefg_cas03.gat",4,0; + SetCastleData "gefg_cas03.gat",5,0; + KillMonster "gefg_cas03.gat","Treasure_B03::TreasureDied"; + set $Economy7,GetCastleData("gefg_cas03.gat",2); + if ($Economy7 > 100) break; + if (GetCastleData("gefg_cas03.gat",1) == 0) break; + set $boxnum7,GetCastleData("gefg_cas03.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum7 <= 0) break; + set $boxid7,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid7 > 2) goto TreasureSpawn2; + areamonster "gefg_cas03.gat",266,286,275,293,"Treasure Chest",1338,1,"Treasure_B03::TreasureDied"; + set $boxnum7,$boxnum7-1; + if ($boxnum7 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "gefg_cas03.gat",266,286,275,293,"Treasure Chest",1339,1,"Treasure_B03::TreasureDied"; + set $boxnum7,$boxnum7-1; + if ($boxnum7 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "gefg_cas03.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/gefg_cas04_treasure.txt b/npc/guild/old/treasure/gefg_cas04_treasure.txt new file mode 100644 index 000000000..648fa5740 --- /dev/null +++ b/npc/guild/old/treasure/gefg_cas04_treasure.txt @@ -0,0 +1,68 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas04 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in gefg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ + +gefg_cas04.gat,117,123,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "gefg_cas04.gat",73,47; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +gefg_cas04.gat,116,118,0 script Treasure_B04 -1,{ +OnClock1200: + SetCastleData "gefg_cas04.gat",4,0; + SetCastleData "gefg_cas04.gat",5,0; + KillMonster "gefg_cas04.gat","Treasure_B04::TreasureDied"; + set $Economy8,GetCastleData("gefg_cas04.gat",2); + if ($Economy8 > 100) break; + if (GetCastleData("gefg_cas04.gat",1) == 0) break; + set $boxnum8,GetCastleData("gefg_cas04.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum8 <= 0) break; + set $boxid8,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid8 > 2) goto TreasureSpawn2; + areamonster "gefg_cas04.gat",112,114,119,123,"Treasure Chest",1340,1,"Treasure_B04::TreasureDied"; + set $boxnum8,$boxnum8-1; + if ($boxnum8 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "gefg_cas04.gat",112,114,119,123,"Treasure Chest",1341,1,"Treasure_B04::TreasureDied"; + set $boxnum8,$boxnum8-1; + if ($boxnum8 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "gefg_cas04.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/gefg_cas05_treasure.txt b/npc/guild/old/treasure/gefg_cas05_treasure.txt new file mode 100644 index 000000000..af54278e0 --- /dev/null +++ b/npc/guild/old/treasure/gefg_cas05_treasure.txt @@ -0,0 +1,68 @@ +//===== eAthena Script ======================================= +//= War of Emperium - gefg_cas05 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in gefg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ + +gefg_cas05.gat,149,107,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "gefg_cas05.gat",70,53; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +gefg_cas05.gat,144,110,0 script Treasure_B05 -1,{ +OnClock1200: + SetCastleData "gefg_cas05.gat",4,0; + SetCastleData "gefg_cas05.gat",5,0; + KillMonster "gefg_cas05.gat","Treasure_B05::TreasureDied"; + set $Economy9,GetCastleData("gefg_cas05.gat",2); + if ($Economy9 > 100) break; + if (GetCastleData("gefg_cas05.gat",1) == 0) break; + set $boxnum9,GetCastleData("gefg_cas05.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum9 <= 0) break; + set $boxid9,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid9 > 2) goto TreasureSpawn2; + areamonster "gefg_cas05.gat",140,106,147,113,"Treasure Chest",1342,1,"Treasure_B05::TreasureDied"; + set $boxnum9,$boxnum9-1; + if ($boxnum9 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "gefg_cas05.gat",140,106,147,113,"Treasure Chest",1343,1,"Treasure_B05::TreasureDied"; + set $boxnum9,$boxnum9-1; + if ($boxnum9 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "gefg_cas05.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/payg_cas01_treasure.txt b/npc/guild/old/treasure/payg_cas01_treasure.txt new file mode 100644 index 000000000..c2a382316 --- /dev/null +++ b/npc/guild/old/treasure/payg_cas01_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas01 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in payg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +payg_cas01.gat,295,8,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "payg_cas01.gat",120,59; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +payg_cas01.gat,290,7,0 script Treasure_C01 -1,{ +OnClock1200: + SetCastleData "payg_cas01.gat",4,0; + SetCastleData "payg_cas01.gat",5,0; + KillMonster "payg_cas01.gat","Treasure_C01::TreasureDied"; + set $Economy10,GetCastleData("payg_cas01.gat",2); + if ($Economy10 > 100) break; + if (GetCastleData("payg_cas01.gat",1) == 0) break; + set $boxnum10,GetCastleData("payg_cas01.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum10 <= 0) break; + set $boxid10,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid10 > 2) goto TreasureSpawn2; + areamonster "payg_cas01.gat",286,4,295,13,"Treasure Chest",1344,1,"Treasure_C01::TreasureDied"; + set $boxnum10,$boxnum10-1; + if ($boxnum10 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "payg_cas01.gat",286,4,295,13,"Treasure Chest",1345,1,"Treasure_C01::TreasureDied"; + set $boxnum10,$boxnum10-1; + if ($boxnum10 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "payg_cas01.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/payg_cas02_treasure.txt b/npc/guild/old/treasure/payg_cas02_treasure.txt new file mode 100644 index 000000000..c09679306 --- /dev/null +++ b/npc/guild/old/treasure/payg_cas02_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas02 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in payg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +payg_cas02.gat,149,148,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "payg_cas02.gat",22,261; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +payg_cas02.gat,145,143,0 script Treasure_C02 -1,{ +OnClock1200: + SetCastleData "payg_cas02.gat",4,0; + SetCastleData "payg_cas02.gat",5,0; + KillMonster "payg_cas02.gat","Treasure_C02::TreasureDied"; + set $Economy11,GetCastleData("payg_cas02.gat",2); + if ($Economy11 > 100) break; + if (GetCastleData("payg_cas02.gat",1) == 0) break; + set $boxnum11,GetCastleData("payg_cas02.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum11 <= 0) break; + set $boxid11,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid11 > 2) goto TreasureSpawn2; + areamonster "payg_cas02.gat",140,140,148,149,"Treasure Chest",1346,1,"Treasure_C02::TreasureDied"; + set $boxnum11,$boxnum11-1; + if ($boxnum11 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "payg_cas02.gat",140,140,148,149,"Treasure Chest",1347,1,"Treasure_C02::TreasureDied"; + set $boxnum11,$boxnum11-1; + if ($boxnum11 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "payg_cas02.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/payg_cas03_treasure.txt b/npc/guild/old/treasure/payg_cas03_treasure.txt new file mode 100644 index 000000000..7e2345df5 --- /dev/null +++ b/npc/guild/old/treasure/payg_cas03_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas03 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in payg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +payg_cas03.gat,163,167,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "payg_cas03.gat",50,261; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +payg_cas03.gat,158,168,0 script Treasure_C03 -1,{ +OnClock1200: + SetCastleData "payg_cas03.gat",4,0; + SetCastleData "payg_cas03.gat",5,0; + KillMonster "payg_cas03.gat","Treasure_C03::TreasureDied"; + set $Economy12,GetCastleData("payg_cas03.gat",2); + if ($Economy12 > 100) break; + if (GetCastleData("payg_cas03.gat",1) == 0) break; + set $boxnum12,GetCastleData("payg_cas03.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum12 <= 0) break; + set $boxid12,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid12 > 2) goto TreasureSpawn2; + areamonster "payg_cas03.gat",154,164,162,173,"Treasure Chest",1348,1,"Treasure_C03::TreasureDied"; + set $boxnum12,$boxnum12-1; + if ($boxnum12 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "payg_cas03.gat",154,164,162,173,"Treasure Chest",1349,1,"Treasure_C03::TreasureDied"; + set $boxnum12,$boxnum12-1; + if ($boxnum12 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "payg_cas03.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/payg_cas04_treasure.txt b/npc/guild/old/treasure/payg_cas04_treasure.txt new file mode 100644 index 000000000..1b9b47399 --- /dev/null +++ b/npc/guild/old/treasure/payg_cas04_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas04 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in payg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +payg_cas04.gat,151,47,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "payg_cas04.gat",38,285; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +payg_cas04.gat,146,48,0 script Treasure_C04 -1,{ +OnClock1200: + SetCastleData "payg_cas04.gat",4,0; + SetCastleData "payg_cas04.gat",5,0; + KillMonster "payg_cas04.gat","Treasure_C04::TreasureDied"; + set $Economy13,GetCastleData("payg_cas04.gat",2); + if ($Economy13 > 100) break; + if (GetCastleData("payg_cas04.gat",1) == 0) break; + set $boxnum13,GetCastleData("payg_cas04.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum13 <= 0) break; + set $boxid13,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid13 > 2) goto TreasureSpawn2; + areamonster "payg_cas04.gat",142,44,151,51,"Treasure Chest",1350,1,"Treasure_C04::TreasureDied"; + set $boxnum13,$boxnum13-1; + if ($boxnum13 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "payg_cas04.gat",142,44,151,51,"Treasure Chest",1351,1,"Treasure_C04::TreasureDied"; + set $boxnum13,$boxnum13-1; + if ($boxnum13 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "payg_cas04.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/payg_cas05_treasure.txt b/npc/guild/old/treasure/payg_cas05_treasure.txt new file mode 100644 index 000000000..f4d494870 --- /dev/null +++ b/npc/guild/old/treasure/payg_cas05_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas05 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in payg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +payg_cas05.gat,161,136,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "payg_cas05.gat",277,250; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +payg_cas05.gat,156,131,0 script Treasure_C05 -1,{ +OnClock1200: + SetCastleData "payg_cas05.gat",4,0; + SetCastleData "payg_cas05.gat",5,0; + KillMonster "payg_cas05.gat","Treasure_C05::TreasureDied"; + set $Economy14,GetCastleData("payg_cas05.gat",2); + if ($Economy14 > 100) break; + if (GetCastleData("payg_cas05.gat",1) == 0) break; + set $boxnum14,GetCastleData("payg_cas05.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum14 <= 0) break; + set $boxid14,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid14 > 2) goto TreasureSpawn2; + areamonster "payg_cas05.gat",152,128,160,135,"Treasure Chest",1352,1,"Treasure_C05::TreasureDied"; + set $boxnum14,$boxnum14-1; + if ($boxnum14 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "payg_cas05.gat",152,128,160,135,"Treasure Chest",1353,1,"Treasure_C05::TreasureDied"; + set $boxnum14,$boxnum14-1; + if ($boxnum14 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "payg_cas05.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/prtg_cas01_treasure.txt b/npc/guild/old/treasure/prtg_cas01_treasure.txt new file mode 100644 index 000000000..64ac99730 --- /dev/null +++ b/npc/guild/old/treasure/prtg_cas01_treasure.txt @@ -0,0 +1,72 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas01 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in prtg_cas01 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +prtg_cas01.gat,15,209,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "prtg_cas01.gat",112,183; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +prtg_cas01.gat,11,208,0 script Treasure_D01 -1,{ +OnClock1200: + SetCastleData "prtg_cas01.gat",4,0; + SetCastleData "prtg_cas01.gat",5,0; + KillMonster "prtg_cas01.gat","Treasure_D01::TreasureDied"; + set $Economy15,GetCastleData("prtg_cas01.gat",2); + if ($Economy15 > 100) break; + if (GetCastleData("prtg_cas01.gat",1) == 0) break; + set $boxnum15,GetCastleData("prtg_cas01.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum15 <= 0) break; + set $boxid15,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid15 > 2) goto TreasureSpawn2; + areamonster "prtg_cas01.gat",6,204,15,213,"Treasure Chest",1354,1,"Treasure_D01::TreasureDied"; + set $boxnum15,$boxnum15-1; + if ($boxnum15 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "prtg_cas01.gat",6,204,15,213,"Treasure Chest",1355,1,"Treasure_D01::TreasureDied"; + set $boxnum15,$boxnum15-1; + if ($boxnum15 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "prtg_cas01.gat","Treasure Chest Broken Open",17; + break; + +Rehash: + set $boxid15,1324; + areamonster "prtg_cas01.gat",6,204,15,213,"Treasure Chest",$boxid15,$boxnum15,"Treasure_D01::TreasureDied"; + break; +} diff --git a/npc/guild/old/treasure/prtg_cas02_treasure.txt b/npc/guild/old/treasure/prtg_cas02_treasure.txt new file mode 100644 index 000000000..c0ca674fb --- /dev/null +++ b/npc/guild/old/treasure/prtg_cas02_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas02 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in prtg_cas02 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +prtg_cas02.gat,207,228,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "prtg_cas02.gat",94,62; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +prtg_cas02.gat,202,228,0 script Treasure_D02 -1,{ +OnClock1200: + SetCastleData "prtg_cas02.gat",4,0; + SetCastleData "prtg_cas02.gat",5,0; + KillMonster "prtg_cas02.gat","Treasure_D02::TreasureDied"; + set $Economy16,GetCastleData("prtg_cas02.gat",2); + if ($Economy16 > 100) break; + if (GetCastleData("prtg_cas02.gat",1) == 0) break; + set $boxnum16,GetCastleData("prtg_cas02.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum16 <= 0) break; + set $boxid16,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid16 > 2) goto TreasureSpawn2; + areamonster "prtg_cas02.gat",198,224,207,233,"Treasure Chest",1356,1,"Treasure_D02::TreasureDied"; + set $boxnum16,$boxnum16-1; + if ($boxnum16 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "prtg_cas02.gat",198,224,207,233,"Treasure Chest",1357,1,"Treasure_D02::TreasureDied"; + set $boxnum16,$boxnum16-1; + if ($boxnum16 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "prtg_cas02.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/prtg_cas03_treasure.txt b/npc/guild/old/treasure/prtg_cas03_treasure.txt new file mode 100644 index 000000000..d32485b7e --- /dev/null +++ b/npc/guild/old/treasure/prtg_cas03_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas03 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in prtg_cas03 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +prtg_cas03.gat,193,130,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "prtg_cas03.gat",51,101; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +prtg_cas03.gat,189,132,0 script Treasure_D03 -1,{ +OnClock1200: + SetCastleData "prtg_cas03.gat",4,0; + SetCastleData "prtg_cas03.gat",5,0; + KillMonster "prtg_cas03.gat","Treasure_D03::TreasureDied"; + set $Economy17,GetCastleData("prtg_cas03.gat",2); + if ($Economy17 > 100) break; + if (GetCastleData("prtg_cas03.gat",1) == 0) break; + set $boxnum17,GetCastleData("prtg_cas03.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum17 <= 0) break; + set $boxid17,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid17 > 2) goto TreasureSpawn2; + areamonster "prtg_cas03.gat",184,128,193,135,"Treasure Chest",1358,1,"Treasure_D03::TreasureDied"; + set $boxnum17,$boxnum17-1; + if ($boxnum17 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "prtg_cas03.gat",184,128,193,135,"Treasure Chest",1359,1,"Treasure_D03::TreasureDied"; + set $boxnum17,$boxnum17-1; + if ($boxnum17 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "prtg_cas03.gat","Treasure Chest Broken Open",17; + break; +} diff --git a/npc/guild/old/treasure/prtg_cas04_treasure.txt b/npc/guild/old/treasure/prtg_cas04_treasure.txt new file mode 100644 index 000000000..ee5dbcc16 --- /dev/null +++ b/npc/guild/old/treasure/prtg_cas04_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas04 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in prtg_cas04 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +prtg_cas04.gat,275,160,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "prtg_cas04.gat",259,265; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +prtg_cas04.gat,271,162,0 script Treasure_D04 -1,{ +OnClock1200: + SetCastleData "prtg_cas04.gat",4,0; + SetCastleData "prtg_cas04.gat",5,0; + KillMonster "prtg_cas04.gat","Treasure_D04::TreasureDied"; + set $Economy18,GetCastleData("prtg_cas04.gat",2); + if ($Economy18 > 100) break; + if (GetCastleData("prtg_cas04.gat",1) == 0) break; + set $boxnum18,GetCastleData("prtg_cas04.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum18 <= 0) break; + set $boxid18,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid18 > 2) goto TreasureSpawn2; + areamonster "prtg_cas04.gat",266,158,275,167,"Treasure Chest",1360,1,"Treasure_D04::TreasureDied"; + set $boxnum18,$boxnum18-1; + if ($boxnum18 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "prtg_cas04.gat",266,158,275,167,"Treasure Chest",1361,1,"Treasure_D04::TreasureDied"; + set $boxnum18,$boxnum18-1; + if ($boxnum18 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "prtg_cas04.gat","Treasure Chest Broken Open",17; + break; +} \ No newline at end of file diff --git a/npc/guild/old/treasure/prtg_cas05_treasure.txt b/npc/guild/old/treasure/prtg_cas05_treasure.txt new file mode 100644 index 000000000..7d126ef31 --- /dev/null +++ b/npc/guild/old/treasure/prtg_cas05_treasure.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas05 Treasure Room Script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Treasure Room Script in prtg_cas05 +//===== Additional Comments: ================================= +//= 1.1 by Akaru and ho|yAnge|X +//============================================================ + +//================================================ +// Exit Treasure Room Switch +//================================================ +prtg_cas05.gat,281,176,0 script Switch 111,{ + mes " "; + mes "There is little switch over here"; + mes "Would you like to pull the switch down?"; + next; + menu "Yes",L1,"No",L2; + +L1: + warp "prtg_cas05.gat",36,38; + +L2: + close; +} + +//================================================ +// Treasure Spawning Script +//================================================ +prtg_cas05.gat,277,178,0 script Treasure_D05 -1,{ +OnClock1200: + SetCastleData "prtg_cas05.gat",4,0; + SetCastleData "prtg_cas05.gat",5,0; + KillMonster "prtg_cas05.gat","Treasure_D05::TreasureDied"; + set $Economy19,GetCastleData("prtg_cas05.gat",2); + if ($Economy19 > 100) break; + if (GetCastleData("prtg_cas05.gat",1) == 0) break; + set $boxnum19,GetCastleData("prtg_cas05.gat",2)/5+4; + goto TreasureCheck; + +TreasureCheck: + if ($boxnum19 <= 0) break; + set $boxid19,rand(4); + goto TreasureSpawn; + +TreasureSpawn: + if ($boxid19 > 2) goto TreasureSpawn2; + areamonster "prtg_cas05.gat",272,174,279,181,"Treasure Chest",1362,1,"Treasure_D05::TreasureDied"; + set $boxnum19,$boxnum19-1; + if ($boxnum19 <= 0) break; + goto TreasureCheck; + +TreasureSpawn2: + areamonster "prtg_cas05.gat",272,174,279,181,"Treasure Chest",1363,1,"Treasure_D05::TreasureDied"; + set $boxnum19,$boxnum19-1; + if ($boxnum19 <= 0) break; + goto TreasureCheck; + +TreasureDied: + MapAnnounce "prtg_cas05.gat","Treasure Chest Broken Open",17; + break; +} \ No newline at end of file diff --git a/npc/guild/payg/payg_dunsw.txt b/npc/guild/payg/payg_dunsw.txt new file mode 100644 index 000000000..227092a62 --- /dev/null +++ b/npc/guild/payg/payg_dunsw.txt @@ -0,0 +1,49 @@ +//===== eAthena Script ======================================= +//= War of Emperium Dungeon Switch for Payon Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Switch that warps guild members to the guild dungeon +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================ +payg_cas01.gat,101,25,0 script Switch#DunPy01 111,{ + callfunc "F_GldDunSw","payg_cas01","01",186,165; + close; +} + + +// Castle 2 ================================================ +payg_cas02.gat,278,247,0 script Switch#DunPy02 111,{ + callfunc "F_GldDunSw","payg_cas02","01",54,165; + close; +} + + +// Castle 3 ================================================ +payg_cas03.gat,20,44,0 script Switch#DunPy03 111,{ + callfunc "F_GldDunSw","payg_cas03","01",54,39; + close; +} + + +// Castle 4 ================================================ +payg_cas04.gat,52,48,0 script Switch#DunPy04 111,{ + callfunc "F_GldDunSw","payg_cas04","01",186,39; + close; +} + + +// Castle 5 ================================================ +payg_cas05.gat,248,14,0 script Switch#DunPy05 111,{ + callfunc "F_GldDunSw","payg_cas05","01",223,202; + close; +} diff --git a/npc/guild/payg/payg_ev_agit.txt b/npc/guild/payg/payg_ev_agit.txt new file mode 100644 index 000000000..19b783d91 --- /dev/null +++ b/npc/guild/payg/payg_ev_agit.txt @@ -0,0 +1,130 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Payon Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Payon Guild Wars +//===== Additional Comments: ================================= +//= v1.2 Now using functions for OnAgitStart and OnAgitBreak. [kobra_k88] +//============================================================ + + +// Castle 1 ================================================================ +payg_cas01.gat,139,139,0 script Agit_Py01 -1,{ +OnInterIfInit: + GetCastleData "payg_cas01.gat",0,"::OnRecvCastlePy01"; + end; +OnRecvCastlePy01: + RequestGuildInfo GetCastleData("payg_cas01.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","payg_cas01","Py01",139,139; + end; +OnAgitBreak: + callfunc "F_AgitBreak","payg_cas01","Py01"; + end; +OnAgitEliminate: + MapRespawnGuildID "payg_cas01.gat",GetCastleData("payg_cas01.gat",1),6; + Monster "payg_cas01.gat",139,139,"EMPERIUM",1288,1,"Agit_Py01::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","payg_cas01","Py01"; + end; +} + +// Castle 2 ================================================================ +payg_cas02.gat,39,25,0 script Agit_Py02 -1,{ +OnInterIfInit: + GetCastleData "payg_cas02.gat",0,"::OnRecvCastlePy02"; + end; +OnRecvCastlePy02: + RequestGuildInfo GetCastleData("payg_cas02.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","payg_cas02","Py02",39,25; + end; +OnAgitBreak: + callfunc "F_AgitBreak","payg_cas02","Py01"; + end; +OnAgitEliminate: + MapRespawnGuildID "payg_cas02.gat",GetCastleData("payg_cas02.gat",1),6; + Monster "payg_cas02.gat",39,25,"EMPERIUM",1288,1,"Agit_Py02::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","payg_cas02","Py02"; + end; +} + +// Castle 3 ================================================================ +payg_cas03.gat,269,265,0 script Agit_Py03 -1,{ +OnInterIfInit: + GetCastleData "payg_cas03.gat",0,"::OnRecvCastlePy03"; + end; +OnRecvCastlePy03: + RequestGuildInfo GetCastleData("payg_cas03.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","payg_cas03","Py03",269,265; + end; +OnAgitBreak: + callfunc "F_AgitBreak","payg_cas03","Py03"; + end; +OnAgitEliminate: + MapRespawnGuildID "payg_cas03.gat",GetCastleData("payg_cas03.gat",1),6; + Monster "payg_cas03.gat",269,265,"EMPERIUM",1288,1,"Agit_Py03::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","payg_cas03","Py03"; + end; +} + +// Castle 4 ================================================================ +payg_cas04.gat,271,29,0 script Agit_Py04 -1,{ +OnInterIfInit: + GetCastleData "payg_cas04.gat",0,"::OnRecvCastlePy04"; + end; +OnRecvCastlePy04: + RequestGuildInfo GetCastleData("payg_cas04.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","payg_cas04","Py04",271,29; + end; +OnAgitBreak: + callfunc "F_AgitBreak","payg_cas04","Py04"; + end; +OnAgitEliminate: + MapRespawnGuildID "payg_cas04.gat",GetCastleData("payg_cas04.gat",1),6; + Monster "payg_cas04.gat",271,29,"EMPERIUM",1288,1,"Agit_Py04::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","payg_cas04","Py04"; + end; +} + +// Castle 5 ================================================================ +payg_cas05.gat,30,30,0 script Agit_Py05 -1,{ +OnInterIfInit: + GetCastleData "payg_cas05.gat",0,"::OnRecvCastlePy05"; + end; +OnRecvCastlePy05: + RequestGuildInfo GetCastleData("payg_cas05.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","payg_cas05","Py05",30,30; + end; +OnAgitBreak: + callfunc "F_AgitBreak","payg_cas05","Py05"; + end; +OnAgitEliminate: + MapRespawnGuildID "payg_cas05.gat",GetCastleData("payg_cas05.gat",1),6; + Monster "payg_cas05.gat",30,30,"EMPERIUM",1288,1,"Agit_Py05::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","payg_cas05","Py05"; + end; +} diff --git a/npc/guild/payg/payg_flags.txt b/npc/guild/payg/payg_flags.txt new file mode 100644 index 000000000..b22e07635 --- /dev/null +++ b/npc/guild/payg/payg_flags.txt @@ -0,0 +1,148 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Payon Guild Flags +//===== By: ================================================== +//= jAthena (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Castle Guild Flags in Payon and pay_gld +//===== Additional Comments: ================================= +//= Optimized with functions.[kobra_k88] +//============================================================ + + +//============================================================================// +// Castle 1 +//============================================================================// +payon.gat,89,155,4 script Mingting#f1-1::Mingting 722, +{ + callfunc "F_Flags","Payon","payg_cas01",87,29; + close; + +OnRecvCastlePy01: + FlagEmblem GetCastleData("payg_cas01.gat",1); + end; +} +// In Guild =============================================== +pay_gld.gat,125,236,4 duplicate(Mingting) Mingting#f1-2 722 +pay_gld.gat,110,233,4 duplicate(Mingting) Mingting#f1-3 722 +pay_gld.gat,116,233,4 duplicate(Mingting) Mingting#f1-4 722 +pay_gld.gat,91,239,2 duplicate(Mingting) Mingting#f1-5 722 +// In Castle =============================================== +payg_cas01.gat,238,67,4 duplicate(Mingting) Mingting#f1-6 722 +payg_cas01.gat,233,67,4 duplicate(Mingting) Mingting#f1-7 722 +payg_cas01.gat,221,123,4 duplicate(Mingting) Mingting#f1-8 722 +payg_cas01.gat,221,116,4 duplicate(Mingting) Mingting#f1-9 722 +payg_cas01.gat,206,108,4 duplicate(Mingting) Mingting#f1-10 722 +payg_cas01.gat,212,108,4 duplicate(Mingting) Mingting#f1-11 722 + + + +//===========================================================================// +// Castle 2 +//============================================================================// +payon.gat,82,155,4 script Tiantan#f2-1::Tiantan 722, +{ + callfunc "F_Flags","Payon","payg_cas02",25,266; + close; + +OnRecvCastlePy02: + FlagEmblem GetCastleData("payg_cas02.gat",1); + end; +} +// In Guild =============================================== +pay_gld.gat,292,112,6 duplicate(Tiantan) Tiantan#f2-2 722 +pay_gld.gat,292,120,6 duplicate(Tiantan) Tiantan#f2-3 722 +pay_gld.gat,291,135,6 duplicate(Tiantan) Tiantan#f2-4 722 +pay_gld.gat,271,163,0 duplicate(Tiantan) Tiantan#f2-5 722 +// In Castle =============================================== +payg_cas02.gat,254,40,6 duplicate(Tiantan) Tiantan#f2-6 722 +payg_cas02.gat,254,48,6 duplicate(Tiantan) Tiantan#f2-7 722 +payg_cas02.gat,202,49,0 duplicate(Tiantan) Tiantan#f2-8 722 +payg_cas02.gat,209,49,0 duplicate(Tiantan) Tiantan#f2-9 722 +payg_cas02.gat,59,282,4 duplicate(Tiantan) Tiantan#f2-10 722 +payg_cas02.gat,70,282,4 duplicate(Tiantan) Tiantan#f2-11 722 + + + +//============================================================================// +// Castle 3 +//============================================================================// +payon.gat,97,155,4 script Fuying#f3-1::Fuying 722, +{ + callfunc "F_Flags","Payon","payg_cas03",9,263; + close; + +OnRecvCastlePy03: + FlagEmblem GetCastleData("payg_cas03.gat",1); + end; +} +// In Guild =============================================== +pay_gld.gat,321,298,2 duplicate(Fuying) Fuying#f3-2 722 +pay_gld.gat,321,289,2 duplicate(Fuying) Fuying#f3-3 722 +pay_gld.gat,327,304,1 duplicate(Fuying) Fuying#f3-4 722 +pay_gld.gat,333,254,4 duplicate(Fuying) Fuying#f3-5 722 +// In Castle =============================================== +payg_cas03.gat,236,54,2 duplicate(Fuying) Fuying#f3-6 722 +payg_cas03.gat,236,45,2 duplicate(Fuying) Fuying#f3-7 722 +payg_cas03.gat,259,66,4 duplicate(Fuying) Fuying#f3-8 722 +payg_cas03.gat,266,66,4 duplicate(Fuying) Fuying#f3-9 722 +payg_cas03.gat,34,31,4 duplicate(Fuying) Fuying#f3-10 722 +payg_cas03.gat,43,31,4 duplicate(Fuying) Fuying#f3-11 722 + + + +//============================================================================// +// Castle 4 +//============================================================================// +payon.gat,103,155,4 script Honglou#f4-1::Honglou 722, +{ + callfunc "F_Flags","Payon","payg_cas04",40,235; + close; + +OnRecvCastlePy04: + FlagEmblem GetCastleData("payg_cas04.gat",1); + end; +} +// In Guild =============================================== +pay_gld.gat,143,160,0 duplicate(Honglou) Honglou#f4-2 722 +pay_gld.gat,143,160,0 duplicate(Honglou) Honglou#f4-3 722 +pay_gld.gat,133,151,2 duplicate(Honglou) Honglou#f4-4 722 +pay_gld.gat,153,166,1 duplicate(Honglou) Honglou#f4-5 722 +// In Castle =============================================== +payg_cas04.gat,255,259,0 duplicate(Honglou) Honglou#f4-6 722 +payg_cas04.gat,248,259,0 duplicate(Honglou) Honglou#f4-7 722 +payg_cas04.gat,248,168,6 duplicate(Honglou) Honglou#f4-8 722 +payg_cas04.gat,248,160,6 duplicate(Honglou) Honglou#f4-9 722 +payg_cas04.gat,232,181,4 duplicate(Honglou) Honglou#f4-10 722 +payg_cas04.gat,239,181,4 duplicate(Honglou) Honglou#f4-11 722 + + + +//============================================================================// +// Castle 5 +//============================================================================// +payon.gat,75,155,4 script Zhulinxian#f5-1::Zhulinxian 722, +{ + callfunc "F_Flags","Payon","payg_cas05",276,227; + close; + +OnRecvCastlePy05: + FlagEmblem GetCastleData("payg_cas05.gat",1); + end; +} +// In Guild =============================================== +pay_gld.gat,208,268,4 duplicate(Zhulinxian) Zhulinxian#f5-2 722 +pay_gld.gat,199,268,4 duplicate(Zhulinxian) Zhulinxian#f5-3 722 +pay_gld.gat,190,277,3 duplicate(Zhulinxian) Zhulinxian#f5-4 722 +pay_gld.gat,187,294,2 duplicate(Zhulinxian) Zhulinxian#f5-5 722 +// In Castle =============================================== +payg_cas05.gat,32,249,4 duplicate(Zhulinxian) Zhulinxian#f5-6 722 +payg_cas05.gat,24,249,4 duplicate(Zhulinxian) Zhulinxian#f5-7 722 +payg_cas05.gat,62,271,0 duplicate(Zhulinxian) Zhulinxian#f5-8 722 +payg_cas05.gat,57,271,0 duplicate(Zhulinxian) Zhulinxian#f5-9 722 +payg_cas05.gat,55,252,2 duplicate(Zhulinxian) Zhulinxian#f5-10 722 +payg_cas05.gat,55,260,2 duplicate(Zhulinxian) Zhulinxian#f5-11 722 diff --git a/npc/guild/payg/payg_guardians.txt b/npc/guild/payg/payg_guardians.txt new file mode 100644 index 000000000..e89ac7910 --- /dev/null +++ b/npc/guild/payg/payg_guardians.txt @@ -0,0 +1,108 @@ +//===== eAthena Script ======================================= +//= War of Emperium - payg_cas guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Re-spawns guardians on server start if they have been +//= purchased. Also announces when a guardian dies. +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//= 1.2a Guardians for all payg castles are now in this file. +//= Minor optimizations.[kobra_k88] +//============================================================ + + +payg_cas01.gat,139,139,0 script Guardian_Py01 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas01.gat",10) == 1) guardian "payg_cas01.gat",210,120,"Soldier Guardian",1287,1,"Guardian_Py01::OnGuardianDied",0; + if (GetCastleData("payg_cas01.gat",11) == 1) guardian "payg_cas01.gat",69,26,"Soldier Guardian",1287,1,"Guardian_Py01::OnGuardianDied",1; + if (GetCastleData("payg_cas01.gat",12) == 1) guardian "payg_cas01.gat",23,141,"Soldier Guardian",1287,1,"Guardian_Py01::OnGuardianDied",2; + if (GetCastleData("payg_cas01.gat",13) == 1) guardian "payg_cas01.gat",224,87,"Archer Guardian",1285,1,"Guardian_Py01::OnGuardianDied",3; + if (GetCastleData("payg_cas01.gat",14) == 1) guardian "payg_cas01.gat",81,45,"Archer Guardian",1285,1,"Guardian_Py01::OnGuardianDied",4; + if (GetCastleData("payg_cas01.gat",15) == 1) guardian "payg_cas01.gat",214,53,"Knight Guardian",1286,1,"Guardian_Py01::OnGuardianDied",5; + if (GetCastleData("payg_cas01.gat",16) == 1) guardian "payg_cas01.gat",69,26,"Knight Guardian",1286,1,"Guardian_Py01::OnGuardianDied",6; + if (GetCastleData("payg_cas01.gat",17) == 1) guardian "payg_cas01.gat",23,141,"Knight Guardian",1286,1,"Guardian_Py01::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas01.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +payg_cas02.gat,39,25,0 script Guardian_Py02 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas02.gat",10) == 1) guardian "payg_cas02.gat",208,37,"Soldier Guardian",1287,1,"Guardian_Py02::OnGuardianDied",0; + if (GetCastleData("payg_cas02.gat",11) == 1) guardian "payg_cas02.gat",51,245,"Soldier Guardian",1287,1,"Guardian_Py02::OnGuardianDied",1; + if (GetCastleData("payg_cas02.gat",12) == 1) guardian "payg_cas02.gat",286,245,"Soldier Guardian",1287,1,"Guardian_Py02::OnGuardianDied",2; + if (GetCastleData("payg_cas02.gat",13) == 1) guardian "payg_cas02.gat",217,42,"Archer Guardian",1285,1,"Guardian_Py02::OnGuardianDied",3; + if (GetCastleData("payg_cas02.gat",14) == 1) guardian "payg_cas02.gat",264,266,"Archer Guardian",1285,1,"Guardian_Py02::OnGuardianDied",4; + if (GetCastleData("payg_cas02.gat",15) == 1) guardian "payg_cas02.gat",51,245,"Knight Guardian",1286,1,"Guardian_Py02::OnGuardianDied",5; + if (GetCastleData("payg_cas02.gat",16) == 1) guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_Py02::OnGuardianDied",6; + if (GetCastleData("payg_cas02.gat",17) == 1) guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_Py02::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas02.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +payg_cas03.gat,269,265,0 script Guardian_Py03 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas03.gat",10) == 1) guardian "payg_cas03.gat",252,39,"Soldier Guardian",1287,1,"Guardian_Py03::OnGuardianDied",0; + if (GetCastleData("payg_cas03.gat",11) == 1) guardian "payg_cas03.gat",23,283,"Soldier Guardian",1287,1,"Guardian_Py03::OnGuardianDied",1; + if (GetCastleData("payg_cas03.gat",12) == 1) guardian "payg_cas03.gat",34,283,"Soldier Guardian",1287,1,"Guardian_Py03::OnGuardianDied",2; + if (GetCastleData("payg_cas03.gat",13) == 1) guardian "payg_cas03.gat",57,36,"Archer Guardian",1285,1,"Guardian_Py03::OnGuardianDied",3; + if (GetCastleData("payg_cas03.gat",14) == 1) guardian "payg_cas03.gat",20,36,"Archer Guardian",1285,1,"Guardian_Py03::OnGuardianDied",4; + if (GetCastleData("payg_cas03.gat",15) == 1) guardian "payg_cas03.gat",34,283,"Knight Guardian",1286,1,"Guardian_Py03::OnGuardianDied",5; + if (GetCastleData("payg_cas03.gat",16) == 1) guardian "payg_cas03.gat",23,283,"Knight Guardian",1286,1,"Guardian_Py03::OnGuardianDied",6; + if (GetCastleData("payg_cas03.gat",17) == 1) guardian "payg_cas03.gat",28,253,"Knight Guardian",1286,1,"Guardian_Py03::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas03.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +payg_cas04.gat,271,29,0 script Guardian_Py04 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas04.gat",10) == 1) guardian "payg_cas04.gat",236,172,"Soldier Guardian",1287,1,"Guardian_Py04::OnGuardianDied",0; + if (GetCastleData("payg_cas04.gat",11) == 1) guardian "payg_cas04.gat",14,260,"Soldier Guardian",1287,1,"Guardian_Py04::OnGuardianDied",1; + if (GetCastleData("payg_cas04.gat",12) == 1) guardian "payg_cas04.gat",15,30,"Soldier Guardian",1287,1,"Guardian_Py04::OnGuardianDied",2; + if (GetCastleData("payg_cas04.gat",13) == 1) guardian "payg_cas04.gat",257,166,"Archer Guardian",1285,1,"Guardian_Py04::OnGuardianDied",3; + if (GetCastleData("payg_cas04.gat",14) == 1) guardian "payg_cas04.gat",65,261,"Archer Guardian",1285,1,"Guardian_Py04::OnGuardianDied",4; + if (GetCastleData("payg_cas04.gat",15) == 1) guardian "payg_cas04.gat",65,261,"Knight Guardian",1286,1,"Guardian_Py04::OnGuardianDied",5; + if (GetCastleData("payg_cas04.gat",16) == 1) guardian "payg_cas04.gat",52,29,"Knight Guardian",1286,1,"Guardian_Py04::OnGuardianDied",6; + if (GetCastleData("payg_cas04.gat",17) == 1) guardian "payg_cas04.gat",15,30,"Knight Guardian",1286,1,"Guardian_Py04::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas04.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +payg_cas05.gat,30,30,0 script Guardian_Py05 -1,{ +OnAgitInit: + if (GetCastleData("payg_cas05.gat",10) == 1) guardian "payg_cas05.gat",51,258,"Soldier Guardian",1287,1,"Guardian_Py05::OnGuardianDied",0; + if (GetCastleData("payg_cas05.gat",11) == 1) guardian "payg_cas05.gat",286,235,"Soldier Guardian",1287,1,"Guardian_Py05::OnGuardianDied",1; + if (GetCastleData("payg_cas05.gat",12) == 1) guardian "payg_cas05.gat",282,277,"Soldier Guardian",1287,1,"Guardian_Py05::OnGuardianDied",2; + if (GetCastleData("payg_cas05.gat",13) == 1) guardian "payg_cas05.gat",46,273,"Archer Guardian",1285,1,"Guardian_Py05::OnGuardianDied",3; + if (GetCastleData("payg_cas05.gat",14) == 1) guardian "payg_cas05.gat",289,256,"Archer Guardian",1285,1,"Guardian_Py05::OnGuardianDied",4; + if (GetCastleData("payg_cas05.gat",15) == 1) guardian "payg_cas05.gat",275,42,"Knight Guardian",1286,1,"Guardian_Py05::OnGuardianDied",5; + if (GetCastleData("payg_cas05.gat",16) == 1) guardian "payg_cas05.gat",254,9,"Knight Guardian",1286,1,"Guardian_Py05::OnGuardianDied",6; + if (GetCastleData("payg_cas05.gat",17) == 1) guardian "payg_cas05.gat",236,256,"Knight Guardian",1286,1,"Guardian_Py05::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "payg_cas05.gat","A Guardian Has Fallen",17; + end; +} diff --git a/npc/guild/payg/payg_kafras.txt b/npc/guild/payg/payg_kafras.txt new file mode 100644 index 000000000..75e758ec3 --- /dev/null +++ b/npc/guild/payg/payg_kafras.txt @@ -0,0 +1,65 @@ +//== eAthena Script ======================================== +//= War of Emperium Kafras for Payon Guild Castles +//== By: ================================================= +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//== Current Version: ======================================== +//= 1.2 +//== Compatible With: ======================================== +//= eAthena 0.1+; RO Episode 4+ +//== Description: ============================================ +//= Provides Kafra services for guild members of Payon Castles. +//= Used in conjuction with function F_Kafra. +//== Additional Comments: ================================== +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ============= +payg_cas01.gat,128,58,3 script Kafra Service#Py01 117,{ + callfunc "F_GKafra", "payg_cas01", "Payon"; + end; +OnRecvCastlePy01: + if (GetCastleData("payg_cas01.gat",9) < 1) disablenpc "Kafra Service#Py01"; + end; +} + + +// Castle 2 ============= +payg_cas02.gat,22,275,5 script Kafra Service#Py02 117,{ + callfunc "F_GKafra", "payg_cas02", "Payon"; + end; +OnRecvCastlePy02: + if (GetCastleData("payg_cas02.gat",9) < 1) disablenpc "Kafra Service#Py02"; + end; +} + + +// Castle 3 ============= +payg_cas03.gat,9,263,5 script Kafra Service#Py03 117,{ + callfunc "F_GKafra", "payg_cas03", "Payon"; + end; +OnRecvCastlePy03: + if (GetCastleData("payg_cas03.gat",9) < 1) disablenpc "Kafra Service#Py03"; + end; +} + + +// Castle 4 ============= +payg_cas04.gat,40,235,1 script Kafra Service#Py04 117,{ + callfunc "F_GKafra", "payg_cas04", "Payon"; + end; +OnRecvCastlePy04: + if (GetCastleData("payg_cas04.gat",9) < 1) disablenpc "Kafra Service#Py04"; + end; +} + + +// Castle 5 ============= +payg_cas05.gat,276,227,1 script Kafra Service#Py05 117,{ + callfunc "F_GKafra", "payg_cas05", "Payon"; + end; +OnRecvCastlePy05: + if (GetCastleData("payg_cas05.gat",9) < 1) disablenpc "Kafra Service#Py05"; + end; +} diff --git a/npc/guild/payg/payg_managers.txt b/npc/guild/payg/payg_managers.txt new file mode 100644 index 000000000..f1811a9d2 --- /dev/null +++ b/npc/guild/payg/payg_managers.txt @@ -0,0 +1,104 @@ +//===== eAthena Script ======================================= +//= War of Emperium Managers for Payon Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================================================== +payg_cas01.gat,120,58,4 script Grunday 55,{ + if(callfunc("F_GldManager","Grunday","payg_cas01",290,7,"Py01") == 0) close; + + if(@GDnum==10) guardian "payg_cas01.gat",210,120,"Soldier Guardian",1287,1,"Guardian_Py01::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas01.gat",69,26,"Soldier Guardian",1287,1,"Guardian_Py01::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas01.gat",23,141,"Soldier Guardian",1287,1,"Guardian_Py01::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas01.gat",224,87,"Archer Guardian",1285,1,"Guardian_Py01::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas01.gat",81,45,"Archer Guardian",1285,1,"Guardian_Py01::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas01.gat",214,53,"Knight Guardian",1286,1,"Guardian_Py01::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas01.gat",69,26,"Knight Guardian",1286,1,"Guardian_Py01::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas01.gat",23,141,"Knight Guardian",1286,1,"Guardian_Py01::OnGuardianDied",7; + mes "[ Grunday ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 2 ================================================================================== +payg_cas02.gat,22,260,7 script Cherrios 55,{ + if(callfunc("F_GldManager","Cherrios","payg_cas02",145,143,"Py02") == 0) close; + + if(@GDnum==10) guardian "payg_cas02.gat",208,37,"Soldier Guardian",1287,1,"Guardian_Py02::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas02.gat",51,245,"Soldier Guardian",1287,1,"Guardian_Py02::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas02.gat",286,245,"Soldier Guardian",1287,1,"Guardian_Py02::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas02.gat",217,42,"Archer Guardian",1285,1,"Guardian_Py02::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas02.gat",264,266,"Archer Guardian",1285,1,"Guardian_Py02::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas02.gat",51,245,"Knight Guardian",1286,1,"Guardian_Py02::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_Py02::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas02.gat",279,263,"Knight Guardian",1286,1,"Guardian_Py02::OnGuardianDied",7; + mes "[ Cherrios ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 3 ================================================================================== +payg_cas03.gat,10,277,0 script Garriet 55,{ + if(callfunc("F_GldManager","Garriet","payg_cas03",158,168,"Py03") == 0) close; + + if(@GDnum==10) guardian "payg_cas03.gat",252,39,"Soldier Guardian",1287,1,"Guardian_Py03::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas03.gat",23,283,"Soldier Guardian",1287,1,"Guardian_Py03::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas03.gat",34,283,"Soldier Guardian",1287,1,"Guardian_Py03::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas03.gat",57,36,"Archer Guardian",1285,1,"Guardian_Py03::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas03.gat",20,36,"Archer Guardian",1285,1,"Guardian_Py03::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas03.gat",34,283,"Knight Guardian",1286,1,"Guardian_Py03::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas03.gat",23,283,"Knight Guardian",1286,1,"Guardian_Py03::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas03.gat",28,253,"Knight Guardian",1286,1,"Guardian_Py03::OnGuardianDied",7; + mes "[ Garriet ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 4 ================================================================================== +payg_cas04.gat,38,284,3 script DJ 55,{ + if(callfunc("F_GldManager","DJ","payg_cas04",146,48,"Py04") == 0) close; + + if(@GDnum==10) guardian "payg_cas04.gat",236,172,"Soldier Guardian",1287,1,"Guardian_Py04::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas04.gat",14,260,"Soldier Guardian",1287,1,"Guardian_Py04::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas04.gat",15,30,"Soldier Guardian",1287,1,"Guardian_Py04::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas04.gat",257,166,"Archer Guardian",1285,1,"Guardian_Py04::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas04.gat",65,261,"Archer Guardian",1285,1,"Guardian_Py04::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas04.gat",65,261,"Knight Guardian",1286,1,"Guardian_Py04::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas04.gat",52,29,"Knight Guardian",1286,1,"Guardian_Py04::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas04.gat",15,30,"Knight Guardian",1286,1,"Guardian_Py04::OnGuardianDied",7; + mes "[ DJ ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 5 ================================================================================== +payg_cas05.gat,277,249,3 script Najarf 55,{ + if(callfunc("F_GldManager","Najarf","payg_cas05",156,131,"Py05") == 0) close; + + if(@GDnum==10) guardian "payg_cas05.gat",51,258,"Soldier Guardian",1287,1,"Guardian_Py05::OnGuardianDied",0; + if(@GDnum==11) guardian "payg_cas05.gat",286,235,"Soldier Guardian",1287,1,"Guardian_Py05::OnGuardianDied",1; + if(@GDnum==12) guardian "payg_cas05.gat",282,277,"Soldier Guardian",1287,1,"Guardian_Py05::OnGuardianDied",2; + if(@GDnum==13) guardian "payg_cas05.gat",46,273,"Archer Guardian",1285,1,"Guardian_Py05::OnGuardianDied",3; + if(@GDnum==14) guardian "payg_cas05.gat",289,256,"Archer Guardian",1285,1,"Guardian_Py05::OnGuardianDied",4; + if(@GDnum==15) guardian "payg_cas05.gat",275,42,"Knight Guardian",1286,1,"Guardian_Py05::OnGuardianDied",5; + if(@GDnum==16) guardian "payg_cas05.gat",254,9,"Knight Guardian",1286,1,"Guardian_Py05::OnGuardianDied",6; + if(@GDnum==17) guardian "payg_cas05.gat",236,256,"Knight Guardian",1286,1,"Guardian_Py05::OnGuardianDied",7; + mes "[ Najarf ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} diff --git a/npc/guild/payg/payg_treas.txt b/npc/guild/payg/payg_treas.txt new file mode 100644 index 000000000..063540f77 --- /dev/null +++ b/npc/guild/payg/payg_treas.txt @@ -0,0 +1,140 @@ +//===== eAthena Script ======================================= +//= War of Emperium Treasure Rooms for Payon Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//<================================ Castle 1 ================================>\\ + +// Treasure Spawn ---------------------------------------------------------- +payg_cas01.gat,1,1,0 script Treasure_Py01 -1,{ +OnRecvCastlePy01: + if($boxNumPy01 == 0) end; + set $@bxPy01, $boxNumPy01; + callfunc "F_GldTreas","payg_cas01","Py01",$boxNumPy01,$@bxPy01,$@boxIdPy01,1344,286,4,295,13,1; + end; +OnClock1200: + callfunc "F_GldTreas","payg_cas01","Py01",$boxNumPy01,$@bxPy01,$@boxIdPy01,1344,286,4,295,13,0; + end; +OnDied: + mapannounce "payg_cas01.gat","Treasure Chest Broken Open",17; + set $boxNumPy01, $boxNumPy01 -1; + if($boxNumPy01 == 0) mapannounce "payg_cas01.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch --------------------------------------------------- +payg_cas01.gat,295,8,0 script Switch#TresPy01 111,{ + callfunc "F_GldTreasSw", "payg_cas01",120,59; + end; +} + + +//<================================ Castle 2 ================================>\\ +// Treasure Spawn ---------------------------------------------------------- +payg_cas02.gat,1,1,0 script Treasure_Py02 -1,{ +OnRecvCastlePy02: + if($boxNumPy02 == 0) end; + set $@bxPy02, $boxNumPy02; + callfunc "F_GldTreas","payg_cas02","Py02",$boxNumPy02,$@bxPy02,$@boxIdPy02,1346,140,140,148,149,1; + end; +OnClock1200: + callfunc "F_GldTreas","payg_cas02","Py02",$boxNumPy02,$@bxPy02,$@boxIdPy02,1346,140,140,148,149,0; + end; +OnDied: + mapannounce "payg_cas02.gat","Treasure Chest Broken Open",17; + set $boxNumPy02, $boxNumPy02 -1; + if($boxNumPy02 == 0) mapannounce "payg_cas02.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +payg_cas02.gat,149,148,0 script Switch#TresPy02 111,{ + callfunc "F_GldTreasSw", "payg_cas02",22,261; + end; +} + + +//<================================ Castle 3 ================================>\\ +// Treasure Spawn ---------------------------------------------------------- +payg_cas03.gat,158,168,0 script Treasure_Py03 -1,{ +OnRecvCastlePy03: + if($boxNumPy03 == 0) end; + set $@bxPy03, $boxNumPy03; + callfunc "F_GldTreas","payg_cas03","Py03",$boxNumPy03,$@bxPy03,$@boxIdPy03,1348,154,164,162,173,1; + end; +OnClock1200: + callfunc "F_GldTreas","payg_cas03","Py03",$boxNumPy03,$@bxPy03,$@boxIdPy03,1348,154,164,162,173,0; + end; +OnDied: + mapannounce "payg_cas03.gat","Treasure Chest Broken Open",17; + set $boxNumPy03, $boxNumPy03 -1; + if($boxNumPy03 == 0) mapannounce "payg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +payg_cas03.gat,163,167,0 script Switch#TresPy03 111,{ + callfunc "F_GldTreasSw", "payg_cas03",11,278; + end; +} + + +//<================================ Castle 4 ================================>\\ +// Treasure Spawn ---------------------------------------------------------- +payg_cas04.gat,146,48,0 script Treasure_Py04 -1,{ +OnRecvCastlePy04: + if($boxNumPy04 == 0) end; + set $@bxPy04, $boxNumPy04; + callfunc "F_GldTreas","payg_cas04","Py04",$boxNumPy04,$@bxPy04,$@boxIdPy04,1350,142,44,151,51,1; + end; +OnClock1200: + callfunc "F_GldTreas","payg_cas04","Py04",$boxNumPy04,$@bxPy04,$@boxIdPy04,1350,142,44,151,51,0; + end; +OnDied: + mapannounce "payg_cas04.gat","Treasure Chest Broken Open",17; + set $boxNumPy04, $boxNumPy04 -1; + if($boxNumPy04 == 0) mapannounce "payg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +payg_cas04.gat,151,47,0 script Switch#TresPy04 111,{ + callfunc "F_GldTreasSw", "payg_cas04",38,285; + end; +} + + +//<================================ Castle 5 ================================>\\ +// Treasure Spawn ---------------------------------------------------------- +payg_cas05.gat,156,131,0 script Treasure_Py05 -1,{ +OnRecvCastlePy05: + if($boxNumPy05 == 0) end; + set $@bxPy05, $boxNumPy05; + callfunc "F_GldTreas","payg_cas05","Py05",$boxNumPy05,$@bxPy05,$@boxIdPy05,1352,152,128,160,135,1; + end; +OnClock1200: + callfunc "F_GldTreas","payg_cas05","Py05",$boxNumPy05,$@bxPy05,$@boxIdPy05,1352,152,128,160,135,0; + end; +OnDied: + mapannounce "payg_cas05.gat","Treasure Chest Broken Open",17; + set $boxNumPy05, $boxNumPy05 -1; + if($boxNumPy05 == 0) mapannounce "payg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +payg_cas05.gat,161,136,0 script Switch#TresPy05 111,{ + callfunc "F_GldTreasSw", "payg_cas05",277,250; + end; +} diff --git a/npc/guild/prtg/prtg_dunsw.txt b/npc/guild/prtg/prtg_dunsw.txt new file mode 100644 index 000000000..8284147a7 --- /dev/null +++ b/npc/guild/prtg/prtg_dunsw.txt @@ -0,0 +1,49 @@ +//===== eAthena Script ======================================= +//= War of Emperium Dungeon Switch for Prontera Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Switch that warps guild members to the guild dungeon +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================ +prtg_cas01.gat,94,200,0 script Switch#DunPt01 111,{ + callfunc "F_GldDunSw","prtg_cas01","03",28,251; + close; +} + + +// Castle 2 ================================================ +prtg_cas02.gat,84,72,0 script Switch#DunPt02 111,{ + callfunc "F_GldDunSw","prtg_cas02","03",164,268; + close; +} + + +// Castle 3 ================================================ +prtg_cas03.gat,5,70,0 script Switch#DunPt03 111,{ + callfunc "F_GldDunSw","prtg_cas03","03",164,179; + close; +} + + +// Castle 4 ================================================ +prtg_cas04.gat,56,283,0 script Switch#DunPt04 111,{ + callfunc "F_GldDunSw","prtg_cas04","03",268,203; + close; +} + + +// Castle 5 ================================================ +prtg_cas05.gat,212,94,0 script Switch#DunPt05 111,{ + callfunc "F_GldDunSw","prtg_cas05","03",199,28; + close; +} diff --git a/npc/guild/prtg/prtg_ev_agit.txt b/npc/guild/prtg/prtg_ev_agit.txt new file mode 100644 index 000000000..73ac15119 --- /dev/null +++ b/npc/guild/prtg/prtg_ev_agit.txt @@ -0,0 +1,130 @@ +//===== eAthena Script ======================================= +//= War of Emperium - Prontera Guild Wars Events +//===== By: ================================================== +//= jAthena (1.0) +//= 1.1 by Akaru and ho|yAnge| +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Event Triggers of Prontera Guild Wars +//===== Additional Comments: ================================= +//= v1.2 Now using functions for OnAgitStart and OnAgitBreak. [kobra_k88] +//============================================================ + + +// Castle 1 ================================================================ +prtg_cas01.gat,197,197,0 script Agit_Pt01 -1,{ +OnInterIfInit: + GetCastleData "prtg_cas01.gat",0,"::OnRecvCastlePt01"; + end; +OnRecvCastlePt01: + RequestGuildInfo GetCastleData("prtg_cas01.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","prtg_cas01","Pt01",197,197; + end; +OnAgitBreak: + callfunc "F_AgitBreak","prtg_cas01","Pt01"; + end; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas01.gat",GetCastleData("prtg_cas01.gat",1),6; + Monster "prtg_cas01.gat",197,197,"EMPERIUM",1288,1,"Agit_Pt01::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","prtg_cas01","Pt01"; + end; +} + +// Castle 2 ================================================================ +prtg_cas02.gat,158,174,0 script Agit_Pt02 -1,{ +OnInterIfInit: + GetCastleData "prtg_cas02.gat",0,"::OnRecvCastlePt02"; + end; +OnRecvCastlePt02: + RequestGuildInfo GetCastleData("prtg_cas02.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","prtg_cas02","Pt02",158,174; + end; +OnAgitBreak: + callfunc "F_AgitBreak","prtg_cas02","Pt02"; + end; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas02.gat",GetCastleData("prtg_cas02.gat",1),6; + Monster "prtg_cas02.gat",158,174,"EMPERIUM",1288,1,"Agit_Pt02::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","prtg_cas02","Pt02"; + end; +} + +// Castle 3 ================================================================ +prtg_cas03.gat,17,221,0 script Agit_Pt03 -1,{ +OnInterIfInit: + GetCastleData "prtg_cas03.gat",0,"::OnRecvCastlePt03"; + end; +OnRecvCastlePt03: + RequestGuildInfo GetCastleData("prtg_cas03.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","prtg_cas03","Pt03",17,221; + end; +OnAgitBreak: + callfunc "F_AgitBreak","prtg_cas03","Pt03"; + end; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas03.gat",GetCastleData("prtg_cas03.gat",1),6; + Monster "prtg_cas03.gat",17,221,"EMPERIUM",1288,1,"Agit_Pt03::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","prtg_cas03","Pt03"; + end; +} + +// Castle 4 ================================================================ +prtg_cas04.gat,292,14,0 script Agit_Pt04 -1,{ +OnInterIfInit: + GetCastleData "prtg_cas04.gat",0,"::OnRecvCastlePt04"; + end; +OnRecvCastlePt04: + RequestGuildInfo GetCastleData("prtg_cas04.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","prtg_cas04","Pt04",292,14; + end; +OnAgitBreak: + callfunc "F_AgitBreak","prtg_cas04","Pt04"; + end; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas04.gat",GetCastleData("prtg_cas04.gat",1),6; + Monster "prtg_cas04.gat",292,14,"EMPERIUM",1288,1,"Agit_Pt04::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","prtg_cas04","Pt04"; + end; +} + +// Castle 5 ================================================================ +prtg_cas05.gat,266,266,0 script Agit_Pt05 -1,{ +OnInterIfInit: + GetCastleData "prtg_cas05.gat",0,"::OnRecvCastlePt05"; + end; +OnRecvCastlePt05: + RequestGuildInfo GetCastleData("prtg_cas05.gat",1); + end; +OnAgitStart: + callfunc "F_AgitStart","prtg_cas05","Pt05",266,266; + end; +OnAgitBreak: + callfunc "F_AgitBreak","prtg_cas05","Pt05"; + end; +OnAgitEliminate: + MapRespawnGuildID "prtg_cas05.gat",GetCastleData("prtg_cas05.gat",1),6; + Monster "prtg_cas05.gat",266,266,"EMPERIUM",1288,1,"Agit_Pt05::OnAgitBreak"; + end; +OnAgitEnd: + callfunc "F_AgitEnd","prtg_cas05","Pt05"; + end; +} diff --git a/npc/guild/prtg/prtg_flags.txt b/npc/guild/prtg/prtg_flags.txt new file mode 100644 index 000000000..653e69333 --- /dev/null +++ b/npc/guild/prtg/prtg_flags.txt @@ -0,0 +1,175 @@ +//===== eAthena Script ======================================= +//= War of Emperium Prontera Guild Flags +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= WoE flag scripts. Displays guild emblems on flags. +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//================================================================================// +// Castle 1 +//================================================================================// +prontera.gat,155,190,4 script Creamhilt#p1-1::Creamhilt 722, +{ + callfunc "F_Flags","Prontera","prtg_cas01",97,174; + close; + +OnRecvCastlePt01: + FlagEmblem GetCastleData("prtg_cas01.gat",1); + end; +} +// In Guild =========================================== +prt_gld.gat,131,60,6 duplicate(Creamhilt) Creamhilt#p1-2 722 +prt_gld.gat,138,68,6 duplicate(Creamhilt) Creamhilt#p1-3 722 +prt_gld.gat,138,60,6 duplicate(Creamhilt) Creamhilt#p1-4 722 +prt_gld.gat,135,60,6 duplicate(Creamhilt) Creamhilt#p1-5 722 +prt_gld.gat,160,210,4 duplicate(Creamhilt) Creamhilt#p1-6 722 +// In Castle ============================================= +prtg_cas01.gat,58,56,4 duplicate(Creamhilt) Creamhilt#p1-7 722 +prtg_cas01.gat,64,56,4 duplicate(Creamhilt) Creamhilt#p1-8 722 +prtg_cas01.gat,76,32,4 duplicate(Creamhilt) Creamhilt#p1-9 722 +prtg_cas01.gat,84,32,4 duplicate(Creamhilt) Creamhilt#p1-10 722 +prtg_cas01.gat,94,39,4 duplicate(Creamhilt) Creamhilt#p1-11 722 +prtg_cas01.gat,94,24,4 duplicate(Creamhilt) Creamhilt#p1-12 722 +prtg_cas01.gat,73,14,4 duplicate(Creamhilt) Creamhilt#p1-13 722 +prtg_cas01.gat,73,6,4 duplicate(Creamhilt) Creamhilt#p1-14 722 +prtg_cas01.gat,55,46,4 duplicate(Creamhilt) Creamhilt#p1-15 722 +prtg_cas01.gat,45,46,4 duplicate(Creamhilt) Creamhilt#p1-16 722 + + + +//================================================================================// +// Castle 2 +//================================================================================// +prontera.gat,146,194,3 script Sbanhealt#p2-1::Sbanhealt 722, +{ + callfunc "F_Flags","Prontera","prtg_cas02",71,36; + close; + +OnRecvCastlePt02: + FlagEmblem GetCastleData("prtg_cas02.gat",1); + end; +} +// In Guild =========================================== +prt_gld.gat,153,213,3 duplicate(Sbanhealt) Sbanhealt#p2-2 722 +prt_gld.gat,244,126,8 duplicate(Sbanhealt) Sbanhealt#p2-3 722 +prt_gld.gat,244,128,8 duplicate(Sbanhealt) Sbanhealt#p2-4 722 +prt_gld.gat,236,126,8 duplicate(Sbanhealt) Sbanhealt#p2-5 722 +prt_gld.gat,236,128,8 duplicate(Sbanhealt) Sbanhealt#p2-6 722 +// In Castle ============================================= +prtg_cas02.gat,40,227,4 duplicate(Sbanhealt) Sbanhealt#p2-7 722 +prtg_cas02.gat,46,227,4 duplicate(Sbanhealt) Sbanhealt#p2-8 722 +prtg_cas02.gat,11,219,4 duplicate(Sbanhealt) Sbanhealt#p2-9 722 +prtg_cas02.gat,11,214,4 duplicate(Sbanhealt) Sbanhealt#p2-10 722 +prtg_cas02.gat,20,219,4 duplicate(Sbanhealt) Sbanhealt#p2-11 722 +prtg_cas02.gat,20,214,4 duplicate(Sbanhealt) Sbanhealt#p2-12 722 +prtg_cas02.gat,79,227,8 duplicate(Sbanhealt) Sbanhealt#p2-13 722 +prtg_cas02.gat,70,227,8 duplicate(Sbanhealt) Sbanhealt#p2-14 722 +prtg_cas02.gat,38,189,8 duplicate(Sbanhealt) Sbanhealt#p2-15 722 +prtg_cas02.gat,34,189,8 duplicate(Sbanhealt) Sbanhealt#p2-16 722 +prtg_cas02.gat,153,161,4 duplicate(Sbanhealt) Sbanhealt#p2-17 722 +prtg_cas02.gat,162,161,4 duplicate(Sbanhealt) Sbanhealt#p2-18 722 + + + + +//================================================================================// +// Castle 3 +//================================================================================// +prontera.gat,143,203,2 script Lazrigees#p3-1::Lazrigees 722, +{ + callfunc "F_Flags","Prontera","prtg_cas03",45,99; + close; + +OnRecvCastlePt03: + FlagEmblem GetCastleData("prtg_cas03.gat",1); + end; +} +// In Guild =========================================== +prt_gld.gat,150,220,2 duplicate(Lazrigees) Lazrigees#p3-2 722 +prt_gld.gat,147,140,4 duplicate(Lazrigees) Lazrigees#p3-3 722 +prt_gld.gat,147,136,4 duplicate(Lazrigees) Lazrigees#p3-4 722 +prt_gld.gat,158,140,4 duplicate(Lazrigees) Lazrigees#p3-5 722 +prt_gld.gat,158,136,4 duplicate(Lazrigees) Lazrigees#p3-6 722 +// In Castle ============================================= +prtg_cas03.gat,168,28,4 duplicate(Lazrigees) Lazrigees#p3-7 722 +prtg_cas03.gat,182,28,4 duplicate(Lazrigees) Lazrigees#p3-8 722 +prtg_cas03.gat,43,50,4 duplicate(Lazrigees) Lazrigees#p3-9 722 +prtg_cas03.gat,48,50,4 duplicate(Lazrigees) Lazrigees#p3-10 722 +prtg_cas03.gat,43,58,4 duplicate(Lazrigees) Lazrigees#p3-11 722 +prtg_cas03.gat,48,58,4 duplicate(Lazrigees) Lazrigees#p3-12 722 +prtg_cas03.gat,158,210,4 duplicate(Lazrigees) Lazrigees#p3-13 722 +prtg_cas03.gat,169,210,4 duplicate(Lazrigees) Lazrigees#p3-14 722 +prtg_cas03.gat,162,201,4 duplicate(Lazrigees) Lazrigees#p3-15 722 +prtg_cas03.gat,165,201,4 duplicate(Lazrigees) Lazrigees#p3-16 722 + + + +//================================================================================// +// Castle 4 +//================================================================================// +prontera.gat,167,203,6 script Squagul#p4-1::Squagul 722, +{ + callfunc "F_Flags","Prontera","prtg_cas04",259,265; + close; + +OnRecvCastlePt04: + FlagEmblem GetCastleData("prtg_cas04.gat",1); + end; +} +// In Guild =========================================== +prt_gld.gat,169,220,6 duplicate(Squagul) Squagul#p4-2 722 +prt_gld.gat,120,243,6 duplicate(Squagul) Squagul#p4-3 722 +prt_gld.gat,120,236,6 duplicate(Squagul) Squagul#p4-4 722 +prt_gld.gat,122,243,6 duplicate(Squagul) Squagul#p4-5 722 +prt_gld.gat,122,246,6 duplicate(Squagul) Squagul#p4-6 722 +// In Castle ============================================= +prtg_cas04.gat,82,29,4 duplicate(Squagul) Squagul#p4-7 722 +prtg_cas04.gat,75,29,4 duplicate(Squagul) Squagul#p4-8 722 +prtg_cas04.gat,75,27,4 duplicate(Squagul) Squagul#p4-9 722 +prtg_cas04.gat,82,27,4 duplicate(Squagul) Squagul#p4-10 722 +prtg_cas04.gat,59,29,4 duplicate(Squagul) Squagul#p4-11 722 +prtg_cas04.gat,67,29,4 duplicate(Squagul) Squagul#p4-12 722 +prtg_cas04.gat,258,25,4 duplicate(Squagul) Squagul#p4-13 722 +prtg_cas04.gat,258,20,4 duplicate(Squagul) Squagul#p4-14 722 +prtg_cas04.gat,263,20,4 duplicate(Squagul) Squagul#p4-15 722 +prtg_cas04.gat,263,27,4 duplicate(Squagul) Squagul#p4-16 722 + + + + +//================================================================================// +// Castle 5 +//================================================================================// +prontera.gat,165,194,5 script Guindull#p5-1::Guindull 722, +{ + callfunc "F_Flags","Prontera","prtg_cas05",34,30; + close; + +OnRecvCastlePt05: + FlagEmblem GetCastleData("prtg_cas05.gat",1); + end; +} +// In Guild =========================================== +prt_gld.gat,167,213,5 duplicate(Guindull) Guindull#p5-2 722 +prt_gld.gat,199,243,2 duplicate(Guindull) Guindull#p5-3 722 +prt_gld.gat,199,236,2 duplicate(Guindull) Guindull#p5-4 722 +prt_gld.gat,197,243,2 duplicate(Guindull) Guindull#p5-5 722 +prt_gld.gat,197,236,2 duplicate(Guindull) Guindull#p5-6 722 +// In Castle ============================================= +prtg_cas05.gat,19,247,4 duplicate(Guindull) Guindull#p5-7 722 +prtg_cas05.gat,19,243,4 duplicate(Guindull) Guindull#p5-8 722 +prtg_cas05.gat,26,247,4 duplicate(Guindull) Guindull#p5-9 722 +prtg_cas05.gat,26,243,4 duplicate(Guindull) Guindull#p5-10 722 +prtg_cas05.gat,249,289,4 duplicate(Guindull) Guindull#p5-11 722 +prtg_cas05.gat,256,289,4 duplicate(Guindull) Guindull#p5-12 722 +prtg_cas05.gat,253,271,4 duplicate(Guindull) Guindull#p5-13 722 +prtg_cas05.gat,273,257,4 duplicate(Guindull) Guindull#p5-14 722 diff --git a/npc/guild/prtg/prtg_guardians.txt b/npc/guild/prtg/prtg_guardians.txt new file mode 100644 index 000000000..0ed441b9d --- /dev/null +++ b/npc/guild/prtg/prtg_guardians.txt @@ -0,0 +1,108 @@ +//===== eAthena Script ======================================= +//= War of Emperium - prtg_cas guardians script +//===== By: ================================================== +//= holyAngelX (1.0) +//===== Current Version: ===================================== +//= 1.2a +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= Re-spawns guardians on server start if they have been +//= purchased. Also announces when a guardian dies. +//===== Additional Comments: ================================= +//= 1.1 by joedukk +//= 1.2 by Akaru and Valaris +//= 1.2a Guardians for all prtg castles are now in this file. +//= Minor optimizations.[kobra_k88] +//============================================================ + + +prtg_cas01.gat,197,197,0 script Guardian_Pt01 -1,{ +OnAgitInit: + if (GetCastleData("prtg_cas01.gat",10) == 1) guardian "prtg_cas01.gat",196,92,"Soldier Guardian",1287,1,"Guardian_Pt01::OnGuardianDied",0; + if (GetCastleData("prtg_cas01.gat",11) == 1) guardian "prtg_cas01.gat",113,200,"Soldier Guardian",1287,1,"Guardian_Pt01::OnGuardianDied",1; + if (GetCastleData("prtg_cas01.gat",12) == 1) guardian "prtg_cas01.gat",111,186,"Soldier Guardian",1287,1,"Guardian_Pt01::OnGuardianDied",2; + if (GetCastleData("prtg_cas01.gat",13) == 1) guardian "prtg_cas01.gat",76,202,"Archer Guardian",1285,1,"Guardian_Pt01::OnGuardianDied",3; + if (GetCastleData("prtg_cas01.gat",14) == 1) guardian "prtg_cas01.gat",90,26,"Archer Guardian",1285,1,"Guardian_Pt01::OnGuardianDied",4; + if (GetCastleData("prtg_cas01.gat",15) == 1) guardian "prtg_cas01.gat",58,59,"Knight Guardian",1286,1,"Guardian_Pt01::OnGuardianDied",5; + if (GetCastleData("prtg_cas01.gat",16) == 1) guardian "prtg_cas01.gat",112,200,"Knight Guardian",1286,1,"Guardian_Pt01::OnGuardianDied",6; + if (GetCastleData("prtg_cas01.gat",17) == 1) guardian "prtg_cas01.gat",101,194,"Knight Guardian",1286,1,"Guardian_Pt01::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas01.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +prtg_cas02.gat,158,174,0 script Guardian_Pt02 -1,{ +OnAgitInit: + if (GetCastleData("prtg_cas02.gat",10) == 1) guardian "prtg_cas02.gat",75,71,"Soldier Guardian",1287,1,"Guardian_Pt02::OnGuardianDied",0; + if (GetCastleData("prtg_cas02.gat",11) == 1) guardian "prtg_cas02.gat",56,31,"Soldier Guardian",1287,1,"Guardian_Pt02::OnGuardianDied",1; + if (GetCastleData("prtg_cas02.gat",12) == 1) guardian "prtg_cas02.gat",42,223,"Soldier Guardian",1287,1,"Guardian_Pt02::OnGuardianDied",2; + if (GetCastleData("prtg_cas02.gat",13) == 1) guardian "prtg_cas02.gat",44,195,"Archer Guardian",1285,1,"Guardian_Pt02::OnGuardianDied",3; + if (GetCastleData("prtg_cas02.gat",14) == 1) guardian "prtg_cas02.gat",197,22,"Archer Guardian",1285,1,"Guardian_Pt02::OnGuardianDied",4; + if (GetCastleData("prtg_cas02.gat",15) == 1) guardian "prtg_cas02.gat",68,71,"Knight Guardian",1286,1,"Guardian_Pt02::OnGuardianDied",5; + if (GetCastleData("prtg_cas02.gat",16) == 1) guardian "prtg_cas02.gat",202,27,"Knight Guardian",1286,1,"Guardian_Pt02::OnGuardianDied",6; + if (GetCastleData("prtg_cas02.gat",17) == 1) guardian "prtg_cas02.gat",59,24,"Knight Guardian",1286,1,"Guardian_Pt02::OnGuardianDied",7; + end; + +GuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas02.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +prtg_cas03.gat,17,221,0 script Guardian_Pt03 -1,{ +OnAgitInit: + if (GetCastleData("prtg_cas03.gat",10) == 1) guardian "prtg_cas03.gat",165,55,"Soldier Guardian",1287,1,"Guardian_Pt03::OnGuardianDied",0; + if (GetCastleData("prtg_cas03.gat",11) == 1) guardian "prtg_cas03.gat",161,181,"Soldier Guardian",1287,1,"Guardian_Pt03::OnGuardianDied",1; + if (GetCastleData("prtg_cas03.gat",12) == 1) guardian "prtg_cas03.gat",165,199,"Soldier Guardian",1287,1,"Guardian_Pt03::OnGuardianDied",2; + if (GetCastleData("prtg_cas03.gat",13) == 1) guardian "prtg_cas03.gat",169,22,"Archer Guardian",1285,1,"Guardian_Pt03::OnGuardianDied",3; + if (GetCastleData("prtg_cas03.gat",14) == 1) guardian "prtg_cas03.gat",165,191,"Archer Guardian",1285,1,"Guardian_Pt03::OnGuardianDied",4; + if (GetCastleData("prtg_cas03.gat",15) == 1) guardian "prtg_cas03.gat",175,13,"Knight Guardian",1286,1,"Guardian_Pt03::OnGuardianDied",5; + if (GetCastleData("prtg_cas03.gat",16) == 1) guardian "prtg_cas03.gat",169,180,"Knight Guardian",1286,1,"Guardian_Pt03::OnGuardianDied",6; + if (GetCastleData("prtg_cas03.gat",17) == 1) guardian "prtg_cas03.gat",142,217,"Knight Guardian",1286,1,"Guardian_Pt03::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas03.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +prtg_cas04.gat,292,14,0 script Guardian_Pt04 -1,{ +OnAgitInit: + if (GetCastleData("prtg_cas04.gat",10) == 1) guardian "prtg_cas04.gat",30,234,"Soldier Guardian",1287,1,"Guardian_Pt04::OnGuardianDied",0; + if (GetCastleData("prtg_cas04.gat",11) == 1) guardian "prtg_cas04.gat",38,234,"Soldier Guardian",1287,1,"Guardian_Pt04::OnGuardianDied",1; + if (GetCastleData("prtg_cas04.gat",12) == 1) guardian "prtg_cas04.gat",63,26,"Soldier Guardian",1287,1,"Guardian_Pt04::OnGuardianDied",2; + if (GetCastleData("prtg_cas04.gat",13) == 1) guardian "prtg_cas04.gat",253,274,"Archer Guardian",1285,1,"Guardian_Pt04::OnGuardianDied",3; + if (GetCastleData("prtg_cas04.gat",14) == 1) guardian "prtg_cas04.gat",269,256,"Archer Guardian",1285,1,"Guardian_Pt04::OnGuardianDied",4; + if (GetCastleData("prtg_cas04.gat",15) == 1) guardian "prtg_cas04.gat",267,271,"Knight Guardian",1286,1,"Guardian_Pt04::OnGuardianDied",5; + if (GetCastleData("prtg_cas04.gat",16) == 1) guardian "prtg_cas04.gat",34,281,"Knight Guardian",1286,1,"Guardian_Pt04::OnGuardianDied",6; + if (GetCastleData("prtg_cas04.gat",17) == 1) guardian "prtg_cas04.gat",33,232,"Knight Guardian",1286,1,"Guardian_Pt04::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas04.gat","A Guardian Has Fallen",17; + end; +} +//------------------------------------------------------------------------------ +prtg_cas05.gat,266,266,0 script Guardian_Pt05 -1,{ +OnAgitInit: + if (GetCastleData("prtg_cas05.gat",10) == 1) guardian "prtg_cas05.gat",244,15,"Soldier Guardian",1287,1,"Guardian_Pt05::OnGuardianDied",0; + if (GetCastleData("prtg_cas05.gat",11) == 1) guardian "prtg_cas05.gat",241,14,"Soldier Guardian",1287,1,"Guardian_Pt05::OnGuardianDied",1; + if (GetCastleData("prtg_cas05.gat",12) == 1) guardian "prtg_cas05.gat",68,40,"Soldier Guardian",1287,1,"Guardian_Pt05::OnGuardianDied",2; + if (GetCastleData("prtg_cas05.gat",13) == 1) guardian "prtg_cas05.gat",62,264,"Archer Guardian",1285,1,"Guardian_Pt05::OnGuardianDied",3; + if (GetCastleData("prtg_cas05.gat",14) == 1) guardian "prtg_cas05.gat",244,61,"Archer Guardian",1285,1,"Guardian_Pt05::OnGuardianDied",4; + if (GetCastleData("prtg_cas05.gat",15) == 1) guardian "prtg_cas05.gat",34,24,"Knight Guardian",1286,1,"Guardian_Pt05::OnGuardianDied",5; + if (GetCastleData("prtg_cas05.gat",16) == 1) guardian "prtg_cas05.gat",208,86,"Knight Guardian",1286,1,"Guardian_Pt05::OnGuardianDied",6; + if (GetCastleData("prtg_cas05.gat",17) == 1) guardian "prtg_cas05.gat",43,70,"Knight Guardian",1286,1,"Guardian_Pt05::OnGuardianDied",7; + end; + +OnGuardianDied: + // Event when Guardian dies + MapAnnounce "prtg_cas05.gat","A Guardian Has Fallen",17; + end; +} diff --git a/npc/guild/prtg/prtg_kafras.txt b/npc/guild/prtg/prtg_kafras.txt new file mode 100644 index 000000000..6549af533 --- /dev/null +++ b/npc/guild/prtg/prtg_kafras.txt @@ -0,0 +1,66 @@ +//=== eAthena Script ==================== +//= War of Emperium Kafras for Prontera Guild Castles +//=== By: ========================= +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//=== Current Version: =================== +//= 1.2 +//=== Compatible With: =================== +//= eAthena 0.1+; RO Episode 4+ +//=== Description: ===================== +//= Provides Kafra services for guild members of Prontera Castles. +//= Used in conjuction with function F_Kafra. +//=== Additional Comments: ================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================== + + +// Castle 1 ======================== +prtg_cas01.gat,96,173,0 script Kafra Service#Pt01 117,{ + callfunc "F_GKafra", "prtg_cas01", "Prontera"; + end; +OnRecvCastlePt01: + if (GetCastleData("prtg_cas01.gat",9) < 1) disablenpc "Kafra Service#Pt01"; + end; +} + + +// Castle 2 ======================== +prtg_cas02.gat,71,36,4 script Kafra Service#Pt02 117,{ + callfunc "F_GKafra", "prtg_cas02", "Prontera"; + end; +OnRecvCastlePt02: + if (GetCastleData("prtg_cas02.gat",9) < 1) disablenpc "Kafra Service#Pt02"; + end; +} + + +// Castle 3 ======================== +//prtg_cas03.gat,181,215,4 script Kafra Service#Pt03 117, +prtg_cas03.gat,39,99,4 script Kafra Service#Pt03 117,{ + callfunc "F_GKafra", "prtg_cas03", "Prontera"; + end; +OnRecvCastlePt03: + if (GetCastleData("prtg_cas03.gat",9) < 1) disablenpc "Kafra Service#Pt03"; + end; +} + + +// Castle 4 ======================== +prtg_cas04.gat,258,247,4 script Kafra Service#Pt04 117,{ + callfunc "F_GKafra", "prtg_cas04", "Prontera"; + end; +OnRecvCastlePt04: + if (GetCastleData("prtg_cas04.gat",9) < 1) disablenpc "Kafra Service#Pt04"; + end; +} + + +// Castle 5 ======================== +prtg_cas05.gat,52,41,4 script Kafra Service#Pt05 117,{ + callfunc "F_GKafra", "prtg_cas05", "Prontera"; + end; +OnRecvCastlePt05: + if (GetCastleData("prtg_cas05.gat",9) < 1) disablenpc "Kafra Service#Pt05"; + end; +} diff --git a/npc/guild/prtg/prtg_managers.txt b/npc/guild/prtg/prtg_managers.txt new file mode 100644 index 000000000..440d18b6a --- /dev/null +++ b/npc/guild/prtg/prtg_managers.txt @@ -0,0 +1,104 @@ +//===== eAthena Script ======================================= +//= War of Emperium Managers for Prontera Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +// Castle 1 ================================================================================== +prtg_cas01.gat,112,181,0 script Abrai 55,{ + if(callfunc("F_GldManager","Abrai","prtg_cas01",15,209,"Pt01") == 0) close; + + if(@GDnum==10) guardian "prtg_cas01.gat",196,92,"Soldier Guardian",1287,1,"Guardian_Pt01::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas01.gat",113,200,"Soldier Guardian",1287,1,"Guardian_Pt01::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas01.gat",111,186,"Soldier Guardian",1287,1,"Guardian_Pt01::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas01.gat",76,202,"Archer Guardian",1285,1,"Guardian_Pt01::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas01.gat",90,26,"Archer Guardian",1285,1,"Guardian_Pt01::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas01.gat",58,59,"Knight Guardian",1286,1,"Guardian_Pt01::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas01.gat",112,200,"Knight Guardian",1286,1,"Guardian_Pt01::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas01.gat",101,194,"Knight Guardian",1286,1,"Guardian_Pt01::OnGuardianDied",7; + mes "[ Abrai ]"; + mes "Guardian has been installed, the guardian will protect our guild base against enemies."; + close; +} + + +// Castle 2 ================================================================================== +prtg_cas02.gat,94,61,0 script Rhay 55,{ + if(callfunc("F_GldManager","Rhay","prtg_cas02",201,229,"Pt02") == 0) close; + + if(@GDnum==10) guardian "prtg_cas02.gat",75,71,"Soldier Guardian",1287,1,"Guardian_Pt02::GuardianDied",0; + if(@GDnum==11) guardian "prtg_cas02.gat",56,31,"Soldier Guardian",1287,1,"Guardian_Pt02::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas02.gat",42,223,"Soldier Guardian",1287,1,"Guardian_Pt02::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas02.gat",44,195,"Archer Guardian",1285,1,"Guardian_Pt02::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas02.gat",197,22,"Archer Guardian",1285,1,"Guardian_Pt02::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas02.gat",68,71,"Knight Guardian",1286,1,"Guardian_Pt02::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas02.gat",202,27,"Knight Guardian",1286,1,"Guardian_Pt02::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas02.gat",59,24,"Knight Guardian",1286,1,"Guardian_Pt02::OnGuardianDied",7; + mes "[ Rhay ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 3 ================================================================================== +prtg_cas03.gat,51,100,4 script Stick 55,{ + if(callfunc("F_GldManager","Stick","prtg_cas03",189,132,"Pt03") == 0) close; + + if(@GDnum==10) guardian "prtg_cas03.gat",165,55,"Soldier Guardian",1287,1,"Guardian_Pt03::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas03.gat",161,181,"Soldier Guardian",1287,1,"Guardian_Pt03::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas03.gat",165,199,"Soldier Guardian",1287,1,"Guardian_Pt03::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas03.gat",169,22,"Archer Guardian",1285,1,"Guardian_Pt03::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas03.gat",165,191,"Archer Guardian",1285,1,"Guardian_Pt03::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas03.gat",175,13,"Knight Guardian",1286,1,"Guardian_Pt03::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas03.gat",169,180,"Knight Guardian",1286,1,"Guardian_Pt03::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas03.gat",142,217,"Knight Guardian",1286,1,"Guardian_Pt03::OnGuardianDied",7; + mes "[ Stick ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 4 ================================================================================== +prtg_cas04.gat,259,265,4 script Bandred 55,{ + if(callfunc("F_GldManager","Bandred","prtg_cas04",271,162,"Pt04") == 0) close; + + if(@GDnum==10) guardian "prtg_cas04.gat",30,234,"Soldier Guardian",1287,1,"Guardian_Pt04::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas04.gat",38,234,"Soldier Guardian",1287,1,"Guardian_Pt04::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas04.gat",63,26,"Soldier Guardian",1287,1,"Guardian_Pt04::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas04.gat",253,274,"Archer Guardian",1285,1,"Guardian_Pt04::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas04.gat",269,256,"Archer Guardian",1285,1,"Guardian_Pt04::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas04.gat",267,271,"Knight Guardian",1286,1,"Guardian_Pt04::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas04.gat",34,281,"Knight Guardian",1286,1,"Guardian_Pt04::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas04.gat",33,232,"Knight Guardian",1286,1,"Guardian_Pt04::OnGuardianDied",7; + mes "[ Bandred ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} + + +// Castle 5 ================================================================================== +prtg_cas05.gat,36,37,4 script Reiner 55,{ + if(callfunc("F_GldManager","Reiner","prtg_cas05",273,179,"Pt05") == 0) close; + + if(@GDnum==10) guardian "prtg_cas05.gat",244,15,"Soldier Guardian",1287,1,"Guardian_Pt05::OnGuardianDied",0; + if(@GDnum==11) guardian "prtg_cas05.gat",241,14,"Soldier Guardian",1287,1,"Guardian_Pt05::OnGuardianDied",1; + if(@GDnum==12) guardian "prtg_cas05.gat",68,40,"Soldier Guardian",1287,1,"Guardian_Pt05::OnGuardianDied",2; + if(@GDnum==13) guardian "prtg_cas05.gat",62,264,"Archer Guardian",1285,1,"Guardian_Pt05::OnGuardianDied",3; + if(@GDnum==14) guardian "prtg_cas05.gat",244,61,"Archer Guardian",1285,1,"Guardian_Pt05::OnGuardianDied",4; + if(@GDnum==15) guardian "prtg_cas05.gat",34,24,"Knight Guardian",1286,1,"Guardian_Pt05::OnGuardianDied",5; + if(@GDnum==16) guardian "prtg_cas05.gat",208,86,"Knight Guardian",1286,1,"Guardian_Pt05::OnGuardianDied",6; + if(@GDnum==17) guardian "prtg_cas05.gat",43,70,"Knight Guardian",1286,1,"Guardian_Pt05::OnGuardianDied",7; + mes "[ Reiner ]"; + mes "Guardian has been installed, guardian will protect our guild base against enemies."; + close; +} diff --git a/npc/guild/prtg/prtg_treas.txt b/npc/guild/prtg/prtg_treas.txt new file mode 100644 index 000000000..f5b4c012d --- /dev/null +++ b/npc/guild/prtg/prtg_treas.txt @@ -0,0 +1,144 @@ +//===== eAthena Script ======================================= +//= War of Emperium Treasure Rooms for Prontera Guild Castles +//===== By: ================================================== +//= jAthena - kalen (1.0) +//= 1.1 by Akaru, ho|yAnge|X, and Valaris +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.1+; RO Episode 4+ +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.2 Optimized with functions.[kobra_k88] +//============================================================ + + +//<=============================== Castle 1 =================================>\\ + +// Treasure Spawn ---------------------------------------------------------- +prtg_cas01.gat,1,1,0 script Treasure_Pt01 -1,{ +OnRecvCastlePt01: + if($boxNumPt01 == 0) end; + set $@bxPt01, $boxNumPt01; + callfunc "F_GldTreas","prtg_cas01","Pt01",$boxNumPt01,$@bxPt01,$@boxIdPt01,1354,6,204,15,213,1; + end; +OnClock1200: + callfunc "F_GldTreas","prtg_cas01","Pt01",$boxNumPt01,$@bxPt01,$@boxIdPt01,1354,6,204,15,213,0; + end; +OnDied: + mapannounce "prtg_cas01.gat","Treasure Chest Broken Open",17; + set $boxNumPt01, $boxNumPt01 -1; + if($boxNumPt01 == 0) mapannounce "prtg_cas01.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +prtg_cas01.gat,15,209,0 script Switch#TresPt01 111,{ + callfunc "F_GldTreasSw", "prtg_cas01",109,179; + end; +} + + +//<================================= Castle 2 ===============================>\\ + +// Treasure Spawn ---------------------------------------------------------- +prtg_cas02.gat,1,1,0 script Treasure_Pt02 -1,{ +OnRecvCastlePt02: + if($boxNumPt02 == 0) end; + set $@bxPt02, $boxNumPt02; + callfunc "F_GldTreas","prtg_cas02","Pt02",$boxNumPt02,$@bxPt02,$@boxIdPt02,1356,198,224,207,233,1; + end; +OnClock1200: + callfunc "F_GldTreas","prtg_cas02","Pt02",$boxNumPt02,$@bxPt02,$@boxIdPt02,1356,198,224,207,233,0; + end; +OnDied: + mapannounce "prtg_cas02.gat","Treasure Chest Broken Open",17; + set $boxNumPt02, $boxNumPt02 -1; + if($boxNumPt02 == 0) mapannounce "prtg_cas02.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +prtg_cas02.gat,207,228,0 script Switch#TresPt02 111,{ + callfunc "F_GldTreasSw", "prtg_cas02",94,62; + end; +} + + +//<================================ Castle 3 ================================>\\ + +// Treasure Spawn ---------------------------------------------------------- +prtg_cas03.gat,1,1,0 script Treasure_Pt03 -1,{ +OnRecvCastlePt03: + if($boxNumPt03 == 0) end; + set $@bxPt03, $boxNumPt03; + callfunc "F_GldTreas","prtg_cas03","Pt03",$boxNumPt03,$@bxPt03,$@boxIdPt03,1358,184,128,193,135,1; + end; +OnClock1200: + callfunc "F_GldTreas","prtg_cas03","Pt03",$boxNumPt03,$@bxPt03,$@boxIdPt03,1358,184,128,193,135,0; + end; +OnDied: + mapannounce "prtg_cas03.gat","Treasure Chest Broken Open",17; + set $boxNumPt03, $boxNumPt03 -1; + if($boxNumPt03 == 0) mapannounce "prtg_cas03.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +prtg_cas03.gat,193,130,0 script Switch#TresPt03 111,{ + callfunc "F_GldTreasSw", "prtg_cas03",45,99; + end; +} + + +//<================================ Castle 4 ================================>\\ + +// Treasure Spawn ---------------------------------------------------------- +prtg_cas04.gat,1,1,0 script Treasure_Pt04 -1,{ +OnRecvCastlePt04: + if($boxNumPt04 == 0) end; + set $@bxPt04, $boxNumPt04; + callfunc "F_GldTreas","prtg_cas04","Pt04",$boxNumPt04,$@bxPt04,$@boxIdPt04,1360,266,158,275,167,1; + end; +OnClock1200: + callfunc "F_GldTreas","prtg_cas04","Pt04",$boxNumPt04,$@bxPt04,$@boxIdPt04,1360,266,158,275,167,0; + end; +OnDied: + mapannounce "prtg_cas04.gat","Treasure Chest Broken Open",17; + set $boxNumPt04, $boxNumPt04 -1; + if($boxNumPt04 == 0) mapannounce "prtg_cas04.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +prtg_cas04.gat,275,160,0 script Switch#TresPt04 111,{ + callfunc "F_GldTreasSw", "prtg_cas04",259,265; + end; +} + + +//<================================ Castle 5 ================================>\\ + +// Treasure Spawn ---------------------------------------------------------- +prtg_cas05.gat,1,1,0 script Treasure_Pt05 -1,{ +OnRecvCastlePt05: + if($boxNumPt05 == 0) end; + set $@bxPt05, $boxNumPt05; + callfunc "F_GldTreas","prtg_cas05","Pt05",$boxNumPt05,$@bxPt05,$@boxIdPt05,1362,272,174,279,181,1; + end; +OnClock1200: + callfunc "F_GldTreas","prtg_cas05","Pt05",$boxNumPt05,$@bxPt05,$@boxIdPt05,1362,272,174,279,181,0; + end; +OnDied: + mapannounce "prtg_cas05.gat","Treasure Chest Broken Open",17; + set $boxNumPt05, $boxNumPt05 -1; + if($boxNumPt05 == 0) mapannounce "prtg_cas05.gat", "All of the treasure boxes have been opened. You must wait untill the next day for them to appear again.",0; + end; +} + +// Treasure Room Switch ---------------------------------------------------- +prtg_cas05.gat,281,176,0 script Switch#TresPt05 111,{ + callfunc "F_GldTreasSw", "prtg_cas05",34,30; + end; +} diff --git a/npc/jobs/1-1/acolyte.txt b/npc/jobs/1-1/acolyte.txt new file mode 100644 index 000000000..d8fa85d92 --- /dev/null +++ b/npc/jobs/1-1/acolyte.txt @@ -0,0 +1,349 @@ +//===== eAthena Script ======================================= +//= Acolyte Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 +, dev mod 1009 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.0 Fully working. +//= v1.1 Added function calls for Priest Quest. +//= v1.2 Fixed Marthilda, Yosuke bugs. [Lupus] +//============================================================ + + +// -- Father Mareusis -- +prt_church.gat,184,41,4 script "Father Mareusis" 60, +{ + mes "[Father Mareusis]"; + if(Class==Job_Novice && job_acolyte_q > 0) goto L_Check; + mes "What is it you are looking for?"; + next; + menu "Father, I want to become an Acolyte.",M_0,"The Requirements.",M_1,"I'm just looking around that's all",M_End; + close; + + M_0: + mes "[Father Mareusis]"; + if(Class == Job_Acolyte) goto JobAco; + if(Class != Job_Novice) goto NotNov; + if(JobLevel < 10) goto JobLess10; + mes "Do you truly wish to become a servant of God?"; + next; + menu "Yes, Father, I do.",sM_0,"Nope, I lied.",sM_1; + close; + + sM_0: + mes "[Father Mareusis]"; + mes "Good. I accept your will to become an Acolyte."; + mes "You understand that you need to do penance before you become a servant of God, don't you?"; + next; + mes "[Father Mareusis]"; + mes "Well then, here is your Divine Quest....."; + next; + mes "[Father Mareusis]"; + set job_acolyte_q, rand(1,3); + if(job_acolyte_q == 2) goto sR_2; + if(job_acolyte_q == 3) goto sR_3; + + sR_1: + mes "Please visit ^0000ffFather Rubalkabara^000000, a member of the Prontera Parish and report back here."; + mes "He has been Practicing Asceticism near the ^0000ffSt. Capitolina Abbey, 1 map North, and 2 maps East of Prontera City.^000000."; + goto sL_End; + + sR_2: + mes "Please Visit ^0000ffMother Marthilda^000000 and report back here."; + mes "She has been Practicing Asceticism in the ^0000ffSograt Desert, one map north from the town of Morroc^000000. Morroc is SouthWest from Prontera."; + goto sL_End; + + sR_3: + mes "Please Visit ^0000ffFather Yosuke^000000 and report back here."; + mes "He has been Practicing Asceticism on ^0000ffa very small island 1 map West, and 1 map North, of Prontera City.^000000."; + + sL_End: + next; + mes "[Father Mareusis]"; + mes "May the Grace of God enlighten your path."; + close; + + sM_1: + mes "[Father Mareusis]"; + mes "Lying is a sin my child!"; + mes "Please come back when you are ready"; + emotion 19; + close; + + JobAco: + mes "Are you feeling okay?...."; + emotion 20; + next; + mes "[Father Mareusis]"; + mes "...your attire..."; + next; + mes "[Father Mareusis]"; + mes "You're already are an Acolyte....."; + next; + mes "[Father Mareusis]"; + mes "You are not joking with me, are you? Hoho!!..kids these days."; + emotion 18; + close; + + NotNov: + mes "I am sorry child. You have already devoted your life to another profession. I am afraid that you will no longer be able to devote it to God."; + close; + + JobLess10: + mes "My child you do not yet possess the necessary skills to serve the lord."; + mes "Please come back when your faith in God has become stronger"; + next; + mes "[Father Mareusis]"; + mes "May God bless you."; + close; + + M_1: + mes "[Father Mareusis]"; + if(Class == Job_Acolyte) goto M1b; + if(Class != Job_Novice) goto M1a; + + mes "So you wish to become an Acolyte do you?"; + mes "Here are the two requirements you must fullfill first in order to do so."; + next; + mes "[Father Mareusis]"; + mes "First of all, you have to reach ^0000ffnovice job Level 9^000000 and learn the ^0000ffBasic Skills^000000 that come with it."; + next; + mes "[Father Mareusis]"; + mes "Secondly, you have to embark on a Divine Quest!!"; + next; + mes "[Father Mareusis]"; + mes "You'll will become an Acolyte in no time if, from the bottom of your heart, you are truly eager to become a servant of God."; + close; + + M1a: + mes "You have already devoted your life to another profession...."; + close; + M1b: + mes "You have already devoted your life to the lord my child. Please go with God's blessing."; + close; + + M_End: + mes "[Father Mareusis]"; + mes "I see. I pray for your salvation."; + close; + +L_Check: + mes "Oh, You've come back. Let me check to see if you are ready to serve God... Let's see..."; + next; + mes "[Father Mareusis]"; + if(job_acolyte_q < 4) goto sL_NotRdy; + if(SkillPoint > 0) goto sL_Skpoint; + mes "Your prayers have been answered my child. That which has been asked of you has been fullfilled!!."; + next; + mes "[Father Mareusis]"; + mes "With the powers vested in me I hearby make you, ^0000ff"+strcharinfo(0)+"^000000, an Acolyte!!!"; + next; + mes "(whispers a prayer)"; + next; + set job_acolyte_q,0; + set job_acolyte_q2,0; + JobChange Job_Acolyte; + mes "[Father Mareusis]"; + mes "Remember to be thankful to God, who is taking care of us all of the time."; + mes "That you have the unique chance to serve him...you should feel very fortunate and blessed."; + next; + mes "[Father Mareusis]"; + mes "Now go forth my child and VANQUISH the EVILS of this world. You have my blessing and the blessing of the church."; + close; + + sL_NotRdy: + mes "Hmm... you don't seem to have finished your Divine Quest my child."; + next; + mes "[Father Mareusis]"; + if(job_acolyte_q == 1) goto sR_1; + if(job_acolyte_q == 2) goto sR_2; + if(job_acolyte_q == 3) goto sR_3; + close; + + sL_Skpoint: + mes "Before we can move on, please use up all of your skill points my child."; + close; +} + + +// == Devine Quest == +// -- Father Rubalkabara -- +prt_fild03.gat,365,259,2 script Father Rubalkabara 110,{ + mes "[Father Rubalkabara]"; + if(Class==Job_Acolyte || Class==Job_Priest) callfunc "F_FatherRub"; + if(Class==Job_Novice) goto L_Novice; + +L_Other: + mes "Oh.. Have you come here to train Or are you just a Wanderer..?"; + next; + mes "[Father Rubalkabara]"; + mes "Whoever you are, please take care of yourself. Monsters in here are shockingly Strong contrary to their Cute apprearance."; + close; + +L_Novice: + if(job_acolyte_q==4) goto QuestOver; + if(job_acolyte_q > 0) goto L_Start; + mes "Huh..? What brings you here? This is a Very dangerous place for a Novice like you. Please Go back quickly."; + emotion 0; + close; + +L_Start: + mes "Oh... Are you the young one who wishes to become an Acolyte...? I've already received the news of your comming from the Santuary."; + next; + mes "[Father Rubalkabara]"; + mes "Let me just check my list of candidates here to make sure you are at the right place......"; + next; + mes "[Father Rubalkabara]"; + if(job_acolyte_q != 1) goto Goback; + mes "You're ^0000ff"+strcharinfo(0)+"^000000, right? Thank you for comming to vist me."; + next; + mes "[Father Rubalkabara]"; + mes "I believe you have already been informed about Acolytes from Father Mareusis. So I won't bother to bore you with any futher lectures on the subject."; + next; + mes "[Father Rubalkabara]"; + mes "Besides, I know your generation doesn't like to be lectured by old men like myself. Hahaha..."; + emotion 18; + next; + mes "[Father Rubalkabara]"; + mes "But you might have to learn to endure what your elders say, because God loves to teach his children. You will see."; + next; + mes "[Father Rubalkabara]"; + mes "I will send a message to Father Mareusis stating that you visted me as proof of the completion of your Divine Quest."; + next; + mes "[Father Rubalkabara]"; + mes "You may go back to Prontera now. Farewell and may God bless you."; + set job_acolyte_q,4; + close; + + QuestOver: + mes "Your Divine Quest is has been completed. You may continue in your journey to serve God."; + close; + + Goback: + mes "Hmmm... I do not think you name is on my list of candidates."; + emotion 20; + next; + mes "[Father Rubalkabara]"; + mes "...... Why don't you go back to the Santuary and check again."; + close; +} + +// -- Mother Marthilda -- +moc_fild07.gat,36,354,4 script Mother Marthilda 79,{ + mes "[Mother Marthilda]"; + if(Class == Job_Acolyte || Class==Job_Priest) callfunc "F_MotherMart"; + if(Class == Job_Novice) goto L_Novice; + +L_Other: + mes "Hello and welcome. I am Mother Marthilda. Are you a weary traveler or a mighty warrior?"; + mes "Whoever you are please make sure to keep your faith in God."; + close; + +L_Novice: + if(job_acolyte_q == 5) goto QuestOver; + if(job_acolyte_q > 0) goto L_Start; + mes "My!! Aren't you a little far from your town? A novice like you could get hurt. Please be safe."; + emotion 0; + close; +L_Start: + mes "Ah, You are one of the Acolyte Applicants. I sincerely welcome you."; + next; + mes "[Mother Marthilda]"; + mes "Let me just check my list of candidates here to make sure you are at the right place......"; + next; + if(job_acolyte_q != 2) goto Goback; + mes "[Mother Marthilda]"; + mes ".... ^0000ff"+strcharinfo(0)+"^000000, Yes! I found you."; + next; + mes "[Mother Marthilda]"; + mes "I will send a message to 'Father Mareusis' stating that you visted me as proof of the completion of your Divine Quest."; + next; + mes "[Mother Marthilda]"; + mes "Thank you for visiting me. I am even more greatfull that you chose to follow your heart and devote your life to the divinity."; + mes "God is only as powerfull as our devotion to him. Remember that."; + next; + mes "[Mother Marthilda]"; + mes "You may go back to Prontera now."; + mes "Be safe and may God bless."; + set job_acolyte_q,5; + close; + + Goback: + mes "[Mother Marthilda]"; + mes "Hmm....let's see...."; + mes "..Well... I can't find your name on the List ...."; + emotion 20; + next; + mes "[Mother Marthilda]"; + mes "I recommend that you to return to the Santuary and Check again."; + close; + + QuestOver: + mes "Your Divine Quest is has been completed. You may continue in your journey to serve God."; + close; +} + +// -- Father Yosuke -- +prt_fild00.gat,208,218,6 script Father Yosuke 120,{ + mes "[Father Yosuke]"; + if(Class == Job_Acolyte || Class==Job_Priest) callfunc "F_FatherYos"; + if(Class == Job_Novice) goto L_Novice; + +L_Other: + mes "What brings you to this place. Try not to bother me ok."; + close; + +L_Novice: + if(job_acolyte_q == 6) goto QuestOver; + if(job_acolyte_q > 0) goto L_Start; + mes "You, Novice...wanna tell me something?"; + mes "If not go back home."; + close; + +L_Start: + mes "Hey!! You there."; + next; + mes "[Father Yosuke]"; + mes "You look like an Acolyte Applicant...am I right?"; + next; + mes "[Father Yosuke]"; + mes "Let me just check my list of candidates here to make sure you are at the right place......"; + next; + if(job_acolyte_q != 3) goto Goback; + mes "[Father Yosuke]"; + mes "Here we are, ^0000ff"+strcharinfo(0)+"^000000, correct? Not bad, Not bad. You withstood the long journey to get here pretty well."; + next; + mes "[Father Yosuke]"; + mes "I will send a message to 'Father Mareusis' stating that you visted me as proof of the completion of your Divine Quest."; + next; + mes "[Father Yosuke]"; + mes "Now go back to the Sanctuary and don't forget to carry God's teachings with you where ever you go!"; + emotion 27; + set job_acolyte_q,6; + close; + + Goback: + mes "[Father Yosuke]"; + mes "Interesting.. I can't find your name on my list.."; + emotion 20; + next; + mes "[Father Yosuke]"; + mes "I think you've come here by mistake."; + mes "Go back to the Santuary and check with Father Mareusis."; + close; + + QuestOver: + mes "What ? You Have more Business with me?"; + emotion 1; + next; + mes "[Father Yosuke]"; + mes "Your Divine Quest is complete. Go back to the Sanctuary Now!"; + emotion 27; + close; +} + diff --git a/npc/jobs/1-1/archer.txt b/npc/jobs/1-1/archer.txt new file mode 100644 index 000000000..172114572 --- /dev/null +++ b/npc/jobs/1-1/archer.txt @@ -0,0 +1,183 @@ +//===== eAthena Script ======================================= +//= Archer Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + +// -- Archer Guildsman -- +payon_in02.gat,64,71,4 script Archer Guildsman 59, +{ + mes "[Archer Guildsman]"; + if(Class==Job_Novice && job_archer_q == 1) goto L_Check; + mes "Good Day. How may I help you?"; + next; + menu "I would like to become an Archer.",M_0,"What are the Requirements?",M_1,"Never mind.",M_End; + + M_0: + mes "[Archer Guildsman]"; + if(Class == Job_Archer) goto sL_Archer; + if(Class != Job_Novice) goto sL_Other; + + mes "You have made an execellent job choice."; + mes "Please submit your resume so that I can check your qualifications."; + next; + mes "(You hand over your resume)"; + next; + mes "[Archer Guildsman]"; + if(JobLevel < 10) goto sL_LowLvl; + set job_archer_q,1; + mes "Looks good. You have the necesssary skills to become an archer...."; + next; + mes "[Archer Guildsman]"; + mes "but.... "; + next; + mes "[Archer Guildsman]"; + mes "you must first pass a test in order to do so. I hope you didn't think becoming an archer was going to be that easy. Ha ha!"; + next; + mes "[Archer Guildsman]"; + mes "A well made bow is essential for a good archer, and high quality wood is in turn essential for a well made bow."; + mes "You will be tested on how well you are able to gather high quality wood."; + next; + mes "[Archer Guildsman]"; + mes "The higher the quality of the wood you gather the higher your score."; + mes "You must recieve a score of ^ff0000at least 25^000000 in order to ^ff0000pass the test^000000."; + next; + mes "[Archer Guildsman]"; + mes "You can find wood by battling ^0000ff'Willows'^000000, a type of tree monster found outside of town in Payon forest."; + mes "They drop the wood in the form of^0000ff 'Trunks'^000000."; + next; + mes "[Archer Guildsman]"; + mes "There are a total of 4 different kind of trunks each with a different point value. Gather a variety of trunks and bring them back here for me to grade."; + next; + mes "[Archer Guildsman]"; + mes "I must warn you, the Willows can be tough monsters so be carefull and remember to rest and use your healing items. Good luck!"; + close; + + sL_Archer: + mes "Your free spirited nature tells me that you're already an archer....that and the bow and arrow in your hands...Haha"; + emotion 18; + close; + + sL_Other: + mes "I'm sorry but you cannot leave your current job to become an Archer...though I can understand why you would want to do so."; + close; + + sL_LowLvl: + mes "It seems that you are not qualified to become an Archer yet. Please take a look at the job requirments once more."; + close; + + + M_1: + mes "[Archer Guildsman]"; + if(Class == Job_Archer) goto sM_1a; + if(Class != Job_Novice) goto sM_1b; + mes "Let me explain the requirements for becoming an archer to you:"; + next; + mes "[Archer Guildsman]"; + mes "First of all, you have to have a job level of 9 and you must learn all of the skills that come with that job level."; + next; + mes "[Archer Guildsman]"; + mes "Secondly, you will have to take a test that will determine whether or not you have the skills to become an archer."; + next; + mes "[Archer Guildsman]"; + mes "Those are the requirements. Fullfill them and you will be able to live life as only an Archer can."; + close; + + sM_1a: + mes "Have you already forgotten how you became an Archer?...."; + emotion 1; + close; + sM_1b: + mes "Telling you the requirements won't help you become an Archer since you already have another job."; + close; + + M_End: + mes "[Archer Guildsman]"; + mes "Ok then, take care."; + close; + +L_Check: + mes "Oh, I see you've come back."; + next; + mes "[Archer Guildsman]"; + if((CountItem(1066) == 0) && (CountItem(1067) == 0) && (CountItem(1068) == 0) && (Countitem(1019) == 0)) goto sL_NotRdy; + if(SkillPoint > 0) goto sL_SkPoints; + set @Trunk1, CountItem(1066)*5; + set @Trunk2, CountItem(1067)*3; + set @Trunk3, CountItem(1068)*2; + set @Trunk4, CountItem(1019); + set @TrunkTotal, @Trunk1 + @Trunk2 + @Trunk3 + @Trunk4; + + mes "Lets see....."; + next; + mes "[Archer Guildsman]"; + mes "You have:"; + mes "^0000FF" +Countitem(1066)+ "^000000 Fine grained trunks for ^ff0000" +@Trunk1+ "^000000 points,"; + mes "^0000FF" +Countitem(1067)+ "^000000 Solid trunks for ^ff0000" +@Trunk2+ "^000000 points,"; + mes "^0000FF" +Countitem(1068)+ "^000000 Barren trunks for ^ff0000" +@Trunk3+ "^000000 points,"; + mes "^0000FF" +Countitem(1019)+ "^000000 Trunks for ^ff0000" +@Trunk4+ "^000000 points....."; + next; + mes "[Archer Guildsman]"; + mes "That gives you a total score of: ^ff0000" +@TrunkTotal+"^000000"; + next; + mes "[Archer Guildsman]"; + if(@TrunkTotal < 25) goto sL_Failed; + + mes "Very good! You have passed the test. Congratulations, you are now fully qualified to become an archer."; + emotion 21; + next; + mes "[Archer Guildsman]"; + mes "I will now transform you..."; + next; + JobChange Job_Archer; + set job_archer_q, 0; + mes "[Archer Guildsman]"; + mes "In exchange for the trunks you brought in I will give you this Bow and some arrows. Please take them."; + next; + getitem 1702,1;//Items: Bow_, + getitem 1750,200;//Items: Arrow, + delitem 1066, countitem(1066);//Items: Fine-grained_Trunk, + delitem 1067, countitem(1067);//Items: Solid_Trunk, + delitem 1068, countitem(1068);//Items: Barren_Trunk, + delitem 1019, countitem(1019);//Items: Trunk, + mes "[Archer Guildsman]"; + mes "An Archer knows no bounds so live your life to its fullest. I know you will make an exellent archer."; + next; + mes "[Archer Guildsman]"; + mes "Farewell and good luck on your journey."; + close; + + sL_NotRdy: + mes "What? You didn't bring any trunks back for me to grade? Let me explain the test requirements again just in case you forgot..."; + emotion 1; + next; + mes "[Archer Guildsman]"; + mes "There are a total of ^5555FF4 different kind of Trunks^000000 each with a different point value."; + mes "Gather a variety of Trunks and bring them back here for me to grade."; + next; + mes "[Archer Guildsman]"; + mes "You can find Trunks by battling ^0000ff'Willows'^000000, a type of tree monster found outside of town in Payon forest."; + close; + sL_SkPoints: + mes "You need to use up all of your skill points before I can make you an Archer."; + close; + sL_Failed: + mes "I'm sorry but your score is too low. I'm afraid that you have failed the test."; + next; + mes "[Archer Guildsman]"; + mes "Fortunatley for you I'm somewhat softhearted so I'll give you another chance. Go gather some more trunks and come back."; + next; + mes "[Archer Guildsman]"; + mes "Hopefull they will be of a high enough quality for you to pass the test."; + close; + +} diff --git a/npc/jobs/1-1/mage.txt b/npc/jobs/1-1/mage.txt new file mode 100644 index 000000000..7e9b5b3d2 --- /dev/null +++ b/npc/jobs/1-1/mage.txt @@ -0,0 +1,498 @@ +//===== eAthena Script ======================================= +//= Mage Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Fixed input ingridients bug [Lupus] +//============================================================ + + +// -- Expert Mage -- +geffen_in.gat,164,124,4 script Expert Mage 123, +{ + if(Class==Job_Novice && job_magician_q >= 1) goto L_BeMage; + + mes "[Expert Mage]"; + mes "Hi hi! What can I help you with today?"; +M_Menu: + next; + menu "I'm in love with magic, make me a Mage!",M_0,"Tell me the Requirements.",M_1,"Nothing thanks.",M_End; + + M_0: + mes "[Expert Mage]"; + mes "You wanna be a Mage? Hmmm....."; + next; + mes "[Expert Mage]"; + + if(Class == 2) goto L_JobMage; + if(Class != 0) goto L_JobOther; + + mes "Okays, just fill out this application form pleeassse."; + next; + mes "(you fill out the form and hand it back to her)"; + next; + mes "[Expert Mage]"; + + if(JobLevel < 10) goto L_JobLvl; + + mes "Oooh~ You have very nice hand writing ^0000dd"+ strcharinfo(0) +"^000000, and more importantly you have met the necessary prerequisites to become a mage."; + next; + mes "[Expert Mage]"; + mes "The only thing left to do is to pass the official Geffen Mage Test. Let me give you the details of the test."; + next; + set job_magician_q, rand(1,4); + + L_Explain: + mes "[Expert Mage]"; + if(job_magician_q == 1) mes "Your test is to make ^0000ff'Mixed Solution No.1'^000000 and bring it back to me."; + if(job_magician_q == 2) mes "Your test is to make ^00aa00'Mixed Solution No.2'^000000 and bring it back to me."; + if(job_magician_q == 3) mes "Your test is to make ^ff0000'Mixed Solution No.3'^000000 and bring it back to me."; + if(job_magician_q == 4) mes "Your test is to make ^ffbb00'Mixed Solution No.4'^000000 and bring it back to me."; + + next; + if(countitem(1092) == 0) getitem 1092,1;//Items: Empty_Test_Tube, + mes "[Expert Mage]"; + mes "You can get the necessary ingredients in the ^5533FF'Guide Book'^000000 in this room."; + mes "Refer to it to get a list of the proper ingredients for the solution."; + next; + mes "[Expert Mage]"; + mes "When you are ready to mix it, use the ^ff0000'Mixing Machine'^000000 in the center to mix the solution."; + next; + mes "[Expert Mage]"; + mes "Good Luck! I'll be waiting."; + close; + + L_JobMage: + mes "You should really get yourself a mirror. Then you could see that you are ^ff0000already a Mage^000000."; + mes "It may even help you fix up your hair do."; + emotion 4; + close; + L_JobOther: + mes "Oh...I'm sorry. I know they say 2 is always better than 1, but when it comes to Jobs, it's a No No."; + mes "Try to stay positive. Your current job can't be that bad."; + emotion 22; + close; + + L_JobLvl: + mes "Oh...I'm sorry. You need ^ff0000Job level 9^000000 and all of the ^0000ffBasic Skills^000000 before you can become a Mage."; + mes "Go out and kill some more Fabres okays."; + emotion 22; + close; + + M_1: + mes "[Expert Mage]"; + mes "First of all, you have to reach Novice Level 9 and have learned all of the Basic Skills."; + mes "Secondly, you have to pass the Mage Test."; + goto M_Menu; + M_End: + mes "[Expert Mage]"; + mes "Okays. Bye bye."; + close; + +L_BeMage: + mes "[Expert Mage]"; + mes "Oh, you're back. Lets see...."; + next; + mes "[Expert Mage]"; + if(countitem(1090) >= 1) goto L_Retry;//Items: Unknown_Test_Tube, + if(countitem(1071)<1 && countitem(1085)<1 && countitem(1086)<1 && countitem(1087)<1) goto L_NoSol;//Items: Unknown_Test_Tube, Unknown_Test_Tube, Unknown_Test_Tube, Unknown_Test_Tube, + + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Mage."; + if(SkillPoint > 0) close; + + mes ".....The color's not quit right.... there is a little to much percipitate..... hmmm......"; + next; + mes "[Expert Mage]"; + mes "Well it's not perfect but it seems you worked very hard on this so...... alright! I'll let you pass! You are now officialy qualified to become a mage!"; + emotion 21; + next; + mes "[Expert Mage]"; + mes "Abra-kadabra and hocus pocus, turn this young novice into a ^00aa00MAGE^000000!!"; + next; + JobChange 2;// Job: Job_Mage + set Zeny,Zeny+500; + set job_magician_q,0; + if(job_magician_q==1) delitem 1071,1;//Items: Unknown_Test_Tube, + if(job_magician_q==2) delitem 1085,1;//Items: Unknown_Test_Tube, + if(job_magician_q==3) delitem 1086,1;//Items: Unknown_Test_Tube, + if(job_magician_q==4) delitem 1087,1;//Items: Unknown_Test_Tube, + + mes "[Expert Mage]"; + mes "'Welcome to My World~ teh hehe. I've always wanted to say that. Anyways, congratulations!. You're one of us now so let's be friends okays!"; + emotion 18; + next; + mes "[Expert Mage]"; + mes "Good luck to ya and take care!"; + close; + + L_Retry: + mes "I'm sorry but the solution you have is no good. I'm afraid that you didn't pass the test. You can try again though."; + mes "Let me exlpain the test for you once more okays."; + emotion 4; + next; + delitem 1090,1;//Items: Unknown_Test_Tube, + goto L_Explain; + + L_NoSol: + mes "Where is the solution I asked for? I'm sorry but I can't check the solution when you don't have it. Let me remind you what solution you need."; + emotion 1; + next; + goto L_Explain; + +} + +// -- Solutions Guide Book -- +geffen_in.gat,177,112,1 script Solutions Guide Book 111, +{ + mes "[Solutions Guide Book]"; + mes "I belong to Geffen Magic Academy. Please handle with care."; + next; + menu "Solution No. 1.",Sol1,"Solution No. 2.",Sol2,"Solution No. 3.",Sol3,"Solution No. 4.",Sol4,"Close.",Cancel; + + Sol1: + mes "[Mage Test Solution No. 1]"; + mes "* Ingredients list *"; + mes " - Jellopy 2 ea"; + mes " - Fluff 3 ea"; + mes " - Milk 1 ea"; + next; + mes "[Mage Test Solution No. 1]"; + mes "* Solvent Agent *"; + mes " Payon Solution"; + mes " Where to find: A Small Spring in"; + mes " Archer Village, Payon."; + next; + mes "[Mage Test Solution No. 1]"; + mes "* Chemical ingredients *"; + mes " - 8472"; + next; + mes "[Mage Test Solution No. 1]"; + mes "* A Catalyst *"; + mes " - Yellow Gemstone"; + mes " (Mixing Machine Will provide"; + mes " this item.)"; + close; + Sol2: + mes "[Mage Test Solution No. 2]"; + mes "* Ingredients list *"; + mes " - Jellopy 3 ea"; + mes " - Fluff 1 ea"; + mes " - Milk 1 ea"; + next; + mes "[Mage Test Solution No. 2]"; + mes "* Solvent Agent *"; + mes " - Not Appliable."; + next; + mes "[Mage Test Solution No. 2]"; + mes "* Chemical ingredients *"; + mes " - 3735"; + next; + mes "[Mage Test Solution No. 2]"; + mes "* A Catalyst *"; + mes " - Red Gemstone"; + mes " (Mixing Machine Will provide"; + mes " this item.)"; + close; + Sol3: + mes "[Mage Test Solution No. 3]"; + mes "* Ingredients list *"; + mes " - Jellopy 6 ea"; + mes " - Fluff 1 ea"; + next; + mes "[Mage Test Solution No. 3]"; + mes "* Solvent Agent *"; + mes " Payon Solution"; + mes " Where to find: A Small Spring in"; + mes " Archer Village, Payon."; + next; + mes "[Mage Test Solution No. 3]"; + mes "* Chemical ingredients *"; + mes " - 2750"; + next; + mes "[Mage Test Solution No. 3]"; + mes "* A Catalyst *"; + mes " - Blue Gemstone"; + mes " (Mixing Machine Will provide"; + mes " this item.)"; + close; + Sol4: + mes "[Mage Test Solution No. 4]"; + mes "* Ingredients list *"; + mes " - Jellopy 2 ea"; + mes " - Fluff 3 ea"; + next; + mes "[Mage Test Solution No. 4]"; + mes "* Solvent Agent *"; + mes " Morroc Solution"; + mes " Where to find: A Small Spring"; + mes " Near the Enterance of Pyramid"; + mes " in Morroc."; + next; + mes "[Mage Test Solution No. 4]"; + mes "* Chemical ingredients *"; + mes " - 5429"; + next; + mes "[Mage Test Solution No. 4]"; + mes "* A Catalyst *"; + mes " - 1 carat Diamond"; + mes " (Mixing Machine Will provide"; + mes " this item.)"; + close; + Cancel: + close; +} + +// -- Mixing Machine -- +geffen_in.gat,164,112,1 script Mixing Machine 111, +{ + mes "[Mixing Machine]"; + mes "This is the unique Mixing Machine designed only for making magic solutions. It is the property of the Geffen Magic Academy."; + next; + mes "[Mixing Machine]"; + mes "Would you like to use this machine?"; + next; + menu "Yes.",M_Start, "No.",M_End; + + M_Start: + mes "[Mixing Machine]"; + mes "Please specify the ingredients you will be using."; + next; + sM_Menu: + menu "Jellopy",sM_0, "Fluff",sM_1, "Milk",sM_2, "Move on to the next step.",sM_3; + + sM_0: + input @JELLOPY; + if (@JELLOPY<0 || @JELLOPY>100) set @JELLOPY,0; //set 0 if wrong input + goto sM_Menu; + sM_1: + input @FLUFF; + if (@FLUFF<0 || @FLUFF>100) set @FLUFF,0; //set 0 if wrong input + goto sM_Menu; + sM_2: + input @MILK; + if (@MILK<0 || @MILK>100) set @MILK,0; //set 0 if wrong input + goto sM_Menu; + sM_3: + mes "[Mixing Machine]"; + mes "Please specify a solvent."; + next; + menu "Payon Solvent.",ssM_0, "Morroc Solvent",ssM_1, "No Solvent.",ssM_2; + + ssM_0: + set @SOLVENT, 1089; + set @SOLVENT$, "Payon"; + goto L_Cont; + ssM_1: + set @SOLVENT, 1088; + set @SOLVENT$, "Morroc"; + goto L_Cont; + ssM_2: + set @SOLVENT, 0; + set @SOLVENT$, "No"; + + L_Cont: + mes "[Mixing Machine]"; + mes "Here is your current list of ingredients:"; + mes "^4444FF"+@JELLOPY+"^000000 Jellopy,"; + mes "^4444FF"+@FLUFF+"^000000 Fluff,"; + mes "^4444FF"+@MILK+"^000000 Milk,"; + mes "and ^4444FF"+@SOLVENT$+"^000000 Solvent."; + mes "Is this correct?"; + next; + menu "Yes.",-, "No.",M_Start; + + mes "[Mixing Machine]"; + mes "Please put all of the items into the drum. Now enter the magic serial number."; + next; + + L_Input: + input @INPUT; + mes "[Mixing Machine]"; + mes "You have inputed the number ^5555FF"+@INPUT+". Is this correct?"; + next; + menu "Yes.",-, "No.",L_Input; + + mes "[Mixing Machine]"; + mes "For the last item, choose a catalyst stone."; + next; + menu "Yellow Gemstone.",ssM_Yell, "Red Gemstone.",ssM_Red, "Blue Gemstone.",ssM_Blue, "1 Carat Diamond.",ssM_Diamd; + + ssM_Yell: + if(countitem(909)<@JELLOPY || countitem(914)<@FLUFF || countitem(519)<@MILK) goto sL_NotEnuf;//Items: Jellopy, Fluff, Milk, + if(@SOLVENT$!=("No") && countitem(@SOLVENT)<1) goto sL_NotEnuf; + mes "[Mixing Machine]"; + mes "All set. Initiating the mixing process. Please wait."; + next; + mes "[Mixing Machine]"; + mes "~rumble~rumble~rumble~"; + next; + mes "[Mixing Machine]"; + if(job_magician_q != 1 || @INPUT != 8472 || @JELLOPY!=2 || @FLUFF!=3 || @MILK!=1 || @SOLVENT!=1089) goto sL_FAIL; + delitem 909,2;//Items: Jellopy, + delitem 914,3;//Items: Fluff, + delitem 519,1;//Items: Milk, + delitem 1089,1;//Items: Payon_Solution, + delitem 1092,1;//Items: Empty_Test_Tube, + mes "Mixing complete."; + getitem 1071,1;//Items: Unknown_Test_Tube, + close; + + ssM_Red: + if(countitem(909)<@JELLOPY || countitem(914)<@FLUFF || countitem(519)<@MILK) goto sL_NotEnuf;//Items: Jellopy, Fluff, Milk, + mes "[Mixing Machine]"; + mes "All set. Initiating the mixing process. Please wait."; + next; + mes "[Mixing Machine]"; + mes "~rumble~rumble~rumble~"; + next; + mes "[Mixing Machine]"; + if(job_magician_q != 2 || @INPUT != 3735 || @JELLOPY!=3 || @FLUFF!=1 || @MILK!=1 || @SOLVENT!=0) goto sL_FAIL; + delitem 909,3;//Items: Jellopy, + delitem 914,1;//Items: Fluff, + delitem 519,1;//Items: Milk, + delitem 1092,1;//Items: Empty_Test_Tube, + mes "Mixing complete."; + getitem 1085,1;//Items: Unknown_Test_Tube, + close; + + ssM_Blue: + if(countitem(909)<@JELLOPY || countitem(914)<@FLUFF) goto sL_NotEnuf;//Items: Jellopy, Fluff, + if(@SOLVENT$!=("No") && countitem(@SOLVENT)<1) goto sL_NotEnuf; + mes "[Mixing Machine]"; + mes "All set. Initiating the mixing process. Please wait."; + next; + mes "[Mixing Machine]"; + mes "~rumble~rumble~rumble~"; + next; + mes "[Mixing Machine]"; + if(job_magician_q != 3 || @INPUT != 2750 || @JELLOPY!=6 || @FLUFF!=1 || @MILK!=0 || @SOLVENT!=1089) goto sL_FAIL; + delitem 909,6;//Items: Jellopy, + delitem 914,1;//Items: Fluff, + delitem 1089,1;//Items: Payon_Solution, + delitem 1092,1;//Items: Empty_Test_Tube, + mes "Mixing complete."; + getitem 1086,1;//Items: Unknown_Test_Tube, + close; + + ssM_Diamd: + if(countitem(909)<@JELLOPY || countitem(914)<@FLUFF) goto sL_NotEnuf;//Items: Jellopy, Fluff, + if(@SOLVENT$!=("No") && countitem(@SOLVENT)<1) goto sL_NotEnuf; + mes "[Mixing Machine]"; + mes "All set. Initiating the mixing process. Please wait."; + next; + mes "[Mixing Machine]"; + mes "~rumble~rumble~rumble~"; + next; + mes "[Mixing Machine]"; + if(job_magician_q != 4 || @INPUT != 5429 || @JELLOPY!=2 || @FLUFF!=3 || @MILK!=0 || @SOLVENT!=1088) goto sL_FAIL; + delitem 909,2;//Items: Jellopy, + delitem 914,3;//Items: Fluff, + delitem 1088,1;//Items: Morroc_Solution, + delitem 1092,1;//Items: Empty_Test_Tube, + mes "Mixing complete."; + getitem 1087,1;//Items: Unknown_Test_Tube, + close; + + sL_FAIL: + delitem 909, @JELLOPY;//Items: Jellopy, + delitem 914, @FLUFF;//Items: Fluff, + delitem 519, @MILK;//Items: Milk, + delitem @SOLVENT,1; + mes "Mixing complete."; + getitem 1090,1;//Items: Unknown_Test_Tube, + close; + + sL_NotEnuf: + mes "[Mixing Machine]"; + mes "You do not have enough ingredients to mix into a solution."; + close; + M_End: + close; + +} + + +// -- Morroc Solution -- +moc_ruins.gat,91,150,5 script Ponka-Hontas 93,{ + mes "[Mage Guildsman]"; + mes "You want the Solution? Then give me 50 Zeny and at least 1 Empty Testube."; + next; + menu "Allright, Deal",L0,"Nah, forget it.",L1; + + L0: + if(countitem(1092)<1) goto L0NoT;//Items: Empty_Test_Tube, + if(Zeny<50) goto L0NoZ; + mes "[Mage Guildsman]"; + mes "Ok, you have the money and a empty Testube, that's good!"; + delitem 1092,1;//Items: Empty_Test_Tube, + set Zeny,Zeny-50; + next; + mes "[Mage Guildsman]"; + getitem 1088,1;//Items: Morroc_Solution, + mes "Thank you, I think you will be a great mage, you are so generous."; + mes "I hope i'll see you soon again here"; + emotion 21; + close; + + L0NoT: + mes "[Mage Guildsman]"; + mes "You can't Carry on Fluid without a bottle, are you sure you want to become a mage?"; + mes "Bring an Empty Testube"; + close; + + L0NoZ: + mes "[Mage Guildsman]"; + mes "Pfff, You are too poor to buy our noble Solution!"; + mes "Bring 50 Zeny, go to the mercant sell something, it will not be too hard I hope"; + close; + L1: + mes "[Mage Guildsman]"; + close; +} + + +// -- Payon Solution -- +pay_arche.gat,122,100,5 script Dollshoi 88,{ + mes "[Mage Guildsman]"; + mes "You want the Solution? Then give me 50 Zeny and at least 1 Empty Testube."; + next; + menu "Allright, Deal",L0,"Nah, forget it.",L1; + + L0: + if(countitem(1092)<1) goto L0NoT;//Items: Empty_Test_Tube, + if(Zeny<50) goto L0NoZ; + mes "[Mage Guildsman]"; + mes "Ok, you have the money and a empty Testube, that's good!"; + delitem 1092,1;//Items: Empty_Test_Tube, + set Zeny,Zeny-50; + next; + mes "[Mage Guildsman]"; + getitem 1089,1;//Items: Payon_Solution, + mes "Thank you, I think you will be a great mage, you are so generous."; + mes "I hope i'll see you soon again here"; + emotion 21; + close; + + L0NoT: + mes "[Mage Guildsman]"; + mes "You can't Carry on Fluid without a bottle, are you sure you want to become a mage?"; + mes "Bring an Empty Testube"; + close; + + L0NoZ: + mes "[Mage Guildsman]"; + mes "Pfff, You are too poor to buy our noble Solution!"; + mes "Bring 50 Zeny, go to the mercant sell something, it will not be too hard I hope"; + close; + L1: + mes "[Mage Guildsman]"; + close; +} + diff --git a/npc/jobs/1-1/merchant.txt b/npc/jobs/1-1/merchant.txt new file mode 100644 index 000000000..0e596c367 --- /dev/null +++ b/npc/jobs/1-1/merchant.txt @@ -0,0 +1,973 @@ +//===== eAthena Script ======================================= +//= Merchant Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + +// == Guild NPCs == +// -- Mahnsoo -- +alberta_in.gat,53,43,6 script Chief Mahnsoo 86, +{ + mes "[Chief Mahnsoo]"; + if(Class==Job_Novice && job_merchant_q3 == 4) goto L_MakeMerc; + if(Class==Job_Novice && job_merchant_q3 == 3) goto L_GiveRecpt; + if(Class==Job_Novice && job_merchant_q3 == 5) goto L_Failed; + if(Class==Job_Novice && job_merchant_q2 > 0) goto L_Back; + + mes "What brings you here? Something on your mind?"; +M_Menu: + next; + menu "I want to be a Merchant.",M_0,"What exactly is a Merchant?",M_1,"Give me the Requirements.",M_2,"End.",M_End; + + M_0: + if(Class==5) goto L_JobMer; + if(Class !=0) goto L_JobOther; + if(JobLevel < 10) goto L_JobLvl; + + mes "[Chief Mahnsoo]"; + mes "A Merchant you say? Well..."; + next; + mes "[Chief Mahnsoo]"; + mes "Alright. First fill out an application form and submit 1000 Zeny for the Memebership Fee."; + mes "If you don't have enough money right now, you can pay 500 Zeny first and then pay the rest later after you've passed the Merchant License Test."; + next; + mes "[Chief Mahnsoo]"; + mes "How does that sound? Are you still interested?"; + next; + menu "Sure why not. Who needs college anyways.",sM_0a,"Maybe, later...",sM_0b; + + sM_0a: + mes "[Chief Mahnsoo]"; + mes "I'm glad to hear that. So how do you wish to pay the Membership Fee?"; + sM_Menu: + next; + menu "Pay 1000 Zeny Now.",m_0a,"2 payments of 500 Zeny.",m_0b,"Nevermind.",m_0End; + + m_0a: + mes "[Chief Mahnsoo]"; + if(Zeny < 1000) goto sl_Short1k; + set Zeny,Zeny-1000; + set job_merchant_q,1; + mes "Let's see... 1000 Zeny.... Good."; + goto L_Cont0; + + sl_Short1k: + mes "Looks like your a little short on zeny. Why not make a minimal payment of 500 Zeny first?"; + mes "You can worry about the rest later."; + emotion 4; + goto sM_Menu; + close; + + m_0b: + mes "[Chief Mahnsoo]"; + if(Zeny < 500) goto sl_Short500z; + set Zeny,Zeny-500; + set job_merchant_q,2; + mes "Let's See... 500 Zeny.... Good enough to start off... though I don't really think splitting paymenst is a good habbit for any Merchant."; + goto L_Cont0; + + sl_Short500z: + mes "Looks like your a little short on zeny. Come back when you have enough."; + emotion 4; + close; + + m_0End: + mes "[Chief Mahnsoo]"; + mes "You have no money now? Ok, No Problem. Take your time, Ok?"; + close; + + sM_0b: + mes "[Chief Mahnsoo]"; + mes "Feel free to return anytime when you are ready, Alright?."; + close; + + + L_Cont0: + next; + mes "[Chief Mahnsoo]"; + mes "Now that that's settled, let me talk to you about the Merchant License Test. You will be given a task to fullfill."; + mes "How well you perform the task will determine whether or not you will become a merchant."; + next; + mes "[Cheif Mahnsoo]"; + mes "Oh, but before we get started I must say one thing....."; + next; + mes "[Cheif Mahnsoo]"; + mes "There are some dumb and greedy people out there who do not know what it means to be a Merchant."; + mes "I sincerely hope you will not turn out to be like them. You won't... will you??..... (stares at you intently)"; + next; + mes "[Cheif Mahnsoo]"; + mes "Anywho, here is your task. You will need to...."; + next; + mes "[Chief Mahnsoo]"; + + set @TEMP,rand(4); + if(@TEMP ==1) goto R_1; + if(@TEMP ==2) goto R_2; + if(@TEMP ==3) goto R_3; + + R_0: + mes "retrieve a ^ff0000product^000000 from the ^0000ffWharehouse^000000 and deliver it to the ^00aa00Kafra Worker in the Former Swordman Association in Prontera^000000."; + if(job_merchant_q2 == 1) goto sR_0a; + if(job_merchant_q2 == 2) goto sR_0b; + set @TEMP,rand(2); + if(@TEMP !=0) goto sR_0b; + + sR_0a: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00002485741^000000."; + set job_merchant_q2, 1; + next; + goto L_Cont1; + sR_0b: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00002328137^000000."; + set job_merchant_q2, 2; + next; + goto L_Cont1; + + R_1: + mes "retrieve a ^ff0000product^000000 from the ^0000ffWharehouse^000000 and deliver it to a member of the ^00aa00Mage Guild in Geffen^000000."; + next; + mes "[Chief Mahnsoo]"; + if(job_merchant_q2 == 3) goto sR_1a; + if(job_merchant_q2 == 4) goto sR_1b; + set @TEMP,rand(2); + if(@TEMP !=0) goto sR_1b; + + sR_1a: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00002989396^000000."; + set job_merchant_q2, 3; + next; + goto L_Cont1; + sR_1b: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00002191737^000000."; + set job_merchant_q2, 4; + next; + goto L_Cont1; + + R_2: + mes "retrieve a ^ff0000product^000000 from the ^0000ffWharehouse^000000 and deliver it to ^00aa00Java Dullihan, the Dyermaker in Morroc^000000."; + next; + mes "[Chief Mahnsoo]"; + if(job_merchant_q2 == 5) goto sR_2a; + if(job_merchant_q2 == 6) goto sR_2b; + set @TEMP,rand(2); + if(@TEMP !=0) goto sR_2b; + + sR_2a: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00003012685^000000."; + set job_merchant_q2,5; + next; + goto L_Cont1; + sR_2b: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00003487372^000000."; + set job_merchant_q2,6; + next; + goto L_Cont1; + + R_3: + mes "retrieve a ^ff0000product^000000 from the ^0000ffWharehouse^000000 and deliver it to the ^00aa00Kafra worker in Byalan island^000000."; + next; + mes "[Chief Mahnsoo]"; + if(job_merchant_q2 == 7) goto sR_3a; + if(job_merchant_q2 == 8) goto sR_3b; + set @TEMP,rand(2); + if(@TEMP !=0) goto sR_3b; + + sR_3a: + + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00003318702^000000."; + set job_merchant_q2,7; + goto M00R3; + sR_3b: + mes "The ^0000ff'Serial Number'^000000 of the product is ^ff00003543625^000000."; + set job_merchant_q2,8; + goto M00R3; + + M00R3: + next; + mes "[Chief Mahnsoo]"; + mes "Umm and... this is my personal request. Include this message in your delivery please~"; + if(countitem(1072)==0) getitem 1072,1;//Items: Delivery_Message, + next; + goto L_Cont1; + + + L_Cont1: + mes "[Chief Mahnsoo]"; + mes "Keep track of the ^ff0000'Serial Number'^000000 and the ^ff0000'Destination'^000000 of the product."; + mes "The Wharehouse Manager will need them to assist you in getting the right product."; + next; + mes "[Chief Mahnsoo]"; + mes "The Wharehouse itself is located to my right."; + next; + mes "[Chief Mahnsoo]"; + mes "After you've finished making the delivery come back here and give the Receipt to the Wharehouse Manager. Then come see me. Is that clear?"; + next; + mes "[Chief Mahnsoo]"; + mes "Alright, good luck!"; + close; + + L_JobMer: + mes "[Chief Mahnsoo]"; + mes "Huh? What did you say? You noodle head! Take a good look at yourself. Your ALREADY A MERCHANT! Good lord!"; + emotion 1; + emotion 0; + close; + + L_JobOther: + mes "[Chief Mahnsoo]"; + mes "We Merchants really don't like people who work during the day, and then go out to crazy bars at night. When it comes to money, for them it's 'easy come easy go."; + next; + mes "[Chief Mahnsoo]"; + mes "Well.. I talked a little too long, I guess... but since you already have an occupation, we don't need you."; + close; + L_JobLvl: + mes "[Chief Mahnsoo]"; + mes "I'm sorry but you have to have a Novice Job level of 9 with all 9 of the basic Skills."; + close; + + M_1: + mes "[Chief Mahnsoo]"; + mes "Merchants are people who are in the business of buying and selling goods. We focus on finding rare items and selling them to those who desire or need them."; + mes "We are not particularly good at fighting nor do we have any usefull support skills. What we Merchants can do is buy Goods at lower prices as well as sell them at Highter prices."; + next; + mes "[Chief Mahnsoo]"; + mes "As far as what weapons go, we can use most of them. Bows, Rods, and Two-Handed Swords are the only types of weapons we can't use."; + mes "The skill Mannomite even lets us use zeny as a weapon."; + next; + mes "[Chief Mahnsoo]"; + mes "Whatever people may say about us, making money is important to a merchants lively hood."; + goto M_Menu; + close; + + M_2: + mes "[Chief Mahnsoo]"; + mes "There are three conditions to be qualified if you want to be a Merchant."; + next; + mes "[Chief Mahnsoo]"; + mes "First of all, You have to be at Novice job level 9 with fulfilled Basic Skills."; + next; + mes "[Chief Mahnsoo]"; + mes "Secondly, You have to pay 1000 Zeny for acquire a Memebrship. I believe a Merchant Candidate will be able to earn 1000 Zeny at ease. Oh yeah~"; + next; + mes "[Chief Mahnsoo]"; + mes "Third, There is a License Test to examine your basic Physical Strength and a Sense of Direction. You must Deliever the Goods to the Specific person in the Specific Town."; + goto M_Menu; + close; + + M_End: + close; + +L_GiveRecpt: + mes "Ah, " + strcharinfo(0) + ". You're back! I take it things went well? Tell you what, go give the Receipt to the Storekeeper and then hurry back here ok."; + close; + +L_Back: + mes "What are you doing back here?"; + emotion 1; + next; + mes "[Chief Mahnsoo]"; + mes "You didn't leave yet?"; + next; + mes "[Chief Mahnsoo]"; + mes "You are supposed to be on your way by now. Don't tell me you already forgot the product number and destination?"; + next; + mes "[Chief Mahnsoo]"; + mes "Alright numskull, do you want me to repeat it to you one more time?"; + next; + menu "Yes please", M_Yes,"Never mind.",M_No; + + M_Yes: + mes "[Chief Mahnsoo]"; + if((job_merchant_q2==1) || (job_merchant_q2==2)) goto R_0; + if((job_merchant_q2==3) || (job_merchant_q2==4)) goto R_1; + if((job_merchant_q2==5) || (job_merchant_q2==6)) goto R_2; + if((job_merchant_q2==7) || (job_merchant_q2==8)) goto R_3; + close; + + M_No: + close; + +L_MakeMerc: + if(Sex == 1) mes "Mr. ^0000cc" + strcharinfo(0) + "^000000....."; + if(Sex == 0) mes "Ms. ^0000cc" + strcharinfo(0) + "^000000......."; + next; + mes "[Chief Mahnsoo]"; + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Merchant."; + if(SkillPoint > 0) close; + + mes "WELL DONE! Well done indeed!! I just read Wharehouse Manager Kays' evaluation of your performance, and I was very impressed. I have great news for you!"; + next; + if(job_merchant_q == 2) goto L_MemFee; + + mes "[Chief Mahnsoo]"; + mes "Because of your HARD work, The Merchant Guild as decided to ACCEPT YOU as one of its members!"; + next; + JobChange 5;// Job: Job_Merchant + set job_merchant_q,0; + set job_merchant_q2,0; + set job_merchant_q3,0; + + mes "[Chief Mahnsoo]"; + mes "Congratulations! You are now one of us, A PROUD MERCHANT!!"; + emotion 21; + next; + mes "[Chief Mahnsoo]"; + mes "I am very pleased that you decided to join the Merchant Guild and I hope you will play an active role in Rune Midgards' economy! The best of luck to you!!"; + if((job_merchant_q2==7) || (job_merchant_q2==8)) goto L_Favor; + close; + + L_Favor: + next; + mes "[Chief Mahnsoo]"; + mes "(Oh, here is a little something for Delivering the Message for me. Thanks very much)"; + set Zeny,Zeny+100; + close; + + L_MemFee: + mes "[Chief Mahnsoo]"; + mes "Um... before I go on... there was the little issue of the Membership Fee if you recall. I will need the rest of it before I can proceed with your initiation."; + emotion 20; + next; + menu "Pay the remaining 500 Zeny",sM_1a,"...(run away!)...",sM_1b; + + sM_1a: + if(Zeny < 500) goto sL_NotEnough; + set Zeny,Zeny-500; + set job_merchant_q,1; + + mes "[Chief Mahnsoo]"; + mes "Very good! Now I can go on. Now where was I?..... oh yes, I remember....."; + goto L_MakeMerc; + + sL_NotEnough: + mes "[Chief Mahnsoo]"; + mes "Eh em.... you seem to be a little short. Now that you've come this far, don't let a little fee impede your progress. Go forth and do something about it!"; + emotion 4; + close; + + sM_1b: + mes "[Chief Mahnsoo]"; + mes "WHAT THE??? Hey come back here! YOU STILL HAVE TO PAY THE FEE!!!!!"; + emotion 19; + close; + +L_Failed: + set job_merchant_q2,0; + set job_merchant_q3,0; + + mes "I just finished reading Wharehouse Manager Kays' evalutation of your work......"; + next; + mes "[Chief Mahnsoo]"; + mes "What a shame, what a shame! HOW could you be so CARLESS??!! I'm sure Wharehouse Manager Kay has already given you an earfull so I will not go on with anymore critizism."; + emotion 32; + next; + mes "[Chief Mahnsoo]"; + mes "^ff0000"+strcharinfo(0) + "^000000, you have failed in the Merchant License Test! However...... if you are TRUELY interested in becoming a Merchant, and will work EXTREMELY HARD to do so...."; + next; + mes "[Chief Mahnsoo]"; + mes "... I will allow you to retake the test. What do you say?"; + next; + menu "Thank you very much for this opportunity!",M_Thanks,"Maybe some other time",M_NoThanks; + + M_Thanks: + set job_merchant_q2,0; + set job_merchant_q3,0; + goto L_Cont0; + + M_NoThanks: + mes "[Chief Mahnsoo]"; + mes "Remeber these words: In life, failure is NOT an option!!!"; + emotion 0; + set job_merchant_q,0; + set job_merchant_q2,0; + set job_merchant_q3,0; + close; + +} + + +// -- Wharehouse Manager Kay -- +alberta_in.gat,28,29,2 script Merchant Guildsman 83, +{ + if(Class==Job_Novice && job_merchant_q3 > 0) goto L_Check; + + mes "[Wharehouse Manager Kay]"; + mes "Hey~ What brings you here?"; + next; + menu "I came here for the Merchant Test.",M_0,"I came here for a Part Time job.",M_1,"Nope,Nothing.",M_End; + + M_0: + mes "[Wharehouse Manager Kay]"; + if(Class!=0) goto L_NotNov; + if(job_merchant_q==0) goto L_NotRdy; + mes "You're ^0000cc"+ strcharinfo(0) +"^000000, right? Ok I'll give you a product to deliver. First I'll need the destination"; + next; + menu "Prontera.",sM_0,"Geffen.",sM_1,"Morroc.",sM_2,"Byalan Island(Izlude).",sM_3; + + sM_0: + set @s_flag,1; + goto L_Cont0; + sM_1: + set @s_flag,2; + goto L_Cont0; + sM_2: + set @s_flag,3; + goto L_Cont0; + sM_3: + set @s_flag,4; + + L_Cont0: + mes "[Wharehouse Manager Kay]"; + mes "Now, I'll need the Serial Number of the product. Just type it in the box. If you want to Cancel, just type '0' in the box, alright?"; + next; + input @input; + if(@input ==0 ) goto sL_Cancel; + if((@input < 1000000) || (@input > 5000000)) goto sL_Error; + + mes "[Wharehouse Manager Kay]"; + if(@s_flag==1) mes "Destination is Prontera. The Serial Number is "+@input+" . ^ff0000Is this correct^000000?"; + if(@s_flag==2) mes "Destination is Geffen. Phew~ Really far from here~ A little unlucky there huh? The Serial Number is "+@input+" . ^ff0000Is this correct^000000?"; + if(@s_flag==3) mes "Destination is Morroc. Phew~ Really far from here~ A little unlucky there huh? The Serial Number is "+@input+" . ^ff0000Is this correct^000000?"; + if(@s_flag==4) mes "Destination is Byalan. The Serial Number is "+@input+" . ^ff0000Is this correct^000000?"; + next; + menu "Positive.",sM_Pos,"Negative.",sM_Neg; + + sM_Pos: + if(@s_flag==1 && @input==2485741 && job_merchant_q2 == 1) goto ssL_Prod1; + if(@s_flag==2 && @input==2989396 && job_merchant_q2 == 3) goto ssL_Prod1; + if(@s_flag==3 && @input==3012685 && job_merchant_q2 == 5) goto ssL_Prod1; + if(@s_flag==4 && @input==3318702 && job_merchant_q2 == 7) goto ssL_Prod1; + if(@s_flag==1 && @input==2328137 && job_merchant_q2 == 2) goto ssL_Prod2; + if(@s_flag==2 && @input==2191737 && job_merchant_q2 == 4) goto ssL_Prod2; + if(@s_flag==3 && @input==3487372 && job_merchant_q2 == 6) goto ssL_Prod2; + if(@s_flag==4 && @input==3543625 && job_merchant_q2 == 8) goto ssL_Prod2; + getitem 1083,1;//Items: Delivery_Box__, + goto L_Cont1; + + ssL_Prod1: + getitem 1081,1;//Items: Delivery_Box, + goto L_Cont1; + + ssL_Prod2: + getitem 1082,1;//Items: Delivery_Box_, + goto L_Cont1; + + sM_Neg: + close; + + sL_Cancel: + mes "[Wharehouse Manager Kay]"; + mes "Are you sure that you wanna cancel?"; + next; + menu "Oh yes.",m_yes,"No way.",m_no; + + m_yes: + mes "[Wharehouse Manager Kay]"; + mes "Do as you wish~I cancel~"; + close; + m_no: + next; + goto L_Cont0; + + sL_Error: + mes "[Wharehouse Manager Kay]"; + mes "Hey~ Hey~ That number is out of the valid Serial number range. A valid Serial number should be betwwen 1000000 and 5000000."; + next; + goto L_Cont0; + + + L_Cont1: + mes "[Wharehouse Manager Kay]"; + mes "Be very carefull with this product and make sure you do not loose it. It cannot be replaced. If you do loose it you will not be able to become a Merchant."; + next; + mes "[Wharehouse Manager Kay]"; + mes "After you've made the delivery be sure to get a Receipt. Good luck!"; + set job_merchant_q3, 1; + close; + + L_NotRdy: + mes "Speak with the chief about that"; + close; + + L_NotNov: + mes "I'm sorry but only novices are allowed to take the Merchant License Test."; + close; + + M_1: + mes "[Wharehouse Manager Kay]"; + mes "Part Time job? Nothing is available right now. We're currently in a budget crisis and can't afford to hire any new employees."; + close; + M_End: + mes "[Wharehouse Manager Kay]"; + mes "...? Huh..? Huh..? What..?"; + close; + +L_Check: + if( job_merchant_q3 == 4) goto L_Done; + mes "[Wharehouse Manager Kay]"; + if(job_merchant_q3 == 1) goto L_Back; + if(job_merchant_q3 == 5) goto L_Failed; + if((job_merchant_q3 == 2) && (countitem(1083) ==1)) goto L_WrongProd;//Items: Delivery_Box__, + + mes "I see your back ^0000cc"+ strcharinfo(0) +"^000000. I hope things went well. Lets see.... you were supposed to deliver a product to a...."; + next; + mes "[Wharehouse Manager Kay]"; + if((countitem(1073) == 1) || (countitem(1074) == 1)) goto L_0;//Items: Voucher, Voucher_, + if((countitem(1075) == 1) || (countitem(1076) == 1)) goto L_1;//Items: Voucher__, Voucher___, + if((countitem(1077) == 1) || (countitem(1078) == 1)) goto L_2;//Items: Voucher____, Voucher_____, + if((countitem(1079) == 1) || (countitem(1080) == 1)) goto L_3;//Items: Voucher______, Voucher_______, + goto L_LostRecpt; + + L_0: + mes "...Kafra employee in Prontera. And indeed the receipt veryifies that the delivery was successfully made."; + if(countitem(1073) == 1) delitem 1073,1;//Items: Voucher, + if(countitem(1074) == 1) delitem 1074,1;//Items: Voucher_, + next; + goto L_Done; + + L_1: + mes "...member of the Geffen Magic Academy. And indeed the receipt veryifies that the delivery was successfully made"; + if(countitem(1075) == 1) delitem 1075,1;//Items: Voucher__, + if(countitem(1076) == 1) delitem 1076,1;//Items: Voucher___, + next; + goto L_Done; + + L_2: + mes "...Dyermaker in Morroc. And indeed the receipt veryifies that the delivery was successfully made."; + if(countitem(1077) == 1) delitem 1077,1;//Items: Voucher____, + if(countitem(1078) == 1) delitem 1078,1;//Items: Voucher_____, + next; + goto L_Done; + + L_3: + mes "...Kafra employee in Byalan. And indeed the receipt veryifies that the delivery was successfully made."; + if(countitem(1079) == 1) delitem 1079,1;//Items: Voucher______, + if(countitem(1080) == 1) delitem 1080,1;//Items: Voucher_______, + next; + + L_Done: + mes "[Wharehouse Manager Kay]"; + mes "Great! Everything went perfectly! I will send my evaluation of your performance to 'Chief Mahnsoo' imiediately."; + mes "Go ahead and speak with Chief Mahnsoo so that he can finalize the process to make you a Merchant."; + emotion 21; + set job_merchant_q3,4; + close; + L_LostRecpt: + mes "Lets see here...... you say you delivered the correct Product to the correct person...... but you have no reciept....."; + next; + mes "[Wharehouse Manager Kay]"; + mes "YOU HAVE NO RECIEPT?????"; + emotion 23; + next; + mes "[Wharehouse Manager Kay]"; + mes "HOW the HECK am I gonna know that you delievered it then? This was an ABSOLUTE FAILURE!!"; + mes "Your evaluation is not going to look good. I suggest you find some good excuses by the time you speak with Chief Mahnsoo."; + emotion 32; + set job_merchant_q3,5; + close; + L_WrongProd: + mes "You delivered the WRONG PRODUCT??? DO YOU know how much TIME you've WASTED???? UCK! This was a total failure!"; + emotion 6; + next; + mes "[Wharehouse Manager Kay]"; + mes "Your evaluation is not going to look good. I suggest you find some good excuses when you go to speak with Chief Mahnsoo."; + delitem 1083, 1;//Items: Delivery_Box__, + set job_merchant_q3,5; + close; + L_Failed: + mes "Go speak to the Chief about your failure........"; + close; + +L_Back: + if((countitem(1081) != 1) && (countitem(1082) != 1) && (countitem(1083) != 1)) goto L_LostProd;//Items: Delivery_Box, Delivery_Box_, Delivery_Box__, + mes "Huh? Back so soon? Don't tell me you ran into problems already...."; + emotion 20; + next; + menu "Please Exchange the Product.",M_Exch,"Nope, never mind.",M_Nvmnd; + + M_Exch: + mes "[Wharehouse Manager Kay]"; + mes "Sigh... this is not a good way to start your test you know. Make sure you get the RIGHT Product this time! "; + emotion 32; + if(countitem(1081) ==1) delitem 1081,1;//Items: Delivery_Box, + if(countitem(1082) ==1) delitem 1082,1;//Items: Delivery_Box_, + if(countitem(1083) ==1) delitem 1083,1;//Items: Delivery_Box__, + set job_merchant_q3,0; + next; + goto M_0; + + M_Nvmnd: + close; + + L_LostProd: + mes "Huh? Oh~ How was the Trip?"; + next; + mes "[Wharehouse Manager Kay]"; + mes "WHAT???"; + emotion 1; + next; + mes "[Wharehouse Manager Kay]"; + mes "Holy crap!! YOU LOST the product??!! What have you done, you moron!!!"; + emotion 23; + next; + mes "[Wharehouse Manager Kay]"; + mes "Your evaluation is not going to look good. I suggest you find some good excuses when you go to speak with Chief Mahnsoo."; + emotion 7; + set job_merchant_q3,5; + close; + +} + + + +// == Customers == +// -- Kafra(Byalan) -- +function script F_MercKafra { + + if (job_merchant_q3 == 3) goto L_3; + + mes "[Kafra]"; + if(job_merchant_q3 ==2) goto L_WrongProd; + mes "A delivery from the Merchant Guild?? Oh, Right! Yes! I almost forgot."; + next; + mes "[Kafra]"; + mes "Let's see, the serial number for the product should be......."; + next; + mes "[Kafra]"; + if((countitem(1081) ==0) && (countitem(1082) ==0) && (countitem(1083) ==0)) goto L_NoProd;//Items: Delivery_Box, Delivery_Box_, Delivery_Box__, + if((job_merchant_q2 !=7) && (job_merchant_q2 !=8)) goto L_WrongDest; + if(countitem(1083) == 1) goto L_WrongProd;//Items: Delivery_Box__, + + mes "Oh, here it is. Yes! This is the one we ordered. Thank you very much. Here is your receipt."; + next; + + set job_merchant_q3, 3; + if(countitem(1081) == 1) goto L_0;//Items: Delivery_Box, + if(countitem(1082) == 1) goto L_1;//Items: Delivery_Box_, + + L_0: + getitem 1079,1;//Items: Voucher______, + delitem 1081,1;//Items: Delivery_Box, + goto L_3; + + L_1: + getitem 1080,1;//Items: Voucher_______, + delitem 1082,1;//Items: Delivery_Box_, + goto L_3; + + L_3: + if(countitem(1072) == 1) goto L_Msg;//Items: Delivery_Message, + mes "[Kafra]"; + mes "Thanks so much for comming all this way to deliver the product to me. Take care now. By bye."; + emotion 15; + cutin "kafra_03",255; + close; + + L_Msg: + mes "[Kafra]"; + mes "Oh,My good Lord! Mr. Mansoo wrote me a Letter? Thank you, Thank you~"; + mes "I though he would send one, one of these days, but I've never expected it would be at a time like this....."; + emotion 1; + next; + mes "[Kafra]"; + mes "I really appreciate what you've done for me. Here is a small gift to show you my thanks."; + emotion 15; + delitem 1072,1;//Items: Delivery_Message, + set @TEMP,rand(2); + if(@TEMP !=0) goto R1; + + R0: + + getitem 513,3;//Items: Banana, + cutin "kafra_03",255; + close; + R1: + getitem 512,3;//Items: Apple, + cutin "kafra_03",255; + close; + +L_NoProd: + mes ".... I thought we what we ordered was OVERSIZED and HEAVY.... but.... you seem to carry it on without any difficulty........."; + emotion 1; + cutin "kafra_03",255; + close; + +L_WrongProd: + mes "......? Excuse me! I think you gave me the wrong item. Our order should have the serial number 3318702 or 3543625..."; + emotion 4; + set job_merchant_q3,2; + cutin "kafra_03",255; + close; + +L_WrongDest: + mes "......? Excuse me.... I think you have the wrong person.... our order should have the serial number 3318702 or 3543625..."; + emotion 4; + cutin "kafra_03",255; + close; +} + +// -- Kafra(Prontera) -- +prontera.gat,248,42,8 script Kafra 115, +{ + cutin "kafra_03",2; + if(Class==Job_Novice && job_merchant_q3>0) goto L_Start; +L_Other: + mes "[Kafra]"; + mes "Hello. I am a Kafra Service Agent. As you can see, the ^3355FFSwordsman Association^000000 has moved to Izlude."; + mes "I can warp you there for a small fee of 900 zeny however."; + next; + menu "Warp.",M_Warp, "Cancel.",M_End; + + M_Warp: + if(Zeny < 900) goto sL_NdZeny; + set Zeny, Zeny - 900; + set RESRVPTS, RESRVPTS + 54; + warp "izlude.gat",91,105; + cutin "kafra_03",255; + end; + + sL_NdZeny: + mes "[Kafra]"; + mes "I'm sorry but you do not have enough zeny."; + cutin "kafra_03",255; + close; + + M_Pass: + if(countitem(1084)<1) goto sL_NdPass;//Items: Kafra_Pass, + mes "[Kafra]"; + mes "You are now using a Kafra Pass."; + delitem 1084,1;//Items: Kafra_Pass, + cutin "kafra_03",255; + close; + + sL_NdPass: + mes "[Kafra]"; + mes "I'm sorry but you have no pass...."; + cutin "kafra_03",255; + close; + M_End: + mes "[Kafra]"; + mes "Thank you for using Kafra Corp. Services. We will be with you wherever you go."; + emotion 15; + cutin "kafra_03",255; + close; + + +L_Start: + if(job_merchant_q3 ==3) goto L_3; + mes "[Kafra]"; + if(job_merchant_q3 ==2) goto L_WrongProd; + + mes "Oh, you're from the Merchant Guild and you have a delivery for me?"; + mes "I really appreciate you comming all this way.........."; + next; + mes "[Kafra]"; + + if((countitem(1081) ==0) && (countitem(1082) ==0) && (countitem(1083) ==0)) goto L_NoProd;//Items: Delivery_Box, Delivery_Box_, Delivery_Box__, + if((job_merchant_q2 !=1) && (job_merchant_q2 !=2)) goto L_WrongDest; + if(countitem(1083) == 1) goto L_WrongProd;//Items: Delivery_Box__, + + mes "Yes! This is the Product we ordered. Thank you. Here, let me give you a Receipt."; + next; + + set job_merchant_q3,3; + if(countitem(1081) == 1) goto L_0;//Items: Delivery_Box, + if(countitem(1082) == 1) goto L_1;//Items: Delivery_Box_, + + L_0: + getitem 1073,1;//Items: Voucher, + delitem 1081,1;//Items: Delivery_Box, + goto L_3; + + L_1: + getitem 1074,1;//Items: Voucher_, + delitem 1082,1;//Items: Delivery_Box_, + goto L_3; + + L_3: + mes "[Kafra]"; + mes "Thank you again for the delivery."; + emotion 15; + cutin "kafra_03",255; + close; + +L_NoProd: + mes "Umm......... excuse me... but where is the Product your supposed to give me....?"; + emotion 20; + cutin "kafra_03",255; + close; + +L_WrongProd: + mes "Oh, Dear... this isn't what I ordered. It should have a serial number of either ^ff00002485741 or 2328137^000000."; + mes "It looks like there was a mix up at the wharehouse and you got the wrong product. I'd appreciate it if you could sort this out."; + emotion 4; + set job_merchant_q3,2; + cutin "kafra_03",255; + close; + +L_WrongDest: + mes "Oh, Dear... this isn't what I ordered. You see here, it's addressed to someone else. It looks like this Product is supposed to go to someone else."; + emotion 4; + cutin "kafra_03",255; + close; +} + + +// == Other Npcs == +// -- Guild Staff -- +geffen_in.gat,155,122,4 script Guild Staff 47, +{ + + if(Class==Job_Novice && job_merchant_q3>0) goto L_Start; +L_Other: + mes "[Guild Staff]"; + mes "It should be arriving any time now...... it seems to be late.... Hmm..."; + close; + +L_Start: + if(job_merchant_q3 ==3) goto L_3; + mes "[Guild Staff]"; + if(job_merchant_q3 ==2) goto L_WrongProd; + + mes "Oh hi there. You're from the Merchant Guild you say? That means........."; + next; + mes "[Guild Staff]"; + mes "WOW! IT'S HERE! It's here!! They FINALLY sent the Box!...... "; + next; + mes "[Guild Staff]"; + mes "Oh excuse me, I'm so sorry. You must be very tired from having to travel in such hot weather. My thanks for your effort."; + next; + mes "[Guild Staff]"; + mes "Alright, let me just ckeck the Serial Number to make sure........."; + next; + mes "[Guild Staff]"; + if((countitem(1081) !=1) && (countitem(1082) !=1) && (countitem(1083) !=1)) goto L_NoProd;//Items: Delivery_Box, Delivery_Box_, Delivery_Box__, + if((job_merchant_q2 !=3) && (job_merchant_q2 !=4)) goto L_WrongDest; + if(countitem(1083) == 1) goto L_WrongProd;//Items: Delivery_Box__, + + mes "YES! This is it! Here, let me give you a Receipt."; + next; + set job_merchant_q3,3; + if(countitem(1081) == 1) goto L_0;//Items: Delivery_Box, + if(countitem(1082) == 1) goto L_1;//Items: Delivery_Box_, + + L_0: + getitem 1075,1;//Items: Voucher__, + delitem 1081,1;//Items: Delivery_Box, + goto L_3; + + L_1: + getitem 1076,1;//Items: Voucher___, + delitem 1082,1;//Items: Delivery_Box_, + goto L_3; + + L_3: + mes "[Guild Staff]"; + mes "Heheh~ Thank you, Bye Bye."; + emotion 15; + close; +L_NoProd: + mes "Huh? Where? Where is the Box?"; + emotion 1; + close; + +L_WrongDest: + mes "Hey wait a Minute! This is not what we ordered! The Serial Number should either be 2989396 or 2191737."; + mes "It looks like this is addressed to someone else. I think you got the wrong delivery destination."; + emotion 19; + close; + +L_WrongProd: + mes "Hey wait a Minute! This is not what we ordered! The Serial Number should either be 2989396 or 2191737."; + mes "I don't know how you could make this mistake but please correct it. I really need that Product."; + emotion 19; + set job_merchant_q3,2; + close; +} + + +// -- Dyer's Student -- +morocc_in.gat,140,102,4 script Dyer's Student 86, +{ + if(Class==Job_Novice && job_merchant_q3>0) goto L_Start; + +L_Other: + mes "[Dyer's Student]"; + mes "Mr. JavaDullihan is one and Only the Best in Midgard continent."; + mes "Aaaand I am his Student!! How proude of I am!!!!"; + next; + mes "[Dyer's Student]"; + mes ".....That's what I am saying.."; + close; + +L_Start: + if(job_merchant_q3 ==3) goto L_3; + mes "[Dyer's Student]"; + if(job_merchant_q3 ==2) goto L_WrongProd; + + mes "You're from the Merchant Guild...? Ah, Yes! I've been expecting you."; + next; + mes "[Dyer's Student]"; + mes "Let me check the Serial Number of the Product just to make sure......."; + next; + mes "[Dyer's Student]"; + if((countitem(1081) !=1) && (countitem(1082) !=1) && (countitem(1083) !=1)) goto L_NoProd;//Items: Delivery_Box, Delivery_Box_, Delivery_Box__, + if((job_merchant_q2 !=5) && (job_merchant_q2 !=6)) goto L_WrongDest; + if(countitem(1083) == 1) goto L_WrongProd;//Items: Delivery_Box__, + + mes "Great! This is what we ordered. Here, let me give you a Receipt."; + set job_merchant_q3,3; + if(countitem(1081) == 1) goto L_0;//Items: Delivery_Box, + if(countitem(1082) == 1) goto L_1;//Items: Delivery_Box_, + + L_0: + getitem 1077,1;//Items: Voucher____, + delitem 1081,1;//Items: Delivery_Box, + goto L_3; + + L_1: + getitem 1078,1;//Items: Voucher_____, + delitem 1082,1;//Items: Delivery_Box_, + goto L_3; + + L_3: + mes "[Dyer's Student]"; + mes "Thank you, See you next time~"; + emotion 15; + close; + +L_NoProd: + mes "But where's the Product?"; + emotion 20; + close; + +L_WrongProd: + mes "Um..... excuse me? I don't think this is what we ordered? The Serial Number should be either 3012685 or 3487372."; + emotion 20; + next; + mes "[Dyer's Student]"; + mes "I see. There was a mix up at the wharehouse and you got the wrong product."; + next; + mes "[Dyer's Student]"; + mes "Well this sucks. Please come back with the correct Product."; + emotion 32; + set job_merchant_q3,2; + close; + +L_WrongDest: + mes "Um.... excuse me? I don't think this is what we ordered? The Serial Number should be either 3012685 or 3487372."; + mes "I think you have the wrong delivery destination. Maybe you should try someone else."; + emotion 20; + close; + + +} diff --git a/npc/jobs/1-1/swordsman.txt b/npc/jobs/1-1/swordsman.txt new file mode 100644 index 000000000..35b68285c --- /dev/null +++ b/npc/jobs/1-1/swordsman.txt @@ -0,0 +1,795 @@ +//===== eAthena Script ======================================= +//= Swordsman Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working. I have created a custom warp to get into the test room so disable +//= the one in your warp script or scripts. It is this warp: "izlude_in.gat",40,170. +//============================================================ + + +// == Monsters == +//Spawn is included in this file so make shure its not elsewhere to! +sword_1-1.gat,35,78,0,0 monster Fabre 1184,4,0,0,0 +sword_1-1.gat,50,108,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,61,28,0,0 monster Fabre 1184,4,0,0,0 +sword_1-1.gat,61,92,0,0 monster Fabre 1184,2,0,0,0 +// +sword_1-1.gat,110,112,0,0 monster Fabre 1184,3,0,0,0 +sword_1-1.gat,161,94,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,130,76,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,103,58,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,130,24,0,0 monster Fabre 1184,3,0,0,0 +// +sword_1-1.gat,201,36,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,201,16,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,239,44,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,239,76,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,231,101,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,234,117,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,198,91,0,0 monster Fabre 1184,2,0,0,0 +sword_1-1.gat,200,63,0,0 monster Fabre 1184,2,0,0,0 + + +// == Warp == +// -- Warp to test room -- +izlude_in.gat,62,170,0 script w1039 45,1,1, +{ + if(Class==Job_Novice && job_sword_q > 0) warp "izlude_in.gat",40,170; + if(job_sword_q == 0) doevent "Swordsman::OnStart"; + end; +} + + +// == Npcs == +// -- Master Swordsman -- +izlude_in.gat,74,172,5 script Master Swordsman 119, +{ + mes "[Master Swordsman]"; + if(Class==Job_Novice && job_sword_q == 2) goto L_Done; + mes "Welcome to the Swordsman Association! So.. What business brings you to us?"; +L_Menu: + next; + menu "Make me a Swordsman!",M_0,"About being a Swordsman.",M_1,"The job requirements.",M_2,"Cancel.",M_End; + close; + + M_0: + mes "[Master Swordsman]"; + if(Class == Job_Swordman) goto O_1b; + if(Class != Job_Novice) goto O_1c; + mes "So you wish to become a Swordsman aye? A very good choice!! Fill out this application form first."; + next; + mes "..(you fill out the form and hand it to him).."; + next; + mes "[Master Swordsman]"; + if(JobLevel < 10) goto O_1d; + + O_1a: + set job_sword_q,1; + savepoint "izlude_in.gat",65,165; + mes "Okay. Let me just review your information......"; + next; + mes "[Master Swordsman]"; + mes "Ah!! I see that you have met the necessary requirements....."; + next; + mes "[Master Swordsman]"; + mes "But there is one last thing you need to do to before I can make you an offical Swordsman."; + mes "You must prove your valour by taking the Izlude Swordsman Test!!!"; + next; + mes "[Master Swordsman]"; + mes "Are you willing to do so?"; + next; + menu "Yes.",sM_0,"No.",sM_1; + + sM_0: + mes "[Master Swordsman]"; + mes "Very good!!! The testing room is too my right."; + next; + mes "[Master Swordsman]"; + mes "Good luck young warrior!!!"; + close; + + sM_1: + mes "[Master Swordsman]"; + mes "Very well then. Your registration is complete. When you are ready to take the test, just enter the testing room to my right."; + close; + + O_1b: + mes "Muhahaha! You must be kidding me! You're already a swordsman."; + emotion 18; + close; + + O_1c: + mes "Im sorry but you can not hold more than one job at a time and therefore I must refuse your request."; + next; + mes "[Master Swordsman]"; + mes "Try picking up a hobby to make use of your spare time. Muhahahahah!!"; + emotion 18; + close; + + O_1d: + mes "A hem...., you have yet to learn all of the 'Basic Skills' needed to become a Swordsman. Please check the requirements again."; + close; + + M_1: + mes "[Master Swordsman]"; + mes "So you wish to know about the Swordsman profession... very good then! I will explain it to you."; + next; + mes "[Master Swordsman]"; + mes "The primary advantage of being a Swordsman is that you will become superior in pure strength and mele combat compared with those in the other professions."; + next; + mes "[Master Swordsman]"; + mes "There are 3 reasons why the swordsman is unparalled in hand to hand combat v.s. those of the other job types!"; + next; + mes "[Master Swordsman]"; + mes " - 1st, the swordsman has a skill that gives him/her an excellent hp regeration rate."; + mes " - 2nd, the swordsman is capable of using more kinds of weapons than those in the other job types."; + mes " - 3rd, Most of the swordsman's skills enhance and increase physical attacks making him/her an elite warrior."; + next; + mes "[Master Swordsman]"; + mes "A Simple but adequte explanation for a newbie like you."; + next; + mes "[Master Swordsman]"; + mes "Aside from this, in my personal opinion, being a 'Swordsman' is greatest job in all the land!"; + mes "Muhahahah!!!"; + emotion 18; + goto L_Menu; + + M_2: + mes "[Master Swordsman]"; + mes "So you wish to become a swordsman...."; + next; + if(Class == Job_Novice) goto O_2a; + if(Class == Job_Swordman) goto O_2b; + mes "[Master Swordsman]"; + mes "But you already have another job.... it's too late for you to become a Swordsman."; + next; + mes "[Master Swordsman]"; + mes "Still you seek knowledge about the Swordsman proffession ay?... very well then...."; + next; + + O_2a: + mes "[Master Swordsman]"; + mes "First, You must learn all 9 Basic Skills. If you can't satisfy this condition, you won't be able to become anything."; + next; + mes "[Master Swordsman]"; + mes "Secondly you must pass the legendary Izlude Swordsman Test."; + next; + mes "[Master Swordsman]"; + mes "When you fullfill these 2 conditions, you can become an offical Swordsman."; + goto L_Menu; + + O_2b: + mes "[Master Swordsman]"; + mes "....but you're already a Swordsman...????"; + emotion 20; + close; + + M_End: + mes "[Master Swordsman]"; + mes "Enjoy your youth before you lose it~~ Muhahahaha!!!!"; + emotion 18; + close; + +L_Done: + mes "Let me see here....so you've past the test aye??...."; + next; + if(SkillPoint > 0) goto L_Skillpt; + mes "[Master Swordsman]"; + mes "Congratulations! Now you are now fully qualified to become a Real Swordsman! I will transform you right away!!"; + next; + JobChange Job_Swordman; + set job_sword_q,0; + mes "[Master Swordsman]"; + mes "As you set forth on your journey I will expect you to represent the Swordsman Assosiation of Izlude with great honor and integrity."; + next; + mes "[Master Swordsman]"; + mes "Muhahahaha!!!"; + close; + + L_Skillpt: + mes "[Master Swordsman]"; + mes "Hmm... just a momement... it seems you still have skill points left over."; + mes "Please use them up so that I can make you a Swordsman."; + close; +} + +// -- Swordsman -- +izlude_in.gat,65,171,5 script Swordsman 85,{ + doevent "Swordsman"; + end; +} + +// -- Hidden Npc -- +izlude_in.gat,65,171,5 script Swordsman -1,{ + +OnStart: + mes "[Swordsman]"; + if(Class == 1) goto L_Sword; + if(Class == 0) goto L_Novice; + +L_Other: + mes "Who might you be?! Those who are not Novices are not permitted to go in! Please leave."; + emotion 1; + close; +L_Sword: + mes "You're already a Swordsman!! You don't need to take this silly test!"; + emotion 0; + close; + +L_Novice: + if(job_sword_q == 1) goto L_Start; + if(job_sword_q == 2) goto L_Done; + + mes "Halt! Do you want to take the Swordsman Test?"; + mes "If so, please fill out the swordsman application first."; + mes "Speak with the 'Master Swordsman' for more information."; + emotion 0; + close; + + L_Start: + mes "Please enter the testing room when you are ready. Good luck!"; + close; + + L_Done: + mes "Speak with the Master Swordsman so that he can make you a Swordsman."; + close; +} + +// -- Test Guide -- +izlude_in.gat,30,175,4 script Test Guide 92,{ + mes "[Test Guide]"; + mes "I will tell you about the legendary Izlude Swordsman Test! Listen VERY CAREFULLY for I won't repeat this again!"; + next; + mes "[Test Guide]"; + mes "The purpose of this test is to decide wheather or not you qualify to become a Swordsman."; + mes "As you know, a Swordsman needs superior physical Strength as well as an iron will!"; + mes "If you possess neither of these attributes you will surely fail this grueling test."; + next; + mes "[Test Guide]"; + mes "The objective of the test is very simple!"; + next; + mes "[Test Guide]"; + mes "You need to make through an obsticale course within ^FF00007 minutes^000000 in order to pass."; + next; + mes "[Test Guide]"; + mes "The obsticale course is made up of 3 parts and is littered with booby-traps so becarefull!"; + mes "Some traps will reduce your HP while others will warp you to an random underground cave causing you to start over."; + next; + mes "[Test Guide]"; + mes "If you `Surrender' or if you excede the 'time limit', you will be fail the test."; + next; + mes "[Test Guide]"; + mes "That is everything you need to know in order to take the test."; + mes "May God bless you."; + close; +} + + +// -- Test Hall Staff 1 -- +izlude_in.gat,30,163,8 script Test Hall Staff 105,{ + mes "[Test Hall Staff]"; + if(SWTEST == 1) goto L_Option2; + if(SWTEST >= 2) goto L_Option3; + set SWTEST, 0; + + mes " So you want to take the test huh? You look confident.. that's good. Stay relaxed and do your best. This is not a difficult test."; + next; + mes "[Test Hall Staff]"; + mes "Are you ready?"; + next; + menu "Let me at it!!",M_yes,"Ah..maybe later..",M_no; + close; + + M_yes: + set SWTEST, SWTEST + 1; + savepoint "izlude_in.gat",39,170; + warp "sword_1-1.gat",10,245; + deltimer "Test Hall Staff::OnTimer7min"; + deltimer "Test Hall Staff::OnTimer4min"; + deltimer "Test Hall Staff::OnTimer2min"; + deltimer "Test Hall Staff::OnTimer1min"; + deltimer "Test Hall Staff::OnTimer30sec"; + deltimer "Test Hall Staff::OnTimer0min"; + addtimer 2000, "Test Hall Staff::OnTimer7min"; + addtimer 182000, "Test Hall Staff::OnTimer4min"; + addtimer 302000, "Test Hall Staff::OnTimer2min"; + addtimer 362000, "Test Hall Staff::OnTimer1min"; + addtimer 392000, "Test Hall Staff::OnTimer30sec"; + addtimer 422000, "Test Hall Staff::OnTimer0min"; + end; + + M_no: + mes "[Test Hall Staff]"; + mes "Check back with me when you are ready."; + close; + +L_Option2: + mes "Taking the test over?.... Keep your head up. I like those who never back down from a challange! Now take this and cheer up!"; + getitem 512,3;//Items: Apple, + next; + goto M_yes; + end; +L_Option3: + mes "Don't give up! I know you will pass this time!"; + mes "(you catch him whispering '...loooooseerrr...')"; + getitem 512,5;//Items: Apple, + next; + goto M_yes; + end; + +L_Timer: + OnTimer7min: + areaannounce "sword_1-1.gat", 8, 162, 191, 251, "[Test Hall Staff]: Your 7 minutes starts now!",0; + end; + OnTimer4min: + areaannounce "sword_1-1.gat", 8, 162, 191, 251, "[Test Hall Staff]: You have 4 minutes left!",0; + end; + OnTimer2min: + areaannounce "sword_1-1.gat", 8, 162, 191, 251, "[Test Hall Staff]: You have 2 minutes left!",0; + end; + OnTimer1min: + areaannounce "sword_1-1.gat", 8, 162, 191, 251, "[Test Hall Staff]: You have 1minute left",0; + end; + OnTimer30sec: + areaannounce "sword_1-1.gat", 8, 162, 191, 251, "[Test Hall Staff]: You have 30 seconds left, hurry!",0; + end; + OnTimer0min: + areaannounce "sword_1-1.gat", 8, 162, 191, 251, "[Test Hall Staff]: Your times up! You failed the test.",0; + addtimer 4000, "Test Hall Staff::OnTimerWarp"; + end; + OnTimerWarp: + warp "izlude_in.gat",39,170; +} + + +// -- Medic 1 -- +sword_1-1.gat,230,245,2 script Medic 105,{ + mes "[Medic]"; + mes "This is the 1st check point! You're doing great!"; + percentheal 100, 100; + close; +} + +// -- Test Hall Staff 2 -- +sword_1-1.gat,230,242,2 script Test Hall Staff 105,{ + mes "[Test Hall Staff]"; + mes "Do you surrender?"; + next; + menu "Yes.",M_0,"No.",M_1; + + M_0: + warp "izlude_in.gat",65,165; + close; + M_1: + mes "[Test Hall Staff]"; + mes "Bravo! Go for it again!"; + close; +} + +// -- Medic 2 -- +sword_1-1.gat,230,207,2 script Medic 105,{ + mes "[Medic]"; + mes "This is the 2nd check point! Keep up the good work!"; + percentheal 100, 100; + close; +} + +// -- Test Hall Staff 3 -- +sword_1-1.gat,230,204,2 script Test Hall Staff 105,{ + mes "[Test Hall Staff]"; + mes "Do you surrender?"; + next; + menu "Yes.",M_0,"No.",M_1; + + M_0: + warp "izlude_in.gat",65,165; + close; + M_1: + mes "[Test Hall Staff]"; + mes "Bravo! Go for it again!"; + close; +} + +// -- Mae (Medic 3) -- +sword_1-1.gat,223,167,2 script Mae 92,{ + mes "[Mae]"; + mes "I sincerely congratulate you for passing the test!"; + mes "I've already sent your test results to the 'Master Swordsman'."; + mes "Please inquire with him about your results. Thank you."; + next; + percentheal 100, 100; + set job_sword_q,2; + set SWTEST,0; + warp "izlude_in.gat",66,173; + close; +} + + + + +// == Green Traps == +// reduce hp when stepped on + +// -- First Section -- +// - Left - +sword_1-1.gat,22,172,1 script 1green_1::green 139,0,0,{ + heal (-4),0; + end; +} + +// -- Duplicates -- +sword_1-1.gat,22,173,1 duplicate(green) 1green_2 139,0,0 +sword_1-1.gat,23,172,1 duplicate(green) 1green_3 139,0,0 +sword_1-1.gat,23,173,1 duplicate(green) 1green_4 139,0,0 +sword_1-1.gat,34,172,1 duplicate(green) 1green_5 139,0,0 +sword_1-1.gat,34,173,1 duplicate(green) 1green_6 139,0,0 +sword_1-1.gat,35,172,1 duplicate(green) 1green_7 139,0,0 +sword_1-1.gat,35,173,1 duplicate(green) 1green_8 139,0,0 +sword_1-1.gat,66,170,1 duplicate(green) 1green_9 139,0,0 +sword_1-1.gat,66,171,1 duplicate(green) 1green_10 139,0,0 +sword_1-1.gat,67,170,1 duplicate(green) 1green_11 139,0,0 +sword_1-1.gat,67,171,1 duplicate(green) 1green_12 139,0,0 +sword_1-1.gat,70,170,1 duplicate(green) 1green_13 139,0,0 +sword_1-1.gat,70,171,1 duplicate(green) 1green_14 139,0,0 +sword_1-1.gat,71,170,1 duplicate(green) 1green_15 139,0,0 +sword_1-1.gat,71,171,1 duplicate(green) 1green_16 139,0,0 + +// - Right - +sword_1-1.gat,22,164,1 duplicate(green) 1green_17 139,0,0 +sword_1-1.gat,22,165,1 duplicate(green) 1green_18 139,0,0 +sword_1-1.gat,23,164,1 duplicate(green) 1green_19 139,0,0 +sword_1-1.gat,23,165,1 duplicate(green) 1green_20 139,0,0 +sword_1-1.gat,34,164,1 duplicate(green) 1green_21 139,0,0 +sword_1-1.gat,34,165,1 duplicate(green) 1green_22 139,0,0 +sword_1-1.gat,35,164,1 duplicate(green) 1green_23 139,0,0 +sword_1-1.gat,35,165,1 duplicate(green) 1green_24 139,0,0 +sword_1-1.gat,66,166,1 duplicate(green) 1green_25 139,0,0 +sword_1-1.gat,66,167,1 duplicate(green) 1green_26 139,0,0 +sword_1-1.gat,67,166,1 duplicate(green) 1green_27 139,0,0 +sword_1-1.gat,67,167,1 duplicate(green) 1green_28 139,0,0 +sword_1-1.gat,70,166,1 duplicate(green) 1green_29 139,0,0 +sword_1-1.gat,70,167,1 duplicate(green) 1green_30 139,0,0 +sword_1-1.gat,71,166,1 duplicate(green) 1green_31 139,0,0 +sword_1-1.gat,71,167,1 duplicate(green) 1green_32 139,0,0 +// - Center - +sword_1-1.gat,86,168,1 duplicate(green) 1green_33 139,0,0 +sword_1-1.gat,86,169,1 duplicate(green) 1green_34 139,0,0 +sword_1-1.gat,87,168,1 duplicate(green) 1green_35 139,0,0 +sword_1-1.gat,87,169,1 duplicate(green) 1green_36 139,0,0 + +// -- Second Section -- +// - Left - +sword_1-1.gat,83,171,1 duplicate(green) 2green_1 139,0,1 +sword_1-1.gat,82,171,1 duplicate(green) 2green_2 139,0,1 +sword_1-1.gat,90,171,1 duplicate(green) 2green_3 139,0,1 +sword_1-1.gat,91,171,1 duplicate(green) 2green_4 139,0,1 +sword_1-1.gat,84,173,1 duplicate(green) 2green_5 139,1,0 +sword_1-1.gat,90,173,1 duplicate(green) 2green_6 139,1,0 +sword_1-1.gat,83,166,1 duplicate(green) 2green_7 139,0,1 +sword_1-1.gat,82,166,1 duplicate(green) 2green_8 139,0,1 +sword_1-1.gat,90,166,1 duplicate(green) 2green_9 139,0,1 +sword_1-1.gat,91,166,1 duplicate(green) 2green_10 139,0,1 +sword_1-1.gat,84,164,1 duplicate(green) 2green_11 139,1,0 +sword_1-1.gat,90,164,1 duplicate(green) 2green_12 139,1,0 +sword_1-1.gat,102,168,1 duplicate(green) 2green_13 139,0,0 +sword_1-1.gat,102,169,1 duplicate(green) 2green_14 139,0,0 +// - Right - +sword_1-1.gat,102,172,1 duplicate(green) 2green_15 139,0,0 +sword_1-1.gat,102,173,1 duplicate(green) 2green_16 139,0,0 +sword_1-1.gat,103,172,1 duplicate(green) 2green_17 139,0,0 +sword_1-1.gat,103,173,1 duplicate(green) 2green_18 139,0,0 +sword_1-1.gat,106,172,1 duplicate(green) 2green_19 139,0,0 +sword_1-1.gat,106,173,1 duplicate(green) 2green_20 139,0,0 +sword_1-1.gat,107,172,1 duplicate(green) 2green_21 139,0,0 +sword_1-1.gat,107,173,1 duplicate(green) 2green_22 139,0,0 +sword_1-1.gat,110,172,1 duplicate(green) 2green_23 139,0,0 +sword_1-1.gat,110,173,1 duplicate(green) 2green_24 139,0,0 +sword_1-1.gat,111,172,1 duplicate(green) 2green_25 139,0,0 +sword_1-1.gat,111,173,1 duplicate(green) 2green_26 139,0,0 +// - Center - +sword_1-1.gat,102,164,1 duplicate(green) 2green_27 139,0,0 +sword_1-1.gat,102,165,1 duplicate(green) 2green_28 139,0,0 +sword_1-1.gat,103,164,1 duplicate(green) 2green_29 139,0,0 +sword_1-1.gat,103,165,1 duplicate(green) 2green_30 139,0,0 +sword_1-1.gat,106,164,1 duplicate(green) 2green_31 139,0,0 +sword_1-1.gat,106,165,1 duplicate(green) 2green_32 139,0,0 +sword_1-1.gat,107,164,1 duplicate(green) 2green_33 139,0,0 +sword_1-1.gat,107,165,1 duplicate(green) 2green_34 139,0,0 +sword_1-1.gat,110,164,1 duplicate(green) 2green_35 139,0,0 +sword_1-1.gat,110,165,1 duplicate(green) 2green_36 139,0,0 +sword_1-1.gat,111,164,1 duplicate(green) 2green_37 139,0,0 +sword_1-1.gat,111,165,1 duplicate(green) 2green_38 139,0,0 + + +// -- Third Section -- +sword_1-1.gat,121,172,1 duplicate(green) 3green_1 139,2,0 +sword_1-1.gat,121,173,1 duplicate(green) 3green_2 139,2,0 +sword_1-1.gat,121,164,1 duplicate(green) 3green_3 139,2,0 +sword_1-1.gat,121,165,1 duplicate(green) 3green_4 139,2,0 +sword_1-1.gat,121,168,1 duplicate(green) 3green_5 139,2,0 +sword_1-1.gat,121,169,1 duplicate(green) 3green_6 139,2,0 + +// -- Fourth Section -- +sword_1-1.gat,130,169,1 duplicate(green) 4green_1 139,0,4 +sword_1-1.gat,131,169,1 duplicate(green) 4green_2 139,0,4 +sword_1-1.gat,135,164,1 duplicate(green) 4green_3 139,5,0 +sword_1-1.gat,136,165,1 duplicate(green) 4green_4 139,4,0 +sword_1-1.gat,140,169,1 duplicate(green) 4green_5 139,0,3 +sword_1-1.gat,141,168,1 duplicate(green) 4green_6 139,0,4 +sword_1-1.gat,137,172,1 duplicate(green) 4green_7 139,2,0 +sword_1-1.gat,138,173,1 duplicate(green) 4green_8 139,3,0 +sword_1-1.gat,134,171,1 duplicate(green) 4green_9 139,0,2 +sword_1-1.gat,135,168,1 duplicate(green) 4green_10 139,0,1 +sword_1-1.gat,135,170,1 duplicate(green) 4green_11 139,1,0 + +// -- Fifth Section -- +sword_1-1.gat,144,169,1 duplicate(green) 5green_1 139,0,4 +sword_1-1.gat,145,169,1 duplicate(green) 5green_2 139,0,4 +sword_1-1.gat,148,164,1 duplicate(green) 5green_3 139,4,0 +sword_1-1.gat,149,165,1 duplicate(green) 5green_4 139,3,0 +sword_1-1.gat,156,166,1 duplicate(green) 5green_5 139,0,2 +sword_1-1.gat,157,166,1 duplicate(green) 5green_6 139,0,2 +sword_1-1.gat,153,169,1 duplicate(green) 5green_7 139,4,0 +sword_1-1.gat,152,168,1 duplicate(green) 5green_8 139,3,0 +sword_1-1.gat,149,171,1 duplicate(green) 5green_9 139,0,1 +sword_1-1.gat,148,171,1 duplicate(green) 5green_10 139,0,2 +sword_1-1.gat,154,173,1 duplicate(green) 5green_11 139,2,0 +sword_1-1.gat,154,172,1 duplicate(green) 5green_12 139,2,0 + +// -- Last Section -- +sword_1-1.gat,164,172,1 duplicate(green) 6green_1 139,0,0 +sword_1-1.gat,164,173,1 duplicate(green) 6green_2 139,0,0 +sword_1-1.gat,165,172,1 duplicate(green) 6green_3 139,0,0 +sword_1-1.gat,165,173,1 duplicate(green) 6green_4 139,0,0 +sword_1-1.gat,172,172,1 duplicate(green) 6green_5 139,0,0 +sword_1-1.gat,172,173,1 duplicate(green) 6green_6 139,0,0 +sword_1-1.gat,173,172,1 duplicate(green) 6green_7 139,0,0 +sword_1-1.gat,173,173,1 duplicate(green) 6green_8 139,0,0 + +sword_1-1.gat,164,168,1 duplicate(green) 6green_9 139,0,0 +sword_1-1.gat,164,169,1 duplicate(green) 6green_10 139,0,0 +sword_1-1.gat,165,168,1 duplicate(green) 6green_11 139,0,0 +sword_1-1.gat,165,169,1 duplicate(green) 6green_12 139,0,0 +sword_1-1.gat,172,168,1 duplicate(green) 6green_13 139,0,0 +sword_1-1.gat,172,169,1 duplicate(green) 6green_14 139,0,0 +sword_1-1.gat,173,168,1 duplicate(green) 6green_15 139,0,0 +sword_1-1.gat,173,169,1 duplicate(green) 6green_16 139,0,0 + +sword_1-1.gat,164,164,1 duplicate(green) 6green_17 139,0,0 +sword_1-1.gat,164,165,1 duplicate(green) 6green_18 139,0,0 +sword_1-1.gat,165,164,1 duplicate(green) 6green_19 139,0,0 +sword_1-1.gat,165,165,1 duplicate(green) 6green_20 139,0,0 +sword_1-1.gat,172,164,1 duplicate(green) 6green_21 139,0,0 +sword_1-1.gat,172,165,1 duplicate(green) 6green_22 139,0,0 +sword_1-1.gat,173,164,1 duplicate(green) 6green_23 139,0,0 +sword_1-1.gat,173,165,1 duplicate(green) 6green_24 139,0,0 + + + +// == Fall Warps == + +sword_1-1.gat,16,251,4 script 1_blank_1a#1::1_blank 139,0,1,{ + set @TEMP,rand(5); + if (@TEMP==0) warp "sword_1-1.gat",65,56; + if (@TEMP==1) warp "sword_1-1.gat",29,26; + if (@TEMP==2) warp "sword_1-1.gat",43,16; + if (@TEMP==3) warp "sword_1-1.gat",23,112; + if (@TEMP==4) warp "sword_1-1.gat",58,83; + end; +} + +// -- Duplicates -- +sword_1-1.gat,19,251,4 duplicate(1_blank) 1_blank_1b 139,0,1 +sword_1-1.gat,17,250,4 duplicate(1_blank) 1_blank_1c 139,1,0 +sword_1-1.gat,17,251,4 duplicate(1_blank) 1_blank_1a 139,1,1 +sword_1-1.gat,18,251,4 duplicate(1_blank) 1_blank_1b 139,1,1 +sword_1-1.gat,17,251,4 duplicate(1_blank) 1_blank_1c 139,1,1 +sword_1-1.gat,16,238,4 duplicate(1_blank) 1_blank_2a 139,0,1 +sword_1-1.gat,19,238,4 duplicate(1_blank) 1_blank_2b 139,0,1 +sword_1-1.gat,17,239,4 duplicate(1_blank) 1_blank_2c 139,0,1 +sword_1-1.gat,28,246,4 duplicate(1_blank) 1_blank_3a 139,4,1 +sword_1-1.gat,33,245,4 duplicate(1_blank) 1_blank_3b 139,0,2 +sword_1-1.gat,29,242,4 duplicate(1_blank) 1_blank_3c 139,4,0 +sword_1-1.gat,24,244,4 duplicate(1_blank) 1_blank_3d 139,0,2 +sword_1-1.gat,38,251,4 duplicate(1_blank) 1_blank_4a 139,0,1 +sword_1-1.gat,41,251,4 duplicate(1_blank) 1_blank_4b 139,0,1 +sword_1-1.gat,39,250,4 duplicate(1_blank) 1_blank_4c 139,1,0 +sword_1-1.gat,38,238,4 duplicate(1_blank) 1_blank_5a 139,0,1 +sword_1-1.gat,41,238,4 duplicate(1_blank) 1_blank_5_b 139,0,1 +sword_1-1.gat,39,239,4 duplicate(1_blank) 1_blank_5_c 139,1,0 +sword_1-1.gat,54,251,4 duplicate(1_blank) 1_blank_6_a 139,0,1 +sword_1-1.gat,71,251,4 duplicate(1_blank) 1_blank_6_b 139,0,1 +sword_1-1.gat,62,250,4 duplicate(1_blank) 1_blank_6_c 139,9,0 +sword_1-1.gat,62,247,4 duplicate(1_blank) 1_blank_7_a 139,8,0 +sword_1-1.gat,71,244,4 duplicate(1_blank) 1_blank_7_b 139,0,2 +sword_1-1.gat,63,242,4 duplicate(1_blank) 1_blank_7_c 139,8,0 +sword_1-1.gat,54,244,4 duplicate(1_blank) 1_blank_7_d 139,0,2 +sword_1-1.gat,54,238,4 duplicate(1_blank) 1_blank_8_a 139,0,1 +sword_1-1.gat,71,238,4 duplicate(1_blank) 1_blank_8_b 139,0,1 +sword_1-1.gat,62,239,4 duplicate(1_blank) 1_blank_8_c 139,9,0 +sword_1-1.gat,102,247,4 duplicate(1_blank) 1_blank_9_a 139,2,0 +sword_1-1.gat,105,245,4 duplicate(1_blank) 1_blank_9_b 139,0,2 +sword_1-1.gat,103,242,4 duplicate(1_blank) 1_blank_9_c 139,2,0 +sword_1-1.gat,100,244,4 duplicate(1_blank) 1_blank_9_d 139,0,2 +sword_1-1.gat,156,249,4 duplicate(1_blank) 1_blank_10_a 139,14,0 +sword_1-1.gat,156,248,4 duplicate(1_blank) 1_blank_10_b 139,14,0 +sword_1-1.gat,170,249,4 duplicate(1_blank) 1_blank_10_c 139,1,0 +sword_1-1.gat,170,248,4 duplicate(1_blank) 1_blank_10_d 139,1,0 +sword_1-1.gat,156,245,4 duplicate(1_blank) 1_blank_11_a 139,14,0 +sword_1-1.gat,156,244,4 duplicate(1_blank) 1_blank_11_b 139,14,0 +sword_1-1.gat,170,245,4 duplicate(1_blank) 1_blank_11_c 139,1,0 +sword_1-1.gat,170,244,4 duplicate(1_blank) 1_blank_11_d 139,1,0 +sword_1-1.gat,156,241,4 duplicate(1_blank) 1_blank_12_a 139,14,0 +sword_1-1.gat,156,240,4 duplicate(1_blank) 1_blank_12_b 139,14,0 +sword_1-1.gat,170,241,4 duplicate(1_blank) 1_blank_12_c 139,1,0 +sword_1-1.gat,170,240,4 duplicate(1_blank) 1_blank_12_d 139,1,0 +sword_1-1.gat,180,251,4 duplicate(1_blank) 1_blank_13_a 139,0,1 +sword_1-1.gat,183,251,4 duplicate(1_blank) 1_blank_13_b 139,0,1 +sword_1-1.gat,181,250,4 duplicate(1_blank) 1_blank_13_c 139,1,0 +sword_1-1.gat,180,238,4 duplicate(1_blank) 1_blank_14_a 139,0,1 +sword_1-1.gat,183,238,4 duplicate(1_blank) 1_blank_14_b 139,0,1 +sword_1-1.gat,181,239,4 duplicate(1_blank) 1_blank_14_c 139,1,0 + + +sword_1-1.gat,56,212,4 script 2_blank_1_a::2_blank 139,40,0,{ + set @TEMP,rand(5); + if (@TEMP==0) warp "sword_1-1.gat",162,120; + if (@TEMP==1) warp "sword_1-1.gat",94,120; + if (@TEMP==2) warp "sword_1-1.gat",94,85; + if (@TEMP==3) warp "sword_1-1.gat",162,85; + if (@TEMP==4) warp "sword_1-1.gat",130,47; + end; +} + +// -- Duplicates -- +sword_1-1.gat,95,212,4 duplicate(2_blank) 2_blank_1_b 139,2,0 +sword_1-1.gat,56,210,4 duplicate(2_blank) 2_blank_2_a 139,40,0 +sword_1-1.gat,95,210,4 duplicate(2_blank) 2_blank_2_b 139,2,0 +sword_1-1.gat,16,206,4 duplicate(2_blank) 2_blank_2_c 139,0,3 +sword_1-1.gat,97,206,4 duplicate(2_blank) 2_blank_2_d 139,0,3 +sword_1-1.gat,56,203,4 duplicate(2_blank) 2_blank_2_e 139,40,0 +sword_1-1.gat,95,203,4 duplicate(2_blank) 2_blank_2_f 139,2,0 +sword_1-1.gat,56,201,4 duplicate(2_blank) 2_blank_3_a 139,40,0 +sword_1-1.gat,95,201,4 duplicate(2_blank) 2_blank_3_b 139,2,0 + +// - part 2 - +sword_1-1.gat,113,212,4 duplicate(2_blank) 2_blank_4_a 139,14,0 +sword_1-1.gat,125,212,4 duplicate(2_blank) 2_blank_4_b 139,2,0 +sword_1-1.gat,113,210,4 duplicate(2_blank) 2_blank_5_a 139,14,0 +sword_1-1.gat,125,210,4 duplicate(2_blank) 2_blank_5_b 139,2,0 +sword_1-1.gat,100,206,4 duplicate(2_blank) 2_blank_5_c 139,0,3 +sword_1-1.gat,127,206,4 duplicate(2_blank) 2_blank_5_d 139,0,3 +sword_1-1.gat,113,203,4 duplicate(2_blank) 2_blank_5_e 139,14,0 +sword_1-1.gat,125,210,4 duplicate(2_blank) 2_blank_5_f 139,2,0 +sword_1-1.gat,113,201,4 duplicate(2_blank) 2_blank_6_a 139,14,0 +sword_1-1.gat,113,201,4 duplicate(2_blank) 2_blank_6_b 139,2,0 + +// - part 3 - +sword_1-1.gat,155,212,4 duplicate(2_blank) 2_blank_7_a 139,21,0 +sword_1-1.gat,181,212,4 duplicate(2_blank) 2_blank_7_b 139,2,0 +sword_1-1.gat,155,210,4 duplicate(2_blank) 2_blank_8_a 139,21,0 +sword_1-1.gat,181,210,4 duplicate(2_blank) 2_blank_8_b 139,2,0 +sword_1-1.gat,130,206,4 duplicate(2_blank) 2_blank_8_c 139,0,3 +sword_1-1.gat,183,206,4 duplicate(2_blank) 2_blank_8_d 139,0,3 +sword_1-1.gat,155,203,4 duplicate(2_blank) 2_blank_8_e 139,21,0 +sword_1-1.gat,181,203,4 duplicate(2_blank) 2_blank_8_f 139,2,0 +sword_1-1.gat,155,201,4 duplicate(2_blank) 2_blank_9_a 139,40,0 +sword_1-1.gat,181,201,4 duplicate(2_blank) 2_blank_9_b 139,2,0 + +sword_1-1.gat,17,174,4 script 3_blank_1_a::3_blank 139,2,0,{ + set @TEMP,rand(5); + if (@TEMP==0) warp "sword_1-1.gat",195,15; + if (@TEMP==1) warp "sword_1-1.gat",195,38; + if (@TEMP==2) warp "sword_1-1.gat",231,30; + if (@TEMP==3) warp "sword_1-1.gat",198,65; + if (@TEMP==4) warp "sword_1-1.gat",196,116; + end; +} + +// -- Duplicates -- +sword_1-1.gat,17,163,4 duplicate(3_blank) 3_blank_2_a 139,2,0 +sword_1-1.gat,29,171,4 duplicate(3_blank) 3_blank_3_a 139,2,0 +sword_1-1.gat,31,168,4 duplicate(3_blank) 3_blank_3_b 139,0,2 +sword_1-1.gat,28,166,4 duplicate(3_blank) 3_blank_3_c 139,2,0 +sword_1-1.gat,26,168,4 duplicate(3_blank) 3_blank_3_d 139,0,2 +sword_1-1.gat,36,169,4 duplicate(3_blank) 3_blank_4_a 139,0,0 +sword_1-1.gat,37,169,4 duplicate(3_blank) 3_blank_4_b 139,0,0 +sword_1-1.gat,37,168,4 duplicate(3_blank) 3_blank_4_c 139,0,0 +sword_1-1.gat,36,168,4 duplicate(3_blank) 3_blank_4_c 139,0,0 +sword_1-1.gat,40,175,4 duplicate(3_blank) 3_blank_5_a 139,0,1 +sword_1-1.gat,41,175,4 duplicate(3_blank) 3_blank_5_b 139,0,1 +sword_1-1.gat,41,171,4 duplicate(3_blank) 3_blank_6_a 139,1,0 +sword_1-1.gat,41,170,4 duplicate(3_blank) 3_blank_6_b 139,1,0 +sword_1-1.gat,41,167,4 duplicate(3_blank) 3_blank_6_c 139,1,0 +sword_1-1.gat,41,166,4 duplicate(3_blank) 3_blank_6_d 139,1,0 +sword_1-1.gat,42,169,4 duplicate(3_blank) 3_blank_6_e 139,0,1 +sword_1-1.gat,43,170,4 duplicate(3_blank) 3_blank_6_f 139,0,1 +sword_1-1.gat,43,167,4 duplicate(3_blank) 3_blank_6_g 139,0,1 +sword_1-1.gat,40,162,4 duplicate(3_blank) 3_blank_7_a 139,0,1 +sword_1-1.gat,41,162,4 duplicate(3_blank) 3_blank_7_b 139,0,1 +sword_1-1.gat,46,175,4 duplicate(3_blank) 3_blank_8_a 139,0,1 +sword_1-1.gat,51,175,4 duplicate(3_blank) 3_blank_8_b 139,0,1 +sword_1-1.gat,47,174,4 duplicate(3_blank) 3_blank_8_c 139,1,0 +sword_1-1.gat,50,174,4 duplicate(3_blank) 3_blank_8_d 139,1,0 +sword_1-1.gat,48,173,4 duplicate(3_blank) 3_blank_8_e 139,0,1 +sword_1-1.gat,49,173,4 duplicate(3_blank) 3_blank_8_f 139,0,1 +sword_1-1.gat,46,162,4 duplicate(3_blank) 3_blank_9_a 139,0,1 +sword_1-1.gat,51,162,4 duplicate(3_blank) 3_blank_9_b 139,0,1 +sword_1-1.gat,47,163,4 duplicate(3_blank) 3_blank_9_c 139,1,0 +sword_1-1.gat,50,163,4 duplicate(3_blank) 3_blank_9_d 139,1,0 +sword_1-1.gat,48,164,4 duplicate(3_blank) 3_blank_9_e 139,0,1 +sword_1-1.gat,49,164,4 duplicate(3_blank) 3_blank_9_f 139,0,1 +sword_1-1.gat,54,170,4 duplicate(3_blank) 3_blank_10_a 139,0,1 +sword_1-1.gat,55,170,4 duplicate(3_blank) 3_blank_10_b 139,0,1 +sword_1-1.gat,54,167,4 duplicate(3_blank) 3_blank_10_c 139,0,1 +sword_1-1.gat,55,167,4 duplicate(3_blank) 3_blank_10_d 139,0,1 +sword_1-1.gat,53,169,4 duplicate(3_blank) 3_blank_10_e 139,1,0 +sword_1-1.gat,53,168,4 duplicate(3_blank) 3_blank_10_f 139,1,0 +sword_1-1.gat,56,169,4 duplicate(3_blank) 3_blank_10_g 139,1,0 +sword_1-1.gat,56,168,4 duplicate(3_blank) 3_blank_10_h 139,1,0 +sword_1-1.gat,58,175,4 duplicate(3_blank) 3_blank_11_a 139,0,1 +sword_1-1.gat,59,174,4 duplicate(3_blank) 3_blank_11_b 139,1,0 +sword_1-1.gat,60,173,4 duplicate(3_blank) 3_blank_11_c 139,0,1 +sword_1-1.gat,61,172,4 duplicate(3_blank) 3_blank_11_d 139,1,0 +sword_1-1.gat,58,162,4 duplicate(3_blank) 3_blank_12_a 139,0,1 +sword_1-1.gat,59,163,4 duplicate(3_blank) 3_blank_12_b 139,1,0 +sword_1-1.gat,60,164,4 duplicate(3_blank) 3_blank_12_c 139,0,1 +sword_1-1.gat,61,165,4 duplicate(3_blank) 3_blank_12_d 139,1,0 +sword_1-1.gat,76,172,4 duplicate(3_blank) 3_blank_13_a 139,1,0 +sword_1-1.gat,77,173,4 duplicate(3_blank) 3_blank_13_b 139,0,1 +sword_1-1.gat,78,174,4 duplicate(3_blank) 3_blank_13_c 139,1,0 +sword_1-1.gat,79,175,4 duplicate(3_blank) 3_blank_13_d 139,0,1 +sword_1-1.gat,76,165,4 duplicate(3_blank) 3_blank_14_a 139,1,0 +sword_1-1.gat,77,164,4 duplicate(3_blank) 3_blank_14_b 139,0,1 +sword_1-1.gat,78,163,4 duplicate(3_blank) 3_blank_14_c 139,1,0 +sword_1-1.gat,79,162,4 duplicate(3_blank) 3_blank_14_d 139,0,1 +sword_1-1.gat,94,175,4 duplicate(3_blank) 3_blank_15_a 139,0,1 +sword_1-1.gat,95,174,4 duplicate(3_blank) 3_blank_15_b 139,1,0 +sword_1-1.gat,98,174,4 duplicate(3_blank) 3_blank_15_c 139,1,0 +sword_1-1.gat,99,175,4 duplicate(3_blank) 3_blank_16_d 139,0,1 +sword_1-1.gat,96,169,4 duplicate(3_blank) 3_blank_17_a 139,0,0 +sword_1-1.gat,97,169,4 duplicate(3_blank) 3_blank_17_b 139,0,0 +sword_1-1.gat,97,168,4 duplicate(3_blank) 3_blank_17_c 139,0,0 +sword_1-1.gat,96,168,4 duplicate(3_blank) 3_blank_17_d 139,0,0 +sword_1-1.gat,94,162,4 duplicate(3_blank) 3_blank_18_a 139,0,1 +sword_1-1.gat,95,163,4 duplicate(3_blank) 3_blank_18_b 139,1,0 +sword_1-1.gat,98,163,4 duplicate(3_blank) 3_blank_18_c 139,1,0 +sword_1-1.gat,99,162,4 duplicate(3_blank) 3_blank_18_d 139,0,1 +sword_1-1.gat,114,175,4 duplicate(3_blank) 3_blank_19_a 139,0,1 +sword_1-1.gat,115,175,4 duplicate(3_blank) 3_blank_19_b 139,0,1 +sword_1-1.gat,114,162,4 duplicate(3_blank) 3_blank_20_a 139,0,1 +sword_1-1.gat,115,162,4 duplicate(3_blank) 3_blank_20_b 139,0,1 +sword_1-1.gat,126,175,4 duplicate(3_blank) 3_blank_21_a 139,0,1 +sword_1-1.gat,127,175,4 duplicate(3_blank) 3_blank_21_b 139,0,1 +sword_1-1.gat,126,162,4 duplicate(3_blank) 3_blank_23_a 139,0,1 +sword_1-1.gat,127,162,4 duplicate(3_blank) 3_blank_23_b 139,0,1 +sword_1-1.gat,160,174,4 duplicate(3_blank) 3_blank_24_a 139,0,2 +sword_1-1.gat,161,174,4 duplicate(3_blank) 3_blank_24_b 139,0,2 +sword_1-1.gat,160,163,4 duplicate(3_blank) 3_blank_25_a 139,0,2 +sword_1-1.gat,161,163,4 duplicate(3_blank) 3_blank_25_b 139,0,2 +sword_1-1.gat,168,175,4 duplicate(3_blank) 3_blank_26_a 139,0,2 +sword_1-1.gat,169,175,4 duplicate(3_blank) 3_blank_26_b 139,0,2 +sword_1-1.gat,168,162,4 duplicate(3_blank) 3_blank_27_a 139,0,2 +sword_1-1.gat,169,162,4 duplicate(3_blank) 3_blank_27_b 139,0,2 +sword_1-1.gat,176,174,4 duplicate(3_blank) 3_blank_28_a 139,0,2 +sword_1-1.gat,177,174,4 duplicate(3_blank) 3_blank_28_b 139,0,2 +sword_1-1.gat,178,173,4 duplicate(3_blank) 3_blank_28_c 139,1,0 +sword_1-1.gat,178,172,4 duplicate(3_blank) 3_blank_28_d 139,1,0 +sword_1-1.gat,181,174,4 duplicate(3_blank) 3_blank_28_e 139,2,0 +sword_1-1.gat,179,169,4 duplicate(3_blank) 3_blank_29_a 139,3,0 +sword_1-1.gat,179,168,4 duplicate(3_blank) 3_blank_29_b 139,3,0 +sword_1-1.gat,182,169,4 duplicate(3_blank) 3_blank_29_c 139,0,2 +sword_1-1.gat,183,169,4 duplicate(3_blank) 3_blank_29_d 139,0,2 +sword_1-1.gat,181,167,4 duplicate(3_blank) 3_blank_29_e 139,1,0 +sword_1-1.gat,181,166,4 duplicate(3_blank) 3_blank_29_f 139,1,0 +sword_1-1.gat,183,167,4 duplicate(3_blank) 3_blank_29_g 139,0,1 +sword_1-1.gat,176,163,4 duplicate(3_blank) 3_blank_30_a 139,0,2 +sword_1-1.gat,177,163,4 duplicate(3_blank) 3_blank_30_b 139,0,2 +sword_1-1.gat,181,163,4 duplicate(3_blank) 3_blank_30_c 139,2,0 diff --git a/npc/jobs/1-1/thief.txt b/npc/jobs/1-1/thief.txt new file mode 100644 index 000000000..6b0f931fe --- /dev/null +++ b/npc/jobs/1-1/thief.txt @@ -0,0 +1,443 @@ +//===== eAthena Script ======================================= +//= Thief Job Quest +//===== By: ================================================== +//= eAthena dev team +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + +// == Monsters == +//Spawn is included in this file so make shure its not elsewhere to! +job_thief1.gat,0,0,0,0 monster Orange Mushroom 1182,180,0,0,0 +job_thief1.gat,0,0,0,0 monster Fabre 1184,50,0,0,0 +job_thief1.gat,0,0,0,0 monster Chonchon 1183,50,0,0,0 +job_thief1.gat,0,0,0,0 monster Spore 1014,30,0,0,0 + + +// == NPCs == +// -- Interviewer -- +moc_prydb1.gat,39,129,5 script Thief Guide 69, +{ + if(Class== Job_Thief) goto L_JobThief; + if(Class == Job_Novice) goto L_Start; + +L_JobOther: + mes "[Thief Guide]"; + if(Class==1 || Class==7 || Class==14) goto L_Swordman; + if(Class==2 || Class==9 || Class==16) goto L_Mage; + if(Class==3 || Class==11 || Class==19 || Class==20) goto L_Archer; + if(Class==4 || Class==8 || Class==15) goto L_Acolyte; + if(Class==5 || Class==10 || Class==18) goto L_Merchant; + + mes "You already have a job. Stop bothering me and go help out some newbies or something."; + emotion 21; + close; + L_Acolyte: + mes "What the heck...? Ohhhhhh~GOD... PORING's worshipper, Acolyte..."; + mes "So why aren't you in church praying, instead of wandering about here, huh?"; + close; + L_Archer: + mes "What the heck...? Hahahaha~are you a 'Kill Stealing' Archer...?"; + emotion 18; + close; + L_Mage: + mes "What the heck...? Ehhh??? A Circus Sideshow? Make a fire without a Matchstick, will ya?"; + emotion 19; + close; + + L_Merchant: + mes "What the heck...? Eeeeeek~Merchant Scammer here...!!!! I am gonna report you to the GM!!!"; + emotion 0; + close; + L_Swordman: + mes "What the heck...? Meh!~Here's another 'Bash' head. Do me a favor... why don't you go 'BASH', yourself in the head. Ha!"; + emotion 29; + close; + +L_JobThief: + mes "[Thief Guide]"; + mes "You're already a thief..... What do you want from me... go away!"; + emotion 4; + close; + +L_Start: + if(job_thief_q==2) goto L_1; + if(job_thief_q==1) goto L_Back; + + mes "[Thief Guide]"; + if(Sex == 0)mes "Heh... You look like a well to do boy... what brought you down to this rat hole?"; + if(Sex == 1)mes "Heh... You look like a well to do girl... what brought you down to this rat hole?"; + next; +M_Menu: + menu "'I didn't come here for the atomosphere.....",M_0,"Me? I'm just looking around...",M_End; + + M_0: + mes "[Thief Guide]"; + mes "Hmph... you sound a little cocky.... Ya know, being a Thief isn't all it's cracked up to be...."; + mes "That reminds me.... I must have been at lvl 9 or 10.... it was my first robbery...."; + next; + mes "[Thief Guide]"; + mes "Hahahaha... I can still remember the look on that guy's face..."; + emotion 18; + next; + mes "[Thief Guide]"; + mes "But anyways... I assume you're here to become a thief..."; + next; + menu "-You got it.",sM_0a, "-Nope. Just wasting your time. ^ ^",sM_0b, "-Why did you steal from that man?",sM_0c; + + sM_0a: + goto L_Test; + sM_0b: + mes "[Thief Guide]"; + mes "Wow... thanks... now get the HELL OUTA HERE!!"; + emotion 6; + close; + sM_0c: + mes "[Thief Guide]"; + mes "Eh? Me?... Well... I really had no other choice at the time.... It was either I stole or I starved."; + mes "I really couldn't go hungry another day."; + close; + M_End: + mes "[Thief Guide]"; + mes "Must you people keep wasting my time!!?"; + emotion 32; + close; + + L_Test: + mes "[Thief Guide]"; + mes "Ok then. First, fill out this application form."; + next; + mes "(you fill out the form and hand it back)"; + next; + if(JobLevel < 10) goto sL_Joblvl; + + mes "[Thief Guide]"; + mes "Alrighty ^ff0000"+ strcharinfo(0) + "^000000, if that IS your real name..... looks like you've got quite a 'record' here."; + mes "Let's see.... aggravated assualt... felony larson..... hmm...."; + next; + mes "[Thief Guide]"; + mes "Ah, here we go...... you've got the job and skill requirements to become a Thief. Now all you gota do is pass the Morroc Thief Test."; + next; + + L_Explain: + mes "[Thief Guide]"; + mes " The test will require you to ^ff0000'sneak'^000000 into ^ff0000'Shibu's Farm'^000000, and ^ff0000'steal'^000000 some ^aaaa00'Mushrooms'^000000."; + mes " There are ^ff00002^000000 kinds of ^aaaa00Mushrooms^000000 on the farm, ^ffbb00Orange Net Mushrooms^000000 and ^ffbb00Orange Gooey Mushrooms^000000."; + next; + mes "[Thief Guide]"; + mes "'Shibu' just happens to be the worst merchant scammer in Morroc, in case your wondering why he's our target."; + next; + mes "[Thief Guide]"; + mes " Bring the Mushrooms back here and someone will give you a score based on the type, and the amount of mushrooms you get."; + mes " 1 Orange Net Mushroom = ^0000ff3 points^000000 while 1 Orange Gooey Mushroom = ^0000ff1 point^000000. You need 25 points to pass the test."; + next; + mes "[Thief Guide]"; + mes " In order to get into Shibu's Farm you'll need to talk to one of our 'associates'. You can find him just ouside of this pyramid standing near some columns."; + mes " He goes by the name ^ddcc00'Irrelevant Man'^000000."; + next; + mes "[Thief Guide]"; + mes " Here are his exact coordinates just in case you are 'directionaly challenged': '^FF0000141, 125^000000'."; + mes " Find him and he'll show you a secrect way into the Farm."; + next; + mes "[Thief Guide]"; + mes " This sounds easy but ^009900do you know there are Monsters which keep Mushrooms from the robbery^000000?"; //had to leave the engrish in, it was to good not too. d^_^b + mes " Please ^0000ffget yourself out of the Fairy Tales^000000 and ^ff0000'Brace up your nerves. That will be the toughest experience to you^000000."; + next; + mes "[Thief Guide]"; + mes " So, I will give you one tip. ^ff0000Elaborate the Strategy^000000 before you going inside the Farm."; + next; + mes "[Thief Guide]"; + mes " Try to steal the mushrooms as quickly as you can. You may even have to ^0000ffunequip some weapons or armor^000000."; + mes " You don't want to get killed while doing this... at the very least try to give me the mushrooms first.... then you can go get yourself killed... HA!"; + next; + mes "[Thief Guide]"; + mes " If you don't have any questions... then GET moving!"; + emotion 27; + set job_thief_q,1; + close; + + sL_JobLvl: + mes "[Thief Guide]"; + mes "Err I can see how ambitious you are......but we can't hand a gun to a baby only for that? Come back when you learn all Basic Skills."; + close; + + L_Back: + if(countitem(1069)>0 || countitem(1070)>0) goto sL_1;//Items: Orange_Net_Mushroom, Orange_Gooey_Mushroom_, + + sL_0: + mes "[Thief Guide]"; + mes "..... What are you doing here? You're supposed to be gathering mushrooms remember??"; + mes "Don't tell me you forget what to do??? Jeeze... do you want me to explain it to you one more time?......"; + emotion 20; + next; + menu "Heh.. yeah I guess..",sM_1a, "Nope.",sM_1b; + + sM_1a: + mes "[Thief Guide]"; + mes "(~sigh~) There's always someone who gets left behind.... This is the last time so listen CAREFULLY!!...."; + emotion 32; + next; + goto L_Explain; + sM_1b: + mes "[Thief Guide]"; + mes ".... Then what is it??? Do you have something to tell me? YOUR the one who came TO ME..."; + mes "What... you wanna a piece of me?? HUH!!??"; + emotion 7; + close; + + sL_1: + mes "[Thief Guide]"; + mes "What? You actually went and stole some mushrooms?? Are you some kinda idiot?"; + mes "Haha... I can't believe you listened to me..... "; + emotion 1; + next; + mes "[Thief Guide]"; + mes ".... Psych!! Just kidding... heheheh! Speak with the guy next to me about rating the mushrooms you swiped."; + emotion 18; + close; + + L_1: + mes "[Thief Guide]"; + mes "So how was the Mushroom Farm. Did ya have much fun?"; + next; + menu "Yeah, kinda Cool.",M_Cool,"It was horrible.",M_Not; + + M_Cool: + mes "[Thief Guide]"; + mes " Wow! I like you! Fabulous! Everyone before you was `S@#$ Bloody As#$%^&s'."; + next; + mes "[Thief Guide]"; + mes "...... You won't take my place, will you? If you have any ambition like that, I will kick your ^ff0000'ASS OUT OF YOUR BUTT'^000000!"; //this is just too much lol. + emotion 0; + next; + mes "[Thief Guide]"; + mes " Still, in order to pass the test you need to go get some mushrooms."; + close; + M_Not: + mes "[Thief Guide]"; + mes " I know what ya mean. I was there before and it was awfull. All those smelly mushrooms and aggressive monsters."; + next; + mes "[Thief Guide]"; + mes " Eeewww! Yuuuckk! Still, in order to pass the test you need to go get some mushrooms."; + emotion 16; + close; +} + + +// -- Test Grader -- +moc_prydb1.gat,42,133,2 script Comrade Brad 118, +{ + if(Class == 0) goto L_Novice; + if(Class == 6) goto L_Thief; + +L_Other: + mes "[Brad]"; + mes "Hey~ Hey~!! You don't look like a Thief. What the heck? You'd BETTER NOT be trying to start someting on THIEF TERRITORY!!"; + emotion 23; + close; +L_Thief: + mes "[Brad]"; + mes "We don't have any Special events for Thieves yet. Come back some other time, alright?"; + close; + +L_Novice: + mes "[Comrade Brad]"; + if((job_thief_q == 2) && ((countitem(1069) > 0) || (countitem(1070) > 0))) goto L_4;//Items: Orange_Net_Mushroom, Orange_Gooey_Mushroom_, + if(job_thief_q >= 1) goto L_3; + + mes "Errr? What's matter newbie? If you want to be a theif, speak to the girl beside me."; + close; +L_3: + mes "Go get some mushrooms so that I can grade them ok."; + close; +L_4: + mes "Good. You got some mushrooms from that crooked merchant Shibu"; + next; + + set @mushrm1,countitem(1069)*3;//Items: Orange_Net_Mushroom, + set @mushrm2,countitem(1070);//Items: Orange_Gooey_Mushroom_, + set @TotMush,@mushrm1 + @mushrm2; + set @money_thief,((countitem(1069) * 5) + (countitem(1070)* 2)) + 200;//Items: Orange_Net_Mushroom, Orange_Gooey_Mushroom_, + + mes "[Comrade Brad]"; + mes "Let's see you got:"; + mes "^0000ff"+countitem(1069)+"^000000 Orange Net Mushrooms for ^ffbb00"+@mushrm1+"^000000 points,";//Items: Orange_Net_Mushroom, + mes "^0000ff"+countitem(1070)+"^000000 Orange Gooey Mushrooms for ^ffbb00"+@mushrm2+"^000000 points,";//Items: Orange_Gooey_Mushroom_, + mes "Giving you a total score of ^ff0000"+@TotMush+"^000000."; + next; + if (@TotMush > 25) goto L_High; + if (@TotMush == 25) goto L_Medium; + + mes "[Comrade Brad]"; + mes "Meh!.... looks like you failed. C'mon! You can do better than that! Go get some more mushrooms!!!"; + close; + + L_Medium: + mes "[Comrade Brad]"; + mes "Good. You passed the Test."; + next; + goto L_Final; + + L_High: + mes "[Comrade Brad]"; + mes "Ooooh. Above 25, kewl. You passed the Test!"; + next; + + L_Final: + mes "[Comrade Brad]"; + mes "Congratulations ^ff0000"+strcharinfo(0)+"^000000, you passed the official Thief Test! You can now become a Thief!!"; + emotion 21; + next; + if(SkillPoint > 0) goto sL_SkPoint; + delitem 1069, countitem(1069);//Items: Orange_Net_Mushroom, + delitem 1070, countitem(1070);//Items: Orange_Gooey_Mushroom_, + JobChange 6;// Job: Job_Thief + set job_thief_q,0; + mes "[Comrade Brad]"; + mes "Here's a small reward for your hard work. Spend it any way you want to."; + next; + set Zeny,Zeny+@money_thief; + mes "[Comrade Brad]"; + mes "From now on you must act, think, and even smell like a Theif."; + mes "You are one of us now, which means you have the trust and freindship of Thieves all over Rune Midgard"; + next; + mes "[Comrade Brad]"; + mes "However, If you bring disgrace to our Guild, or ever betray us, we will not hesitate to have you......"; + mes "how shall I say..... ^ff0000'REMOVED'^000000 from the Thief Guild."; + emotion 29; + next; + mes "[Comrade Brad]"; + mes "Good luck and always remeber the ^0000cc'Theif Motto'^000000: ^ff0000DON'T Get Caught^000000l!"; + close; + + sL_SkPoint: + mes "[Comrade Brad]"; + mes "But before that happens please use up all of your skill points ok?"; + close; + +} + + +// -- Irrelevant Man -- +moc_ruins.gat,141,125,3 script Irrelevant Man 118, +{ + if(Class == 6) goto L_Thief; + if(Class == 0) goto L_Novice; + +L_Other: + if(@s_flag==1) goto L_1b; + if(@s_flag==2) goto L_1c; + if(@s_flag==3) goto L_1d; + if(@s_flag==4) goto L_1e; + set @s_flag, 0; + + L_1a: + mes "[Irrelevant Man]"; + mes "Howdy~ Howdy. What a Wonderful day today,isn't it?"; + mes "I feel like going on a 'Picnic' in the Pyramids with a couple freinds of mine today."; + set @s_flag, @s_flag+1; + close; + L_1b: + mes "[Irrelevant Man]"; + mes "'Lalalala, Home sweet Home.'"; + mes "I like this saying. Home Sweet Home...."; + set @s_flag, @s_flag+1; + close; + L_1c: + mes "[Irrelevant Man]"; + mes "...... I could fly if I fell off............ "; + set @s_flag, @s_flag+1; + close; + L_1d: + mes "[Irrelevant Man]"; + mes ".......Hmm?....."; + next; + mes "[Irrelevent Man]"; + mes "Hey!! DON'T LOOK AT ME like that! I'M NOT some WACKO okay!!!"; + set @s_flag, @s_flag+1; + emotion 6; + close; + L_1e: + mes "[Irrelevant Man]"; + mes "Dude! I got nothin to say with you! Mind your own business! Sheesh!!"; + emotion 32; + close; + +L_Thief: + mes "[Irrelevant Man]"; + mes "Yah Hoo! Look at you! You became a Kool Thief!"; + emotion 21; + next; + mes "[Irrelevant Man]"; + mes "Don't worry about Shibu's Farm. Let the newbies handle that. Why don't ya go out and kill some stronger monsters."; + close; + +L_Novice: + if(job_thief_q==2) goto L_3; + if(job_thief_q==1) goto L_2; + mes "[Irrelevant Man]"; + mes "Hey!! Novice! Want to be Stronger and more Powerful!? Do you like hiding and sneeking around?"; + mes "If so, Join the Thief Guild! You are always welcome! Join now!"; + next; + mes "[Irrelevant Man]"; + mes "You can get more information in the 1st floor basement of the Pyramid!"; + close; +L_2: + mes "[Irrelevant Man]"; + mes "Pssst......Pssst......hey you! You look like your gonna take the ^ff0000'Test'^000000. Am I right?"; + next; + mes "[Irrelevant Man]"; + mes "Lets see here.....(checks his list).... you're ^ff0000"+ strcharinfo(0) +"^000000 right? Good."; + next; + mes "[Irrelevant Man]"; + mes "Ok! I'm gonna show you the way in but keep quite. I can't guarantee your safety so watch your back."; + next; + + L_Warp: + set @TEMP,rand(5); + set job_thief_q,2; + if(@TEMP != 0) goto warpL03a; + warp "job_thief1.gat",228,106; + close; + warpL03a: + if(@TEMP != 1) goto warpL03b; + warp "job_thief1.gat",38,50; + close; + warpL03b: + if(@TEMP != 2) goto warpL03c; + warp "job_thief1.gat",66,331; + close; + warpL03c: + if(@TEMP != 3) goto warpL03d; + warp "job_thief1.gat",196,331; + close; + warpL03d: + warp "job_thief1.gat",309,234; + close; + +L_3: + mes "[Irrelevant Man]"; + mes "Muhahahaha~~ WHAT???~~ You HAVEN'T PASSED the Test yet? Are you some sort of Idiot!! Kakakaka!!"; + emotion 18; + next; + mes "[Irrelevant Man]"; + mes "Just kidding..... NOT!!. Anywho I'll let ya back in!"; + next; + menu "Ready",M_Yes,"Not yet",M_No; + + M_Yes: + goto L_Warp; + + M_No: + mes "[Irrelevant Man]"; + mes "Ok, let me know when you are."; + close; + +} diff --git a/npc/jobs/2-1-1/AssassinCross.txt b/npc/jobs/2-1-1/AssassinCross.txt new file mode 100644 index 000000000..da841b601 --- /dev/null +++ b/npc/jobs/2-1-1/AssassinCross.txt @@ -0,0 +1,70 @@ +//Assasin Cross Made by Evera/Lorri +valkyrie.gat,44,58,6 script Assassin Cross 725,{ + if ((readparam(11)>=99) && (readparam(19)==12) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19)==4001) && (readparam(55) >= 10)) goto Lhtheif; + if ((readparam(19)==4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19)==4007) && (readparam(55) >= 40)) goto Lhsin; + if ((readparam(19)==4007) && (readparam(55) < 40)) goto LCem; + if ((readparam(19)) && (readparam(19))) goto LCongrats; + if (readparam(19)==4013) goto Lcrazy; + if (readparam(12) != 0) goto Lskpt; + mes "[Assasin Cross]"; + mes "Who are you?"; + mes "Meet all the req. first."; + close; +Lnovice: + mes "[Assasin Cross]"; + mes "Now, here's the deal. I change you into a High Novice."; + mes "You come back to become a High Theif, then become an Assassin Cross."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lhtheif: + mes "[Assasin Cross]"; + mes "Wanna become a High Theif?"; + menu "Yes",Lhtheif2,"No",Lcancel; +Lhtheif2: + mes "[Assasin Cross]"; + mes "We shall start the ceremony...."; + next; + jobchange 30;// Job: Job_Thief_High + close; +Lhsin: + mes "[Assasin Cross]"; + mes "Ready to become a Assassin Cross?"; + menu "Yes",Lhsin2,"No",Lcancel; +Lhsin2: + mes "[Assasin Cross]"; + mes "We shall start the ceremony...."; + jobchange 36;// Job: Job_Assassin_Cross + close; +Lcrazy: + mes "[Assassin Cross]"; + mes "We shall start the ceremony...."; + next; + mes "[Assassin Cross]"; + mes "You've already gone to the next level"; + close; +Lskpt: + mes "[Assasin Cross]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "We shall start the ceremony...."; + next; + mes "[Assassin Cross]"; + mes "You're not ready to go to the next level"; + close; +LCongrats: + mes "Congratulations on your victory."; + mes "May you and others have honor and glory!"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-1-1/HighPriest.txt b/npc/jobs/2-1-1/HighPriest.txt new file mode 100644 index 000000000..c7f08c2d6 --- /dev/null +++ b/npc/jobs/2-1-1/HighPriest.txt @@ -0,0 +1,61 @@ +//High Priest Made by Evera/Lorri +valkyrie.gat,44,42,6 script High Priest 60,{ + if ((readparam(11) >= 99) && (readparam(19) == 8) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4005) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4005) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4009) goto Lcrazy; + if (readparam(12) != 0) goto Lskpt; + mes "[High Priest]"; + mes "Hello"; + mes "God bless you."; + close; +Lnovice: + mes "[High Priest]"; + mes "Hi! I'm a little different from you, have you noticed?"; + mes "If you devote yourself entirely you can be just like me."; + mes "There is a catch though, you have to go back through novice and acolyte."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[High Priest]"; + mes "Ready to become a high acolyte?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[High Priest]"; + mes "God please bestow this enlightened soul with a drip of your mighty power."; + next; + jobchange 28;// Job: Job_Acolyte_High + close; +Lh2: + mes "[High Priest]"; + mes "Your holy power grows stronger. Will you become a high priest?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[High Priest]"; + mes "God please bestow this enlightened soul with a drip of your mighty power."; + jobchange 32;// Job: Job_High_Priest + close; +Lcrazy: + mes "[High Priest]"; + mes "Nice day isn't it?"; + close; +Lskpt: + mes "[High Priest]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[High Priest]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-1-1/HighWizard.txt b/npc/jobs/2-1-1/HighWizard.txt new file mode 100644 index 000000000..1e747000c --- /dev/null +++ b/npc/jobs/2-1-1/HighWizard.txt @@ -0,0 +1,60 @@ +//High Wizard Made by Evera/Lorri +valkyrie.gat,44,47,6 script High Wizard 735,{ + if ((readparam(11) >= 99) && (readparam(19) == 9) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4003) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4003) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4010) goto Lcrazy; + if (readparam(12) != 0) goto Lskpt; + mes "[High Wizard]"; + mes "Hello"; + mes "The magic surrounds you."; + close; +Lnovice: + mes "[High Wizard]"; + mes "Hey you! It appears that your intelligence is very high. Would you like to become a high wizard like me?"; + mes "There is a catch though, you have to go back through novice and mage."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[High Wizard]"; + mes "Ready to become a high mage?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[High Wizard]"; + mes "The magic enchants and suppresses you."; + next; + jobchange 26;// Job: Job_Mage_High + close; +Lh2: + mes "[High Wizard]"; + mes "The magic grows strong in you. You appear ready. Will you become a high wizard?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[High Wizard]"; + mes "The magic enchants and suppresses you."; + jobchange 33;// Job: Job_High_Wizard + close; +Lcrazy: + mes "[High Wizard]"; + mes "I cannot bestow you with more of my magic."; + close; +Lskpt: + mes "[High Wizard]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[High Wizard]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-1-1/LordKnight.txt b/npc/jobs/2-1-1/LordKnight.txt new file mode 100644 index 000000000..01791b798 --- /dev/null +++ b/npc/jobs/2-1-1/LordKnight.txt @@ -0,0 +1,62 @@ +//Lord Knight Made by Evera/Lorri +//Fixed by PoW +valkyrie.gat,44,39,6 script Lord Knight 56,{ + if ((readparam(11) >= 99) && (readparam(19) == 7) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(11) >= 99) && (readparam(19) == 13) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lhsword; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4002) && (readparam(55) >= 40)) goto Lhkni; + if ((readparam(19) == 4002) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4008) goto Lcrazy; + if (readparam(12) != 0) goto Lskpt; + mes "[Lord Knight]"; + mes "Hello"; + mes "It's a nice day, isnt it?"; + close; +Lnovice: + mes "[Lord Knight]"; + mes "The honor a knight carries is high, but there is something beyond that. The lord knight."; + mes "You come back to become a High Swordsman, then become a Lord Knight."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lhsword: + mes "[Lord Knight]"; + mes "Ready to become a high swordsman??"; + menu "Yes",Lhsword2,"No",Lcancel; +Lhsword2: + mes "[Lord Knight]"; + mes "By the vow of my sword, here is the one bestowed upon with the truthful heart"; + next; + jobchange 25;// Job: Job_Swordman_High + close; +Lhkni: + mes "[Lord Knight]"; + mes "The final step in a knight's quest for honor. Will you become a lord knight?"; + menu "Yes",Lhkni2,"No",Lcancel; +Lhkni2: + mes "[Lord Knight]"; + mes "By the vow of my sword, here is the one bestowed upon with the truthful heart"; + jobchange 31;// Job: Job_Lord_Knight + close; +Lcrazy: + mes "[Lord Knight]"; + mes "Nice day isn't it?"; + close; +Lskpt: + mes "[Lord Knight]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Lord Knight]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-1-1/Sniper.txt b/npc/jobs/2-1-1/Sniper.txt new file mode 100644 index 000000000..91524c9a4 --- /dev/null +++ b/npc/jobs/2-1-1/Sniper.txt @@ -0,0 +1,64 @@ +//Sniper Made by Evera/Lorri +valkyrie.gat,44,55,6 script Sniper 727,{ + if ((readparam(11) >= 99) && (Class == 11) && (JobLevel >= 50)) goto Lnovice; + if ((Class == 4001) && (readparam(55) >= 10)) goto Lharcher; + if ((Class == 4001) && (readparam(55) < 10)) goto LCem; + if ((Class == 4004) && (readparam(55) >= 40)) goto Lhsni; + if ((Class == 4004) && (readparam(55) < 40)) goto LCem; + if (Class == 4012) goto Lcrazy; + mes "[Sniper]"; + mes "Who are you?"; + mes "Only the archer class can become a Sniper..."; + mes "Meet all the requirements first."; + close; +Lnovice: + mes "[Sniper]"; + mes "Now, here's the deal. I change you into a High Novice."; + mes "You come back to become a Sniper, then become a sniper."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + if (readparam(12) != 0) goto Lskpt; + mes "By the tip of my arrow.. The distance it moves..."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lharcher: + mes "[Sniper]"; + mes "Wanna become a High Arhcer?"; + menu "Yes",Lhtheif2,"No",Lcancel; +Lhtheif2: + if (readparam(12) != 0) goto Lskpt; + mes "[Sniper]"; + mes "By the tip of my arrow.. The distance it moves..."; + next; + jobchange 27;// Job: Job_Archer_High + close; +Lhsni: + mes "[Sniper]"; + mes "Ready to become a sniper, like me??"; + menu "Yes",Lhsni2,"No",Lcancel; +Lhsni2: + if (readparam(12) != 0) goto Lskpt; + mes "[Sniper]"; + mes "By the tip of my arrow.. The distance it moves..."; + jobchange 35;// Job: Job_Sniper + close; +Lcrazy: + mes "[Sniper]"; + mes "You're already a Sniper!"; + mes "How are you doing?"; + close; +Lskpt: + mes "[Sniper]"; + mes "Please finish up your skillpoints first"; + close; +LCem: + mes "[Sniper]"; + mes "Please train your arrows to move faster."; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-1-1/WhiteSmith.txt b/npc/jobs/2-1-1/WhiteSmith.txt new file mode 100644 index 000000000..d652ac93b --- /dev/null +++ b/npc/jobs/2-1-1/WhiteSmith.txt @@ -0,0 +1,60 @@ +//Whitesmith Made by Evera/Lorri +valkyrie.gat,44,50,6 script Whitesmith 731,{ + if ((readparam(11) >= 99) && (readparam(19) == 10) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4006) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4006) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4010) goto Lcrazy; + if (readparam(12) != 0) goto Lskpt; + mes "[Whitesmith]"; + mes "Hello"; + mes "I am not currently available for forging, please ask another forger."; + close; +Lnovice: + mes "[Whitesmith]"; + mes "Hm. You weild your hammer pretty good. You wanna become a whitesmith?"; + mes "There is a catch though, you have to go back through novice and merchant."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[Whitesmith]"; + mes "Ready to become a high merchant?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[Whitesmith]"; + mes "You're on your way to making upgraded items."; + next; + jobchange 29;// Job: Job_Merchant_High + close; +Lh2: + mes "[Whitesmith]"; + mes "Hey, you've grown a lot. Will you become a whitesmith?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[Whitesmith]"; + mes "The magic enchants and suppresses you."; + jobchange 34;// Job: Job_Whitesmith + close; +Lcrazy: + mes "[Whitesmith]"; + mes "Hm. You look like me."; + close; +Lskpt: + mes "[Whitesmith]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Whitesmith]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-1/assassin.txt b/npc/jobs/2-1/assassin.txt new file mode 100644 index 000000000..e5665243c --- /dev/null +++ b/npc/jobs/2-1/assassin.txt @@ -0,0 +1,1918 @@ +//===== eAthena Script ======================================= +//= Assassin Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena RC4 +//===== Description: ========================================= +//= Based of Official RO Assassin jobchange quest. There are small +//= differences due to gameplay issues. +//===== Additional Comments: ================================= +//= v1.0 Used some dialogue from the aegis Assassin script translated By: Pgro Team (OwNaGe) +//= Also converted the booby traps from the aegis script.[kobra_k88] +//=v1.1 Made adjustments to ontouch npcs to work with the new "ontouch" functionality. +//= Fixed some duplicate npc names. Added missing waitingroom triggers. +//= Fixed warp in "TimerSin", was supposed to be an areawarp. +//= For some reason sometimes the "Nameless One" would have message windows +//= without controls. Changed the doevent that triggers him to an +//= addtimer and that seemed make the prob. go away[kobra_k88] +//============================================================ + + + +//============================================================================// +// Job Changer +//****************************************************************************// + +in_moc_16.gat,19,33,4 script Guildsman 55,{ + if(Class==Job_Assassin) goto L_JobSin; + mes "[Angry looking man]"; + if(Class==Job_Thief) goto L_Thief; + if(callfunc("Is_Sword_Class")) goto L_JobSwo; + if(callfunc("Is_Magic_Class")) goto L_JobMag; + if(callfunc("Is_Bow_Class")) goto L_JobArch; + if(callfunc("Is_Holy_Class")) goto L_JobAco; + if(callfunc("Is_Merc_Class")) goto L_JobMerc; + if(callfunc("Is_Thief_Class")) goto L_JobOther; + +L_JobNov: + mes "....HEY Novice!!! GET out of here now!! I won't be held responsible if anything bad happens to you......."; + emotion 0; + close; +L_JobSwo: + mes "....What are you doing here???"; + emotion 1; + next; + mes "[Angry looking man]"; + mes "Doing what you're ordered to do eh?........ You guys are nothing more than dogs that listen to their owners............."; + emotion 32; + close; +L_JobMag: + mes "...What's a mage like you doing here? You should be paying more attention to your training....."; + emotion 20; + close; +L_JobArch: + mes "Uh.... you're one of those people with bows right? Sorry but there are no cute pets here for u to kill.........."; + emotion 4; + next; + mes "[Angry looking man]"; + mes "Wait...... You're not here to create trouble eh!!? ....LEAVE AT ONCE!!"; + emotion 0; + close; +L_JobAco: + mes "...Oh God's little helper..... What are you doing down in a dreadful place like this?"; + mes "Trust me, you're not going to find any salvation here........ why don't you just run along ok?........"; + emotion 20; + close; +L_JobMerc: + mes ".... What the??? Do you have any idea where you are??...... GREEDY SCAMMERS like you are not welcome here!!"; + emotion 29; + close; +L_JobOther: + mes ".... Hmm.... although you're not an Assassin or Thief... I have to say I like your sense of style."; + close; +L_JobSin: + mes "[Assassin Huey]"; + mes "Oohh, its you. You're...." + strcharinfo(0) + " right?"; + next; + mes "[Assassin Huey]"; + mes "Too bad there's nothing to do right now. You should go train more. Bye."; + close; + +L_Thief: + if(JobLevel >= 40) goto L_Start; + mes "Hmm? What brings you here?.... I don't think I like the way you're looking at me....?!"; + emotion 1; + next; + mes "[Angry looking man]"; + mes ".... Hmm.... You're not qualified yet. To become an Assassin you will have to meet our expectations."; + next; + mes "[Angry looking man]"; + mes "Why don't you go train some more...... You need to have a job level of at least 40 to even hope of becoming one of us...."; + close; + +L_Start: + if(ASSIN_Q == 1) goto L_Failed1; + if(ASSIN_Q == 2) goto L_Failed2; + if(ASSIN_Q == 4) goto L_Change; + mes ".... A Thief huh?..... And a well trained one at that, cause I can't seem to find my wallet!"; + emotion 18; + next; + mes "[Angry looking man]"; + mes "We need people like you, you know........ So how about taking the next step in the world of crime, and become an Assassin?"; + M_Menu: + next; + menu "You bet! I've picked my last pocket.",M_0, "What are the requirements?",M_1, "Maybe later.... I need to steal some things first.",M_2; + + M_0: + mes "[Angry looking man]"; + mes "It's been a long time since we've recieved any Assassin candidates..... anyhow let me send you ^5533FFAssassin 'Khai'^000000."; + mes "He'll take care of the registration process."; + enablenpc "Assassin Kai#1"; + disablenpc "Assassin Kai#2"; + savepoint "in_moc_16.gat", 19, 27; + close2; + warp "in_moc_16.gat", 19, 76; + end; + M_1: + mes "[Angry looking man]"; + mes "Requirements? Here they are...."; + mes "#1. You have to be a Thief."; + mes "#2. Must have a job level of at least 40."; + mes "#3. You have to past the Assassin guild tests."; + next; + mes "[Angry looking man]"; + mes "That's all there is too it. If you're confident in your abilities, then test will be a piece of cake."; + goto M_Menu; + M_2: + mes "[Angry looking man]"; + mes "Hmm..? Ok then... so be it........"; + close; + +L_Failed1: + mes "What's this? I can't believe you failed the first test."; + mes "~Sigh~........................"; + close2; + disablenpc "Assassin Kai#1"; + enablenpc "Assassin Kai#2"; + warp "in_moc_16.gat", 19, 76; + end; + +L_Failed2: + mes "What are you doing out here?? Go back in and finish the second test!!"; + close2; + warp "in_moc_16.gat", 21, 160; + end; + +L_Change: + if (skpoint > 0) goto L_SkPoints; + if(countitem(1008) < 1) goto L_NoNecklace; + mes "Ah... the Necklace of Oblivion..... that means that the Guild Master has accepted you into the Assassin clan."; + next; + mes "[Assassin Huey]"; + mes "Congratulations! After all of your hard work, you can finally become an Assassin!"; + emotion 21; + next; + mes "[Assassin Huey]"; + mes "Very well done, you are now offically an Assassin. Although you are free to visit us at anytime.............."; + setlook 7,0; + jobchange Job_Assassin; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + set kaitrig, 0; + next; + mes "[Assassin Huey]"; + mes "Remember that you are on your own now. The shadows are your new home and your best freinds are the blades in your hands..........."; + close; + + L_SkPoints: + mes "You will need to use up all of your skill points if you want to become an Assassin."; + close; + + L_NoNecklace: + mes "Hmm? You want me to promote you to the job class of Assassin? Well show me your ^5544FF'Necklace of Oblivion'^000000 then......."; + next; + mes "[Assassin Huey]"; + mes "You do have one don't you? Only those who have been given the 'Necklace of Oblivion' by the Guild Master have the right to become Assassins."; + next; + menu "Oh yeah.... It's in my other pair of Thief pants....",-, "Well... It kinda got stolen... heh....",M_Restart; + + mes "[Assassin Huey]"; + mes "I don't care where it is.... if you want to become an Assassin you'd better get it."; + close; + + M_Restart: + mes "[Assassin Huey]"; + mes "........................................"; + next; + mes "[Assassin Huey]"; + mes "!!(shouts profanities at you)!!"; + next; + mes "[Assassin Huey]"; + mes "Have fun stating ALL OVER!!"; + set ASSIN_Q, 0; + set ASSIN_Q2, 0; + close2; + warp "moc_fild16.gat", 206, 155; + end; +} + + +//============================================================================// +// Registrar +//****************************************************************************// + +// Assassin Kai: First Position ================================= +in_moc_16.gat,21,91,4 script Assassin Kai#1 730,4,4,{ + end; + +OnTouch: + mes "[Assassin Kai]"; + mes "Ummm???...."; + disablenpc "Assassin Kai#1"; + enablenpc "Assassin Kai#2"; + close; +} + +// Assassin Kai: Second Position ============================== +in_moc_16.gat,25,90,4 script Assassin Kai#2 730,2,1,{ + if(kaitrig == 1) goto OnTouch; + mes "[Assassin Kai]"; + mes "Come closer to me, I like to see a persons face when I'm talking to them."; + close; + +OnTouch: + set kaitrig, 1; + mes "[Assassin Kai]"; + if(ASSIN_Q==1) goto L_Failed; + mes "So you're an Assassin candidate.... ~sigh~.... Let me apologize for my behavior...."; + mes "You see, when someone comes near me, I can't help but hide...... it's a bad habbit really...."; + next; + mes "[Assassin Kai]"; + mes "Anyhow, welcome. So you want to be an Assassin do you?"; + next; + menu "Yes. ",M_Yes, "...No.",M_No; + + M_Yes: + mes "[Assassin Kai]"; + mes "Okay, good. Fill out this form first. Make sure to write your name and your job level down"; + next; + mes "(you fill out the form and hand it back)"; + next; + mes "[AssassinKai]"; + mes "Let's see... your name is ^5533FF" +strcharinfo(0)+ "^000000... and you have a job level of "+JobLevel+"...."; + next; + mes "[AssassinKai]"; + if(JobLevel == 50) goto sL_HighLvl; + mes "Well, you barely passed the job requirements but, meh, it's not important"; + mes "~mumbles~(no one has any guts anymore.... bunch of pansies......)"; + next; + mes "[Assassin Kai]"; + mes "Hmm? What's that? Oh I was just talking to myself.... it was nothing really......."; + mes "Anyway, let me send to to the test hall for your first test."; + set JBLVL, 40; + close2; + warp "in_moc_16.gat", 19, 141; + end; + + sL_HighLvl: + mes "Wow you have a job level of 50! You've been training hard haven't you?"; + mes "The Guild Master will be pleased to see someone of your qualifications."; + next; + mes "[Assassin Kai]"; + mes "You first test will be with the ^5533FF'Nameless One'^000000. I'll send you too him right away."; + set JBLVL, 50; + close2; + warp "in_moc_16.gat", 19, 141; + end; + + M_No: + mes "[Assassin Kai]"; + mes "Huh?? You don't?........"; + emotion 1; + next; + mes "[Assassin Kai]"; + mes "Are you trying to play games with me??"; + next; + mes "[Assassin Kai]"; + mes "Don't you want to become an Assassin?............"; + next; + menu "Not really....",-, "Yes, of course I do.",sM_Yes; + + mes "[Assassin Kai]"; + mes "....Well, if thats the case,........ GET OUT!!"; + close2; + warp "moc_fild16.gat", 206, 229; + end; + sM_Yes: + mes "[Assassin Kai]"; + mes "...... Hmf...... Anyways......"; + next; + goto M_Yes; + +L_Failed: + mes "Ehhh? Weren't you just here a minute ago?"; + emotion 1; + next; + mes "[Assassin Kai]"; + mes "What's this?..... You failed the first test?"; + next; + mes "[Assassin Kai]"; + mes "HAHAHAHAAHAHAHAHA!!!!"; + emotion 18; + next; + mes "[Assassin Kai]"; + mes "Hehe...HAHA...~cough~..Damn.... It's been a long time since I've met a looser like you..... Ha Ha...."; + emotion 18; + next; + mes "[Assassin Kai]"; + mes "Oh...sorry for laughing in your face like this.... but it's just too funny... hahahehehe...."; + emotion 18; + next; + mes "[Assassin Kai]"; + mes "So..... do you need me to give you any hints?"; + next; + menu "...yes ...please",-, "Stop laughing and just give me the stupid tips!.",M_1, "Shut up! I don't need your stinkin help!!",M_2; + + mes "[Assassin Kai]"; + mes "Hahaahhaha!!! Well at least you're honest....."; + mes "Haha....My stomach...ouch... my stomach hurts!! You're killing me! Hahahaha!!!"; + emotion 18; + next; + mes "[Nameless One]"; + mes ".....Hahaha."; + next; + mes "[Assasin Kai]"; + mes "HAHAHAHA!! Nameless One, you think its funny too?"; + emotion 18; + next; + mes "[Nameless One]"; + mes "Hehehe..... yes very....."; + next; + mes "[Assassin Kai]"; + mes "Heh heh..... Oh my....."; + next; + mes "[Assassin Kai]"; + mes "..... so you want some pointers huh?"; + next; + mes "[Assassin Kai]"; + mes "..."; + next; + mes "[Assassin Kai]"; + mes "....."; + next; + mes "[Assassin Kai]"; + mes "........"; + next; + mes "[Assassin Kai]"; + mes "..............."; + next; + mes "[Assassin Kai]"; + mes "......Hmmm..... Too bad. I don't feel like giving you any."; + next; + mes "[Assassin Kai]"; + mes "Hahaha.... I can't beleive this..... hahaha....."; + emotion 18; + close2; + warp "in_moc_16.gat", 19, 141; + end; + M_1: + mes "[Assassin Kai]"; + mes "Hmm..... I see... Sorry about my outburst of laughter...... people make mistakes from time to time..... I understand this."; + next; + mes "[Assassin Kai]"; + mes "Although I can't give you any answers to the test, I can give you some usefull information about Assassins that may help you......"; + next; + mes "[Assassin Kai]"; + mes "For an Assassin honor and pride is of the utmost importance. You cannot be an Assassin without any honor."; + mes "....One day people will come to rely on you. Waiting for that day is an Assassin's destiny."; + next; + mes "[Assassin Kai]"; + mes "Assassins are destined to live a solitary life. Our lifestyles make it difficult for us to get close to anyone."; + mes "Imagine what your loved ones would think if they saw your blood stained hands......."; + next; + mes "[Assassin Kai]"; + mes "..... Without a doubt, they would be shocked and become fearfull of you."; + mes "They would not be able to stay by your side, leaving you all alone to deal with your sins."; + next; + mes "[Assassin Kai]"; + mes "Though it is lonesome, it is still a worthy existance."; + mes "As an Assassin you are free to do as you choose without anyone tying you down or holding you back."; + next; + mes "[Assassin Kai]"; + mes "This is all I have to say about Assassins...... I hope what I've said doesn't depress you?"; + close2; + warp "in_moc_16.gat", 19, 141; + end; + M_2: + mes "[Assassin Kai]"; + mes "...Hmmm....."; + next; + mes "[Assassin Kai]"; + mes "Good. Thats the spirit! Never let anyone take away your confidence."; + mes "Assassins must be strong minded and determined. I apologize for laughing at you earlier."; + next; + mes "[Assassin Kai]"; + mes "Unfortunately there are too many morons nowadays, who are not very knowledgable about thier jobs......."; + next; + mes "[Assassin Kai]"; + mes "How could they forget about the struggles necessary to become an Assasin??!! They are truly shameless......"; + next; + mes "[Assassin Kai]"; + mes "So please............."; + next; + mes "[Assassin Kai]"; + mes "Always remember to be proud of the fact that you are an Assassin."; + mes "Have repsect for the blood that stains your katars and daggers!!"; + next; + menu "Ok cotcha.",-, "Uh... I'm confused.....",sM_End; + + mes "[Assassin Kai]"; + mes ".... Good! I'm glad you understand what I'm talking about. Here, let me give you some tips about the first test......"; + next; + callsub sF_Quiz; + next; + mes "[Assassin Kai]"; + mes "I've said quite a lot and I acutally feel a little bit tired now. Hopefully you will do better this time."; + mes "Get ready, I will send you to the test hall again."; + close2; + warp "in_moc_16.gat", 19, 141; + close; + + sM_End: + mes "[Assassin Kai]"; + mes ".... Hmf... how can you be such an idiot??? You couldn't understand what I was talking about??"; + emotion 23; + next; + mes "[Assassin Kai]"; + mes "Is an Assassin's honor that hard to comprehend?!"; + next; + mes "[Assassin Kai]"; + mes "Grrrrr!!! You're probably going to be a moron all of your life..........."; + emotion 6; + next; + mes "[Assassin Kai]"; + mes "GET OUT! Get out of here right now!! You're not fit to become an Assassin!!!"; + emotion 32; + close2; + warp "c_tower4.gat", 64, 76; + close; + +sF_Quiz: + if(@temp == 1) goto sL_Quiz2; + if(@temp == 2) goto sL_Quiz3; + + sL_Quiz1: + mes "[Assassin Kai]"; + mes "First of all, the skill ^554433Grimtooth^000000 can only be used with ^554433Katar^000000 type weapons. It is useless with Daggers."; + next; + mes "[Assassin Kai]"; + mes "Poison is a must for all assassins."; + next; + mes "[Assassin Kai]"; + mes "Have you used ^554433Double Attack^000000? ...It'll hit the enemy twice ^554433without using sp^000000."; + next; + mes "[Assassin Kai]"; + mes "^554433Red Gemstones^000000 are the only stones that Assassins use. Blue Gemstones are useless to Assassins!"; + next; + mes "[Assassin Kai]"; + mes "Water is stronger than Fire... so that means Water is good against Fire element monsters"; + next; + mes "[Assassin Kai]"; + mes "Water is moved by Wind, so that means ^554433Water is weak against Wind^000000."; + next; + mes "[Assassin Kai]"; + mes "You use ^554433Cloak only when your close to a wall^000000. You can only be 1 cell away from the wall or else you'll be seen."; + return; + sL_Quiz2: + mes "[Assassin Kai]"; + mes "Some Katars have element powers"; + next; + mes "[Assassin Kai]"; + mes "What weapon is worth buying? If you don't know, look at your hands."; + next; + mes "[Assassin Kai]"; + mes "Katars are weapons that are dropped by monsters in the desert. They are very useful"; + next; + mes "[Assassin Kai]"; + mes "The Katar is one of the strongest weapons a Assassin can use."; + next; + mes "[Assassin Kai]"; + mes "I ^554433wouldn't want to raise a Rohda Frog as pet^000000, and neither would anyone else for that matter."; + next; + mes "[Assassin Kai]"; + mes "^554433Fire^000000 is effective against ^554433ground type monsters^000000."; + next; + mes "[Assassin Kai]"; + mes "If you want to know what element your weapon is, look at its name."; + return; + sL_Quiz3: + mes "[Assassin Kai]"; + mes "The ^554433Elder willow card adds to your intelligence^000000."; + next; + mes "[Assassin Kai]"; + mes "We Assassins specialize in the ability to dodge and attack. Our defense however, is very poor."; + next; + mes "[Assassin Kai]"; + mes "......"; + next; + mes "[Assassin Kai]"; + mes "Dagger class weapons can be used on two hands!"; + next; + mes "[Assassin Kai]"; + mes "I haven't been to Morroc for a long time.... not since I became a Thief anyway......"; + next; + mes "[Assassin Kai]"; + mes "Stealing mushrooms..... what fond memories I had of those orange gooey mushrooms....."; + next; + mes "[Assassin Kai]"; + mes "The ^554433Baphomet Jr. card adds 3 agility and 1 critical^000000 to your stats"; + next; + mes "[Assassin Kai]"; + mes "We Assassins have the highest agility of all the other classes. We can get a ^5533FFmaximum of 10 extra points in agility^000000."; + return; +} + + + +//============================================================================// +// First Test +//****************************************************************************// + +// ---------------------------------------------------------------- +// Keeps the player from moving to far into the room. +// This is to avoid cheaters who might try to take Bakardi's test first. +in_moc_16.gat,19,144,1 script getbacker 139,8,0,{ + if(ASSIN_Q > 1) end; + warp "in_moc_16.gat",19,142; + addtimer 700, "Nameless One::OnTimer700"; + end; +} + +// Namelss One ==================================================== +in_moc_16.gat,19,150,1 script Nameless One 139,{ + +OnTimer700: + if(ASSIN_Q == 1) goto L_ReTest; + set @LISTEN, 0; + + mes "[Nameless One]"; + mes "Welcome, my guest. Muhahaha!!!...... There is no use in trying to find me for I am perfectly hidden!"; + mes "The ability to beome totaly hidden is the TRADEMARK of a GREAT Assassin!!"; + next; + mes "[Nameless One]"; + mes "Huh? Why don't I have a name? Muhahahahaha!!!... The better question to ask is why am I hidden....."; + next; + mes "[Nameless One]"; + mes "Afterall I may be trying to assassinate you!!........ Does this scare you?"; + next; + menu "Eeek! Uh... I think I wet my pants.....",-, "Bleh! Your all talk! Come on, challenge me!",M_1; + + mes "[Nameless One]"; + mes "Heh.... doesn't surprise me. I could tell that you were nothing but a wimp!"; + mes "If we had met anywhere else, I would have torn you apart limb from limb....."; + next; + mes "[Nameless One]"; + mes "Hmf..... I don't have time for wussies..... get lost......"; + close2; + disablenpc "Assassin Kai#1"; + enablenpc "Assassin Kai#2"; + warp "in_moc_16.gat", 19, 76; + end; + M_1: + mes "[Nameless One]"; + mes "What?.... So you think you're tough hugh?............"; + next; + mes "[Nameless One]"; + mes "................"; + next; + mes "[Nameless One]"; + mes "Hmf.............."; + next; + mes "[Nameless One]"; + mes "Let me tell you something..........."; + next; + mes "[Nameless One]"; + mes "I'm a cold blooded killer.... where ever I go, a trail of blood follows my every foot step....."; + next; + mes "[Nameless One]"; + mes "A true Assasin such as myself does not need to be recognized by name..... I am known only by the sharp edges of my blades."; + next; + mes "[Nameless One]"; + mes "It is my 'handy work' that has gotten me this far..... I have never had any remorse over any of the assignments I've taken...."; + mes "To 'eliminate' targets is what I am here to do."; + next; + mes "[Nameless One]"; + mes "Although you speak with confindence, understand this........."; + next; + mes "[Nameless One]"; + mes "Only those who are trully cold blooded and without fear, can make it as an Assassin...."; + mes "You will have to do much more than act like an arrogant fool to convince me that you are worthy of being one........."; + next; + mes "[Nameless One]"; + mes "Before I start the quiz, I will let you ask me some basic questions."; + sM_Menu: + next; + menu "...What are the skills?",-, "...What's most important about an Assassin?",sM_1, "...Thats enough, I want to start the test.",sM_End; + + mes "[Nameless One]"; + mes "Yes, the skills. Skills are very useful to an Assassin. The basic skills are the masteries. I'll tell you about those first."; + next; + mes "[Nameless One]"; + mes "First, there's ^5533FFKatar mastery^000000. Katar mastery will increases your attack damage when using a Katar."; + mes "This skill is very helpful for Katar users."; + next; + mes "[Nameless One]"; + mes "Assassins have the ability to use two weapons at the same time. This makes them very fierce warriors."; + mes "However using two weapons at once does have its drawbacks....."; + next; + mes "[Nameless One]"; + mes "It is much more difficult to use 2 weapons at once and therefore the damage you do will be less for each hand."; + next; + mes "[Nameless One]"; + mes "That is why there is ^5533FF'Left hand mastery' and 'Right hand mastery'^000000."; + mes "By mastering these skills, you will be able to regain your attack power for both hands."; + next; + mes "[Nameless One]"; + mes "Left hand mastery can be learned when you have gained 2 levels of Right hand mastery."; + mes "Combined with Katar mastery, you can become a very deadly Assassin indeed."; + next; + mes "[Nameless One]"; + mes "^5533FF'Sonic Blow'^000000 is an extremely fast attacking skill. It will allow you to hit the enemy up to 8 times within the blink of an eye."; + next; + mes "[Nameless One]"; + mes "This skill only works with a Katar. You also must have at least level 4 Katar Mastery to learn it."; + mes "The amount of damage done by Sonic Blow depends on how much strength you have."; + next; + mes "[Nameless One]"; + mes "^5533FF'Grimtooth^000000 .... what if you could attack someone without being seen?"; + mes "The skill Grimtooth allows you to do just that. While you are cloaked you can do a long range, splash damage attack with Grimtooth."; + next; + mes "[Nameless One]"; + mes "Because of the splash damage, Grimtooth can be useful in mob situations."; + mes "The higher the level of Grimtooth you have the farther you can attack."; + next; + mes "[Nameless One]"; + mes "'In order to use ^5533FFCloak^000000, you must have level 2 hide."; + mes "Cloak allows you to not only become invisible, but it allows you to move around while you are hidden as well."; + next; + mes "[Nameless One]"; + mes "You can only move when you are close to a wall though."; + next; + mes "[Nameless One]"; + mes "'There is a technique that allows you to give a weapon the poison property. It is called ^5533FFEnchant Poison^000000."; + next; + mes "[Nameless One]"; + mes "Once enchanted with poison, there is a chance that an enemy hit by your weapon will become poisoned."; + mes "You will need at least level 1 Envemon to use this skill."; + next; + mes "[Nameless One]"; + mes "^5533FF'Poison React'^000000. This skill will allow you to counter an attack made by a poison type monster."; + mes "If you want to learn Poison React you must have at least level 3 Enchant posion."; + next; + mes "[Nameless One]"; + mes "^5533FF'Vemon Dust'^000000. With this skill you will be able to poison an area on the ground."; + mes "When a monster enters the area you poisoned there is a good chance that the moster will become poisoned as well."; + next; + mes "[Nameless One]"; + mes "The higher the level of the skill, the longer the poison stays in effect. You will need a Red Gemstone to use this skill."; + mes "Level 5 Enchant Poison is a requirment for learning Venom Dust."; + next; + mes "[Nameless One]"; + mes "^5533FF'Venom Splasher'^000000. Not only does this skill poison a target, but it makes the target explode splashing venom everywhere."; + next; + mes "[Nameless One]"; + mes "A monster that is hit with Venom Splasher will only explode when it's HP is at 1/3 of maximum."; + next; + mes "[Nameless One]"; + mes "This is the most difficult skill to learn for an Assassin. You'll need at least level 5 Venom Dust and level 5 Poison React to learn this skill"; + next; + mes "[Nameless One]"; + mes "Those are all of the Assassin skills."; + set @LISTEN, @LISTEN + 1; + goto sM_Menu; + sM_1: + mes "[Nameless One]"; + mes "Hmm.... well for Assassins the most important stat is Agility."; + mes "By investing in Agility, your ability to dodge and your attack speed will increase greatly."; + next; + mes "[Nameless One]"; + mes "Another good stat to invest in is Strength. Having good amounts of Strength with increase your attack allowing you to kill faster."; + next; + mes "[Nameless One]"; + mes "This is as much as I can tell you about stats. The rest you will have to figure out through your own experimentation."; + set @LISTEN, @LISTEN + 1; + goto sM_Menu; + sM_End: + set ASSIN_Q, 1; + if(@LISTEN > 0) goto L_Test; + mes "[Nameless One]"; + mes "Hahaha! You're very cocky aren't you..... Don't want to listen to what I have to say eh?!"; + next; + mes "[Nameless One]"; + mes "Fine then........ I want to see whether or not you can pass this test....."; + next; + +L_Test: + mes "[Nameless One]"; + mes "Ok, it's now time for the test. If you get more than 1 question ^FF5533wrong^000000, you wil fail the test."; + next; + mes "[Nameless One]"; + mes "You will not be told which answers you got right or which answers you got wrong."; + next; + set @temp, rand(3); + set @score, 0; + mes "[Nameless One]"; + mes "Alright, let us begin....."; + next; + if(@temp == 1) goto L_Quiz2; + if(@temp == 2) goto L_Quiz3; + + L_Quiz1: + mes "[Nameless One]"; + mes "1. What here is ^FF5533not^000000 a prerequisite of the skill Grimtooth?"; + next; + menu "Cloak Lv 2",sM_1a, "Sonic Blow Lv 5",sM_1a, "Hide Lv 2",sM_1a, "Left hand mastery Lv 2",-; + + set @score, @score + 10; + sM_1a: + + mes "[Nameless One]"; + mes "2. Enchant Poison makes your weapon what element?"; + next; + menu "Poison",-, "Earth",sM_2a, "Fire",sM_2a, "Wind",sM_2a; + + set @score, @score + 10; + sM_2a: + + mes "[Nameless One]"; + mes "3. What is the function of level 4 ^5533FFLeft^000000 Hand Mastery?"; + next; + menu "Attack +80% ",sM_3a, "Attack +70%",-, "Attack +90%",sM_3a, "Attack +108%!!",sM_3a; + + set @score, @score + 10; + sM_3a: + + mes "[Nameless One]"; + mes "4. What item do you need to use when you use the skill 'Venom Dust'?"; + next; + menu "Green Gemstone",sM_4a, "Blue Gemstone",sM_4a, "Yellow Gemstone",sM_4a, "Red Gemstone",-; + + set @score, @score + 10; + sM_4a: + + mes "[Nameless One]"; + mes "5. When you increase Enchant Poison up to level 5, what new skill will appear?"; + next; + menu "Venom Splasher",sM_5a, "Grimtooth",sM_5a, "Sonic Blow",sM_5a, "Venom Dust",-; + + set @score, @score + 10; + sM_5a: + + mes "[Nameless One]"; + mes "6. What skill listed below allows you to be walk around unseen?"; + next; + menu "Hide",sM_6a, "Backslide",sM_6a, "Cloak",-, "Throw Sand",sM_6a; + + set @score, @score + 10; + sM_6a: + + mes "[Nameless One]"; + mes "7. What is the requirement for Venom Dust?"; + next; + menu "Enemy must be weak.",sM_7a, "Must use a red gemstone.",-, "You must have a certain amount of health.",sM_7a; + + set @score, @score + 10; + sM_7a: + + mes "[Nameless One]"; + mes "8. What monster card listed below adds to Intelligence?"; + next; + menu "Steel Chonchon",sM_8a, "Deviruchi",sM_8a, "Elder Willow",-, "Baphomet",sM_8a; + + set @score, @score + 10; + sM_8a: + + mes "[Nameless One]"; + mes "9. How much sp do you use when you do a double hit using a dagger?"; + next; + menu "15",sM_9a, "0",-, "10",sM_9a, "54",sM_9a; + + set @score, @score + 10; + sM_9a: + + mes "[Nameless One]"; + mes "10. What is the best type of sword to use in the Bybalan dungeon?"; + next; + menu "Sword of Piercing Wind",-, "Sword of Ice",sM_10a, "Sword of Earth",sM_10a, "Sword of Fire",sM_10a; + + set @score, @score + 10; + sM_10a: + goto L_Score; + + L_Quiz2: + mes "[Nameless One]"; + mes "1. Which monster drops a slotted Katar?"; + next; + menu "Male Thief Bug",sM_1b, "PecoPeco",sM_1b, "Desert wolf",-, "Kobold",sM_1b; + + set @score, @score + 10; + sM_1b: + + mes "[Nameless One]"; + mes "2. What card listed below can be inserted into a Jur?"; + next; + menu "Caramel",-, "Ghostring",sM_2b, "Baphomet Jr",sM_2b, "DoppelGanger",sM_2b; + + set @score, @score + 10; + sM_2b: + + mes "[Nameless One]"; + mes "3. Which class can forge weapons?"; + next; + menu "Merchant",sM_3b, "Blacksmith",-, "Thief",sM_3b, "Priest",sM_3b; + + set @score, @score + 10; + sM_3b: + + mes "[Nameless One]"; + mes "4. Which weapon listed below isn't a Katar class weapon?"; + next; + menu "Jur",sM_4b, "Jamadhar",sM_4b, "Infiltrator",sM_4b, "Gladius",-; + + set @score, @score + 10; + sM_4b: + + mes "[Nameless One]"; + mes "5. In Bybalan Dungeon a large amount of monsters are of what elemental type?"; + next; + menu "Water",-, "Fire",sM_5b, "Wind",sM_5b, "Earth",sM_5b; + + set @score, @score + 10; + sM_5b: + + mes "[Nameless One]"; + mes "6. What monster listed below can't be tamed and turned into a cute pet?"; + next; + menu "Poring",sM_6b, "Rhoda Frog",-, "Lunatic",sM_6b, "Poison Spore",sM_6b; + + set @score, @score + 10; + sM_6b: + + mes "[Nameless One]"; + mes "7. Choose the monster that is weakest to fire."; + next; + menu "Kobold (Sword)",sM_7b, "Kobold (Mace)",sM_7b, "Kobold (Hammer)",sM_7b, "Kobold (Axe)",-; + + set @score, @score + 10; + sM_7b: + + mes "[Nameless One]"; + mes "8. Choose the ^FF5533non^000000-elemental Katar."; + next; + menu "Katar of Raging Blaze",sM_8b, "Katar of Dusty Thornbush",sM_8b, "Sharpened Legbone of Ghoul",sM_8b, "Infiltrator",-; + + set @score, @score + 10; + sM_8b: + + mes "[Nameless One]"; + mes "9. Pick out the monster that doesn't belong in the group."; + next; + menu "Poring",sM_9b, "Ghostring",sM_9b, "Creamy",-, "Drops",sM_9b; + + set @score, @score + 10; + sM_9b: + + mes "[Nameless One]"; + mes "10. Choose a ^FF3355non^000000-undead monster."; + next; + menu "Drake",sM_10b, "Archer Skeleton",sM_10b, "Poison Spore",-, "Ancient Mummy",sM_10b; + + set @score, @score + 10; + sM_10b: + goto L_Score; + + L_Quiz3: + mes "[Nameless One]"; + mes "1. What is the increased dodge rate you get when you have the 'Improve Dodge' skill at level 10?"; + next; + menu "20",sM_1c, "30",-, "140",sM_1c, "15",sM_1c; + + set @score, @score + 10; + sM_1c: + + mes "[Nameless One]"; + mes "2. Which monster can detect someone who is hidden/cloaked?"; + next; + menu "Hodes",sM_2c, "Whispers",-, "Porings",sM_2c, "Munaks",sM_2c; + + set @score, @score + 10; + sM_2c: + + mes "[Nameless One]"; + mes "3. Assassins can use dual weapons. Which set of weapons below ^5544FFcan^000000 an Assassin use?"; + next; + menu "Jur and Mace",sM_3c, "Damascus and Claymore",sM_3c, "Damascus and Stiletto",-, "Axe and Stiletto",sM_3c; + + set @score, @score + 10; + sM_3c: + + mes "[Nameless One]"; + mes "4. Which town do you become a Thief in?"; + next; + menu "Prontera",sM_4c, "Lutie",sM_4c, "AldeBaren",sM_4c, "Morroc",-; + + set @score, @score + 10; + sM_4c: + + mes "[Nameless One]"; + mes "5. Which card has ^FF3355nothing^000000 to do with ^5533FFagility^000000?"; + next; + menu "Baphomet Jr card",sM_5c, "Whisper Card",-, "Male Thief Bug card",sM_5c, "Chonchon card",sM_5c; + + set @score, @score + 10; + sM_5c: + + mes "[Nameless One]"; + mes "6. What makes Assassins so special?"; + next; + menu "Excellent singing ability",sM_6c, "Excellent acting ability",sM_6c, "Excellent dancing ability",sM_6c, "Excellent dodging ability",-; + + set @score, @score + 10; + sM_6c: + + mes "[Nameless One]"; + mes "7. When an Assassin reaches a ^5533FFJob level of 50^000000, what is the added bonus he/she recieves to agility?"; + next; + menu "7",sM_7c, "8",sM_7c, "9",sM_7c, "10",-; + + set @score, @score + 10; + sM_7c: + + mes "[Nameless One]"; + mes "8. What piece of equipment cannot be used by an Assassin?"; + next; + menu "Sword",sM_8c, "Golden helm",-, "Dagger",sM_8c, "Jur",sM_8c; + + set @score, @score + 10; + sM_8c: + + mes "[Nameless One]"; + mes "9. When a Novice wants to become a Thief, what mushrooms does he/she need to steal?"; + next; + menu "Orange Net Mushrooms",-, "Red Gooey Mushrooms",sM_9c, "Orange Gooey Mushrooms",-, "Hairy Orange Mushrooms",sM_9c; + + set @score, @score + 10; + sM_9c: + + mes "[Nameless One]"; + mes "10. What card listed below is useless to an Assassin?"; + next; + menu "Ghostring card",sM_10c, "Elder willow card",-, "Skeleton Soldier card",sM_10c, "Kobold card",sM_10c; + + set @score, @score + 10; + sM_10c: + +L_Score: + mes "[Nameless One]"; + mes "Okay, let me just tally up the results........."; + next; + mes "[Nameless One]"; + mes "Here is your test score: ^FF5544" +@score+ "^000000/100...."; + if(@score < 90) goto L_Failed; + mes "... Very well, you passed the quiz."; + next; + mes "[Nameless One]"; + mes "Wait don't get so excited yet, there's still another test... Speak to Barkadi and she'll tell you about the second test.."; + savepoint "in_moc_16.gat", 21, 160; + set ASSIN_Q, 2; + close; + + L_Failed: + mes "You failed the test!"; + next; + mes "[Nameless One]"; + mes "It looks like you're underqualified.... how could you expect to become an Assassin with a score like this?"; + next; + mes "[Nameless One]"; + mes "Since you don't seem to have an ounce of intelligence, I will give you some tips......."; + next; + mes "[Nameless One]"; + mes "Speak with Assassin 'Khai', he may be able to help you out. If not try to interperet this code:"; + mes "^5533FFwww.emperium.org......^000000"; + next; + mes "[Nameless One]"; + mes "It's rumored to have come from another world...... someplace called.... the 'internet'......."; + close2; + disablenpc "Assassin Kai#1"; + enablenpc "Assassin Kai#2"; + warp "in_moc_16.gat", 19, 76; + end; + +L_ReTest: + mes "[Nameless One]"; + mes "Hmf your back..... so your still obsessed with becoming an Assassin eh?"; + next; + mes "[Nameless One]"; + mes "If it is your true desire to become an Assassin, I'll help you out......"; + next; + mes "[Nameless One]"; + mes "However, If you fail again.... I suggest you give up on becoming an Assassin!"; + next; + menu "You're right, I'm not cut out for this.....",-, "I don't care! I'm not giving up!",M_Retry; + + mes "[Nameless One]"; + mes "~Cough~cough~... thats a good choice... Being an assassin is lonely....."; + next; + mes "[Nameless One]"; + mes "Leave the assassin guild now. Go back to the town you came from!"; + close2; + warp "moc_fild16.gat", 206, 241; + end; + M_Retry: + mes "[Nameless One]"; + mes "Alright then... I will try to help you become a lonely Assassin, hahahahah."; + next; + goto L_Test; +} + + +//============================================================================// +// Second Test +//****************************************************************************// + +//=====================================================// +// Part 1: Eliminate the Target +//=====================================================// + +// Barcardi ==============================>\\ +in_moc_16.gat,21,165,4 script Barcardi 725,{ + + mes "[Barcardi]"; + mes "I see that you passed the first test ^5533FF" + strcharinfo(0) + "^000000."; + M_Menu: + next; + menu "What is the next test?",M_0, "I want to start the test.",M_1, "I need to go back and rest.",M_End; + + M_0: + mes "[Barcardi]"; + mes "Let me tell you about your next test. This test has 2 parts to it. The first part will test your ability to find and eliminate targets."; + mes "You will need great precision and patience to pick out your targets among a group of non-targets."; + next; + mes "[Barcardi]"; + mes "What you are looking for are monsters named ^5533FF'Job Change Target'^000000. Kill any other target and you will fail the test."; + mes "You will also be timed durring the test. If you take longer than ^FF55333 minutes^000000 to accomplish your mission you will also fail."; + next; + mes "[Barcardi]"; + mes "Being able to identify the correct target quickly is a basic requirement of the Assassin."; + mes "Another requirement is stealth. An Assassin should NEVER be seen!"; + next; + mes "[Barcardi]"; + mes "The last portion of the test will require you to sneek past a large group of aggressive and dangerous monsters."; + mes "Your ^5544FFhide^000000 skill will come in handy here. You will have ^FF55333 minutes^000000 to finish this part of the test as well."; + next; + mes "[Barcardi]"; + mes "If you get discovered by the monsters and are killed, or if you run out of time, you will fail the test."; + next; + mes "[Barcardi]"; + mes "You must pass BOTH parts of the test in order to move on to the next exam."; + mes "If you fail one of them, you will have to start the whole test all over again."; + goto M_Menu; + M_1: + mes "[Barcardi]"; + mes "Only 1 person can take the test at one time. When you are ready please enter the waiting room."; + mes "The test will automatically start when the testing rooms are open."; + close; + M_End: + mes "[Barcardi]"; + mes ".... Okay, come back when you've had enough rest....."; + next; + mes "[Barcardi]"; + mes "....... Oh, and don't forget to bring some courage with you loser!"; + emotion 32; + next; + warp "moc_fild16.gat", 206, 241; + close; + +OnInit: + waitingroom "Assasin Test Waitingroom",8,"Barcardi::OnStart",1; + end; +OnStart: + set $@SinUsers, getareausers("in_moc_16.gat", 60, 136, 93, 177); + set $@SinUsers, $@SinUsers + getareausers("in_moc_16.gat", 64, 46, 111, 105); + if ($@SinUsers > 0) end; // stops the rest of the script from running if there is somebody taking the test + + if ((getwaitingroomstate(33)) == 0) end; // stops the rest of the script from running if there is no one in the waiting room + killmonsterall "in_moc_16.gat"; + warpwaitingpc "in_moc_16.gat", 65, 150; + donpcevent "SinTest2"; + end; +} + +// Job Change Monsters ======================>\\ +in_moc_16.gat,1,1,0 script SinTest2 -1,{ + set $@SinMob, 6; + disablenpc "sinWarp1"; + // Target Monsters + monster "in_moc_16.gat",62,161,"Job Change Target",1002,1,"SinTest2::OnMobDead"; + monster "in_moc_16.gat",85,169,"Job Change Target",1063,1,"SinTest2::OnMobDead"; + monster "in_moc_16.gat",88,152,"Job Change Target",1002,1,"SinTest2::OnMobDead"; + monster "in_moc_16.gat",90,143,"Job Change Target",1113,1,"SinTest2::OnMobDead"; + monster "in_moc_16.gat",74,167,"Job Change Target",1031,1,"SinTest2::OnMobDead"; + monster "in_moc_16.gat",77,173,"Job Change Target",1002,1,"SinTest2::OnMobDead"; + // Decoy Monsters + monster "in_moc_16.gat",62,161,"Jabs change target",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",85,169,"Warrior test target",1031,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",79,174,"Target",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",85,156,"Job quest target",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",74,171,"bouncer",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",68,173,"I got yours right here!",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",65,158,"Battle Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",60,158,"Soldiet Target",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",64,169,"Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",71,173,"Job change ready",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",77,172,"Don't hit me",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",76,172,"Target",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",75,172,"Not me",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",67,167,"Keep up the good work",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",86,170,"Job target change",1031,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",86,171,"Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",86,170,"Target",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",86,173,"Hope you can become an assassin..",10631,"SinTest2::OnFailed"; + monster "in_moc_16.gat",85,170,"Battle Monster",1031,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",89,156,"Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",89,156,"Speed182",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",89,156,"Battle Target",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",89,156,"Battlefield Tears",1113,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",89,156,"Job Change Tears",1031,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",83,169,"Evil Servant",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",63,158,"Dead soul",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",63,157,"Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",64,159,"Battle Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",63,159,"Target",1063,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",63,159,"Archer Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",63,159,"Swordman Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",83,148,"Thief Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",82,148,"Acolyte Target",1002,1,"SinTest2::OnFailed"; + monster "in_moc_16.gat",84,148,"Merchant Target",1002,1,"SinTest2::OnFailed"; + set $@sinRmX1, 60; + set $@sinRmY1, 136; + set $@sinRmX2, 93; + set $@sinRmY2, 177; + set $@wrpX, 19; + set $@wrpY, 161; + initnpctimer; + initnpctimer "TimerSin"; + end; + +OnTimer500: + stopnpctimer; + areaannounce "in_moc_16.gat", 60, 136, 93, 177, "Okay the test is about to start! Remember to eliminate the monsters called 'Job Change Target'",8; + end; +OnMobDead: + set $@SinMob, $@SinMob -1; + areaannounce "in_moc_16.gat", 60, 136, 93, 177, "Good. You have " + $@SinMob + " targets left to eliminate.",8; + if($@SinMob > 0) end; + + stopnpctimer "TimerSin"; + killmonsterall "in_moc_16.gat"; + enablenpc "sinWarp1"; + areaannounce "in_moc_16.gat", 60, 136, 93, 177,"Congratulations! You passed the test! A warp has just opened. Use it to leave the test room.",8; + addtimer 30000, "sinWarp1::OnTimer30000"; // warps player after 30 sec to move test along + end; +OnFailed: + stopnpctimer "TimerSin"; + areaannounce "in_moc_16.gat", 60, 136, 93, 177,"You failed!",8; + addtimer 3000, "TimerSin::OnTimer188000"; + end; +} + +// Observer ===========================>\\ +in_moc_16.gat,62,153,1 script Observer 55, +{ + mes "[Observer]"; + mes "Don't mind me, I'm just here to see how well you do on your test....."; + close; +} + +// Warp ==============================>\\ +in_moc_16.gat,87,137,0 script sinWarp1 45,2,1, +{ +OnTimer30000: + killmonsterall "in_moc_16.gat"; + enablenpc "Thomas"; + warp "in_moc_16.gat", 87, 102; + end; +} + +// Booby Traps ========================>\\ +in_moc_16.gat,68,158,0 script 01_1::SinTrap 139,0,0, +{ + stopnpctimer "TimerSin"; + warp "in_moc_16.gat", 19, 161; + killmonsterall "in_moc_16.gat"; + donpcevent "Barcardi::OnStart"; + end; +} +in_moc_16.gat,69,158,0 duplicate(SinTrap) 01_2 139,0,0 +in_moc_16.gat,68,159,0 duplicate(SinTrap) 01_3 139,0,0 +in_moc_16.gat,69,159,0 duplicate(SinTrap) 01_4 139,0,0 +in_moc_16.gat,64,162,0 duplicate(SinTrap) 02_1 139,0,0 +in_moc_16.gat,65,162,0 duplicate(SinTrap) 02_2 139,0,0 +in_moc_16.gat,64,163,0 duplicate(SinTrap) 02_3 139,0,0 +in_moc_16.gat,65,163,0 duplicate(SinTrap) 02_4 139,0,0 +in_moc_16.gat,62,168,0 duplicate(SinTrap) 03_1 139,0,0 +in_moc_16.gat,63,168,0 duplicate(SinTrap) 03_2 139,0,0 +in_moc_16.gat,62,169,0 duplicate(SinTrap) 03_3 139,0,0 +in_moc_16.gat,63,169,0 duplicate(SinTrap) 03_4 139,0,0 +in_moc_16.gat,66,170,0 duplicate(SinTrap) 04_1 139,0,0 +in_moc_16.gat,67,170,0 duplicate(SinTrap) 04_2 139,0,0 +in_moc_16.gat,66,171,0 duplicate(SinTrap) 04_3 139,0,0 +in_moc_16.gat,67,171,0 duplicate(SinTrap) 04_4 139,0,0 +in_moc_16.gat,64,174,0 duplicate(SinTrap) 05_1 139,0,0 +in_moc_16.gat,64,175,0 duplicate(SinTrap) 05_2 139,0,0 +in_moc_16.gat,65,174,0 duplicate(SinTrap) 05_3 139,0,0 +in_moc_16.gat,65,175,0 duplicate(SinTrap) 05_4 139,0,0 +in_moc_16.gat,72,174,0 duplicate(SinTrap) 06_1 139,0,0 +in_moc_16.gat,72,175,0 duplicate(SinTrap) 06_2 139,0,0 +in_moc_16.gat,73,174,0 duplicate(SinTrap) 06_3 139,0,0 +in_moc_16.gat,73,175,0 duplicate(SinTrap) 06_4 139,0,0 +in_moc_16.gat,72,166,0 duplicate(SinTrap) 07_1 139,0,0 +in_moc_16.gat,72,167,0 duplicate(SinTrap) 07_2 139,0,0 +in_moc_16.gat,73,166,0 duplicate(SinTrap) 07_3 139,0,0 +in_moc_16.gat,73,167,0 duplicate(SinTrap) 07_4 139,0,0 +in_moc_16.gat,72,168,0 duplicate(SinTrap) 08_1 139,0,0 +in_moc_16.gat,72,169,0 duplicate(SinTrap) 08_2 139,0,0 +in_moc_16.gat,73,168,0 duplicate(SinTrap) 08_3 139,0,0 +in_moc_16.gat,73,169,0 duplicate(SinTrap) 08_4 139,0,0 +in_moc_16.gat,78,168,0 duplicate(SinTrap) 09_1 139,0,0 +in_moc_16.gat,78,169,0 duplicate(SinTrap) 09_2 139,0,0 +in_moc_16.gat,79,168,0 duplicate(SinTrap) 09_3 139,0,0 +in_moc_16.gat,79,169,0 duplicate(SinTrap) 09_4 139,0,0 +in_moc_16.gat,80,172,0 duplicate(SinTrap) 10_1 139,0,0 +in_moc_16.gat,81,172,0 duplicate(SinTrap) 10_2 139,0,0 +in_moc_16.gat,82,172,0 duplicate(SinTrap) 10_3 139,0,0 +in_moc_16.gat,83,172,0 duplicate(SinTrap) 10_4 139,0,0 +in_moc_16.gat,80,173,0 duplicate(SinTrap) 10_5 139,0,0 +in_moc_16.gat,81,173,0 duplicate(SinTrap) 10_6 139,0,0 +in_moc_16.gat,82,173,0 duplicate(SinTrap) 10_7 139,0,0 +in_moc_16.gat,83,173,0 duplicate(SinTrap) 10_8 139,0,0 +in_moc_16.gat,88,174,0 duplicate(SinTrap) 11_1 139,0,0 +in_moc_16.gat,88,175,0 duplicate(SinTrap) 11_2 139,0,0 +in_moc_16.gat,89,174,0 duplicate(SinTrap) 11_3 139,0,0 +in_moc_16.gat,86,166,0 duplicate(SinTrap) 12_1 139,0,0 +in_moc_16.gat,86,167,0 duplicate(SinTrap) 12_2 139,0,0 +in_moc_16.gat,87,166,0 duplicate(SinTrap) 12_3 139,0,0 +in_moc_16.gat,87,167,0 duplicate(SinTrap) 12_4 139,0,0 +in_moc_16.gat,90,164,0 duplicate(SinTrap) 13_1 139,0,0 +in_moc_16.gat,90,165,0 duplicate(SinTrap) 13_2 139,0,0 +in_moc_16.gat,91,164,0 duplicate(SinTrap) 13_3 139,0,0 +in_moc_16.gat,91,165,0 duplicate(SinTrap) 13_4 139,0,0 +in_moc_16.gat,84,160,0 duplicate(SinTrap) 14_1 139,0,0 +in_moc_16.gat,85,160,0 duplicate(SinTrap) 14_2 139,0,0 +in_moc_16.gat,86,160,0 duplicate(SinTrap) 14_3 139,0,0 +in_moc_16.gat,87,160,0 duplicate(SinTrap) 14_4 139,0,0 +in_moc_16.gat,88,160,0 duplicate(SinTrap) 14_5 139,0,0 +in_moc_16.gat,89,160,0 duplicate(SinTrap) 14_6 139,0,0 +in_moc_16.gat,84,161,0 duplicate(SinTrap) 14_7 139,0,0 +in_moc_16.gat,85,161,0 duplicate(SinTrap) 14_8 139,0,0 +in_moc_16.gat,86,161,0 duplicate(SinTrap) 14_9 139,0,0 +in_moc_16.gat,87,161,0 duplicate(SinTrap) 14_10 139,0,0 +in_moc_16.gat,88,161,0 duplicate(SinTrap) 14_11 139,0,0 +in_moc_16.gat,89,161,0 duplicate(SinTrap) 14_12 139,0,0 +in_moc_16.gat,86,154,0 duplicate(SinTrap) 15_1 139,0,0 +in_moc_16.gat,86,155,0 duplicate(SinTrap) 15_2 139,0,0 +in_moc_16.gat,87,154,0 duplicate(SinTrap) 15_3 139,0,0 +in_moc_16.gat,87,155,0 duplicate(SinTrap) 15_4 139,0,0 +in_moc_16.gat,84,150,0 duplicate(SinTrap) 16_1 139,0,0 +in_moc_16.gat,84,151,0 duplicate(SinTrap) 16_2 139,0,0 +in_moc_16.gat,85,150,0 duplicate(SinTrap) 16_3 139,0,0 +in_moc_16.gat,85,151,0 duplicate(SinTrap) 16_4 139,0,0 +in_moc_16.gat,90,150,0 duplicate(SinTrap) 17_1 139,0,0 +in_moc_16.gat,90,151,0 duplicate(SinTrap) 17_2 139,0,0 +in_moc_16.gat,91,150,0 duplicate(SinTrap) 17_3 139,0,0 +in_moc_16.gat,91,151,0 duplicate(SinTrap) 17_4 139,0,0 +in_moc_16.gat,86,146,0 duplicate(SinTrap) 18_1 139,0,0 +in_moc_16.gat,86,147,0 duplicate(SinTrap) 18_2 139,0,0 +in_moc_16.gat,87,146,0 duplicate(SinTrap) 18_3 139,0,0 +in_moc_16.gat,87,147,0 duplicate(SinTrap) 18_4 139,0,0 + + +//=========================================================// +// Part 2: Hide and Sneak +//=========================================================// + +// Thomas ===============================>\\ +in_moc_16.gat,89,98,1 script Thomas 118,4,2,{ +OnTimer600: + if(ASSIN_Q2 == 1) goto L_ReTest; + mes "[Thomas]"; + mes "My name is Thomas and I am in charge of this portion of the test."; + next; + mes "[Thomas]"; + mes "The goal of this test is to evade and avoid the enemy. You must make it to the warp without out attracting the attention of the monsters in the room."; + next; + mes "[Thomas]"; + mes "You must make it through without dying. Because none of these monsters are your targets, you cannot not kill any of them."; + mes "Use your ablitly to flee and your ability to hide to help you in this test."; + next; + mes "[Thomas]"; + mes "Alright.... Get ready....."; + next; + set ASSIN_Q2, 1; + disablenpc "Thomas"; + donpcevent "SinTest2_2"; + close; +L_ReTest: + mes "[Thomas]"; + mes "~sigh~.... I told you to use your hide skill!! Here let me heal you...."; + next; + mes "[Thomas]"; + mes "Alright, lets try this again........."; + percentheal 100, 100; + next; + disablenpc "Thomas"; + donpcevent "SinTest2_2"; + close; +OnTouch: + warp "in_moc_16.gat",87,99; + addtimer 600, "Thomas::OnTimer600"; + end; +} + + +// SinTest2_2 ===============================>\\ +in_moc_16.gat,1,1,1 script SinTest2_2 -1,{ + monster "in_moc_16.gat", 81, 77, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 83, 77, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 85, 77, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 88, 77, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 90, 77, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 78, 56, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 80, 56, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 91, 56, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 93, 56, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 95, 56, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 97, 56, "MUMMY", 1041,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 79, 62, "Hydra", 1068,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 76, 65, "Hydra", 1068,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 96, 65, "Hydra", 1068,1, "SinTest2_2::OnMobDead"; + monster "in_moc_16.gat", 99, 65, "Hydra", 1068,1, "SinTest2_2::OnMobDead"; + set $@sinRmX1, 64; + set $@sinRmY1, 46; + set $@sinRmX2, 111; + set $@sinRmY2, 105; + set $@wrpX, 87; + set $@wrpY, 102; + areawarp "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "in_moc_16.gat", $@wrpX, $@wrpY; + initnpctimer "TimerSin"; + end; +OnMobDead: + stopnpctimer "TimerSin"; + announce ". . . You engaged a target without permission! You have failed the test!",8; + enablenpc "Thomas"; + addtimer 3000, "TimerSin::OnTimer188000"; + end; +} + +// Warp ================================>\\ +in_moc_16.gat,87,48,2 script sinWarp2 45,2,2,{ + mes "[Thomas]"; + mes "Good job! There's only one test left, good luck!!"; + stopnpctimer "TimerSin"; + killmonster "in_moc_16.gat","SinTest2_2::OnMobDead"; + set ASSIN_Q, 3; + set ASSIN_Q2, 0; + savepoint "in_moc_16.gat", 182, 180; + close2; + warp "in_moc_16.gat", 181, 183; + donpcevent "Barcardi::OnStart"; + end; +} + + +//=======================================================// +// Timer for Sin Test 2 +//=======================================================// +in_moc_16.gat,1,1,0 script TimerSin -1,{ +OnTimer3000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "I'll announce how much time you'll have left on a minute by minute basis.",8; + end; +OnTimer5000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "You have 3 minutes starting now!",8; + end; +OnTimer35000: + donpcevent "Barcardi::OnStart"; + end; +OnTimer65000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "You have 2 minutes left! ",8; + donpcevent "Barcardi::OnStart"; + end; +OnTimer95000: + donpcevent "Barcardi::OnStart"; + end; +OnTimer125000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "1 minute left!",8; + donpcevent "Barcardi::OnStart"; + end; +OnTimer155000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "30 seconds left!",8; + donpcevent "Barcardi::OnStart"; + end; +OnTimer180000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "Test ending in 5 secs....",8; + end; +OnTimer181000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "4 seconds....",8; + end; +OnTimer182000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "3 seconds...",8; + end; +OnTimer183000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "2 seconds..",8; + end; +OnTimer184000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "1 second.",8; + end; +OnTimer185000: + areaannounce "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "Okay times up! You failed!",8; + end; +OnTimer188000: + stopnpctimer; + areawarp "in_moc_16.gat", $@sinRmX1, $@sinRmY1, $@sinRmX2, $@sinRmY2, "in_moc_16.gat", 21, 160; + killmonsterall "in_moc_16.gat"; + donpcevent "Barcardi::OnStart"; + end; +} + + +//============================================================================// +// Final Test +//****************************************************************************// + +//=============================================// +// Warp +//=============================================// +in_moc_16.gat,182,169,1 script sinWarp3 45,1,1, +{ + if(getareausers(("in_moc_16.gat"),148,74,187,117) > 0) goto L_Wait; + disablenpc "Huey#End"; + disablenpc "Kai#End"; + disablenpc "Nameless One#End"; + disablenpc "Barcardi#End"; + disablenpc "Observer#End"; + disablenpc "Thomas#End"; + warp "in_moc_16.gat", 167, 116; + end; + + L_Wait: + mes "~ a message from the Guild Master...~"; + mes "I am currently busy with another Assassin Candidate. Please wait patiently untill I am done with that person."; + close; +} + +//==============================================// +// Guild Master +//==============================================// + +// Start Trigger ------------------------------------------------------------------ +in_moc_16.gat,167,114,3 script guildmaster_Trig#0 139,4,0, +{ + mes "[Guild Master]"; + mes "Welcome ^5533FF" + strcharinfo(0) + "^000000. This is my private room."; + next; + mes "[Guild Master]"; + mes "I am going to give you a simple test. All you have to do is come meet me."; + mes "Of course you will have to go through a maze of invisible walls to do so....."; + next; + mes "[Guild Master]"; + mes "Hahah... It's really not as hard as it sounds. The purpose of the maze is actually to protect the guild from intruders."; + mes "But I decided to use it to test the determination of Assassin candidates as well."; + next; + mes "[Guild Master]"; + mes "Well enough chit chat. I look forward to meeting you at the end of the maze."; + close; +} + +// Guild Master ----------------------------------------------------------------------------- +in_moc_16.gat,149,80,4 script Guild Master 106,1,1, +{ + end; + +OnTouch: + mes "[Guild Master]"; + mes "Ah it's nice to meet you ^5533FF" + strcharinfo(0) + "^000000. I have to apologize for making you walk through that maze."; + mes "I saw your resume just now, you have been described as a Thief with guts!"; + next; + mes "[Guild Master]"; + mes "We rarely find someone of your abilities and experience."; + next; + mes "[Guild Master]"; + mes "If you don't mind I would like to ask you a few questions. There is nothing to be nervous about."; + mes "Just answer my questions truthfully..... if you lie, I'll kill you. That's all there is to it."; + next; + callsub sF_Questions1; + next; + + mes "[Guild Master]"; + mes "Unfortunately there are nit wits who are eager to be Assassins but have not yet had enough training."; + mes "They are a disgrace to our clan and their activities often result in very problematic situations."; + next; + mes "[Guild Master]"; + mes "You may end up like one of them if you are not careful. Remember... once you become an Assassin there no turning back."; + next; + callsub sF_Questions2; + next; + + mes "[Guild Master]"; + mes "It was nice talking with you. You reminded me of the good ol' days."; + next; + mes "[Guild Master]"; + mes ".... one second....."; + next; + mes "[Guild Master]"; + mes "Everyone that tested " + strcharinfo(0) + "please come to my office ."; + next; + mes "[Guild Master]"; + mes "They will be here soon."; + next; + enablenpc "Huey#End"; + enablenpc "Kai#End"; + enablenpc "Nameless One#End"; + enablenpc "Barcardi#End"; + enablenpc "Observer#End"; + enablenpc "Thomas#End"; + mes "[Nameless One]"; + mes "I am here."; + next; + mes "[Guild Master]"; + mes "I would like to know what you think about ^5533FF" + strcharinfo(0) + "^000000 becoming an Assassin."; + next; + mes "[Nameless One]"; + mes "I think ^5533FF" + strcharinfo(0) + "^000000 is a decent candidate."; + next; + mes "[Guild Master]"; + mes "'Looks like the Nameless One more or less supports you. What are your thought Huey?"; + next; + mes "[Huey]"; + //if( == 1) mes "...What can I say, one of the best Assassin candidates I've seen in the last few weeks."; + //if( == 0) mes "... Although a little too mellow and gentle... sort of like a pussy cat, Hahahaha...."; + mes "I think ^5533FF" + strcharinfo(0) + "^000000 will be fine as an Assassin."; + next; + mes "[Huey]"; + mes "I have to get back so I will leave first."; + next; + mes "[Guild Master]"; + mes "Okay then, thank you Huey."; + next; + mes "[Guild Master]"; + mes "So... Observer, what is your opinion?"; + disablenpc "Huey#End"; + next; + mes "[Observer]"; + mes ".... Well, not one of the better performance I've seen but ^5533FF" + strcharinfo(0) + "^000000 did pass, so I have no objections."; + next; + mes "[Guild Master]"; + mes "Good. It seems we are all in agreement. I myself see no problems with ^5533FF" + strcharinfo(0) + "^000000........"; + next; + mes "[Guild Master]"; + mes "^5533FF" + strcharinfo(0) + "^000000 seems to know alot about Assassins and I don't think the solitary lifestyle will be too difficult for ^5533FF" + strcharinfo(0) + "^000000 either."; + next; + mes "[Guild Master]"; + mes "... I think I've said enough. Here please take this........"; + next; + if(JBLVL == 40) goto L_LowLvl; + + L_HighLvl: + menu "Jur",sM_Jur, "Katar",sM_Kat, "Main Gauche",sM_Main, "Gladius",sM_Glad; + + sM_Jur: + getitem 1251,1; + goto L_Cont1; + sM_Kat: + getitem 1253, 1; + goto L_Cont1; + sM_Main: + getitem 1208, 1; + goto L_Cont1; + sM_Glad: + getitem 1220, 1; + goto L_Cont1; + + L_LowLvl: + set @temp, rand(1, 3); + if(@temp==1) getitem 1250, 1; + if(@temp==2) getitem 1217, 1; + if(@temp==3) getitem 1252, 1; + + L_Cont1: + mes "[Guild Master]"; + mes "Now go talk to ^5533FFAssassin Huey^000000 back at the guild entrance."; + mes "For some reason he always looks like he's ^5533FFangry^000000 about something......"; + next; + mes "[Guild Master]"; + mes "He will be the one promoting you to the Assassin class."; + next; + mes "[Guild Master]"; + mes strcharinfo(0) + " has choosen the path of the Assassin. May you learn to endure the hardships that all Assassins must face."; + getitem 1008, 1; + next; + mes "[Guild Master]"; + mes "Okay, everyone you can leave now. I will send you back to the entrance. Lets move......"; + set ASSIN_Q, 4; + set ASSIN_Q2, 0; + disablenpc "Kai#End"; + disablenpc "Nameless One#End"; + disablenpc "Barkadi#End"; + disablenpc "Observer#End"; + disablenpc "Dante#End"; + disablenpc "Gail#End"; + savepoint "in_moc_16.gat", 18, 28; + close2; + warp "in_moc_16.gat", 18, 28; + end; + + +sF_Questions1: + mes "[Guild Master]"; + mes "First of all, what do you think is most important to an Assassin?"; + next; + menu "More power.",M_1, "An Assassin's pride.",M_2, "Endless training.",M_3; + + M_1: + mes "[Guild Master]"; + mes "It is true that an Assassin is stronger than a Thief."; + mes "By becoming an Assassin you will be capable of doing things no mere Thief could dream of."; + next; + mes "[Guild Master]"; + mes "But, why do you want that kind of power?"; + next; + menu "To take revenge on those who hurt me.",sM_1a, "I will use that power to become wealthy.",sM_1b, + "To explore new places.",sM_1c; + + sM_1a: + mes "[Guild Master]"; + mes "Vengence huh............ It seems that everyone has enemys these days........"; + next; + mes "[Guild Master]"; + mes "However, vengence is fueled by emotions, and as an Assassin one cannot give into these emotions."; + mes "An Assassin must be cold blooded... even heartless.... He/she must not let anything get in the way of the task at hand."; + next; + mes "[Guild Master]"; + mes "Emotions are the biggest threat to an Assassin..... they cause confusion and clutter up the mind....."; + mes "An Assassin must always have a clear train of thought in order to be successful."; + next; + mes "[Guild Master]"; + mes "If you are to become an Assassin, you must find a way to control your emotions.... do not let your emotions control you."; + return; + sM_1b: + mes "[Guild Master]"; + mes "Money is an important part of the world.... however it is meaningless to an Assassin."; + mes "An Assassin's purpose is to carry out the dark, and unpleasant duties that no one else is capable of....."; + next; + mes "[Guild Master]"; + mes "True Assassins do no think about fame or fortune."; + return; + sM_1c: + mes "[Guild Master]"; + mes "An interesting idea..... you obviously seek to learn more about the world around you."; + mes "In knowing more about the world, you gain better insight into yourself."; + next; + mes "[Guild Master]"; + mes "But remember that your path will be filled with loneliness. It is a reality that all Assassins must face."; + next; + mes "[Guild Master]"; + mes "For those who have succeeded as Assassins, they have not only learned to except this fact.... but they have learned to embrace it."; + return; + + M_2: + mes "[Guild Master]"; + mes "Pride you say? Did another Assassin mention this to you?....."; + next; + mes "[Guild Master]"; + mes "Unfortunately pride without ability means nothing. Hmm... what are you trying to find or gain by becoming an Assassin?"; + next; + mes "[Guild Master]"; + mes "Most of the people you have met in this guild are my bretheren and they have struggled and sacrifced a great deal as Assassins."; + mes "It is beacuse they have overcome so much hardship, that they can take great pride in being Assassins."; + next; + mes "[Guild Master]"; + mes "You, on the other hand, have not yet faced the difficulties that Assassins do."; + mes "What then, do you mean when you speak of 'an Assassin's pride'?"; + next; + menu "The idea of total solitude.",sM_2a, "The ability to make easy money.",sM_2b, "They just look cool.",sM_2c; + + sM_2a: + mes "[Guild Master]"; + mes "It is true that the life of an Assassin is lonesome. In a way, to be an Assassin, is to be non-existant...."; + next; + mes "[Guild Master]"; + mes "We never make direct contact with any of our clients. The people that we do make contact with..... we kill."; + next; + mes "[Guild Master]"; + mes "The only people that know about Assassins are other Assassins...."; + mes "Even then..... we sheild and hide our true inner selves from each other.........."; + next; + mes "[Guild Master]"; + mes "Even so... having comrades is better that nothing."; + mes "I recommend you have at least one partner to back you up durring a mission."; + return; + sM_2b: + mes "[Guild Master]"; + mes "Yes, money is important."; + mes "But don't you think we assassins have much more important thing to deal with?"; + return; + sM_2c: + mes "[Guild Master]"; + mes "...So you just think Assassins are cool looking......... ~sigh~"; + mes "This is really sad.... Believe me when I say to you that the purpose of the Assassins is not to merely look good....."; + next; + mes "[Guild Master]"; + mes ".... But it is to do those dark deeds which no one wants to nor can do."; + return; + M_3: + mes "[Guild Master]"; + mes "Interesting..... I see that you have already trained a great deal. I suppose that even more training couldn't hurt....."; + next; + mes "[Guild Master]"; + mes "Is there any specific area that you would like to improve upon?"; + next; + menu "Techniques.",sM_3a, "More challenging targets.",sM_3b, "Mental toughness.",sM_3c; + + sM_3a: + mes "[Guild Master]"; + mes "As an Assassin you will have access to many new skills. The harder you train the better you will be at using these skills."; + next; + mes "[Guild Master]"; + mes "To be a great Assassin you must use these skills masterfully."; + return; + sM_3b: + mes "[Guild Master]"; + mes "Constantly challenging yourself is a great way to improve your abilities."; + mes "Facing the same targets over and over again will only make you weaker."; + next; + mes "[Guild Master]"; + mes "Good Assassins are always finding ways to challenge themsleves."; + return; + sM_3c: + mes "[Guild Master]"; + mes "This is probably the most important aspect to work on for an Assassin."; + mes "Not only do Assassins have to be of sound body but they also have to be of sound mind."; + next; + mes "[Guild Master]"; + mes "It is crucial for Assassins to be mentally tough, for they are constantly under pressure."; + mes "The type of situations Assassins are faced with on a daily basis are unimaginable to most ordinary people."; + next; + mes "[Guild Master]"; + mes "This is why a true Assassin is constantly training his/her mind."; + return; + +sF_Questions2: + mes "[Guild Master]"; + mes "So let me ask you this.... If you became an Assassin right now, what is the first thing you would do?"; + next; + menu "Go into battle!",M_4, "Go back to the ones waiting for me.",M_5, "Learn more about Assassins.",M_6; + + M_4: + mes "[Guild Master]"; + mes "Battle.... is that all?"; + next; + menu "I would level up quickly.",sM_4a, "I would test my new abilities.",sM_4b, "I would go explore new places.",sM_4c; + + sM_4a: + mes "[Guild Master]"; + mes "Whether or not your an Assassin shouldn't change how quickly you train."; + mes "You would gain the same experience you did as a Thief. So take it slowly okay?"; + return; + sM_4b: + mes "[Guild Master]"; + mes "Testing out your new found skills is good."; + mes "I can understand the excitement you will feel when you have gained new abilities as an Assassin."; + next; + mes "[Guild Master]"; + mes "Just don't let that get in the way of your duites."; + return; + sM_4c: + mes "[Guild Master]"; + mes "Exploration is good. Find new places and meet new people."; + mes "You'll never know when you will meet a prospective client."; + return; + + M_5: + mes "[Guild Master]"; + mes "Someone's waitng for you?"; + next; + menu "Yes, the people I met in this guild.",sM_5a, "A friend and partner.",sM_5b, "The love of my life.",sM_5c; + + sM_5a: + mes "[Guild Master]"; + mes "Haha. I think they would be happy to know that you are thinking of them."; + mes "No matter where you go, or what you do, you will always have a place here in this guild."; + return; + sM_5b: + mes "[Guild Master]"; + mes "Good friends can be hard to find, and those that you can call a partner are even rarer."; + mes "It's good that you have a friend that you can trust and work with."; + return; + sM_5c: + mes "[Guild Master]"; + if(sex == 1) mes "Oh you have a girlfriend... then become her shadow and protect her."; + if(sex == 0) mes "Oh you have a boyfriend... then become his shadow and protect him."; + next; + mes "[Guild Master]"; + mes "As an Assassin you will find it very difficult to ever meet someone else, so make sure you treasure what you have now."; + return; + + M_6: + mes "[Guild Master]"; + mes "Okay, so what is it that you would like to know?"; + next; + menu "Where's the easiest place to train?",sM_6a, "Where do Assassins usually go to gain exp?",sM_6b, + "How does an Assassin make money?",sM_6c; + + sM_6a: + mes "[Guild Master]"; + mes "Where ever an Assassin may be, he/she must learn to adapt and survive."; + mes "Assassins do not have the luxury of choosing where they work."; + return; + sM_6b: + mes "[Guild Master]"; + mes "There are many experienced Assassins wandering the continent of Rune-Midgard. Seek them out and ask for their knowledge."; + next; + mes "[Guild Master]"; + mes "The best way to gain experience however, is to go out and experience the world for yourself."; + return; + sM_6c: + mes "[Guild Master]"; + mes "Damit, is money that important to you? An Assassins life does not revolve around money....."; + return; + +} + + +//=============================================// +// Maze Triggers +//=============================================// +in_moc_16.gat,170,90,0 script maze_trig#1 139,0,0, +{ + mes "[Guild Master]"; + mes "There's no way to walk there, try another way."; + close; +} +in_moc_16.gat,150,85,0 script maze_trig#2 139,0,0, +{ + mes "[Guild Master]"; + mes ".... Getting warmer.... you're almost there....."; + close; +} +in_moc_16.gat,153,85,0 script maze_trig#3 139,0,0, +{ + mes "[Guild Master]"; + mes "You can't walk there.."; + mes "Good, your almost there, keep walking."; + mes "You have to walk in between a pole and a....."; + mes "you got to turn a round in order to get in."; + close; +} +in_moc_16.gat,160,85,0 script maze_trig#4 139,0,0, +{ + mes "[Guild Master]"; + mes "There's no way to walk there, try another way."; + close; +} +in_moc_16.gat,175,89,0 script maze_trig#5 139,0,0, +{ + mes "[Guild Master]"; + mes "That way leads to Botogun.."; + mes "What are going to do there?"; + close; +} +in_moc_16.gat,164,88,0 script maze_trig#6 139,0,0, +{ + mes "[Guild Master]"; + mes "Good.... you're on the right track."; + close; +} +in_moc_16.gat,149,95,0 script maze_trig#7 139,0,0, +{ + mes "[Guild Master]"; + mes "Good, you found the path."; + close; +} +in_moc_16.gat,180,101,0 script maze_trig#8 139,0,0, +{ + mes "[Guild Master]"; + mes "... It looks like that's not that way..."; + close; +} +in_moc_16.gat,186,107,0 script maze_trig#9 139,0,0, +{ + mes "[Guild Master]"; + mes "...Not that way either..."; + close; +} + + +//================================================// +// Decoy Chief +//================================================// +in_moc_16.gat,186,81,0 script Guild Master#2 55, +{ + mes "[Guild Master Botogun]"; + mes "I'm sorry but I am not the person in charge here."; + mes "The real Guild Chief is on the other side."; + close; +} + + +//=================================================// +// Guild Npcs +//=================================================// +in_moc_16.gat,156,85,1 script Huey#End 55,{end;} +in_moc_16.gat,156,83,1 script Kai#End 730,{end;} +in_moc_16.gat,156,81,1 script Nameless One#End 106,{end;} +in_moc_16.gat,156,79,1 script Barcardi#End 725,{end;} +in_moc_16.gat,156,77,1 script Observer#End 55,{end;} +in_moc_16.gat,156,75,1 script Thomas#End 118,{end;} + diff --git a/npc/jobs/2-1/blacksmith.txt b/npc/jobs/2-1/blacksmith.txt new file mode 100644 index 000000000..bf718fb69 --- /dev/null +++ b/npc/jobs/2-1/blacksmith.txt @@ -0,0 +1,1436 @@ +//===== eAthena Script ======================================= +//= Blacksmith Quest +//===== By: ================================================== +//= EREMES THE CANIVALIZER(Aegis) +//= Translated by: yoshiki. +//= Converted by: Komurka. +//= Optimized and further edited by kobra_k88. +//= Further bugfixed and tested by Lupus +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Changed some npc names to the iRO names. Changed some variable +//= names and labels. Edited some text.[kobra_k88] +//= Removed "if(JobLevel > 48) goto higher". It was a left over line. +//= Thx to "Decker".[kobra_k88] +============================================================== + + + +//<==================================================== Blacksmith Altiregen (Job changer)==================================================>\\ +geffen_in.gat,110,169,4 script Guildsman 731,{ + + if (class == 5) goto L_Merc; + mes "[Blacksmith Altiregen]"; + mes "Welcome! We're the masters of the metal, blacksmiths!"; + mes "Our skills in creating weapons, in a way, is almost a art form!."; + next; + mes "[Blacksmith Altiregen]"; + mes "Those weapons, heh, can be sold for quite a profit as well."; + next; + mes "[Blacksmith Altiregen]"; + if (class == 0) goto L_Nov; + if (callfunc("Is_Sword_Class")) goto L_Sword; + if (callfunc("Is_Holy_Class")) goto L_Aco; + if (callfunc("Is_Thief_Class")) goto L_Theif; + if (callfunc("Is_Magic_Class")) goto L_Wiz; + if (callfunc("Is_Bow_Class")) goto L_Arc; + if (class == 10) goto L_Black; + mes "Only Merchants can become Blacksmiths."; + close; + +L_Nov: + if(sex==0) mes "...Hello little lady! If you wish to be a blacksmith, you have to be a merchant first!"; + if(sex==1) mes "Hmmm, you look like you wish to be a blacksmith! Sorry, but only merchants can be blacksmiths!."; + close; +L_Sword: + mes "Hello! Come here to order a sword? Sorry, but I have some paperwork to do, so I can't forge anything now."; + close; +L_Arc: + mes "Hmmm, sorry, but we're not hiring anyone that isn't a merchent."; + close; +L_Wiz: + mes "Interested in training? Our guild cannot assist magic users is such matters."; + close; +L_Aco: + mes "Oh! A Holy one...! Do me a favor and bless the sword I'm crafting!"; + close; +L_Theif: + mes "Sorry, but this is more of a office, so there's nothing worth money. We CAN do knife forges though."; + close; +L_Black: + mes "Hey! Been a while, running a errand for Christopher? I feel like my hammer is getting rusty after all this office work."; + close; + +L_Merc: + mes "[Blacksmith Altiregen]"; + if (BSMITH_Q == 1) goto L_Test1; + if (BSMITH_Q == 2 || BSMITH_Q == 3) goto L_Test2and3; + if (BSMITH_Q == 4) goto L_Test4; + if (BSMITH_Q == 5) goto L_Change; + mes "Hello fellow merchant! Are you here to apply?"; + mes "Write your name and your job level on this piece of paper."; + next; + menu "Apply",M_App,"What's required?",M_Req,"Not now...",M_NtNow; + + M_App: + if(JobLevel < 40) goto sL_Lowlvl; + if(JobLevel == 50) goto sL_HighLvl; + mes "[Blacksmith Altiregen]"; + mes "Hmmm..."; + mes "Your job level is satisfactory."; + next; + mes "[Blacksmith Altiregen]"; + mes "Good, but we don't just accept anybody."; + mes "We'll need to test your merchant skills and your determination."; + next; + mes "[Blacksmith Altiregen]"; + mes "Rustle Rustle"; + next; + mes "[Blacksmith Altiregen]"; + mes "Hmmm, the guildsman ^5533FFGeshupenschte in Alberta^000000, says he's a bit short of hands."; + mes "Go help him, that's the first test."; + next; + mes "[Blacksmith Altiregen]"; + mes "Have a nice trip!"; + set BSMITH_Q,1; + set JBLVL, 40; + close; + + sL_Lowlvl: + mes "[Blacksmith Altiregen]"; + mes "You need more training as a merchant. We only accept job level 40+"; + mes "As much as I want to accept you, we have regulations. Sorry, but return later."; + close; + sL_HighLvl: + mes "[Blacksmith Altiregen]"; + mes "Wow! I'm impressed! You've done a lot of training there. You know what they say, with hard work comes great rewards."; + emotion 1; + next; + mes "[Blacksmith Altiregen]"; + mes "Well, first things first..... The guildsman ^5533FFGeshupenschte in Alberta^000000, says he's a bit short on help."; + mes "Go help him, that's the first test."; + next; + mes "[Blacksmith Altiregen]"; + mes "Have a nice trip!"; + set BSMITH_Q,1; + set JBLVL, 50; + close; + M_Req: + mes "[Blacksmith Altiregen]"; + mes "What is required?"; + mes "First, be job level 40 at least."; + mes "And pass the test."; + mes "That's it. The test is a bit complicated, but passable."; + mes "The test involves delievering items and being quized on the special items of certain regions and then being tested on knowledge of blacksmiths."; + close; + M_NtNow: + mes "[Blacksmith Altiregen]"; + mes "Alright, see you later."; + close; + + +L_Test1: + mes "You didn't leave yet? I told you to go see Geshupenschte in Alberta. See you then."; + emotion 1; + close; + +L_Test2and3: + mes "How was the work Geshupenschte gave you? He can be a pain sometimes."; + close; +L_Test4: + if (BSMITH_Q2 == 1) goto L_NotDone; + mes "Congrats! You've passed Geshupenschte's tests!"; + next; + mes "[Blacksmith Altiregen]"; + mes "Hmm? Heh, there is one last test you know."; + mes "The guildsman for the last test is in Morroc, go there now."; + next; + menu "Cruel, but I'll go.",-,"......I don't wanna travel T_T",M_dontgo; + + set BSMITH_Q2, 1; + mes "[Blacksmith Altiregen]"; + mes "I know its far away, but it's not in my power. Besides, you know the region well, right?"; + mes "I hope you do, because the blacksmith's guild doesn't like shaming it's status by hiring idiots!"; + next; + mes "[Blacksmith Altiregen]"; + mes "If such a thing happened, I can see the guild crumbling down, sob T_T"; + mes "Well..... Get to Morroc and find her!"; + close; + M_dontgo: + mes "[Blacksmith Altiregen]"; + mes "What!? You're giving up!?!........."; + emotion 1; + next; + mes "[Blacksmith Altiregen]"; + mes "HOW DARE YOU INSULT OUR GUILD LIKE THAT!"; + mes "Leave now! Don't you dare even DREAM about becoming a blacksmith!"; + emotion 23; + next; + mes "[Blacksmith Altiregen]"; + mes "Can't endure ANYTHING can you!? How do you plan to become a blacksmith if you can't do these simple tasks!?"; + emotion 6; + close; + + L_NotDone: + mes "Hmmm? Didn't you say you're going to Morroc?"; + mes "Sorry, but you gotta pass the test there."; + close; + +L_Change: + if(countitem(1005) < 1) goto L_NoHam; + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Blacksmith."; + if(SkillPoint > 0) close; + mes "Lo, I can see the fire in your eyes! You've passed!!"; + mes "I'll grant you the power to work metals!"; + next; + delitem 1005,1; + jobchange 10; + mes "[Blacksmith Altiregen]"; + mes "Don't forget! We're the artists that put beauty into metal! Don't you dare forget that!"; + next; + mes "[Blacksmith Altiregen]"; + mes "Here's a present! Congrats on passing!"; + if(JBLVL == 40) getitem 999,5; + if(JBLVL == 50) getitem 999,10; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + emotion 21; + close; + + L_NoHam: + mes "Did you forget something? You need to show me the ^5533FFHammer of Blacksmiths^000000 to prove that you've passed all of the tests."; + next; + mes "[Blacksmith Altiregen]"; + mes "You DO have it..... don't you???"; + next; + menu "Oh that thing... let me just get it out of storage...",-, "Actually I sold it for pots..... now what?",sM_What; + + mes "[Blacksmith Altiregen]"; + mes "....... grrrrrrr......."; + emotion 7; + close; + sM_What: + mes "[Blacksmith Altiregen]"; + mes ".......... I'll tell you what............."; + next; + mes "[Blacksmith Altiregen]"; + mes "YOU GET TO START ALL OVER!!!!"; + set BSMITH_Q, 0; + set BSMITH_Q2, 0; + emotion 32; + close; +} + + +//<=============================================== Geshupenschte: 1st, 2nd, 3rd Test ===================================================>\\ +alberta_in.gat,174,22,4 script Geshupenschte 63,{ + + if(Class==5) goto L_merchant; + mes "[Geshupenschte]"; + mes "Hello sir! I'm the blacksmith. Geshupenschte! Nice to meet you!"; + next; + mes "[Geshupenschte]"; + mes "Blacksmith is such a great job!! Don't you think so? Hahahahahahah!"; + emotion 18; + close; + +L_merchant: + mes "[Geshupenschte]"; + if (BSMITH_Q == 1) goto L_Test1; + if (BSMITH_Q == 2) goto L_Test2; + if (BSMITH_Q == 3) goto L_Test3; + if (BSMITH_Q == 4) goto L_Done; + if (BSMITH_Q == 5) goto L_GoChange; + mes "Hoho!! A merchant! Excellent! I was in need of some help!!"; + next; + mes "[Geshupenschte]"; + mes "Of course.... I wouldn't want to bother someone as busy as yourself. Go on your way if you must!...."; + next; + mes "[Geshupenschte]"; + mes "~Dum dee dum dee dum~.....I am the best.... I am a blacksmith....(singing)"; + next; + mes "[Geshupenschte]"; + mes "What? Why are you still here?"; + emotion 1; + close; + +// Test 1----------------------------------------------------------------- +L_Test1: + if (BSMITH_Q2 == 1) goto L_ReTest1; + mes "You're the one sent by the guild, right?"; + mes "Whew, the people order so many items >_> We don't have enough people to deliever."; + next; + mes "[Geshupenschte]"; + mes "Well, you ARE the one sent by the guild, right?"; + mes "Oh well, hopefully >_>"; + next; + mes "[Geshupenschte]"; + mes "See, this kid a few days ago,"; + mes "he wasted SO much of our money."; + mes "Just because I sent him on a semi complicated errand >_>"; + mes "Now, let me ask a few questions!"; + next; + menu "Alright",M_Rdy,"Wait, let me go and get prepared",-; + + mes "[Geshupenschte]"; + mes "Ok, return after you're ready."; + mes "I'll be waiting here."; + close; + M_Rdy: + set @score, 0; + set @temp, rand(2); + if (@temp == 1) goto L_setq2; + + L_setq1: + mes "[Geshupenschte]"; + mes "1. Which town and local item don't match?"; + next; + menu "Morroc - Thief Clothes",q1,"Alberta - 2 Hand Axe",q1,"Comodo - Berserk Potion",q1,"Alberta - Swordmace",-; + + set @score,@score+10; + q1: + + mes "[Geshupenschte]"; + mes "2. What does the smith skill Hammerfall do?"; + next; + menu "Stun",-,"Blind",q2,"Poison",q2,"Sleep",q2; + + set @score,@score+10; + q2: + + mes "[Geshupenschte]"; + mes "3. What is a merchant not good at?"; + next; + menu "Opening Shops",q3,"Buying Cheap",q3,"Selling High",q3,"Running Fast",-; + + set @score,@score+10; + + q3: + + mes "[Geshupenschte]"; + mes "4. Where do you buy Blue Gems?"; + next; + menu "Alberta",q4,"Morroc",q4,"Geffen",-,"Prontera",q4; + + set @score,@score+10; + + q4: + + mes "[Geshupenschte]"; + mes "5. Where is the Geffen Tool Shop from the tower?"; + next; + menu "8 o'clock",-,"11 o'clock",q5,"6 o'clock",q5,"5 o'clock",q5; + + set @score,@score+10; + + q5: + + mes "[Geshupenschte]"; + mes "6. What weapon can't be used by merchants?"; + next; + menu "Stiletto",q6,"Buster",q6,"Chain",q6,"Bible",-; + + set @score,@score+10; + + q6: + + mes "[Geshupenschte]"; + mes "7. Which has the highest def?"; + next; + menu "Panty",q7,"Mink Coat",-,"Wooden Mail",q7,"Silk Robe",q7; + + set @score,@score+10; + + q7: + + mes "[Geshupenschte]"; + mes "8. How many times can you upgrade a lvl 3 weapon safely?"; + next; + menu "+3 ",q8,"+4 ",q8,"+5 ",-,"+6 ",q8; + + set @score,@score+10; + q8: + + mes "[Geshupenschte]"; + mes "9. What can you make with Trunks?"; + next; + menu "Sakkat",-,"Ghost Bandana",q9,"Majestic Goat",q9,"Antlers",q9; + + set @score,@score+10; + q9: + + mes "[Geshupenschte]"; + mes "10. What is the most important to merchants!?"; + next; + menu "Helpfulness",-,"Honor",-,"Money",-,"Honesty",-; + + set @score,@score+10; + + if (BSMITH_Q2 == 1) goto L_result2; + goto L_result; + + L_setq2: + mes "[Geshupenschte]"; + mes "1. Which town and local item is mismatched?"; + next; + menu "Aldebaran - Ygg Leaf",q10,"Alberta - Hammer",q10,"Comodo - Berserk Potion",q10,"Aldebaran - Hammer",-; + + set @score,@score+10; + q10: + + mes "[Geshupenschte]"; + mes "2. How much does Jellopy sell for?"; + next; + menu "1z",q11,"2z",q11,"3z",-,"4z",q11; + + set @score,@score+10; + q11: + + mes "[Geshupenschte]"; + mes "3. What's necessary to make a shop?"; + next; + menu "Must have cart",-,"Item to sell",q12,"Have weapon equiped",q12,"Wear Armor",q12; + + set @score,@score+10; + q12: + + mes "[Geshupenschte]"; + mes "4. Where is the merchant guild located?"; + next; + menu "Alberta",-,"Morroc",q13,"Geffen",q13,"Prontera",q13; + + set @score,@score+10; + q13: + + mes "[Geshupenschte]"; + mes "5. Where is the Morroc Weapon Shop from the center?"; + next; + menu "7 o'clock",q14,"11 o'clock",q14,"6 o'clock",q14,"5 o'clock",-; + + set @score,@score+10; + q14: + + mes "[Geshupenschte]"; + mes "6. What can't a merchant equip?"; + next; + menu "Main Gauche",q15,"Claymore",-,"Chain",q15,"2 hand axe",q15; + + set @score,@score+10; + q15: + + mes "[Geshupenschte]"; + mes "7. What has the highest defense?"; + next; + menu "Panty",q16,"Mink Coat",-,"Wooden Mail",q16,"Silk Robe",q16; + + set @score,@score+10; + q16: + + mes "[Geshupenschte]"; + mes "8. How many times can you safely upgrade a lvl 4 weapon?"; + next; + menu "+3 ",q17,"+4",-,"+5",q17,"+6",q17; + + set @score,@score+10; + q17: + + mes "[Geshupenschte]"; + mes "9. Which monster doesn't drop iron ore?"; + next; + menu "Chonchon",q18,"Steel Chonchon",q18,"Zerom",q18,"Anolian",-; + + set @score,@score+10; + q18: + + mes "[Geshupenschte]"; + mes "10. What is the most important to merchants?!"; + next; + menu "Honesty",-,"Helpfulness",-,"Money",-,"Posture",-; + + set @score,@score+10; + + if (BSMITH_Q2 == 1) goto L_result2; + goto L_result; + +L_result: + mes "[Geshupenschte]"; + mes "Good!"; + next; + mes "[Geshupenschte]"; + mes "Lets see....your score is ^5533FF"+@score+"."^000000; + if (@score == 100) goto L_perfect; + mes "............."; + next; + mes "[Geshupenschte]"; + mes "Sorry friend, I don't want to give you the job."; + mes "You need just a bit more knowledge. Go study some more"; + set BSMITH_Q2, 1; + close; + + L_perfect: + set BSMITH_Q,2; + set BSMITH_Q2, 0; + mes "Perfect!"; + next; + mes "[Geshupenschte]"; + mes "Then you definatly can do the errand!"; + mes "Are you prepared?"; + close; +L_result2: + mes "[Geshupenschte]"; + mes "Great!"; + next; + mes "[Geshupenschte]"; + mes "Lets see....your score is ^5533FF"+@score+"."^000000; + if (@score > 80) goto L_pass; + mes "............."; + next; + mes "[Geshupenschte]"; + mes "You've missed again!"; + mes "If you keep missing, I can't give you the job. Go study more."; + set BSMITH_Q2, 1; + close; + + L_pass: + set BSMITH_Q,2; + set BSMITH_Q2, 0; + mes "You Passed!"; + next; + mes "[Geshupenschte]"; + mes "I'll let you do the job"; + mes "Are you prepared?"; + close; +L_ReTest1: + mes "Ah, I see you've studied more. Don't miss any questions! Here we go!"; + next; + goto M_Rdy; + + +// Test 2----------------------------------------------------------------- +L_Test2: + if(BSMITH_Q2 > 0) goto L_CheckTest2; + mes "Let's see... orders...."; + next; + mes "[Geshupenschte]"; + mes "Ah, here it is!"; + mes "Here's the order that's almost due"; + mes "Hmmm"; + next; + mes "[Geshupenschte]"; + mes "I need you to get me...."; + next; + set BSMITH_Q2,rand(1,5); + if (BSMITH_Q2 == 2) goto R_item2; + if (BSMITH_Q2 == 3) goto R_item3; + if (BSMITH_Q2 == 4) goto R_item4; + if (BSMITH_Q2 == 5) goto R_item5; + + R_item1: + mes "[Geshupenschte]"; + mes "^5533FF2 Steel"; + mes "1 Rotten Bandage"; + mes "2 Blue Gemstone^000000"; + mes "and ^5533FF1 Arc Wand^000000 from the store."; + next; + mes "[Geshupenschte]"; + mes "Hey, we're not making you bring these because we're cheap! It's a test!"; + next; + mes "[Geshupenschte]"; + mes "^5533FF2 Steel"; + mes "1 Rotten Bandage"; + mes "2 Blue Gemstone^000000"; + mes "and ^5533FF1 Arc Wand^000000 from the store."; + next; + goto L_finalword; + R_item2: + mes "[Geshupenschte]"; + mes "^5533FF2 Star Dust"; + mes "2 Skel Bones"; + mes "1 Zargons^000000"; + mes "and ^5533FF1 Gladius^000000 from the stores."; + next; + mes "[Geshupenschte]"; + mes "Hey! We're not being cheap, this is a test!"; + next; + mes "[Geshupenschte]"; + mes "I'll list them again"; + mes "^5533FF2 Star Dust"; + mes "2 Skel Bones"; + mes "1 Zargons^000000"; + mes "and ^5533FF1 Gladius^000000 from the stores."; + next; + goto L_finalword; + R_item3: + mes "[Geshupenschte]"; + mes "^5533FF2 Coals"; + mes "2 Shells"; + mes "2 Red Bloods^000000"; + mes "and ^5533FF1 Tsurugi^000000 from the stores."; + next; + mes "[Geshupenschte]"; + mes "Hey! We're not being cheap, this is a test!"; + next; + mes "[Geshupenschte]"; + mes "I'll list them again"; + mes "^5533FF2 Coals"; + mes "2 Shells^000000"; + mes "2 Red Bloods"; + mes "and ^5533FF1 Tsurugi^000000 from the stores."; + next; + goto L_finalword; + R_item4: + mes "[Geshupenschte]"; + mes "^5533FF8 Iron Ores"; + mes "1 Trunk"; + mes "2 Blue Gems^000000"; + mes "And a ^5533FFArbalest^000000 from the stores."; + next; + mes "[Geshupenschte]"; + mes "Hey! We're not being cheap!"; + next; + mes "[Geshupenschte]"; + mes "I'll list them again."; + mes "^5533FF8 Iron Ores"; + mes "1 Trunk"; + mes "2 Blue Gems^000000"; + mes "And a ^5533FFArbalest^000000 from the stores."; + next; + goto L_finalword; + R_item5: + mes "[Geshupenschte]"; + mes "^5533FF8 Iron Ores"; + mes "20 Green Herbs"; + mes "2 Animal Skin^000000"; + mes "and ^5533FF1 Morning Star^000000 from the stores."; + next; + mes "[Geshupenschte]"; + mes "Hey! We're not being cheap! It's a test!"; + next; + mes "[Geshupenschte]"; + mes "I'll list them again."; + mes "^5533FF8 Iron Ores"; + mes "20 Green Herbs"; + mes "2 Animal Skin^000000"; + mes "and ^5533FF1 Morning Star^000000 from the stores."; + next; + L_finalword: + mes "[Geshupenschte]"; + mes "Good luck!"; + close; + +L_CheckTest2: + mes "Hmm? Did you bring all the items?"; + next; + if (BSMITH_Q2 == 2) goto L_2b; + if (BSMITH_Q2 == 3) goto L_2c; + if (BSMITH_Q2 == 4) goto L_2d; + if (BSMITH_Q2 == 5) goto L_2e; + + L_2a: + if(countitem(999) < 2 || countitem(930) < 1 || countitem(717) < 2 || countitem(1610) < 1) goto sL_NtEnuf1; + mes "[Geshupenschte]"; + mes "Didn't I ask for 3 steels?"; + next; + mes "[Geshupenschte]"; + mes "Oh yea! I did ask for 2."; + mes "Gimme a sec."; + delitem 999,2; + delitem 930,1; + delitem 717,2; + delitem 1610,1; + callsub sF_Make; + mes "Deliever this to Geffen's Baisulitst and bring back the reciept."; + getitem 1610,1; + next; + mes "[Geshupenschte]"; + mes "WHAT!? Nothing looks different?"; + mes "Look carefully where my hand is."; + mes "See the emphesized groove!?"; + mes "ITS THE SUPER Geshupenschte ARC WAND MK II!!!!! XDDDDD"; + next; + mes "[Geshupenschte]"; + mes "Feel the difference! Almost no inertia!"; + next; + mes "[Geshupenschte]"; + mes "Now, go deliever to Baisulitst!"; + close; + + sL_NtEnuf1: + mes "[Geshupenschte]"; + mes "You didn't bring all the items!"; + next; + goto R_item1; + L_2b: + if(countitem(1001) < 2 || countitem(932) < 1 || countitem(912) < 1 || countitem(1219) < 1) goto sL_NtEnuf2; + mes "[Geshupenschte]"; + mes "Didn't I ask for 3 Star Dusts?"; + next; + mes "[Geshupenschte]"; + mes "Oh yea, 2, that's right."; + mes "Okay, gimme a sec."; + delitem 1001,2; + delitem 932,1; + delitem 912,1; + delitem 1219,1; + callsub sF_Make; + mes "Now, take this to Morroc's Wickebine"; + getitem 1219,1; + next; + mes "[Geshupenschte]"; + mes "WHAT!? IT DOESN'T LOOK ANY DIFFERENT!?"; + mes "Look carefully at the blade!"; + mes "CAN YOU NOT SEE THE BEAUTIFUL MARKINGS?!"; + mes "ULTRA GLADIUS Geshupenschte Mk II!!"; + next; + mes "[Geshupenschte]"; + mes "Isnt it so pretty ^_^"; + next; + mes "[Geshupenschte]"; + mes "Well, go to Morroc and give it the Wickebine and bring the receipt back."; + close; + next; + + sL_NtEnuf2: + mes "[Geshupenschte]"; + mes "You didn't bring all the items!"; + next; + goto R_item2; + L_2c: + if(countitem(1003) < 2 || countitem(935) < 2 || countitem(990) < 1 || countitem(1119) < 1) goto sL_NtEnuf3; + mes "[Geshupenschte]"; + mes "Didn't I ask for 3 coals??"; + next; + mes "[Geshupenschte]"; + mes "That's right, 2 coals"; + mes "Okay, wait a sec."; + delitem 1003,2; + delitem 935,2; + delitem 990,1; + delitem 1119,1; + callsub sF_Make; + mes "Give this to Izlude's Gromgast and bring back the receipt."; + getitem 1119,1; + next; + mes "[Geshupenschte]"; + mes "WHAT!? NOTHING LOOKS DIFFERENT!?"; + mes "Look carefully at the blade!"; + mes "Look at the beautiful markings!"; + mes "ULTRA Geshupenschte TSURUGI Mk II!!!"; + next; + mes "[Geshupenschte]"; + mes "Isn't it so pretty ^_^"; + next; + mes "[Geshupenschte]"; + mes "Anyways, Izlude's Gromgast! Go!"; + close; + + sL_NtEnuf3: + mes "[Geshupenschte]"; + mes "You didn't bring all the items!"; + next; + goto R_item3; + + L_2d: + if(countitem(1002) < 8 || countitem(1019) < 1 || countitem(717) < 2 || countitem(1713) < 1) goto sL_NtEnuf4; + mes "[Geshupenschte]"; + mes "Didn't I ask for 30 iron ores?"; + next; + mes "[Geshupenschte]"; + mes "Wait, 8 is right >_>"; + mes "Hmmm, wait a sec then."; + delitem 1002,8; + delitem 1019,1; + delitem 717,2; + delitem 1713,1; + callsub sF_Make; + mes "Deliever this to Payon's Tilpitz"; + getitem 1713,1; + next; + mes "[Geshupenschte]"; + mes "WHAT!? NOTHING LOOKS DIFFERENT!?"; + mes "LOOK AT THE GROOVES WHERE THE ARROWS GO!!"; + mes "LOOK HOW CUSTOMIZED IT IS!!!!!"; + mes "Geshupenschte'S MASTER ARCHER ARBALEST Mk II!!!"; + next; + mes "[Geshupenschte]"; + mes "Look how well built the bow is!"; + next; + mes "[Geshupenschte]"; + mes "Well, Tilpitz in Payon, and bring the envelop."; + close; + + sL_NtEnuf4: + mes "[Geshupenschte]"; + mes "You didn't bring all the items!"; + next; + goto R_item4; + + L_2e: + if(countitem(1002) < 8 || countitem(511) < 20 || countitem(919) < 2 || countitem(1513) < 1) goto sL_NtEnuf5; + mes "[Geshupenschte]"; + mes "Didn't I ask for 40 ores?"; + next; + mes "[Geshupenschte]"; + mes "Wait, 8! That's right!"; + mes "Okay, wait a sec!"; + delitem 1002,8; + delitem 511,20; + delitem 919,2; + delitem 1513,1; + callsub sF_Make; + mes "Take this to Bismarck in Comodo and bring me the receipt."; + getitem 1513,1; + next; + mes "[Geshupenschte]"; + mes "WHAT!? NOTHING LOOKS DIFFERENT!?"; + mes "Look carefully at the tips of the spikes!!"; + mes "The green herbs' antidote for poisons have been mixed in!"; + mes "ANTI POISON Geshupenschte MORNING STAR MK II!!!!!"; + next; + mes "[Geshupenschte]"; + mes "Don't you get it!? When you're poisoned, you stab yourself with it!"; + mes "The wound.....probably will get bigger! But the poison will be gone!"; + next; + mes "[Geshupenschte]"; + mes "Well, take this to Bismarck of Comodo!"; + close; + + sL_NtEnuf5: + mes "[Geshupenschte]"; + mes "You didn't bring all the items!"; + next; + goto R_item5; + + sF_Make: + set BSMITH_Q, 3; + next; + mes "[Geshupenschte]"; + mes "Grunt......."; + next; + mes "~clank~clonk~clank~"; + next; + mes "[Geshupenschte]"; + mes "Ergh......"; + next; + mes "~bonk~bang~bonk~"; + next; + mes "[Geshupenschte]"; + mes "Whew. There we go!"; + return; + + +// Test 3----------------------------------------------------------------- +L_Test3: + if (BSMITH_Q3 == 1) goto L_CheckTest3; + mes "Go deliever!"; + mes "........you didn't forget.......right?"; + next; + mes "[Geshupenschte]"; + if (BSMITH_Q2 == 2) goto L_3b; + if (BSMITH_Q2 == 3) goto L_3c; + if (BSMITH_Q2 == 4) goto L_3d; + if (BSMITH_Q2 == 5) goto L_3e; + + L_3a: + if (countitem(1610) < 1) goto L_LostItem; + mes "Baisulitst should be at 11 o'clock of Geffen "; + close; + L_3b: + if (countitem(1210) < 1) goto L_LostItem; + mes "Take it to Wickebine near the Sword Mace dealer in Morroc."; + close; + L_3c: + if (countitem(1119) < 1) goto L_LostItem; + mes "Gromgast hangs out at 11 o'clock of Izlude."; + close; + L_3d: + if (countitem(1713) < 1) goto L_LostItem; + mes "Tilpitz hangs out at 5 o'clock of Payon"; + close; + L_3e: + if (countitem(1513) < 1) goto L_LostItem; + mes "Bismarck is usually at 12 o'clock area of Comodo."; + close; + + L_LostItem: + mes "WHAT!!! YOU LOST THE ITEM I GAVE YOU TO DELIVER!!!!"; + emotion 23; + next; + mes "[Geshupenschte]"; + mes "........... Well then.... I gues you'll just have too....."; + next; + mes "[Geshupenschte]"; + mes "START ALL OVER!! Now get out of my sight!!"; + set BSMITH_Q, 0; + set BSMITH_Q2, 0; + emotion 7; + close; + +L_CheckTest3: + mes "Did you deliever it?"; + mes "Lets see the receipt then!"; + next; + menu "Here you go",-,"Wait a second.",M_Wait; + + if(countitem(1073) < 1) goto sL_noreceipt; + mes "[Geshupenschte]"; + mes "Great! Very good! You're definalty a honest merchant! Go see Altiregen back in Geffen!"; + mes "I know you'll definately pass the test!!!"; + set BSMITH_Q, 4; + set BSMITH_Q2, 0; + set BSMITH_Q3, 0; + delitem 1073,1; + close; + + sL_noreceipt: + mes "[Geshupenschte]"; + mes "........You don't know where you left the receipt........."; + next; + mes "[Geshupenschte]"; + mes "WHAT'S THIS?! YOU LOST IT!? DId you SELL it or something!?"; + emotion 23; + next; + mes "[Geshupenschte]"; + mes "The receipt is the soul of merchants! The life line of blacksmiths!"; + mes "Guess what? You get to..... START ALL OVER!!"; + set BSMITH_Q, 0; + set BSMITH_Q2, 0; + set BSMITH_Q3, 0; + emotion 32; + close; + M_Wait: + mes "[Geshupenschte]"; + mes "Well, tell me if you find the receipt. I HOPE you got one."; + close; + +L_Done: + mes "Thanks for working for me! Now go see Altiregen!"; + close; + +L_GoChange: + mes "There should be nothing you want now........."; + mes "Maybe you're thinking of Morroc or Geffen?"; + close; +} + + +// Delivery Recipients ==================================================>\\ +// Baisulitst ----------------------------------------------------------- +geffen.gat,46,164,4 script Baisulitst 69,{ + if (BSMITH_Q==3) goto L_Start; + + mes "[Baisulitst]"; + mes "Now that I think about it, it's been a while since I've been to Alberta. I'm a little upset with the service I've been getting, especially the late deliveries......"; + next; + mes "[Baisulitst]"; + mes "I ordered something from the Geffen Blacksmith Guild but the order got transfered to a blacksmith in Alberta....."; + next; + mes "[Baisulitst]"; + mes "Hmmm....., I wonder when I will recieve my special order ^5555FFArc Wand^000000....."; + emotion 20; + close; + +L_Start: + if(BSMITH_Q2 != 1) goto L_Wrong; + if(countitem(1073) == 1) goto L_Done; + if(countitem(1610) < 1) goto L_NoItem; + mes "[Baisulitst]"; + mes "Wow! Is it finally here?!"; + mes "Thank you! I was waiting forever!"; + delitem 1610,1; + set BSMITH_Q3, 1; + next; + mes "[Baisulitst]"; + mes "I ordered this from the Geffen BS Guild, but they assigned it to the smith in Alberta!"; + next; + mes "[Baisulitst]"; + mes "Thanks for coming from so far away!"; + mes "Also, make sure to hit Geshupenschte one for me! How could anything be so late >_>"; + next; + mes "[Baisulitst]"; + mes "Here's the receipt!"; + next; + mes "~Scribble, Scribble~ Rip ~"; + next; + getitem 1073,1; + mes "[Baisulitst]"; + mes "Here you go! Good bye! Thank you for the delivery!"; + close; + + L_NoItem: + mes "[Baisulitst]"; + mes "..... Hmm?.... What's this?..... You here to deliver something to me but you don't have the actual item??"; + emotion 32; + L_Wrong: + mes "[Baisulitst]"; + mes "..... Hmm?.... What's this?..... This is not what I ordered....."; + emotion 32; + L_Done: + mes "[Baisulitst]"; + mes "Thanks again for the delivery. I really appreciate it!"; + close; +} + +// Wickebine -------------------------------------------------------------------- +morocc.gat,27,112,4 script Wickebine 725,{ + if (BSMITH_Q == 3) goto L_Start; + + mes "[Wickebine]"; + mes ".........."; + mes ".....When will my order be here?"; + emotion 20; + next; + mes "[Wickebine]"; + mes "The Geffen Blacksmith Guild and Geshupenschte are both CHRONICALLY LATE!"; + emotion 32; + next; + mes "[Wickebine]"; + mes "This is very upsetting......"; + close; +L_Start: + if(BSMITH_Q2 != 2) goto L_Wrong; + if(countitem(1073) == 1) goto L_Done; + if(countitem(1219) < 1) goto L_NoItem; + mes "[Wickebine]"; + mes "Is it finally here!?!"; + mes "Give it!!!!"; + delitem 1219,1; + set BSMITH_Q3, 1; + next; + mes "[Wickebine]"; + mes "Tell the BS guild"; + mes "and your teacher Geshupenschte!"; + next; + mes "[Wickebine]"; + mes "You're LATE"; + mes "and I was WAITING."; + next; + mes "[Wickebine]"; + mes "But the item seems pretty high quality."; + next; + mes "(Writes something down)"; + next; + getitem 1073,1; + mes "[Wickebine]"; + mes "Here's the receipt and thanks for the delivery."; + + L_NoItem: + mes "[Wickebine]"; + mes "Ung! You came all this way to deliver my item and you lost it??!!"; + emotion 6; + close; + L_Wrong: + mes "[Wickebine]"; + mes "I think you're supposed to deliver this somewhere else....."; + emotion 4; + close; + L_Done: + mes "[Wickebine]"; + mes "Thank you"; + close; +} + +// Gromgast --------------------------------------------------------------------- +izlude.gat,69,181,4 script Gromgast 734,{ + if (BSMITH_Q == 3) goto L_Start; + + mes "[Gromgast]"; + mes ".........."; + mes ".....When will that sword arrive >_>"; + next; + mes "[Gromgast]"; + mes "I need that sword for my training!"; + mes "Nooo.....I must not get rusty!"; + next; + mes "[Gromgast]"; + mes "Noooooooo T_T......"; + close; + +L_Start: + if(BSMITH_Q2 != 3) goto L_Wrong; + if(countitem(1073) == 1) goto L_Done; + if(countitem(1119) < 1) goto L_NoItem; + mes "[Gromgast]"; + mes "Ahhh, it's finally here"; + mes "Let me see it."; + delitem 1119,1; + set BSMITH_Q3, 1; + next; + mes "[Gromgast]"; + mes "Nice....."; + mes "It's better then I expected."; + next; + mes "[Gromgast]"; + mes "I think this sword is exactly what I need!!"; + mes "I like it!"; + next; + mes "[Gromgast]"; + mes "Here you go."; + next; + mes "~scribble~rip~"; + next; + getitem 1073,1; + mes "[Gromgast]"; + mes "Here's the receipt! Thank you."; + close; + + L_NoItem: + mes "[Gromgast]"; + mes "Hmm... I don't understand.... where is the item I ordered???...."; + emotion 20; + L_Wrong: + mes "[Gromgast]"; + mes "Sorry, but you've got the wrong person."; + close; + L_Done: + mes "[Gromgast]"; + mes "Thanks for the delivery!"; + close; +} + +// Tilpitz -------------------------------------------------------------------- +payon.gat,214,79,4 script Tilpitz 59,{ + if (BSMITH_Q == 3) goto L_Start; + + mes "[Tilpitz]"; + mes "When's that bow coming.........."; + mes "How long ago did I order this thing >_>"; + next; + mes "[Tilpitz]"; + mes "There's no one that can make it execpt 'him'........."; + mes "but, WHEN WILL IT COME >_>"; + next; + mes "[Tilpitz]"; + mes " T_T "; + close; +L_Start: + if(BSMITH_Q2 != 4) goto L_Wrong; + if(countitem(1073) == 1) goto L_Done; + if(countitem(1713) < 1) goto L_NoItem; + mes "[Tilpitz]"; + mes ".......Ohhh! It's finally here!!!"; + mes "Let me see it!"; + delitem 1713,1; + set BSMITH_Q3, 1; + next; + mes "[Tilpitz]"; + mes "Wow...."; + mes "Not bad......not bad at all!!"; + next; + mes "[Tilpitz]"; + mes "Look at this curve!! It's wonderful!!"; + mes "Oh, I love this"; + next; + mes "[Tilpitz]"; + mes "Thank you!!!"; + next; + mes "scribble scribble rip"; + next; + getitem 1073,1; + mes "[Tilpitz]"; + mes "Here's the receipt! Thank you again!!!!!"; + close; + + L_NoItem: + mes "[Tilpitz]"; + mes "Oooh! The delivery is here? What?..... You don't have anything???....."; + emotion 1; + next; + mes "[Tilpitz]"; + mes "Don't play bad jokes on people!"; + emotion 7; + close; + L_Wrong: + mes "[Tilpitz]"; + mes "What's this? You have a delivery.... for someone else..... Then why not deliver it to that person instead???........"; + emotion 4; + close; + L_Done: + mes "[Tilpitz]"; + mes "More I look at it, more beautiful it gets!!! "; + close; +} + +// Bismarck --------------------------------------------------------------------------- +comodo.gat,158,342,4 script Bismarck 118,{ + if (BSMITH_Q == 3) goto L_Start; + + mes "[Bismarck]"; + mes "......Ughï...."; + mes ".....When's that delivery coming......"; + next; + mes "[Bismarck]"; + mes "....the.....p...poison...... >_>...."; + mes "Ack....."; + next; + mes "[Bismarck]"; + mes "....Looks like... I'm....screwed."; + close; + +L_Start: + if(BSMITH_Q2 != 5) goto L_Wrong; + if(countitem(1073) == 1) goto L_Done; + if(countitem(1513) < 1) goto L_NoItem; + mes "[Bismarck]"; + mes "Ugh.........finally..........."; + mes "Pant pant..........give it to me~"; + delitem 1513,1; + set BSMITH_Q3, 1; + next; + mes "[Bismarck]"; + mes "Ugh...."; + mes "The green herb is in it........right?"; + next; + mes "[Bismarck]"; + mes "I........can't move.........help me up"; + mes "....grunt....."; + next; + mes "- STAB! -"; + next; + mes "[Bismarck]"; + mes "AAAAAAAAAAACCCCCCCCCKKKKKK!!!"; + next; + mes "[Bismarck]"; + mes "whew, that works pretty well.."; + next; + getitem 1073,1; + mes "[Bismarck]"; + mes "Cough.... Here's the receipt..... thank you for the delivery! I guess I get to live longer......"; + close; + + L_NoItem: + mes "[Bismarck]"; + mes "ARE YOU TRYING TO TOY WITH ME!!?? How.... ~cough~... could....~ung~.... you....~ack~....."; + emotion 23; + close; + L_Wrong: + mes "[Bismarck]"; + mes "I NEED AN ANTIDOTE DAMMIT!! Not this stuff ~ack~........"; + emotion 23; + close; + L_Done: + mes "[Bismarck]"; + mes "Whew, thank you."; + close; +} + + + +//<===================================================== Mitehmaeeuh: Last Test ===================================================>\\ +morocc.gat,95,133,4 script BS Guildsman 726,{ + if (BSMITH_Q == 4) goto L_Start; + if (BSMITH_Q == 5) goto L_Done; + mes "[Mitmayer]"; + mes "Whew.... the sun in Morroc is just too strong.... I guess it will gie me tougher skin... Oh well......"; + emotion 19; + next; + mes "[Mitmayer]"; + mes "Afteralll, we Blacksmiths are used to high temperatures since we work with fire everyday!"; + next; + mes "[Mitmayer]"; + mes "Getting nice and tan isn't so bad..... I think it gives you a healthy athletic look."; + close; +L_Done: + mes "[Mitmayer]"; + mes "I told you that you've passed."; + next; + mes "[Mitmayer]"; + mes "Return to the guild"; + next; + mes "[Mitmayer]"; + mes "Also, don't lose the Hammer of Blacksmiths!!"; + next; + mes "[Mitmayer]"; + mes "Don't forget to use the skill points too!"; + close; +L_Start: + mes "[Mitmayer]"; + mes "Welcome! You want to be a smith?"; + mes "Okay, but know that not everyody passes."; + next; + mes "[Mitmayer]"; + mes "It's a quiz about how well you know metals and the blacksmith class."; + mes "I have quite a bit to ask, so lets start"; + next; + menu "Ok",M_Test,"Not now",-; + + mes "[Mitmayer]"; + mes "Okay, I'll see you then."; + close; + M_Test: + mes "[Mitmayer]"; + mes "Okay, lets start You'll fail if you don't get enough right."; + next; + mes "[Mitmayer]"; + mes "5 questions"; + mes "I won't tell you what's right or wrong."; + next; + set @score, 0; + set @temp, rand(3); + if (@temp == 1) goto R_Set2; + if (@temp == 2) goto R_Set3; + + R_Set1: + mes "[Mitmayer]"; + mes "1. Which skill is needed for discount?"; + next; + menu "Pushcart Lv 3",sM_1a,"Item Appraisal",sM_1a,"Mammonite Lv 10",sM_1a,"Enlarge Weight Lv 3",-; + + set @score,@score+20; + sM_1a: + + mes "[Mittmayer]"; + mes "2. What effect does hammerfall have?"; + next; + menu "Stun",-,"Blind",sM_1b,"Confuse",sM_1b,"Poison",sM_1b; + + set @score,@score+20; + sM_1b: + + mes "[Mitmayer]"; + mes "3. How much zeny is taken when Mammonite 10 is used?"; + next; + menu "900z",sM_1c,"1,000z",-,"2,000z",sM_1c,"1,000,000z",sM_1c; + + set @score,@score+20; + sM_1c: + + mes "[Mitmayer]"; + mes "4. How much money is saved with max discount??"; + next; + menu "21 % ",sM_1d,"22 % ",sM_1d,"23 % ",sM_1d,"24 % ",-; + + set @score,@score+20; + sM_1d: + + mes "[Mitmayer]"; + mes "5. How much can you earn with max overcharge?"; + next; + menu "21 % ",sM_1e,"22 % ",sM_1e,"23 % ",-,"24 % ",sM_1e; + + set @score,@score+20; + sM_1e: + goto L_Result; + + R_Set2: + mes "[Mittmayer]"; + mes "1. Which monster drops steel?"; + next; + menu "Zerom",sM_2a,"Steel Chonchon",sM_2a,"Skel Worker",-,"Requiem",sM_2a; + + set @score,@score+20; + sM_2a: + + mes "[Mitmayer]"; + mes "2. What can you make with Red Bloods?"; + next; + menu "Flame Heart",-,"Rough Wind",sM_2b,"Great Nature",sM_2b,"Mystic Frozen",sM_2b; + + set @score,@score+20; + sM_2b: + + mes "[Mitmayer]"; + mes "3. Which ore do you have the most of in storage?"; + next; + menu "WoV",sM_2c,"Red Blood",-,"Green Live",-,"Crystal Blue",-; + + set @score,@score+20; + sM_2c: + + mes "[Mitmayer]"; + mes "4. What kind of monsters are weak against wind weapons?"; + next; + menu "Fire",sM_2d,"Water",-,"Earth",sM_2d,"Wind",sM_2d; + + set @score,@score+20; + sM_2d: + + mes "[Mitmayer]"; + mes "5. How many irons are needed to make steel?"; + next; + menu "5",-,"4",sM_2e,"3",sM_2e,"6",sM_2e; + + set @score,@score+20; + sM_2e: + goto L_Result; + + R_Set3: + mes "[Mitmayer]"; + mes "1. What do you do when you find a person in distress?"; + next; + menu "Ask what they need",-,"Talk for a bit",-,"Ignore",sM_3a,"Drop item and leave",sM_3a; + + set @score,@score+20; + sM_3a: + + mes "[Mitmayer]"; + mes "2. Where do you learn change cart?"; + next; + menu "Aldebaran",sM_3b,"Alberta",-,"Morroc",sM_3b,"Izlude",sM_3b; + + set @score,@score+20; + sM_3b: + + mes "[Mitmayer]"; + mes "3. Geffen tower is the center, where is the BS guild?"; + next; + menu "11oclock",sM_3c,"5oclock",-,"7oclock",sM_3c,"12oclock",sM_3c; + + set @score,@score+20; + sM_3c: + + mes "[Mitmayer]"; + mes "4. Which town has the most smiths"; + next; + menu "Prontera",sM_3d,"Morroc",sM_3d,"Alberta",sM_3d,"Geffen",-; + + set @score,@score+20; + sM_3d: + + mes "[Mitmayer]"; + mes "5. Which stat affect forge?"; + next; + menu "STR",sM_3e, "DEX ",-, "AGI",sM_3e, "VIT",sM_3e; + + set @score,@score+20; + sM_3e: + +L_Result: + mes "[Mitmayer]"; + mes "Great work!"; + next; + mes "[Mitmayer]"; + mes "lets see... your score is ^5533FF"+@score+"^000000 points!"; + next; + mes "[Mitmayer]"; + if (@score > 70) goto L_Pass; + + mes "Failed, go study more!!"; + next; + mes "[Mitmayer]"; + mes "It's just not enough....."; + mes "Please return after you've studied more."; + close; + + L_Pass: + mes "Great! Congrats! You pass!"; + emotion 21; + next; + mes "[Mitmayer]"; + mes "You'll need to return to the guild. Here is proof that you passed the test.... the ^5533FFHammer of Blacksmiths^000000."; + getitem 1005,1; + set BSMITH_Q, 5; + set BSMITH_Q2, 0; + next; + mes "[Mitmayer]"; + mes "DON'T LOOSE THIS!!"; + emotion 0; + next; + mes "[Mitmayer]"; + mes "Well, good luck!!!!"; + close; +} diff --git a/npc/jobs/2-1/hunter.txt b/npc/jobs/2-1/hunter.txt new file mode 100644 index 000000000..cd284c1de --- /dev/null +++ b/npc/jobs/2-1/hunter.txt @@ -0,0 +1,1250 @@ +//===== eAthena Script ======================================= +//= Hunter Job Quest +//===== By: ================================================== +//= EREMES THE CANIVALIZER (Aegis). +//= Translated by yoshiki (Aegis) +//= Converted by kobra_k88 +//= Further bugfixed and tested by Lupus +//===== Current Version: ===================================== +//= 1.7 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Hunter Job Quest converted from aegis script +//===== Additional Comments: ================================= +//= v1.0 Fully working. +//= v1.1 Changed global variable names to unique ones. +//= v1.2 - 1.3 Updates for eAthena +Knight2,Crusader2 fix +//= v1.4 Rollback from the wrong Kashy's fix +//= v1.5 Fixed items quest fork bug [Lupus] +//= v1.6 Fixed items quest bug: added extra condition [Lupus] +//= v1.7 Fixed skillpoints check bug [Lupus] +//============================================================ + + + +// Please add this warp to your warp/s script/s if it is not already there, or you can enable it here +//in_hunter.gat,100,13,0 warp hnt_to_payfild10 1,2,pay_fild10,145,250 + + +//<================================ Guildsman: Warps you to guild =======================================>\\ +pay_fild10.gat,148,251,4 script Hunter Guildsman 98,{ + warp "in_hunter.gat",100,18; + end; +} + + +//<====================================== Job Changer ========================================>\\ +in_hunter.gat,99,99,4 script Hunter Sharon 727, +{ + if(Class==Job_Archer) goto L_Start; + if(Class==Job_Hunter) goto L_Hunt; + if(callfunc("Is_Bow_Class")) goto L_Other; + if(callfunc("Is_Sword_Class")) goto L_Swo; + if(callfunc("Is_Magic_Class")) goto L_Mage; + if(callfunc("Is_Thief_Class")) goto L_Thf; + if(callfunc("Is_Holy_Class")) goto L_Aco; + if(callfunc("Is_Merc_Class")) goto L_Merc; + +L_Nov: + mes "[Hunter Sharon]"; + mes "What's a novice like you doing here? Leave, we have nothing for you."; + emotion 1; + close; +L_Swo: + mes "[Hunter Sharon]"; + mes "A follower of the way of the blade! We have nothing for you here so please leave."; + close; +L_Mage: + mes "[Hunter Sharon]"; + mes "Hello mage type person. If you have no business here, please leave,"; + close; +L_Aco: + mes "[Hunter Sharon]"; + mes "Good day, religious zealot! It's nice to meet you and all, but you have no buisiness here."; + close; +L_Merc: + mes "[Hunter Sharon]"; + mes "Hey, how's buisiness? Perhaps if you want to sell something, go back to town."; + close; +L_Thf: + mes "[Hunter Sharon]"; + mes "Eeep! There's nothing to steal here!! Leave us alone..... go rob an old lady or something......"; + emotion 23; + close; +L_Hunt: + mes "[Hunter Sharon]"; + mes "What up! "+strcharinfo(0)+" Why did you come back? Falcon run away or something? Te hehe."; + emotion 18; + next; + mes "[Hunter Sharon]"; + mes "I hope you didn't think you could get free stuff from us just because your part of our guild now......"; + close; +L_Other: + mes "[Hunter Sharon]"; + mes "What are YOU doing her? Did you come to do a little song and dance... ke.. keke....kekekeHahahahhaha!!!"; + emotion 18; + close; + + +L_Start: + mes "[Hunter Sharon]"; + if(HNTR_Q == 1) goto L_Test2; + if(HNTR_Q == 2) goto L_Test3; + if(HNTR_Q == 3) goto L_Change; + if(HNTR_Q2 == 1) goto L_ReTest; + mes "Hey archer!! Hmmm....... You look like you've trained pretty hard.... I take it you're here to be a hunter!"; + next; + menu "Of course!",M_0, "What are the requirements",M_1, "Not right now.",M_End; + + M_0: + mes "[Hunter Sharon]"; + mes "Heh, I knew it. First fill out this application form."; + next; + mes "(you fill out the form and hand it back)"; + next; + mes "[Hunter Sharon]"; + if(JobLevel < 40) goto sL_LowLvl; + if(JobLevel == 50) goto sL_HighLvl; + set JBLVL, 40; + mes "Looks good. Let me start off by introducing myself. My name is Sharon, nice to meet you."; + next; + mes "[Hunter Sharon]"; + mes "Before I explain the process of becoming a Hunter, I'd like to do a short interview with you."; + next; + mes "[Hunter Sharon]"; + mes "Do you want to do the interview now?"; + next; + menu "Yeah, let's begin.",L_Test, "Nah, I'll come back in a bit.",M_End; + + sL_LowLvl: + mes "Hmm... It looks like you'll need more training. To become a Hunter, you will have to have a great amount of experience."; + next; + mes "[Hunter Sharon]"; + mes "Having a ^5533FFjob level of 40^000000 is what is required of all Hunter candidates. Please continue your training and good luck."; + close; + sL_HighLvl: + mes "Well, well now! A high level archer.... very nice! You must have trained really hard."; + emotion 5; + next; + mes "[Hunter Sharon]"; + mes "My name is Sharon, nice to meet you. Before I explain the process of becoming a Hunter, I'd like to do a short interview with you."; + next; + set JBLVL, 50; + goto L_Test; + M_1: + mes "[Hunter Sharon]"; + mes "The requirements?"; + mes "1. Be a archer"; + mes "2. Have a job level of at least 40"; + mes "3. Pass all of the tests"; + next; + mes "[Hunter Sharon]"; + mes "If you trained hard enough, you shouldn't have any problems becoming a Hunter."; + close; + + M_End: + mes "[Hunter Sharon]"; + mes "Ok, I'll see you later."; + close; + + + L_ReTest: + mes "[Hunter Sharon]"; + mes "Hmm.. what's this? So you wanna do the interview again? Very well. Hopefully you'll do better this time."; + next; + mes "[Hunter Sharon]"; + mes "Okay, let's start!"; + next; + L_Test: + set @score, 0; + mes "[Hunter Sharon]"; + mes "I'm going to ask you some simple questions to get a feel for who you are and why you want to become a Hunter."; + mes "Relax and answer the questions honestly and thoughtfully."; + next; + mes "[Hunter Sharon]"; + mes "You've been an training for a while, and now you're running out of ideas about where to go hunt. What should you do?"; + next; + menu "Walk around screaming, 'Where should i go hunt!?'",M_1b, "Ask someone politely.",-, "Just explore.",-; + + set @score, @score + 10; + M_1b: + + mes "[Hunter Sharon]"; + mes "Okay, so you picked your hunting spot! You plan to go to the Sograt Desert to hunt Hodes."; + next; + mes "[Hunter Sharon]"; + mes "But you're in Payon! How do you get to the desert?"; + next; + menu "Go beg priests for warps",M_2b, "Kafra warp",-, "Walk there with a friend",-; + + set @score, @score + 10; + M_2b: + + mes "[Hunter Sharon]"; + mes "There are no priests around, all your friends are busy, and you don't have enough money for a kafra warp."; + next; + mes "[Hunter Sharon]"; + mes "How do you get the money?"; + next; + menu "Beg",M_3b, "Sell useless items",-, "Go hunting in a nearby field",-; + + set @score, @score + 10; + M_3b: + + mes "[Hunter Sharon]"; + mes "You somehow get to the desert, but now you feel too weak to hunt hodes."; + next; + mes "[Hunter Sharon]"; + mes "What do you do now??"; + next; + menu "Go cliff hunting.",M_4b, "Go rest at Morroc.",-, "Start shooting the hodes that other people are attacking.",M_4b; + + set @score, @score + 10; + M_4b: + + mes "[Hunter Sharon]"; + mes "It's too much, you can't do it. You go to Morroc."; + next; + mes "[Hunter Sharon]"; + mes "By the time you return to town, you have no hp left, but you see a priest. How do you ask for a heal?"; + next; + menu "If it's ok, can i have a heal please?",-, "Heal please.",M_5b, "heal plz",M_5b; + + set @score, @score + 10; + M_5b: + + mes "[Hunter Sharon]"; + mes "While hunting, you find a rare item. You go to the market to sell it, and find lots of people and chat rooms."; + next; + mes "[Hunter Sharon]"; + mes "What do you do to sell the item quicker?"; + next; + menu "Go into preexisting chat rooms and ask",M_6b, "Make your own chat room.",-, "See if anyone is buying.",-; + + set @score, @score + 10; + M_6b: + + mes "[Hunter Sharon]"; + mes "After a while, a person starts to beg you. What do you do?"; + next; + menu "Give some items and money",M_7b, "Ignore that person",M_7b, "Tell them where to level and make money.",-; + + set @score, @score + 10; + M_7b: + + mes "[Hunter Sharon]"; + mes "You decide to go hunting in the woods."; + next; + mes "[Hunter Sharon]"; + mes "But you find someone who's lost. What do you do?"; + next; + menu "Give him/her directions.",-, "Personally escort him/her.",-, "Ignore that person.",M_8b; + + set @score, @score + 10; + M_8b: + + mes "[Hunter Sharon]"; + mes "You take the person to a safe place and resume hunting. While hunting, you see someone fighting a mvp!"; + next; + mes "[Hunter Sharon]"; + mes "What do you do?"; + next; + menu "Watch and attack if asked for help.",-, "Start attacking.",M_9b, "Return to town in panic.",M_9b; + + set @score, @score + 10; + M_9b: + + mes "[Hunter Sharon]"; + mes "Now you're done hunting for the day."; + next; + mes "[Hunter Sharon]"; + mes "You find a rare item on the street while going back to town. What do you do?"; + next; + menu "Finders keepers.",M_10b, "Try to find owner.",-, "Walk past it.",-; + + set @score, @score + 10; + M_10b: + + L_Score: + mes "[Hunter Sharon]"; + mes "Now we're done!!"; + next; + if(@score < 90) goto sL_Failed; + if(@score < 100) goto sL_90; + + sL_100: + mes "[Hunter Sharon]"; + mes "Great! Based on the answers you gave, you seem to be just the type of person we're looking for."; + emotion 21; + next; + mes "[Hunter Sharon]"; + mes "With your kind of additude and values, you should have no problems becoming a Hunter."; + next; + goto L_Test2; + sL_90: + mes "[Hunter Sharon]"; + mes "You didn't do as well as I hoped, but I'll pass you.... Though I don't know what the guild master will think of you...."; + next; + mes "[Hunter Sharon]"; + mes "Work hard on the next test. Make Sharon happy, okies?"; + next; + goto L_Test2; + sL_Failed: + mes "[Hunter Sharon]"; + mes "I.......don't think I can pass you..... The way you live your life is...... well... unexecptable for a Hunter candidate."; + emotion 4; + next; + mes "[Hunter Sharon]"; + mes "Think carefully about my questions and your answers. Working well with people is just as important as loving nature."; + set HNTR_Q2, 1; + close; + +L_Test2: + mes "What you have to do next is go see ^5533FFMr. Demon Hunter^000000 over there to my left. He'll tell you about the second test."; + next; + mes "[Hunter Sharon]"; + mes "Good luck!"; + set HNTR_Q, 1; + set HNTR_Q2, 0; + close; + +L_Test3: + mes "Hmmm? The guild master? Oh, he's out right now."; + emotion 20; + next; + mes "[Hunter Sharon]"; + mes "If I remember correctly, he should be somewhere in Archer Village. I think he had to talk with someone in the ^5533FFArcher Guild^000000."; + close; + +L_Change: + if(skillpoint > 0) goto sL_SkPoints; + if(countitem(1007) < 1) goto sL_NotRdy; + mes "Huh? Did you pass the test?"; + next; + mes "[Hunter Sharon]"; + mes "Congratulations!!"; + emotion 21; + next; + mes "[Hunter Sharon]"; + mes "Now I can change you into a Hunter!"; + next; + mes "[Hunter Sharon]"; + mes "There you go! You look great in the hunter outfit"; + jobchange Job_HUNTER; + emotion 21; + next; + mes "[Hunter Sharon]"; + mes "Now, for working so hard, the guild has a small reward for you."; + if(JBLVL == 50) getitem 1718, 1; + if(JBLVL == 40) getitem 1710, 1; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + next; + mes "[Hunter Sharon]"; + mes "Do all of us here a favor, act responsibly, and love and respect nature! Good luck on your journey and remember you are always welcome here!"; + next; + close; + + sL_SkPoints: + mes "You still have skill points left over. Speak with me after you've used them up."; + close; + sL_NotRdy: + mes "[Hunter Sharon]"; + mes "Hmmm, I received news of your success.... But you don't seem to have the ^5533FFNecklace of Wisdom^000000 as proof."; + emotion 20; + next; + mes "[Hunter Sharon]"; + mes "You will need the Necklace of Wisdom to become a Hunter. If you don't have it you will have to start the test over."; + next; + menu "Um... I've got it.... somewhere....",-, "Heh heh.... I must have misplaced it.....",sM_ReStart; + + mes "[Hunter Sharon]"; + mes "Well then go get it!"; + emotion 6; + close; + sM_ReStart: + mes "[Hunter Sharon]"; + mes "..... That's just pathetic....... Have fun re-doing the ENTIRE TEST!"; + emotion 32; + set HNTR_Q, 0; + set HNTR_Q2, 0; + close; +} + + +//<=========================== Demon Hunter: Second Test ===============================>\\ +in_hunter.gat,55,99,7 script Demon Hunter 732, +{ + if(Class == Job_Archer) goto L_Arc; + if(Class == Job_Hunter) goto L_Hnt; + +L_Other: + mes "[Demon Hunter]"; + mes "They call me the Demon Hunter. What's that? You want to know why I'm called that?......"; + next; + mes "[Demon Hunter]"; + mes "heh... heh.... heh....."; + next; + mes "[Demon Hunter]"; + mes "For your safety... it's best that you DON'T find out....."; + emotion 29; + close; + +L_Hnt: + mes "[Demon Hunter]"; + mes "Look at you! Nice and spiffy in that Hunter's outfit. How does it feel? Good I bet. Well good luck to you."; + emotion 0; + close; + +L_Arc: + mes "[Demon Hunter]"; + if(HNTR_Q == 1 && HNTR_Q2 > 0) goto L_Check; //Fixed [Lupus] + if(HNTR_Q == 1) goto L_Start; + if(HNTR_Q == 2) goto L_Test3; + if(HNTR_Q == 3) goto L_Done; + mes "You'll have to speak with ^5533FFHunter Sharon^000000 first, if you want to become a hunter."; + close; +L_Start: + mes "Hello, I'm the test examiner they call the Demon Hunter. Is ^5566FF"+strcharinfo(0)+"^000000 your name?"; + next; + menu "Yes",M_Yes, "Uhhh.... no",M_No; + + M_Yes: + mes "[Demon Hunter]"; + mes "Good. Because we make the arrows used during some of the tests, we also need the materials to make those arrows."; + next; + mes "[Demon Hunter]"; + mes "If you haven't noticed already, our guild is NOT as wealthy as some of the others. I mean we're in the middle of the freaking forest for pete sake...."; + emotion 7; + next; + mes "[Demon Hunter]"; + mes "Ehem... Like I was saying earlier we need certain materials to make our arrows. That is where Hunter wanna be's like you come in handy."; + mes "For this test you will have to gather the materials needed for making our arrows."; + next; + mes "[Demon Hunter]"; + mes "Let's see... the items you need to gather are....."; + next; + set HNTR_Q2, rand(1,5); + if(HNTR_Q2 == 2) goto sL_2; + if(HNTR_Q2 == 3) goto sL_3; + if(HNTR_Q2 == 4) goto sL_4; + if(HNTR_Q2 == 5) goto sL_5; + + sL_1: + mes "[Demon Hunter]"; + mes "^5533FF20 Bill of Birds^000000 for arrow heads."; + mes "^5533FF5 Skel-Bones^000000 used here and there."; + mes "and ^5533FF20 green herbs^000000."; + goto L_Cont; + sL_2: + mes "[Demon Hunter]"; + mes "^5533FF7 Venom Canine."; + mes "20 Animal Skins."; + mes "and 15 red herbs^000000."; + goto L_Cont; + sL_3: + mes "[Demon Hunter]"; + mes "^5533FF3 Dokaebi Horns"; + mes "3 Pieces of Egg Shell."; + mes "and 10 Feathers^000000."; + goto L_Cont; + sL_4: + mes "[Demon Hunter]"; + mes "^5533FF20 Rainbow Shells"; + mes "20 Chrysalis"; + mes "9 Yellow Herbs^000000"; + goto L_Cont; + sL_5: + mes "[Demon Hunter]"; + mes "^5533FF20 Tooths of Bat."; + mes "20 Sticky Mucus."; + mes "and 5 Bears foot skin^000000"; + + L_Cont: + next; + mes "[Demon Hunter]"; + mes "When you get all of the items return!"; + close; + + M_No: + mes "[Demon Hunter]"; + mes "Stop playing around "+strcharinfo(0)+", that's your name, right?"; + menu "Yes",M_Yes, "uhhh no",sM_End; + + sM_End: + mes "[Demon Hunter]"; + mes "DON'T you mess around with me! If you're gonna fool around then LEAVE!"; + emotion 32; + warp "pay_fild10.gat", 133, 235; + end; + +L_Check: + mes "Yes?"; + next; + if(HNTR_Q2 == 1) goto L_1; + if(HNTR_Q2 == 2) goto L_2; + if(HNTR_Q2 == 3) goto L_3; + if(HNTR_Q2 == 4) goto L_4; + if(HNTR_Q2 == 5) goto L_5; + + L_1: + if(countitem(925)<20 || countitem(932)<5 || countitem(511)<20) goto sL_1; + delitem 925, 20; + delitem 932, 5; + delitem 511, 20; + goto L_End; + L_2: + if(countitem(937)<7 || countitem(919)<20 || countitem(507)<15) goto sL_2; + delitem 937, 7; + delitem 919, 20; + delitem 507, 15; + goto L_End; + L_3: + if(countitem(1021)<3 || countitem(7032)<3 || countitem(949)<10) goto sL_3; + delitem 1021, 3; + delitem 7032, 3; + delitem 949, 10; + goto L_End; + L_4: + if(countitem(1013)<20 || countitem(915)<20 || countitem(508)<9) goto sL_4; + delitem 1013, 20; + delitem 915, 20; + delitem 508, 9; + goto L_End; + L_5: + if(countitem(913)<20 || countitem(938)<20 || countitem(948)<5) goto sL_5; + delitem 913, 20; + delitem 938, 20; + delitem 948, 5; + + L_End: + mes "[Demon Hunter]"; + mes "Good job. You brought all the necesarry items. Now go find the ^5533FFGuild Master^000000."; + mes "I think he's somewhere in the ^5533FFArcher Guild^000000. He'll give you your final test. Good luck."; + set HNTR_Q, 2; + set HNTR_Q2, 0; + close; + +L_Test3: + mes "Huh? Can't you find the guild master? He should be in the ^5533FFArcher Guild in Archer village^000000. Go find him."; + emotion 20; + close; + +L_Done: + mes "Ah, you passed the test! Congrats, go see Sharin now."; + close; + +} + + +//<=============================== Guild Master: Last Test =================================>\\ +payon_in02.gat,21,31,1 script Guild Master 59, +{ + if(Class == Job_Archer) goto L_Archer; + if(Class == Job_Hunter) goto L_Hnt; + +L_Other: + mes "[Hunter]"; + mes "Is there something you want of me? I'm have some buisiness to take care of, so please be quiet."; + emotion 20; + close; + +L_Hnt: + mes "[Guild Master]"; + mes "Ah, it's you again, "+strcharinfo+"! Good to see you're well. Me? I'm still busy as usual."; + next; + mes "[Guild Master]"; + mes "Well I've gota get back to work. Stay safe."; + close; + +L_Archer: + mes "[Guild Master]"; + if(HNTR_Q == 1) goto L_Test2; + if(HNTR_Q == 2) goto L_Start; + if(HNTR_Q == 3) goto L_Done; + mes "You want to be a hunter bad, don't you? In my days, I worked for over a month to become a hunter, hehe."; + next; + mes "[Guild Master]"; + mes "If you don't have anything else I suggest you go back to the guild!"; + close; + +L_Start: + if(HNTR_Q2 == 1) goto L_ReTest; + if(HNTR_Q2 == 2) goto L_Passed; + mes "So, you've come to take the test? I see.... well then, do you have any questions before we get started?"; + M_Menu: + next; + menu "What's the test about?",M_0, "Anything I should know?",M_1, "Start the test.",M_Start; + + M_0: + mes "[Guild Master]"; + mes "This is a test of speed, agility, and target recogniton. You will be warped to a room full of monsters."; + mes "You will have to ^5533FFkill 4^000000 of those monsters but not just any 4. You will need to kill the ones called, ^5533FFJob Change Monster^000000."; + next; + mes "[Guild Master]"; + mes "Kill the wrong one and you will fail the test. To make things even harder, we have set traps all over the room."; + mes "Stepping on a trap will also result in failure."; + next; + mes "[Guild Master]"; + mes "One more important note.... You must complete the test within ^FF55333 minutes^000000."; + next; + mes "[Guild Master]"; + mes "This will teach you the important abilities a hunter needs, mobilitiy and tracking."; + goto M_Menu; + M_1: + mes "[Guild Master]"; + mes "Only one person can take the test at time. If someone is currently taking the test, just enter the chat room and wait."; + mes "You will automatically be warped to the testing room when the other player either finishes or fails."; + next; + mes "[Guild Master]"; + mes "Make sure you aim carefully. There will be a lot of monsters and you don't want to hit the wrong one."; + mes "Keeping track of the monsters' names will be very important in this test."; + next; + mes "[Guild Master]"; + mes "And ALWAYS watch your step! There are traps everywhere!"; + goto M_Menu; + M_Start: + if (countitem(1751) <= 5) callsub sF_GetArrows; + mes "[Guild Master]"; + mes "Good luck, I'll send you to the test room now."; + next; + set HNTR_Q2, 1; + savepoint "payon_in02.gat", 16, 26; + warp "job_hunte.gat", 176, 22; + end; + + sF_GetArrows: + mes "[Guild Master]"; + mes "This is where your hard work in the 2nd test payed off. Here are some arrows, made with the items you collected."; + getitem 1751, 200; + next; + return; + +L_ReTest: + mes "Ah, you're one of the archers that failed. Here, let me heal you wounds..."; + next; + mes "[Guild Master]"; + mes "You're ready right?"; + percentheal 100,100; + goto M_Menu; + +L_Passed: + mes "I see you suceeded. Great job! Now I will give you the proof of your success, the ^5533FFNecklace of Wisdom^000000."; + emotion 21; + next; + mes "[Guild Master]"; + mes "Here you go. Make sure you show this to Hunter Sharon or you WON'T be able to become a Hunter."; + getitem 1007,1; + next; + mes "[Guild Master]"; + mes "Anyway, I've got some work left to do here so I'll see you later."; + set HNTR_Q, 3; + set HNTR_Q2, 0; + close; + +L_Test2: + mes "Yes? What would a archer want from me? The guild didn't send me a msg about you."; + mes "Did you talk to the guild recruiters and get all the items needed? You have to get them the items first."; + close; +L_Done: + mes "Hmm? What is it? Don't waste your time here, go on and become a Hunter already...."; + close; + +} + + +// Test Guide ==================================================== +job_hunte.gat,178,32,5 script Hunter Test Guide::HntTG 107,{ + +L_Start: + mes "[Test Guide]"; + mes "Welcome to the Hunter's testing arena."; + next; + menu "Take the test.",-, "I changed my mind.",M_End; + + mes "[Test Guide]"; + mes "Please enter the waiting room after hearing my explaination."; + next; + mes "[Test Guide]"; + mes "You will be warped into room with traps and monsters. Avoid the traps and kill the monsters. Once you do, a switch will appear"; + next; + mes "[Test Guide]"; + mes "Use the switch to open an exit out of the arena. You will have 3 minutes to complete the test."; + next; + mes "[Test Guide]"; + mes "If you get knocked out, get caught in a trap, or run out of time, you will fail the test and have to start over again."; + next; + mes "[Test Guide]"; + mes "Don't worry about arrows, we'll provide them. So, if you're ready, go to the waiting room."; + close; + M_End: + mes "[Test Guide]"; + mes "Alright, I'll send you back to Payon. Hopefully I'll see you again later. Don't forget to save!"; + warp "payon_in02.gat", 16, 26; + end; + +OnInit: + waitingroom "Hunter Test Waiting Room", 8,"HntTG::OnStart",1; + end; + +OnStart: + set $@HntUsers, getareausers("job_hunte.gat", 50, 64, 123, 143); + if ($@HntUsers > 0) end; // stops the rest of the script from running if there is somebody taking the test + + if ((getwaitingroomstate(33)) == 0) end; // stops the rest of the script from running if there is no one in the waiting room + killmonsterall "job_hunte.gat"; + warpwaitingpc "job_hunte.gat", 90, 67; + donpcevent "Ev_HntRm"; + end; + +} + + +// Ev_HntRm: Test room -------------------------------------------------------- +job_hunte.gat,1,1,1 script Ev_HntRm -1,{ + + disablenpc "SwitchHnt"; + disablenpc "ExitHnt"; + set $@HntMob, 4; + // Real Monsters + monster "job_hunte.gat",67,80,"Job Change Monster",1015,1,"Ev_HntRm::OnMyMobDead1"; + monster "job_hunte.gat",114,78,"Job Change Monster",1015,1,"Ev_HntRm::OnMyMobDead1"; + monster "job_hunte.gat",89,127,"Job Change Monster",1002,1,"Ev_HntRm::OnMyMobDead1"; + monster "job_hunte.gat",53,73,"Job Change Monster",1041,1,"Ev_HntRm::OnMyMobDead1"; + monster "job_hunte.gat",125,70,"Job Change Monster",1016,1,"Ev_HntRm::OnMyMobDead1"; + monster "job_hunte.gat",90,92,"Job Change Monster",1015,1,"Ev_HntRm::OnMyMobDead1"; + donpcevent "Ev_HntRm2"; + initnpctimer "TimerHnt"; + end; + +OnMyMobDead1: + set $@HntMob, $@HntMob - 1; + if($@HntMob != 0) end; + + stopnpctimer "TimerHnt"; + killmonsterall "job_hunte.gat"; + enablenpc "SwitchHnt"; + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: Great job! Go use the switch now!",8; + set HNTR_Q2, 2; + end; + +} + +// Ev_HntRm2: Spawns the Decoy Monsters ---------------------------------------- +job_hunte.gat,1,1,1 script Ev_HntRm2 -1,{ + + // Decoy Monsters + monster "job_hunte.gat",85,100,"Test Monster",1016,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",72,102,"Test Monster",1041,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",108,103,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",88,127,"Test Monster",1002,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",125,69,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat", 77, 112,"Test Monster",1016,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",53, 106,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",53, 73,"Test Monster",1002,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",125, 70,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",90, 91,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",67, 80,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",77, 112,"Test Monster",1016,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",53, 106,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",53, 73,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",125, 70,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",90, 91,"Test Monster",1041,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",85, 100,"Test Monster",1002,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",72, 102,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",108, 103,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",77, 112,"Test Monster",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",112, 139,"Vinnie Paul",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",112, 139,"Dimeback Darrel",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",112, 139,"Rex",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",112, 139,"Phillip Angelmo",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",90, 91,"Anolian",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",53, 73,"monster sample",1002,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",53, 106,"I'm not the one you want >_>",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",77, 112,"SPARE ME~",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",72, 102,"Don't hurt me!",1015,1,"Ev_HntRm2::OnMyMobDead2"; + monster "job_hunte.gat",108, 103,"aspd 184",1015,1,"Ev_HntRm2::OnMyMobDead2"; + end; + +OnMyMobDead2: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: You killed the wrong monster! You have failed the test!",8; + addtimer 3000, "TimerHnt::OnTimer196000"; + end; +} + +// Test Timer ----------------------------------------------------------------- +job_hunte.gat,1,1,1 script TimerHnt -1,{ + + +OnTimer500: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: Remember, you need to kill the 'Job Change Monsters'!",8; + end; +OnTimer4000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: Don't forget to AVOID the TRAPS!!!",8; + end; +OnTimer10000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: ******The clock will start now! 3 minutes left! ****** ",8; + donpcevent "HntTG::OnStart"; + end; +OnTimer40000: + donpcevent "HntTG::OnStart"; + end; +OnTimer70000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: ****** 2 minutes left! ****** ",8; + donpcevent "HntTG::OnStart"; + end; +OnTimer100000: + donpcevent "HntTG::OnStart"; + end; +OnTimer130000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: ****** 1 minute left! ****** ",8; + donpcevent "HntTG::OnStart"; + end; +OnTimer160000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: ****** 30 sec left! ****** ",8; + donpcevent "HntTG::OnStart"; + end; +OnTimer185000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: 5 . . . .",8; + donpcevent "HntTG::OnStart"; + end; +OnTimer186000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: 4. . . .",8; + end; +OnTimer187000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: 3. . .",8; + end; +OnTimer188000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: 2. .",8; + end; +OnTimer189000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: 1...",8; + end; +OnTimer190000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: 0! ",8; + end; +OnTimer193000: + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: You ran out of time! You can challenge again later!.",8; + end; +OnTimer196000: + stopnpctimer; + areawarp "job_hunte.gat", 50, 64, 123, 143, "payon_in02.gat", 16, 26; + killmonsterall "job_hunte.gat"; + donpcevent "HntTG::OnStart"; + end; +} + +// SwitchHnt ------------------------------------------------------ +job_hunte.gat,93,101,1 script SwitchHnt 723, +{ + areaannounce "job_hunte.gat", 50, 64, 123, 143, "[Test Guide]: *** The exit has been activated! You have 30 sec. to find the exit!! *** ",8; + enablenpc "ExitHnt"; + addtimer 30000, "TimerHnt::OnTimer196000"; + close; +} + +// ExitHnt ----------------------------------------------------------- +job_hunte.gat,89,139,1 script ExitHnt 45,2,2,{ + + deltimer "TimerHnt::OnTimer196000"; + warp "payon_in02.gat", 16, 26; + killmonsterall "job_hunte.gat"; + donpcevent "HntTG::OnStart"; + end; +} + + +// Hunter Test Traps ======================================= + +job_hunte.gat,52,140,1 script 1-1::HntTrap 139,0,1,{ + stopnpctimer "TimerHnt"; + warp "payon_in02.gat", 16, 26; + killmonsterall "job_hunte.gat"; + donpcevent "HntTG::OnStart"; + end; +} + +job_hunte.gat,53,140,1 duplicate(HntTrap) 1-2 139,0,1 +job_hunte.gat,54,141,1 duplicate(HntTrap) 1-3 139,0,0 +job_hunte.gat,55,141,1 duplicate(HntTrap) 1-4 139,0,0 +job_hunte.gat,55,140,1 duplicate(HntTrap) 1-5 139,0,0 +job_hunte.gat,54,140,1 duplicate(HntTrap) 1-6 139,0,0 +job_hunte.gat,52,138,1 duplicate(HntTrap) 1-7 139,0,0 +job_hunte.gat,53,138,1 duplicate(HntTrap) 1-8 139,0,0 +job_hunte.gat,62,140,1 duplicate(HntTrap) 2-1 139,0,1 +job_hunte.gat,63,140,1 duplicate(HntTrap) 2-2 139,0,1 +job_hunte.gat,64,140,1 duplicate(HntTrap) 2-3 139,0,0 +job_hunte.gat,64,141,1 duplicate(HntTrap) 2-4 139,0,0 +job_hunte.gat,65,140,1 duplicate(HntTrap) 2-5 139,0,0 +job_hunte.gat,65,141,1 duplicate(HntTrap) 2-6 139,0,0 +job_hunte.gat,62,138,1 duplicate(HntTrap) 2-7 139,0,0 +job_hunte.gat,63,138,1 duplicate(HntTrap) 2-8 139,0,0 +job_hunte.gat,72,140,1 duplicate(HntTrap) 3-1 139,0,1 +job_hunte.gat,73,140,1 duplicate(HntTrap) 3-2 139,0,1 +job_hunte.gat,72,138,1 duplicate(HntTrap) 3-3 139,0,0 +job_hunte.gat,72,138,1 duplicate(HntTrap) 3-4 139,0,0 +job_hunte.gat,78,140,1 duplicate(HntTrap) 4-1 139,0,0 +job_hunte.gat,78,141,1 duplicate(HntTrap) 4-2 139,0,0 +job_hunte.gat,79,140,1 duplicate(HntTrap) 4-3 139,0,0 +job_hunte.gat,79,141,1 duplicate(HntTrap) 4-4 139,0,0 +job_hunte.gat,82,138,1 duplicate(HntTrap) 5-1 139,0,0 +job_hunte.gat,82,139,1 duplicate(HntTrap) 5-2 139,0,0 +job_hunte.gat,83,138,1 duplicate(HntTrap) 5-3 139,0,0 +job_hunte.gat,83,139,1 duplicate(HntTrap) 5-4 139,0,0 +job_hunte.gat,99,138,1 duplicate(HntTrap) 6-1 139,1,0 +job_hunte.gat,99,139,1 duplicate(HntTrap) 6-2 139,1,0 +job_hunte.gat,101,138,1 duplicate(HntTrap) 6-3 139,0,0 +job_hunte.gat,101,139,1 duplicate(HntTrap) 6-4 139,0,0 +job_hunte.gat,106,140,1 duplicate(HntTrap) 7-1 139,0,1 +job_hunte.gat,107,140,1 duplicate(HntTrap) 7-2 139,0,1 +job_hunte.gat,106,138,1 duplicate(HntTrap) 7-3 139,0,0 +job_hunte.gat,107,138,1 duplicate(HntTrap) 7-4 139,0,0 +job_hunte.gat,112,140,1 duplicate(HntTrap) 8-1 139,0,0 +job_hunte.gat,112,141,1 duplicate(HntTrap) 8-2 139,0,0 +job_hunte.gat,113,140,1 duplicate(HntTrap) 8-3 139,0,0 +job_hunte.gat,113,141,1 duplicate(HntTrap) 8-4 139,0,0 +job_hunte.gat,116,140,1 duplicate(HntTrap) 9-1 139,0,0 +job_hunte.gat,116,141,1 duplicate(HntTrap) 9-2 139,0,0 +job_hunte.gat,117,140,1 duplicate(HntTrap) 9-3 139,0,0 +job_hunte.gat,117,141,1 duplicate(HntTrap) 9-4 139,0,0 +job_hunte.gat,120,138,1 duplicate(HntTrap) 10-1 139,0,0 +job_hunte.gat,120,139,1 duplicate(HntTrap) 10-2 139,0,0 +job_hunte.gat,121,138,1 duplicate(HntTrap) 10-3 139,0,0 +job_hunte.gat,121,139,1 duplicate(HntTrap) 10-4 139,0,0 +job_hunte.gat,126,139,1 duplicate(HntTrap) 11-1 139,0,2 +job_hunte.gat,127,139,1 duplicate(HntTrap) 11-2 139,0,2 +job_hunte.gat,126,136,1 duplicate(HntTrap) 11-3 139,0,0 +job_hunte.gat,127,136,1 duplicate(HntTrap) 11-4 139,0,0 +job_hunte.gat,52,134,1 duplicate(HntTrap) 12-1 139,0,1 +job_hunte.gat,53,134,1 duplicate(HntTrap) 12-2 139,0,1 +job_hunte.gat,52,132,1 duplicate(HntTrap) 12-3 139,0,0 +job_hunte.gat,53,132,1 duplicate(HntTrap) 12-4 139,0,0 +job_hunte.gat,124,130,1 duplicate(HntTrap) 13-1 139,0,0 +job_hunte.gat,124,131,1 duplicate(HntTrap) 13-2 139,0,0 +job_hunte.gat,125,130,1 duplicate(HntTrap) 13-3 139,0,0 +job_hunte.gat,125,131,1 duplicate(HntTrap) 13-4 139,0,0 +job_hunte.gat,64,128,1 duplicate(HntTrap) 14-1 139,0,0 +job_hunte.gat,64,129,1 duplicate(HntTrap) 14-2 139,0,0 +job_hunte.gat,65,128,1 duplicate(HntTrap) 14-3 139,0,0 +job_hunte.gat,65,129,1 duplicate(HntTrap) 14-4 139,0,0 +job_hunte.gat,68,126,1 duplicate(HntTrap) 15-1 139,0,0 +job_hunte.gat,68,127,1 duplicate(HntTrap) 15-2 139,0,0 +job_hunte.gat,69,126,1 duplicate(HntTrap) 15-3 139,0,0 +job_hunte.gat,69,127,1 duplicate(HntTrap) 15-4 139,0,0 +job_hunte.gat,75,128,1 duplicate(HntTrap) 16-1 139,1,0 +job_hunte.gat,75,129,1 duplicate(HntTrap) 16-2 139,1,0 +job_hunte.gat,77,128,1 duplicate(HntTrap) 16-3 139,0,0 +job_hunte.gat,77,129,1 duplicate(HntTrap) 16-4 139,0,0 +job_hunte.gat,82,126,1 duplicate(HntTrap) 17-1 139,0,0 +job_hunte.gat,82,127,1 duplicate(HntTrap) 17-2 139,0,0 +job_hunte.gat,83,126,1 duplicate(HntTrap) 17-3 139,0,0 +job_hunte.gat,83,127,1 duplicate(HntTrap) 17-4 139,0,0 +job_hunte.gat,96,128,1 duplicate(HntTrap) 18-1 139,0,0 +job_hunte.gat,96,129,1 duplicate(HntTrap) 18-2 139,0,0 +job_hunte.gat,97,128,1 duplicate(HntTrap) 18-3 139,0,0 +job_hunte.gat,97,129,1 duplicate(HntTrap) 18-4 139,0,0 +job_hunte.gat,100,126,1 duplicate(HntTrap) 19-1 139,0,0 +job_hunte.gat,100,127,1 duplicate(HntTrap) 19-2 139,0,0 +job_hunte.gat,101,126,1 duplicate(HntTrap) 19-3 139,0,0 +job_hunte.gat,101,127,1 duplicate(HntTrap) 19-4 139,0,0 +job_hunte.gat,106,128,1 duplicate(HntTrap) 20-1 139,0,0 +job_hunte.gat,106,129,1 duplicate(HntTrap) 20-2 139,0,0 +job_hunte.gat,107,128,1 duplicate(HntTrap) 20-3 139,0,0 +job_hunte.gat,107,129,1 duplicate(HntTrap) 20-4 139,0,0 +job_hunte.gat,112,126,1 duplicate(HntTrap) 21-1 139,0,0 +job_hunte.gat,112,127,1 duplicate(HntTrap) 21-2 139,0,0 +job_hunte.gat,113,126,1 duplicate(HntTrap) 21-3 139,0,0 +job_hunte.gat,113,127,1 duplicate(HntTrap) 21-4 139,0,0 +job_hunte.gat,126,126,1 duplicate(HntTrap) 22-1 139,0,0 +job_hunte.gat,126,127,1 duplicate(HntTrap) 22-2 139,0,0 +job_hunte.gat,127,126,1 duplicate(HntTrap) 22-3 139,0,0 +job_hunte.gat,127,127,1 duplicate(HntTrap) 22-4 139,0,0 +job_hunte.gat,52,122,1 duplicate(HntTrap) 23-1 139,0,1 +job_hunte.gat,52,122,1 duplicate(HntTrap) 23-2 139,0,1 +job_hunte.gat,53,120,1 duplicate(HntTrap) 23-3 139,1,0 +job_hunte.gat,54,121,1 duplicate(HntTrap) 23-4 139,0,0 +job_hunte.gat,55,121,1 duplicate(HntTrap) 23-5 139,0,0 +job_hunte.gat,55,120,1 duplicate(HntTrap) 23-6 139,0,0 +job_hunte.gat,66,120,1 duplicate(HntTrap) 24-1 139,0,0 +job_hunte.gat,66,121,1 duplicate(HntTrap) 24-2 139,0,0 +job_hunte.gat,67,120,1 duplicate(HntTrap) 24-3 139,0,0 +job_hunte.gat,67,121,1 duplicate(HntTrap) 24-4 139,0,0 +job_hunte.gat,114,118,1 duplicate(HntTrap) 25-1 139,0,0 +job_hunte.gat,114,119,1 duplicate(HntTrap) 25-2 139,0,0 +job_hunte.gat,115,118,1 duplicate(HntTrap) 25-3 139,0,0 +job_hunte.gat,115,119,1 duplicate(HntTrap) 25-4 139,0,0 +job_hunte.gat,124,120,1 duplicate(HntTrap) 26-1 139,0,1 +job_hunte.gat,125,120,1 duplicate(HntTrap) 26-2 139,0,1 +job_hunte.gat,124,118,1 duplicate(HntTrap) 26-3 139,0,0 +job_hunte.gat,125,118,1 duplicate(HntTrap) 26-4 139,0,0 +job_hunte.gat,66,116,1 duplicate(HntTrap) 27-1 139,0,0 +job_hunte.gat,66,117,1 duplicate(HntTrap) 27-2 139,0,0 +job_hunte.gat,67,116,1 duplicate(HntTrap) 27-3 139,0,0 +job_hunte.gat,67,117,1 duplicate(HntTrap) 27-4 139,0,0 +job_hunte.gat,76,114,1 duplicate(HntTrap) 28-1 139,0,0 +job_hunte.gat,76,115,1 duplicate(HntTrap) 28-2 139,0,0 +job_hunte.gat,77,114,1 duplicate(HntTrap) 28-3 139,0,0 +job_hunte.gat,77,115,1 duplicate(HntTrap) 28-4 139,0,0 +job_hunte.gat,82,116,1 duplicate(HntTrap) 29-1 139,0,0 +job_hunte.gat,82,117,1 duplicate(HntTrap) 29-2 139,0,0 +job_hunte.gat,83,116,1 duplicate(HntTrap) 29-3 139,0,0 +job_hunte.gat,83,117,1 duplicate(HntTrap) 29-4 139,0,0 +job_hunte.gat,86,114,1 duplicate(HntTrap) 30-1 139,0,0 +job_hunte.gat,86,115,1 duplicate(HntTrap) 30-2 139,0,0 +job_hunte.gat,87,114,1 duplicate(HntTrap) 30-3 139,0,0 +job_hunte.gat,87,115,1 duplicate(HntTrap) 30-4 139,0,0 +job_hunte.gat,92,115,1 duplicate(HntTrap) 31-1 139,1,0 +job_hunte.gat,92,114,1 duplicate(HntTrap) 31-2 139,1,0 +job_hunte.gat,90,115,1 duplicate(HntTrap) 31-3 139,0,0 +job_hunte.gat,102,116,1 duplicate(HntTrap) 32-1 139,0,0 +job_hunte.gat,102,117,1 duplicate(HntTrap) 32-2 139,0,0 +job_hunte.gat,103,116,1 duplicate(HntTrap) 32-3 139,0,0 +job_hunte.gat,103,117,1 duplicate(HntTrap) 32-4 139,0,0 +job_hunte.gat,114,114,1 duplicate(HntTrap) 33-1 139,0,0 +job_hunte.gat,114,115,1 duplicate(HntTrap) 33-2 139,0,0 +job_hunte.gat,115,114,1 duplicate(HntTrap) 33-3 139,0,0 +job_hunte.gat,115,115,1 duplicate(HntTrap) 33-4 139,0,0 +job_hunte.gat,54,110,1 duplicate(HntTrap) 34-1 139,0,1 +job_hunte.gat,55,110,1 duplicate(HntTrap) 34-2 139,0,1 +job_hunte.gat,54,108,1 duplicate(HntTrap) 34-3 139,0,0 +job_hunte.gat,55,108,1 duplicate(HntTrap) 34-4 139,0,0 +job_hunte.gat,64,112,1 duplicate(HntTrap) 35-1 139,0,0 +job_hunte.gat,64,113,1 duplicate(HntTrap) 35-2 139,0,0 +job_hunte.gat,65,112,1 duplicate(HntTrap) 35-3 139,0,0 +job_hunte.gat,65,113,1 duplicate(HntTrap) 35-4 139,0,0 +job_hunte.gat,80,110,1 duplicate(HntTrap) 36-1 139,0,0 +job_hunte.gat,80,111,1 duplicate(HntTrap) 36-2 139,0,0 +job_hunte.gat,81,110,1 duplicate(HntTrap) 36-3 139,0,0 +job_hunte.gat,81,111,1 duplicate(HntTrap) 36-4 139,0,0 +job_hunte.gat,90,108,1 duplicate(HntTrap) 37-1 139,0,6 +job_hunte.gat,91,108,1 duplicate(HntTrap) 37-2 139,0,5 +job_hunte.gat,91,102,1 duplicate(HntTrap) 37-3 139,0,0 +job_hunte.gat,98,109,1 duplicate(HntTrap) 38-1 139,0,2 +job_hunte.gat,99,109,1 duplicate(HntTrap) 38-2 139,0,2 +job_hunte.gat,103,109,1 duplicate(HntTrap) 38-3 139,3,0 +job_hunte.gat,103,108,1 duplicate(HntTrap) 38-4 139,3,0 +job_hunte.gat,97,106,1 duplicate(HntTrap) 39-1 139,2,0 +job_hunte.gat,96,107,1 duplicate(HntTrap) 39-2 139,1,0 +job_hunte.gat,94,108,1 duplicate(HntTrap) 39-3 139,0,1 +job_hunte.gat,95,109,1 duplicate(HntTrap) 39-4 139,0,0 +job_hunte.gat,95,108,1 duplicate(HntTrap) 40-1 139,0,0 +job_hunte.gat,94,106,1 duplicate(HntTrap) 40-2 139,0,0 +job_hunte.gat,96,102,1 duplicate(HntTrap) 40-3 139,0,3 +job_hunte.gat,97,102,1 duplicate(HntTrap) 40-4 139,0,3 +job_hunte.gat,95,98,1 duplicate(HntTrap) 41-1 139,2,0 +job_hunte.gat,94,99,1 duplicate(HntTrap) 42-1 139,1,0 +job_hunte.gat,92,98,1 duplicate(HntTrap) 43-1 139,0,0 +job_hunte.gat,112,110,1 duplicate(HntTrap) 44-1 139,0,0 +job_hunte.gat,112,111,1 duplicate(HntTrap) 44-2 139,0,0 +job_hunte.gat,113,110,1 duplicate(HntTrap) 44-3 139,0,0 +job_hunte.gat,113,111,1 duplicate(HntTrap) 44-4 139,0,0 +job_hunte.gat,126,108,1 duplicate(HntTrap) 45-1 139,0,1 +job_hunte.gat,127,108,1 duplicate(HntTrap) 45-2 139,0,1 +job_hunte.gat,126,106,1 duplicate(HntTrap) 45-3 139,0,0 +job_hunte.gat,126,106,1 duplicate(HntTrap) 45-4 139,0,0 +job_hunte.gat,53,102,1 duplicate(HntTrap) 46-1 139,1,1 +job_hunte.gat,55,102,1 duplicate(HntTrap) 46-2 139,0,1 +job_hunte.gat,53,100,1 duplicate(HntTrap) 46-3 139,1,0 +job_hunte.gat,55,100,1 duplicate(HntTrap) 46-4 139,0,0 +job_hunte.gat,64,106,1 duplicate(HntTrap) 47-1 139,0,0 +job_hunte.gat,64,107,1 duplicate(HntTrap) 47-2 139,0,0 +job_hunte.gat,65,106,1 duplicate(HntTrap) 47-3 139,0,0 +job_hunte.gat,65,107,1 duplicate(HntTrap) 47-4 139,0,0 +job_hunte.gat,66,100,1 duplicate(HntTrap) 48-1 139,0,0 +job_hunte.gat,66,101,1 duplicate(HntTrap) 48-2 139,0,0 +job_hunte.gat,67,100,1 duplicate(HntTrap) 48-3 139,0,0 +job_hunte.gat,67,101,1 duplicate(HntTrap) 48-4 139,0,0 +job_hunte.gat,86,106,1 duplicate(HntTrap) 49-1 139,0,1 +job_hunte.gat,87,106,1 duplicate(HntTrap) 49-2 139,0,1 +job_hunte.gat,82,104,1 duplicate(HntTrap) 49-3 139,5,0 +job_hunte.gat,81,105,1 duplicate(HntTrap) 49-4 139,4,0 +job_hunte.gat,76,105,1 duplicate(HntTrap) 50-1 139,0,0 +job_hunte.gat,76,104,1 duplicate(HntTrap) 50-2 139,0,0 +job_hunte.gat,78,101,1 duplicate(HntTrap) 50-3 139,0,2 +job_hunte.gat,79,101,1 duplicate(HntTrap) 50-4 139,0,2 +job_hunte.gat,76,99,1 duplicate(HntTrap) 51-1 139,10 +job_hunte.gat,77,98,1 duplicate(HntTrap) 51-2 139,2,0 +job_hunte.gat,74,99,1 duplicate(HntTrap) 51-3 139,0,0 +job_hunte.gat,74,98,1 duplicate(HntTrap) 51-4 139,0,0 +job_hunte.gat,82,100,1 duplicate(HntTrap) 53-1 139,0,0 +job_hunte.gat,82,101,1 duplicate(HntTrap) 53-2 139,0,0 +job_hunte.gat,83,100,1 duplicate(HntTrap) 53-3 139,0,0 +job_hunte.gat,83,101,1 duplicate(HntTrap) 53-4 139,0,0 +job_hunte.gat,106,104,1 duplicate(HntTrap) 54-1 139,0,0 +job_hunte.gat,106,105,1 duplicate(HntTrap) 54-2 139,0,0 +job_hunte.gat,107,104,1 duplicate(HntTrap) 54-3 139,0,0 +job_hunte.gat,107,105,1 duplicate(HntTrap) 54-4 139,0,0 +job_hunte.gat,112,104,1 duplicate(HntTrap) 55-1 139,0,1 +job_hunte.gat,113,104,1 duplicate(HntTrap) 55-2 139,0,1 +job_hunte.gat,112,102,1 duplicate(HntTrap) 55-3 139,0,0 +job_hunte.gat,113,102,1 duplicate(HntTrap) 55-4 139,0,0 +job_hunte.gat,54,92,1 duplicate(HntTrap) 56-1 139,0,0 +job_hunte.gat,54,93,1 duplicate(HntTrap) 56-2 139,0,0 +job_hunte.gat,55,92,1 duplicate(HntTrap) 56-3 139,0,0 +job_hunte.gat,55,93,1 duplicate(HntTrap) 56-4 139,0,0 +job_hunte.gat,52,90,1 duplicate(HntTrap) 56-5 139,0,0 +job_hunte.gat,52,91,1 duplicate(HntTrap) 56-6 139,0,0 +job_hunte.gat,53,90,1 duplicate(HntTrap) 56-7 139,0,0 +job_hunte.gat,53,91,1 duplicate(HntTrap) 56-8 139,0,0 +job_hunte.gat,64,92,1 duplicate(HntTrap) 57-1 139,0,0 +job_hunte.gat,64,93,1 duplicate(HntTrap) 57-2 139,0,0 +job_hunte.gat,65,92,1 duplicate(HntTrap) 57-3 139,0,0 +job_hunte.gat,65,93,1 duplicate(HntTrap) 57-4 139,0,0 +job_hunte.gat,76,94,1 duplicate(HntTrap) 58-1 139,0,0 +job_hunte.gat,76,95,1 duplicate(HntTrap) 58-2 139,0,0 +job_hunte.gat,77,94,1 duplicate(HntTrap) 58-3 139,0,0 +job_hunte.gat,77,95,1 duplicate(HntTrap) 58-4 139,0,0 +job_hunte.gat,78,92,1 duplicate(HntTrap) 59-1 139,0,0 +job_hunte.gat,78,93,1 duplicate(HntTrap) 59-2 139,0,0 +job_hunte.gat,79,92,1 duplicate(HntTrap) 59-3 139,0,0 +job_hunte.gat,79,93,1 duplicate(HntTrap) 59-4 139,0,0 +job_hunte.gat,86,92,1 duplicate(HntTrap) 60-1 139,0,0 +job_hunte.gat,86,93,1 duplicate(HntTrap) 60-2 139,0,0 +job_hunte.gat,87,92,1 duplicate(HntTrap) 60-3 139,0,0 +job_hunte.gat,87,93,1 duplicate(HntTrap) 60-4 139,0,0 +job_hunte.gat,90,96,1 duplicate(HntTrap) 61-1 139,0,0 +job_hunte.gat,90,97,1 duplicate(HntTrap) 61-2 139,0,0 +job_hunte.gat,91,96,1 duplicate(HntTrap) 61-3 139,0,0 +job_hunte.gat,91,97,1 duplicate(HntTrap) 61-4 139,0,0 +job_hunte.gat,99,95,1 duplicate(HntTrap) 62-1 139,1,0 +job_hunte.gat,99,94,1 duplicate(HntTrap) 62-2 139,1,0 +job_hunte.gat,101,94,1 duplicate(HntTrap) 62-3 139,0,1 +job_hunte.gat,100,93,1 duplicate(HntTrap) 62-4 139,0,0 +job_hunte.gat,100,92,1 duplicate(HntTrap) 63-1 139,0,0 +job_hunte.gat,101,92,1 duplicate(HntTrap) 63-2 139,0,0 +job_hunte.gat,102,98,1 duplicate(HntTrap) 64-1 139,0,0 +job_hunte.gat,102,99,1 duplicate(HntTrap) 64-2 139,0,0 +job_hunte.gat,103,98,1 duplicate(HntTrap) 64-3 139,0,0 +job_hunte.gat,103,99,1 duplicate(HntTrap) 64-4 139,0,0 +job_hunte.gat,102,90,1 duplicate(HntTrap) 65-1 139,0,0 +job_hunte.gat,102,91,1 duplicate(HntTrap) 65-2 139,0,0 +job_hunte.gat,103,90,1 duplicate(HntTrap) 65-3 139,0,0 +job_hunte.gat,103,91,1 duplicate(HntTrap) 65-4 139,0,0 +job_hunte.gat,114,96,1 duplicate(HntTrap) 66-1 139,0,0 +job_hunte.gat,114,97,1 duplicate(HntTrap) 66-2 139,0,0 +job_hunte.gat,115,96,1 duplicate(HntTrap) 66-3 139,0,0 +job_hunte.gat,115,97,1 duplicate(HntTrap) 66-4 139,0,0 +job_hunte.gat,112,90,1 duplicate(HntTrap) 67-1 139,0,0 +job_hunte.gat,112,91,1 duplicate(HntTrap) 67-2 139,0,0 +job_hunte.gat,113,90,1 duplicate(HntTrap) 67-3 139,0,0 +job_hunte.gat,113,91,1 duplicate(HntTrap) 67-4 139,0,0 +job_hunte.gat,125,97,1 duplicate(HntTrap) 68-1 139,1,0 +job_hunte.gat,125,96,1 duplicate(HntTrap) 68-2 139,1,0 +job_hunte.gat,127,96,1 duplicate(HntTrap) 68-3 139,0,0 +job_hunte.gat,127,97,1 duplicate(HntTrap) 68-4 139,0,0 +job_hunte.gat,52,86,1 duplicate(HntTrap) 69-1 139,0,0 +job_hunte.gat,52,87,1 duplicate(HntTrap) 69-2 139,0,0 +job_hunte.gat,53,86,1 duplicate(HntTrap) 69-3 139,0,0 +job_hunte.gat,53,87,1 duplicate(HntTrap) 69-4 139,0,0 +job_hunte.gat,66,88,1 duplicate(HntTrap) 70-1 139,0,0 +job_hunte.gat,66,89,1 duplicate(HntTrap) 70-2 139,0,0 +job_hunte.gat,67,88,1 duplicate(HntTrap) 70-3 139,0,0 +job_hunte.gat,67,89,1 duplicate(HntTrap) 70-4 139,0,0 +job_hunte.gat,114,84,1 duplicate(HntTrap) 71-1 139,0,0 +job_hunte.gat,114,85,1 duplicate(HntTrap) 71-2 139,0,0 +job_hunte.gat,115,84,1 duplicate(HntTrap) 71-3 139,0,0 +job_hunte.gat,115,85,1 duplicate(HntTrap) 71-4 139,0,0 +job_hunte.gat,126,86,1 duplicate(HntTrap) 72-1 139,0,0 +job_hunte.gat,126,87,1 duplicate(HntTrap) 72-2 139,0,0 +job_hunte.gat,127,86,1 duplicate(HntTrap) 72-3 139,0,0 +job_hunte.gat,127,87,1 duplicate(HntTrap) 72-4 139,0,0 +job_hunte.gat,54,80,1 duplicate(HntTrap) 73-1 139,0,1 +job_hunte.gat,55,80,1 duplicate(HntTrap) 73-2 139,0,1 +job_hunte.gat,55,80,1 duplicate(HntTrap) 73-3 139,0,0 +job_hunte.gat,55,78,1 duplicate(HntTrap) 73-4 139,0,0 +job_hunte.gat,64,82,1 duplicate(HntTrap) 74-1 139,0,1 +job_hunte.gat,65,82,1 duplicate(HntTrap) 74-2 139,0,1 +job_hunte.gat,64,80,1 duplicate(HntTrap) 74-3 139,0,0 +job_hunte.gat,65,80,1 duplicate(HntTrap) 74-4 139,0,0 +job_hunte.gat,66,78,1 duplicate(HntTrap) 75-1 139,0,0 +job_hunte.gat,66,79,1 duplicate(HntTrap) 75-2 139,0,0 +job_hunte.gat,67,78,1 duplicate(HntTrap) 75-3 139,0,0 +job_hunte.gat,67,79,1 duplicate(HntTrap) 75-4 139,0,0 +job_hunte.gat,74,78,1 duplicate(HntTrap) 76-1 139,0,0 +job_hunte.gat,74,79,1 duplicate(HntTrap) 76-2 139,0,0 +job_hunte.gat,75,78,1 duplicate(HntTrap) 76-3 139,0,0 +job_hunte.gat,75,79,1 duplicate(HntTrap) 76-4 139,0,0 +job_hunte.gat,78,80,1 duplicate(HntTrap) 77-1 139,0,0 +job_hunte.gat,78,81,1 duplicate(HntTrap) 77-2 139,0,0 +job_hunte.gat,79,80,1 duplicate(HntTrap) 77-3 139,0,0 +job_hunte.gat,79,81,1 duplicate(HntTrap) 77-4 139,0,0 +job_hunte.gat,82,78,1 duplicate(HntTrap) 78-1 139,0,0 +job_hunte.gat,82,79,1 duplicate(HntTrap) 78-2 139,0,0 +job_hunte.gat,83,78,1 duplicate(HntTrap) 78-3 139,0,0 +job_hunte.gat,83,79,1 duplicate(HntTrap) 78-4 139,0,0 +job_hunte.gat,94,78,1 duplicate(HntTrap) 79-1 139,0,0 +job_hunte.gat,94,79,1 duplicate(HntTrap) 79-2 139,0,0 +job_hunte.gat,95,78,1 duplicate(HntTrap) 79-3 139,0,0 +job_hunte.gat,95,79,1 duplicate(HntTrap) 79-4 139,0,0 +job_hunte.gat,101,80,1 duplicate(HntTrap) 80-1 139,1,0 +job_hunte.gat,101,81,1 duplicate(HntTrap) 80-2 139,1,0 +job_hunte.gat,103,81,1 duplicate(HntTrap) 80-3 139,0,0 +job_hunte.gat,103,80,1 duplicate(HntTrap) 80-4 139,0,0 +job_hunte.gat,104,78,1 duplicate(HntTrap) 81-1 139,0,0 +job_hunte.gat,104,79,1 duplicate(HntTrap) 81-2 139,0,0 +job_hunte.gat,105,78,1 duplicate(HntTrap) 81-3 139,0,0 +job_hunte.gat,105,79,1 duplicate(HntTrap) 81-4 139,0,0 +job_hunte.gat,110,78,1 duplicate(HntTrap) 82-1 139,0,0 +job_hunte.gat,110,79,1 duplicate(HntTrap) 82-2 139,0,0 +job_hunte.gat,111,78,1 duplicate(HntTrap) 82-3 139,0,0 +job_hunte.gat,111,79,1 duplicate(HntTrap) 82-4 139,0,0 +job_hunte.gat,114,80,1 duplicate(HntTrap) 83-1 139,0,0 +job_hunte.gat,114,81,1 duplicate(HntTrap) 83-2 139,0,0 +job_hunte.gat,115,80,1 duplicate(HntTrap) 83-3 139,0,0 +job_hunte.gat,115,81,1 duplicate(HntTrap) 83-4 139,0,0 +job_hunte.gat,124,78,1 duplicate(HntTrap) 84-1 139,0,0 +job_hunte.gat,124,79,1 duplicate(HntTrap) 84-2 139,0,0 +job_hunte.gat,125,78,1 duplicate(HntTrap) 84-3 139,0,0 +job_hunte.gat,125,79,1 duplicate(HntTrap) 84-4 139,0,0 +job_hunte.gat,126,82,1 duplicate(HntTrap) 85-1 139,0,0 +job_hunte.gat,126,83,1 duplicate(HntTrap) 85-2 139,0,0 +job_hunte.gat,127,82,1 duplicate(HntTrap) 85-3 139,0,0 +job_hunte.gat,127,83,1 duplicate(HntTrap) 85-4 139,0,0 +job_hunte.gat,52,68,1 duplicate(HntTrap) 86-1 139,0,1 +job_hunte.gat,53,68,1 duplicate(HntTrap) 86-2 139,0,1 +job_hunte.gat,52,66,1 duplicate(HntTrap) 86-3 139,0,0 +job_hunte.gat,53,66,1 duplicate(HntTrap) 86-4 139,0,0 +job_hunte.gat,54,70,1 duplicate(HntTrap) 87-1 139,0,1 +job_hunte.gat,55,70,1 duplicate(HntTrap) 87-2 139,0,1 +job_hunte.gat,54,68,1 duplicate(HntTrap) 87-3 139,0,0 +job_hunte.gat,55,68,1 duplicate(HntTrap) 87-4 139,0,0 +job_hunte.gat,59,66,1 duplicate(HntTrap) 88-1 139,1,0 +job_hunte.gat,59,67,1 duplicate(HntTrap) 88-2 139,1,0 +job_hunte.gat,61,67,1 duplicate(HntTrap) 88-3 139,0,0 +job_hunte.gat,61,66,1 duplicate(HntTrap) 88-4 139,0,0 +job_hunte.gat,68,68,1 duplicate(HntTrap) 89-1 139,0,1 +job_hunte.gat,69,68,1 duplicate(HntTrap) 89-2 139,0,1 +job_hunte.gat,68,66,1 duplicate(HntTrap) 89-3 139,0,0 +job_hunte.gat,69,66,1 duplicate(HntTrap) 89-4 139,0,0 +job_hunte.gat,76,66,1 duplicate(HntTrap) 90-1 139,0,0 +job_hunte.gat,76,67,1 duplicate(HntTrap) 90-2 139,0,0 +job_hunte.gat,77,66,1 duplicate(HntTrap) 90-3 139,0,0 +job_hunte.gat,77,67,1 duplicate(HntTrap) 90-4 139,0,0 +job_hunte.gat,82,68,1 duplicate(HntTrap) 91-1 139,0,0 +job_hunte.gat,82,69,1 duplicate(HntTrap) 91-2 139,0,0 +job_hunte.gat,83,68,1 duplicate(HntTrap) 91-3 139,0,0 +job_hunte.gat,83,69,1 duplicate(HntTrap) 91-4 139,0,0 +job_hunte.gat,96,66,1 duplicate(HntTrap) 92-1 139,0,0 +job_hunte.gat,96,67,1 duplicate(HntTrap) 92-2 139,0,0 +job_hunte.gat,97,66,1 duplicate(HntTrap) 92-3 139,0,0 +job_hunte.gat,97,67,1 duplicate(HntTrap) 92-4 139,0,0 +job_hunte.gat,100,68,1 duplicate(HntTrap) 93-1 139,0,0 +job_hunte.gat,100,69,1 duplicate(HntTrap) 93-2 139,0,0 +job_hunte.gat,101,68,1 duplicate(HntTrap) 93-3 139,0,0 +job_hunte.gat,101,69,1 duplicate(HntTrap) 93-4 139,0,0 +job_hunte.gat,107,66,1 duplicate(HntTrap) 94-1 139,1,0 +job_hunte.gat,107,67,1 duplicate(HntTrap) 94-2 139,1,0 +job_hunte.gat,109,67,1 duplicate(HntTrap) 94-3 139,0,0 +job_hunte.gat,109,66,1 duplicate(HntTrap) 94-4 139,0,0 +job_hunte.gat,117,69,1 duplicate(HntTrap) 95-1 139,1,0 +job_hunte.gat,117,68,1 duplicate(HntTrap) 95-2 139,1,0 +job_hunte.gat,119,69,1 duplicate(HntTrap) 95-3 139,0,0 +job_hunte.gat,119,68,1 duplicate(HntTrap) 95-4 139,0,0 +job_hunte.gat,124,66,1 duplicate(HntTrap) 96-1 139,0,0 +job_hunte.gat,124,67,1 duplicate(HntTrap) 96-2 139,0,0 +job_hunte.gat,125,66,1 duplicate(HntTrap) 96-3 139,0,0 +job_hunte.gat,125,67,1 duplicate(HntTrap) 96-4 139,0,0 +job_hunte.gat,126,70,1 duplicate(HntTrap) 97-1 139,0,0 +job_hunte.gat,126,71,1 duplicate(HntTrap) 97-2 139,0,0 +job_hunte.gat,127,70,1 duplicate(HntTrap) 97-3 139,0,0 +job_hunte.gat,127,71,1 duplicate(HntTrap) 97-4 139,0,0 diff --git a/npc/jobs/2-1/knight.txt b/npc/jobs/2-1/knight.txt new file mode 100644 index 000000000..60a86da6a --- /dev/null +++ b/npc/jobs/2-1/knight.txt @@ -0,0 +1,1854 @@ +//===== eAthena Script ======================================= +//= Knight Job Quest +//===== By: ================================================== +//= PGRO TEAM (Aegis). +//= Converted by kobra_k88 +//= Further bugfixed and tested by Lupus +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Official RO Knight job quest converted from aegis script, and my own +//= RO screenies and play experience +//===== Additional Comments: ================================= +//=v1.0 Fully working. Please comment out any pre-existing warps for the +//= test rooms in any other files so that the ones specified here can work. +//= v1.1 Fixed a major bug. Now using the initnpctimer command, +//= donpcevent, and new waitingroom event commands. No more addtimer +//= spamming. No longer have to talk to the npc to take the test. Just enter the chat room. +//= v1.2 More bug fixes. Changed global variable names to unique ones. +//= Added second set of items to first test. Added Awake pots award for job change. +//= v1.3 Rollback from the wrong Kashy's fix +//============================================================ + + + +//<------------------------------------------------------------------------------------ Chivalry Captain Herman------------------------------------------------------------------------------------------>\\ +prt_in.gat,88,101,3 script Chivalry Captain Herman 56, +{ + if (Class == Job_Swordman && KNIGHT_Q > 0) goto L_Check; + + mes "[Chivalry Captain Herman]"; + mes "Good Day. This is the Prontera Chivarly, home of the famous Prontera Knights."; +M_Menu: + next; + menu "I am ready for Knighthood.",M_0,"The Requirements.",M_1,"Quit.",M_End; + + M_0: + mes "[Chivalry Captain Herman]"; + if(Class != Job_Swordman) goto L_NotSwo; + + mes "Well then, first fill out this application form...."; + next; + mes "...(you fill out the form and hand it back)..."; + next; + mes "[Chivalry Captain Herman]"; + if(JobLevel < 40) goto L_NotLvl; + + mes "Impressive. You have the job qualifications to become a knight..., however you will need much more than that to actually become one."; + next; + mes "[Chivalry Captain Herman]"; + mes "In order to become a Knight one must posses great strength, courage, determination, and strong desire to help others."; + next; + mes "[Chivalry Captain Herman]"; + mes "You will have to show me that you have these attributes before I can make you a knight."; + next; + mes "[Chivalry Captain Herman]"; + mes "The 6 Knights you see around the room have each prepapred a unique test for would be Knights to take."; + next; + mes "[Chivalry Captain Herman]"; + mes "You must complete each one of their test and prove to me that you are truly committed to becomming a knight!"; + next; + mes "[Chivalry Captain Herman]"; + mes "Speak with ^0000ffSir Andrew Syloc^000000. He will give you your first test. Good luck!! I expect to see you again soon!"; + set KNIGHT_Q, 1; + set JBLVL, 40; + close; + + L_NotLvl: + mes "Hmm...it looks like you have not reached Job Level 40 yet. Please come back when you do. I shall be waiting here."; + close; + L_NotSwo: + if(Class == Job_Knight) goto sL_JobKni; + if(Class == Job_Novice) goto sL_JobNov; + + sL_JobOther: + mes "I'm sorry but only Swordsmen can become Knights."; + close; + + sL_JobKni: + mes "...(sighs)...what are you doing here WASTING my time?? GO FORTH!!, and continue protecting Rune Midgard my young Knight."; + emotion 32; + close; + + sL_JobNov: + mes "Hahahaha!! You have no job experience what so ever and yet you stumble in here asking to be a knight. Hahahaha!!"; + emotion 18; + next; + mes "[Chivalry Captain Herman]"; + mes "You must first become a Swordsman before even thinking about becoming a Knight. Now scurry along little novice. Hahahahaha!!!"; + close; + + M_1: + mes "[Chivalry Captain Herman]"; + mes "The first requirement for becoming a Knight is that you must be a Swordsman."; + next; + mes "[Chivalry Captain Herman]"; + mes "The second requirement is that you must have at least a Job Level of 40."; + next; + mes "[Chivalry Captain Herman]"; + mes "The last requirement is that you will need to pass 6 tests that will determine whether or not you are worthy enough to become a Knight."; + next; + mes "[Chivalry Captain Herman]"; + mes "These requirements may seem difficult, but the Knight class is an elite and noble job class and only the best candidates may join."; + goto M_Menu; + + M_End: + close; + +L_Check: + mes "[Chivalry Captain Herman]"; + if (KNIGHT_Q == 1) mes "Please speak with ^0000ffSir Andrew Syloc^000000. He will give you your first test."; + if (KNIGHT_Q == 2) mes "Congratulations on finishing your first test. ^0000ffSir James Syracuse^000000 will administer your ^ff0000second test^000000."; + if (KNIGHT_Q == 3) mes "Congratulations on finishing the second test. ^0000ffSir Windsor^000000 will administer your ^ff0000third test^000000."; + if (KNIGHT_Q == 4) mes "Congratulations on finishing the third test. ^0000ffLady Amy Beatris^000000 will administer your ^ff0000fourth test^000000."; + if (KNIGHT_Q == 5) mes "Congratulations on finishing the fourth test. ^0000ffSir Edmund^000000 will administer your ^ff0000fifth test^000000."; + if (KNIGHT_Q == 6) mes "Congratulations on finishing the fifth test. ^0000ffSir Grey^000000 will administer your ^ff0000sixth test^000000."; + if (KNIGHT_Q == 7) goto L_MakeKnight; + next; + mes "[Chivalry Captain Herman]"; + mes "Good luck!"; + close; + + L_MakeKnight: + if(SkillPoint > 0) goto sL_SKpoint; + + mes "Oh, ^ff0000"+strcharinfo(0)+"^000000. So you've passed Sir Grey's test?"; + mes "Let me just say that I applaud all of your hard work and your determination."; + next; + mes "[Chivalry Captain Herman]"; + mes "The final step to become a Knight is to recieve a recomondation from all six of the Knights who tested you."; + next; + mes "[Chivalry Captain Herman]"; + mes "Let's start with Sir Andrew Syloc. Sir Syloc, what is your opinion of Knight candidate, ^ff0000"+strcharinfo(0)+"^000000."; + next; + mes "[Sir Andrew Syloc]"; + mes "Patience is a quality all Knights must have. By passing my test, ^ff0000"+strcharinfo(0)+"^000000 showed great patience and determination."; + next; + mes "[Sir Andrew Syloc]"; + mes "In my opinion ^ff0000"+strcharinfo(0)+"^000000 is deserving of becoming a Knight!"; + next; + mes "[Chivalry Captain Herman]"; + mes "Very good Sir Syloc. Sir James Syracuse, what say you?"; + next; + mes "[Sir James Syracuse]"; + mes "^ff0000"+strcharinfo(0)+"^000000 was albe to answer everyone of my questions correctly."; + mes "This displays a mastery of the basic concepts of the Knight class."; + next; + mes "[Sir James Syracuse]"; + mes "^ff0000"+strcharinfo(0)+"^000000 has my recomendation for Knighthood!"; + next; + mes "[Chivalry Captain Herman]"; + mes "I see Sir Syracuse. Sir Winsor what do you have to say?"; + next; + mes "[Sir Winsor]"; + mes ".............................."; + next; + mes "[Sir Winsor]"; + mes "Hmphf. I have no objections."; + next; + mes "[Chivalry Captain Herman]"; + mes "Hahaha! You never waste words do you Sir Winsor. What are your thoughts Lady Amy Beatris?"; + next; + mes "[Lady Amy Beatris]"; + mes "A Knight will be involved in many different kinds of situations on his/her journey."; + mes "It is a Knight's duty to make the right decisions in dealing with these situations."; + next; + mes "[Lady Amy Beatris]"; + mes "^ff0000"+strcharinfo(0)+"^000000 showed good decision making in answering my questions."; + mes "I too recomend that this candidate be Knighted!"; + next; + mes "[Chivalry Captain Herman]"; + mes "Thank you Lady Beatris. How about you Sir Edmund?"; + next; + mes "[Sir Edmund]"; + mes "A rock is an unchanging figure that never wavers in the face of adversity."; + next; + mes "[Sir Edmund]"; + mes "Though mighty winds may try to knock it down and crashing waves may try to wash it away, a rock will stand solid and firm."; + next; + mes "[Sir Edmund]"; + mes "^ff0000"+strcharinfo(0)+"^000000 showed the strength of a rock and was ever calm durring my test."; + mes "It is my honest belief that ^ff0000"+strcharinfo(0)+"^000000 should be bestowed with Knighthood."; + next; + mes "[Chivalry Captain Herman]"; + mes "As always Sir Edmund, a very profound observation. Well we're down to the last tester. Sir Grey, please give us your final desicion."; + next; + mes "[Sir Grey]"; + mes "What can I say. ^ff0000"+strcharinfo(0)+"^000000 answered my questions thoughtfully and truthfully."; + next; + mes "[Sir Grey]"; + mes "Though others may think that a Knight's strength lies within his/her sword, we Knights know that true strength lies within ones mind and heart."; + next; + mes "[Sir Grey]"; + if(sex==1) mes "After speaking to ^ff0000"+strcharinfo(0)+"^000000, I felt that he had this strength within him."; + if(sex==0) mes "After speaking to ^ff0000"+strcharinfo(0)+"^000000, I felt that she had this strength within her."; + mes "I would be happy to give ^ff0000"+strcharinfo(0)+"^000000 my recomendation to become a Knight!"; + next; + mes "[Chivalry Captain Herman]"; + mes "Many thanks Sir Grey, and many thanks to all of you for your time. Well it looks like it was a unanimous decision."; + next; + mes "[Chivalry Captain Herman]"; + mes "The process to become a Knight is very rigorous and difficult and yet you were able to successfully make it through."; + next; + mes "[Chivalry Captain Herman]"; + mes "You have done extremely well and therefore are deserving of the honor of being called a Knight."; + next; + mes "[Chivalry Captain Herman]"; + mes "^ff0000"+strcharinfo(0)+"^000000, in the name of King Tristin the 3rd, ruler of the kingdom of Run-Midgard, I hereby bestow upon thee the title of Knight!"; + next; + JobChange Job_Knight; + if(JBLVL == 40) getitem 656, 3; + if(JBLVL == 50) getitem 656, 7; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + mes "[Chivalry Captain Herman]"; + mes "Congratulations!! You are now a fellow Knight and protector of Rune-Midgard! Now go forth and make Rune-Midgard a better place to live!"; + emotion 21; + close; + + sL_SKpoint: + mes "Please use up all of your skill points so that I can make you a Knight."; + emotion 5; + close; +} + + +//<--------------------------------------------------------------------------------- Sir Andrew Syloc (1st test) ------------------------------------------------------------------------------------------>\\ +prt_in.gat,75,107,4 script SIr Andrew Syloc 65, +{ + mes "[Sir Andrew Syloc]"; + if (Class == Job_Knight) goto L_Knight; + if (Class == Job_Novice) goto L_Novice; + if (Class == Job_Swordman && KNIGHT_Q == 1) goto L_Test; + if (Class == Job_Swordman && KNIGHT_Q == 2) goto L_Done; +L_Other: + mes "We Knights of Prontera battle for peace and freedom! We fight to ensure a prosperous future for the people of Rune-Midgard!"; + close; +L_Novice: + mes "Oh, its a novice. Welcome to the Prontera Chivalry!"; + next; + mes "[Sir Andrew Syloc]"; + mes "Even though you feel weak now, I assure you that once you get your first job, you will feel confident and strong."; + next; + mes "[Sir Andrew Syloc]"; + mes "Just stay safe and keep out of trouble."; + close; +L_Knight: + mes "Oh, your one of us, how are you doing?"; + next; + mes "[Sir Andrew Syloc]"; + mes "It's important that you get the right equipment. It will allow you fight a lot of monsters and inturn get a lot of zeny."; + next; + mes "[Sir Andrew Syloc]"; + mes "You should remember though, that being a Knight isn't about amassing wealth."; + close; + + +L_Test: + if (KNIGHT_Q2 > 0) goto L_Check; + mes "Oh so you've come to join the Prontera Chivalry have you. Let's see, you're ^ff0000" + strcharinfo(0) + "^000000 right?"; + next; + mes "[Sir Andrew Syloc]"; + mes "My name is Andrew Syloc and I am one of the knights in the Prontera Knight Guild."; + next; + mes "[Sir Andrew Syloc]"; + mes "I will be giving you the first of many tests that will determine if you have what it takes to become a Knight."; + next; + mes "[Sir Andrew Syloc]"; + mes "This first test is like a scavenger hunt and will test your knowledge of monsters and their locations."; + next; + mes "[Sir Andrew Syloc]"; + mes "This infrormation is vital for a Knight's ability to properly defend the many different towns in Rune-Midgard."; + next; + menu "I'm ready.",M_1, "Give me time.",M_End; + + M_1: + mes "[Sir Andrew Syloc]"; + if (joblevel == 50) goto sL_Skip; + mes "To pass this test you will need to gather:"; + set KNIGHT_Q2, rand(1,2); + if(KNIGHT_Q2 == 1) callsub sF_R1; + if(KNIGHT_Q2 == 2) callsub sF_R2; + next; + mes "[Sir Andrew Syloc]"; + mes "When you have all of those items, return here and give them to me."; + next; + mes "[Sir Andrew Syloc]"; + mes "Good luck and be carefull! I shall await your return."; + close; + + sF_R1: + mes "^5533FF5 Elder Pixie's Mustache,"; //1040 + mes "5 Wings of Red Bat"; //7006 + mes "5 Orcish Vouchers"; //931 + mes "5 Moth Dust"; //1057 + mes "5 Reptile Tongues^000000"; //903 + mes "and ^5533FF5 Manes^000000."; //1028 + return; + sF_R2: + mes "^5533FF5 Bug Legs"; + mes "5 Heart of Mermaid"; + mes "5 Snail's Shells"; + mes "5 Clam Flesh"; + mes "5 Old Frying Pans^000000"; + mes "and ^5533FF5 Maneater Blossoms^000000."; + return; + + sL_Skip: + mes "Wait..... what's this?"; + next; + mes "[Sir Andrew]"; + mes "You seem to be an increadibly strong swordsman. Yes, your strength and skill are amazing."; + next; + mes "[Sir Andrew]"; + mes "Hahaha! There's no need for you to take my test. Why don't you go onto the next one ok."; + next; + mes "[Sir Andrew]"; + mes "Speak to ^5533FFSir James Syracuse^000000. The tests you will be taking will teach you valuable life lessons, so please try hard."; + set KNIGHT_Q, 2; + set KNIGHT_Q2, 0; + set JBLVL, 50; + close; + + M_End: + mes "[Sir Andrew Syloc]"; + mes "Take as much time as you need. Come back when you're ready."; + close; + +L_Check: + mes "You've come back ^ff0000"+strcharinfo(0)+"^000000. Did you get all of the items I asked for?"; + next; + if(KNIGHT_Q2 == 2) goto L_2; + + L_1: + if(countitem(1040)<5 || countitem(7006)<5 || countitem(931)<5 || countitem(1057)<5 || countitem(903)<5 || countitem(1028)<5) goto L_NotDone; + delitem 1040,5; + delitem 7006,5; + delitem 931,5; + delitem 1057,5; + delitem 903,5; + delitem 1028,5; + goto L_Cont; + + L_2: + if(countitem(1042)<5 || countitem(950)<5 || countitem(946)<5 || countitem(966)<5 || countitem(7031)<5 || countitem(1032)<5) goto L_NotDone; + delitem 1042,5; + delitem 950,5; + delitem 946,5; + delitem 966,5; + delitem 7031,5; + delitem 1032,5; + + L_Cont: + mes "[Sir Andrew Syloc]"; + mes "Lets see here..... 5 of this.... 5 of that.... Great! You got everything I asked for."; + next; + mes "[Sir Andrew Syloc]"; + mes "You have done well and have past your first test! However you shouldn't get too excited."; + mes "There are still more challenges that you will have to overcome before you can become a knight."; + next; + mes "[Sir Andrew Syloc]"; + + L_Done: + mes "Speak to the Chivalry Captain Herman and he will inform you about your next test."; + mes "Stay focused and give it your all ^0000ff"+strcharinfo(0)+"^000000. I know you will do well."; + set KNIGHT_Q, 2; + set KNIGHT_Q2, 0; + close; + + L_NotDone: + mes "[Sir Andrew Syloc]"; + mes "What? You don't have everything I asked for?"; + emotion 4; + next; + mes "[Sir Andrew Syloc]"; + mes "This is what you were SUPPOSED to collect...."; + if(KNIGHT_Q2 == 1) callsub sF_R1; + if(KNIGHT_Q2 == 2) callsub sF_R2; + next; + mes "[Sir Andrew Syloc]"; + mes "Once you have ALL of those items come back and see me."; + close; +} + + +//<------------------------------------------------------------------------------ Sir James Syracuse (2nd Test) ----------------------------------------------------------------------------------------->\\ +prt_in.gat,71,91,6 script Sir James Syracuse 65, +{ + mes "[Sir James Syracuse]"; + if (class == Job_Knight) goto L_Knight; + if (class == Job_Novice) goto L_Novice; + if (class == Job_Swordman && KNIGHT_Q == 2) goto L_Test; + if (class == Job_Swordman && KNIGHT_Q == 3) goto L_Done; +L_Other: + mes "Attacking and defending..... is there a way to do both at the same time?"; + mes "With a 'two-handed' weapon you have a great attack but no defense. Is there anything that can compensate for this weakness?"; + next; + mes "[Sir James Syracuse]"; + mes "A weapon that could be used to both attack and defend would be invaluable to a Knight...... Darn!..... Where can I get such a thing??!! "; + close; +L_Novice: + mes "What are you doing here novice?"; + next; + mes "[Sir James Syracuse]"; + mes "Do you want to become a Knight? Well too bad novices can't become knights."; + next; + mes "[Sir James Syracuse]"; + mes "You have to be an experienced swordman in order to become a knight."; + close; +L_Knight: + mes "Hey, how are you doing... the guild is fine."; + next; + mes "[Sir James Syracuse]"; + mes "We are still recruiting knights. I hear there's a bad knight out there ruining the good name of the Prontera Chivalry..."; + next; + mes "[Sir James Syracuse]"; + mes "If you see him, teach him a lesson."; + close; + +L_Test: + mes "Oh, so you passed the first test ^ff0000"+strcharinfo(0)+"^000000."; + next; + mes "[Sir James Syracuse]"; + mes "First let me introduce myself, my name is James Syracuse. I am of course a Knight here at the Prontera Chivalry."; + next; + mes "[Sir James Syracuse]"; + mes "This test will be on your knowledge of Knights. You will also be asked about your opinions of Knights..."; + next; + mes "[Sir James Syracuse]"; + mes "Dont' be nervous, I'll only be asking a few simple questions."; + next; + menu "Let's go",M_0,"I'm not ready yet.",M_End; + + M_0: + mes "[Sir James Syracuse]"; + mes "Okay lets start, please answer the questions as quickly as you can. If you get an answer wrong you will have to start the test all over again."; + next; + + mes "[Sir James Syracuse]"; + //mes "Knights excel in both attack strength and defensive prowess."; + mes "Can you tell me which of these swords is NOT a two handed sword?"; + next; + menu "Katzbalger",sM_0a,"Bastard Sword",sM_0b,"Claymore",sM_0c,"Flamberge",sM_0d; + + sM_0a: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. Katzbalger IS a two-handed sword"; + mes "How will you manage to become a knight if you don't know about the swords that Knight's use?"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_0b: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. Bastard Sword IS a two-handed sword!"; + mes "How will you manage to become a knight if you don't know about the swords that knight's use?"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_0c: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. Claymore IS a two-handed sword"; + mes "How will you manage to become a knight if you don't know about the swords that knight's use?"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_0d: + + mes "[Sir James Syracuse]"; + mes "Okay, let me ask you a question about Knight skills."; + mes "What skill listed below is NOT used for attacking an opponent?"; + next; + menu "Two-Hand Mastery Lv.5",sM_1a,"Berserk Lv.3",sM_1b,"Endure Lv.10",sM_1c,"Bash Lv.10",sM_1d; + + sM_1a: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this then you will never master the art of combat!"; + mes "If you want to become a knight, you have to know what each skill does."; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_1b: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this then you will never master the art of combat!"; + mes "If you want to become a knight, you have to know what each skill does."; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_1c: + goto L_Cont1; + + sM_1d: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this then you will never master the art of combat!"; + mes "If you want to become a knight, you have to know what each skill does."; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + L_Cont1: + mes "[Sir James Syracuse]"; + mes "Knights are different from other classes in that Knights can use spears and have special spear skills."; + mes "What spear skill below uses the MOST sp?"; + next; + menu "Pierce",sM_2a,"Spear Boomarang",sM_2b,"Spear Stab",sM_2c,"Riding",sM_2d; + + sM_2a: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this, it'll be hard for you to master the Spear!"; + mes "How can you not know about this if you're trying to become a Knight? Thats just not tolerable!"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_2b: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this, it'll be hard for you to master the Spear!"; + mes "How can you not know about this if you're trying to become a Knight? Thats just not tolerable!"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_2c: + goto L_Cont2; + + sM_2d: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this, it'll be hard for you to master the Spear!"; + mes "How can you not know about this if you're trying to become a Knight? Thats just not tolerable!"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + L_Cont2: + mes "[Sir James Syracuse]"; + mes "Spears can also have elemental properites."; + mes "Which of the elements below is strongest against Dark/Undead monsters?"; + next; + menu "Holy",sM_3a, "Wind",sM_3b, "Poison",sM_3c, "Earth",sM_3d; + + sM_3a: + goto L_Cont3; + + sM_3b: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. Wind is NOT that strong against undead!"; + mes "These are basic stuff and you don't it how funny?"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_3c: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. Poion is NOT strong against undead"; + mes "These are basic stuff and you don't it how funny"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_3d: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. Earth is NOT strong against undead"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + L_Cont3: + mes "[Sir James Syracuse]"; + mes "When you become a Knight you can ride a pecopeco. However your attack speed drops significantly."; + mes "But if you learn the skill, Cavalry Mastery, your attack speed will increase again."; + next; + mes "[Sir James Syracuse]"; + mes "What percentage of your attack speed is regained by learning level 3 cavalry mastery?"; + next; + menu "70%",sM_4a, "80%",sM_4b, "90%",sM_4c, "100%",sM_4d; + + sM_4a: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this I recommend that you do not ride a peco"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_4b: + goto L_Cont4; + + sM_4c: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this I recommend that you do not ride a peco"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + sM_4d: + mes "[Sir James Syracuse]"; + mes "^ff0000Wrong^000000. If you don't know this I recommend that you do not ride a peco"; + next; + mes "[Sir James Syracuse]"; + mes "You need to know the basics BEFORE you take this test!"; + close; + + L_Cont4: + mes "[Sir James Syracuse]"; + mes "Good, looks like you know a lot about knights"; + mes "Ok. Let me ask you some more questions"; + next; + mes "[Sir James Syracuse]"; + mes "If you run into a novice and he asks you to tank for him because he's to lazy to fight on his own, you should...."; + next; + menu "Tell the novice a good place to train",sM_5a, "Give him some zeny",sM_5b, "Give him some weapons",sM_5c; + + sM_5a: + mes "[Sir James Syracuse]"; + mes "Yes! That's a good answer. Novice's need to be independent and work hard on their own."; + mes "This builds good character and helps them become stronger."; + next; + goto L_Cont5; + + sM_5b: + mes "[Sir James Syracuse]"; + mes "WHAT?? Are you Nuts? Do you think that money is everything? LEAVE NOW!"; + close; + + sM_5c: + mes "[Sir James Syracuse]"; + mes "Do you think you're helping someone when you give them good weapons?"; + mes "You are basically KILLING them not helping them. LEAVE NOW!"; + close; + + L_Cont5: + mes "[Sir James Syracuse]"; + mes "If you're in a party and your party gets attacked, what would you do?"; + next; + menu "Stay in front and protect everyone.",sM_6a, "Wait until the others attack first then leech.",sM_6b, + "Who cares, I just want the drops.",sM_6c; + + sM_6a: + mes "[Sir James Syracuse]"; + mes "Yes! We Knights are important in most battles because of our strong attack and defensive skills."; + mes "We should try our best to take the brunt of any attack and allow our party members to provide support."; + next; + goto L_Cont6; + + sM_6b: + mes "[Sir James Syracuse]"; + mes "...WHAT? If you do that you're going to get EVERYONE KILLED!!"; + next; + mes "[Sir James Syracuse]"; + mes "You....LEAVE NOW! You don't have what it takes to become a Knight!"; + close; + + sM_6c: + mes "[Sir James Syracuse]"; + mes "YOU THINK DROPS ARE MORE IMPORTANT THAN YOUR PARTY MEMBERS??"; + next; + mes "[Sir James Syracuse]"; + mes "You don't have what it takes to become a knight... LEAVE NOW!!"; + close; + + L_Cont6: + mes "[Sir James Syracuse]"; + mes "And finally, the last question. What do you think is most important to a Knight?"; + next; + menu "Honor",sM_7a, "Money",sM_7b, "The Fame",sM_7c; + + sM_7a: + mes "[Sir James Syracuse]"; + mes "Yes! Absolutely correct! A Knight's pride and honor come before all else."; + mes "You have to always remember that!"; + next; + mes "[Sir James Syracuse]"; + goto L_Done; + + sM_7b: + mes "[Sir James Syracuse]"; + mes "You're a REALLY GREEDY PERSON!!"; + next; + mes "[Sir James Syracuse]"; + mes "Leave now!! We DON'T want your kind here!"; + close; + + sM_7c: + mes "[Sir James Syracuse]"; + mes "Did you want to a become a knight because you desired to become FAMOUS?"; + next; + mes "[Sir James Syracuse]"; + mes "Leave now!! We DON'T need your kind here!"; + close; + + L_Done: + mes "Good job on passing the second test. Please speak with the Captain about your next test."; + next; + mes "[Sir James Syracuse]"; + mes "There is more to a Knight than raw strength. Duty and honor are of the utmost importance to a Knight"; + mes "Remember this and you will have no problems with the rest of the tests."; + set KNIGHT_Q, 3; + close; + + M_End: + mes "[Sir James Syracuse]"; + mes "I see. Take your time."; + close; + +} + + +//<--------------------------------------------------------------------------------- Sir Windsor (3rd Test) -------------------------------------------------------------------------------------------------->\\ +// Sir Windsor --------------------------------------------------------- +prt_in.gat,79,94,3 script Sir Windsor#1 733, +{ + mes "[Sir Windsor]"; + if(Class == Job_Knight) goto L_Knight; + if(Class == Job_Novice) goto L_Novice; + if(Class == Job_Swordman && KNIGHT_Q == 3) goto L_Test; + if(Class == Job_Swordman && KNIGHT_Q == 4) goto L_Done; +L_Other: + mes ".........."; + next; + mes "[Sir Windsor]"; + mes "What're you looking at.....?"; + close; +L_Novice: + mes ".........."; + next; + mes "[Sir Windsor]"; + mes "Go play somewhere else......"; + close; +L_Knight: + mes "Don't talk to me......"; + emotion 9; + close; + + +L_Test: + if(KNIGHT_Q2 == 2) goto L_Done; + if(KNIGHT_Q2 == 1) goto sL_ReTest; + mes "............."; + next; + mes "[Sir Windsor]"; + mes "... so you're here to take the test?"; + next; + mes "[Sir Windsor]"; + mes "Follow me....."; + next; + set KNIGHT_Q2,1; + savepoint "prt_in.gat",77,96; + warp "job_knt",89,106; + end; + + sL_ReTest: + mes "............."; + next; + mes "[Sir Windsor]"; + mes "Hmf... your previous attempt was pathetic...."; + next; + mes "[Sir Windsor]"; + mes "Lets go......"; + next; + savepoint "prt_in.gat",77,96; + warp "job_knt",89,106; + end; + +L_Done: + mes "Hmf......."; + next; + mes "[Sir Windsor]"; + mes ".... You passed my test."; + next; + mes "[Sir Windsor]"; + mes ".... Go talk to the Chivalry Captain Herman."; + set KNIGHT_Q2,0; + set KNIGHT_Q,4; + close; +} + + +// Waiting Room --------------------------------------------------------------------------- +job_knt.gat,89,110,4, script Sir Windsor#2::SW2 733, +{ + mes "[Sir Windsor]"; + mes ".........."; + next; + mes "[Sir Windsor]"; + mes ".....You have a problem?"; + next; + menu "What is this test about?",M_0, "I wanna kick some moster butt!.",M_1, "I want to leave.",M_2, "Nothing.",M_End; + + M_0: + mes "[Sir Windsor]"; + mes ".........."; + next; + mes "[Sir Windsor]"; + mes ".....You are going to fight monsters."; + next; + mes "[Sir Windsor]"; + mes ".....You must kill every single monster in the arena."; + next; + mes "[Sir Windsor]"; + mes ".........."; + next; + mes "[Sir Windsor]"; + mes ".....You have to survive three levels of viscous monsters."; + next; + mes "[Sir Windsor]"; + mes ".....I will give you 3 minutes for each level."; + next; + mes "[Sir Windsor]"; + mes ".........."; + close; + + M_1: + mes "[Sir Windsor]"; + mes ".........."; + next; + mes "[Sir Windsor]"; + mes ".....Go to the waiting room first."; + next; + mes "[Sir Windsor]"; + mes ".....The test will start soon."; + next; + mes "[Sir Windsor]"; + mes ".........."; + next; + mes "[Sir Windsor]"; + mes ".....If someones in there, you have to wait until they are done or fail."; + next; + mes "[Sir Windsor]"; + mes ".....Once that happens, you will be automatically warped to the test room.."; + next; + mes "[Sir Windsor]"; + mes ".........."; + close; + + M_2: + mes "[Sir Windsor]"; + mes ".........."; + next; + mes "[Sir Windsor]"; + mes ".....Leave then."; + next; + warp "prt_in.gat",80,100; + close; + + M_End: + mes "[Sir Windsor]"; + mes ".........."; + close; + +OnInit: + waitingroom "Knight Test Waiting Room",8,"SW2::OnStart",1; + end; + +OnStart: + set $@KntUsers, getareausers("job_knt.gat", 24, 126, 63, 165); // get user count for first lvl + set $@KntUsers, $@KntUsers + getareausers("job_knt.gat", 24, 32, 63, 71); // get user count for second lvl + first lvl + set $@KntUsers, $@KntUsers + getareausers("job_knt.gat", 124, 132, 163, 171); // get user count for third lvl + second lvl + first lvl + if($@KntUsers > 0) end; + + if ((getwaitingroomstate(33)) == 0) end; // stops the rest of the script from running if there is no one in the waiting room; + killmonsterall "job_knt.gat"; //kills off any left over monsters from other testers + warpwaitingpc "job_knt.gat",43,146; + donpcevent "KntLvl1"; + end; +} + +// First Level --------------------------------------------------------- +job_knt.gat,1,1,1 script KntLvl1 -1, +{ + disablenpc "Warp1"; + set $@KntRm, 1; + set $@KntMob,12; + monster "job_knt.gat",39,150,"Dustiness",1114,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",47,150,"Dustiness",1114,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",39,142,"Dustiness",1114,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",47,142,"Dustiness",1114,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",43,137,"Piere",1160,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",43,155,"Piere",1160,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",43,155,"Deniro",1105,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",43,155,"Deniro",1105,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",43,155,"Andre",1095,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",43,137,"Andre",1095,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",35,146,"Argos",1100,1,"KntLvl1::OnMyMobDead"; + monster "job_knt.gat",52,146,"Argos",1100,1,"KntLvl1::OnMyMobDead"; + initnpctimer "TimerKnt"; + end; + +OnMyMobDead: + set $@KntMob, $@KntMob - 1; + if($@KntMob > 0) end; + + stopnpctimer "TimerKnt"; + areaannounce "job_knt.gat", 24, 126, 63, 165, "[Sir Windsor]: Get ready for the second level....",8; + set $@KntMob, 0; + addtimer 5000, "KntLvl2"; + end; +} + + +// Second Level --------------------------------------------------------- +job_knt.gat,1,1,1 script KntLvl2 -1, +{ + set $@KntRm, 2; + set $@KntMob,12; + monster "job_knt.gat",53,52,"Frilldora",1119,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",34,52,"Frilldora",1119,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",43,42,"Desert Wolf",1106,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",43,62,"Desert Wolf",1106,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",58,52,"Drainliar",1111,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",58,52,"Drainliar",1111,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",29,52,"Drainliar",1111,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",29,52,"Drainliar",1111,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",60,68,"Anacondaq",1030,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",27,68,"Anacondaq",1030,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",60,35,"Anacondaq",1030,1,"KntLvl2::OnMyMobDead"; + monster "job_knt.gat",27,35,"Anacondaq",1030,1,"KntLvl2::OnMyMobDead"; + warp "job_knt.gat",43,52; + initnpctimer "TimerKnt"; + end; + +OnMyMobDead: + set $@KntMob, $@KntMob - 1; + if($@KntMob > 0) end; + + stopnpctimer "TimerKnt"; + areaannounce "job_knt.gat", 24, 32, 63, 71, "[Sir Windsor]: Get ready for the third level....",8; + set $@KntMob, 0; + addtimer 5000, "KntLvl3"; + end; + +} + +// Third Level --------------------------------------------------------------- +job_knt.gat,1,1,1 script KntLvl3 -1, +{ + set $@KntRm, 3; + set $@KntMob,7; + monster "job_knt.gat",136,152,"Knife Goblin Bro",1122,1,"KntLvl3::OnMyMobDead"; + monster "job_knt.gat",150,152,"Mace Goblin Bro",1123,1,"KntLvl3::OnMyMobDead"; + monster "job_knt.gat",143,145,"Axe Goblin Bro",1124,1,"KntLvl3::OnMyMobDead"; + monster "job_knt.gat",143,167,"Hammer Goblin Bro",1125,1,"KntLvl3::OnMyMobDead"; + monster "job_knt.gat",139,167,"Club Goblin Bro",1126,1,"KntLvl3::OnMyMobDead"; + monster "job_knt.gat",147,167,"Goblin Archer",1258,1,"KntLvl3::OnMyMobDead"; + monster "job_knt.gat",136,158,"Steam Goblin",1280,1,"KntLvl3::OnMyMobDead"; + warp "job_knt.gat",143,152; + initnpctimer "TimerKnt"; + end; + +OnMyMobDead: + set $@KntMob, $@KntMob - 1; + if($@KntMob > 0) end; + + stopnpctimer "TimerKnt"; + set KNIGHT_Q2, 2; + areaannounce "job_knt.gat", 124, 132, 163, 171, "[Sir Windsor]: ....... test completed.",8; + set $@KntMob, 0; + addtimer 7000, "TimerKnt::OnTimer184000"; + end; + +} + +// Timer -------------------------------------------------------------------------------- +job_knt.gat,1,1,1 script TimerKnt -1, +{ + +OnTimer2000: + set $@KntTime$, "You have 3 minutes..."; + donpcevent "SW2::OnStart"; //checks to see if anyone is still in the room, in case of logout or KO + callsub AnnounceKnt; +OnTimer32000: + donpcevent "SW2::OnStart"; + end; +OnTimer62000: + set $@KntTime$, "You have 2 minutes left..."; + donpcevent "SW2::OnStart"; + callsub AnnounceKnt; +OnTimer92000: + donpcevent "SW2::OnStart"; + end; +OnTimer122000: + set $@KntTime$, "You have 1 minute left..."; + donpcevent "SW2::OnStart"; + callsub AnnounceKnt; +OnTimer152000: + set $@KntTime$, "You have 30 seconds left..."; + donpcevent "SW2::OnStart"; + callsub AnnounceKnt; +OnTimer162000: + set $@KntTime$, "You have 10 seconds left..."; + callsub AnnounceKnt; +OnTimer182000: + set $@KntTime$, "Times up! You failed!!"; + donpcevent "SW2::OnStart"; + callsub AnnounceKnt; +OnTimer184000: + stopnpctimer; + if($@KntRm==1) areawarp "job_knt.gat", 24, 126, 63, 165, "prt_in.gat",77,96; + if($@KntRm==2) areawarp "job_knt.gat", 24, 32, 63, 71, "prt_in.gat",77,96; + if($@KntRm==3) areawarp "job_knt.gat", 124, 132, 163, 171, "prt_in.gat",77,96; + areaannounce "job_knt.gat", 82, 98, 97, 113, "[Sir Windsor]: The testing rooms are now open.....",8; + killmonsterall "job_knt.gat"; + donpcevent "SW2::OnStart"; + end; + +AnnounceKnt: + if($@KntRm==1) areaannounce "job_knt.gat", 24, 126, 63, 165, "[Sir Windsor]: "+$@KntTime$+".",8; + if($@KntRm==2) areaannounce "job_knt.gat", 24, 32, 63, 71, "[Sir Windsor]: "+$@KntTime$+".",8; + if($@KntRm==3) areaannounce "job_knt.gat", 124, 132, 163, 171, "[Sir Windsor]: "+$@KntTime$+".",8; + end; +} + + +//<------------------------------------------------------------------------------------ Lady Amy Beatris (4th Test) ---------------------------------------------------------------------------------------------->\\ +prt_in.gat,69,107,5 script Lady Amy Beatris 728, +{ + mes "[Lady Amy Beatris]"; + if (class == Job_Knight) goto L_Knight; + if (class == Job_Novice) goto L_Novice; + if (class == Job_Swordman && KNIGHT_Q == 4) goto L_Test; + if (class == Job_Swordman && KNIGHT_Q == 5) mes "Speak to the Chivalry Captain Herman about your next test."; + if (class == Job_Swordman && KNIGHT_Q == 5) close; +L_Other: + mes "Welcome to the Prontera Chivalry."; + next; + mes "[Lady Amy Beatris]"; + mes "There are only Knights here so just relax."; + close; +L_Novice: + mes "Wow... A cute novice... soooo cute..."; + emotion 14; + next; + mes "[Lady Amy Beatris]"; + mes "Do you want to become a Knight?"; + if(sex==0) mes "I bet you'll be lovely as a Knight."; + if(sex==1) mes "I bet you'll be really handsome as a Knight."; + next; + mes "[Lady Amy Beatris]"; + if(sex==0) mes "If you become a Knight, come back and see me. We Lady Knights should stick together."; + if(sex==1) mes "If you become a knight, come back and see me okay?(*winks*)"; + close; +L_Knight: + if(sex==1) goto L_Male; + + L_Female: + mes "Oh my! Aren't you just the prettiest Knight. I love how your sword matches with your shoes."; + emotion 14; + next; + mes "[Lady Amy Beatris]"; + mes "Anyway, I'm glad you came back to see me. I'm always curious about how a Knight turns out."; + mes "You look like you're doing fine so continue the good work okay? Lady Knights rule!"; + close; + + L_Male: + mes "Well hello handsome. There's just something about men in armor...."; + emotion 3; + next; + mes "[Lady Amy Beatris]"; + mes "So, did you come back for some fun...?"; + next; + menu "YOU BET!!!",M_Yes, "... um... well... err...",M_No; + + M_Yes: + mes "^FF0000(SLAPP!! SMACK!! BASH!!)^000000"; + emotion 6; + percentheal (-10),0; + next; + mes "[Lady Amy Beatris]"; + mes "How dare you!! Just what kind of girl do you take me for?"; + next; + mes "[Lady Amy Beatris]"; + mes "Allways remember that a Knight's a Knight, no matter what gender they are."; + mes "Also remember to be respectfull to women at all times!"; + emotion 32; + close; + + M_No: + mes "[Lady Amy Beatris]"; + mes "Teh he he. Silly, I'm just playing with you. You may be good looking, but I'm NOT that kind of girl."; + emotion 18; + next; + mes "[Lady Amy Beatris]"; + mes "Anyway, I'm glad you came back to see me. I'm always curious about how a Knight turns out."; + mes "You look like you're doing fine so continue the good work okay?"; + emotion 21; + close; + + +L_Test: + if(KNIGHT_Q2 == 1) mes "Are you ready to take the test over?"; //for when someone retakes the test + if(KNIGHT_Q2 == 1) goto M_Menu; + mes "Hello. Your ^ff0000"+strcharinfo(0)+"^000000, right?"; + next; + mes "[Lady Amy Beatris]"; + mes "My name is Amy Beatris, a Knight of the Prontera Chivalry."; + next; + mes "[Lady Amy Beatris]"; + mes "For your test I will be asking you some questions"; + next; + mes "[Lady Amy Beatris]"; + mes "Please listen carefully and pick the correct answer."; +M_Menu: + next; + menu "Ok. I'm ready.",M_0, "Please give me some time.",M_End; + + M_0: + set @score,0; + + mes "[Lady Amy Beatris]"; + mes "Let's say your in Morroc and you want to recruit a party member. What would you do?"; + next; + menu "Randomly follow someone around",sM_0a, "Make a chatroom and wait.",sM_0b, "Ask if anyone wants to party with a Knight..",sM_0c; + + sM_0a: + goto L_Cont1; + + sM_0b: + set @score, @score + 10; + goto L_Cont1; + + sM_0c: + set @score, @score + 10; + + L_Cont1: + mes "[Lady Amy Beatris]"; + mes "You're in a party with a hunter, a priest, a wizard, a blacksmith, and an assassin."; + mes "The six of you decide to train in the Pyramids."; + next; + mes "[Lady Amy Beatris]"; + mes "Your party makes it to the fourth floor of the pyramid, what will you do now?"; + next; + menu "Scout ahead and make sure it's safe for all",sM_1a, "Go fight by yourself",sM_1b, "Stay in front of the party and move slowly",sM_1c; + + sM_1a: + set @score, @score + 10; + + sM_1b: + goto L_Cont2; + + sM_1c: + set @score, @score + 10; + + L_Cont2: + mes "[Lady Amy Beatris]"; + mes "A lame-o guy creates a mob right in front of your party and disappears. What would you do?"; + next; + menu "Look after your partners",sM_2a, "Fight hard and help when needed",sM_2b, "Take your PecoPeco and RIDE like the WIND!",sM_2c; + + sM_2a: + set @score, @score + 10; + goto L_Cont3; + + sM_2b: + set @score, @score + 10; + goto L_Cont3; + + sM_2c: + + L_Cont3: + mes "[Lady Amy Beatris]"; + mes "Somehow you beat the mob. Your party then journeys on and you stumble upon someone who has fainted."; + next; + mes "[Lady Amy Beatris]"; + mes "This guy begs you to help him, what will you do?"; + next; + menu "Ask the priest in your party to help.",sM_3a, "Ask him how much he'll pay you if you help",sM_3b, "Ignore him.",sM_3c; + + sM_3a: + set @score, @score + 10; + + sM_3b: + + sM_3c: + + L_Cont4: + mes "[Lady Amy Beatris]"; + mes "You guys have to go to different places so you guys seperate yourselves into smaller groups."; + next; + mes "[Lady Amy Beatris]"; + mes "During your previous battles, a monster dropped a very valuable item that you picked up. What do you do with it?"; + next; + menu "Give it to the person that deserves it the most.",sM_4a, "Pretend you don't know about it.",sM_4b, "Discuss it with the others.",sM_4c; + + sM_4a: + set @score, @score + 10; + + sM_4b: + goto L_Cont5; + + sM_4c: + set @score, @score + 10; + + L_Cont5: + mes "[Lady Amy Beatris]"; + mes "You decide to go back to Prontera and sell some of the valuble items you picked up."; + mes "On the road, you see a lot of chatrooms."; + next; + mes "[Lady Amy Beatris]"; + mes "What would be the best way to sell them?"; + next; + menu "Sell them to an NPC.",sM_5a, "Create a chatroom to advertise the items.",sM_5b, "Go around looking for someone that needs them.",sM_5c; + + sM_5a: + goto L_Cont6; + + sM_5b: + set @score, @score + 10; + goto L_Cont6; + + sM_5c: + set @score, @score + 10; + + L_Cont6: + mes "[Lady Amy Beatris]"; + mes "Someone comes up to you and begs you for money. What would you do?"; + next; + menu "Give him some money and items.",sM_6a, "Ignore him.",sM_6b, "Tell him a place where its suitable for him to earn money.",sM_6c; + + sM_6a: + + sM_6b: + goto L_Cont7; + sM_6c: + set @score, @score + 10; + + L_Cont7: + mes "[Lady Amy Beatris]"; + mes "Now your alone and training in a forest. You are happily riding a pecopeco."; + next; + mes "[Lady Amy Beatris]"; + mes "You run into somone who's lost. What do you do?"; + next; + menu "Tell her where the exit is.",sM_7a, "Bring her to the exit.",sM_7b, "Give her a butterfly wing.",sM_7c; + + sM_7a: + set @score, @score + 10; + goto L_Cont8; + + sM_7b: + set @score, @score + 10; + + sM_7c: + + L_Cont8: + mes "[Lady Amy Beatris]"; + mes "You're still in the forest but now your busy fighting monsters."; + mes "You realize that you've run out of healing items and your health is very low."; + next; + mes "[Lady Amy Beatris]"; + mes "Suddenly a priest appears! What would you do?"; + next; + menu "'Give me a heal'",sM_8a, "'Would you please heal me. I'll share the drops with you.'",sM_8b, "'Dude! I need healz plz.'",sM_8c; + + sM_8a: + goto L_Cont9; + + sM_8b: + set @score, @score + 10; + + sM_8c: + + L_Cont9: + mes "[Lady Amy Beatris]"; + mes "Your getting tired so you decide to head back to town."; + next; + mes "[Lady Amy Beatris]"; + mes "On the road back to town, you see a very valuable object. What will you do?"; + next; + menu "Pick it up and keep it.",sM_9a, "Ask around to see if anyone dropped it.",sM_9b, "Leave it there.",sM_9c; + + sM_9a: + goto L_Cont10; + + sM_9b: + set @score, @score + 10; + goto L_Cont10; + + sM_9c: + set @score, @score + 10; + + L_Cont10: + mes "[Lady Amy Beatris]"; + mes "Alright. I'm finished with my questions. Now that wasn't so bad was it?"; + next; + mes "[Lady Amy Beatris]"; + mes "Okay, let me just quickly add up your score...."; + next; + mes "[Lady Amy Beatris]"; + mes "You got a score of ^ff0000"+@score+"^000000 out of ^0000ff100^000000."; + next; + mes "[Lady Amy Beatris]"; + if(@score == 100) goto L_100; + if(@score >= 80) goto L_80; + + L_Failed: + mes "I am sorry but you failed the test. I hope you will try again and do better next time."; + next; + mes "[Lady Amy Beatris]"; + mes "When I ask you a question please think hard about it."; + set KNIGHT_Q2, 1; //flag for re-taking the test + close; + + L_100: + mes "Great job! You got a perfect score. If you keep this up, you'll become one of the best knights around."; + mes "Speak to the Chivalry Captain Herman about your next test."; + next; + mes "[Lady Amy Beatris]"; + mes "Keep up the good work and pass all the tests okay?"; + set KNIGHT_Q, 5; + set KNIGHT_Q2, 0; + close; + L_80: + mes "Not bad. Not as good as had I hoped, but you did well enough to pass."; + mes "Speak to the Chivalry Captain Herman about your next test."; + next; + mes "[Lady Amy Beatris]"; + mes "Good luck on the next test. I hope you'll pass and become a knight soon."; + set KNIGHT_Q, 5; + set KNIGHT_Q2, 0; + close; + + M_End: + mes "[Lady Amy Beatris]"; + mes "Sure thing. See me when you're ready."; + close; + +} + + +//<------------------------------------------------------------------------------------------- Sir Edmund (5th Test) --------------------------------------------------------------------------------------------->\\ +prt_in.gat,70,99,5 script Sir Edmund 734, +{ + mes "[Sir Edmund]"; + if (class == Job_Knight) goto L_Knight; + if (class == Job_Swordman) goto L_Sword; + if (class == Job_Novice) goto L_Novice; +L_Other: + mes "Everything in this world exists in harmony."; + next; + mes "[Sir Edmund]"; + mes "Living without disrupting this harmony is the only true way to live your life...."; + close; +L_Novice: + mes "A tree with deep roots will not be swayed by the wind."; + next; + mes "[Sir Edmund]"; + mes "Skills rooted in a strong foundation will one day shine their light..."; + next; + mes "[Sir Edmund]"; + mes "You future will be decided by what you do now.... so strengthen those roots."; + close; + + mes "[Sir Edmund]"; + mes "People who wants to be on the dark side will always have nightmares"; + next; + mes "[Sir Edmund]"; + mes "If a person gets a nightmare everyday, all his dreams will be crushed..."; + close; + +L_Knight: + mes "Make your heart into a river."; + next; + mes "[Sir Edmund]"; + mes "A river will wash out everything in its path..."; + next; + mes "[Sir Edmund]"; + mes "As a knight you must walk your path like a flowing river."; + close; + +L_Sword: + if (KNIGHT_Q == 5) goto L_Test; + if (KNIGHT_Q == 6) goto L_Done; + mes "Those with ominous thoughts will only dream ominous dreams."; + next; + mes "[Sir Edmund]"; + mes "Having ominous dreams will result in no dreams at all...."; + close; +L_Test: + if(KNIGHT_Q2 == 1) goto L_ReTest; + if(KNIGHT_Q2 == 2) goto L_Done; + mes "Oh so its your turn to take my test."; + mes "I hope you can pass it"; + next; + mes "[Sir Edmund]"; + mes "My name is Edmund."; + mes "And iam a knight in the prontera Knight Guild."; + next; + mes "[Sir Edmund]"; + mes "Knights are like the people that keeps justice and peace in this world..."; + mes "If you can help people and be nice, you'll be one of the best knights in this world."; + next; + mes "[Sir Edmund]"; + mes "Your actions can't be slow, if you decide on something, you got to do it."; + mes "Sometimes you can be the water, Weak , but most time you got to be the wind, HARD."; + next; + mes "[Sir Edmund]"; + mes "You can't kill monsters because its fun."; + mes "And sometimes you'll need time to calm down..."; + next; + mes "[Sir Edmund]"; + mes "Okay lets start the test now."; + next; + warp "job_knt.gat",143,57; + doevent "ev_Test"; + end; + + L_ReTest: + mes "Last time when you did the test you didn't try hard enough."; + mes "A knights weapon should only be used to protect, not to bully weak monsters."; + next; + mes "[Sir Edmund]"; + mes "Everything in this world is equal, there shouldn't be any exceptions."; + mes "This point shouldn't be kept just when you have tests, it should be kept when you're training in real life..."; + next; + mes "[Sir Edmund]"; + mes "OKay now, try again."; + next; + warp "job_knt.gat",143,57; + doevent "ev_Test"; + end; + + L_Done: + mes "You have done very well to pass my test."; + next; + mes "[Sir Edmund]"; + mes "Remember that true strength comes from patience and understanding."; + next; + mes "[Sir Edmund]"; + mes "When you understand the world around you, you will be able to overcome any obstacle in life."; + next; + mes "[Sir Edmund]"; + mes "Go to the Chivalry Captain Herman and find out about your next challenge. Good luck."; + set KNIGHT_Q2,0; + set KNIGHT_Q,6; + close; +} + +// Test ----------------------------- +job_knt.gat,1,1,1 script ev_Test -1, +{ + killmonster "job_knt.gat","ev_Test::OnMyMobDead"; + monster "job_knt.gat",141,57,"Poring",1002,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",145,57,"Poring",1002,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",143,55,"Poring",1002,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",143,59,"Poring",1002,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",141,55,"Lunatic",1063,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",141,59,"Lunatic",1063,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",145,55,"Lunatic",1063,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",145,59,"Lunatic",1063,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",139,57,"Chonchon",1011,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",147,57,"Chonchon",1011,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",143,53,"Chonchon",1011,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",143,61,"Chonchon",1011,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",130,69,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",157,69,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",130,42,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",157,42,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",165,54,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",165,57,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",122,54,"Spore",1014,1,"ev_Test::OnMyMobDead"; + monster "job_knt.gat",122,57,"Spore",1014,1,"ev_Test::OnMyMobDead"; + + addtimer 240000, "ev_Test::OnTimerPass"; + end; + +OnTimerPass: + set KNIGHT_Q2, 2; + areaannounce "job_knt.gat", 124, 36, 163, 75, "[Sir Edmund]: Well done.",0; + addtimer 4000, "ev_Test::OnTimerWarp"; + end; + +OnMyMobDead: + set KNIGHT_Q2, 1; + areaannounce "job_knt.gat", 124, 36, 163, 75, "[Sir Edmund]: You are not at peace and therfore have failed my test.",0; + deltimer "ev_Test::OnTimerPass"; + addtimer 4000, "ev_Test::OnTimerWarp"; + end; + +OnTimerWarp: + if(KNIGHT_Q2 == 2) warp "prt_in.gat",80,100; + if(KNIGHT_Q2 == 1) warp "prt_fild05.gat",353,251; + end; +} + + +//<------------------------------------------------------------------------------------------ Sir Grey (Final Test) ------------------------------------------------------------------------------------------------------>\\ +prt_in.gat,87,90,3 script Sir Grey 119, +{ + mes "[Sir Grey]"; + if (class == Job_Knight) goto L_Knight; + if (class == Job_Novice) goto L_Novice; + if (class == Job_Swordman && KNIGHT_Q == 6) goto L_Test; + if (class == Job_Swordman && KNIGHT_Q == 7) mes "Go to Chivalry Captain Herman and allow him to bestow upon you the great honor of Knighthood."; + if (class == Job_Swordman && KNIGHT_Q == 7) close; +L_Other: + mes "Use your time wisely young one......"; + next; + mes "[Sir Grey]"; + mes "You don't want to end up regreting missed opportunities."; + close; +L_Novice: + mes "Believe it or not, I was once a Novice as well."; + next; + mes "[Sir Grey]"; + mes "Back then, I never dreamed about being a knight.... I just wanted to become a strong person....."; + next; + mes "[Sir Grey]"; + mes "And somehow after all these years, I ended up becoming one. Imagine that.... Hahaha."; + emotion 18; + close; +L_Knight: + mes "I don't know if I can even properly describe the ^00aa00Claymore^000000, but I know this... it's the greatest weapon a Knight can wield!!"; + next; + mes "[Sir Grey]"; + mes "Yes! The ^00aa00'Claymore'^000000!! Every knight should have one!"; + next; + menu "Info about the Claymore ",M_Info, "Buy the Claymore",M_Buy, "End talk",M_Cancel; + + M_Info: + mes "[Sir Grey]"; + mes "The Claymore is the best 2 handed sword a knight can get. Its like a knight's bestfriend."; + next; + mes "[Sir Grey]"; + mes "Our guild works very hard to make these beautiful Claymore swords and therefore deserves some compensation for their work."; + next; + mes "[Sir Grey]"; + mes "For the small fee of ^0000ff'74000 zeny'^000000 and ^0000ff'1 Steel '^000000, any Knight can get their hands on a Claymore."; + next; + mes "[Sir Grey]"; + mes "I'm in charge of selling them so if you would like one let me know."; + close; + + M_Buy: + if(countitem(999) < 1 || Zeny < 74000) goto L_NotEnough; + + mes "[Sir Grey]"; + mes "Good, you brought me the steel and have enough to cover the labor fee."; + next; + mes "[Sir Grey]"; + mes "Here you are! A magnificant weapon that is un-matched in quality and strength! I know you will use it well."; + delitem 999, 1; + set Zeny, Zeny - 74000; + getitem 1163, 1; + close; + + L_NotEnough: + mes "[Sir Grey]"; + mes "I know you want a claymore but you need to bring me ^0000ff'74000 zeny'^000000 and ^0000ff'1 Steel '^000000."; + next; + mes "[Sir Grey]"; + mes "When you get the steel and the money, come back and see me."; + close; + + M_Cancel: + mes "[Sir Grey]"; + mes "If your going to be a good knight, you'll need a claymore.."; + mes "I'll be glad to see you after your training..."; + close; + +L_ReTest: + mes "I see you're back. Have you spent enough time reflecting on Knighthood?"; + mes "I hope that you are now ready for this test."; + goto M_Menu; + +L_Test: + if (KNIGHT_Q2 == 1) goto L_ReTest; + mes "Haha, so you already finished all the other tests eh?"; + next; + mes "[Sir Grey]"; + mes "Okay then, lets start my test. Its not any different from the other ones."; +M_Menu: + next; + menu "Bring it on!",M_0, "Maybe a little later.",M_End; + + M_0: + set @score,0; + mes "[Sir Grey]"; + mes "Let me ask you a few questions."; + next; + + mes "[Sir Grey]"; + mes "First, why are you so determined to become a knight?"; + next; + menu "I want to be stronger.",sM_0, "I want to help the town.",sM_1, "Being a Swordsman sucks.",sM_2; + + sM_0: + mes "[Sir Grey]"; + mes "To become stronger huh.... It's true that becoming a knight does make you stronger but...."; + next; + mes "[Sir Grey]"; + mes "What would you do with that strength? Use it to help a town? Show it off to people? Or is there another reason?"; + next; + menu "Use it to make me rich$$.",sM_0a, "Use it to protect myself.",sM_0b, "Use it to protect other people.",sM_0c; + + sM_0a: + set @score, @score + 10; + mes "[Sir Grey]"; + mes "Money is important for a comfortable living, but a Knights strength can be used for more important things."; + goto L_Cont1; + + sM_0b: + mes "[Sir Grey]"; + mes "This is a very good idea. By first learning how to protect yourself, you will then be able to protect others."; + mes "I admire your thought very much."; + goto L_Cont1; + + sM_0c: + mes "[Sir Grey]"; + mes "It is a great idea to help others. We Knights pride ourselves on serving the public in anyway we can."; + goto L_Cont1; + + sM_1: + mes "[Sir Grey]"; + mes "I see. You have a very strong sense of community."; + next; + mes "[Sir Grey]"; + mes "With the power that comes with becoming Knight, what would you do to help the town?"; + next; + menu "Whatever the town needs me to do.",sM_1a, "I will help the town get rich.",sM_1b, "I will protect the citizens of the town.",sM_1c; + + sM_1a: + mes "[Sir Grey]"; + mes "Good. A Knight should always strive to help whatever the task."; + goto L_Cont1; + + sM_1b: + set @score, @score + 10; + mes "[Sir Grey]"; + mes "A town does need money to be prosperous, but that is not the most important thing a town needs."; + mes "As a Knight you can provide the town with protection and other valuable services."; + goto L_Cont1; + + sM_1c: + mes "[Sir Grey]"; + mes "A very noble idea indeed. Towns people are often ill equiped to protect themselves from monsters."; + mes "By providing them with protection, you can allow the towns people to live their lives peacefully."; + goto L_Cont1; + + sM_2: + set @score, @score + 5; + mes "[Sir Grey]"; + mes "Hmm... that's very interesting. Most people enjoy being a Swordsman."; + next; + mes "[Sir Grey]"; + mes "Well, what exactly don't you like about being a Swordsman?"; + next; + menu "The skills.",sM_2a, "Swordsman are weak.",sM_2b, "The hard work.",sM_2c; + + sM_2a: + set @score, @score + 5; + mes "[Sir Grey]"; + mes "A skill is only as good as the person who uses it. Different skills are used for different situations."; + next; + mes "[Sir Grey]"; + mes "If you have not figured out how to effectively use the Swordsman's skills by now, how do you expect to be able to use a Knight's skills?"; + goto L_Cont1; + + sM_2b: + set @score, @score - 5; + mes "[Sir Grey]"; + mes "What? Swordsman are the strongest of the 1st job classes. A Knight's strength is the progression of a Swordsman's strength."; + next; + mes "[Sir Grey]"; + mes "If you are a weak Swordsman, I can garauntee that you will be a weak Knight."; + goto L_Cont1; + + sM_2c: + set @score, @score + 5; + mes "[Sir Grey]"; + mes "Hahaha!. If you think it gets any easier as a Knight you're sadly mistaken my friend."; + mes "With the added skills and strength a Knight gets, comes added challenges."; + goto L_Cont1; + + L_Cont1: + next; + mes "[Sir Grey]"; + mes "Just a reminder, when you become a Knight you will NOT be able to change back into a Swordsman."; + next; + mes "[Sir Grey]"; + mes "If you were to become a Knight right now, what would be the first thing you would do?"; + next; + menu "I would go into battle.",sM_3, "Go back to the person who's waiting for me.",sM_4, "Learn more about Knights.",sM_5; + + sM_3: + mes "[Sir Grey]"; + mes "Okay... so you would battle and in doing so you would....."; + next; + menu "... become the strongest warrior.",sM_3a, "... find out how good I am.",sM_3b, "... go places where Swordsmen can't.",sM_3c; + + sM_3a: + set @score, @score + 10; + mes "[Sir Grey]"; + mes "Hold on there tiger. Don't get too eager now. You have to get the basics of Knighthood down first."; + mes "Without it you may become the weakest warrior around."; + goto L_Cont2; + + sM_3b: + mes "[Sir Grey]"; + mes "Yes! Understanding your strengths and weaknesses is a very important aspect of being a Knight."; + goto L_Cont2; + + sM_3c: + mes "[Sir Grey]"; + mes "As a Knight you will be able to train in places you couldn't as a Swordsman."; + mes "But becarefull. If you move to fast you may find yourself in a world of trouble."; + goto L_Cont2; + + sM_4: + mes "[Sir Grey]"; + mes "Who's waiting for you?"; + next; + menu "A friend.",sM_4a, "A Villager.",sM_4b, "My girlfriend/boyfriend.",sM_4c; + + sM_4a: + mes "[Sir Grey]"; + mes "Yes, he/she will be happy to see you. Now you will be able to protect your freind when he/she is in danger."; + goto L_Cont2; + + sM_4b: + mes "[Sir Grey]"; + mes "A villager...... oh... "; + goto L_Cont2; + + sM_4c: + mes "[Sir Grey]"; + mes "Oh I see! Did you become a knight because of your this person?"; + next; + mes "[Sir Grey]"; + if(sex == 1) mes "I hope you will be able to protect her anytime and anywhere!"; + if(sex == 0) mes "I hope you will be able to protect him anytime and anywhere!"; + next; + mes "[Sir Grey]"; + mes "Good luck to you and your loved one."; + goto L_Cont2; + + sM_5: + mes "[Sir Grey]"; + mes "What else do you want to know?"; + next; + menu "The safest place for a Knight to be.",sM_5a, "A place where a knight can train.",sM_5b, "A place where a knight can earn a lot of cash.",sM_5c; + + sM_5a: + set @score, @score + 5; + mes "[Sir Grey]"; + mes "There's no place in this world thats truly safe. Especially for a Knight."; + mes "A Knight is always expected to fight the strongest and most fearsome monsters"; + goto L_Cont2; + + sM_5b: + mes "[Sir Grey]"; + mes "Ask other Knights around Rune-Midgard for advice. You're sure to get some good tips."; + goto L_Cont2; + + sM_5c: + set @score, @score + 15; + mes "[Sir Grey]"; + mes "The role of a Knight is NOT to make lots and lots of money! A Knight has the duty to serve and protect the citizens of Rune-Midgard."; + + L_Cont2: + next; + mes "[Sir Grey]"; + mes "Well that's it. This is the end of my test and the final test in your quest to become a Knight."; + mes "Let me now give you my decision....."; + next; + + if (@score == 0) goto L_1; + if (@score == 5) goto L_2; + if (@score == 10) goto L_3; + + L_0: + set KNIGHT_Q2, 1; + mes "[Sir Grey]"; + mes "Although I enjoyed speaking with you today....."; + next; + mes "[Sir Grey]"; + mes "I'm afraid that you are not ready for Knighthood."; + mes "I think it would be best for you to stay a Swordman for the time being."; + next; + mes "[Sir Grey]"; + mes "Being a Knight requires not only strength, but discipline and ethical values as well."; + mes "A Knight has the duty to protect and help others therefore he/she must be of sound mind and body."; + next; + mes "[Sir Grey]"; + mes "Your answers did not seem to represent the type of attributes we look for in a Knight candidate."; + next; + mes "[Sir Grey]"; + mes "If you really want to become a Knight, I suggest you spend some more time contemplating the idea then come back to me."; + close; + + L_1: + set KNIGHT_Q, 7; + set KNIGHT_Q2, 0; + mes "[Sir Grey]"; + mes "I am glad that I got a chance to speak with someone such as yourself. You remind me of myself when i was young. Heh heh heh."; + next; + mes "[Sir Grey]"; + mes "More importantly...., CONGRATULATIONS!"; + next; + mes "[Sir Grey]"; + mes "You have done an exellent job to make it this far and your answers proved that you are worthy of Knighthood."; + next; + mes "[Sir Grey]"; + mes "You will make a fine Knight! Go to the Chivalry Captain Herman and allow him to bestow upon you the great honor of Knighthood."; + close; + + L_2: + set KNIGHT_Q, 7; + set KNIGHT_Q2, 0; + mes "[Sir Grey]"; + mes "It was nice to talk to you. As a Knight, I expect that you will expand your mind and fullfill your potential."; + next; + mes "[Sir Grey]"; + mes "That's right. You have passed my test and are now ready to be Knighted. Congratulations!"; + next; + mes "[Sir Grey]"; + mes "Now go to Chivalry Captain Herman and allow him to bestow upon you the great honor of Knighthood."; + close; + + L_3: + set KNIGHT_Q, 7; + set KNIGHT_Q2, 0; + mes "[Sir Grey]"; + mes "Although I appreciate your candir in answering my questions, to be honest, I am a bit worried about what I heard."; + next; + mes "[Sir Grey]"; + mes "Still, you seem to have enough attributes that are consistent with what we are looking for in a Knight candidate."; + next; + mes "[Sir Grey]"; + mes "I'm sure with hard work and dedication you will make a fine Knight. Congratulations! You have passed my test."; + next; + mes "[Sir Grey]"; + mes "Now go to Chivalry Captain Herman and allow him to bestow upon you the great honor of Knighthood."; + close; + + M_End: + close; + +} \ No newline at end of file diff --git a/npc/jobs/2-1/priest.txt b/npc/jobs/2-1/priest.txt new file mode 100644 index 000000000..53a3841db --- /dev/null +++ b/npc/jobs/2-1/priest.txt @@ -0,0 +1,1430 @@ +//===== eAthena Script ======================================= +//= Priest Quest +//===== By: ================================================== +//= Translated By: Pgro Team (OwNaGe)(Aegis) +//= Converted by: kobra_k88. +//= Further bugfixed and tested by Lupus +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Official RO Priest Quest converted from Aegis script. +//===== Additional Comments: ================================= +//= Fully working. Changed the way Priests enter the test room to help Acos. +//= Must use this with the included Acolyte quest to work properely. +//= v1.1 Rollback from the wrong Kashy's fix +========================================================== + + + + + +//*********************************************************************************************************************************************************************************\\ +//============================================ Father Thomas: Job changer, Test 1 =============================================\\ +//*********************************************************************************************************************************************************************************\\ +prt_church.gat,16,41,4 script Father Thomas 60, +{ + mes "[Father Thomas]"; + if (class == Job_Novice) goto L_Novice; + if (class == Job_Priest) goto L_Priest; + if (class == Job_Acolyte) goto L_Start; + +L_Other: + mes "May God bless you my child."; + next; + mes "[Father Thomas]"; + mes "Please feel free to rest, the church is the safest place in this world."; + next; + mes "[Father Thomas]"; + mes "I hope god will bless you."; + close; + +L_Novice: + mes "May God bless you, child. This is the Prontera Church. What are you here for?"; + next; + menu "I want to become an acolyote.",M_0a, "I want to become a ^5533FFPriest^000000.",M_0b, "Iam just walking around.",M_0End; + + M_0a: + mes "[Father Thomas]"; + mes "Haha.. so you want to become an Acolyote eh? To apply to become an Acolyote, please go to the room opposite of here."; + close; + M_0b: + mes "[Father Thomas]"; + mes "Haha...in order to become a priest you must first become an Acolyote. To become an Acolyote, go to the room opposite of here."; + close; + M_0End: + mes "[Father Thomas]"; + mes "Please feel free to rest here. The church is a sanctuary for all those, who seek to escape the outside world."; + next; + mes "[Father Thomas]"; + mes "May God be with you in your thoughts and prayers."; + close; + +L_Priest: + mes "God bless you, child. You are here again because you listened to god's orders."; + next; + mes "[Father Thomas]"; + mes "I don't know if God's sons and daughters are going on the path of light or the path of darkness... I can only pray for the best."; + next; + mes "[Father Thomas]"; + mes "So why are you here today?"; + next; + menu "I just wanted to see how you were.",M_1a, "I am here to help the Acolytes.",M_1b, "Life is really hard... I was wondering if you could help.",M_1End; + + M_1a: + mes "[Father Thomas]"; + mes "Oh, well I am fine thank you. Please send my regards to all of the other Priests, and Priestess."; + next; + mes "[Father Thomas]"; + mes "We, the ones who follow the devine path, are here for one reason.... to obey Gods orders."; + mes "If you come across anyone who needs help, please remember to assist them in any way you can..."; + close; + + M_1b: + mes "[Father Thomas]"; + mes "Oh...thats a great idea! Since you're a priest, you can't forget that you have to help the Acolytes when they need it."; + emotion 5; + next; + mes "[Father Thomas]"; + mes "Even so, you must be carefull not to do everyting for them. It is important that they gain their own experiences through training "; + next; + mes "[Father Thomas]"; + mes "In order to go in and help you'll need a ^5533FFROSARY^000000."; + mes "There will be 3 trials for the Acolyte to face, but in only 2 of them will your assistance be needed."; + next; + mes "[Father Thomas]"; + mes "Are you prepared to help?"; + next; + menu "Yes, i will help them with all my might.",sM_1a, "I will come back later.",sM_1End; + + sM_1a: + if (countitem(2608) < 1) goto sL_NoRosary; + mes "[Father Thomas]"; + mes "Very well then. I will send you to an Acolyte in just a moment."; + next; + mes "[Father Thomas]"; + mes "I hope you will also take this opportunity to teach them what it means to be a good Priest."; + next; + if((getareausers("job_prist.gat", 8, 34, 39,109)) == 1) warp "job_prist.gat", 24, 44; + if((getareausers("job_prist.gat", 160, 14, 175, 178)) == 1) warp "job_prist.gat", 98, 40; + if((getareausers("job_prist.gat", 90, 34, 105,105)) == 1) warp "job_prist.gat", 168, 17; + mes "[Father Thomas]"; + mes "Hmm........ wait a minute..... let me check my list.... Either no one is taking the test right now, or another Priest is already helping out."; + mes "In any case please check with me again later."; + close; + + sL_NoRosary: + mes "[Father Thomas]"; + mes "Hmm... it doesn't look like you have a ^5533FFROSARY^000000 with you."; + next; + mes "[Father Thomas]"; + mes "If you want to help the Acolytes, you must first get a ^5533FFROSARY^000000."; + mes "Please come back when you have one."; + close; + sM_1End: + mes "[Father Thomas]"; + mes "Oh, alright. Just remember to bring a ^5533FFFROSARY^000000 when you come back."; + close; + + M_1End: + mes "[Father Thomas]"; + mes "Keep up the good work. I will ask God to ease your pain."; + next; + mes "[Father Thomas]"; + mes "God, one of your children is suffering. Please use your powers, to heal the wounds on this battered body....."; + next; + mes "[Father Thomas]"; + mes "Please look after us, so that under any condition we will be able to think clearly and maintain our faith"; + percentheal 100,100; + next; + mes "[Father Thomas]"; + mes "You should be feeling better now. Please stay on the path to rightousness and may God bless you."; + close; + + +L_Start: + if (PRIEST_Q == 1) goto L_Test1; + if (PRIEST_Q == 2) goto L_Test2; + if (PRIEST_Q == 3) goto L_Test3; + if (PRIEST_Q == 4) goto L_Change; + mes "God bless you, child. What brings you here?"; + next; + menu "I want to become a priest.",M_2a, "Can you please tell me about Priests.",M_2b, "I just wanted to see how you were doing.",M_2End; + + M_2a: + mes "[Father Thomas]"; + mes "Oh... so you want to become a priest? God bless you for your determination."; + next; + mes "[Father Thomas]"; + mes "I am Father Thomas. I am in charge of protecting Prontera from the evil spirits that plague the lands of Rune Midgard."; + next; + mes "[Father Thomas]"; + mes "Please fill out this application form so that I can review your qualifications for becoming a Preist."; + next; + mes "(you fill out the form and hand it back)"; + next; + mes "[Father Thomas]"; + if (JobLevel < 40) goto sL_LowLvl; + if (JobLevel == 50) goto sL_HighLvl; + mes "Ah, very good " + strcharinfo(0) + ". Let me now tell you about the tasks you will have to fullfill in order to become a Priest."; + next; + mes "[Father Thomas]"; + mes "The first task will be to find and speak with 3 very wise Clerics. They are located in various parts of Rune Midgard."; + next; + mes "[Father Thomas]"; + mes "The second task will consist of 3 trials. In the first trial you must face the undead."; + mes "The second trial will test your ability to resist temptation and avoid corruption. The third trial you will have to figure out for yourself."; + next; + mes "[Father Thomas]"; + mes "After you finish the 2 tasks, there will be a final test with Sister Cecile. Pass it and you can become a Priest."; + next; + mes "[Father Thomas]"; + set JBLVL, 40; + goto L_Test1; + + sL_LowLvl: + mes "I am sorry but you cannot become a Priest at this moment. You need to have a job level of at least 40."; + next; + mes "[Father Thomas]"; + mes "Please strengthen your faith in God by performing more good deeds."; + mes "I hope when the time is right, you'll be back... I will be waiting for you here."; + close; + + sL_HighLvl: + mes "Wow, your already at job lvl 50. I am amazed at your dedication and hard work!"; + emotion 0; + next; + mes "[Father Thomas]"; + mes "Because of this I will allow you to skip the first task. How about we start the second task instead?"; + next; + mes "[Father Thomas]"; + mes "I believe with your power, you can overcome this task easily..."; + mes "But if you work with a Priest, i think you will learn more and do a lot better."; + next; + mes "[Father Thomas]"; + set PRIEST_Q, 2; + set JBLVL, 50; + goto L_Test2; + M_2b: + mes "[Father Thomas]"; + mes "Priests are also followers of God. They are highly trained and are much more powerful than Acolytes."; + next; + mes "[Father Thomas]"; + mes "To become a priest, you must have at least a job lvl 40. You will then have to pass a series of tests in order to prove yourself."; + next; + mes "[Father Thomas]"; + mes "If you become a Priest, you will become very important to evey other job class."; + next; + mes "[Father Thomas]"; + mes "You must NEVER help someone for any sort of profit or self gain. To be a Priest is to be selfless."; + next; + mes "[Father Thomas]"; + mes "We Priest have only one objective, and that is to help others..."; + close; + M_2End: + mes "[Father Thomas]"; + mes "Oh is that the case?... Well I am fine thank you."; + mes "Please don't forget your duties as an Acolyte, and be carefull not to stray off the path to salvation."; + next; + mes "[Father Thomas]"; + mes "I hope you will visit again soon, and please tell me how the other Acolytes are doing. May god be by your side..."; + close; + + + +L_Test1: + if (PRIEST_Q2 == 1) goto L_NotDone1a; + if (PRIEST_Q2 == 2) goto L_NotDone1b; + if (PRIEST_Q2 == 3) goto L_NotDone1c; + if (PRIEST_Q2 == 4) goto L_Done1; + mes "Okay, let me tell you what you have to do for the first task."; + next; + mes "[Father Thomas]"; + mes "First you will have to find ^5533FFFather Rubalkubara^000000, he is located 1 map North and 2 maps East of Prontera, near St. Capitolina Abbey."; + next; + mes "[Father Thomas]"; + mes "Next you will have to find ^5533FFMother Matilda^000000. She is located somewhere 1 map North of Morroc."; + next; + mes "[Father Thomas]"; + mes "Last but not least, you will have to find ^5533FFFather Yosuke^000000."; + mes "I heard that Father Yosuke is often seen on an tiny island 2 maps West and 1 map North of Prontera."; + next; + mes "[Father Thomas]"; + mes "Please becareful on your journey. If you have any questions you may speak with me again."; + mes "Remeber to check back with me when you have completed the first task."; + next; + mes "[Father Thomas]"; + mes "May God Be with you..."; + set PRIEST_Q, 1; + set PRIEST_Q2, 1; + close; + + L_NotDone1a: + mes "What? Why are you still here? Did you forget the first task?"; + next; + menu "Yes, can you please tell me about the first task again?",sM_3a, "NO! how can I forget.",sM_3End; + + sM_3a: + mes "[Father Thomas]"; + mes "Hmm... if you're having trouble with this task, I fear that you will have an even harder time with the others...."; + next; + mes "[Father Thomas]"; + mes "Please visit ^5533FFFather Rubalkubara^000000. He is located 1 map North and 2 maps East of Prontera near St. Capitolina Abbey."; + close; + + sM_3End: + mes "[Father Thomas]"; + mes "Oh if you have any questions, please speak with Sister Cecila near the entrance."; + next; + mes "[Father Thomas]"; + mes "Please hurry and becareful on your journey. May the lord look down and smile upon you...."; + close; + L_NotDone1b: + mes "Hmmm??"; + emotion 1; + next; + mes "[Father Thomas]"; + mes "Have you gone to see ^5533FFMother Marthilda^000000 yet? She can be found near Morroc in the Sogart Desert."; + mes "Even though Morroc is far away, I know you will be able to find her."; + close; + + L_NotDone1c: + mes "Have you seen Mother Marthilda in Morroc? In that case you must now go see ^5533FFFather Yosuke^000000."; + mes "He is located on tiny island 2 maps West and 1 map North of Prontera. You must go and speak with him!."; + close; + + L_Done1: + mes "So you spoken with all of the Clerics? Good job, you just completed the first task."; + next; + mes "[Father Thomas]"; + mes "Now lets start the second task. Be prepared to face great evils.. If you want, you can ask a Priest to assist you with this test."; + set PRIEST_Q, 2; + set PRIEST_Q2, 0; + next; + mes "[Father Thomas]"; + +L_Test2: + if(PRIEST_Q2 == 1) goto L_ReTest2; + if(PRIEST_Q2 == 2) goto L_Done2; + mes "So are you ready to start the second task?"; + M_Menu: + next; + menu "Yes, lets start.",M_4a, "Let me get ready, i'll be back later.",M_4End; + + M_4a: + mes "[Father Thomas]"; + mes "Very well. Let me send you to ^5544FFFather Peter^000000. Once there speak to him about the second task."; + next; + set PRIEST_Q2, 1; + warp "job_prist.gat", 24, 180; + savepoint "prt_church.gat", 16, 37; + end; + + M_4End: + mes "[Father Thomas]"; + mes "Okay, please get ready and come back soon. I hope you will be able to make it through the trials without many problems."; + close; + + L_ReTest2: + mes "You look really tired... but guess what, you'll be even more tired when you've become a Priest."; + mes "Please don't give up. Do you want to try the task again?"; + goto M_Menu; + + L_Done2: + mes "Great job. If have endured all of the trials and have passed the second test."; + mes "If you can pass the last test, I trully belive that you will be one of the best Priests ever!"; + next; + mes "[Father Thomas]"; + mes "Now, for the final test, please go speak with ^5533FFSister Cecile^000000. Once you have passed it come see me."; + next; + mes "[Father Thomas]"; + mes "I'll be waiting here. Good luck my child."; + set PRIEST_Q, 3; + set PRIEST_Q2, 0; + close; + +L_Test3: + mes "Go speak with ^5533FFSister Cecile^000000 and complete the last test."; + next; + mes "[Father Thomas]"; + mes "Good luck. I'll be waiting to hear the good news.."; + close; + + +L_Change: + if (SkillPoint > 0) mes "Wait. You must use up your skill points in order to become a Priest."; + if (SkillPoint > 0) close; + mes "Congratulations! You have just completed all of the tests. I can now turn you into a Priest."; + emotion 21; + next; + mes "[Father Thomas]"; + mes "God, please endow "+strcharinfo(0)+" with the strength and courage to fight evil and help mankind."; + next; + jobchange Job_Priest; + mes "[Father Thomas]"; + mes "You are now a Priest. As a Priest, you can now help a lot of people in the name of God."; + next; + if (JBLVL == 40) getitem 1550, 1; + if (JBLVL == 50) getitem 1551, 1; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + mes "[Father Thomas]"; + mes "Here, take this book as a reward for successfully completing the tests. This book will help you understand more about god."; + next; + mes "[Father Thomas]"; + mes "I hope you can help serve as a role model for young Acolytes all over Rune Midgard."; + mes "Please be a good Priest and help bring peace to this world!"; + close; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------------\\ +// Test 1 \\ +//********************************************************************************************************************************\\ +// Function: Father Rubalkabara -------------------------------------------------------------------------- +function script F_FatherRub { + if(PRIEST_Q == 1 && PRIEST_Q2==1) goto L_Test; + if(PRIEST_Q==1 && PRIEST_Q2 > 1) goto L_Done; + mes "It's good to see you again. I expect all is well? Continue on your path of helping others and serving God, and let us pray for humanities salvation."; + close; + +L_Test: + mes "Ah hello there...."; + next; + mes "[Father Rubalkabara]"; + mes "What's this? You're here because you wish to serve God in an even greater capacity?"; + emotion 1; + next; + menu "Yes, I believe Priesthood is the right path.",-, "No, not really.... just came to say hi.",M_No; + + mes "[Father Rubalkabara]"; + mes "Haha! Very good. We need more people like yourself in order for this world to survive the evils that haunt it."; + emotion 21; + next; + mes "[Father Rubalkabara]"; + mes "Because of your pure heart I will give you my blessing child. Please meet with ^5533FFMother Marthilda^000000 next."; + next; + mes "[Father Rubalkabara]"; + mes "You can find her in the map just north of the town of Morroc. Have a safe journey and good luck on becoming a Priest."; + set PRIEST_Q2, 2; + close; + M_No: + mes "[Father Rubalkabara]"; + mes "Oh... well then... hello to you too. Although it is nice to see a servant of God such as yourself, I'm a little busy right now so if you don't mind....."; + emotion 4; + close; + +L_Done: + mes "Please see ^5533FFMother Marthilda^000000 next. Good luck with your journey to becoming a Priest"; + close; +} + +// Function: Mother Marthilda -------------------------------------------------------------------------- +function script F_MotherMart { + + if(PRIEST_Q==1 && PRIEST_Q2==2) goto L_Test; + if(PRIEST_Q==1 && PRIEST_Q2 > 2) goto L_Done; + mes "Oh my... It's been a while since I've seen you. My how you've grown. It's nice to see one of God servants continuing to improve."; + mes "I wish you continued success child, and always remember to have faith."; + close; + +L_Test: + mes "Ah, you're here for the Priest test aren't you? I must say, you did a very good job in comming all this way."; + next; + mes "[Mother Marthilda]"; + mes "That shows that you have true faith! It is my pleasure to allow you to continue on with your test."; + next; + mes "[Mother Marthilda]"; + mes "You must now go see ^5533FFFather Yosuke^000000. He is 1 map North and 2 maps East of Prontera. I'm sure you will make a fine Priest!"; + set PRIEST_Q2, 3; + close; + +L_Done: + mes "To complete your task you must go find ^5533FFFather Yosuke^000000. Please be carefull and remeber to pray."; + close; +} + +// Function: Father Yosuke -------------------------------------------------------------------------- +function script F_FatherYos { + + if(PRIEST_Q==1 && PRIEST_Q2==3) goto L_Test; + if(PRIEST_Q==1 && PRIEST_Q2==4) goto L_Done; + mes "Just because you're a servant of God doesn't mean you can come here and bother me. Please leave..."; + close; + +L_Test: + mes "Hmm...? Did you need something? Oh the Priest test..... are you sure you're up for that?"; + emotion 1; + next; + mes "[Father Yosuke]"; + mes "Meh, very well. I will let you pass. Go back to the church and speak with Father Thomas. Your duty here as been fulfilled"; + set PRIEST_Q2, 4; + close; + +L_Done: + mes "Ugh? What are you still doing here...? I said to go back to the church.... I'm very busy right now...."; + emotion 1; + close; +} + + +//**********************************************************************************************************************************************************************************\\ +//================================================== Father Peter: Test 2 ====================================================\\ +//**********************************************************************************************************************************************************************************\\ +job_prist.gat,24,186,4 script Father Peter 110,{ + +L_Start: + mes "[Father Peter]"; + mes "God bless you!! Welcome back!"; + mes "First i want to congratulated you for passing the first level."; + next; + mes "[Father Peter]"; + mes "My name is Peter."; + mes "Hows, Thomas these days?"; + next; + mes "[Father Peter]"; + mes "Oh, so he's a father now eh? hahah..."; + mes "I think i should call him Father Thomas!"; + next; + mes "[Father Peter]"; + mes "So you know why your here right? Your next test will be to overcome a series of trials involving the darkest of evils."; + mes "Do you understand what this means?"; + next; + menu "Yes, I do.",-, "No, i don't quiet know it..?",M_1b; + + mes "[Father Peter]"; + mes "Wow, your' pretty smart, but i think its better for you to listen to the things i got to say."; + mes "heheh!"; + goto L_Cont; + M_1b: + mes "[Father Peter]"; + mes "Oh, is that so, i think i'll need to explain it to you."; + mes "After listening to what i have to say, i think you'll understand."; + next; + + L_Cont: + mes "[Father Peter]"; + mes "What is overcoming evil? its basically destroying it."; + mes "What is evil? its basically devil, ghosts etc..."; + next; + mes "[Father Peter]"; + mes "There's a lot of evil in this world."; + mes "The evil usually tease people that prey to god."; + next; + mes "[Father Peter]"; + mes "We priests are supposed to get rid of all the evil!"; + mes "thats the only way we can bring peace to this world!"; + next; + mes "[Father Peter]"; + mes "If you are trully dedicated, then these trials should not pose that great of a challenge."; + mes "Even so, I you feel it necessary you may ask a Priest to assist you in this test."; + next; + mes "[Father Peter]"; + mes "Well, can we start now?"; + M_Menu: + next; + menu "Yes.",M_2a, "Wait a minute.",M_2b, "I want to go back to town.",M_2c; + + M_2a: + mes "[Father Peter]"; + mes "Okay, just enter the waiting room."; + close; + + M_2b: + mes "[Father Peter]"; + mes "Oh you need to get ready eh?"; + mes "No problem you can start the quest when your ready."; + close; + M_2c: + mes "[Father Peter]"; + mes "What? you want to go back? but you just arrived?"; + mes "....."; + next; + mes "[Father Peter]"; + mes "Maybe because its your first time thats why your scared."; + mes "You can come back when you get more courage."; + next; + warp "prt_church.gat", 16, 37; + close; + +OnInit: + waitingroom "Priest Test Waiting Room",8,"Father Peter::OnStart",1; + end; +OnStart: + set $@PrstUsers, getareausers("job_prist.gat", 8, 34, 39,109); + set $@PrstUsers, $@PrstUsers + getareausers("job_prist.gat", 160, 14, 175, 178); + set $@PrstUsers, $@PrstUsers + getareausers("job_prist.gat", 90, 34, 105,105); + if($@PrstUsers > 0) end; // stops the rest of the script from running if there is already another player taking the test + + if((getwaitingroomstate(33)) == 0) end; // stops the rest of the script from running if there is no one in the waiting room + disablenpc "prst1_1"; //disables the exit warp + disablenpc "prst2_1"; + warpwaitingpc "job_prist.gat", 24, 44; + killmonsterall "job_prist.gat"; + donpcevent "PrstTest2_1"; + end; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------------\\ +// Test 2, Part 1: Kill the Zombies \\ +//********************************************************************************************************************************\\ +job_prist.gat,1,1,1 script PrstTest2_1 -1,{ + set $@PrstRm, 1; //used to determine what areawarp and areaannounce to use + enablenpc "Zombie1_Trig"; + enablenpc "Zombie2_Trig"; + enablenpc "Zombie3_Trig"; + enablenpc "Zombie4_Trig"; + enablenpc "Zombie5_Trig"; + set $@mob, 13; + initnpctimer; + end; + +OnMobDead: + set $@mob, $@mob - 1; + if($@mob > 0) end; + + enablenpc "prst1_1"; + areaannounce "job_prist.gat",8,34,39,109,"[Father Peter]: Well done my child. Enter the warp to start the next test.",8; + initnpctimer "prst1_1"; //starts a 30 sec timer. this will warp the player even if they don't enter the warp to keep the test going + end; + +OnTimer500: + areaannounce "job_prist.gat",8,34,39,109,"[Father Peter]: In order to pass this trial, you will have to kill all of the zomibes that appear.",8; + end; +OnTimer2500: + stopnpctimer; + initnpctimer "TimerPrst"; // starts the 5 min test timer + areaannounce "job_prist.gat",8,34,39,109,"[Father Peter]: Move slowly and take your time.",8; + end; +} + +// These hidden warps spawn the monsters when you walk +// First set of Zombies------------------------------------------------------------ +job_prist.gat,23,52,1 script Zombie1_Trig 139,16,0,{ + + monster "job_prist.gat",24,52,"Robbery",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",18,52,"Evilness",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",30,52,"Jealousy",1015,1,"PrstTest2_1::OnMobDead"; + disablenpc "Zombie1_Trig"; //disables the npc so that it can't spawn the monsters more than once + end; +} + +// Second set of Zombies---------------------------------------------------- +job_prist.gat,23,62,1 script Zombie2_Trig 139,16,0,{ + + monster "job_prist.gat",21,62,"Anger",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",27,62,"Wonderness",1015,1,"PrstTest2_1::OnMobDead"; + disablenpc "Zombie2_Trig"; + end; +} + +// Third set of Zombies-------------------------------------------------------- +job_prist.gat,23,72,1 script Zombie3_Trig 139,16,0,{ + + monster "job_prist.gat",24,72,"Cockyness",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",18,72,"Slutty",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",30,72,"Lazyness",1015,1,"PrstTest2_1::OnMobDead"; + disablenpc "Zombie3_Trig"; + end; +} + +// Fourth set of Zombies-------------------------------------------------------- +job_prist.gat,23,82,1 script Zombie4_Trig 139,16,0,{ + + monster "job_prist.gat",21,82,"Greed",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",27,82,"Greedyness",1015,1,"PrstTest2_1::OnMobDead"; + disablenpc "Zombie4_Trig"; + end; +} + +// Fifth set of Zombies --------------------------------------------------------- +job_prist.gat,23,92,1 script Zombie5_Trig 139,16,0,{ + + monster "job_prist.gat",24,92,"Faithless",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",18,92,"Non-believer",1015,1,"PrstTest2_1::OnMobDead"; + monster "job_prist.gat",30,92,"Scaryness",1015,1,"PrstTest2_1::OnMobDead"; + disablenpc "Zombie5_Trig"; + end; +} + + +// End warp for 1st part of test-------------------------------------------------------------------- +job_prist.gat,24,109,1 script prst1_1 45,3,3,{ + + if(class == Priest) end; //If a Priest friend steps on the warp nothing happens. Need the aco to step on the warp. +OnTimer30000: + stopnpctimer; + areawarp "job_prist.gat",8,34,39,109,"job_prist.gat",168,17; + killmonsterall "job_prist.gat"; + donpcevent "PrstTest2_2::OnStart"; + end; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------------\\ +// Test 2, Part 1: Resist Temptation \\ +//********************************************************************************************************************************\\ +job_prist.gat,1,1,0 script PrstTest2_2 -1,{ + +OnStart: + enablenpc "Devi_Trig"; //enables these npc's just in case they were disabled by a previous tester + enablenpc "Deviruchi"; + enablenpc "Doppel_Trig"; + enablenpc "Doppel"; + enablenpc "Dark_Trig"; + enablenpc "Dark Lord"; + enablenpc "Bapho_Trig"; + enablenpc "Baphomet"; + set $@PrstRm, 2; + set $PRIEST_Q3, 0; + initnpctimer; + end; + +OnCheck: + set $PRIEST_Q3, $PRIEST_Q3 + 1; //this counter checks to see if the player spoke with each devil and answered the questions + if($PRIEST_Q3 < 4) end; + + enablenpc "prst2_1"; + areaannounce "job_prist.gat", 160, 14, 175, 178, "[Father Peter]: Excellent! You have shown great courage! Use the warp to move on to the next room.",8; + initnpctimer "prst2_1"; //starts a 30 sec timer. this will warp the player even if they don't enter the warp to keep the test going + end; + +OnTimer500: + stopnpctimer; + areaannounce "job_prist.gat", 160, 14, 175, 178, "[Father Peter]: This trial will test the strength of your will and your commitment to God!",8; + end; + +} + + +// Deviruchi ------------------------------------------------------------------------ +job_prist.gat,168,45,4 script Deviruchi 738,{ + +OnStart: + if(class == Job_Acolyte) goto L_Aco; + +L_Priest: + mes "[Deviruchi]"; + mes "Hey, whats priest like you doing in a place like this? go back to town. You like wasting you time here eh?"; + next; + mes "[Deviruchi]"; + mes "I feel happy today, so i'll spare you, now go. Next time you come, iam gonna take to you down."; + close; + +L_Aco: + mes "[Deviruchi]"; + mes "Hey, isn't that a acolyte? i haven't seen one in ages. Looks like you're going to become a priest soon..."; + next; + mes "[Deviruchi]"; + mes "I can tell how sad it is to become a servant of god. I think its weird that you're here."; + next; + mes "[Deviruchi]"; + mes "The path your walking is going to be difficult. Isn't there better jobs you can be?"; + next; + mes "[Deviruchi]"; + mes "Doesn't matter if its in a town, in a cave, all the people always asks you to help them. Itsn't funny that they never helped you?"; + next; + mes "[Deviruchi]"; + mes "I'll give you an advice, you should give up now. The tests will be hard, and the path you're gonna walk will be difficult."; + next; + menu "Yea, Iam going to give up.",-, "Devil, Be gone NOW!.",M_1a; + + mes "[Deviruchi]"; + mes "Yeap thats a good choice, you don't have to come to this place again! Since you decided to give up, i'll give you a present."; + next; + mes "[Deviruchi]"; + mes "I'll let you meet my friends...FOR FREE HAHAHAHAH!"; + next; + warp "c_tower2.gat", 168, 33; + end; + M_1a: + mes "[Deviruchi]"; + mes "Oh.. Iam so scared..hahaha. Don't be like this, listen to what i have to say."; + next; + mes "[Deviruchi]"; + mes "If you give up now, i'll give you a nice gift. This gift is so hard to find."; + next; + //showimage "¹Ì½ºÆ®·¹½ºÄ«µå.bmp" 4; + mes "[Deviruchi]"; + mes "Do you think you can find a card like that? Decide now, don't regret when you become a priest..."; + next; + menu "I accept your card.",-, "Devil, Be GONE!!",sM_1a; + + mes "[Deviruchi]"; + mes "Hahaha all the human beings are like this, good choice! Okay, let me give you this card!"; + next; + //showimage "¹Ì½ºÆ®·¹½ºÄ«µå.bmp" 255 + mes "[Deviruchi]"; + mes "Well, too bad i can't give it to you. Go look for it YOURSELF!"; + next; + warp "mjolnir_05.gat", 200, 200; + end; + sM_1a: + //showimage "¹Ì½ºÆ®·¹½ºÄ«µå.bmp" 255 + mes "[Deviruchi]"; + mes "Wow, your one tough acolyte, if you keep denying you better becareful."; + mes "I will be watching, I'll see if you can become a good priest or not."; + next; + mes "[Deviruchi]"; + mes "One day, you'll regret and want to come back to me!"; + disablenpc "Devi_Trig"; //disables the trigger npc so you don't accidentally activate it again + disablenpc "Deviruchi"; + donpcevent "PrstTest2_2::OnCheck"; + close; +} + +// Doppelganger ------------------------------------------------------------------------------ +job_prist.gat,168,80,4 script Doppelganger::Doppel 739,{ + +OnStart: + if(class == Job_Acolyte) goto L_Aco; + +L_Priest: + mes "[Doppelganger]"; + mes "What good is it to be here?."; + mes "Are you this bored? you're already a priest why are you here?."; + next; + mes "[Doppelganger]"; + mes "You don't need to help these acolytes, go home."; + mes "You're doing something that is wasting your time, leave now."; + close; +L_Aco: + mes "[Doppelganger]"; + mes "Hey, Acolyte wait, listen to what i have to say."; + next; + mes "[Doppelganger]"; + mes "You came here because you want to become a priest eh?"; + mes "I don't think you should become a priest."; + next; + mes "[Doppelganger]"; + mes "If you want, i can use my powers to let you start over again."; + mes "You can become a novice again, and you can choose what job you want to be."; + next; + mes "[Doppelganger]"; + mes "Well, the job you choose depends on your level hhehe."; + mes "Isn't this a good deal? if you want i can help you right now."; + next; + menu "I hope you can help me!",-, "Devil Be gone!",M_1b; + + mes "[Doppelganger]"; + mes "Yes thats a good choice."; + mes "Let me turn you into a novice now."; + next; + mes "[Doppelganger]"; + mes "You know it takes a long time to ressurect when you DIE!!"; + next; + warp "gef_dun02.gat", 210, 177; + end; + M_1b: + mes "[Doppelganger]"; + mes "I don't think you understand what i mean."; + mes "This is one of the best things that can happen to you."; + next; + mes "[Doppelganger]"; + mes "You just need to tell me that you don't want to become a priest."; + mes "If you do that, i can turn you into any job you want, you want to become a swordman like me?"; + next; + menu "I don't want to become a priest!",-, "Devil, Be GONE!",sM_1b; + + mes "[Doppelganger]"; + mes "good choice, you don't need to come back here anymore."; + mes "okay, let me turn you into a novice now..."; + next; + mes "[Doppelganger]"; + mes "You know its takes a long time to ressurect when you DIE??!!"; + next; + warp "gef_dun02.gat", 210, 177; + end; + sM_1b: + mes "[Doppelganger]"; + mes "okay fine, i'll spare you today."; + next; + mes "[Doppelganger]"; + mes "If i see you next time, iam gonna make you die painfully."; + disablenpc "Doppel_Trig"; + disablenpc "Doppel"; + donpcevent "PrstTest2_2::OnCheck"; + close; +} + +// Dark Lord ------------------------------------------------------------------------------- +job_prist.gat,168,115,4 script Dark Lord 737,{ + +OnStart: + if(class == Job_Acolyte) goto L_Aco; + +L_Priest: + mes "[Dark Lord]"; + mes "Let you feel hatred and anger!!"; + mes "Let you feel how it feels when your friend betrays you!"; + next; + mes "[Dark Lord]"; + mes "Stay here, and train with us and next; until you are strong enough then you can go back!"; + mes "Stay with us and learn to curse!"; + close; +L_Aco: + mes "[Dark Lord]"; + mes "Stop right there human!."; + mes "Whose permission do you have to pass through here!"; + next; + mes "[Dark Lord]"; + mes "If you want to become a priest, you can't pass through here,"; + mes "Go now, before i kill you."; + next; + mes "[Dark Lord]"; + mes "Even more annoying than ants you humans, leave and stop bothering me!"; + next; + menu "Iam sorry, please spare me.",-, "Devil, Be GONE!.",M_1c; + + mes "[Dark Lord]"; + mes "Don't come here again!"; + next; + warp "gl_church.gat", 145, 170; + end; + M_1c: + mes "[Dark Lord]"; + mes "Don't try to act like a tough guy."; + mes "I can cut u in many pieces with my pinky."; + next; + mes "[Dark Lord]"; + mes "Before i use my dark powers on you, leave!"; + next; + menu "Please, Spare me.",-, "Devil, BE GONE!",sM_1c; + + mes "[Dark Lord]"; + mes "Don't appear here again!"; + next; + warp "gl_church.gat", 145, 170; + end; + sM_1c: + mes "[Dark Lord]"; + mes "So you decided to stay eh? you pesky human, killing you will dirty my hands."; + next; + mes "[Dark Lord]"; + mes "If i see you again, iam gonna kill you."; + disablenpc "Dark_Trig"; + disablenpc "Dark Lord"; + donpcevent "PrstTest2_2::OnCheck"; + close; +} + +// Baphomet ----------------------------------------------------------------------------- +job_prist.gat,168,150,4 script Baphomet 736,{ + +OnStart: + if(class == Job_Acolyte) goto L_Aco; + +L_Priest: + mes "[Baphomet]"; + mes "Annoying Priests..."; + next; + mes "[Baphomet]"; + mes "I have nothing to talk to you about, leave now."; + close; +L_Aco: + mes "[Baphomet]"; + mes "Hey, Human."; + next; + mes "[Baphomet]"; + mes "You interested in a deal?"; + next; + mes "[Baphomet]"; + mes "I can get you all the rich and fame in this world."; + mes "Infinite money and weapons which no humans have..."; + next; + mes "[Baphomet]"; + mes "Also, if you want, you can always summon me."; + mes "If you did that, everyone will be afraid of you hahahaha."; + next; + mes "[Baphomet]"; + mes "I think you should give up being a priest and just accept my deal."; + mes "If you accept my deal, the world is yours."; + next; + menu"I give up being a priest.",-, "Devil be GONE!",M_1d; + + mes "[Baphomet]"; + mes "Okay, let us sign the contract..."; + mes "you will not forget this..."; + next; + mes "[Baphomet]"; + mes "You go find where i live."; + mes "When your there, come and sign the contract."; + next; + warp "glast_01.gat", 200, 203; + end; + M_1d: + mes "[Baphomet]"; + mes "Okay fine, i'll leave."; + mes "But, you won't leave that easily."; + next; + mes "[Baphomet]"; + mes "I already set up a lot of evil stuff for you..."; + mes "I want to see how long you can last."; + next; + mes "[Baphomet]"; + mes "OKay go now."; + disablenpc "Bapho_Trig"; + disablenpc "Baphomet"; + donpcevent "PrstTest2_2::OnCheck"; + close; +} + + +// These hidden warps trigger the npcs when you get near them +// Deviruchi Trigger -------------------------------------------------------------------- +job_prist.gat,167,40,1 script Devi_Trig 139,8,0,{ + + doevent "Deviruchi::OnStart"; + end; +} +// Doppleganger Trigger -------------------------------------------------------------------- +job_prist.gat,167,77,1 script Doppel_Trig 139,8,0,{ + + doevent "Doppel::OnStart"; + end; +} +// Dark Lord Trigger -------------------------------------------------------------------- +job_prist.gat,167,112,1 script Dark_Trig 139,8,0,{ + + doevent "Dark Lord::OnStart"; + end; +} +// Baphomet Trigger -------------------------------------------------------------------- +job_prist.gat,167,145,1 script Bapho_Trig 139,8,0,{ + + doevent "Baphomet::OnStart"; + end; +} + + +// End warp for 2nd part of test --------------------------------------------------------- +job_prist.gat,168,180,0 script prst2_1 45,3,3,{ + + if(class == Priest) end; //If a Priest friend steps on the warp nothing happens. Need the Aco to step on the warp. +OnTimer30000: + set $@PrstRm, 3; + set $PRIEST_Q3, 0; + enablenpc "Mummy1_Trig"; //enables the floor triggers for the next test + enablenpc "Mummy2_Trig"; + enablenpc "Mummy3_Trig"; + stopnpctimer; + initnpctimer "prst3_1"; + areawarp "job_prist.gat", 160, 14, 175, 178, "job_prist.gat", 98, 40; + end; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------------\\ +// Test 2, Part 3: Make it to the exit \\ +//******************************************************************************************************************************* *\\ +// First set of Mummies -------------------------------------------------------- +job_prist.gat,97,50,0 script Mummy1_Trig 139,8,1,{ + + monster "job_prist.gat", 93, 55, "ca", 1041,1; + monster "job_prist.gat", 102, 55, "ah", 1041,1; + disablenpc "Mummy1_Trig"; + end; +} +// Second set of Mummies -------------------------------------------------------- +job_prist.gat,97,65,0 script Mummy2_Trig 139,8,1,{ + + monster "job_prist.gat", 93, 70, "men", 1041,1; + monster "job_prist.gat", 102, 70, "ahke", 1041,1; + disablenpc "Mummy2_Trig"; + end; +} +// Third set of Mummies -------------------------------------------------------- +job_prist.gat,97,80,0 script Mummy3_Trig 139,8,1,{ + + monster "job_prist.gat", 93, 85, "mea", 1041,1; + monster "job_prist.gat", 102, 85, "sne", 1041,1; + disablenpc "Mummy3_Trig"; + end; +} + + +// End warp for 3rd part of test ---------------------------------------------- +job_prist.gat,98,105,0 script prst3_1 45,2,2,{ + + if(class == Priest) end; //If a Priest friend steps on the warp nothing happens. Need the Aco to step on the warp. + stopnpctimer "TimerPrst"; + areawarp "job_prist.gat", 90, 34, 105, 105, "prt_church.gat",16, 37; + set PRIEST_Q2, 2; + killmonsterall "job_prist.gat"; + donpcevent "Father Peter::OnStart"; + end; + +OnTimer500: + stopnpctimer; + areaannounce "job_prist.gat", 90, 34, 105,105, "[Father Peter]: This is the last trial you must face my child. Have faith, I know you can pass it!",8; + end; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------------\\ +// Timer \\ +//********************************************************************************************************************************\\ +job_prist.gat,1,1,0 script TimerPrst -1,{ + +OnTimer3000: + areaannounce "job_prist.gat",8,34,39,109,"[Father Peter]: You will have 5 minutes to pass all 3 trials starting now.",8; + end; +OnTimer33000: + donpcevent "Father Peter::OnStart"; + end; +OnTimer63000: + set $@PrstTime$, "You have 4 minutes left!"; + donpcevent "Father Peter::OnStart"; + goto AnnouncePrst; +OnTimer93000: + donpcevent "Father Peter::OnStart"; + end; +OnTimer123000: + set $@PrstTime$, "You have 3 minutes left!"; + donpcevent "Father Peter::OnStart"; + goto AnnouncePrst; +OnTimer153000: + donpcevent "Father Peter::OnStart"; + end; +OnTimer183000: + set $@PrstTime$, "You have 2 minutes left!"; + donpcevent "Father Peter::OnStart"; + goto AnnouncePrst; +OnTimer213000: + donpcevent "Father Peter::OnStart"; + end; +OnTimer243000: + set $@PrstTime$, "You have 1 minute left!"; + donpcevent "Father Peter::OnStart"; + goto AnnouncePrst; +OnTimer273000: + set $@PrstTime$, "You have 30 seconds left!"; + donpcevent "Father Peter::OnStart"; + goto AnnouncePrst; +OnTimer293000: + set $@PrstTime$, "You have 10 seconds left!"; + goto AnnouncePrst; + end; +OnTimer2970000: + set $@PrstTime$, "You have 5 seconds left."; + goto AnnouncePrst; + end; +OnTimer302000: + set $@PrstTime$, "Time is up. You failed the test."; + goto AnnouncePrst; +OnTimer306000: + stopnpctimer; + if($@PrstRm==1) areawarp "job_prist.gat",8,34,39,109,"prt_church.gat",16, 37; + if($@PrstRm==2) areawarp "job_prist.gat",160, 14, 175, 178,"prt_church.gat",16, 37; + if($@PrstRm==3) areawarp "job_prist.gat", 90, 34, 105,105,"prt_church.gat",16, 37; + killmonsterall "job_prist.gat"; + donpcevent "Father Peter::OnStart"; + end; + +AnnouncePrst: + if($@PrstRm==1) areaannounce "job_prist.gat",8,34,39,109,"[Father Peter]: "+$@PrstTime$+".",8; + if($@PrstRm==2) areaannounce "job_prist.gat",160, 14, 175, 178, "[Father Peter]: "+$@PrstTime$+".",8; + if($@PrstRm==3) areaannounce "job_prist.gat", 90, 34, 105,105, "[Father Peter]: "+$@PrstTime$+".",8; + end; +} + + + +//**********************************************************************************************************************************************************************************\\ +//================================================= Sister Cecile: Test 3 =====================================================\\ +//**********************************************************************************************************************************************************************************\\ +prt_church.gat,27,24,4 script Sister Cecile 79, +{ + mes "[Sister Cecile]"; + if(Class == Job_Priest) goto L_Prst; + if(Class == Job_Acolyte) goto L_Aco; + if(Class == Job_Novice) goto L_Nov; + +L_Other: + mes "This is the Prontera Church, what can I help you with?"; + next; + menu "Please tell me about priests.",-, "Iam just walking around.",M_End0; + + mes "[Sister Cecile]"; + mes "Priests are servants of God. They have special powers that allow them to help anyone in need of assistance."; + next; + mes "[Sister Cecile]"; + mes "Because they are followers of God, they cannot use swords and many other types of weapons."; + next; + mes "[Sister Cecile]"; + mes "Of course, if you want to know more about priests, you should speak with one personally."; + next; + mes "[Sister Cecile]"; + mes "Please stay here for as long as you wish. The church is a sanctuary for all those who seek it."; + close; + M_End0: + mes "[Sister Cecile]"; + mes "Please Relax, wondering around can be tiring."; + close; + +L_Nov: + mes "God bless you, my child. The Prontera Church welcomes you."; + next; + mes "[Sister Cecile]"; + mes "Have you choose your job yet? Do you want to be one of god's helpers?"; + mes "Becoming an Acolyte and helping people is very good thing."; + next; + mes "[Sister Cecile]"; + mes "If you want to become an Acolyte, speak to ^5533FFFather Mareusis^000000 in the room across the hall."; + next; + mes "[Sister Cecile]"; + mes "Once you've reached job level 40 as an Acolyte, you can come back here and become a Priest."; + next; + mes "[Sister Cecile]"; + mes "Since you are still a novice, think carefully about what job you wish to take."; + close; + +L_Prst: + if(sex == 1) mes "God bless you, brother priest."; + if(sex == 0) mes "God bless you, sister priest."; + mes "I wish you all the best. Keep your faith strong and remeber that God loves all, and so should you."; + close; + +L_Aco: + if(PRIEST_Q == 1) goto L_Test1; + if(PRIEST_Q == 2) goto L_Test2; + if(PRIEST_Q == 3) goto L_Start; + if(PRIEST_Q == 4) goto L_Done; + if(sex == 1) mes "God bless you, brother."; + if(sex == 0) mes "God bless you, sister."; + mes "Why are you here?"; + next; + menu "I want to become a priest.",-, "Iam just wondering around.",M_End1; + + mes "[Sister Cecile]"; + mes "Oh so you want to become a priest?"; + mes "A lot of acolytes want to become priests."; + next; + mes "[Sister Cecile]"; + mes "My name is Sister Cecile, Iam responsible for helping acolytes become priests."; + next; + mes "[Sister Cecile]"; + mes "Because I was born and raised here, I've seen a lot of people become Priests over the years."; + mes "Thats why i like to help people become priests now."; + next; + mes "[Sister Cecile]"; + mes "In order to become a priest, you will have to fullfill 3 tasks. If you want to change your job now, you can go talk to Father Thomas,"; + next; + mes "[Sister Cecile]"; + mes "If you encounter any problems with any of the tasks, come talk to me and I might be able to help."; + close; + M_End1: + mes "[Sister Cecile]"; + mes "Please relax and take a break. The church should feel like your home."; + close; + +L_Start: + if(PRIEST_Q2 == 1) goto L_ReTest; + mes "Good job, you successfully completed the second quest...!"; + mes "You are now really close to becoming a priest."; + next; + mes "[Sister Cecile]"; + if(sex==1) mes "If you want to become a priest, the last step is to answer my questions honestly."; + if(sex==0) mes "If you want to become a priestess, the last step is to answer my questions honestly."; + mes "Please be honest and answer my question."; + next; + mes "[Sister Cecile]"; + mes "Okay let me ask you some questions."; + set PRIEST_Q2, 1; + next; +L_Test3: + mes "[Sister Cecile]"; + mes "From today on, do you wish to help the god for all eternity?"; + next; + menu "Yes.",M_2a, "No.",-; + + mes "[Sister Cecile]"; + mes "Why..Why would you say that?..."; + mes "I don't think your suitable to become a priest..."; + next; + mes "[Sister Cecile]"; + mes "please come back when you really want to become a priest."; + mes "You can't become a priest right now."; + close; + + M_2a: + + mes "[Sister Cecile]"; + mes "Will you use god's power for your own profit?"; + next; + menu "Yes",-, "No.",M_2b; + + mes "[Sister Cecile]"; + mes "No, that doesn't work, if you use god's power to do what you wish, you're just like a theif."; + mes "How can you become a good priest if you think like that?"; + next; + mes "[Sister Cecile]"; + mes "Please come back when you make up your mind."; + mes "Those thoughts are the things that corrupt people."; + close; + + M_2b: + + + mes "[Sister Cecile]"; + mes "Will you help others in battle when they need help?"; + next; + menu "Yes.",M_2c, "No.",-; + + mes "[Sister Cecile]"; + mes "Thats wrong, when someone needs help, we will do our best to help them."; + mes "It doesn't matter who that person is, our job is to help everyone."; + next; + mes "[Sister Cecile]"; + mes "Go walk around."; + mes "and you should learn something."; + close; + M_2c: + + mes "[Sister Cecile]"; + mes "Will you sacrafice yourself for others?"; + next; + menu "Yes.",M_2d, "No.",-; + + mes "[Sister Cecile]"; + mes "No, thats not what god thinks."; + mes "If we can sacrafice ourselves for something that helps the world, its worth it."; + next; + mes "[Sister Cecile]"; + mes "Go and think about sacraficing."; + mes "Sacraficing is thing thats easy to say, but hard to do."; + close; + M_2d: + + mes "[Sister Cecile]"; + mes "Will you talk bad to people you meet?"; + next; + menu "Yes.",-, "No.",M_2e; + + mes "[Sister Cecile]"; + mes "That is not right, priests are supposed to help people."; + mes "If you talk bad, you don't deserver to be a priest."; + next; + mes "[Sister Cecile]"; + mes "even if your god's best servant."; + mes "You don't have the right to bad-talk."; + close; + + M_2e: + + mes "[Sister Cecile]"; + mes "Will you bring any kind of devil to help others in battle?"; + next; + menu "Yes.",-, "No.",M_2f; + + mes "[Sister Cecile]"; + mes "You can't do that."; + mes "It doesn't matter if the devil is good or bad, priests should never talk to a devil ."; + next; + mes "[Sister Cecile]"; + mes "Even though it looks like you did a good thing, but it was a really bad thing."; + mes "Please go think about it."; + close; + + M_2f: + + mes "[Sister Cecile]"; + mes "If God wants to you to live or die, will you listen to him?"; + next; + menu "Yes.",M_2g, "No.",-; + + mes "[Sister Cecile]"; + mes "If your like that you can't become a priest."; + mes "If God wants you to die, you have to listen to him."; + next; + mes "[Sister Cecile]"; + mes "And we priest have the skill to Resurrect ourselves."; + mes "Please go and think about what death means to you."; + close; + M_2g: + + mes "[Sister Cecile]"; + mes "I just witness what you said."; + mes "Lastly, please promise that you'll remember the things you said today."; + next; + menu "I promise.",-, "No.",M_2No; + + mes "[Sister Cecile]"; + mes "Now, you passed all the tests."; + mes "Please go talk to Father Thomas to become a priest."; + next; + mes "[Sister Cecile]"; + mes "Please remember the things you said today."; + mes "God bless you..."; + set PRIEST_Q, 4; + set PRIEST_Q2, 0; + close; + + M_2No: + mes "[Sister Cecile]"; + mes ".............."; + next; + mes "[Sister Cecile]"; + mes "No not yet, your still wondering if you want to become a priest or not."; + mes "You can't become a priest right now."; + next; + mes "[Sister Cecile]"; + mes "I think you should go do the self-disipline test again..."; + mes "When you're ready, come back here."; + next; + mes "[Sister Cecile]"; + mes "God bless you..."; + close; + +L_ReTest: + mes "............."; + next; + mes "[Sister Cecile]"; + mes "...Oh your back."; + mes "I hope you can be honest this time."; + next; + mes "[Sister Cecile]"; + mes "I hope i can sense your sincere..."; + mes "Please answer me honestly."; + next; + mes "[Sister Cecile]"; + mes "Okay, lets start."; + next; + goto L_Test3; + +L_Test1: + mes "Oh, so you already started the self-disipline test, good job."; + close; + +L_Test2: + if(PRIEST_Q2 == 1) goto L_Test2a; + mes "You didn't start the second quest yet?."; + mes "Well, i can't give u any specific details about this task."; + next; + mes "[Sister Cecile]"; + mes "I can only tell you to be well-prepared and to not get seduced by anything..."; + mes "You must trust in yourself in order to complete the second quest."; + next; + mes "[Sister Cecile]"; + mes "If you want more specific details go talk to the priest in the training ground."; + mes "Father Thomas is a very nice person, he'll help you too."; + close; + +L_Test2a: + mes "Training is hard, but don't give up."; + mes "You must overcome anything in order to be a good priest."; + next; + mes "[Sister Cecile]"; + mes "If there's experienced priest, you can ask them to help you train."; + mes "They might be able to help you pass the first level of the second task."; + next; + mes "[Sister Cecile]"; + mes "God bless you..."; + mes "When you complete the second quest, come back here."; + close; + +L_Done: + mes "Congratulations on finishing the tests. Please see Father Thomas so that he can make you a Priest."; + close; +} diff --git a/npc/jobs/2-1/wizard.txt b/npc/jobs/2-1/wizard.txt new file mode 100644 index 000000000..2a77c10ee --- /dev/null +++ b/npc/jobs/2-1/wizard.txt @@ -0,0 +1,1446 @@ +//===== eAthena Script ======================================= +//= Wizard Job Quest +//===== By: ================================================== +//= ?? (Aegis) +//= Translated by yoshiki +//= converted by kobra_k88 +//= Further bugfixed and tested by Lupus +//===== Current Version: ===================================== +//= 1.3a +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Wizard job quest converted from aegis script, plus my own RO screenies. +//===== Additional Comments: ================================= +//= v1.1 Now using the initnpctimer command, donpcevent, +//= and new waitingroom event commands. No more addtimer spamming. +//= No longer have to talk to the npc to take the test. Just enter the chat room. +//= v1.2 Changed global variable names to unique ones. +//= v1.3 Rollback from the wrong Kashy's fix +//= v1.3a Fixed issue with duplicating monsters thx to Bison.[kobra_k88] +//============================================================ + + + +//<=================== Some dog =========================> +gef_tower.gat,107,35,5 script Some Dog 81, +{ + if(Class == Job_Mage) goto L_JobMage; + if(callfunc("Is_Magic_Class")) goto L_Magic; + if(callfunc("Is_Holy_Class")) goto L_Holy; +L_Other: + mes "[Dog]"; + mes "Sheesh....... Why would someone who can't even cast a single spell come all the way up here???"; + next; + mes "[Dog]"; + mes "If you're that bored, do the world a favor and climb to the top of this building from the outside, then do some acrobatics...."; + emotion 32; + next; + mes "[Dog]"; + mes "~WOOF~ Get lost! I don't have time for people like you!!"; + emotion 27; + close; +L_Holy: + mes "[Dog]"; + mes "Eeek! What's a holy type person doing up here? I thought you people didn't like magic...."; + mes "You religious types are always calling it the 'dark arts'......... ooooh scary!!!...... ~grrr!~WOOF!~"; + close; +L_Magic: + mes "[Dog]"; + mes "Ah! High level magic users, welcome. It's always nice to see experienced magic users around here."; + mes "Actually it's nice to see them anywhere! ~Woof!~"; + close; + +L_JobMage: + mes "[Dog]"; + mes "Ah... I know what you're about to say.... You want to become a Wizard right?"; + next; + mes "[Dog]"; + mes "Speak with Catherine. She'll help you out."; + next; + mes "[Dog]"; + mes "If you want to know more about the job change process for Wizards, I can be of help."; + next; + menu "..................",M_0, "A dog is talking to me......",M_1; + + M_0: + mes "[Dog]"; + mes "~Woof~ What is it? Why are you looking at me like that?? Is this the first time you've seen a dog talk?"; + emotion 1; + mes "[Dog]"; + mes "~Woof~ I suppose it's not that common to see a talking dog..... ~Woof~..... Yeah, it is a rare site actually....."; + next; + mes "[Dog]"; + mes "~GRRRR!!~.... Hey! Stop GAWKING at me for goodness sake!! ~WOOOF~"; + emotion 6; + next; + + L_Cont: + mes "[Dog]"; + mes "My name is Maria Splodofska. Just call me Maria. I'm assisting candidates for the Wizard class."; + next; + mes "[Maria]"; + mes "~Woof~ You see, the reason I became a dog was.... I was helping my boyfriend with his experiment in preperation for his Final."; + mes "He is studying for a Magic Degree. Well, before I knew what happened he accidentally turned me into a dog....."; + next; + mes "[Maria]"; + mes "~Grrrrr~ In a couple of months the chemicals should wear off and I should return to normal. Well theoretically speaking anyhow."; + next; + mes "[Maria]"; + mes "Uh, anyways..... where were we?"; + emotion 20; + next; + mes "[Maria]"; + mes "Like I said before, if you want to become a Wizard you must first speak with Catherine."; + mes "She just recently became a Wizard so she should be a great help."; + next; + mes "[Maria]"; + mes "I can tell you more about the job changing process, but I wouldn't want to take up anymore of your time."; + mes "That is unless, you want me to go on about what's in store for Wizards to be?........."; + next; + menu "Yes, please continue.",sM_0, "No, it's ok.",sM_1, "A talking dog......",sM_2; + + sM_0: + mes "Maria]"; + mes "Ok then. Let me explain the process for becoming a Wizard to you...."; + next; + mes "[Maria]"; + mes "There are 3 Tests in the Wizard job change process. The ^5555FF1st Test^000000 will require you to collect a number of ^FF5555magic items^000000."; + next; + mes "[Maria]"; + mes "Catherine will give you that test. She will ask to you collect either a variety of ^5555FFGemstones^000000, or ^5555FFElemental Ores^000000."; + next; + mes "[Maria]"; + mes "The ^5555FF2nd Test^000000 will be administered by the, ever gloomy Raul, in the corner over there."; + mes "It is a multiple choice Q&A exam about the different aspects of magic."; + next; + mes "[Maria]"; + mes "The exam will consist of 10 questions. If you miss any of those questions you will fail the exam."; + next; + mes "[Maria]"; + mes "Raul will also administer the ^5555FF3rd Test^000000. This is the last test and it requires that defeat a series of monsters."; + mes "There will be three rooms each filled with monsters of a specific elemental attribute."; + next; + mes "[Maria]"; + mes "It is up to you to figure what spells work best on which monsters."; + next; + mes "[Maria]"; + mes "Well, that's all I can tell you. Go ahead and apply now."; + close; + sM_1: + mes "[Maria]"; + mes "Oh, ok. Go ahead and apply and do your best."; + close; + sM_2: + mes "[Maria]"; + mes "I'M NOT A DOG!!! ~ ARROOOOOOOOOWWWWW!!!! ~"; + emotion 6; + next; + mes "[Maria]"; + mes "Dang it! I hope you FAIL!! Now go get lost!"; + emotion 27; + next; + warp "gef_dun00.gat",54,23; + end; + M_1: + mes "[Dog]"; + mes "~WOOF~Woof~woof~ You DON'T have to state the obvious! I KNOW I'm a dog!"; + emotion 32; + next; + goto L_Cont; + +} + + +//<=========================================== Registrar and Examiner Catherine Medichi ==============================================>\\ +gef_tower.gat,111,37,4 script Catherine Medichi 68, +{ + mes "[Catherine Medichi]"; + if(Class == Job_Wizard) goto L_Wizard; + if(Class == Job_Novice) goto L_Novice; + if(Class == Job_Mage) goto L_Mage; +L_Other: + mes "Hmm? What brings you all the way up here? If you have nothing to do here, please leave."; + mes "This place is for wizards only. =P"; + next; + mes "[Catherine Medichi]"; + mes "Try not to fall as you go back down...."; + close; +L_Novice: + mes "Awwww, a little novice! How cute! This place is for Wizards only though."; + emotion 14; + next; + mes "[Catherine Medichi]"; + mes "If you're interested in magic, the ^0000FFMagician's Guild^000000 is the place for you."; + close; +L_Wizard: + mes "What do you need fellow Wizard? If it's nothing, please leave..."; + next; + mes "[Catherine Medichi]"; + if(sex==1) mes "... Of course, if your here to ask me out... (*giggles*)...."; + if(sex==0) mes "If you get yourself a boyfriend, feel free to drop by and show him off. XD"; + emotion 3; + close; + +L_Mage: + if(WIZ_Q == 2) goto L_Test2; + if(WIZ_Q == 3) goto L_Test3; + if(WIZ_Q == 4) goto L_Done; + if(WIZ_Q2 > 0) goto L_Test1; + + mes "My name's Catherine Medichi, and I just became a Wizard. Relax, you can call me Catherine."; + next; + mes "[Catherine Medichi]"; + mes "What brings you all the way up here? You want to be a wizard, right?"; + next; + menu "Of course!",M_0a, "The requirements",M_0b,"Not really",M_0End; + + M_0a: + mes "[Catherine Medichi]"; + mes "Please fill out this application form first."; + next; + mes "(you fill out the form and hand it back)"; + next; + if(JobLevel < 40) goto sL_JobLvl; + if(JobLevel == 50) goto sL_Job50; + + mes "[Catherine]"; + mes "Alright ^ff0000"+strcharinfo(0)+"^000000, it looks like you have everything in order."; + next; + mes "[Catherine Medichi]"; + mes "Now let me tell you about the test. It is divided into 3 parts."; + mes "- The 1st part involves the collecting of a number of magical items,"; + mes "- the 2nd part is a Q&A exam,"; + mes "- and the 3rd section is our favorite, the field exam."; + next; + mes "[Catherine Medichi]"; + mes "People with a job lvl of 50 can skip the first test. They have already worked hard enough."; + next; + mes "[Catherine Medichi]"; + mes "Now for the first part of the test. This requires the gathering of a number of magic items."; + next; + set WIZ_Q2, rand(1,2); + + mes "[Catherine Medichi]"; + mes "The items you need to bring are:"; + if(WIZ_Q2 == 2) goto R_2; + + R_1: + mes "- 10 ^ff0000Red gemstones^000000"; + mes "- 10 ^0000ffBlue gemstones^000000"; + mes "- and 10 ^ddcc11Yellow gemstones^000000."; + goto L_Cont0; + + R_2: + mes "5 ^0000ffCrystal Blues^000000,"; + mes "5 ^009900Green Lives^000000,"; + mes "5 ^ff0000Red Bloods^000000,"; + mes "and 5 ^ddcc11Wind of Verdures^000000."; + + L_Cont0: + next; + mes "[Catherine Medichi]"; + mes "This test isn't THAT hard, so get going!"; + next; + mes "[Catherine Medichi]"; + mes "Good luck! I'll be waiting!"; + set WIZ_Q, 1; + close; + + sL_JobLvl: + mes "[Catherine Medichi]"; + mes "Hey, I told you already. You have to have at least job lvl 40."; + mes "Don't you remember me telling you that?"; + close; + + sL_Job50: + mes "[Catherine Medichi]"; + mes "Wow! You're at job level 50! You must have worked really hard! I'm impressed!"; + next; + mes "[Catherine Medichi]"; + mes "Okay, I'll record that you're job 50. You get to skip the first test, but you still got 2 left."; + next; + mes "[Catherine Medichi]"; + mes "Now, talk to that man in the corner for the test. It's hard, so be careful."; + set WIZ_Q, 2; + close; + + M_0b: + mes "[Catherine Medichi]"; + mes "Even though many people want to become Wizards, only those with a job level of 40 can qualify."; + mes "Anyone with a job level less then that wouldn't have enough magic power to become a Wizard."; + next; + mes "[Catherine Medichi]"; + mes "Then there is the matter of the Wizard's Test. The test is made up of 3 sections."; + mes "Each section focuses on different asspects of Wizardry."; + next; + mes "[Catherine Medichi]"; + mes "Once you pass the test you'll be a Wizard just like me. Yay!"; + mes "Unfortunately a lot people have trouble with the test and never quite make it.(*sighs*)"; + next; + mes "[Catherine Medichi]"; + mes "Maybe you'll have better luck."; + close; + + M_0End: + mes "[Catherine Medichi]"; + mes "What? You came up here for nothing!?"; + emotion 1; + close; + + + L_Test1: + mes "Did you get all of the items? Let's see......"; + next; + mes "[Catherine Medichi]"; + if(WIZ_Q2 == 1) goto sL_Gems; + if(WIZ_Q2 == 2) goto sL_Ores; + + sL_Gems: + if (countitem(716)<10 || countitem(717)<10 || countitem(715)<10) goto ssL_NotDone; + mes "Great! You've brought everything! The guild will use these well."; + next; + delitem 716, 10; + delitem 717, 10; + delitem 715, 10; + goto ssL_Done; + + sL_Ores: + if (countitem(991)<4 || countitem(993)<4 || countitem(990)<4 || countitem(992)<4) goto ssL_NotDone; + mes "Great! You've found them all! The guild will use them well."; + next; + delitem 991, 5; + delitem 993, 5; + delitem 990, 5; + delitem 992, 5; + + ssL_Done: + mes "[Catherine Medichi]"; + mes "Congrats, you passed the first test."; + mes "Don't relax yet, you still got 2 tests left."; + emotion 21; + next; + mes "[Catherine Medichi]"; + mes "Now talk to the man in the corner for the tests."; + mes "It's pretty hard, so be carefull."; + set WIZ_Q, 2; + set WIZ_Q2, 0; + close; + + ssL_NotDone: + mes "It seems you didn't bring everything that's needed."; + next; + mes "[Catherine Medichi]"; + mes "It's hard work to get all the way up here so make sure you have all of the right items okay?"; + next; + mes "[Catherine Medichi]"; + mes "You need:"; + if(WIZ_Q2 == 1) goto R_1; + if(WIZ_Q2 == 2) goto R_2; + close; + + L_Test2: + if(WIZ_Q2 == 1)goto sL_Failed2; + mes "Hey, did you go talk to the man? No? You can't just become a wizard by getting items."; + next; + mes "[Catherine Medichi]"; + mes "There are 2 more tests left. I'll be waiting, so go finish them."; + close; + + sL_Failed2: + mes "Huh?? You failed the Q&A test!?"; + emotion 1; + next; + mes "[Catherine Medichi]"; + mes "You want to be a wizard and you can't answer a couple of questions?? Sheesh."; + emotion 4; + next; + mes "[Catherine Medichi]"; + mes "Well, do you want big sis to give you a hint? If you do, go buy me ^0099001 apple juice^000000. I'm a bit thirsty. =P"; + next; + menu "Can I have a hint?",M_1a, "I can pass on my own!",M_1b; + + M_1a: + if (countitem(531) < 1) goto sL_NoJuice; + delitem 531, 1; + + mes "[Catherine Medichi]"; + mes "Mmmmmmmmmmmmm, apple juice. ~gulp~gulp~"; + next; + mes "[Catherine Medichi]"; + mes "Thanks, I'll give you the hint now."; + next; + mes "[Catherine Medichi]"; + mes "The man gives you 3 major types of questions, about:"; + mes "- ^ff0000spells^000000,"; + mes "- ^ff0000monsters^000000,"; + mes "- and ^ff0000the caster^000000."; + next; + mes "[Catherine Medichi]"; + mes "It's up to him to pick the questions."; + next; + mes "[Catherine Medichi]"; + mes "Ya know... if he got a hair cut and shaved, he might look cool..."; + mes "But obviously he wouln't do it...."; + next; + mes "[Catherine Medichi]"; + mes "Anyways, about his questions on spells, there are obviously some on spells you've learned."; + next; + mes "[Catherine Medichi]"; + mes "There are also questions about spells you DON'T know much about, so go ask some Wizards for that info."; + next; + mes "[Catherine Medichi]"; + mes "There are also places out there with lots of information about spells, such as www.emperium.org."; + mes "You can probably find other sites as well."; + next; + mes "[Catherine Medichi]"; + mes "As far as the questions on monsters go, you COULD fight them to learn about them... OR..."; + next; + mes "[Catherine Medichi]"; + mes "... If I remember correctly, there's a libary in Prontera that has lots of information on monsters."; + mes "You could just go there and read about them."; + next; + mes "[Catherine Medichie]"; + mes "Now, about the questions about the caster.... You're on your own for this one.."; + mes "Why? Because YOU ARE the caster!"; + next; + mes "[Catherine Medichi]"; + mes "If you don't know anything about yourself, how would a stranger like me know?"; + next; + mes "[Catherine Medichi]"; + mes "Well good luck! Mister Examiner is waiting!"; + close; + + sL_NoJuice: + mes "[Catherine Medichi]"; + mes "Well, if you want hints, I need apple juice!. Otherwise, you're on your own =P."; + close; + + M_1b: + mes "[Catherine Medichi]"; + mes "That's right! Tests are meant to be done alone! That's definatly the way a Wizard should think!"; + next; + mes "[Catherine Medichi]"; + mes "Good luck! Mister Examiner is waiting!"; + close; + + L_Test3: + if(WIZ_Q2 == 1) goto sL_Failed3; + mes "He he, I could hear you in there working hard on those questions."; + next; + mes "[Catherine Medichi]"; + mes "Good job, only one test left! Finish that and you'll be a wizard!"; + next; + mes "[Catherine Medichi]"; + mes "Good luck! The examiner's waiting!"; + close; + + sL_Failed3: + mes "Why did you come out during the test? I never thought you were that weak..."; + next; + if(sex==1) goto ssL_M3; + if(sex==0) goto ssL_F3; + + ssL_M3: + mes "[Catherine Medichi]"; + mes "How could a powerful mage like you get beaten so easily!! Go back in and try harder."; + close; + + ssL_F3: + mes "[Catherine Medichi]"; + mes "You can't act all weak, just because you're a girl! If you want to be a wizard, go and pass the test!"; + next; + mes "[Catherine Medichi]"; + mes "I thought it was hard too, but it wasn't enough to make me quit! You just have to face hardship sometimes!"; + close; + + + L_Done: + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Wizard."; + if(SkillPoint > 0) close; + + mes "Great! You finished all of the tests! Congrats, congrats, congrats!!"; + emotion 21; + next; + mes "[Catherine Medichi]"; + mes "Ack, I'm wasting time, I better change you!"; + next; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + JobChange Job_Wizard; + + mes "[Catherine Medichi]"; + mes "Now you're a wizard! Act responsibly!"; + next; + mes "[Catherine Medichi]"; + mes "Make sure when you cast a spell, you know exactly what's going to happen!"; + next; + mes "[Catherine Medichi]"; + mes "Don't do stupid things like casting in the middle of town!"; + mes "It causes lag and magic is supposed to be used on monsters anyways!"; + next; + mes "[Catherine Medichi]"; + mes "Become mightier by partying with others! Oh yea, here's a present!"; + next; + mes "[Catherine Medichi]"; + mes "(Rustle Rustle)"; + next; + getitem 505, 6; + mes "[Catherine Medichi]"; + mes "Use them wisely. It's a present from me, so you better use them all!"; + next; + mes "[Catherine Medichi]"; + mes "Well my fellow Wizard, take care and have a great life!"; + close; +} + + +//<================================================ Examiner: Raul Expagarus ==================================================>\\ +gef_tower.gat,102,24,3 script Raul Expagarus 735, +{ + mes "[Raul Expagarus]"; + if(Class == Job_Mage) goto L_Mage; + if(Class == Job_Wizard) goto L_Wizard; + if(callfunc("Is_Holy_Class")) goto L_Holy; + if(Class == Job_Novice) goto L_Novice; +L_Other: + mes "Ugh, I don't feel good....I feel like I'm trapped in ice........"; + next; + mes "[Raul Expagarus]"; + mes "Who're you?! Leave!"; + emotion 0; + close; +L_Novice: + mes "What's a little kid like you doing here? Get out!!"; + emotion 0; + next; + warp "geffen.gat",120,110; + close; +L_Holy: + mes "Leave holy ones!"; + mes "Magic is considered to be a power that is not from God......."; + next; + mes "[Raul Expagarus]"; + mes "Besides, I'm not feeling too good. So Leave now!"; + close; +L_Wizard: + mes "Cough Cough, what can I do for you? Hmmm... you're a magic user too..."; + next; + mes "[Raul Expagarus]"; + if(sex==1) goto L_M; + if(sex==0) goto L_F; + + L_M: + mes "If you're not responsible, you might accidently learn useless spells."; + mes "Instead of that, you might want to focus on learning spells you'll be using now."; + next; + mes "[Raul Expagarus]"; + mes "In a fight for love, you might become crippled hehe."; + close; + + L_F: + mes "If you're not responsible, you might accidently learn useless spells."; + mes "You should learn a spell with all of your heart or not learn it at all."; + next; + mes "[Raul Expagarus]"; + mes "If you don't wish to study like that............... Heh, then go be a housewife."; + close; + +L_Mage: + if(WIZ_Q == 1) goto L_NotRdy; + if(WIZ_Q == 2) goto L_Test2; + if(WIZ_Q == 3) goto L_Test3; + if(WIZ_Q == 4) goto L_Done; + + mes "Cough, I don't have any time to talk."; + next; + mes "[Raul Expagarus]"; + mes "Sorry, but please leave."; + close; + + L_NotRdy: + mes "Heh, a wizard trainee eh?!"; + next; + mes "[Raul Expagarus]"; + mes "You COULD just stay as a mage and live a pretty decent life....."; + next; + mes "[Raul Expagarus]"; + mes "Then again, wizards ARE much more high class....."; + close; + + L_Done: + mes "Congratulations on finishing the final test! You have now finished all of the Wizards tests and are ready to become a Wizard!"; + emotion 21; + next; + mes "[Raul Expagarus]"; + mes "Go speak to Catherine to become a Wizard. But be careful! Magic is a powerfull force and can easily destroy you!!"; + close; + + L_Test2: + if(WIZ_Q2 == 1) goto sL_ReTest2; + + mes "I see you've passed the 1st test. My name is Raul Expagarus, I'm your test examiner."; + next; + mes "[Raul Expagarus]"; + mes "It's not too late! You can still return to a peaceful life in town if you wish."; + next; + mes "[Raul Expagarus]"; + mes "You probably have no clue how dangerous it is to use magic."; + next; + menu "You're right. I quit.",M_0a, "I want to take test!",M_0b; + + sL_ReTest2: + mes "Hmph, you want to try again?"; + next; + mes "[Raul Expagarus]"; + mes "How can you hate a peaceful life so much?"; + next; + mes "[Raul Expagarus]"; + mes "Be that way! If you miss one question, you fail! What do you say!?"; + emotion 32; + next; + menu "I want to live in peace..........",M_0a, "I want to try again.",M_0b; + + M_0a: + mes "[Raul Expagarus]"; + mes "Good choice, cough cough. Being a Wizard is a difficult job, and magic is not meant to be used by mere mortals........."; + next; + mes "[Raul Expagarus]"; + mes "Go down the tower and don't look back. Use the magic you have now and live a peaceful life."; + close; + + M_0b: + mes "[Raul Expagarus]"; + mes "Hmph, we'll see how GREAT you do."; + next; + mes "[Raul Expagarus]"; + mes "Lets start the test! If you miss one question, you're screwed! HA!"; + emotion 29; + next; + mes "[Raul Expagarus]"; + mes "10 questions, get them right! I won't tell you the correct answer for the ones you miss."; + next; + set @SCORE,0; + set @temp,rand(0,2); + if(@temp == 1) goto R_1; + if(@temp == 2) goto R_2; + + //Spell Quiz + R_0: + mes "[Raul Expagarus]"; + mes "Cough, here are the questions!"; + next; + mes "[Raul Expagarus]"; + mes "1. What ISN'T required for fire wall?"; + next; + menu "Fire Bolt Lv 4",sM0_0b, "Fire Ball Lv 5",sM0_0b, "Sight Lv 1",sM0_0b, "Napalm Beat Lv 4",sM0_0a; + + sM0_0a: + set @SCORE, @SCORE + 10; + + sM0_0b: + + mes "[Raul Expagarus]"; + mes "2. What happens to a monster's element after it's frozen by Frost Diver?"; + next; + menu "Changes to Water",sM0_1a, "Changes to Earth",sM0_1b, "Changes to Fire",sM0_1b, "Changes to Wind",sM0_1b; + + sM0_1a: + set @SCORE, @SCORE + 10; + + sM0_1b: + + mes "[Raul Expagarus]"; + mes "3. When you max out Napalm Beat, how many times matk will the dmg be?"; + next; + menu "1.6x",sM0_2b, "1.7x",sM0_2a, "2x",sM0_2b, "20x",sM0_2b; + + sM0_2a: + set @SCORE, @SCORE + 10; + + sM0_2b: + + mes "[Raul Expagarus]"; + mes "4. What item is required for stone curse?"; + next; + menu "Red Blood",sM0_3b, "Blue Gem",sM0_3b, "Yellow Gem",sM0_3b, "Red Gem",sM0_3a; + + sM0_3a: + set @SCORE, @SCORE + 10; + + sM0_3b: + + mes "[Raul Expagarus]"; + mes "5. What isn't required for Safety Wall?"; + next; + menu "Napalm Beat Lv 4",sM0_4b, "Soul Strike Lv 5",sM0_4b, "SP Recovery Lv. 6",sM0_4b, "Ice Wall Lv 7",sM0_4a; + + sM0_4a: + set @SCORE, @SCORE + 10; + + sM0_4b: + + mes "[Raul Expagarus]"; + mes "6. How much SP will you regain every 10 sec with lvl 7 SP Rec.?"; + next; + menu "14",sM0_5b, "21",sM0_5a, "28",sM0_5b, "35",sM0_5b; + + sM0_5a: + set @SCORE, @SCORE + 10; + + sM0_5b: + + mes "[Raul Expagarus]"; + mes "7. You have 50% SP, how much dmg will Energy Coat reduce and how much sp will it use?"; + next; + menu "dmg 18%, SP1.5%",sM0_6b, "dmg18%, SP2%",sM0_6a, "dmg 24%, SP1.5%",sM0_6b, "dmg 24%, SP2%",sM0_6b; + + sM0_6a: + set @SCORE, @SCORE + 10; + + sM0_6b: + + mes "[Raul Expagarus]"; + mes "8. Lvl 6 Safety Wall sp consumtion, and number of hits absorbed?"; + next; + menu "SP 40, 6hits",sM0_7b, "SP 35, 6hits",sM0_7b, "SP 40, 7hits",sM0_7a, "SP 35, 7hits",sM0_7b; + + sM0_7a: + set @SCORE, @SCORE + 10; + + sM0_7b: + + mes "[Raul Expagarus]"; + mes "9. Lv. 10 Thunder Storm's Sp Consume"; + next; + menu "84",sM0_8b, "74",sM0_8a, "64",sM0_8b, "54",sM0_8b; + + sM0_8a: + set @SCORE, @SCORE + 10; + + sM0_8b: + + mes "[Raul Expagarus]"; + mes "10. What would be a good skill to use in Byalan Dungeon?"; + next; + menu "Lightning Bolt",sM0_9a, "Fire Bolt",sM0_9b, "Ice Bolt",sM0_9b, "Sight",sM0_9b; + + sM0_9a: + set @SCORE, @SCORE + 10; + + sM0_9b: + goto L_Cont0; + + //Monster Quiz + R_1: + mes "[Raul Expagarus]"; + mes "1. What drops a slot guard?"; + next; + menu "Thief Bug",sM1_0b, "Peco Peco",sM1_0b, "Pupa",sM1_0a, "Mace Kobold",sM1_0b; + + sM1_0a: + set @SCORE, @SCORE + 10; + + sM1_0b: + + mes "[Raul Expagarus]"; + mes "2. Which monster is the easiest for magicians?"; + next; + menu "Flora",sM1_1a, "Gierth",sM1_1b, "Golem",sM1_1b, "Myst",sM1_1b; + + sM1_1a: + set @SCORE, @SCORE + 10; + + sM1_1b: + + mes "[Raul Expagarus]"; + mes "3. What monster is completly immune to Stone Curse?"; + next; + menu "Elder Willow",sM1_2b, "Evil Druid",sM1_2a, "Baek-Ryuhn-Oak",sM1_2b, "Marc",sM1_2b; + + sM1_2a: + set @SCORE, @SCORE + 10; + + sM1_2b: +: + mes "[Raul Expagarus]"; + mes "4. How much dmg do you do with a wind spell to a Water 3 monster?"; + next; + menu "125%",sM1_3b, "150%",sM1_3b, "175%",sM1_3b, "200%",sM1_3a; + + sM1_3a: + set @SCORE, @SCORE + 10; + + sM1_3b: + + mes "[Raul Expagarus]"; + mes "5. Baby Desert Wolves vs Familiar, which one wins?"; + next; + menu "Baby Desert Wolf",sM1_4a, "Farmiliar",sM1_4b, "Tie",sM1_4b, "Don't Know",sM1_4b; + + sM1_4a: + set @SCORE, @SCORE + 10; + + sM1_4b: + + mes "[Raul Expagarus]"; + mes "6. Which monster can't be tamed as a pet?"; + next; + menu "Poporing",sM1_5b, "Roda Frog",sM1_5a, "Smokie",sM1_5b, "Poison Spore",sM1_5b; + + sM1_5a: + set @SCORE, @SCORE + 10; + + sM1_5b: + + mes "[Raul Expagarus]"; + mes "7. Which monster is weak against fire?."; + next; + menu "Knife Goblin",sM1_6b, "Mace Goblin",sM1_6b, "Flail Goblin",sM1_6b, "Hammer Goblin",sM1_6a; + + sM1_6a: + set @SCORE, @SCORE + 10; + + sM1_6b: + + mes "[Raul Expagarus]"; + mes "8. Which monster has the highest magic def?"; + next; + menu "Horong",sM1_7b, "ChonChon",sM1_7b, "Andre",sM1_7b, "Caramel",sM1_7a; + + sM1_7a: + set @SCORE, @SCORE + 10; + + sM1_7b: + + mes "[Raul Expagarus]"; + mes "9. Pick the monster that doesn't belong."; + next; + menu "Poring",sM1_8b, "Mastering",sM1_8b, "Ghostring",sM1_8b, "Spore",sM1_8a; + + sM1_8a: + set @SCORE, @SCORE + 10; + + sM1_8b: + + mes "[Raul Expagarus]"; + mes "10. Which is not a undead?"; + next; + menu "Drake",sM1_9b, "Megalodon",sM1_9b, "Deviace",sM1_9a, "Khalitzburg",sM1_9b; + + sM1_9a: + set @SCORE, @SCORE + 10; + + sM1_9b: + goto L_Cont0; + + //Wizard Quiz + R_2: + mes "[Raul Expagarus]"; + mes "1. What is the most important stat for a Wizard?"; + next; + menu "INT",sM2_0a, "AGI",sM2_0b, "DEX",sM2_0b, "VIT",sM2_0b; + + sM2_0a: + set @SCORE, @SCORE + 10; + + sM2_0b: + + mes "[Raul Expagarus]"; + mes "2. Which element doesn't have a bolt spell?"; + next; + menu "water",sM2_1b, "earth",sM2_1a, "fire",sM2_1b, "wind",sM2_1b; + + sM2_1a: + set @SCORE, @SCORE + 10; + + sM2_1b: + + mes "[Raul Expagarus]"; + mes "3. What is NOT a characteristic of a Wizard?"; + next; + menu "Weak physical abilites",sM2_2b, "Distance Attacks",sM2_2b, "Good money maker",sM2_2a, "High Magic Def",sM2_2b; + + sM2_2a: + set @SCORE, @SCORE + 10; + + sM2_2b: + + mes "[Raul Expagarus]"; + mes "4. Which town is the home of Wizards?"; + next; + menu "Prontera",sM2_3b, "Morroc",sM2_3b, "Alberta",sM2_3b, "Geffen",sM2_3a; + + sM2_3a: + set @SCORE, @SCORE + 10; + + sM2_3b: + + mes "[Raul Expagarus]"; + mes "5. Which card has nothing to do with INT?"; + next; + menu "Andre Card",sM2_4b, "Soldier Andre Card",sM2_4a, "Baby Desert Wolf Card",sM2_4b, "Elder Willow Card",sM2_4b; + + sM2_4a: + set @SCORE, @SCORE + 10; + + sM2_4b: + + mes "[Raul Expagarus]"; + mes "6. What is superior about the mage class compared to others?"; + next; + menu "Close Range Combat",sM2_5b, "High Dodge",sM2_5b, "Dance Skills",sM2_5b, "Magical Power",sM2_5a; + + sM2_5a: + set @SCORE, @SCORE + 10; + + sM2_5b: + + mes "[Raul Expagarus]"; + mes "7. What is the INT bonus at job lvl 40?"; + next; + menu "8",sM2_6b, "7",sM2_6b, "6",sM2_6b, "5",sM2_6a; + + sM2_6a: + set @SCORE, @SCORE + 10; + + sM2_6b: + + mes "[Raul Expagarus]"; + mes "8. Which Item can't be equiped by mages?"; + next; + menu "Knife",sM2_7b, "Cap",sM2_7a, "Sandel",sM2_7b, "Eye of Dullahan",sM2_7b; + + sM2_7a: + set @SCORE, @SCORE + 10; + + sM2_7b: + + mes "[Raul Expagarus]"; + mes "9. During the mage test, which stone is NOT one of the Catalysts?"; + next; + menu "Yellow Gemstone",sM2_8b, "Red Gemstone",sM2_8b, "Blue Gemstone",sM2_8b, "Red Blood",sM2_8a; + + sM2_8a: + set @SCORE, @SCORE + 10; + + sM2_8b: + + mes "[Raul Expagarus]"; + mes "10. Which card has nothing to do with magic?"; + next; + menu "Marduk Card",sM2_9b, "Baek-Rhyun-Oak Card",sM2_9a, "Willow Card",sM2_9b, "Maya Card",sM2_9b; + + sM2_9a: + set @SCORE, @SCORE + 10; + + sM2_9b: + + + L_Cont0: + mes "[Raul Expagarus]"; + mes "Well that's the end of the test. When you get some time afterwards, go get something to eat okay."; + next; + mes "[Raul Expagarus]"; + mes "Anyway, here is your score: ^ff0000"+@SCORE+"^000000 points."; + next; + mes "[Raul Expagarus]"; + if(@SCORE == 100) goto sL_Pass100; + if(@SCORE == 90) goto sL_Pass90; + + sL_Failed: + set WIZ_Q2, 1; + mes "Hmf... You failed, go study some more."; + next; + mes "[Raul Expagarus]"; + mes "You're a long way away. With that low of an intelligence, you have no chance of surviving as a wizard."; + close; + + sL_Pass90: + set WIZ_Q, 3; + set WIZ_Q2, 0; + mes "Hmm, you've missed one question, but I'll let you pass."; + next; + mes "[Raul Expagarus]"; + mes "Don't relax yet! There is still a 3rd test left. While we prepare for the next test, sit and rest a bit."; + close; + + sL_Pass100: + set WIZ_Q, 3; + set WIZ_Q2, 0; + mes "Wonderful! You've passed the 2nd test."; + next; + mes "[Raul Expagarus]"; + mes "Don't relax yet! There is still a 3rd test left. While we prepare for the next test, sit and rest a bit."; + close; + + + L_Test3: + if(WIZ_Q2 == 1) goto sL_ReTest3; + mes "Got some rest? Good. Now, let's start the last test."; + next; + mes "[Raul Expagarus]"; + mes "I'll make a quick explanation of the test, want to hear it?"; + next; + menu "No thank you.",M_1a, "Please go on",M_1b; + + M_1a: + mes "[Raul Expagarus]"; + mes "Ignorant fool! Fine, go die if you wish! Your corpse will be left as food for the monsters."; + emotion 23; + next; + mes "[Raul Expagarus]"; + mes "I'll send you now... By the way, have fun getting slaughtered!"; + next; + savepoint "gef_tower.gat",106,29; + warp "job_wiz.gat",57,154; + end; + + M_1b: + mes "[Raul Expagarus]"; + mes "Good choice. Listen carefully."; + next; + mes "[Raul Expagarus]"; + mes "The is a test of your ability to fight monsters of varying elemental properites."; + mes "There will be 3 different rooms, each containing monsters of a different elemental property."; + next; + mes "[Raul Expagarus]"; + mes "There will be the Room of Water which will have monsters of the water property, followed by the "; + mes "Room of Earth with earth property monsters, and finally the Room of Fire with fire property monsters."; + next; + mes "[Raul Expagarus]"; + mes "You will have 3 minutes for each room. You must kill all of the monsters in the room to be able to advance to the next room."; + next; + mes "[Raul Expagarus]"; + mes "If you use that right spells you should be able to finish the test rather easily. That's all there is to it."; + next; + mes "[Raul Expagarus]"; + mes "You look a little frightened.... give up now and you can return to town....."; + next; + menu "I have no fear! Give me the test!",sM_a, "... tooo scaaarryy... lemme go home(*sob*sob*)",sM_b; + + sM_a: + mes "[Raul Expagarus]"; + mes "Kid, you have courage. We'll start right away!"; + next; + set WIZ_Q2, 1; + savepoint "gef_tower.gat",106,29; + warp "job_wiz.gat",57,154; + end; + + sM_b: + mes "[Raul Expagarus]"; + mes "Good choice. Have a nice peaceful life!"; + warp "geffen.gat",120,110; + end; + + sL_ReTest3: + mes "You want to take the test AGAIN!? You love magic THAT much!?"; + emotion 1; + next; + mes "[Raul Expagarus]"; + mes "You failed last time, so it's time for a quiz! If you don't want to take it, TOO BAD!."; + next; + mes "[Raul Expagarus]"; + mes "Let's start."; + next; + set @SCORE, 0; + + mes "[Raul Expagarus]"; + mes "1. Which monster doesn't exist?"; + next; + menu "Mantis",sM_0b, "Cunner Tooth",sM_0a, "Giearth",sM_0b, "Caramel",sM_0b; + + sM_0a: + set @SCORE, @SCORE + 20; + + sM_0b: + + mes "[Raul Expagarus]"; + mes "2. Which monster is NOT a animal type?"; + next; + menu "Yoyo",sM_1b, "Bigfoot",sM_1b, "Metaller",sM_1b, "Zerom",sM_1a; + + sM_1a: + set @SCORE, @SCORE + 20; + + sM_1b: + + mes "[Raul Expagarus]"; + mes "3. Which monster has no cast sense?"; + next; + menu "Marina",sM_2a, "Vitata",sM_2b, "Scorpion",sM_2b, "Giearth",sM_2b; + + sM_2a: + set @SCORE, @SCORE + 20; + + sM_2b: + + mes "[Raul Expagarus]"; + mes "4. What's a good spell to use on Marin Spheres?"; + next; + menu "Cold Bolt",sM_3b, "Fire Bolt",sM_3b, "Lightning Bolt",sM_3a, "Stone Curse",sM_3b; + + sM_3a: + set @SCORE, @SCORE + 20; + + sM_3b: + + mes "[Raul Expagarus]"; + mes "5. Which monster can move?"; + next; + menu "Hydra",sM_4b, "Mandragora",sM_4b, "Greatest General",sM_4b, "Frilldora",sM_4a; + + sM_4a: + set @SCORE, @SCORE + 20; + + sM_4b: + + mes "[Raul Expagarus]"; + mes "Your score is ^ff0000" +@SCORE+ "^000000 pts."; + next; + mes "[Raul Expagarus]"; + if (@SCORE >= 80) goto sL_Passed3; + + sL_Failed3: + mes "You Failed! Go study some more!"; + next; + mes "[Raul Expagarus]"; + mes "You aren't fit to be a wizard, why do you think you failed!?"; + close; + + sL_Passed3: + if (@SCORE == 100) mes "If you're so smart, why couldn't you pass the test the first time?"; + if (@SCORE == 80) mes "Kehe, almost perfect. I'll let you try again."; + next; + menu "Let's start!",M_2a, "Explain the test again please.",M_1b; + + M_2a: + mes "[Raul Expagarus]"; + mes "I won't help you even if you die this time. Don't come crying to me if you fail again.... hehe."; + next; + percentheal 100,100; + mes "[Raul Expagarus]"; + mes "I'll send you to the arena now. Have fun getting your butt whooped!"; + next; + savepoint "gef_tower.gat",106,29; + warp "job_wiz.gat",55,156; + end; +} + + +<====================================================== Test Arena ========================================================>\\ +// Test Guide --------------------------------------------------------------------------------- +job_wiz.gat,50,165,4 script Wizard Test Guide::WzTG 123, +{ + mes "[Test Guide]"; + mes "Welcome. I will be your guide for the Wizard Test."; + next; + menu "I would like to take the test.",M_0, "I would like to leave.",M_1; + + M_0: + mes "[Test Guide]"; + mes "As you have been told you will have 3 minutes to finish each portion of the test."; + mes "I will periodically announce how much time you have left for each room on a minute by minute basis."; + next; + mes "[Test Guide]"; + mes "Please enter the 'Wizard Test Waiting Room' when you are ready to take the test."; + mes "When the testing room is ready you will be automatically warped there and the exam will begin."; + next; + mes "[Test Guide]"; + mes "Good luck!"; + close; + M_1: + mes "[Test Guide]"; + mes "I see. I will send you back."; + next; + warp "gef_tower.gat",106, 35; + end; + +OnInit: + waitingroom "Wizard Test Waiting Room",8,"WzTG::OnStart",1; + end; + +OnStart: + set $@WzUsers, getareausers("job_wiz.gat", 98, 154, 129, 185); // get user count for first lvl + set $@WzUsers, $@WzUsers + getareausers("job_wiz.gat", 100, 82, 131, 113); // get user count for second lvl + first lvl + set $@WzUsers, $@WzUsers + getareausers("job_wiz.gat", 30, 82, 61, 113); // get user count for third lvl + second lvl + first lvl + if ($@WzUsers > 0) end; + + if ((getwaitingroomstate(33)) == 0) end; // finds out if there is anyone in the waiting room + disablenpc "waterwrp"; //disables the warps + disablenpc "waterwarpW"; + disablenpc "waterwarpN"; + disablenpc "waterwarpS"; + disablenpc "earthwrp"; + disablenpc "earthwarpW"; + disablenpc "earthwarpN"; + disablenpc "earthwarpS"; + disablenpc "firewrp"; + disablenpc "firewarpN"; + disablenpc "firewarpW"; + disablenpc "firewarpS"; + killmonsterall "job_wiz.gat"; //makes sure there are no left over mobs from other testers + warpwaitingpc "job_wiz.gat",114,169; + donpcevent "WaterRm"; + end; +} + +// Room of Water ----------------------------------------------------------------------------- +job_wiz.gat,1,1,1 script WaterRm -1, +{ + set $@WzRm, 1; // used to determine which map area(room) to make time announcements in + set $@WzMOB, 8; //used as a counter for the monsters that are summoned + monster "job_wiz.gat",109,174,"Phen",1158,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",118,174,"Kukre",1070,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",98,170,"Kukre",1070,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",109,165,"Vadon",1066,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",118,165,"Cornutus",1067,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",101,157,"Marina",1141,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",126,157,"Marin",1242,1,"WaterRm::OnMyMobDead1"; + monster "job_wiz.gat",129,170,"Obeaune",1044,1,"WaterRm::OnMyMobDead1"; + initnpctimer "TimerWz"; + end; + +OnMyMobDead1: //when a monster dies this portion of script is run + set $@WzMOB, $@WzMOB - 1; + if ($@WzMOB > 0) end; + + stopnpctimer "TimerWz"; + set $@WzMOB, 0; + addtimer 2000, "WaterRm::OnTimer2000"; + end; + +OnTimer2000: + set $@WzMOB, 5; + areaannounce "job_wiz.gat", 98, 154, 129, 185, "[Test Guide]: You must now defeat the door gaurds! Hurry!",8; + monster "job_wiz.gat",114,169,"Marine Sphere",1142,1,"WaterRm::OnMyMobDead2"; + monster "job_wiz.gat",112,169,"Hydra",1068,1,"WaterRm::OnMyMobDead2"; + monster "job_wiz.gat",116,169,"Hydra",1068,1,"WaterRm::OnMyMobDead2"; + monster "job_wiz.gat",114,171,"Hydra",1068,1,"WaterRm::OnMyMobDead2"; + monster "job_wiz.gat",114,167,"Hydra",1068,1,"WaterRm::OnMyMobDead2"; + setnpctimer 120000, "TimerWz"; + startnpctimer "TimerWz"; + end; + +OnMyMobDead2: + set $@WzMOB, $@WzMOB - 1; + if ($@WzMOB > 0) end; + + stopnpctimer "TimerWz"; + set $@WzMOB, 0; + areaannounce "job_wiz.gat", 98, 154, 129, 185, "[Test Guide]: Well done. You have completed the Room of Water. Get ready for the Room of Earth.",8; + percentheal 100,100; + enablenpc "waterwrp"; + enablenpc "waterwarpW"; + enablenpc "waterwarpN"; + enablenpc "waterwarpS"; + initnpctimer "waterwrp"; // warps the player after 30 secs even if they don't enter the warps + end; +} + +// Room of Earth ----------------------------------------------------------------------------------------------- +job_wiz.gat,1,1,1 script EarthRm -1, +{ + set $@WzRm, 2; + set $@WzMOB, 10; + monster "job_wiz.gat",111,102,"Yoyo",1057,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",120,102, "Deniro",1105,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",111,102, "Caramel",1103,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",120,102,"Hode",1127,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",111,93,"Savage",1166,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",120,93,"Giearth",1121,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",107,98,"Bigfoot",1160,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",124,98,"Orc Warrior",1023,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",104,86,"Vitata",1176,1,"EarthRm::OnMyMobDead1"; + monster "job_wiz.gat",127,86,"Mantis",1139,1,"EarthRm::OnMyMobDead1"; + initnpctimer "TimerWz"; + end; + +OnMyMobDead1: + set $@WzMOB, $@WzMOB - 1; + if ($@WzMOB > 0) end; + + stopnpctimer "TimerWz"; + addtimer 2000, "EarthRm::OnTimer2000"; + set $@WzMOB, 0; + end; + +OnTimer2000: + set $@WzMOB, 7; + areaannounce "job_wiz.gat", 100, 82, 131, 113, "[Test Guide]: You now must defeat the door gaurds! Hurry!.",8; + monster "job_wiz.gat",116,97,"Flora",1118,1,"EarthRm::OnMyMobDead2"; + monster "job_wiz.gat",114,95,"Mandragora",1020,1,"EarthRm::OnMyMobDead2"; + monster "job_wiz.gat",118,95,"Mandragora",1020,1,"EarthRm::OnMyMobDead2"; + monster "job_wiz.gat",114,99,"Mandragora",1020,1,"EarthRm::OnMyMobDead2"; + monster "job_wiz.gat",118,99,"Mandragora",1020,1,"EarthRm::OnMyMobDead2"; + monster "job_wiz.gat",116,94,"Mandragora",1020,1,"EarthRm::OnMyMobDead2"; + monster "job_wiz.gat",116,100,"Mandragora",1020,1,"EarthRm::OnMyMobDead2"; + setnpctimer 120000, "TimerWz"; + startnpctimer "TimerWz"; + end; + +OnMyMobDead2: + set $@WzMOB, $@WzMOB - 1; + if ($@WzMOB > 0) end; + + stopnpctimer "TimerWz"; + set $@WzMOB, 0; + areaannounce "job_wiz.gat", 100, 82, 131, 113, "[Test Guide]: Well done. You have completed the Room of Earth. Get ready for the Room of Fire.",8; + percentheal 100,100; + enablenpc "earthwrp"; + enablenpc "earthwarpN"; + enablenpc "earthwarpW"; + enablenpc "earthwarpS"; + initnpctimer "earthwrp"; + end; +} + +// Room of Fire ------------------------------------------------------------------------------------------------------------ +job_wiz.gat,1,1,1 script FireRm -1, +{ + set $@WzRm, 3; + set $@WzMOB, 8; + monster "job_wiz.gat",58,110,"Zerom",1178,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",33,110,"Flail Goblin",1123,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",40,103,"Scorpion",1001,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",51,103,"Frilldora",1119,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",40,92,"Peco Peco",1019,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",51,92,"Elder Willow",1033,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",37,89,"Metaller",1058,1,"FireRm::OnMyMobDead1"; + monster "job_wiz.gat",54,89,"Desert Wolf",1106,1,"FireRm::OnMyMobDead1"; + initnpctimer "TimerWz"; + end; + +OnMyMobDead1: + set $@WzMOB, $@WzMOB - 1; + if ($@WzMOB > 0) end; + + stopnpctimer "TimerWz"; + addtimer 2000, "FireRm::OnTimer2000"; + set $@WzMOB, 0; + end; + +OnTimer2000: + set $@WzMOB, 3; + areaannounce "job_wiz.gat", 30, 82, 61, 113, "[Test Guide]: You now must defeat the door gaurds! Hurry!.",8; + monster "job_wiz.gat",44,99,"Greatest General",1277,1,"FireRm::OnMyMobDead2"; + monster "job_wiz.gat",43,99,"Horong",1129,1,"FireRm::OnMyMobDead2"; + monster "job_wiz.gat",45,99,"Horong",1129,1,"FireRm::OnMyMobDead2"; + setnpctimer 120000, "TimerWz"; + startnpctimer "TimerWz"; + end; + +OnMyMobDead2: + set $@WzMOB, $@WzMOB - 1; + if ($@WzMOB > 0) end; + + stopnpctimer "TimerWz"; + set $@WzMOB, 0; + set WIZ_Q, 4; + set WIZ_Q2, 0; + areaannounce "job_wiz.gat", 30, 82, 61, 113, "[Test Guide]: Well done. You have completed the Room of Fire and the entire test.",0; + enablenpc "firewrp"; + enablenpc "firewarpN"; + enablenpc "firewarpW"; + enablenpc "firewarpS"; + initnpctimer "firewrp"; + end; +} + + +// Timer ----------------------------------------------------------------------------------------------- +job_wiz.gat,1,1,1 script TimerWz -1, +{ + +OnTimer1000: + if($@WzRm==1) areaannounce "job_wiz.gat", 98, 154, 129, 185, "[Test Guide]: Room of Water, testing will begin.",8; + if($@WzRm==2) areaannounce "job_wiz.gat", 100, 82, 131, 113, "[Test Guide]: Room of Earth, testing will begin.",8; + if($@WzRm==3) areaannounce "job_wiz.gat", 30, 82, 61, 113, "[Test Guide]: Room of Fire, testing will begin.",8; + end; +OnTimer4000: + set $@WzTime$, "You have 3 minutes to defeat all of the monsters in this room starting now!"; + donpcevent "WzTG::OnStart"; //checks to see if anyone is still in the room, in case of logout or KO + callsub AnnounceWz; +OnTimer34000: + donpcevent "WzTG::OnStart"; + end; +OnTimer64000: + set $@WzTime$, "You have 2 minutes left!"; + donpcevent "WzTG::OnStart"; + callsub AnnounceWz; +OnTimer94000: + donpcevent "WzTG::OnStart"; + end; +OnTimer124000: + set $@WzTime$, "You have 1 minute left!"; + donpcevent "WzTG::OnStart"; + callsub AnnounceWz; +OnTimer154000: + set $@WzTime$, "You have 30 seconds left!"; + donpcevent "WzTG::OnStart"; + callsub AnnounceWz; +OnTimer174000: + set $@WzTime$, "You have 10 seconds left!"; + callsub AnnounceWz; +OnTimer184000: + set $@WzTime$, "Time is up. You have failed the test."; + callsub AnnounceWz; +OnTimer188000: + stopnpctimer; + if($@WzRm==1) areawarp "job_wiz.gat", 98, 154, 129, 185, "gef_tower.gat",106, 35; + if($@WzRm==2) areawarp "job_wiz.gat", 100, 82, 131, 113, "gef_tower.gat",106, 35; + if($@WzRm==3) areawarp "job_wiz.gat", 30, 82, 61, 113, "gef_tower.gat",106, 35; + killmonsterall "job_wiz.gat"; + donpcevent "WzTG::OnStart"; + end; + +AnnounceWz: + if($@WzRm==1) areaannounce "job_wiz.gat", 98, 154, 129, 185, "[Test Guide]: "+$@WzTime$+".",8; + if($@WzRm==2) areaannounce "job_wiz.gat", 100, 82, 131, 113, "[Test Guide]: "+$@WzTime$+".",8; + if($@WzRm==3) areaannounce "job_wiz.gat", 30, 82, 61, 113, "[Test Guide]: "+$@WzTime$+".",8; + end; +} + + +// Warps ------------------------------------------------------------------------------------------ + +// Water +job_wiz.gat,129,169,1 script waterwarpE::waterwrp 45,1,1,{ + +OnTimer30000: + stopnpctimer "waterwrp"; + areawarp "job_wiz.gat", 98, 154, 129, 185, "job_wiz.gat",116,98; + donpcevent "EarthRm"; + end; +} +job_wiz.gat,98,169,1 duplicate(waterwrp) waterwarpW 45,1,1 +job_wiz.gat,114,185,1 duplicate(waterwrp) waterwarpN 45,1,1 +job_wiz.gat,114,154,1 duplicate(waterwrp) waterwarpS 45,1,1 + + +// Earth +job_wiz.gat,131,98,1 script earthwarpE::earthwrp 45,1,1,{ + +OnTimer30000: + stopnpctimer "earthwrp"; + areawarp "job_wiz.gat", 100, 82, 131, 113, "job_wiz.gat",47,98; + donpcevent "FireRm"; + end; +} +job_wiz.gat,100,98,1 duplicate(earthwrp) earthwarpW 45,1,1 +job_wiz.gat,116,82,1 duplicate(earthwrp) earthwarpN 45,1,1 +job_wiz.gat,116,113,1 duplicate(earthwrp) earthwarpS 45,1,1 + + +// Fire +job_wiz.gat,61,97,1 script firewarpE::firewrp 45,1,1,{ + +OnTimer30000: + stopnpctimer "firewrp"; + areawarp "job_wiz.gat", 30, 82, 61, 113, "gef_tower.gat",106,35; + donpcevent "WzTG::OnStart"; + end; +} +job_wiz.gat,30,97,1 duplicate(firewrp) firewarpW 45,1,1 +job_wiz.gat,46,113,1 duplicate(firewrp) firewarpN 45,1,1 +job_wiz.gat,46,82,1 duplicate(firewrp) firewarpS 45,1,1 diff --git a/npc/jobs/2-2-1/Champion.txt b/npc/jobs/2-2-1/Champion.txt new file mode 100644 index 000000000..746f79cf9 --- /dev/null +++ b/npc/jobs/2-2-1/Champion.txt @@ -0,0 +1,61 @@ +//Champion Made by Evera/Lorri +valkyrie.gat,53,42,4 script Champion 52,{ + if (readparam(12) != 0) goto Lskpt; + if ((readparam(11) >= 99) && (readparam(19) == 15) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4005) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4005) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4016) goto Lcrazy; + mes "[Champion]"; + mes "Hello"; + mes "Nice day isn't it?"; + close; +Lnovice: + mes "[Champion]"; + mes "Your holy fist seems strong enough. Hmm.."; + mes "If you devote yourself entirely you can be just like me."; + mes "There is a catch though, you have to go back through novice and acolyte."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[Champion]"; + mes "Ready to become a high acolyte?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[Champion]"; + mes "Your hands are now enchanted with a portion of my power."; + next; + jobchange 28;// Job: Job_Acolyte_High + close; +Lh2: + mes "[Champion]"; + mes "Your fists are now as strong as mine. Will you take the final step and become a champion?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[Champion]"; + mes "Your hands are now enchanted with a portion of my power."; + jobchange 39;// Job: Job_Champion + close; +Lcrazy: + mes "[Champion]"; + mes "No, I'm not here to fight?"; + close; +Lskpt: + mes "[Champion]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Champion]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-2-1/Clown.txt b/npc/jobs/2-2-1/Clown.txt new file mode 100644 index 000000000..eb88a88ee --- /dev/null +++ b/npc/jobs/2-2-1/Clown.txt @@ -0,0 +1,122 @@ +//Made by Veev for eAthena +valkyrie.gat,53,54,4z script Clown 741,{ + +mes "[Clown]"; +mes "Well, would you like to sing a song...?"; +mes "But I'll start the song off for you..."; +goto cmenu; + + cmenu: + menu "I'm not here to sing.",nosing,"Alright...",alright; + + nosing: + mes "[Clown]"; + mes "Really?... I see. What brings you here then?"; + menu "I would like to become a Clown",clown,"Nothing...",nothing; + + clown: + mes "[Clown]"; + mes "Hmm... Let me make sure you are clown-material..."; + next; + if (sex==0) goto female; + if (SkillPoint != 0) goto useskpt; + if ((BaseLevel >= 99) && (Class == 19) && (readparam(55) >= 50)) goto highnovice; + if ((Class == 4001) && (readparam(55) >= 10)) goto higharcher; + if ((Class == 4004) && (readparam(55) >= 40)) goto turnclown; + if ((Class == 4004) && (readparam(55) < 40)) goto toolowha; + if (Class == 4020) goto alreadyclown; + mes "Sorry, but you can't become a clown just yet..."; + close; + + female: + mes "[Clown]"; + mes "This job is only for guys... Maybe you should talk to the Gypsy..."; + close; + + highnovice: + mes "[Clown]"; + mes "You are on the right track... But first I need to turn you into a High Novice..."; + mes "Would you like to become a High Novice now?"; + menu "Yes",hn_yes,"No",hn_no; + + hn_yes: + mes "[Clown]"; + mes "This will only be a second..."; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; + + hn_no: + mes "[Clown]"; + mes "Come back later if you want to change..."; + close; + + higharcher: + mes "[Clown]"; + mes "Even closer to clown now!"; + mes "Wanna change into a High Archer now?"; + menu "Yes",ha_yes,"No",ha_no; + + ha_yes: + mes "[Clown]"; + mes "After this step, you'll be a clown in no time!"; + jobchange 27;// Job: Job_Archer_High + close; + + ha_no: + mes "[Clown]"; + mes "Well... You can always come back."; + close; + + turnclown: + mes "[Clown]"; + mes "My favorite part of this job! This is exciting!"; + mes "I'll change you into a Clown now."; + menu "Alright!",tc_yes,"Not yet...",tc_no; + + tc_yes: + mes "[Clown]"; + mes "I love this job!"; + jobchange 43;// Job: Job_Clown + next; + mes "[Clown]"; + mes "Have fun!"; + close; + + tc_no: + mes "[Clown]"; + mes "Well... That kinda ruined my day..."; + close; + + alreadyclown: + mes "[Clown]"; + mes "You are already a Clown!"; + mes "Move out of the way and let other people become one"; + close; + + useskpt: + mes "[Clown]"; + mes "You need to use those skillpoitns up first."; + close; + + towlowha: + mes "[Clown]"; + mes "Aww, you aren't ready yet! Please come back again when you are ready."; + close; + + nothing: + mes "[Clown]"; + mes "Sigh..."; + close; + + alright: + mes "[Clown]"; + if (class != 19) goto notbard; + mes "Actually you know what... Maybe another time... You don't look like a singer..."; + close; + + notbard: + mes "[Clown]"; + mes "... Nice try, but you aren't a Bard... Go bother someone else."; + close; +} diff --git a/npc/jobs/2-2-1/Creator.txt b/npc/jobs/2-2-1/Creator.txt new file mode 100644 index 000000000..0b0913cf9 --- /dev/null +++ b/npc/jobs/2-2-1/Creator.txt @@ -0,0 +1,61 @@ +//Creator Made by Evera/Lorri 1.1 + +valkyrie.gat,53,50,6 script Creator 122,{ + if (readparam(12) != 0) goto Lskpt; + if ((readparam(11) >= 99) && (readparam(19) == 18) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4006) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4006) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4019) goto Lcrazy; + mes "[Creator]"; + mes "Hello"; + mes "Sorry, no potions for sale."; + close; +Lnovice: + mes "[Creator]"; + mes "Hm. You seem to have extensive knowledge in chemistry. Would you like to become a creator?"; + mes "There is a catch though, you have to go back through novice and merchant."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[Creator]"; + mes "Ready to become a high merchant?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[Creator]"; + mes "Here, take this potion."; + next; + jobchange 29;// Job: Job_Merchant_High + close; +Lh2: + mes "[Creator]"; + mes "You knowledge unbounds you. Will you become a professor?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[Creator]"; + mes "Here, take this potion."; + jobchange Job_Creator; //42 + close; +Lcrazy: + mes "[Creator]"; + mes "Hm. You look like me."; + close; +Lskpt: + mes "[Creator]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Creator]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-2-1/Gypsy.txt b/npc/jobs/2-2-1/Gypsy.txt new file mode 100644 index 000000000..24efc9d86 --- /dev/null +++ b/npc/jobs/2-2-1/Gypsy.txt @@ -0,0 +1,89 @@ +//Made by Evera/Lorri +valkyrie.gat,53,56,4 script Gypsy 101,{ +if (sex==1) goto Lmale; +if (readparam(12) != 0) goto Lskpt; +if ((BaseLevel >= 99) && (readparam(19) == 20) && (readparam(55) >= 50)) goto Lnovice; +if ((readparam(19) == 24) && (joblevel >= 10)) goto Larcher; +if ((readparam(19) == 27) && (joblevel >= 40)) goto Lgypsy2; +if ((readparam(19) == 27) && (joblevel < 40)) goto Lgypsy3; +if (readparam(19) == 44) goto Lomg; + +Lnovice: +mes "[Gypsy]"; +mes "Hey you there! Are you a dancer?"; +mes "There's a secret I wanna tell you.. You can get even more dances if you become a Gypsy! So do you wanna be a gypsy?"; +menu +"Yes",Lyes,"No way, you crazy?",Lcancel; +Lyes: + mes "Hmm...?"; + next; + mes "Alright, do you know the requirements? You have to be strong and adept at battling and dancing."; + mes "Level 99 and Job Level 50!"; + mes "You have to be a dancer ofcourse"; + mes "You sure you want to become a gypsy? You'll go back to a 1/1 novice..."; + menu "Yes",Lnyes,"No",Lano; + +Lmale: + mes "[Gypsy]"; + mes "Shoo! Boys!"; + close; + +Lnyes: +if (readparam(12) != 0) goto Lskpt; + mes "Come back in 10 job levels then. Good luck!"; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; + +Larcher: + mes "[Gypsy]"; + mes "You can almost dance!"; + mes "Change into a high archer?"; + menu "Yes",Layes,"No",Lano; + +Layes: +if (readparam(12) != 0) goto Lskpt; + mes "Hurry up and get 40 job levels!"; + jobchange 27;// Job: Job_Archer_High + close; + + + +Lgypsy2: + mes "I will now dance a magical dance for you."; + mes "One last chance, do you truly want to become a gypsy?"; + menu "..Yes",Lcyes,"Not yet...",Lano; + +Lcyes: +if (readparam(12) != 0) goto Lskpt; + mes "Congratulations! You are now a gypsy"; + jobchange 44;// Job: Job_Gypsy + next; + mes "[Gypsy]"; + mes "Don't outdo yourself"; + close; + +Lskpt: + mes "[Gypsy]"; + mes "You need to use those skillpoints up first."; + close; + +Lgypsy3: + mes "[Gypsy]"; + mes "Doesn't look like you're sufficient for the job"; + close; + +Lano: + mes "Well, goodbye!"; + close; + +Lcancel: + mes "[Gypsy]"; + mes "Well bye then.."; + close; + +Lomg: + mes "[Gypsy]"; + mes "Wait.. Haven't I seen you before?"; + close; +} diff --git a/npc/jobs/2-2-1/Paladin.txt b/npc/jobs/2-2-1/Paladin.txt new file mode 100644 index 000000000..e7e82c0a4 --- /dev/null +++ b/npc/jobs/2-2-1/Paladin.txt @@ -0,0 +1,62 @@ +//Paladin Made by Evera/Lorri +//Fixed by PoW +valkyrie.gat,53,39,4 script Paladin 752,{ + if (SkillPoint != 0) goto Lskpt; + if ((readparam(11) >= 99) && (readparam(19) == 14) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(11) >= 99) && (readparam(19) == 21) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4002) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4002) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4015) goto Lcrazy; + mes "[Paladin]"; + mes "Hello"; + mes "God will always be there to help."; + close; +Lnovice: + mes "[Paladin]"; + mes "Your holy aura is strong. Will you become a paladin?"; + mes "There is a catch though, you have to go back through novice and merchant."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[Paladin]"; + mes "Ready to become a high swordsman?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[Paladin]"; + mes "By the holy resovoir in this blessed sword, I crown you."; + next; + jobchange 25;// Job: Job_Swordman_High + close; +Lh2: + mes "[Paladin]"; + mes "Your holy aura is extremely high. You are ready. Will you become a paladin?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[Paladin]"; + mes "By the holy resovoir in this blessed sword, I crown you."; + jobchange 38;// Job: Job_Paladin + close; +Lcrazy: + mes "[Paladin]"; + mes "God has helped you very much."; + close; +Lskpt: + mes "[Paladin]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Paladin]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-2-1/Professor.txt b/npc/jobs/2-2-1/Professor.txt new file mode 100644 index 000000000..5ce78da48 --- /dev/null +++ b/npc/jobs/2-2-1/Professor.txt @@ -0,0 +1,61 @@ +//Professor Made by Evera/Lorri +//Fixed by PoW +valkyrie.gat,53,47,4 script Professor 743,{ + if (readparam(12) != 0) goto Lskpt; + if ((readparam(11) >= 99) && (readparam(19) == 16) && (readparam(55) >= 50)) goto Lnovice; + if ((readparam(19) == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((readparam(19) == 4001) && (readparam(55) < 10)) goto LCem; + if ((readparam(19) == 4003) && (readparam(55) >= 40)) goto Lh2; + if ((readparam(19) == 4003) && (readparam(55) < 40)) goto LCem; + if (readparam(19) == 4017) goto Lcrazy; + mes "[Professor]"; + mes "Hello"; + mes "Knowledge is the key."; + close; +Lnovice: + mes "[Professor]"; + mes "You seem smart. Hm. Do you wish to persue your dream of knowledge and become a professor like me?"; + mes "There is a catch though, you have to go back through novice and mage."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[Professor]"; + mes "Ready to become a high mage?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[Professor]"; + mes "Read this book, you'll be enchanted by its magic"; + next; + jobchange 26;// Job: Job_Mage_High + close; +Lh2: + mes "[Professor]"; + mes "It appears as your intelligence quota surpasses mine. Will you become a professor"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[Professor]"; + mes "Read this book, you'll be enchanted by its magic"; + jobchange 40;// Job: Job_Professor + close; +Lcrazy: + mes "[Professor]"; + mes "Your intelligence will surpass many other unfortunate souls who have not found truth in a book."; + close; +Lskpt: + mes "[Professor]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Professor]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-2-1/Stalker.txt b/npc/jobs/2-2-1/Stalker.txt new file mode 100644 index 000000000..cb1b9119d --- /dev/null +++ b/npc/jobs/2-2-1/Stalker.txt @@ -0,0 +1,59 @@ +//Stalker Made by Evera/Lorri +valkyrie.gat,53,58,4 script Stalker 747,{ + if (readparam(12) != 0) goto Lskpt; + if ((readparam(11) >= 99) && (Class == 18) && (JobLevel >= 50)) goto Lnovice; + if ((Class == 4001) && (readparam(55) >= 10)) goto Lh1; + if ((Class == 4001) && (readparam(55) < 10)) goto LCem; + if ((Class == 4007) && (readparam(55) >= 40)) goto Lh2; + if ((Class == 4007) && (readparam(55) < 40)) goto LCem; + if (Class == 4018) goto Lcrazy; + mes "[Stalker]"; + mes "..."; + close; +Lnovice: + mes "[Stalker]"; + mes "Hm. You seem like a person that would be interested. Would you want to become a stalker?"; + mes "There is a catch though, you have to go back through novice and theif."; + mes "You wanna do it?"; + menu "Yes",Lnovice2,"No",Lcancel; +Lnovice2: + mes "We shall start the ceremony...."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +Lh1: + mes "[Stalker]"; + mes "Ready to become a theif?"; + menu "Yes",Lh12,"No",Lcancel; +Lh12: + mes "[Stalker]"; + mes "Hmf."; + next; + jobchange 30;// Job: Job_Thief_High + close; +Lh2: + mes "[Stalker]"; + mes "Hm. You're ready. Become a stalker?"; + menu "Yes",Lh22,"No",Lcancel; +Lh22: + mes "[Stalker]"; + mes "Hmf."; + jobchange 41;// Job: Job_Stalker + close; +Lcrazy: + mes "[Stalker]"; + mes "I'm done with you."; + close; +Lskpt: + mes "[Stalker]"; + mes "Use your skillpoints first"; + close; +LCem: + mes "[Stalker]"; + mes "You're not ready to go to the next level"; + close; +Lcancel: + mes "Bye"; + close; +} diff --git a/npc/jobs/2-2/alchemist.txt b/npc/jobs/2-2/alchemist.txt new file mode 100644 index 000000000..45f1ae5a2 --- /dev/null +++ b/npc/jobs/2-2/alchemist.txt @@ -0,0 +1,1078 @@ +//===== eAthena Script ======================================= +//= Alchemist Job Quest +//===== By: ================================================== +//= nestor_zulueta (Fusion) +//= converted by Darkchild +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 + +//===== Description: ========================================= +//= Alchemist job quest based off of official iRO quest. +//===== Additional Comments: ================================= +//= v1.0 Working. +//= npc/quests/counteragent_mixture.txt Also Needed +//= npc/quests/quests_yuno.txt Also Needed [Darkchild] +//= v1.1 Fixed some minor bugs. Optimized some lines. Re-organized the script a bit. +//= Giving Parmry NPC, Hammer and Old Book now waves the 50000 fee. (based of mRO website) +//= Having a joblvl of 50 allows you to skip Raspuchin's test. (based of mRO website) [kobra_k88] +//============================================================ + + +//==================================================================================================// +// Registration and First Test +//==================================================================================================// +alde_alche.gat,27,185,4 script Parmry Gianino 744, +{ + mes "[Parmry Gianino]"; + if(Class == 5) goto L_Merc; + if(Class == Job_Alchem) goto L_Alch; +L_Other: + mes "Welcome to the Alchemist Union. Ah, I apologize but I'm busy right now."; + close; +L_Alch: + mes "Hey there fellow Alchemist. How's the business going? Good I hope, well good luck to you."; + close; +L_Merc: + if(ALCH_Q == 1) goto L_Check; + if(ALCH_Q == 2) goto L_Test2; + if(ALCH_Q == 3) goto L_Test3; + if(ALCH_Q == 4) goto L_Test4; + if(ALCH_Q == 5) goto L_Test5; + if(ALCH_Q == 6) goto L_Test6; + if(ALCH_Q == 7) goto L_GoChange; + mes "Welcome to the Alchemist Union."; + mes "How may i help you?"; + next; + menu "I would like to learn about Alchemey",M_Learn, "I want to become an Alchemist.",L_Start, "Nothing.",M_End; + + M_Learn: + mes "[Parmry Gianino]"; + mes "Alchemists study and create new materials using a variety of existing substances."; + mes "They research the atoms of chemicals, and experiment to change the properties of the chemicals."; + next; + mes "[Parmry Gianino]"; + mes "Most people think the final goal is to create gold, but that's not the entire truth."; + mes "They make anything from simple medicines, to new materials."; + next; + mes "[Parmry Gianino]"; + mes "At times, some research the creation of life .... but that's considered god's territory..."; + mes "That field is so complex, everyone simply researhes for now."; + next; + mes "[Parmry Gianino]"; + mes "If you are interested in becoming an Alchemist, I recommend that you gain a lot experience as a Merchant."; + mes "Being a merchant is a great opportunity to learn about materials while you deal with them."; + next; + mes "[Parmry Gianino]"; + mes "Only you can decide for yourself."; + mes "The road to becoming an Alchemist is very challenging."; + mes "You will need to focus on experimenting and researching rather than trade."; + close; + M_End: + mes "[Parmry Gianino]"; + mes "Umm... Please say something if you need anything."; + close; +L_Start: + mes "[Parmry Gianino]"; + if(JobLevel < 40) goto L_LowLvl; + mes "Is that so? My name is Parmry Gianino of the Alchemist Association."; + mes "Nice to meet you."; + next; + mes "[Parmry Gianino]"; + mes "If you join our Union and pass some training you will be officially recognized,"; + mes "as an Alchemist and be able to join our researches."; + next; + mes "[Parmry Gianino]"; + mes "But we dont accept everyone."; + mes "You must have a lot of effort, tenacity, and be able to devote yourself to research."; + next; + mes "[Parmry Gianino]"; + mes "There are a couple of requirements to join the association...."; + mes "but we'll discuss that after you apply."; + next; + mes "[Parmry Gianino]"; + mes "Then, would you like to apply to register?"; + next; + menu "I would like to apply.",M_Apply,"I'll do it later.",-; + + mes "[Parmry Gianino]"; + mes "If you are a talented Merchant,"; + mes "you are always welcome here."; + mes "Come again soon."; + close; + M_Apply: + mes "[Parmry Gianino]"; + mes "Fill out this application form please....."; + next; + mes "(you fill out the form and hand it back)"; + next; + mes "[Parmry Gianino]"; + mes "Very good. In order to join the Alchemist Union you must first pay a ^5533FF50,000^000000 zeny membership fee."; + mes "You will also need to bring us a few items as well."; + next; + mes "[Parmry Gianino]"; + mes "Of course if you bring us an ^5533FFOld Magic Book^000000 and an ^5533FFHammer of Blacksmith^000000..."; + mes "You won't have to pay the fee."; + next; + mes "[Parmry Gianino]"; + mes "Let's see.... you'll need to bring us....^5533FF100 Mini Furnaces^000000."; + mes "Once you have the Mini Furnaces come back and see me."; + next; + mes "[Parmry Gianino]"; + mes "When you come back I will also collect the ^5533FF50,000^000000 zeny fee so don't forget about that either."; + mes "See you soon..."; + set ALCH_Q,1; + close; +L_LowLvl: + mes "You must be at least Job Level 40 to become a Alchemist."; + close; + +L_Check: + mes "Oh, your back already... lets see...."; + next; + mes "[Parmry Gianino]"; + if(countitem(612) < 100) goto L_NoItems; + if(countitem(1005) > 0 && countitem(1006) > 0) goto L_Skip; + if(zeny < 50000) goto L_NoZeny; + set zeny,zeny - 50000; + delitem 612, 100; + mes "You have 50,000 zeny...... You brought 100 mini furnaces.... Great!"; + mes "Now you are ready to learn the basics of being an Alchemist."; + next; + + L_Cont: + mes "[Parmry Gianino]"; + mes "But before that... ^5533FFRaspuchin^000000 wants to see you....."; + mes "Hmm..... I'm not sure what it could be about...."; + next; + mes "[Parmry Gianino]"; + mes "You should go visit him now. Just go down those stairs to my right. His room is in the SouthEastern corner."; + set ALCH_Q,2; + close; + + L_NoZeny: + mes "You still need to pay the ^FF553350,000^000000 zeny membership fee."; + mes "Let me know when you have enough money."; + close; + L_NoItems: + mes "As I mentioned before, you must bring ^FF3355100 Mini Furnaces^000000 to join the union."; + mes "Please come back when you are ready..."; + close; +L_Skip: + mes "Oh, you have an ^5533FFOld Magic Book^000000 and an ^5533FFHammer of Blacksmith^000000........"; + mes "That means you don't have to pay the membership fee."; + next; + mes "[Parmy Gianino]"; + mes "Excellent. Now I'll just take the Book, Hammer, 100 mini furnaces, and you'll be all set to learn the basics of being an Alchemist."; + next; + delitem 1005,1; + delitem 1006,1; + delitem 612, 100; + goto L_Cont; + +L_Test2: + mes "Go visit ^5533FFRaspuchin^000000 now!"; + close; +L_Test3: + mes "Go visit ^5533FFDarwin^000000 now!"; + close; +L_Test4: + mes "Go visit ^5533FFVan Helmont^000000 now!"; + close; +L_Test5: + mes "Go visit ^5533FFNicholas Flamel^000000 now!"; + close; +L_Test6: + mes "Go back to ^5533FFNicholas Flamel^000000 now!"; + mes "He still has one more test for you."; + close; +L_GoChange: + mes "Wow you finished all of the tests? Great now you can visit the Headmaster, ^5533FFVincent Carsciallo^000000."; + mes "He's the one who will change you into an Alchemist."; + close; +} + + +//==================================================================================================// +// 2nd Test: Math test :( +//==================================================================================================// +alde_alche.gat,175,107,4 script Raspuchin Gregory 749, +{ + mes "[Raspuchin Gregory]"; + if(class == 5) goto L_Merc; +L_Other: + mes "What is it, kikikiki. Are you curious about what I do...?"; + mes "I'll just especially let you know. You see I... Kekeke.."; + next; + mes "[Raspuchin Gregory]"; + mes "Am researching! Once this potion is complete... you will be able to take over an entire country!!"; + next; + mes "[Raspuchin Gregory]"; + mes "Kikikikikekekekek. It's a secret to the people of Prontera....."; + close; +L_Merc: + if(ALCH_Q == 2) goto L_Start; + if(ALCH_Q == 3) goto L_Done; + mes "Kikikikikekekekeke."; + mes "What is it! You punk."; + next; + mes "[Raspuchin Gregory]"; + mes "A Merchant should go and set up a shop..."; + mes "Why'd you come to a place like this!?"; + mes "Are you looking for something to scab off?"; + next; + mes "[Raspuchin Gregory]"; + mes "Kikiki... Go, leave this place."; + mes "Dont loiter ... Kekeke."; + close; +L_Start: + if(ALCH_Q2 == 1) goto L_ReTest; + if(JobLevel == 50) goto L_Skip; + mes "Keke, another dumb one has stumbled into here."; + mes "Join the Union?"; + next; + mes "[Raspuchin Gregory]"; + mes "I don't like it... I just don't...!"; + mes "Everywhere, all joining and being called Alchemist just for knowing how to mix herbs!!!"; + next; + mes "[Raspuchin Gregory]"; + mes "Kikiki, so for that reason an interview is necessary!"; + mes "I plan on scolding all the incompetent ones and chasing them away!!"; + next; + mes "[Raspuchin Gregory]"; + mes "You look dumb founded. It must be pretty crazy."; + mes "If you were thinking of just changing clothes you thought wrong... Kekeke.."; + next; + mes "[Raspuchin Gregory]"; + mes "Now try solving the problems I give you."; + mes "We'll see how smart you are."; + next; + set @score,0; + + //set of question 1 + q1: + mes "[Raspuchin Gregory]"; + mes "12+23+34+45 =?"; + next; + input @num; + if(@num == 114) set @score,@score+10; + q2: + mes "[Raspuchin Gregory]"; + mes "1000-36-227-348 =?"; + next; + input @num; + if(@num == 389) set @score,@score+10; + q3: + mes "[Raspuchin Gregory]"; + mes "9765/3/5/7 =?"; + next; + input @num; + if(@num == 93) set @score,@score+10; + q4: + mes "[Raspuchin Gregory]"; + mes "(2646/7) + (13*28) =?"; + next; + input @num; + if(@num == 742) set @score,@score+10; + q5: + mes "[Raspuchin Gregory]"; + mes "With a 24% discount"; + mes "How much are 12 Red Potions,"; + mes "5 Fly Wings, and "; + mes "1 Butterfly Wing altogether?"; + next; + input @num; + if(@num == 909) set @score,@score+10; + q6: + mes "[Raspuchin Gregory]"; + mes "What is the total weight of 3 "; + mes "Scimiters,"; + mes "2 Helms and 1 Coat"; + next; + input @num; + if(@num == 450) set @score,@score+10; + q7: + mes "[Raspuchin Gregory]"; + mes "What is the total defense of "; + mes "a Biretta, Mantle, Opera Mask,"; + mes "Ribbon, "; + mes "Muffler, Boots, and Ear Muffs?"; + next; + input @num; + if(@num == 22) set @score,@score+10; + q8: + mes "[Raspuchin Gregory]"; + mes "If you buy 5 Helms with a 24%"; + mes "discount "; + mes "and sell it at 20%, how much do you"; + mes "earn?"; + next; + input @num; + if(@num == 1760) set @score,@score+10; + goto L_Total; + +L_ReTest: + mes "What, you want to take the test again?"; + mes "I thought I told you to leave."; + next; + mes "[Raspuchin Gregory]"; + mes "Well, I'll let you go this one time..."; + mes "I forgive you ... Kekeke."; + mes "Do well this time..."; + next; + mes "[Raspuchin Gregory]"; + mes "Now then, answer the question I ask."; + mes "Let see how smart you are."; + next; + set @score,0; + + //set of question 2 + q11: + mes "[Raspuchin Gregory]"; + mes "13+25+37+48=?"; + next; + input @num; + if(@num == 123) set @score,@score+10; + q12: + mes "[Raspuchin Gregory]"; + mes "1000-58-214-416 =?"; + next; + input @num; + if(@num == 312) set @score,@score+10; + q13: + mes "[Raspuchin Gregory]"; + mes "12*24*3=?"; + next; + input @num; + if(@num == 864) set @score,@score+10; + q14: + mes "[Raspuchin Gregory]"; + mes "10530/3/5/2=?"; + next; + input @num; + if(@num == 351) set @score,@score+10; + q15: + mes "[Raspuchin Gregory]"; + mes "(35*19) - (1792/7) =?"; + next; + input @num; + if(@num == 400) set @score,@score+10; + q16: + mes "[Raspuchin Gregory]"; + mes "(2368/8) + (24*17) = ?"; + next; + input @num; + if(@num == 704) set @score,@score+10; + q17: + mes "[Raspuchin Gregory]"; + mes "(2646/7) + (13*28)=?"; + next; + input @num; + if(@num == 742) set @score,@score+10; + q18: + mes "[Raspuchin Gregory]"; + mes "If buying at a 24% discount,"; + mes "What is the total price of"; + mes "15 Green Potions,"; + mes "6 Magnifiers and 4 Traps?"; + next; + input @num; + if(@num == 934) set @score,@score+10; + q19: + mes "[Raspuchin Gregory]"; + mes "What is the total weight of "; + mes "3 Ring Pommels Saber,"; + mes "4 Caps and 2 Boots?"; + next; + input @num; + if(@num == 550) set @score,@score+10; + q20: + mes "[Raspuchin Gregory]"; + mes "What is the total defense of a "; + mes "Bucler, Coat, Gas Mask, Big"; + mes "Ribbon, Ribbon, Sakkat and"; + mes "Glasses?"; + next; + input @num; + if(@num == 16) set @score,@score+10; + q21: + mes "[Raspuchin Gregory]"; + mes "How much zeny do you make"; + mes "if you buy Tights at a 24%"; + mes "discount"; + mes "and sell it at 20% of the normal"; + mes "price?"; + next; + input @num; + if(@num == 2840) set @score,@score+10; +L_Total: + mes "[Raspuchin Gregory]"; + if(@score < 80) goto L_Failed; + set ALCH_Q,3; + set ALCH_Q2, 0; + mes "Kikiki... I'll let you go."; + mes "Do some good research and be of some help to Raspuchin... Kikiki!"; + next; + mes "[Raspuchin Gregory]"; + mes "Well then go! ^5533FFGo to Darwin^000000."; + mes "He'll teach you how to do the experiments."; + mes "Tell him I sent you."; + next; + mes "[Raspuchin Gregory]"; + mes "Kikikikekeke."; + mes "Dont think this is the end of it!"; + close; + + L_Failed: + set ALCH_Q2,1; + mes "...Kekeke, you idiot,"; + mes "I feel dumb asking you all the question!"; + mes "you got them all wrong!!!"; + next; + mes "[Raspuchin Gregory]"; + mes "How can a person that can't even answer these question think of being an Alchemist!"; + mes "What? did you get any right?"; + next; + mes "[Raspuchin Gregory]"; + mes "Stupid! If you get one wrong everything is wrong for an Alchemist!"; + mes "Go! Leave! Get out of here!"; + close; +L_Done: + mes "What are you doing? Leave already."; + mes "Go to ^5533FFDarwin^000000."; + mes "He'll teach you how to do the experiments."; + mes "Tell him I sent you."; + next; + mes "[Raspuchin Gregory]"; + mes "Kikikikekeke."; + mes "Dont think this is the end of it!"; + close; +L_Skip: + mes "Hmm... you have a pretty high job level..... I'll be nice today and let you pass."; + mes "Next you should go see ^5533FFDarwin^000000."; + mes "He'll teach you how to do the experiments."; + mes "Tell him I sent you."; + set ALCH_Q,3; + set ALCH_Q2, 0; + close; +} + + +//==================================================================================================// +// 3rd Test: Mix some medicine +//==================================================================================================// +alde_alche.gat,13,15,8 script Darwin 750, +{ + mes "[Darwin]"; + if(class == 5) goto L_Merc; +L_Other: + mes "more to lose or gain..."; + mes "It's always like that..."; + next; + mes "[Darwin]"; + mes "All I can see through my cursed eyes"; + mes "are illusions from the past,"; + mes "Ahahahaha..."; + next; + mes "[Darwin]"; + mes "There's no such thing as paradise ... is there ?"; + mes "My love Harmona.... Aah...."; + close; + +L_Merc: + if(ALCH_Q == 3) goto L_Start; + if(ALCH_Q == 4) goto L_Done; + goto L_Other; + +L_Start: + if(ALCH_Q2 == 1) goto L_Check; + mes "..........."; + mes "........."; + mes "....Who is it..."; + next; + mes "[Darwin]"; + mes "A wolf? Or a human..."; + mes "You must be looking for something as well."; + next; + mes "[Darwin]"; + mes "If you have something precious, be careful."; + mes "You may lose something else while while going after another..."; + next; + mes "[Darwin]"; + mes ".........."; + next; + mes "[Darwin]"; + mes "... but what brings you here."; + mes "Coming to a place like this."; + next; + menu "I want to learn how to experiment.",M_Exp, "Tell me more about flowers.",M_Flow; + + M_Flow: + mes "[Darwin]"; + mes "......."; + mes "......"; + mes "...think about your precious things..."; + next; + mes "[Darwin]"; + mes ".... There is a flower that I faintly remember...."; + next; + mes "[Darwin]"; + mes "I divulged into researching one thing....."; + mes "for the one I love..."; + next; + mes "[Darwin]"; + mes "Lets just say that it was about the relationship between wolf and flowers..."; + mes "I wont tell you the details."; + next; + mes "[Darwin]"; + mes "But yes ... it was a flower."; + mes "with its shine, it was said to let you see paradise Illusion Flower..."; + next; + mes "[Darwin]"; + mes "I made a homunculus."; + mes "Nobody believe me. that I made life from a flower!!!"; + mes "My research!"; + next; + mes "[Darwin]"; + mes "But now, I have nothing left.."; + mes "It's all over."; + mes "Time has stopped at that moment in my life..."; + next; + mes "[Darwin]"; + mes "Aag... Harmona, in the beautiful fields of flowers,"; + mes "where have you gone...."; + close; + M_Exp: + mes "[Darwin]"; + mes "You want to learn Alchemy..."; + mes "All the knowledge I possess.."; + mes "I made to make my dreams come true..."; + next; + mes "[Darwin]"; + mes "I'll teach you the basics..."; + mes "but you must determine your own wishes."; + next; + mes "[Darwin]"; + mes "So, here are the basics."; + mes "This is how you make simple medicine..."; + mes "Prepare some stuff..."; + next; + mes "[Darwin]"; + mes "^5533FF3 Medicine Bowls"; + mes "3 Empty Bottles"; + mes "1 Red Herb"; + mes "1 Yellow Herb"; + mes "1 White Herb^000000"; + next; + mes "[Darwin]"; + mes "Once you have prepared all the items... come here."; + set ALCH_Q2, 1; + close; + +L_Check: + mes "..........."; + mes "........."; + mes "...Who is it...."; + next; + mes "[Darwin]"; + mes "Ah You're the one that wants to learn Alchemy..."; + mes "So did you prepare everything?"; + next; + if(countitem(7134) < 3 || countitem(713) < 3 || countitem(507) < 1 || countitem(508) < 1 || countitem(509) < 1) goto L_NotEnuf; + delitem 7134,3; + delitem 713,3; + delitem 507,1; + delitem 508,1; + delitem 509,1; + mes "[Darwin]"; + mes "Seems like you have everything ready."; + mes "As i promised, I'll teach you how to make medicine"; + next; + mes "[Darwin]"; + mes "First, prepare the Medicine Bowl then put the Herbs inside like this."; + mes "And you slowly crush them."; + next; + mes "[Darwin]"; + mes "Pour small amounts of clean water and stirr until it become thick, "; + mes "then add some more Herbs."; + next; + mes "[Darwin]"; + mes "That's how you make it if you think you have enough, "; + mes "gently pour it into an empty bottle"; + next; + mes "[Darwin]"; + mes "There you go, its complete."; + mes "This time, do as I showed you."; + mes "It should be easy since its so simple."; + next; + mes "[Darwin]"; + mes "... even though you don't have one?"; + next; + set @score,0; + menu "Prepare the medicine bowl",-, "Wear the medicine bowl on the head",M_0, "Kick the medicine bowl",M_0; + + set @score,@score+10; + M_0: + + menu "Put the sand into the medicine bowl",M_1, "Put the herbs into the medicine bowl",-, "Put the harp into the medicine bowl",M_1; + + set @score,@score+10; + M_1: + + menu "Smash the herbs",-, "Smash the medicine bowl",M_2, "Smash the Tarosia's foots",M_2; + + set @score,@score+10; + M_2: + + menu "Spray the water",M_3, "Drink the water",M_3, "Pour in the water",-; + + set @score,@score+10; + M_3: + + menu "Continue to smash the herbs",-, "Continues to eat the herbs",M_4, "Continues to dance and sing",M_4; + + set @score,@score+10; + M_4: + + menu "Put in the noodles and fried it",M_5, "Put into the Empty Bottle",-, "Raise the medicine bowl and drink it",M_5; + + set @score,@score+10; + M_5: + + mes "[Darwin]"; + if(@score < 60) goto L_Failed; + mes "... Good job. It came out prettywell considering it's your first time..."; + mes "As a souvenier, take these."; + getitem 501,1; + getitem 503,1; + getitem 504,1; + set ALCH_Q,4; + set ALCH_Q2,0; + next; + mes "[Darwin]"; +L_Done: + mes "Go to ^5533FFVan Helmont^000000 in the next room..."; + mes "He'll teach you more details."; + mes "Go learn from him."; + next; + mes "[Darwin]"; + mes "Don't forget..."; + mes "You must protect what is trully precious to you....."; + close; + + L_Failed: + mes "... You messed up all the ingredients."; + mes "... Go bring some more."; + close; +L_NotEnuf: + mes "[Darwin]"; + mes "...You must've forgotten the materials to bring."; + mes "I'll tell you again."; + mes "Dont forget them this time."; + next; + mes "[Darwin]"; + mes "^5533FF3 Medicine Bowls"; + mes "3 Empty Bottles"; + mes "1 Red Herb"; + mes "1 Yellow Herb"; + mes "1 White Herb^000000"; + next; + mes "[Darwin]"; + mes "Come back when you are ready..."; + close; +} + + +//==================================================================================================// +// 4th Test: Learn from Morgenstein +//==================================================================================================// +alde_alche.gat,79,19,4 script Van Helmont 748, +{ + mes "[Van Helmont]"; + if(class == 5) goto L_Merc; +L_Other: + mes "Just a little ... yes, a little bit more ...."; + mes "agh, just a little bit more and it would've been done!"; + next; + mes "[Van Helmont]"; + mes "Why, why another failure!!!"; + mes "Nothing was wrong!"; + mes "Why! Why!"; + next; + mes "[Van Helmont]"; + mes "Does that mean I have to get more materials..."; + mes "But I should be able to complete it one day....Heeh..."; + close; +L_Merc: + if(ALCH_Q == 4) goto L_Start; + if(ALCH_Q == 5) goto L_Done; + goto L_Other; +L_Start: + if(ALCH_Q2 == 1) goto L_Check; + mes "Arrrrgh... Why does this formula just stop... What's wrong."; + mes "Theoretically it's all correct..."; + mes "I'm sure it's because there is an error in the formula"; + mes "somewhere..."; + next; + mes "[Van Helmont]"; + mes "That's it, I pour it here and it should stop... but this is the formula that solution doesn't stop flowing."; + mes " How could I make such a stupid mistake... when did I switch these..."; + next; + mes "[Van Helmont]"; + mes "Yes, that's it. I just need to fix this part."; + mes "No need to start over."; + mes "I just have to fix it..."; + mes "....But, wait. wait."; + next; + mes "[Van Helmont]"; + mes "....................."; + next; + mes "[Van Helmont]"; + mes "....Who are you?"; + next; + menu "I want to become an Alchemist.",-,".....",M_Bye; + + mes "[Van Helmont]"; + mes "Oh, I see...."; + mes "Haha you want to learn Alchemy in world like this, what a funny merchant... hmmm."; + next; + mes "[Van Helmont]"; + mes "Well, that's nice, but I have a very urgent experiment I must tend to."; + mes "So don't get in the way."; + next; + menu "Teach me something.",-,"..........",M_Bye; + + mes "[Van Helmont]"; + mes "Argh... didn't I just tell you not to bother me?"; + mes "Why can't you understand when I say something!"; + next; + mes "[Van Helmont]"; + mes "Ok, I'll give you an assignment."; + mes "Go study and come back. Let's see."; + mes "What would be good... Hmm..."; + next; + mes "[Van Helmont]"; + mes "Oh, I got it. Go learn from ^5533FFMorgenstein^000000. Learn how to make a ^009500Counteragent^000000 and ^FF3355Mixture^000000."; + mes "You can find him in ^5533FFGeffen^000000."; + next; + mes "[Van Helmont]"; + mes "You don't need to bring what you made. But just go watch how he makes medicine and stuff."; + mes "Got it?"; + next; + mes "[Van Helmont]"; + mes "Well then, see you later."; + mes "You'd be best off going as soon as you can."; + set ALCH_Q2,1; + close; + M_Bye: + mes "[Van Helmont]"; + mes "If you dont have business here just go away. Ok!!!"; + close; +L_Check: + if(al_morgen != 1) goto L_NotRdy; + mes "Yes, cut the Tentacle.."; + mes "and mix some Sticku Mucus,"; + mes "Jellopy solution in the test tube Darn, where did the Medicine Bowl go..."; + next; + mes "[Van Helmont]"; + mes "Did I use them all.. At a time like this, grrr. I wonder if Nicholas has any left."; + mes "Ganfunnit... what a pain."; + mes "....but, wait. wait."; + next; + mes "[Van Helmont]"; + mes "Ah, you're that merchant from before. So.. did you learn anything?"; + mes "I didn't send you there to play."; + next; + mes "[Van Helmont]"; + mes "Let me ask you a couple of questions. Answer how you heard and learned."; + next; + set @score,0; + + Q_1a: + mes "[Van Helmont]"; + mes "What item is required to form the Counteragent?"; + next; + menu "Feather",-,"Sticky Mucus",-,"Animal Blood",-; + + Q_1b: + mes "[Van Helmont]"; + mes "Which of the following item is not required in forming the Counteragent?"; + next; + menu "Karvodailnirol",-,"Detrimindexta",Q_2a,"Alchol",Q_2a; + + set @score,@score+10; + + Q_2a: + mes "[Van Helmont]"; + mes "What item is required to form the Mixture?"; + next; + menu "Monster's Feed",-,"Lip of Ancient Fish",-,"Rotten Bandage",-; + + Q_2b: + mes "[Van Helmont]"; + mes "Which of the following item is not required in the process of forming the Mixture?"; + next; + menu "Karvodailnirol",L_Result,"Detrimindexta",-,"Alchol",L_Result; + + set @score,@score+10; + +L_Result: + mes "[Van Helmont]"; + if(@score < 20) goto L_Failed; + mes "Hmm, you learned well. Ok, now you know some stuff about medicine?"; + mes "Eh?"; + mes "I know, you must have a lot to say but let me continue with my experiment."; + next; + mes "[Van Helmont]"; + mes "Go out and to the room next to here. ^5533FFNicholas^000000 probably has more to teach you than me."; + set ALCH_Q,5; + set ALCH_Q2,0; + set al_morgen, 0; + close; + + L_Failed: + mes "...Be honest. You don't know,"; + mes "do you? I thought I told you to go learn from Morgenstein..."; + next; + mes "[Van Helmont]"; + mes "Don't even think about coming back before you've learned for sure!"; + mes "Stop bothering me and leave!"; + close; +L_NotRdy: + mes "Didn't I tell you to visit Morgenstein in Geffen!?!"; + mes "He is a wise man! You should go to him!"; + close; +L_Done: + mes "What are you doing? Go out and to the room next to here. ^5533FFNicholas^000000 probably has more to teach you than me."; + mes "I have no more business with you."; + close; + +} + + +//==================================================================================================// +// Test 5 & 6: Word Scramble, Help the Baijin Bros. +//==================================================================================================// +alde_alche.gat,145,19,4 script Nicholas Flamel 57, +{ + mes "[Nicholas Flamel]"; + if(class == 5) goto L_Merc; +L_Other: + mes "Lorem ipsum dolor sit amet,"; + mes "consectetuer adipiscing elit."; + mes "Vivamus sem. Sed metus lacus, viverra id, rutrum eget, rhoncus sit amet, lectus."; + mes "Suspendisse sit amet urna in nisl frigilla faucibus."; + mes "Nulla scelerisque eros...."; + mes "......mumblemumble........"; + close; +L_Merc: + if(ALCH_Q == 5) goto L_Start; + if(ALCH_Q == 6) goto L_Start2; + if(ALCH_Q == 7) goto L_Done; + goto L_Other; +L_Start: + if(ALCH_Q2 == 1) goto L_ReTest; + mes "Ooh... you're the Merchant that wants to become an Alchemist?"; + mes "But you know... not anyone can become an Alchemist."; + next; + mes "[Nicholas Flamel]"; + mes "The Union doesn't like those that just want to become Alchemist without a clear goal."; + mes "So... to see if you qualify, I'll test how smart you are."; + next; + mes "[Nicholas Flamel]"; + mes "As you can see, Alchemist must memorize many equations,"; + mes "chemical equations and a lot of other information."; + mes "If you're not at a certain level.."; + mes "it's actually pretty tough."; + next; + mes "[Nicholas Flamel]"; + mes "The idea is to prevent those that are going to be useless Alchemists from joining the union!"; + next; + mes "[Nicholas Flamel]"; + mes "Ok... Here go the questions!"; + mes "This is to test your concentration so that you won't get confused when looking at charts."; + next; + mes "[Nicholas Flamel]"; + mes "Find the words from the group of letters. They can be made by using some or all the letters given"; + next; + mes "[Nicholas Flamel]"; + mes "You pass if you choose the word that is 'IN' the puzzle."; + next; + + Q_1: + set @score,0; + mes "[Nicholas Flamel]"; + mes "s m i e x b w u n e n t a g l r"; + next; + menu "tiger",-,"wolf",Q_2,"pumpkin",Q_2,"tripped",Q_2; + + set @score,@score+10; + + Q_2: + mes "[Nicholas Flamel]"; + mes "n i e g b o p d s o a u w r v"; + next; + menu "bash",Q_3,"provoke",Q_3,"endure",-,"stun",Q_3,"abracadabra",Q_3; + + set @score,@score+10; + + Q_3: + mes "[Nicholas Flamel]"; + mes "l r m g r e x t a v i n e d e"; + next; + menu "alberta",Q_4,"latifoliate",Q_4,"crimson",Q_4,"maple",Q_4,"evergreen",-; + + set @score,@score+10; + + Q_4: + mes "[Nicholas Flamel] "; + mes "r o e h n r o m c a i n p t t"; + next; + menu "forgemerchant",L_Score,"potionmerchant",-,"dcmerchant",L_Score,"vendingmerchant",L_Score; + + set @score,@score+10; +L_Score: + if(@score < 40) goto L_Failed; + set ALCH_Q,6; + set ALCH_Q2,0; + mes "[Nicholas Flamel]"; + mes "You seem to be done."; + next; + mes "[Nicholas Flamel]"; + mes "Let's see."; + mes "...Good job. Excellent."; + next; + mes "[Nicholas Flamel]"; + mes "Somehow you found all of them."; + mes "With that kind of concentration, you should easily be able to read the medicine dictionaries."; + mes "Let's see... next is.."; + next; + mes "[Nicholas Flamel]"; + mes "Come back in a little bit. Get organized too.."; + close; + + L_Failed: + mes "[Nicholas Flamel]"; + mes "Hmmm... You failed!"; + mes "Get your glasses maybe you can pass next time wearing those."; + set ALCH_Q2,1; + close; +L_ReTest: + mes "Hmmm you returned."; + mes "Well will see if you changed."; + next; + goto Q_1; + +L_Start2: + if(ALCH_Q2 > 0) goto L_Check2; + mes "Next, you have to go somewhere."; + mes "Go to ^5533FF'The Forgotten City of Juno'^000000 and meet the ^FF3355Bain and Bajin^000000 brothers who are researching alchemy with the Sages there."; + next; + mes "[Nicholas Flamel]"; + mes "Go help out and come back Here, take these... it will help you get close to them."; + next; + getitem 974,1; + getitem 7068,5; + getitem 7043,5; + getitem 756,3; + getitem 757,3; + mes "[Nicholas Flamel]"; + mes "1 Mixture"; + mes "5 Burnt Tree"; + mes "5 Fine Sand "; + mes "3 Rough Oridecon "; + mes "3 Rough Elunium"; + set ALCH_Q2,1; + next; + mes "[Nicholas Flamel]"; + mes "Have a safe trip."; + mes "It's Juno. Come back in one piece."; + close; +L_Check2: + if(ALCH_Q2 < 2) goto L_NotDone; + set ALCH_Q, 7; + set ALCH_Q2, 0; + mes "Ooh! Well done on such a long trip."; + mes "I got a message saying that the Bain and Bajin brothers were happy about your visit."; + next; + mes "[Nicholas Flamel]"; + mes "You must have successfully helped them."; + mes "If you're good enough to be of help to the brothers... ok, I think you qualify."; + next; + mes "[Nicholas Flamel]"; +L_Done: + mes "Go to the Union Leader on the 2nd floor!"; + mes "Congratulations. You'll change jobs soon!"; + close; + + L_NotDone: + mes "Bain and Bajin brothers are in Juno go help them."; + close; + +} + + +//==================================================================================================// +// Job Changer +//==================================================================================================// +alde_alche.gat,101,184,4 script Vincent Carsciallo 122, +{ + mes "[Vincent Carsciallo]"; + if(Class == 5) goto L_Merc; + if(Class == Job_Alchem) goto L_Alch; +L_Other: + mes "Hmmm? What may a civilian have to do here?"; + next; + mes "[Vincent Carsciallo]"; + mes "There's nothing amusing. Dont wander and leave."; + close; +L_Alch: + mes "How Alchemy going? Make sure to be carefull and think about safety at all times."; + mes "I wouldn't want you blowing yourself up or anything....."; + close; +L_Merc: + if(ALCH_Q == 7) goto L_Change; + mes "Hmmm? A merchant."; + mes "Are you interested in Alchemy?"; + next; + mes "[Vincent Carsciallo]"; + mes "This is the Alchemist Union."; + mes "We research many different substances."; + mes "Our goal is to make something new without the power of magic."; + next; + mes "[Vincent Carsciallo]"; + mes "Create new life, and study how to live long and not die ..."; + mes "We also make new materials out of existing ones..."; + mes "These are just some of the things we do."; + next; + mes "[Vincent Carsciallo]"; + mes "After being a Merchant for a long time "; + mes "you start to become interested in everything."; + mes "If you would like to learn Alchemy as well,"; + mes "try joining our Union."; + close; +L_Change: + if(skillpoint != 0) goto L_Skpoint; + mes "Ooh, ok. You joined and learned the basics, too. Well done."; + next; + jobchange 18; + emotion 46; + mes "[Vincent Carsciallo]"; + mes "From now on, you are also a member of the Union as an Alchemist."; + mes "I hope you learn a lot..."; + next; + getitem 7127,1; + mes "[Vincent Carsciallo]"; + mes "Here's a little something. "; + mes "Use it to start off with some research."; + next; + mes "[Vincent Carsciallo]"; + mes "I'll see you later then..."; + mes "Be proud of being an Alchemist!"; + callfunc "F_ClearJobVar"; + close; + + L_Skpoint: + mes "Please use all your skill point before talking to me."; + close; +} \ No newline at end of file diff --git a/npc/jobs/2-2/crusader.txt b/npc/jobs/2-2/crusader.txt new file mode 100644 index 000000000..076ef2ce6 --- /dev/null +++ b/npc/jobs/2-2/crusader.txt @@ -0,0 +1,1164 @@ +////===== eAthena Script ======================================= +//= Crusader Quest +//===== By: ================================================== +//= Made by: Black Dragon +//= Converted by: Shin +//= +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Need optimalization and fixing +//= thanks to Komurka, KiLLaLeN, Lupus (fixing error) +//= just a temp Job Quest +//============================================================ + +prt_castle.gat,178,99,6 script Lothar 752,{ + mes "[^000080Lothar^000000]"; + if (Class > 0) goto NEXT_0; + if (Class == 0) goto NOV; + mes "Hello "+ strcharinfo(0); + mes "I see that you've registered to the ^008000Swordsman's Association^000000."; + TALK: + next; + mes "[^000080Lothar^000000]"; + mes "If you become a ^800000Swordsman^000000, you will gain the privelege of becoming a ^800000Knight^000000 or ^800000Crusader^000000."; + next; + mes "[^000080Lothar^000000]"; + mes "If you decide to go along the path of the ^800000Crusader^000000, come back here."; + mes "Just take note that you must obtain a job level of at least 40 first before you can move up to the 2nd job."; + close; + NOV: + mes "Hello there."; + goto TALK; +NEXT_0: + if (Class > 1) goto NEXT0; + if (Job_CR == 1) goto CONT; + if (Job_CR == 2) goto CONT0; + if (Job_CR == 3) goto CONT1; + if (Job_CR == 4) goto CONT2; + if (Job_CR > 4) goto CONT3; + mes "Welcome, can I help you with something?"; + next; + menu "I want to become a ^800000Crusader^000000.",JOB,"What's being a ^800000Crusader^000000 like?",ASK,"What is the purpose of a ^800000Crusader^000000?",ASK0,"I was just looking around.",-; + mes "[^000080Lothar^000000]"; + mes "Oh, all right."; + next; + mes "[^000080Lothar^000000]"; + mes "If you decide to take the path of the ^800000Crusader^000000, feel free to come back."; + close; + JOB: + mes "[^000080Lothar^000000]"; + mes "All right, let me take a look at you first."; + next; + mes "[^000080Lothar^000000]"; + if (readparam(55) != 50) goto SKIP; + set JLCC,1; + set Job_CR,5; + goto TEST1; + SKIP: + if (readparam(55) > 39) goto OKAY; + mes "[^000080Lothar^000000]"; + mes "I'm sorry, but you need to be at least at a job level of 40."; + next; + mes "[^000080Lothar^000000]"; + mes "All 2nd jobs require that."; + close; + OKAY: + if (SkillPoint == 0) goto OKAY0; + JOB0: + mes "[^000080Lothar^000000]"; + mes "In order to become a ^800000Crusader^000000, you have to have used all your available skill points first."; + close; + OKAY0: + mes "[^000080Lothar^000000]"; + mes "Everything looks all right."; + set Job_CR,1; + next; + mes "[^000080Lothar^000000]"; + mes "All right, shall we begin the tests?"; + next; + menu "Yes, of course.",OKAY1,"Not yet.",-; + mes "[^000080Lothar^000000]"; + mes "Oh, all right. Come back when you're ready."; + close; + OKAY1: + if (SkillPoint != 0) goto JOB0; + set Job_CR,2; + mes "[^000080Lothar^000000]"; + mes "All right, the first test requires you to collect items."; + next; + set Job_CR, rand (2); + set Job_CR,Job_CR + 3; + mes "[^000080Lothar^000000]"; + mes "Bring back the following items:"; + if (Job_CR != 3) goto IT; + mes "- 10 ^FF0000Decayed Nail^000000"; + mes "- 10 ^FF0000Danggies^000000"; + mes "- 10 ^FF0000Stinky Scales^000000"; + mes "- 10 ^FF0000Mementos^000000"; + close; + IT: + mes "- 10 ^FF0000Decayed Nail^000000"; + mes "- 10 ^FF0000Danggies^000000"; + mes "- 10 ^FF0000Stinky Scales^000000"; + mes "- 10 ^FF0000Mementos^000000"; + close; + + ASK: + mes "[^000080Lothar^000000]"; + mes "To be a ^800000Crusader^000000 is to fight for the righteous people."; + mes "Not always those who are in power, but rather for the justly cause."; + next; + mes "[^000080Lothar^000000]"; + mes "I hope that you consider to become one."; + mes "To fight for good is a job that should be done by everyone to some extent."; + close; + ASK0: + mes "[^000080Lothar^000000]"; + mes "The purpose of a ^800000Crusader^000000 is to work for the good in the world."; + mes "A ^800000Crusader^000000 is a person of righteousness at work."; + close; + CONT: + mes "Have you changed your mind?"; + next; + menu "Yes, I want to become a ^800000Crusader^000000.",JOB,"Sorry, but I don't want to.",-; + mes "[^000080Lothar^000000]"; + mes "I see... That's a shame."; + next; + mes "[^000080Lothar^000000]"; + mes "Come back if you do want to."; + close; + CONT0: + mes "Well, hm..."; + next; + mes "[^000080Lothar^000000]"; + mes "I was expecting that someone like you would pass."; + next; + mes "[^000080Lothar^000000]"; + mes "Mind to try again?"; + next; + menu "Yes, of course.",OKAY1,"No, I'm all right.",-; + mes "[^000080Lothar^000000]"; + mes "Oh, all right."; + close; + CONT1: + set @item,0; + if(countitem(957)>=10) goto ITEM7;//Items: Decayed Nail, + mes "- 10 ^FF0000Decayed Nails^000000"; + set @item, item +1; + ITEM7: + if(countitem(901)>=10) goto ITEM8;//Items: Danggie, + mes "You still miss the this item"; + mes "- 10 ^FF0000Danggies^000000"; + set @item, item +1; + ITEM8: + if(countitem(959)>=10) goto ITEM9;//Items: Stinky Scale, + mes "You still miss the this item"; + mes "- 10 ^FF0000Stinky Scales^000000"; + set @item, item +1; + ITEM9: + if(countitem(934)>=10) goto ITEM10;//Items: Memento, + mes "You still miss the this item"; + mes "- 10 ^FF0000Mementos^000000"; + set @item, item +1; + ITEM10: + if (@item == 0) goto DONE; + close; + DONE: + mes "Good job!"; + mes "You collected everything!"; + delitem 957,10;//Items: Decayed Nail, + delitem 901,10;//Items: Danggie, + delitem 959,10;//Items: Stinky Scale, + delitem 934,10;//Items: Memento, + set Job_CR,5; + TEST1: + next; + mes "[^000080Lothar^000000]"; + mes "All right, let's move on to the 2nd test."; + next; + mes "[^000080Lothar^000000]"; + mes "Go to the prison, it's in the basement"; + mes "Before you do, make sure that you bring a ^FF0000Rosary^000000 with you."; + close; + CONT2: + set @item, 0; + if(countitem(932)>=10) goto ITEM11;//Items: Skel-Bone, + mes "You still miss the this item"; + mes "- 10 ^FF0000Skel-Bones^000000"; + set @item, item +1; + ITEM11: + if(countitem(1043)>=10) goto ITEM12;//Items: Orc Claw, + mes "You still miss the this item"; + mes "- 10 ^FF0000Orc Claws^000000"; + set @item, item +1; + ITEM12: + if(countitem(2408)>=1) goto ITEM13;//Items: Ball'n'Chain, + mes "You still miss the this item"; + mes "- 1 ^FF0000Ball 'n Chain^000000"; + set @item, item +1; + ITEM13: + if(countitem(901)>=10) goto ITEM14;//Items: Danggie, + mes "You still miss the this item"; + mes "- 10 ^FF0000Danggie^000000"; + set @item, item +1; + ITEM14: + if (@item== 0) GOTO DONE0; + close; + DONE0: + mes "Good job!"; + mes "You collected everything!"; + delitem 932,10;//Items: Skel-Bone, + delitem 1043,10;//Items: Orc Claw, + delitem 2408,1;//Items: Ball'n'Chain, + delitem 901,10;//Items: Danggie, + set Job_CR,5; + goto TEST1; + CONT3: + if (Job_CR == 8) goto CONT4; + if (Job_CR > 8) goto CONT5; + mes "Please talk to the man in the prison to continue."; + mes "Make sure you bring a ^FF0000Rosary^000000 with you."; + close; + CONT4: + mes "Great job in accomplishing the ^FF8000Patience Test^000000!"; + next; + mes "[^000080Lothar^000000]"; + mes "Now to move on to the ^FF8000Knowledge Test^000000."; + mes "Please talk to the Knight at the Cathedral, he will test your knowledge."; + set Job_CR,9; + close; + CONT5: + if (Job_CR == 13) goto CONT6; + if (Job_CR == 14) goto CONT7; + mes "Please go talk to the Knight at the Cathedral to continue."; + close; + CONT6: + mes "Excellent work in completing all the necessary tests!"; + mes "Now let me examine you before you become a ^800000Crusader^000000."; + next; + set Job_CR,14; + mes "[^000080Lothar^000000]"; + CONT7: + if (SkillPoint == 0) goto GOOD; + mes "I'm sorry, but you'll need to use up all your skill points first."; + close; + GOOD: + mes "This is to compliment your job change."; + if (JLCC != 1) goto OTHR; + getitem (1408),1; + goto END_0; + OTHR: + getitem (1409),1; + END_0: + jobchange 14;// Job: Job_Crusader + set JobLevel,JobLevel+1; + callfunc "F_ClearJobVar"; // clears all job variables for the current player + close; +NEXT0: + if (Class != 2) goto NEXT1; + mes "Hello, welcome to the ^008000Castle of Prontera^000000."; + mes "Hope you have a good day!"; + close; +NEXT1: + if (Class != 3) goto NEXT2; + mes "Good luck in your hunting."; + close; +NEXT2: + if (Class != 4) goto NEXT3; + mes "Good day to you!"; + mes "Hope you do well to find your path."; + close; +NEXT3: + if (Class != 5) goto NEXT4; + mes "Hello, we don't currently need anything, sorry about that."; + close; +NEXT4: + if (Class != 6) goto NEXT5; + mes "Better watch yourself."; + close; +NEXT5: + if (Class != 7) goto NEXT6; + mes "Good day to you, " + strcharinfo(0); + close; +NEXT6: + if (Class != 8) goto NEXT7; + mes "Good day, "+ strcharinfo(0); + mes "I would hope to believe that all is going well."; + close; +NEXT7: + if (Class != 9) goto NEXT8; + mes "Hello, welcome to the ^008000Castle of Prontera^000000."; + mes "Nice to have you wish us."; + close; +NEXT8: + if (Class != 10) goto NEXT9; + mes "Hello, we're not in need of any weapons or armour at the moment, thank you."; + close; +NEXT9: + if (Class != 11) goto NEXT10; + mes "Hello, wish you luck for your success."; + close; +NEXT10: + if (Class != 12) goto NEXT11; + mes "Stay out of trouble, you don't want the guards to come after you, now do you?"; + close; +NEXT11: + if (Class != 14) goto NEXT12; + mes "Good day, "+ strcharinfo(0); + close; +NEXT12: + if (Class != 15) goto NEXT13; + mes "Hello, welcome to the ^008000Castle of Prontera^000000."; + close; +NEXT13: + if (Class != 16) goto NEXT14; + mes "Welcome to the ^008000Castle of Prontera^000000, I hope you enjoy your stay."; + close; +NEXT14: + if (Class != 17) goto NEXT15; + mes "Stay out of trouble if you know what's good for you."; + close; +NEXT15: + if (Class != 18) goto NEXT16; + mes "So, how are the experiments going down in ^00FF00Al de Baran^000000?"; + close; +NEXT16: + if (Class != 19) goto NEXT17; + mes "Welcome to the castle, good sir."; + close; +NEXT17: + if (Class != 20) goto NEXT18; + mes "Good day, miss."; + close; +NEXT18: + if (Class != 22) goto NEXT19; + if (Gender != 0) goto MALE; + mes "Hello, welcome to the ^008000Castle of Prontera^000000."; + close; + MALE: + mes "Well done, sir!"; + close; +NEXT19: + mes "Hello and good day!"; + close; +} + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Man in Pain - Crusader Job Quest - 2nd Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- +prt_castle.gat,163,33,0 script Man in Pain 107,{ + + if (Job_CR == 7) goto CONT; + if (Job_CR > 7) goto CONT0; + mes "[^000080Man in Pain^000000]"; + mes "Who... who are you?"; + next; + if (Job_CR == 5) goto CHECK; + + OTHER: + if (Job_CR == 6) goto EXIT1; + mes "[^000080Man in Pain^000000]"; + mes "What do you want?"; + mes "Leave me alone~!"; + close; + CHECK: + if (countitem(2608) == 0) goto NOT;//Items: Rosary, + + mes "[^000080Man in Pain^000000]"; + mes "I see, you're here for the job."; + next; + mes "[^000080Man in Pain^000000]"; + mes "It's torture."; + mes "They send me to that room time and time again."; + next; + mes "[^000080Man in Pain^000000]"; + mes "I've grown awefully weak from it."; + next; + mes "[^000080Man in Pain^000000]"; + mes "But if it's your wish, I will send to there."; + next; + menu "Yes.",-,"On second thought...",EXIT; + mes "[^000080Man in Pain^000000]"; + mes "All right then... I'll tell you where to go."; + GO: + next; + savepoint "prt_castle.gat",162,27; + if (getmapusers("job_cru.gat") > 0) goto EXIT0; + set Job_CR,6; + warp "job_cru.gat",23,42; + EXIT0: + mes "[^000080Man in Pain^000000]"; + mes "I'm sorry, there's already another person there right now."; + mes "Please wait a little longer."; + close; + EXIT: + mes "[^000080Man in Pain^000000]"; + mes "Please do not disturb me then!"; + close; + NOT: + mes "[^000080Man in Pain^000000]"; + mes "Leave me alone!"; + mes "Can't you leave someone in pain alone ?"; + close; + + CONT: + mes "[^000080Man in Pain^000000]"; + mes "I see you've passed. Good work."; + set Job_CR,8; + close; + EXIT1: + mes "[^000080Man in Pain^000000]"; + mes "Sorry but you're going to need to go again."; + goto GO; + CONT0: + mes "[^000080Man in Pain^000000]"; + mes "There is nothing else you need from me."; + mes "Let me be..."; + close; +} + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Arthur - Crusader Job Quest - Knowledge Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- +prt_church.gat,94,116,0 script Arthur 56,{ + mes "[^000080Arthur^000000]"; + if (Class != 0) goto NEXT_o; + mes "Hello young traveler."; + close; +NEXT_o: + if (Class != 1) goto NEXT0; + mes "Hello," + strcharinfo(0); + next; + if (Job_CR != 9) goto EXIT; + BEGIN: + menu "Take the Knowledge test.",-,"Nothing.",EXIT; + mes "[^000080Arthur^000000]"; + mes "Oh, on your way to become a ^800000Crusader^000000 huh?"; + mes "Okay..."; + next; + START: + set @Q , 0; + set @Q1 , 0; + set @Q2 , 0; + set @Q3 , 0; + set @Q4 , 0; + set @Q5 , 0; + set @Q6 , 0; + set @Q7 , 0; + set @Q8 , 0; + set @Q9 , 0; + set @Q10 , 0; + set @Q11 , 0; + set @Q12 , 0; + set @Q13 , 0; + set @Q14 , 0; + set @Q15 , 0; + set @Q16 , 0; + set @Q17 , 0; + set @Q18 , 0; + set @Q19 , 0; + set @Q20 , 0; + set @ANS , 0; + RND: + if (@Q > 10) goto DONE; + set @RND, rand(20); + if (@RND > 9) goto G1; + if (@RND > 4) goto G1A; + if (@RND > 3) goto G1A1; + if (@RND == 0) goto Q1; + if (@RND == 1) goto Q2; + if (@RND != 1) goto Q3; + G1A1: + if (@RND == 3) goto Q4; + if (@RND != 3) goto Q5; + G1A: + if (@RND > 8) goto G1A2; + if (@RND == 5) goto Q6; + if (@RND == 6) goto Q7; + if (@RND != 6) goto Q8; + G1A2: + if (@RND == 8) goto Q9; + if (@RND != 8) goto Q10; + G1: + if (@RND > 14) goto G2A; + if (@RND > 13) goto G2A1; + if (@RND == 10) goto Q11; + if (@RND == 11) goto Q12; + if (@RND == 12) goto Q13; + G2A1: + if (@RND == 13) goto Q14; + if (@RND == 14) goto Q15; + G2A: + if (@RND > 18) goto G2A2; + if (@RND == 15) goto Q16; + if (@RND == 16) goto Q17; + if (@RND == 17) goto Q18; + G2A2: + if (@RND == 18) goto Q19; + if (@Q20 != 0) goto RND; + set @Q20,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Are you willing to risk your life to save someone else?"; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + Q1: + if (@Q1 != 0) goto RND; + set @Q1,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "If someone asks you to help them for a good cause, will you oblige?"; + next; + menu "Yes",-,"No",RND; + set @ANS, @ANS + 1; + goto RND; + Q2: + if (@Q2 != 0) goto RND; + set @Q2, 1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Would you allow a robber to get away with stolen goods?"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q3: + if (@Q3 != 0) goto RND; + set @Q3,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Do you wish that the world was at harmony?"; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + Q4: + if (@Q4 != 0) goto RND; + set @Q4,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Will you ever attempt suicide?"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q5: + if (@Q5 != 0) goto RND; + set @Q5,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Will you intoxicate yourself at parties?"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q6: + if (@Q6 != 0) goto RND; + set @Q6,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Will you openly massacre?"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q7: + if (@Q7 != 0) goto RND; + set @Q7,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Will you hold your temper during arguments?"; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + Q8: + if (@Q8 != 0) goto RND; + set @Q8,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "Would you allow alchemists to perform illegal experiments?"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q9: + if (@Q9 != 0) goto RND; + set @Q9,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "If someone threw a stone at you, you'd become furious."; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q10: + if (@Q10 != 0) goto RND; + set @Q10,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "If someone offered you money that belongs to someone poor, would you take it?"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q11: + if (@Q11 != 0) goto RND; + set @Q11,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You think highly of yourself."; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q12: + if (@Q12 != 0) goto RND; + set @Q12,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You are humble before others."; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + Q13: + if (@Q13 != 0) goto RND; + set @Q13,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You answer people full of respect and with kindness."; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + Q14: + if (@Q14 != 0) goto RND; + set @Q14,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You fight when you feel like it."; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q15: + if (@Q15 != 0) goto RND; + set @Q15,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You go to the pub every night."; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q16: + if (@Q16 != 0) goto RND; + set @Q16,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You believe in the Father, Son and Holy Spirit."; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + Q17: + if (@Q17 != 0) goto RND; + set @Q17,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You believe that the Devil is evil and cruel and should be treated the same way."; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q18: + if (@Q18 != 0) goto RND; + set @Q18,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "You believe that talk is for wimps and that action plays the main role in peace-making"; + next; + menu "Yes",RND,"No",-; + set @ANS,@ANS + 1; + goto RND; + Q19: + if (@Q19 != 0) goto RND; + set @Q19,1; + set @Q,@Q + 1; + mes "[^000080Arthur^000000]"; + mes "If all other means to keep peace fail, THEN it is all right to resort to violence."; + next; + menu "Yes",-,"No",RND; + set @ANS,@ANS + 1; + goto RND; + DONE: + mes "[^000080Arthur^000000]"; + mes "You got "+ @ANS +" / 10 questions correct."; + next; + if (Job_CR != 10) goto secND; + if (@ANS < 8) goto NO; + PASS: + mes "[^000080Arthur^000000]"; + mes "Excellent work! You qualify to pass the ^FF8000Knowledge Test^000000!"; + mes "You're almost done, you are now at the ^FF8000Purification Test^000000, find the Guardian Knight at ^008000Prontera Castle^000000."; + set Job_CR, 11; + close; + NO: + set Job_CR, 10; + mes "[^000080Arthur^000000]"; + mes "I'm sorry, you didn't get enough to qualify."; + next; + mes "[^000080Arthur^000000]"; + mes "Try giving it another go when you feel you're ready."; + mes "I'll only expect you to get at least 8 correct from now on."; + close; + secND: + if (@ANS > 7) goto PASS; + mes "[^000080Arthur^000000]"; + mes "I'm sorry, you didn't get enough correct."; + close; + EXIT: + if (Job_CR == 10) goto BEGIN; + if (Job_CR > 10) goto FINISH; + close; + FINISH: + mes "[^000080Arthur^000000]"; + mes "Please go to the Guardian Knight at ^008000Prontera Castle^000000 to continue on to the ^FF8000Purification Test^000000."; + close; +NEXT0: + if (Class != 2) goto NEXT1; + mes "Hello, welcome to the ^008000Prontera ChivalryY^000000."; + mes "Hope you have a good day!"; + close; +NEXT1: + if (Class != 3) goto NEXT2; + mes "Good luck in your hunting."; + close; +NEXT2: + if (Class != 4) goto NEXT3; + mes "Good day to you!"; + mes "Hope you do well to find your path."; + close; +NEXT3: + if (Class != 5) goto NEXT4; + mes "Hello, we don't currently need anything, sorry about that."; + close; +NEXT4: + if (Class != 6) goto NEXT5; + mes "Better watch yourself."; + close; +NEXT5: + if (Class != 7) goto NEXT6; + mes "Good day to you, "+ strcharinfo(0); + close; +NEXT6: + if (Class != 8) goto NEXT7; + mes "Good day, " + strcharinfo(0); + mes "I would hope to believe that all is going well."; + close; +NEXT7: + if (Class != 9) goto NEXT8; + mes "Hello! Nice to have you wish us."; + close; +NEXT8: + if (Class != 10) goto NEXT9; + mes "Hello, we're not in need of any weapons or armour at the moment, thank you."; + close; +NEXT9: + if (Class != 11) goto NEXT10; + mes "Hello, wish you luck for your success."; + close; +NEXT10: + if (Class != 12) goto NEXT11; + mes "Stay out of trouble, you don't want the guards to come after you, now do you?"; + close; +NEXT11: + if (Class != 14) goto NEXT12; + mes "Good day" + strcharinfo(0); + close; +NEXT12: + if (Class != 15) goto NEXT13; + mes "Hello, welcome to the ^008000Knight's Headquarters^000000."; + close; +NEXT13: + if (Class != 16) goto NEXT14; + mes "Welcome to the ^008000Knight's Headquarters^000000, I hope you enjoy your stay."; + close; +NEXT14: + if (Class != 17) goto NEXT15; + mes "Stay out of trouble if you know what's good for you."; + close; +NEXT15: + if (Class != 18) goto NEXT16; + mes "So, how are the experiments going down in ^00FF00Al de Baran^000000?"; + close; +NEXT16: + if (Class != 19) goto NEXT17; + mes "Welcome to the castle, good sir."; + close; +NEXT17: + if (Class != 20) goto NEXT18; + mes "Good day, miss."; + close; +NEXT18: + if (Class != 22) goto NEXT19; + if (Gender != 0) goto MALE; + mes "Hello, welcome to the ^008000Knight's Headquarters^000000."; + close; + MALE: + mes "Well done, sir!"; + close; +NEXT19: + mes "Hello and good day!"; + close; +} + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Harrison - Crusader Job Quest - Purification Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- +prt_in.gat,83,97,0 script Harrison 734,{ + mes "[^000080Harrison^000000]"; + if (Class != 0) goto NEXT_o; + mes "Hello, young traveler."; + mes "Welcome."; + close; +NEXT_o: + if (Class != 1) goto NEXT0; + if (Job_CR == 11) goto PART1; + if (Job_CR == 12) goto PART2; + if (Job_CR != 13) goto EXIT; + mes "Well done!"; + mes "Go talk to ^000080Lothar^000000, he will turn you into a ^800000Crusader^000000."; + close; + PART2: + if (@cru2 == 43) goto EXIT2; + PART2A: + mes "So, do you want to try again?"; + next; + menu "Yes",TEST,"No",-; + mes "[^000080Harrison^000000]"; + mes "Oh, okay then."; + close; + PART1: + mes "Hello, " + strcharinfo(0); + mes "I see that you've passed thus far."; + next; + mes "[^000080Harrison^000000]"; + mes "Don't let me down in this test."; + mes "This is the ^FF8000Purification Test^000000."; + mes "I will take you to the proper location when you are ready."; + next; + menu "I want to go now.",-,"All right, just a second.",EXIT0; + TEST: + mes "[^000080Harrison^000000]"; + mes "Let me make sure it's empty first."; + next; + if( getmapusers("job_cru.gat")>0 ) goto EXIT1; + savepoint "prt_in.gat",81,100; + set Job_CR, 12; + warp "job_cru",167,175; + EXIT1: + mes "[^000080Harrison^000000]"; + mes "I'm sorry, but someone else is inside at the moment."; + close; + EXIT0: + mes "[^000080Harrison^000000]"; + mes "No problem, take as long as you need."; + close; + EXIT: + mes "Hello, " + strcharinfo(0); + mes "So how are things coming along with building up your abilities?"; + mes "Are you strong enough to become a ^800000Crusader^000000 yet?"; + next; + mes "[^000080Harrison^000000]"; + mes "If you do, you'll find yourself coming back to me for one of the tests."; + close; + EXIT2: + if( getmapusers("job_cru.gat") != 0 ) goto PART2A; + mes "Well done!"; + set Job_CR,13; + next; + mes "Return to ^000080Lothar^000000 and he will make you a ^800000Crusader^000000."; + close; +NEXT0: + if (Class != 2) goto NEXT1; + mes "It's nice to see you."; + mes "Hope we'll be able to work together to keep ^00FF00Prontera^000000 safe."; + close; +NEXT1: + if (Class != 3) goto NEXT2; + mes "Welcome, I hope you have a great day!"; + close; +NEXT2: + if (Class != 4) goto NEXT3; + mes "Good day to you!"; + close; +NEXT3: + if (Class != 5) goto NEXT4; + mes "Hello, sorry but I'm not in need of anything."; + close; +NEXT4: + if (Class != 6) goto NEXT5; + mes "Don't think you can get away with theft in ^00FF00Prontera^000000, we have soldiers watching everywhere."; + close; +NEXT5: + if (Class != 7) goto NEXT6; + mes "Welcome!"; + mes "I hope you have a great day!"; + close; +NEXT6: + if (Class != 8) goto NEXT7; + mes "Welcome to ^00FF00Prontera^000000!"; + mes "Hope you have a good day!"; + close; +NEXT7: + if (Class != 9) goto NEXT8; + mes "Hello! Glad to see people of your stature here!"; + close; +NEXT8: + if (Class != 10) goto NEXT9; + mes "I appreciate your presence, but I don't need anything at the moment."; + mes "Sorry about that."; + close; +NEXT9: + if (Class != 11) goto NEXT10; + mes "How goes the hunting campaign?"; + mes "Hope everything is going all right."; + close; +NEXT10: + if (Class != 12) goto NEXT11; + mes "Stay out of trouble, you hear me?"; + close; +NEXT11: + if (Class != 14) goto NEXT12; + mes "Welcome! Good day to you!"; + close; +NEXT12: + if (Class != 15) goto NEXT13; + mes "Good day, I hope your stay in ^00FF00Prontera^000000 will be a peaceful one."; + close; +NEXT13: + if (Class != 16) goto NEXT14; + mes "It's good to see people of your stature here in ^00FF00Prontera^000000!"; + close; +NEXT14: + if (Class != 17) goto NEXT15; + mes "Be careful if you don't want to get caught."; + mes "I don't want to have to hang you or something."; + close; +NEXT15: + if (Class != 18) goto NEXT16; + mes "I hope the experiments in ^00FF00Al de Baran^000000 are legal, or we'll have to send someone to clear it up."; + close; +NEXT16: + if (Class != 19) goto NEXT17; + mes "Ah, what a fine day it is to have such a person as yourself to come and visit."; + close; +NEXT17: + if (Class != 20) goto NEXT18; + mes "Welcome, good day to you!"; + close; +NEXT18: + if (Class != 22) goto NEXT19; + if (Gender != 0) goto MALE; + mes "Wow! Congratulations on your marriage!"; + close; + MALE: + mes "Well done! I congratulate you upon your marriage!"; + close; +NEXT19: + mes "Good day to you!"; + close; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Entry A - Crusader Job Quest - Patience Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- + +job_cru.gat,23,42,0 script dead -1,{ + killmonster "job_cru.gat","dead"; + enablenpc "Test_2"; + warp "prt_castle.gat",162,27; +} + + + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Entry - Crusader Job Quest - Patience Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- +job_cru.gat,23,42,0 script Test_2 139,8,8,{ + + if (Job_CR != 6) goto EXIT; + set @CR_etmp,1; + announce "Please endure here and go to exit",8; + + monster "job_cru.gat",10,43,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",14,47,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",26,46,"Injustice",1446,1,"dead"; + monster "job_cru.gat",31,46,"Requium",1468,1,"dead"; + monster "job_cru.gat",16,52,"Raydric Archer",1453,0,"dead"; + monster "job_cru.gat",22,53,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",28,49,"Injustice",1446,1,"dead"; + monster "job_cru.gat",12,54,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",17,55,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",21,57,"Injustice",1446,1,"dead"; + monster "job_cru.gat",30,58,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",11,64,"Raydric Archer",1453,1,"dead"; + monster "job_cru.gat",19,67,"Injustice",1446,1,"dead"; + monster "job_cru.gat",24,62,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",13,70,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",18,69,"Injustice",1446,1,"dead"; + monster "job_cru.gat",29,67,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",32,68,"Requium",1468,1,"dead"; + monster "job_cru.gat",16,75,"Raydric Archer",1453,1,"dead"; + monster "job_cru.gat",21,74,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",27,76,"Injustice",1446,1,"dead"; + monster "job_cru.gat",14,78,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",19,76,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",24,79,"Requium",1468,1,"dead"; + monster "job_cru.gat",14,83,"Raydric Archer",1453,1,"dead"; + monster "job_cru.gat",18,85,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",22,84,"Injustice",1446,1,"dead"; + monster "job_cru.gat",33,86,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",13,89,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",17,92,"Injustice",1446,1,"dead"; + monster "job_cru.gat",23,90,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",26,88,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",17,97,"Khalitzburg",1438,1,"dead"; + monster "job_cru.gat",23,100,"Injustice",1446,1,"dead"; + monster "job_cru.gat",31,101,"Ghoul",1423,1,"dead"; + monster "job_cru.gat",13,103,"Raydric Archer",1453,1,"dead"; + monster "job_cru.gat",22,105,"Injustice",1446,1,"dead"; + monster "job_cru.gat",30,107,"Khalitzburg",1438,1,"dead"; + disablenpc "Test_2"; + end; + EXIT: + warp "prt_castle.gat",162,27; +} + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Exit - Crusader Job Quest - Patience Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- +job_cru.gat,23,109,0 script Exit_1 139,1,1,{ + +if (@CR_etmp == 0) goto JUMP; + set Job_CR,7; + enablenpc "Test_2"; +JUMP: + warp "prt_castle.gat",162,28; +} + + + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Fighting Area - Crusader Job Quest - 4th Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- + +job_cru.gat,167,175,0 script kill -1,{ + + if (@cru2 == 43) goto good; + + set @cru2,@cru2 +1; + announce " You killed another monster",3; + end; + + good: + announce " You killed all monster, you may go to exit",3; + end; +} + + +job_cru.gat,167,175,0 script Test_4 139,1,1,{ + + if(Job_CR != 12) goto EXIT; + set @CRU2,1; + announce "Defeat all the enemies.",3; + monster "job_cru.gat",163,42,"Bongun",1188,1,"kill"; + monster "job_cru.gat",171,66,"Bongun",1188,1,"kill"; + monster "job_cru.gat",163,89,"Bongun",1188,1,"kill"; + monster "job_cru.gat",171,115,"Bongun",1188,1,"kill"; + monster "job_cru.gat",166,141,"Bongun",1188,1,"kill"; + monster "job_cru.gat",168,166,"Bongun",1188,1,"kill"; + monster "job_cru.gat",164,170,"Munak",1026,1,"kill"; + monster "job_cru.gat",173,153,"Munak",1026,1,"kill"; + monster "job_cru.gat",164,138,"Munak",1026,1,"kill"; + monster "job_cru.gat",166,128,"Munak",1026,1,"kill"; + monster "job_cru.gat",171,117,"Munak",1026,1,"kill"; + monster "job_cru.gat",163,102,"Munak",1026,1,"kill"; + monster "job_cru.gat",172,84,"Munak",1026,1,"kill"; + monster "job_cru.gat",162,76,"Munak",1026,1,"kill"; + monster "job_cru.gat",167,65,"Munak",1026,1,"kill"; + monster "job_cru.gat",171,58,"Munak",1026,1,"kill"; + monster "job_cru.gat",162,48,"Munak",1026,1,"kill"; + monster "job_cru.gat",170,33,"Munak",1026,1,"kill"; + monster "job_cru.gat",170,26,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",166,37,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",171,47,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",165,61,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",172,65,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",163,77,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",164,86,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",165,98,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",170,101,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",163,110,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",164,117,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",166,129,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",165,139,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",166,151,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",168,160,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",162,169,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",171,171,"Skeleton",1076,1,"kill"; + monster "job_cru.gat",162,32,"Zombie",1015,1,"kill"; + monster "job_cru.gat",165,51,"Zombie",1015,1,"kill"; + monster "job_cru.gat",172,73,"Zombie",1015,1,"kill"; + monster "job_cru.gat",170,92,"Zombie",1015,1,"kill"; + monster "job_cru.gat",173,111,"Zombie",1015,1,"kill"; + monster "job_cru.gat",170,124,"Zombie",1015,1,"kill"; + monster "job_cru.gat",171,147,"Zombie",1015,1,"kill"; + monster "job_cru.gat",163,162,"Zombie",1015,1,"kill"; + disablenpc "Test_4"; + EXIT: + end; +} + + +//----------------------------------------------------------------------------------------------------------------------------------------------------- +// +// Test 4 Exit - Crusader Job Quest - 4th Test +// By Black Dragon based on the information at RagnaInfo +// +//----------------------------------------------------------------------------------------------------------------------------------------------------- +job_cru.gat,167,17,0 script Exit4 139,2,2,{ +enablenpc "Test_4"; +warp "prt_in.gat",81,100; +} diff --git a/npc/jobs/2-2/noquest/crusader.txt b/npc/jobs/2-2/noquest/crusader.txt new file mode 100644 index 000000000..b977baf71 --- /dev/null +++ b/npc/jobs/2-2/noquest/crusader.txt @@ -0,0 +1,54 @@ +//Crusader NPC for Athena by DiaDz +//1.1 Added SkillPoint check [Lupus] + +//Crusader prt_in 88 103 +prt_in.gat,88,103,3 script Crusader Trainer 752,{ + if(Class==14) goto crus; + if(Class !=1) goto notsword; + + mes "[Crusader Trainer]"; +mes "Welcome Have you come to Join our ranks?."; + next; + mes "[Crusader Trainer]"; + mes "How may I be of Service to you?"; + next; + menu "Change Job into a Crusader.",case1,"The Requirements.",case2,"Quit.",case3; + case1: + if(JobLevel < 40) goto notlvl; + mes "[Crusader Trainer]"; + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Crusader."; + if(SkillPoint > 0) close; + mes "Welcome to the Crusaders Guild"; + jobchange 14;// Job: Job_Crusader + close; + + notlvl: + mes "[Crusader Trainer]"; + mes "you need to be at least Job level 40"; + close; + + case2: + mes "[Crusader Trainer]"; + mes "You need to be a Swordsman of Job Level 40 to become a Crusader"; + next; + mes "[Crusader Trainer]"; + mes "We are destined to protect all who live in Midgard"; + close; + + case3: + mes "[Crusader Trainer]"; + mes "Please come again sometime"; + close; + + crus: + mes "[Crusader Trainer]"; + mes "You are already a Mighty Crusader"; + mes "May the Blessings of the Gods go with you"; + close; + + notsword: + mes "[Crusader Trainer]"; + mes "I'm sorry but there is nothing I can help you with."; + mes "Only stout Swordsman can follow the holy path in order to become a 'Crusader'."; + close; +} diff --git a/npc/jobs/2-2/noquest/dancer-bard.txt b/npc/jobs/2-2/noquest/dancer-bard.txt new file mode 100644 index 000000000..352708ac2 --- /dev/null +++ b/npc/jobs/2-2/noquest/dancer-bard.txt @@ -0,0 +1,72 @@ +//Dancer/Bard NPC for Athena by DiaDz +//No Quests, just npc on location +//1.1 Added SkillPoint check [Lupus] + +//Dancer & Bard - Comodo 189 166 4_F_07 +comodo.gat,189,166,4 script Performance Master 741,{ + if(Class==19) goto bard; + if(Class==20) goto dance; + if(Class !=3) goto notarch; + + mes "[Performance Master]"; + mes "Welcome to Comodo and the Performers Guild."; + next; + mes "[Performance Master]"; + mes "What can I do for you , a Song or Dance perhaps?"; + next; + menu "Change Job into a Bard/Dancer.",case1,"The Requirements.",case2,"Quit.",case3; + case1: + if(JobLevel < 40) goto notlvl; + if(sex==1) goto M; + mes "[Performance Master]"; + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Dancer."; + if(SkillPoint > 0) close; + mes "Welcome Glorious Dancer"; + jobchange 20;// Job: Job_Dancer + close; + + M: + mes "[Performance Master]"; + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Bard."; + if(SkillPoint > 0) close; + mes "Welcome Master Bard"; + jobchange 19;// Job: Job_Bard + close; + + notlvl: + mes "[Performance Master]"; + mes "you need to be at least Job level 40"; + close; + + case2: + mes "[Performance Master]"; + mes "Archers of Job Level 40 and above may become Dancers or Bards"; + next; + mes "[Performance Master]"; + mes "Its a Great Time to become a Bard or Dancer they are in Much demand!"; + mes "You can't miss the perfect chance!"; + close; + + case3: + mes "[Performance Master]"; + mes "Please come again sometime"; + close; + + dance: + mes "[Performance Master]"; + mes "You are already a Glorious Dancer."; + mes "Roam our world and bring joy and harmony to the masses of Midgard."; + close; + + bard: + mes "[Performance Master]"; + mes "You are already a Masterful Bard."; + mes "Roam our world and bring joy and harmony to the masses of Midgard."; + close; + + notarch: + mes "[Performance Master]"; + mes "I'm sorry but there is nothing I can help you with."; + mes "Only Archers are nimble and dexterous enough to be as graceful as a 'Dancer' or 'Bard'."; + close; +} diff --git a/npc/jobs/2-2/noquest/monk.txt b/npc/jobs/2-2/noquest/monk.txt new file mode 100644 index 000000000..36072dcdd --- /dev/null +++ b/npc/jobs/2-2/noquest/monk.txt @@ -0,0 +1,54 @@ +//Monk NPC for Athena by DiaDz +//No Quests, just npc on location +//1.1 Added SkillPoint check [Lupus] + +//Monk Job Change Monk_in 99 64 4_M_MONK (new temp 55 cause of error) +monk_in.gat,99,64,5 script Master Monk 753,{ + if(Class==15) goto monk; + if(Class !=4) goto notaco; + + mes "[Master Monk]"; + mes "Good Day,This is the Monk's Guild."; + next; + mes "[Master Monk]"; + mes "How may I be of Service to you?"; + next; + menu "Change Job into a Monk.",Lcase1,"The Requirements.",Lcase2,"Quit.",Lcase3; + Lcase1: + if(JobLevel < 40) goto notlvl; + mes "[Master Monk]"; + if(SkillPoint > 0) mes "You need to use up all of your skill points before I can make you a Monk."; + if(SkillPoint > 0) close; + mes "Your Welcome to Stay here at the Abbey since you are now a Monk."; + jobchange 15;// Job: Job_Monk + close; + + notlvl: + mes "[Master Monk]"; + mes "you need to be at least Job level 40"; + close; + + Lcase2: + mes "[Master Monk]"; + mes "You need to be a Acolyte of Job Level 40 to become a Monk"; + next; + mes "[Master Monk]"; + mes "We Monks are the masters of Hand to Hand Combat"; + close; + + Lcase3: + mes "[Master Monk]"; + mes "Please come again sometime"; + close; + + monk: + mes "[Master Monk]"; + mes "You are already a Monk of much Skill and prowess"; + close; + + notaco: + mes "[Master Monk]"; + mes "I'm sorry but there is nothing I can help you with."; + mes "Divine fists can only be forged by Divine Acolytes in order to become a 'Monk'."; + close; +} diff --git a/npc/jobs/2-2/rogue.txt b/npc/jobs/2-2/rogue.txt new file mode 100644 index 000000000..15f37ba25 --- /dev/null +++ b/npc/jobs/2-2/rogue.txt @@ -0,0 +1,943 @@ +//===== eAthena Script ======================================= +//= Rogue Job Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 + +//===== Description: ========================================= +//= Rogue job quest based off of official iRO Rogue quest. +//= There are some differences from official quest due to scripting issues. +//= Missing some message text. +//===== Additional Comments: ================================= +//= Working. +//============================================================ + + + +//=======================================================================================================// +// Markie: Test 1 and Jobchange // +//***********************************************************************************************************************************************************// +in_rogue.gat,363,123,3 script Markie 747,{ + + mes "[Markie]"; + if(Class == Job_Thief) goto L_Thief; + if(Class == Job_Rogue) goto L_Rogue; + +L_JobOther: + mes "I don't know how you found this place, but I think you better leave.........."; + close; + +L_Rogue: + mes "Nice to see you again sweetie. You must be having so much fun as Rogue huh? Teh he he...."; + close; + +L_Thief: + if(JobLevel >= 40) goto L_Start; + mes "Oh hi there. If you want to become a Rogue I'm afraid you'll have to come back after you've trained a little more."; + mes "Only Thieves with a ^5533FFJob level of at least 40^000000 can become Rogues."; + close; + +L_Start: + if(ROGUE_Q == 1) goto L_ReTest; + if(ROGUE_Q == 2) goto L_Test2; + if(ROGUE_Q == 3) goto L_Test3; + if(ROGUE_Q == 4) goto L_Test4; + if(ROGUE_Q == 5) goto L_Change; + mes "Hmm? What brings you down here? Oh I see now... You want to become a rogue don't you sweetie?"; + next; + mes "[Markie]"; + mes "Well it's nice to meet you. My name is Markie, what's yours?"; + next; + mes "[Markie]"; + mes strcharinfo(0) + "..... Te he, you've got a nice name there honey. By the way, how come you decided to become a Rogue?"; + next; + mes "[Markie]"; + mes "Well since you were honest with me and gave me your real name I guess it doesn't really matter."; + mes "But for future reference, a Rogue never reveals his/her true identity to anybody."; + next; + mes "[Markie]"; + mes "It's a Rogue's number 1 rule shuga, so from now on you'd better be careful about that."; + mes "By the way, here's an application form..... please fill out all the necessary information....."; + next; + mes "(you fill out the form and hand it back)"; + set JBLVL, 40; // used to determine what item to get at the end + if(JobLevel == 50) set JBLVL, 50; // used to determine what item to get at the end + next; + mes "[Markie]"; + mes "Okay honey.... looks good, I'll accept your application."; + mes "Now that that's been taken care of, how about I conduct a short interview with you?"; + next; + mes "[Markie]"; + mes "Oh, you don't have to be nervous about it sweetie.... I'm just want to find out how much you know about Rogues."; + mes "I do this with all of the Rogue candidates. Shall we begin?"; + next; + menu "Ok.",L_Test1, "Hold on... I need some time.",-; + + mes "[Markie]"; + mes "Okay honey, just take your time. When you're ready come back."; + close; + + +//================================================================= +L_Test1: +//======= + mes "[Markie]"; + mes "I am going to ask you a few questions. Listen carefully and choose what you think is the best answer okay?"; + next; + savepoint "in_rogue.gat",366,114; + set @score, 0; + set ROGUE_Q, 1; + set @temp, rand(2); + if(@temp == 1) goto L_QSet2; + + L_QSet1: + mes "[Markie]"; + mes "1) What is the added flee rate that a Thief recieves when the ^5533FFImprove Dodge^000000 skill is ^5533FFmastered^000000?"; + next; + menu "30",-, "40",sM1_1, "160",sM1_1, "20",sM1_1; + + set @score, @score + 10; + + sM1_1: + + mes "[Markie]"; + mes "2) Choose a monster that can detect a hidden or cloaked character?"; + next; + menu "Worm Tail",-, "Argos",sM1_2, "Mummy",sM1_2, "Soldier Skeleton",sM1_2; + + set @score, @score + 10; + + sM1_2: + + mes "[Markie]"; + mes "3) Where is the Rogue guild located?"; + next; + menu "Comodo",sM1_3, "Kokomo Beach",sM1_3, "Pharos Lightouse",-, "Morroc",sM1_3; + + set @score, @score + 10; + + sM1_3: + + mes "[Markie]"; + mes "4) In which of the following towns, can you become a Thief?"; + next; + menu "Comodo",sM1_4, "Lutie",sM1_4, "Alberta",sM1_4, "Morroc",-; + + set @score, @score + 10; + + sM1_4: + + mes "[Markie]"; + mes "5) Choose the card that does ^FF3355not^000000 have an effect on a players ^5533FFDEX stat^000000..."; + next; + menu "Rocker Card",sM1_5, "Mummy Card",-, "Zerom Card",sM1_5, "Drops",sM1_5; + + set @score, @score + 10; + + sM1_5: + + mes "[Markie]"; + mes "6) What do you think is cool about being a Rogue?"; + next; + menu "Being a bad ass",sM1_6, "Being a hypocrite",sM1_6, "Being shameless",sM1_6, "Having excellent attack strength",-; + + set @score, @score + 10; + + sM1_6: + + mes "[Markie]"; + mes "7) At what job level can you change from a Thief to a Rogue?"; + next; + menu "At job lvl 30",sM1_7, "At job lvl 35",sM1_7, "At job lvl 40",-, "At job lvl 50",-; + + set @score, @score + 10; + + sM1_7: + + mes "[Markie]"; + mes "8) If you wanted to dye your hair a different color, where would you have to go to do that?"; + next; + menu "Building in SouthWestern part of Morroc",sM1_8, "Building in SouthWestern part of Prontera",-, + "Building in SouthEastern part of Morroc",sM1_8, "Building in NorthEastern part of Prontera",sM1_8; + + set @score, @score + 10; + + sM1_8: + + mes "[Markie]"; + mes "9) What mushrooms do you need to steal in order to become a Thief?"; + next; + menu "Orange Gooey Mushrooms",-, "Red Hairy Mushrooms",sM1_9, "Orange Net Mushrooms",-, "Orange Sticky Mushrooms",sM1_9; + + set @score, @score + 10; + + sM1_9: + + mes "[Markie]"; + mes "10) Which of these cards is ^FF3355useless^000000 to a Rogue?"; + next; + menu "Whisper Card",sM1_10, "Elder Willow Card",-, "Zerom Card",sM1_10, "Matyr Card",sM1_10; + + set @score, @score + 10; + + sM1_10: + goto L_Score; + + + L_QSet2: + mes "[Markie]"; + mes "1) What skill do you need to learn before you can learn ^5533FFStalk^000000?"; + next; + menu "Hiding",-, "Steal",sM2_1, "Improve Dodge",sM2_1, "Bash",sM2_1; + + set @score, @score + 10; + + sM2_1: + + mes "[Markie]"; + mes "2) How much more of a discount can a Rogue get with the ^5533FFHaggel^000000 skill than a merchant can with the ^5533FFDiscount^000000 skill?"; + next; + menu "3%",sM2_2, "2%",sM2_2, "1%",-, "0%",sM2_2; + + set @score, @score + 10; + + sM2_2: + + mes "[Markie]"; + mes "3) What is the correct description for the skill ^5533FFMug^000000?"; + next; + menu "Steal Items from players",sM2_3, "Steal Items from monsters",sM2_3, "Steal Zeny from monsters",-, "Steal Zeny from players",sM2_3; + + set @score, @score + 10; + + sM2_3: + + mes "[Markie]"; + mes "4) How many Rogues are required to activate the skill ^5533FFSlyness^000000?"; + next; + menu "1 Rogue + 2 Assassins",sM2_4, "2 Rogues + 1 Thief",sM2_4, "4 Thieves",sM2_4, "2 or more Rogues",-; + + set @score, @score + 10; + + sM2_4: + + mes "[Markie]"; + mes "5) After increasing ^5533FFDivest Helm^000000 to level 5, what other skill becomes available for you learn?"; + next; + menu "Envenom",sM2_5, "Strip Tease",sM2_5, "Venom Splasher",sM2_5, "Divest Shield",-; + + set @score, @score + 10; + + sM2_5: + + mes "[Markie]"; + mes "6) Choose a skill that allows its user to move while being hidden?"; + next; + menu "Hiding",sM2_6, "Back Slide",sM2_6, "Stalk",-, "Sand Attack",sM2_6; + + set @score, @score + 10; + + sM2_6: + + mes "[Markie]"; + mes "7) Choose the card that increases the ^5533FFaccuracy rate^000000 of its owner?"; + next; + menu "Andre",sM2_7, "Familiar",sM2_7, "Mummy",-, "Marina",sM2_7; + + set @score, @score + 10; + + sM2_7: + + mes "[Markie]"; + mes "8) Choose the monster that receives more damage when attacked by a weapon with a Vadon card attached to it?"; + mes "(Vadon card inflicts 20% more damage to fire property monsters)"; + next; + menu "Vadon",sM2_8, "Deviruchi",sM2_8, "Elder Willow",-, "Baphomet",sM2_8; + + set @score, @score + 10; + + sM2_8: + + mes "[Markie]"; + mes "9) How much SP does the ^5533FFDouble Attack^000000 skill require when used with a dagger?"; + next; + menu "15 SP",sM2_9, "No SP needed",-, "10 SP",sM2_9, "54 SP",sM2_9; + + set @score, @score + 10; + + sM2_9: + + mes "[Markie]"; + mes "10) Choose an effective dagger to use in the Byalan Dungeon?"; + next; + menu "Wind Main-Gauche",-, "Ice Main-Gauche",sM2_10, "Earth Main-Gauche",sM2_10, "Fire Main-Gauche",sM2_10; + + set @score, @score + 10; + + sM2_10: + + + L_Score: + mes "[Markie]"; + mes "Okay, those are all of the questions I have. Now that wasn't so bad was it sweetie?"; + mes "I hope you don't mind, but I've been grading your answers."; + next; + mes "[Markie]"; + mes "I like to give people scores on their interviews so that they can know how well they did."; + mes "It looks like you got a ^FF3355" + @score +"^000000/100............"; + next; + mes "[Markie]"; + if(@score< 90) goto sL_Failed; + if(@score<100) goto sL_Passed; + + sL_Perfect: + mes "A perfect score! I knew you had what it takes to be a Rogue....."; + mes "But don't get ahead of yourself honey cause there is still plenty more....."; + next; + mes "[Markie]"; + set ROGUE_Q, 2; + goto L_Test2; + sL_Passed: + mes "Good, good. You did a good job shuga. But there is still more so don't get excited just yet....."; + next; + mes "[Markie]"; + set ROGUE_Q, 2; + goto L_Test2; + sL_Failed: + mes "*sigh*..... this is not the type of score I was expecting......"; + mes "What can I say excecpt, with a score like this you're definitely not cut out to be a Rogue.........."; + emotion 4; + next; + mes "[Markie]"; + mes "Why don't you go do some more training shuga..... you need it..... *mumbles ( what a waste of my time...)*"; + close; + +L_ReTest: + mes "You again? Are you sure you're ready this time?...... Okay honey, just relax...."; + next; + goto L_Test1; + +L_Test2: + mes "Your second test will be given by ^5533FFMr. Smith^000000."; + mes "I have to warn you though, Mr. Smith can be difficult and hard to please. So be careful how you act around him."; + close; +L_Test3: + mes "I know those guys are hard to find. Just be patient and keep on searching. Make sure you have the correct password as well.."; + close; +L_Test4: + mes "What are you doing here? I hope your not trying to skip the last test?........."; + emotion 1; + next; + mes "[Markie]"; + mes "Your almost finished so just keep trying. I know you can do it."; + close; + + +//======================================================================= +L_Change: +//=========== + mes "Oh, you're back and your in one piece! It looks like you've passed all of the tests sweetie."; + mes "You have proven that you are ready to become a Rogue!"; + emotion 5; + next; + mes "[Markie]"; + mes "Tada! Congratulations on becoming a Rogue. You showed a lot of effort and deserve a reward for it......"; + setlook 7,0; + jobchange Job_Rogue; + emotion 46; + next; + mes "[Markie]"; + mes "Now that you are a Rogue you are free to go where ever you want to and do what ever you want."; + if(JBLVL == 40) getitem 1219,1; // 2 slott gladius + if(JBLVL == 50) getitem 1220,1; // 3 slott gladius + callfunc "F_ClearJobVar"; + next; + mes "[Markie]"; + mes "Just keep in mind that freedom requires responsibility. Treat people the way you expect to be treated."; + next; + mes "[Markie]"; + mes "Have fun shuga! See ya around!"; + close; +} + + + +//=======================================================================================================// +// Mr. Smith: Tests 2 and 3 // +//***********************************************************************************************************************************************************// +in_rogue.gat,376,23,3 script Mr. Smith 57,{ + + mes "[Mr. Smith]"; + if(Class == Job_Thief) goto L_Thief; + if(Class == Job_Rogue) goto L_Rogue; + +L_OtherJob: + mes "Go away! I'm busy....."; + close; +L_Rogue: + mes "Looking good there my Rogue friend"; + close; +L_Thief: + if(ROGUE_Q == 2) goto L_Test2; + if(ROGUE_Q == 3) goto L_Test3; + if(ROGUE_Q > 3) goto L_Done; + mes "Ok ok.... one... two.... three.... Where do you do you business... is it.... Morroc... Geffen.... Comodo??......."; + next; + mes "[Mr. Smith]"; + mes "Uhh..... this is giving me a headache......."; + next; + mes "[Mr. Smith]"; + mes "Huh? Who are you? If you want to become a rogue go talk to ^5533FFMarkie^000000...."; + next; + mes "[Mr. Smith]"; + mes "...... CRAP! I forgot what I was counting!!"; + emotion 16; + close; + +//---------------------------------------------------------------------------------------------------- +L_Test2: +//-------------- + if(ROGUE_Q2 > 0) goto L_Check2; + mes "So you're here to take the second test.... good......."; + next; + mes "[Mr. Smith]"; + mes "Before we get started, let me tell you about the test application fee."; + mes "Our guild is involved in alot of business *cough* 'transactions' *cough* and therefore we are in constant needs of funds."; + next; + mes "[Mr. Smith]"; + mes "This is why we require a fee of ^5533FF10,000 zeny^000000 to be paid when taking the Rogue tests."; + mes "The fee will be collected when you have completed this second test so don't have to worry if you don't have it now."; + next; + mes "[Mr. Smith]"; + mes "Now for your test..... You will be required to collect the following items:"; + next; + mes "[Mr. Smith]"; + set ROGUE_Q2, rand(1,3); + if(ROGUE_Q2 == 1) callsub sF2_R1; + if(ROGUE_Q2 == 2) callsub sF2_R2; + if(ROGUE_Q2 == 3) callsub sF2_R3; + next; + mes "[Mr. Smith]"; + mes "Once you have ALL of these items and 10,000 zeny, come back and see me okay? Good."; + close; + + sF2_R1: + mes "^5533FF6 Blue Herbs,"; + mes "10 Skel Bones,"; + mes "10 Decayed Nails,"; + mes "10 Horrendous Mouths^000000."; + return; + sF2_R2: + mes "^5533FF10 Green Herbs,"; + mes "10 Garlets,"; + mes "10 Snake Scales"; + mes "10 Crab Shells.^000000"; + return; + sF2_R3: + mes "^5533FF10 Yellow Herbs,"; + mes "10 Bear's Footskin,"; + mes "10 Shells"; + mes "10 Grasshopper's Legs^000000."; + return; + +L_Check2: + set @count, 0; + if(ROGUE_Q2 == 2) goto L_2; + if(ROGUE_Q2 == 3) goto L_3; + + L_1: + set @R, 1; + if(countitem(510)<6 || countitem(932)<10 || countitem(957)<10 || countitem(958)<10 || Zeny < 10000) goto L_NotEnuf; + delitem 510,6; + delitem 932,10; + delitem 957,10; + delitem 958,10; + goto L_Done2; + + L_2: + set @R, 2; + if(countitem(511)<10 || countitem(910)<10 || countitem(926)<10 || countitem(964)<10 || Zeny < 10000) goto L_NotEnuf; + delitem 511,10; + delitem 910,10; + delitem 926,10; + delitem 964,10; + goto L_Done2; + + L_3: + set @R, 3; + if(countitem(508)<10 || countitem(948)<10 || countitem(935)<10 || countitem(940)<10 || Zeny < 10000) goto L_NotEnuf; + delitem 508,10; + delitem 948,10; + delitem 935,10; + delitem 940,10; + + L_Done2: + mes "Let's see here.... application fee.... check..... items....... check...... Alright, everything looks in order. You've passed the second test."; + next; + mes "[Mr. Smith]"; + mes "When you are ready to take the next test let me know."; + set Zeny, Zeny - 10000; + set ROGUE_Q, 3; + set ROGUE_Q2, 0; + close; + + L_NotEnuf: + mes ".... What the f@&#!?!? You don't have all of the items? Then why did you come back?? Don't tell me you forgot what to get....."; + emotion 1; + next; + mes "[Mr. Smith]"; + mes "Write this down! You need ^5533FF10,000^000000 zeny and:"; + if(ROGUE_Q2 == 1) callsub sF2_R1; + if(ROGUE_Q2 == 2) callsub sF2_R2; + if(ROGUE_Q2 == 3) callsub sF2_R3; + next; + mes "[Mr. Smith]"; + mes "Got it? DON'T come back until you have everything........."; + emotion 32; + close; + + +//---------------------------------------------------------------------------------------------- +L_Test3: +//--------------- + if(ROGUE_Q2 > 0) goto L_Check3; + mes "Let me see..... Who should I have you go find........ hmm........."; + emotion 20; + next; + mes "[Mr. Smith]"; + mes "Ah I know! Alright, in the previous test I had you go find some items. For this test you will need to find a specific person."; + emotion 5; + next; + mes "[Mr. Smith]"; + set ROGUE_Q2, rand(1,3); + if(ROGUE_Q2 == 1) callsub sF3_R1; + if(ROGUE_Q2 == 2) callsub sF3_R2; + if(ROGUE_Q2 == 3) callsub sF3_R3; + next; + mes "[Mr. Smith]"; + mes "Good luck to you. Try to finish this test as soon as possible. Getting things done quickly is one of a Rogue's traits."; + close; + + sF3_R1: + mes "You will have to go and find ^5533FFAragham Junior^000000."; + next; + mes "[Mr. Smith]"; + mes "He lives in a little house somewhere ^5533FFSouthWest^000000 of the Fortress of Sandarman."; + mes "That area is located ^5533FFone map East^000000 from here and is on the ^000000SouthWestern land mass^000000."; + next; + mes "[Mr. Smith]"; + mes "He's a really nice guy who works real hard and is very good at collecting unpaid debts."; + mes "Unfortunately people were trying to kill him because of something his father had done in the past."; + next; + mes "[Mr. Smith]"; + mes "When he joined the Rogue guild, he decided he was going to keep low which is why he's in his current hiding place."; + mes "No one is supposed to know where he is except for those of us at the Rogue Guild."; + next; + mes "[Mr. Smith]"; + mes "That's why you will need this password in order to talk to him."; + mes "The password is: '^5533FFAragham never hoarded upgrade items.^000000'"; + return; + sF3_R2: + mes "You will have to go and find ^5533FFHollgrehen Junior^000000."; + next; + mes "[Mr. Smith]"; + mes "He lives lives in a little house somewhere ^5533FFSouthEast^000000 of the Fortress of Sandarman."; + mes "That area is located ^5533FFone map East^000000 from here and is on the ^5533FFEastern land mass^000000."; + next; + mes "[Mr. Smith]"; + mes "No one is supposed to know where he is except for those of us at the Rogue Guild."; + next; + mes "[Mr. Smith]"; + mes "That's why you will need this password in order to talk to him."; + mes "The password is: '^5533FFMy Father never hoarded upgrade items.^000000'"; + return; + sF3_R3: + mes "You will have to go and find ^5533FFAntonio Junior.^000000."; + next; + mes "[Mr. Smith]"; + mes "He lives lives in a little hut somewhere on the ^5533FFEastern end of Kokomo Beach^000000."; + mes "That area is located ^5533FF1 map North, and 1 map West^000000 from here."; + next; + mes "[Mr. Smith]"; + mes "No one is supposed to know where he is except for those of us at the Rogue Guild."; + next; + mes "[Mr. Smith]"; + mes "That's why you will need this password in order to talk to him."; + mes "The password is: '^5533FFAntonio doesn't like breaking refining material.^000000'"; + return; + + +L_Check3: + mes "What!?! Did you just say you forgot where to go?........"; + emotion 1; + next; + mes "[Mr. Smith]"; + mes "GRRRR!!! That's why you need to WRITE down important things! Geez......"; + emotion 6; + next; + mes "[Mr. Smith]"; + if(ROGUE_Q2 == 1) callsub sF3_R1; + if(ROGUE_Q2 == 2) callsub sF3_R2; + if(ROGUE_Q2 == 3) callsub sF3_R3; + close; + +//------------------------------------------------------------------------------------------------- +L_Done: +//---------------- + mes "I have no more busisness with you........."; + close; +} + + +//=========================================================== +// Guildsman that need to be found +//=========================================================== + +//------------------------------------------------------------------------------ +in_rogue.gat,272,136,3 script Hermanthorn Jr. 85, +{ + mes "[Hermanthorn Jr.]"; + mes "Huh? Wha.... who are you?! You're not from the Rogue guild!! Get out of here!"; + emotion 1; + next; + mes "[Hermanthorn Jr.]"; + mes "You're..... I see! You're one of them!!! You've come here to kill me haven't you??!! No... NO!! I'm not ready to die yet!"; + emotion 0; + next; + mes "[Hermanthorn Jr.]"; + mes "Aaaaaaaaaaaaaahhhh!! Go away! Get lost! Otherwise I am gonna KILL YOU!!!"; + emotion 16; + close; +} + +// -------------------------------------------------------------------------- +cmd_fild09.gat,106,195,0 script Aragham Junior 45,1,1,{ + callfunc "F_RogueTest3", 1, "Aragham", "never", "hoarded", "upgrade items.", 244, 24; +} + +// ----------------------------------------------------------------------------- +cmd_fild09.gat,335,143,0 script Hollgrehen Junior 45,1,1,{ + callfunc "F_RogueTest3", 2, "My father", "never", "hoarded", "upgrade items.", 168, 34; +} + +// ------------------------------------------------------------------------------ +cmd_fild04.gat,304,179,0 script Antonio Junior 45,1,1,{ + callfunc "F_RogueTest3", 3, "Antonio", "doesn't like", "breaking", "refining materials.", 165, 104; +} + +// Function for Guildsman =================================== +function script F_RogueTest3 { + + mes "[???]"; + mes "Who's there?!!!"; + mes "Who dares to trespass on my territory?"; + if(Class!=Job_Thief || ROGUE_Q<3 || ROGUE_Q2==0) close; +L_Start: + deletearray @choice$[1], 4; + next; + menu "My father",M_1a, "Aragham",M_1b, "Antonio",M_1c, "Legolas",M_1d; + + M_1a: + set @choice$[1], "My father"; + goto M_Menu2; + M_1b: + set @choice$[1], "Aragham"; + goto M_Menu2; + M_1c: + set @choice$[1], "Antonio"; + goto M_Menu2; + M_1d: + set @choice$[1], "Legolas"; + + M_Menu2: + callsub sF_Password; + menu "did not",M_2a, "doesn't like",M_2b, "never",M_2c, "ever",M_2d; + + M_2a: + set @choice$[2], "did not"; + goto M_Menu3; + M_2b: + set @choice$[2], "doesn't like"; + goto M_Menu3; + M_2c: + set @choice$[2], "never"; + goto M_Menu3; + M_2d: + set @choice$[2], "ever"; + + M_Menu3: + callsub sF_Password; + menu "hoard",M_3a, "hoarded",M_3b, "hide",M_3c, "took",M_3d, "breaking",M_3e; + + M_3a: + set @choice$[3], "hoard"; + goto M_Menu4; + M_3b: + set @choice$[3], "hoarded"; + goto M_Menu4; + M_3c: + set @choice$[3], "hide"; + goto M_Menu4; + M_3d: + set @choice$[3], "took"; + goto M_Menu4; + M_3e: + set @choice$[3], "breaking"; + + M_Menu4: + callsub sF_Password; + menu "upgrade items.",M_4a, "forging items.",M_4b, "refining materials.",M_4c, "upgrade equipment.",M_4d; + + M_4a: + set @choice$[4], "upgrade items."; + goto L_Check; + M_4b: + set @choice$[4], "forging items."; + goto L_Check; + M_4c: + set @choice$[4], "refining materials."; + goto L_Check; + M_4d: + set @choice$[4], "upgrade equipment."; + +L_Check: + callsub sF_Password; + if(ROGUE_Q2 != getarg(0)) goto L_Wrong; + if((@choice$[1] != getarg(1)) || (@choice$[2] != getarg(2)) || (@choice$[3] != getarg(3)) || (@choice$[4] != getarg(4))) goto L_Wrong; + mes "~ creeek ~"; + mes "You hear the door begining to open........"; + next; + deletearray @choice$[1], 4; + warp "in_rogue.gat", getarg(5), getarg(6); + end; + + L_Wrong: + mes "[???]"; + mes "Get lost!!"; + close; +sF_Password: + mes "[^5533FF" + strcharinfo(0) + "^000000]"; + mes @choice$[1]; + mes @choice$[2]; + mes @choice$[3]; + mes @choice$[4]; + next; + return; +} + + +//=======================================================================================================// +// Test 4: Last Test // +//***********************************************************************************************************************************************************// +// Other path +// warp "in_rogue.gat", 11, 388; +// 390,389 end warp +// 9,9 -> 9,21 +//=============================================== +// Guildsman +//=============================================== +//--------------------------------------------------------------------------- +in_rogue.gat,244,39,4 script Aragham Junior 99, +{ + callfunc "F_RogueTest4", "Aragham Junior", 245, 27; +} +//--------------------------------------------------------------------------- +in_rogue.gat,152,27,6 script Hollgrehen Junior 85, +{ + callfunc "F_RogueTest4", "Hollgrehen Junior", 160, 32; +} +//--------------------------------------------------------------------------- +in_rogue.gat,183,105,4 script Antonio Junior 88, +{ + callfunc "F_RogueTest4", "Antonio Junior", 175, 107; +} + +// Function for Guildsman ============================= +function script F_RogueTest4 { + + if(ROGUE_Q == 4) goto L_Restart; + mes "[" + getarg(0) + "]"; + mes "Hello there... You must be from the Rogue guild. My name is " + getarg(0) + "...... I am the Rogue of the Desert.............."; + next; + mes "[" + getarg(0) + "]"; + mes "Aww who am I kidding...... Let's cut the crap. So are you ready to become a rogue?"; + emotion 4; + next; + mes "[" + getarg(0) + "]"; + mes "You see, the Rogue motto is...... ^5533FF'Avoid the strong! Be malicious to the weak!'^000000"; + mes "This simple rule applys to fighting monsters as well."; + next; + mes "[" + getarg(0) + "]"; + mes "The very last thing you will have to do before you can become a Rogue, is to walk through an underground passage to the Rogue Guild."; + next; + mes "[" + getarg(0) + "]"; + mes "Sounds easy huh? Well it's not! But don't worry...."; + mes "If you stay true to the Rogue motto and use a lot of hide, and do a lot of running, you should be just fine."; + + M_Menu: + next; + mes "[" + getarg(0) + "]"; + mes "Ok, are you ready to go?"; + next; + menu "As ready as I'll ever be.",-, "Actually I'm kinda scared...",M_End; + + mes "[" + getarg(0) + "]"; + mes "Good luck then."; + next; + set ROGUE_Q, 4; + killmonsterall "in_rogue.gat"; + savepoint "in_rogue.gat", getarg(1), getarg(2); + warp "in_rogue.gat", 15, 105; + end; + + M_End: + mes "[" + getarg(0) + "]"; + mes "....................."; + next; + mes "[" + getarg(0) + "]"; + mes "Well take your time then...... I guess......."; + close; + +L_Restart: + mes "[" + getarg(0) + "]"; + mes "....... Looks like you got creamed......."; + emotion 4; + next; + mes "[" + getarg(0) + "]"; + mes "If you're up for it, I'll send you back in. Failure has a way of teaching success.... yada yada yada...."; + percentheal 100,100; + goto M_Menu; +} + +//================================================ +// Monster Spawns +//================================================ +in_rogue.gat,15,185,0 script rogue_mob1 139,8,0, +{ + monster "in_rogue.gat",14,188,"Zombie",1015,1; + monster "in_rogue.gat",15,188,"Zombie",1015,1; + monster "in_rogue.gat",16,188,"Zombie",1015,1; + monster "in_rogue.gat",14,189,"Zombie",1015,1; + monster "in_rogue.gat",15,189,"Zombie",1015,1; + monster "in_rogue.gat",16,189,"Zombie",1015,1; + end; +} +in_rogue.gat,15,245,0 script rogue_mob2 139,8,0, +{ + monster "in_rogue.gat",14,247,"Mummy",1041,1; + monster "in_rogue.gat",15,247,"Mummy",1041,1; + monster "in_rogue.gat",16,247,"Mummy",1041,1; + monster "in_rogue.gat",14,248,"Mummy",1041,1; + monster "in_rogue.gat",15,248,"Mummy",1041,1; + monster "in_rogue.gat",16,248,"Mummy",1041,1; + end; +} +in_rogue.gat,15,328,0 script rogue_mob3 139,8,0, +{ + monster "in_rogue.gat",14,331,"Zombie",1015,1; + monster "in_rogue.gat",15,331,"Zombie",1015,1; + monster "in_rogue.gat",16,331,"Zombie",1015,1; + monster "in_rogue.gat",14,332,"Zombie",1015,1; + monster "in_rogue.gat",15,332,"Zombie",1015,1; + monster "in_rogue.gat",16,332,"Zombie",1015,1; + end; +} +in_rogue.gat,35,342,0 script rogue_mob4 139,0,8, +{ + monster "in_rogue.gat",38,340,"Mummy",1041,1; + monster "in_rogue.gat",37,342,"Abyss Knight",1219,1; + monster "in_rogue.gat",39,342,"Ghoul",1036,1; + monster "in_rogue.gat",38,344,"Mummy",1041,1; + end; +} +in_rogue.gat,57,306,0 script rogue_mob5 139,4,0, +{ + monster "in_rogue.gat",59,301,"Khalitzburg",1132,1; + end; +} +in_rogue.gat,96,333,0 script rogue_mob6 139,0,4, +{ + monster "in_rogue.gat",92,325,"Khalitzburg",1132,1; + end; +} +in_rogue.gat,139,313,0 script rogue_mob7 139,4,0, +{ + monster "in_rogue.gat",139,309,"Abyss Knight",1219,1; + end; +} +in_rogue.gat,135,246,0 script rogue_mob8 139,0,4, +{ + monster "in_rogue.gat",139,245,"Zombie",1015,2; + monster "in_rogue.gat",139,246,"Zombie",1015,2; + monster "in_rogue.gat",139,247,"Zombie",1015,2; + end; +} +in_rogue.gat,62,302,0 script rogue_mob9 139,0,4, +{ + monster "in_rogue.gat",57,305,"Khalitzburg",1132,1; + end; +} +in_rogue.gat,199,218,0 script rogue_mob10 139,0,8, +{ + monster "in_rogue.gat",157,218,"Zombie",1015,10; + monster "in_rogue.gat",157,218,"Abyss Knight",1219,1; + monster "in_rogue.gat",157,218,"Ghoul",1036,1; + monster "in_rogue.gat",157,218,"Archer Skeleton",1016,1; + end; +} +in_rogue.gat,86,187,0 script rogue_mob11 139,0,8, +{ + monster "in_rogue.gat",88,186,"Mummy",1041,1; + monster "in_rogue.gat",88,187,"Mummy",1041,1; + monster "in_rogue.gat",88,188,"Mummy",1041,1; + end; +} +in_rogue.gat,225,187,0 script rogue_mob12 139,0,8, +{ + monster "in_rogue.gat",232,191,"Abyss Knight",1219,1; + monster "in_rogue.gat",233,190,"Abyss Knight",1219,1; + monster "in_rogue.gat",234,189,"Abyss Knight",1219,1; + end; +} +in_rogue.gat,252,320,0 script rogue_mob13 139,0,8, +{ + monster "in_rogue.gat",252,319,"Mummy",1041,1; + monster "in_rogue.gat",252,321,"Mummy",1041,1; + monster "in_rogue.gat",252,319,"Ghoul",1036,1; + monster "in_rogue.gat",252,321,"Ghoul",1036,1; + monster "in_rogue.gat",257,320,"Archer Skeleton",1016,1; + monster "in_rogue.gat",248,320,"Archer Skeleton",1016,1; + end; +} + +//================================================ +// End Warp +//================================================ +in_rogue.gat,370,320,0 script rogue04 45,1,1, +{ + set ROGUE_Q, 5; + killmonsterall "in_rogue.gat"; + warp "in_rogue.gat",378,113; + end; +} + +//================================================ +// Timer: Keeps monsters from overspawning +//================================================ +- script RogueTest3 -1, +{ + end; + +OnMinute10: +OnMinute20: +OnMinute30: +OnMinute40: +OnMinute50: +OnMinute60: + killmonsterall "in_rogue.gat"; + end; +} + + diff --git a/npc/jobs/2-2/sage.txt b/npc/jobs/2-2/sage.txt new file mode 100644 index 000000000..38d128d11 --- /dev/null +++ b/npc/jobs/2-2/sage.txt @@ -0,0 +1,2146 @@ +//===== eAthena Script ======================================= +//= Sage Job Quest +//===== By: ================================================== +//= jAthena (1.0) - I guess +//= Unknown Translator (2.0) +//= Darkchild (3.0) +//===== Current Version: ===================================== +//= 3.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 + +//===== Description: ========================================= +//= Sage job quest based off of official servers. +//===== Additional Comments: ================================= +//= Script mostly based on translated jA script +//= Written test questions/answers weren't translated 100% corectly +//= So a lot of those are based upon mRO site and my own info +//= IF you by excident have (or can get) screenshots of these questions +//= Then PLEASE send them to Darkchild +//============================================================ + +//================================== +//Sage Castle +//================================== +yuno_in02.gat,38,61,4 script Magic Academy Headmaster 743,{ + if (Class == 16) goto L_Menu3_3; + if (Class != 2) goto L_Menu2_1; + if (job2nd_sage == 11) goto L_Menu3_1; + if (job2nd_sage >= 3) goto L_Menu2_2; + mes "[Keiron]"; + mes "All who appreciate the fine art"; + mes "of magic are welcome here."; + mes "How can I help you?"; + next; + menu "Change class to Sage",L_Menu1_1,"About the Sage class",-,"Just looking around",L_Menu1_2; + mes "[Keiron]"; + mes "So you're interested in being a Sage?"; + mes "Well, I can't just make you one straight away."; + next; + mes "[Keiron]"; + mes "In order to become a Sage, you'll need to file an application for entry into the Shubaichul Magic Academy and take the placement test."; + next; + mes "[Keiron]"; + mes "Once you're placed, you'll need to complete coursework and finally write and defend a thesis."; + next; + mes "[Keiron]"; + mes "If you successfully complete the requirements, you'll be granted a Sage license."; + next; + mes "[Keiron]"; + mes "If you wish to apply, go see Mathias in the Shubaichul Magic Academy."; + mes "Tell him I sent you."; + close; +L_Menu1_1: + mes "[Keiron]"; + mes "A Sage?"; + mes "Well..."; + mes "In order to change you way of living, you have to change your way of thinking."; + next; + mes "[Keiron]"; + mes "Sages actively contribute knowledge to the kingdom through rigorous research."; + mes "They also help society through its worst problems."; + mes "Just because you dress as a Sage doesn't mean you're a Sage."; + next; + mes "[Keiron]"; + mes "To become a Sage, please apply for entry into the Shubaichul Magic Academy."; + mes "The admissions officer will explain the educational requirements."; + close; +L_Menu1_2: + mes "[Keiron]"; + mes "Excellent. If you have some free time, why not peruse a a volume from our library?"; + mes "Our library is truly a bastion of knowledge."; + next; + mes "[Keiron]"; + mes "Of course, there is much that can't be learned from reading books, but it's a good start."; + close; +L_Menu2_1: + mes "[Keiron]"; + mes "We Sages do a lot of research about the world on our own,"; + mes "but to maximize our knowledge,"; + mes "we regularly form interdisciplinary research teams."; + next; + mes "[Keiron]"; + mes "You should talk to our Sages and share any research you may have been doing within your own profession."; + close; +L_Menu2_2: + mes "[Keiron]"; + mes "The road to becoming a Sage isn't easy."; + mes "You need to have a strong dedication to mastering magic."; + next; + mes "[Keiron]"; + mes "You need to keep plugging away at that thesis."; + mes "Good luck!"; + close; +L_Menu3_1: + if (countitem(1550) >= 1) goto L_Menu3_2; + mes "[Keiron]"; + mes "Where's your thesis?"; + mes "I'm eager to evaulate it."; + next; + mes "[Keiron]"; + mes "Did you forget it?"; + mes "In any case, please bring it post-haste."; + close; +L_Menu3_2: + mes "[Keiron]"; + mes "It looks like you have a thesis to present. Let's have a look..."; + next; + mes "[Keiron]"; + mes "Hmmm..."; + next; + mes "[Keiron]"; + mes "Yes...."; + next; + mes "[Keiron]"; + mes "Interesting..."; + next; + mes "[Keiron]"; + mes "It's not stylistically"; + mes "cohesive, but your zeal for research is amply proven by your thesis. I approve."; + next; + if(SkillPoint == 0) goto LCHANGE; + mes "[Keiron]"; + mes "Well you are all set for the jobchange except for 1 thing!"; + mes "You have unused Skill Points!!!"; + mes "Please use those first!"; + close; + + LCHANGE: + jobchange 16; + mes "[Keiron]"; + mes "Congratulations!"; + mes "You're a Sage now."; + mes "Don't let that passion for research ever be dampened."; + next; + mes "[Keiron]"; + mes "Keep your thesis around, since it may be useful in a publish-or-perish environment later on."; + next; + mes "[Keiron]"; + mes "Some day, you'll be a bastion of knowledge all by yourself!"; + close; +L_Menu3_3: + mes "[Keiron]"; + mes "Hmmm? What's up?"; + mes "Just because you're a Sage doesn't mean you should quit your studies."; + next; + mes "[Keiron]"; + mes "In order to maintain our role as the kingdom's gatherers and dissemenators of knowledge, we can never miss an opportunity to gather data."; + close; +} + +//=============================== +//Biotech Lab +//=============================== +yuno_in03.gat,244,31,3 script Physics Professor 120,{ + if (Class == 16) goto L_Menu3_2; + if (Class != 2) goto L_Menu1_1; + if (job2nd_sage == 11) goto L_Menu3_1; + if (job2nd_sage2 == 8) goto L_Menu2_1; + if (job2nd_sage2 == 9) goto L_Menu2_3; + if (job2nd_sage2 == 10) goto L_Menu2_5; + if (job2nd_sage2 == 11) goto L_ThesisStart1; + if (job2nd_sage == 9) goto L_Menu1_2; + mes "[Ebeshi]"; + mes "What?"; + next; + mes "[Ebeshi]"; + mes "Did you come to study under my guidance?"; + next; + mes "[Ebeshi]"; + mes "Well, you need to enroll first."; + mes "Heheheheh..."; + close; +L_Menu1_1: + mes "[Ebeshi]"; + mes "Eh???????????????????????????????"; + next; + mes "[Ebeshi]"; + mes "I don't think there's anything someone like you can learn from me."; + next; + mes "[Ebeshi]"; + mes "Are you disappointed?"; + mes "Hehehehe...."; + close; +L_Menu1_2: + set job2nd_sage2,8; + mes "[Ebeshi]"; + mes "Well, I'm glad to meet another fine student such as yourself."; + next; + mes "[Ebeshi]"; + mes "Aren't you excited that you're going to study under me?!"; + mes "Hehehehe...."; + next; + mes "[Ebeshi]"; + mes "I hate to be intrusive, but could you get something for me before I start my class?"; + next; + mes "[Ebeshi]"; + mes "I need ^3051FD30x Stone^000000 as part of the class materials."; + mes "Can you get that?"; + next; + mes "[Ebeshi]"; + mes "If you really want to get stones quick,"; + mes "you should look up a friendly thief to assist you! Thanks for helping out."; + close; +L_Menu2_1: + if (countitem(7049) >= 30) goto L_Menu2_2; + mes "[Ebeshi]"; + mes "Hey, what are you up to?"; + mes "Are you trying to slack off?"; + mes "Come on, set your eyes on the goal."; + next; + mes "[Ebeshi]"; + mes "I need ^3051FD30x Stone^000000 to proceed."; + mes "With all the stones lying around,"; + mes "shouldn't they be easy to find?"; + close; + L_Menu2_2: + mes "[Ebeshi]"; + mes "Awesome! You've got all the stones I need."; + mes "Now, watch this!"; + next; + mes "[Ebeshi]"; + mes "Abracadabra!!"; + next; + mes "[Ebeshi]"; + mes "Abracadabra!!"; + next; + mes "[Ebeshi]"; + mes "Abracadabra!!"; + next; + delitem 7049,30; + set job2nd_sage2,9; + mes "[Ebeshi]"; + mes "You see that?"; + mes "I created three elemental stones!"; + next; + mes "[Ebeshi]"; + mes "Pretty cool, don't you think?"; + mes "Have them for yourself!"; + next; + getitem 991,1; + getitem 993,1; + getitem 992,1; + mes "[Ebeshi]"; + mes "Now, for your next lesson, you need to synthesize some different kinds of arrows with those stones."; + next; + mes "[Ebeshi]"; + mes "Specifically..."; + mes "^3051FD50x Crystal Arrow^000000"; + mes "^3051FD50x Stone Arrow^000000"; + mes "^3051FD50x Wind Arrow^000000"; + next; + mes "[Ebeshi]"; + mes "An archer friend can help you make the arrows."; + mes "Give it a try!"; + close; + L_Menu2_3: + if ((countitem(1754) >= 50) && (countitem(1756) >= 50) && (countitem(1755) >= 50)) goto L_Menu2_4; + mes "[Ebeshi]"; + mes "Hmmm?"; + mes "What did you do with those stones I gave you?"; + mes "You didn't sell them, I hope..."; + next; + mes "[Ebeshi]"; + mes "You need to use them to make"; + mes "^3051FD50x Crystal Arrow^000000"; + mes "^3051FD50x Stone Arrow^000000"; + mes "^3051FD50x Wind Arrow^000000"; + mes "An archer friend can help you make the arrows."; + close; + L_Menu2_4: + mes "[Ebeshi]"; + mes "You made the arrows! Good job."; + mes "Now, to continue with the lesson..."; + next; + mes "[Ebeshi]"; + mes "This lesson covers the Elemental Affinity chapter in your textbook."; + next; + mes "[Ebeshi]"; + mes "The first affinity is really easy."; + mes "Water magic is very effective against fire."; + mes "It's easy to remember."; + mes "All you need to remember is water being splashed on fire."; + next; + mes "[Ebeshi]"; + mes "Wind magic will decimate water-based monsters."; + mes "Observe what happens when a lake is struck by lightning."; + next; + mes "[Ebeshi]"; + mes "Earth magic will crush wind-based monsters easily."; + mes "Don't you build a house on a strong foundation to keep the wind away?"; + next; + mes "[Ebeshi]"; + mes "Fire magic mercilessly scorches the earth."; + mes "Won't a tree burn if a fire breaks out?"; + mes "Same with an earth-based monster."; + next; + mes "[Ebeshi]"; + mes "Do you understand?"; + mes "Here's some homework for next time..."; + next; + delitem 1754,50; + delitem 1756,50; + delitem 1755,50; + set job2nd_sage2,10; + mes "[Ebeshi]"; + mes "Next time you come, bring ^3051FD1x Holy Water^000000."; + mes "We'll need it for the lesson."; + mes "It will be easy to acquire if you have contacts in the church."; + close; + L_Menu2_5: + if (countitem(523) >= 1) goto L_Menu2_6; + mes "[Ebeshi]"; + mes "Ooops!"; + mes "Did you forget about the item I asked you to bring?"; + next; + mes "[Ebeshi]"; + mes "I need ^3051FD1x Holy Water^000000 for the lesson."; + mes "Ask an Acolyte to help you make it."; + mes "Hehehehe..."; + close; + L_Menu2_6: + mes "[Ebeshi]"; + mes "Alright, you have the Holy Water!"; + mes "Let's continue the lesson!"; + next; + mes "[Ebeshi]"; + mes "Please take good notes about this part."; + mes "It will be on the test."; + next; + mes "[Ebeshi]"; + mes "Water magic sucks against wind!"; + mes "Would a lightning bolt care if it was frozen?"; + mes "Heheheheh...."; + next; + mes "[Ebeshi]"; + mes "Wind magic is totally useless against the earth."; + mes "Will a tree suffer permanent damage if it's blown about?"; + next; + mes "[Ebeshi]"; + mes "Earth magic is ineffective against fire."; + mes "If you put some leaves on a fire, will the fire go out?"; + mes "No, just the opposite will happen."; + next; + mes "[Ebeshi]"; + mes "Fire won't do much against water."; + mes "If you heat water, doesn't it just become more dangerous?"; + next; + mes "[Ebeshi]"; + mes "That was a pretty informative lecture!"; + mes "You think so too, right?"; + next; + delitem 523,1; + set job2nd_sage2,11; + mes "[Ebeshi]"; + mes "Now, you have enough knowledge to prepare a defensible thesis."; + mes "Hehehehehe!"; + next; + mes "[Ebeshi]"; + mes "To put the thesis together, you'll need:"; + mes "^3051FD1x Feather of Birds^000000 for your writing instrument."; + mes "^3051FD1x Animal Skin^000000 for the pages."; + mes "^3051FD1x Trunk^000000 to bind the pages."; + mes "^3051FD1x Squid Ink^000000 for your ink."; + mes "^3051FD1x Empty Bottle^000000 to store your ink."; + next; + mes "[Ebeshi]"; + mes "Come and see me once you've gotten all of these items together."; + close; + L_ThesisStart1: + if ((countitem(916) >= 1) && (countitem(919) >= 1) && (countitem(1019) >= 1) && (countitem(1024) >= 1) && (countitem(713) >= 1)) goto L_ThesisStart2; + mes "[Ebeshi]"; + mes "Hmmm?"; + mes "You can't forget important things like this!"; + next; + mes "[Ebeshi]"; + mes "You need these items to start your thesis:"; + mes "^3051FD1x Feather of Birds^000000 for your writing instrument."; + mes "^3051FD1x Animal Skin^000000 for the pages."; + mes "^3051FD1x Trunk^000000 to bind the pages."; + mes "^3051FD1x Squid Ink^000000 for your ink."; + mes "^3051FD1x Empty Bottle^000000 to store your ink."; + next; + mes "[Ebeshi]"; + mes "Do you have some friends that might be able to help you gather the materials?"; + mes "That will make it a simple task!"; + close; + L_ThesisStart2: + delitem 916,1; + delitem 919,1; + delitem 1019,1; + delitem 1024,1; + delitem 713,1; + mes "[Ebeshi]"; + mes "Alright..."; + mes "You need to write this yourself."; + mes "I'm simply your research advisor!"; + mes "Hehehehe..."; + next; + mes "......"; + next; + mes "......"; + next; + mes "......"; + next; + mes "Elemental magic is divided into four types..."; + menu "...called Fire, Wind, Water, and Earth",L_ThesisMenu1_1,"...named Fire, Wind, Water, and Earth",L_ThesisMenu1_2,"...that oppose each other: Fire, Wind, Water, and Earth",L_ThesisMenu1_3; + L_ThesisMenu1_1: + mes "...called Fire, Wind, Water, and Earth"; + goto L_Thesis2; + L_ThesisMenu1_2: + mes "...named Fire, Wind, Water, and Earth"; + goto L_Thesis2; + L_ThesisMenu1_3: + mes "...that oppose each other: Fire, Wind, Water, and Earth"; + goto L_Thesis2; + L_Thesis2: + mes "Each attribute has certain properties."; + menu "Wind conquers water...",L_ThesisMenu2_1,"Water douses fire...",L_ThesisMenu2_2,"Fire scorches Earth...",L_ThesisMenu2_3; + L_ThesisMenu2_1: + mes "Wind conquers Water and Earth attacks Wind"; + goto L_Thesis3; + L_ThesisMenu2_2: + mes "Water douses fire, while Wind zaps Water"; + goto L_Thesis3; + L_ThesisMenu2_3: + mes "Fire scorches Earth, and Water douses Fire."; + goto L_Thesis3; + L_Thesis3: + menu "But weaknesses exist, too",L_ThesisMenu3_1,"You can customize your weapon element, also",L_ThesisMenu3_2,"Elemental affinity varies by monster type, also",L_ThesisMenu3_3; + L_ThesisMenu3_1: + mes "But weaknesses exist, too"; + goto L_Thesis4; + L_ThesisMenu3_2: + mes "You can customize your weapon element, also"; + goto L_Thesis4; + L_ThesisMenu3_3: + mes "Elemental affinity varies by monster type, also"; + goto L_Thesis4; + L_Thesis4: + menu "You need to be circumspect when facing monsters...",L_ThesisMenu4_1,"So, you should customize your weapon to the situation",L_ThesisMenu4_2,"Red Potions have a delicious strawberry flavor",L_ThesisMenu4_3; + L_ThesisMenu4_1: + mes "You need to be circumspect when facing monster with an unfamiliar affinity."; + goto L_Thesis5; + L_ThesisMenu4_2: + mes "You should customize your weapon to the situation."; + goto L_Thesis5; + L_ThesisMenu4_3: + mes "Red Potions have a delicious strawberry flavor."; + goto L_Thesis5; + L_Thesis5: + next; + menu "Eimi of Prontera is hot",L_ThesisMenu5_1,"I wonder how Red Potions are made",L_ThesisMenu5_2,"The complexity of magic exceeds man's capacity to learn",L_ThesisMenu5_3; + L_ThesisMenu5_1: + mes "Eimi of Prontera is hot."; + goto L_Thesis6; + L_ThesisMenu5_2: + mes "I wonder how Red Potions are made."; + goto L_Thesis6; + L_ThesisMenu5_3: + mes "The complexity of magic exceeds man's capacity to learn."; + goto L_Thesis6; + L_Thesis6: + menu "The women in Morok are hot, too",L_ThesisMenu6_1,"Maybe it's a secret recipe",L_ThesisMenu6_2,"It's dangerous to depend on magic too much...",L_ThesisMenu6_3; + L_ThesisMenu6_1: + mes "The women in Morok are hot, too."; + goto L_Thesis7; + L_ThesisMenu6_2: + mes "Maybe it's a secret recipe."; + goto L_Thesis7; + L_ThesisMenu6_3: + mes "It's dangerous to depend on magic too much..."; + goto L_Thesis7; + L_Thesis7: + menu "I wish I had a Rabbit Headband",L_ThesisMenu7_1,"That taste of a White potion...",L_ThesisMenu7_2,"...if you want to stay safe. power...",L_ThesisMenu7_3; + L_ThesisMenu7_1: + mes "I wish I had a Rabbit Headband."; + goto L_Thesis8; + L_ThesisMenu7_2: + mes "The taste of a White Potion..."; + goto L_Thesis8; + L_ThesisMenu7_3: + mes "...if you want to stay safe. power..."; + goto L_Thesis8; + L_Thesis8: + menu "That would make me happy",L_ThesisMenu8_1,"...is difficult to imagine",L_ThesisMenu8_2,"In the interest of a safe battle...",L_ThesisMenu8_3; + L_ThesisMenu8_1: + mes "That would make me happy."; + goto L_Thesis9; + L_ThesisMenu8_2: + mes "...is difficult to imagine"; + goto L_Thesis9; + L_ThesisMenu8_3: + mes "In the interest of a safe battle..."; + goto L_Thesis9; + L_Thesis9: + menu "Rabbit Headbands make great Acolyte accessories",L_ThesisMenu9_1,"It makes me wonder if...",L_ThesisMenu9_2,"...you should bring along friends",L_ThesisMenu9_3; + L_ThesisMenu9_1: + mes "Rabbit Headbands make great Acolyte accessories."; + goto L_Thesis10; + L_ThesisMenu9_2: + mes "It makes me wonder if..."; + goto L_Thesis10; + L_ThesisMenu9_3: + mes "...you should bring along friends."; + goto L_Thesis10; + L_Thesis10: + menu "I wonder if a Knight could wear one, too",L_ThesisMenu10_1,"...people might drink them when they're not hurt",L_ThesisMenu10_2,"It's the responsible thing to do",L_ThesisMenu10_3; + L_ThesisMenu10_1: + mes "I wonder if a Knight could wear one, too."; + next; + goto L_ThesisEnd; + L_ThesisMenu10_2: + mes "...people might drink them when they're not hurt"; + next; + goto L_ThesisEnd; + L_ThesisMenu10_3: + mes "It's the responsible thing to do."; + next; + goto L_ThesisEnd; + L_ThesisEnd: + mes "......"; + next; + mes "......"; + next; + mes "......"; + next; + set job2nd_sage,11; + getitem 1550,1; + mes "[Ebeshi]"; + mes "Alright!"; + mes "You've finished! It looks pretty good!"; + next; + mes "[Ebeshi]"; + mes "You should take that to the Headmaster!"; + mes "He'll decide whether you graduate or not."; + mes "Hehehehehe...."; + close; +L_Menu3_1: + mes "[Ebeshi]"; + mes "What's up? Did you forget something?!"; + next; + mes "[Ebeshi]"; + mes "You should see the Headmaster and present your thesis so you can graduate!"; + close; +L_Menu3_2: + mes "[Ebeshi]"; + mes "Good afternoon!"; + mes "It's good to meet other Sages and exchange information."; + mes "Heheheheh!!"; + next; + mes "[Ebeshi]"; + mes "Even though company is good sometimes, I need to continue my magical research!"; + next; + mes "[Ebeshi]"; + mes "Do you want to continue your study here?"; + mes "Please feel free to talk to the other professors and read the literature here."; + mes "Hehehehe!"; + close; +} + +//================================== +//Monster Museum +//================================== + +yuno_in03.gat,32,102,0 script Biology Professor 755,{ + if (Class == 16) goto L_Menu5_4; + if (Class != 2) goto L_Menu1_1; + if (job2nd_sage == 11) goto L_Menu5_3; + if ((job2nd_sage2 >= 1) && (job2nd_sage2 <= 3)) goto L_Menu3_1; + if ((job2nd_sage2 >= 4) && (job2nd_sage2 <= 6)) goto L_Menu4_1; + if (job2nd_sage2 == 7) goto L_Menu5_1; + if (job2nd_sage == 8) goto L_Menu2_1; + mes "[Lucias]"; + mes "I have a headache..."; + mes "I've got too many things going on at once!"; + next; + mes "[Lucias]"; + mes "Of course, I'll teach people about biology even with a headache!"; + close; +L_Menu1_1: + mes "[Lucias]"; + mes "Hmmm? Are you just poking around?"; + next; + mes "[Lucias]"; + mes "That's fine, but please don't touch anything."; + mes "We keep dangerous bioagents in here!"; + next; + mes "[Lucias]"; + mes "If you have information about rare monsters, we'll pay you handsomely."; + close; +L_Menu2_1: + mes "[Lucias]"; + mes "Oh, you've taken the placement test?"; + mes "I'm Lucias, a preeminent researcher in the biological sciences."; + next; + mes "[Lucias]"; + mes "What's your name, young one?"; + next; + menu "I'm " + strcharinfo(0) + "!",-; + mes "[Lucias]"; + mes "That's a nice name."; + mes "Now, let me explain about our research objectives."; + next; + mes "[Lucias]"; + mes "My area of expertise is monsters."; + mes "I'm sure that you've encountered and defeated many monsters by now."; + mes "Am I right?"; + next; + menu "You're quite right",-,"Well, not really...",L_Menu2_2; + mes "[Lucias]"; + mes "Really?"; + mes "I hope your background knowledge is diverse."; + mes "My class isn't a cakewalk by any means."; + next; + goto L_Menu2_3; + L_Menu2_2: +//================================== +//If you respond negatively + mes "[Lucias]"; + mes "You might be at a disadvantage."; + mes "My coursework assumes a lot of background knowledge."; + mes "My class wasn't designed to be a cakewalk..."; + next; +//================================== +L_Menu2_3: + mes "[Lucias]"; + mes "So, shall we get started?"; + mes "You'll learn a lot in this class if you're vigilant."; + next; + set @sagerand,0; + set @sagerand,rand(3); + mes "[Lucias]"; + mes "So, first, you need to collect "; + if (@sagerand == 1) goto L_Menu2_4; + if (@sagerand == 2) goto L_Menu2_5; + set job2nd_sage2,1; + mes "^3051FD5x Tendons^000000"; + mes "^3051FD5x Nippers^000000"; + mes "^3051FD5x Sharp Scales^000000"; + next; + goto L_Menu2_6; + L_Menu2_4: + set job2nd_sage2,2; +//================================== +//mes–¢‰ñŽû + mes "^3051FD5x Clam Flesh^000000"; + mes "^3051FD5x Nippers^000000"; + mes "^3051FD5x Heart of Mermaid^000000"; + next; + goto L_Menu2_6; + L_Menu2_5: + set job2nd_sage2,3; + mes "^3051FD5x Single Cells^000000"; + mes "^3051FD5x Tentacles^000000"; + mes "^3051FD5x Fish Tails^000000"; +//================================== + next; + L_Menu2_6: + mes "[Lucias]"; + mes "We'll continue once you've gathered those."; + close; +L_Menu3_1: + if ((countitem(1050) >= 5) && (countitem(960) >= 5) && (countitem(963) >= 5) && (job2nd_sage2 == 1)) goto L_Menu3_4; + if ((countitem(966) >= 5) && (countitem(960) >= 5) && (countitem(950) >= 5) && (job2nd_sage2 == 2)) goto L_Menu3_4; + if ((countitem(1052) >= 5) && (countitem(962) >= 5) && (countitem(1023) >= 5) && (job2nd_sage2 == 3)) goto L_Menu3_4; + mes "[Lucias]"; + mes "You don't have the necessary items."; + mes "Let me repeat what you need:"; + next; + mes "[Lucias]"; + if (job2nd_sage2 == 2) goto L_Menu3_2; + if (job2nd_sage2 == 3) goto L_Menu3_3; + mes "^3051FD5x Tendon^000000"; + mes "^3051FD5x Nipper^000000"; + mes "^3051FD5x Sharp Scale^000000"; + close; + L_Menu3_2: + mes "^3051FD5x Clam Flesh^000000"; + mes "^3051FD5x Nipper^000000"; + mes "^3051FD5x Heart of Mermaid^000000"; + close; + L_Menu3_3: + mes "^3051FD5x Single Cell^000000"; + mes "^3051FD5x Tentacle^000000"; + mes "^3051FD5x Fish Tail^000000"; + close; +L_Menu3_4: + mes "[Lucias]"; + mes "Well, you have the items, but I can't be sure if you bought them or collected them yourself."; + next; + mes "[Lucias]"; + mes "There is a similarity in the characteristics of the monsters that drop those items."; + mes "Do you know what it is?"; + next; + menu "Water element affinity",L_Menu3_5,"They're fish and shells",L_Menu3_5,"They were quite active",-,"They're monsters",-; +//================================== + mes "[Lucias]"; + mes "...I'm disappointed in you."; + mes "The correct answer is that all of the monsters have water element affinity."; + mes "Monsters that live in an aquatic environment have evolved bodies adapted to that environment."; +//================================== + next; + goto L_Menu3_6; + L_Menu3_5: + mes "[Lucias]"; + mes "Right!"; + mes "Most aquatic monsters have water element affinity because they're adapted to their environment."; + mes "Fish and shells evolved in a logical way."; + next; + L_Menu3_6: + mes "[Lucias]"; + mes "Not every fish and shell has water element affinity, but you can count on it as a general rule."; + mes "Now, which type of magic do you think would be most effective against them?"; + next; + menu "Lightning Bolt",L_Menu3_7,"Firebolt",-,"Thunderstorm",L_Menu3_8,"Frost Deva",-; +//================================== +//mes–¢‰ñŽû + mes "[Lucias]"; + mes "That's not correct."; + mes "You need to use magic like Lightning Bolt or Thunderstorm."; + mes "Check the elemental affinity matrix again."; + next; +//================================== + goto L_Menu3_9; + L_Menu3_7: + mes "[Lucias]"; + mes "Great! That's right!"; + mes "Using Lightning Bolt is an easy way to victory."; + next; + mes "[Lucias]"; + mes "You need to be careful of monsters like the Penomeni and starfish because their attribute is different."; + next; + goto L_Menu3_9; + L_Menu3_8: + mes "[Lucias]"; + mes "Great! That's right!"; + mes "Using Thunderstorm is an easy way to victory."; + next; + mes "[Lucias]"; + mes "You need to be careful of monsters like the Penomeni and starfish because their attribute is different."; + next; + L_Menu3_9: + mes "[Lucias]"; + mes "Next, let's turn our attention to insectoid monsters."; + next; + set @sagerand,rand(3); + mes "[Lucias]"; + mes "Next, you need to collect "; + if (@sagerand == 1) goto L_Menu3_10; + if (@sagerand == 2) goto L_Menu3_11; + set job2nd_sage2,4; + mes "^3051FD5x Cobweb^000000"; + mes "^3051FD5x Shell^000000"; + mes "^3051FD5x Insect Feeler^000000"; + next; + goto L_Menu2_6; + L_Menu3_10: + set job2nd_sage2,5; +//================================== +//mes–¢‰ñŽû + mes "^3051FD5x Moth Dust^000000"; + mes "^3051FD5x Snail's Shell^000000"; + mes "^3051FD5x Horn^000000"; + next; + goto L_Menu2_6; + L_Menu3_11: + set job2nd_sage2,6; + mes "^3051FD5x Mantis Leg^000000"; + mes "^3051FD5x Worm Peeling^000000"; + mes "^3051FD5x Rainbow Shell^000000"; +//================================== + next; + goto L_Menu2_6; +L_Menu4_1: + if ((countitem(1025) >= 5) && (countitem(935) >= 5) && (countitem(928) >= 5) && (job2nd_sage2 == 4)) goto L_Menu4_4; + if ((countitem(1057) >= 5) && (countitem(946) >= 5) && (countitem(947) >= 5) && (job2nd_sage2 == 5)) goto L_Menu4_4; + if ((countitem(1031) >= 5) && (countitem(955) >= 5) && (countitem(1013) >= 5) && (job2nd_sage2 == 6)) goto L_Menu4_4; + mes "[Lucias]"; + mes "You forgot what you're supposed to gather?"; + mes "Listen carefully this time! You need to gather:"; + next; + mes "[Lucias]"; + if (job2nd_sage2 == 5) goto L_Menu4_2; + if (job2nd_sage2 == 6) goto L_Menu4_3; + mes "^3051FD5x Cobweb^000000"; + mes "^3051FD5x Shell^000000"; + mes "^3051FD5x Insect Feeler^000000"; + close; + L_Menu4_2: + mes "^3051FD5x Moth Dust^000000"; + mes "^3051FD5x Snail's Shell^000000"; + mes "^3051FD5x Horn^000000"; + close; + L_Menu4_3: + mes "^3051FD5x Mantis Leg^000000"; + mes "^3051FD5x Worm Peeling^000000"; + mes "^3051FD5x Rainbow Shell^000000"; + close; +L_Menu4_4: + set job2nd_sage2,7; + mes "[Lucias]"; + mes "Excellent. You've done well."; + mes "I hope you were also dilligent in observing your surroundings when you collected the items."; + next; + mes "[Lucias]"; + mes "With insects, you'll need to carefully consider which magic to use, since insects have affinity with a variety of elements."; + next; + mes "[Lucias]"; + mes "You should also be aware that Thief hiding and Assassin cloaking aren't effective against some insects."; + next; + mes "[Lucias]"; + mes "Insects can also act in groups."; + mes "Often the insect bosses will have considerable numbers of subordinates."; + next; + mes "[Lucias]"; + mes "Ant Lord Maya..."; + mes "Queen Bee Mistress..."; + mes "Goblin Chief Goldfinger..."; + next; + mes "[Lucias]"; + mes "If you face a boss monster alone, you had best prepare to die."; + mes "You ought to take a group of friends to face these creatures down."; + next; + mes "[Lucias]"; + mes "Well, you've studied quite a bit."; + mes "Now you need to write a thesis."; + mes "You need some materials before you can begin writing it, however."; + mes "They are:"; + next; + mes "[Lucias]"; + mes "^3051FD1x Feather of Birds^000000 for your writing instrument."; + mes "^3051FD1x Animal Skin^000000 for the pages."; + mes "^3051FD1x Trunk^000000 to bind the pages."; + mes "^3051FD1x Squid Ink^000000 for your ink."; + mes "^3051FD1x Empty Bottle^000000 to store your ink."; + next; + mes "[Lucias]"; + mes "We can get started when you return."; + close; +L_Menu5_1: + if ((countitem(916) >= 1) && (countitem(919) >= 1) && (countitem(1019) >= 1) && (countitem(1024) >= 1) && (countitem(713) >= 1) && (job2nd_sage2 == 7)) goto L_Menu5_2; + mes "[Lucias]"; + mes "You need to gather those items first."; + mes "They are:"; + next; + mes "[Lucias]"; + mes "^3051FD1x Feather of Birds^000000 for your writing instrument."; + mes "^3051FD1x Animal Skin^000000 for the pages."; + mes "^3051FD1x Trunk^000000 to bind the pages."; + mes "^3051FD1x Squid Ink^000000 for your ink."; + mes "^3051FD1x Empty Bottle^000000 to store your ink."; + next; + mes "[Lucias]"; + mes "You've done great so far."; + mes "Just a little more and you can graduate."; + close; +L_Menu5_2: + delitem 916,1; + delitem 919,1; + delitem 1019,1; + delitem 1024,1; + delitem 713,1; + mes "[Lucias]"; + mes "Looks like you have everything."; + next; + mes "[Lucias]"; + mes "Now, you need to write this yourself."; + mes "I'm only taking an advisory role."; + next; + mes "[Lucias]"; + mes "Are you ready to begin?"; + mes "Let's see if you've acquired enough knowledge to write a coherent thesis."; + next; + mes "......"; + next; + mes "......"; + next; + mes "......"; + next; + menu "Monsters come in different types",-; + mes "Monsters come in different types."; + menu "They have different elemental affinities",-; + mes "They have different elemental affinities."; + menu "If you know the monster's element beforehand...",-; + mes "If you know the monster's element beforehand..."; + menu "...you can optimize your battle experience",-; + mes "...you can optimize your battle experience"; + menu "You should especially be careful of...",-; + mes "You should especially be careful of..."; + menu "...monsters with Holy and Darkness affinity",-; + mes "...monsters with Holy and Darkness affinity"; + next; + mes "......"; + next; + mes "......"; + next; + mes "......"; + next; + set job2nd_sage,11; + getitem 1550,1; + mes "[Lucias]"; + mes "This is pretty good!"; + mes "I'm proud of you!"; + next; + mes "[Lucias]"; + mes "Show this to the Headmaster and you'll be sure to graduate."; + mes "Good luck."; + close; +L_Menu5_3: + mes "[Lucias]"; + mes "Hmmm? What's the matter?"; + mes "You need to show your thesis to the Headmaster."; + close; +L_Menu5_4: + mes "[Lucias]"; + mes "Are you confused about something?"; + mes "I'm pretty busy, so you need to make an appointment a week in advance."; + next; + mes "[Lucias]"; + mes "Hahaha...Once you've been a Sage for awhile, you'll be saying the same thing."; + next; + mes "[Lucias]"; + mes "Also, if you have some spare time,"; + mes "you should head over to the dungeon and lie down on the floor."; + mes "Look up and study the ceiling."; + mes "You might learn something."; + close; +} + +//================================= +//Academy Interior +//================================= + +yuno_in03.gat,154,35,4 script Academy Staff 742,{ + if (Class == 16) goto L_Menu6_4; + if (Class != 2) goto L_Menu1_1; + if (job2nd_sage == 11) goto L_Menu6_3; + if (job2nd_sage >= 4) goto L_Menu6_2; + if (job2nd_sage == 3) goto L_Menu6_1; + if (job2nd_sage == 2) goto L_Menu5_1; + mes "[Mathias]"; + mes "Hello."; + mes "This is the Shubaichul Magic Academy?"; + mes "You seem to be a Magician."; + mes "How can I help you?"; + next; + menu "Sage class-change information",-,"I want to apply for admission to the Academy",L_Menu3_1,"Forget it",L_Menu2; + mes "[Mathias]"; + mes "You want to change class to Sage?"; + mes "I can't just change your class right here."; + next; + mes "[Mathias]"; + mes "You need to complete a program of rigorous coursework and research."; + next; + mes "[Mathias]"; + mes "Once you graduate from the academy,"; + mes "you can change class."; + mes "In order to proceed, you need to pay tuition and take the placement test."; + next; + mes "[Mathias]"; + mes "Only those who have an ^3051FDOld Magic Book^000000 and a ^3051FDNecklace Of Wisdom^000000 can have tuition waived."; + next; + mes "[Mathias]"; + mes "Once you've paid the fee, you first take the placement test."; + mes "If you score highly enough to be placed in our program, you then perform research according to your placement."; + mes "Finally, you must prepare and defend a thesis."; + next; + mes "[Mathias]"; + mes "The Headmaster decides whether or not the thesis meets standards for graduation."; + mes "If he approves, you can formally begin your career as a Sage."; + next; + mes "[Mathias]"; + mes "If you're interested, you need only file an application to get started."; + mes "Have a good day."; + close; +L_Menu2: + mes "[Mathias]"; + mes "Oh?"; + mes "Are you hesitant?"; + mes "See you later, then."; + close; +L_Menu1_1: + mes "[Mathias]"; + mes "Welcome."; + mes "This is Shubaichul Magic Academy."; + next; + mes "[Mathias]"; + mes "We do research on magic and monsters here."; + mes "We also train fledgling Sages."; + next; + mes "[Mathias]"; + mes "Any Magician who is at or above class level 40 can apply for admission to the Academy."; + mes "Once you complete our prescribed process for degree acquisition, you can become a Sage."; + next; + mes "[Mathias]"; + mes "Good bye."; + close; +L_Menu3_1: + mes "[Mathias]"; + mes "You want to apply? Wonderful!"; + next; + mes "[Mathias]"; + mes "In order to enter the Academy,"; + mes "you need to be a Magician of class level 40 or above."; + mes "You will also need to pay tuition to cover instruction and materials."; + next; + mes "[Mathias]"; + mes "Tuition is 70,000Zeny."; + mes "If you have an ^3051FDOld Magic Book^000000 and a ^3051FDNecklace Of Wisdom^000000, the tuition fee will be waived."; + next; + mes "[Mathias]"; + mes "So, you would like to apply for admission?"; + next; + menu "Yes, I would",L_Menu5_5,"Tuition is too expensive!",-,"I'll try again later",L_Menu3_2; + mes "[Mathias]"; + mes "Well...we need the tuition money to cover instruction and materials..."; + next; + menu "Isn't there another way?",-,"I'll try again later.",L_Menu3_2; + set job2nd_sage,2; + mes "[Mathias]"; + mes "Well...Perhaps there is. I can lower the tuition to 30000 Zeny if you can bring us some materials we need for our research department:"; + next; + mes "[Mathias]"; + mes "Specifically, we need:"; + mes "^3051FD50x Feather of Birds^000000"; + mes "^3051FD50x Fluff^000000"; + mes "^3051FD50x Clover^000000"; + mes "^3051FD50x Feathers^000000"; + next; + mes "[Mathias]"; + mes "If you can get all that, I'll discount the fee to 30000 Zeny."; + mes "Please do your best to collect them."; + next; + mes "[Mathias]"; + mes "Of course, you can also acquire 70000 Zeny instead of gathering the items if you wish."; + next; + mes "[Mathias]"; + mes "Please do your best to collect the items."; + mes "See you later."; + close; + L_Menu3_2: + mes "[Mathias]"; + mes "Oh, alright."; + mes "Take your time."; + mes "Thanks for stopping by."; + close; +L_Menu5_1: + mes "[Mathias]"; + mes "So, would you like to apply for admission?"; + next; + if (JobLevel < 40) goto L_Menu5_9; + if ((countitem(1006) >= 1) && (countitem(1007) >= 1)) goto L_Menu5_4; + if (Zeny < 70000) goto L_Menu5_2; + set Zeny,Zeny-70000; + set job2nd_sage,3; + mes "[Mathias]"; + mes "I see you have 70000 Zeny."; + mes "I'll take that for tuition. You are now enrolled into the school."; + next; + L_Menu5_5: + if (JobLevel < 40) goto L_Menu5_9; + mes "[Mathias]"; + mes "We need your signature on this form to proceed."; + mes "Please sign at the X."; + next; + menu "" + strcharinfo(0) + "",-; + mes "[Mathias]"; + mes "Alright, so you're "; + mes "" + strcharinfo(0) + "."; + mes "That's a nice name."; + next; + if (JobLevel == 50) goto L_JobMax; + if (job2nd_sage == 3) goto L_Menu5_6; + if ((countitem(1006) >= 1) || (countitem(1007) >= 1)) goto L_Menu5_7; + if (Zeny < 70000) goto L_Menu5_2; + set Zeny,Zeny-70000; + set job2nd_sage,3; + + mes "[Mathias]"; + mes "I see you have 70000 Zeny."; + mes "I'll take that for tuition."; + mes "You are now enrolled into the school."; + next; + + L_Menu5_6: + mes "[Mathias]"; + mes "First, you need to take the placement test from Professor Kreitos."; + next; + mes "[Mathias]"; + mes "Professor Kreitos is in the Academy library."; + mes "It's on the far left side of the building."; + next; + mes "[Mathias]"; + mes "Good luck on the test."; + close; + L_JobMax: + set job2nd_sage,3; + mes "[Mathias]"; + mes "You've trained yourself up to the maximum class level for Magicians!"; + mes "In that case, I'll give you a full scholarship!"; + next; + mes "[Mathias]"; + mes "Now, all you need to do is go take the placement test."; + next; + mes "[Mathias]"; + mes "Go see Professor Kreitos in the library on the far left side of the building."; + close; + L_Menu5_2: + if (job2nd_sage != 2) goto L_Menu5_8; + if ((countitem(916) >= 50) && (countitem(914) >= 50) && (countitem(949) >= 50) && (countitem(705) >= 50)) goto L_Menu5_3; + mes "[Mathias]"; + mes "You don't seem to have the materials yet."; + next; + mes "[Mathias]"; + mes "You need to gather:"; + mes "^3051FD50x Feather of Birds^000000"; + mes "^3051FD50x Fluff^000000"; + mes "^3051FD50x Clover^000000"; + mes "^3051FD50x Feathers^000000"; + next; + mes "[Mathias]"; + mes "If you can get all that, I'll discount the fee to 30000 Zeny."; + mes "Please do your best to collect them."; + close; + L_Menu5_3: +//================================== +//mes–¢‰ñŽû + if (Zeny < 30000) goto L_Menu5_8; + delitem 916,50; + delitem 914,50; + delitem 705,50; + delitem 949,50; + set Zeny,Zeny-30000; + set job2nd_sage,3; + mes "[Mathias]"; + mes "It seems like you have the materials I asked for and 30000 Zeny."; + mes "Congratulations."; + mes "You're now enrolled in the Academy."; + set job2nd_sage,3; + next; + goto L_Menu5_5; + L_Menu5_4: + delitem 1006,1; + delitem 1007,1; + set job2nd_sage,3; + mes "[Mathias]"; + mes "Oh, you have the special items."; + mes "I'll accept those in lieu of tuition."; + next; + goto L_Menu5_5; + L_Menu5_7: + delitem 1006,1; + delitem 1007,1; + set job2nd_sage,3; + mes "[Mathias]"; + mes "Oh, you have the special items."; + mes "I'll accept those in lieu of tuition."; + next; + goto L_Menu5_6; + L_Menu5_8: + mes "[Mathias]"; + mes "You don't seem to have enough money."; + mes "Please earn some money and return here."; + close; + L_Menu5_9: + mes "[Mathias]"; + mes "Your class level is too low."; + mes "Complete some more training and return here."; + close; +//================================== +L_Menu6_1: + mes "[Mathias]"; + mes "Hmmm? Did you forget what you need to do next?"; + mes "Head over and see Professor Kreitos on the left side of the building."; + close; +L_Menu6_2: + mes "[Mathias]"; + mes "Oh, forgive me. I have so much to do that I can't help you at the moment."; + mes "Again, I apologize..."; + close; +L_Menu6_3: + mes "[Mathias]"; + mes "Oh! Did you finish your thesis?"; + mes "You need to see Headmaster Keiron so he can evaluate it."; + next; + mes "[Mathias]"; + mes "If he approves, you can graduate!"; + mes "Good luck."; + close; +L_Menu6_4: + mes "[Mathias]"; + mes "Welcome, colleague."; + mes "How is your research coming along?"; + next; + mes "[Mathias]"; + mes "In order to be a truly great researcher, you need to supplement your book-based research with encounters with real monsters."; + next; + mes "[Mathias]"; + mes "If you know others with what it takes to become a Sage, please send them here."; + mes "Give my regards to my other colleagues, also."; + close; +} + +yuno_in03.gat,169,180,4 script Test Professor 755,{ + if (Class == 16) goto L_Menu4_5; + if (Class != 2) goto L_Menu1_1; + if (job2nd_sage == 5) goto L_Menu2_1; + if (job2nd_sage == 6) goto L_Menu2_3; + if (job2nd_sage == 7) goto L_Menu3_1; + if (job2nd_sage == 8) goto L_Menu4_1; + if (job2nd_sage == 9) goto L_Menu4_2; + if (job2nd_sage == 11) goto L_Menu4_4; + mes "[Hermes]"; + mes "Hello, I'm Hermes. I am part of the skill testing staff."; + mes "Are you a Sage candidate?"; + next; + if (job2nd_sage == 3) goto L_Menu1_2; + if (job2nd_sage >= 3) goto L_Menu1_2; + mes "[Hermes]"; + mes "Oh, alright."; + mes "First you need to enroll and take the placement test."; + close; +L_Menu1_1: + mes "[Hermes]"; + mes "This is Shubaichul Magic Academy."; + next; + mes "[Hermes]"; + mes "There are Sages that are less magicians than researchers."; + mes "Having a party supporting this kind of person is extremely important."; + next; + mes "[Hermes]"; + mes "Keep supporting your party to the best of your ability."; + mes "That's all you need to do."; + close; +L_Menu1_2: + mes "[Hermes]"; + mes "You need to take the placement test from Kreitos before you can take my test."; + close; +L_Menu2_1: + set job2nd_sage,6; + mes "[Hermes]"; + mes "Oh? You took and passed the placement test?"; + mes "Now you need to take the skill test from me."; + next; + mes "[Hermes]"; + mes "The rules for the skill test are simple."; + mes "You need to kill all the monsters within the prescribed time limit."; + next; + mes "[Hermes]"; + mes "There's an old proverb that one experience is worth a hundred words, so why not try it once?"; + next; + menu "Sounds good",-,"I'm not ready yet",L_Menu2_2; + mes "[Hermes]"; + mes "Well, let's get started."; + mes "Do your best!"; + next; + warp "job_sage",50,154; + end; + L_Menu2_2: + mes "[Hermes]"; + mes "Okay."; + mes "Please prepare quickly."; + close; +L_Menu2_3: + mes "[Hermes]"; + mes "Are you ready to take the skill test?"; + mes "It's not too tough."; + next; + mes "[Hermes]"; + mes "How about it?"; + next; + menu "Sounds good",-,"I'm not ready yet",L_Menu2_2; + mes "[Hermes]"; + mes "Well, let's get started."; + mes "Do your best!"; + next; + warp "job_sage",50,154; + next; + warp "job_sage",50,154; + end; +L_Menu3_1: + mes "[Hermes]"; + mes "Good job! You passed"; + mes "the skill test! Now you can proceed to the research phase!"; + next; + mes "[Hermes]"; + mes "Before I decide your research concentration, let's look at your score on the placement test and the amount of time you spent in the skill test."; + next; + mes "[Hermes]"; + mes "Hmmm..."; + mes "Looking good."; + next; + +//It's not clear how the script decides + + if (sagecheck >= 12) goto L_Menu3_2; + set job2nd_sage,8; + mes "[Hermes]"; + mes "It looks like monster research would be your best bet."; + next; + mes "[Hermes]"; + mes "In order to gain the necessary information to put together a coherent research paper,"; + mes "you should take the biology course from Professor Lucias."; + next; + goto L_Menu3_4; +L_Menu3_2: + set job2nd_sage,9; + mes "[Hermes]"; + mes "It looks like we have a budding elemental magic researcher here."; + mes "This field is fundamental to the advancement of magical knowledge."; + next; + mes "[Hermes]"; + mes "You need to take a course from Professor Ebeshi in the biotech lab to gain a deeper understanding of elemental magic."; + next; +L_Menu3_4: + mes "[Hermes]"; + mes "I hope the coursework goes well."; + close; +L_Menu4_1: + mes "[Hermes]"; + mes "Weren't you listening?"; + mes "You need to see Professor Lucias so you can begin your study of monster biology."; + close; +L_Menu4_2: + mes "[Hermes]"; + mes "Weren't you listening?"; + mes "You need to see Professor Ebeshi so you can begin your study of elemental magic."; + close; +L_Menu4_4: + mes "[Hermes]"; + mes "Great job on completing your thesis, but you need to show it to the Headmaster."; + mes "He's the one who will judge whether or not you graduate."; + close; +L_Menu4_5: + mes "[Hermes]"; + mes "How are you?"; + mes "Your face reveals that you've endured a lot of stress lately."; + next; + mes "[Hermes]"; + mes "As stressful as hands-on research is,"; + mes "it is still fundamentally different from research using abstract concepts."; + next; + mes "[Hermes]"; + mes "Of course, if you go to difficult dungeons,"; + mes "there's no shame in bringing a friend or five to help you out."; + close; +} + +yuno_in03.gat,62,176,3 script History Professor 109,{ + if (Class == 16) goto L_Menu2_2; + if (Class != 2) goto L_Menu1_1; + if (job2nd_sage == 11) goto L_Menu2_1; + mes "[Sapien]"; + mes "You don't seem sure of your intended direction of study."; + mes "Perhaps you should consider it..."; + close; +L_Menu1_1: + mes "[Sapien]"; + mes "Yes, I teach history."; + next; + mes "[Sapien]"; + mes "As the present fades into memory, it becomes the past."; + mes "The kwoledge we have acquired in the past is the bridge between the present and the future."; + next; + mes "[Sapien]"; + mes "You should study your own past, too."; + mes "By understanding what's happened to you already,"; + mes "you can blaze a trail into the future unhindered by unresolved problems."; + close; +L_Menu2_1: + mes "[Sapien]"; + mes "What are you doing?"; + mes "Hurry up and show the Headmaster your thesis before you lose it!"; + close; +L_Menu2_2: + mes "[Sapien]"; + mes "Yes...?"; + mes "Ah, it's a former student here."; + mes "Congratulations on graduating."; + next; + mes "[Sapien]"; + mes "The present can only be understood by understanding the past."; + mes "Such understanding allows us to envision our future."; + next; + mes "[Sapien]"; + mes "You should study your own past, too."; + mes "By understanding what's happened to you already,"; + mes "you can blaze a trail into the future unhindered by unresolved problems."; + close; +} + +yuno_in03.gat,105,177,4 script Placement Test Professor 754,{ + if (Class == 16) goto L_Menu3_4; + if (Class != 2) goto L_Menu1_1; + if (job2nd_sage == 11) goto L_Menu3_3; + if (job2nd_sage >= 6) goto L_Menu3_2; + if (job2nd_sage == 3) goto L_Menu1_2; + if (job2nd_sage == 4) goto L_Menu2_1; + if (job2nd_sage == 5) goto L_Menu3_1; + mes "[Kreitos]"; + mes "You have that look in your eye..."; + mes "You want to be a Sage, I take it."; + next; + mes "[Kreitos]"; + mes "You need to formally enroll in the Academy before I can help you any further."; + close; +L_Menu1_1: + mes "[Kreitos]"; + mes "Oh, you're not interested in our brand of magic?"; + mes "That's alright..."; + next; + mes "[Kreitos]"; + mes "Anyone who teaches others and has a good heart is of value to society."; + mes "Please keep that in mind."; + close; +L_Menu1_2: + set job2nd_sage,4; + set sagecheck,10; + mes "[Kreitos]"; + mes "It looks like you've enrolled in the Shubaichul Magic Academy."; + mes "Is that right?"; + next; + mes "[Kreitos]"; + mes "So, let me find your paperwork..."; + mes "You're " + strcharinfo(0) + ","; + mes "right?"; + mes "Let's start the placement test."; + next; + mes "[Kreitos]"; + mes "This test consists of twenty questions concerning the entire world."; + mes "If you score at least 80 points, you'll be placed in our program."; + mes "Each correct answer is worth 5 points."; + next; + mes "[Kreitos]"; + mes "If you cancel, you'll have to start over, so be careful."; + next; + goto L_Menu2_2; + L_Menu2_1: + mes "[Kreitos]"; + mes "Are you ready to try again?"; + mes "Have you studied hard?"; + next; + mes "[Kreitos]"; + mes "The passing grade is as before."; + mes "You need to score 80 points, with each question being worth 5 points."; + next; + mes "[Kreitos]"; + mes "So, let's get started."; + mes "Give it your best effort."; + mes "As before, if you cancel,"; + mes "you'll have to start over."; + next; + L_Menu2_2: + set @sage_test2,0; + set @sage_test1,rand(3); + if (@sage_test1 == 1) goto L_Test2_1; + if (@sage_test1 == 2) goto L_Test3_1; + +//================================== +//Written Test: Route 1. +//================================== + mes "1. Which one isn't sold in Morocc's jewel shop?"; + next; + menu "Topaz",L_Test1_1,"Garnet",-,"Diamond",L_Test1_1,"Sapphire",L_Test1_1; + set @sage_test2,@sage_test2+5; + goto L_Test1_1; + L_Test1_1: + mes "2. In which town can you not buy monster food?"; + next; + menu "Prontera",L_Test1_2,"Morocc",L_Test1_2,"Aldebaran",-,"Alberta",L_Test1_2; + set @sage_test2,@sage_test2+5; + L_Test1_2: + mes "3. Which town is closest to the forest maze?"; + next; + menu "Prontera",-,"Morocc",L_Test1_3,"Geffen",L_Test1_3,"Payon",L_Test1_3; + set @sage_test2,@sage_test2+5; + L_Test1_3: + mes "4. Which of these monsters is of a different race than the other three?"; + next; + menu "Muka",L_Test1_4,"Drops",L_Test1_4,"Plankton",L_Test1_4,"Penomena",-; + set @sage_test2,@sage_test2+5; + L_Test1_4: + mes "5. All these monsters except one have the same elemental affinity."; + mes "Which one has the different affinity?"; + next; + menu "Dokebi",L_Test1_5,"Isis",L_Test1_5,"Giearth",-,"Deviruchi",L_Test1_5; + set @sage_test2,@sage_test2+5; + L_Test1_5: + mes "6. Which one differs in approximate size from the others?"; + next; + menu "Male Thief Bug",L_Test1_6,"Horn",L_Test1_6,"Metaller",L_Test1_6,"Argos",-; + set @sage_test2,@sage_test2+5; + L_Test1_6: + mes "7. Which of these monsters doesn't drop the Iggydrasil leaf?"; + next; + menu "Marduk",-,"Baphomet Jr.",L_Test1_7,"Angeling",L_Test1_7,"Wander Man",L_Test1_7; + set @sage_test2,@sage_test2+5; + L_Test1_7: + mes "8. Which of these people isn't related to someone who can perform a class change to priest?"; + next; + menu "Peter S. Alberto",-,"Thomas Bishop",L_Test1_8,"Windser Banedict",L_Test1_8,"Sesil Magrita",L_Test1_8; + set @sage_test2,@sage_test2+5; + L_Test1_8: + mes "9. Which doesn't live in Morocc?"; + next; + menu "Muda Armani",L_Test1_9,"Aragham",L_Test1_9,"Antonio",-,"Abldul",L_Test1_9; + set @sage_test2,@sage_test2+5; + L_Test1_9: + mes "10. Which Kapra has the pretty blue hair?"; + next; + menu "Pavianne",-,"Debril",L_Test1_10,"Claris",L_Test1_10,"Tayelin",L_Test1_10; + set @sage_test2,@sage_test2+5; + L_Test1_10: + mes "11. Which one isn't necessary to unlock the Fire Wall skill?"; + next; + menu "Firebolt Lv4",L_Test1_11,"Napalm Beat Lv4",-,"Fireball Lv5",L_Test1_11,"Sight Lv1",L_Test1_11; + set @sage_test2,@sage_test2+5; + L_Test1_11: + mes "12. When the skill 'SP Restoration Lv6' is active, how much SP does the skill restore every ten seconds?"; + next; + menu "14 sp",L_Test1_12,"16 sp",L_Test1_12,"18 sp",-,"21 sp",L_Test1_12; + set @sage_test2,@sage_test2+5; + L_Test1_12: + mes "13. If you are a magician with job lv. 33, how many additional stat points will you get for int?"; + next; + menu "7",L_Test1_13,"6",L_Test1_13,"5",L_Test1_13,"4",-; + set @sage_test2,@sage_test2+5; + L_Test1_13: + mes "14. If the Archer skill 'Concentration Up Lv5' is active, how much SP will it consume?"; + next; + menu "45 / 140sec",-,"50 / 140sec",L_Test1_14,"45 / 150sec",L_Test1_14,"50 / 150sec",L_Test1_14; + set @sage_test2,@sage_test2+5; + L_Test1_14: + mes "15. Which one isn't necessary to unlock the Blacksmith skill 'Maximize Power'?"; + next; + menu "Hilt Bending",L_Test1_15,"Skin Tempering",-,"Hammer Fall",L_Test1_15,"Weapon Perfection",L_Test1_15; + set @sage_test2,@sage_test2+5; + L_Test1_15: + mes "16. What is the defense power and supplemental ability of a Ribbon?"; + next; + menu "0 / SP +20",L_Test1_16,"0 / SP +30",L_Test1_16,"1 / SP +20",-,"1 / SP +30",L_Test1_16; + set @sage_test2,@sage_test2+5; + L_Test1_16: + mes "17. Which class can't equip a Saint Robe?"; + next; + //Swordsmen can't equip it either as of this writing. + menu "Swordsman",-,"Merchant",L_Test1_17,"Thief",-,"Acolyte",L_Test1_17; + set @sage_test2,@sage_test2+5; + L_Test1_17: + mes "18. Which status ailment can't be removed with a Green Potion?"; + next; + menu "Mute",L_Test1_18,"Poison",L_Test1_18,"Blind",L_Test1_18,"Cursed",-; + set @sage_test2,@sage_test2+5; + L_Test1_18: + mes "19. What is the name of the ancient kingdom from which Geffen descends?"; + next; + menu "Gefin",L_Test1_19,"Geffenia",-,"Gefdoria",L_Test1_19,"Gefria",L_Test1_19; + set @sage_test2,@sage_test2+5; + L_Test1_19: + mes "20. Which tree is said to be the world's root?"; + next; + menu "Igg Drasil",-,"Idrasil",L_Menu2_3,"Master",L_Menu2_3,"Old Tree",L_Menu2_3; + set @sage_test2,@sage_test2+5; + goto L_Menu2_3; + //================================== + //Written Test: Route 2. + //================================== + L_Test2_1: + mes "1. Which isn't sold in Geffen's magic shop?"; + next; + menu "Mantle",-,"Wand",L_Test2_2,"Circlet",L_Test2_2,"Silver Robe",L_Test2_2; + set @sage_test2,@sage_test2+5; + L_Test2_2: + mes "2. Which town doesn't sell blades?"; + next; + menu "Prontera",L_Test2_3,"Izlude",L_Test2_3,"Aldebaran",-,"payon",L_Test2_3; + set @sage_test2,@sage_test2+5; + L_Test2_3: + mes "3. Which town is nearest to Glast Heim?"; + next; + menu "Prontera",L_Test2_4,"Geffen",-,"Morocc",L_Test2_4,"Payon",L_Test2_4; + set @sage_test2,@sage_test2+5; + L_Test2_4: + mes "4. Which monster's type differs from the other three?"; + next; + menu "Aster",L_Test2_5,"Marc",L_Test2_5,"Marse",L_Test2_5,"Marin",-; + set @sage_test2,@sage_test2+5; + L_Test2_5: + mes "5. Which monster's elemental affinity is different from the others?"; + next; + menu "Desert Wolf Babe",L_Test2_6,"Smokie",-,"Picky",L_Test2_6,"Choco",L_Test2_6; + set @sage_test2,@sage_test2+5; + L_Test2_6: + mes "6. Which monster is in a different size class than the others?"; + next; + menu "Drake",-,"Wraith",L_Test2_7,"Evil Druid",L_Test2_7,"Khalitzburg",L_Test2_7; + set @sage_test2,@sage_test2+5; + L_Test2_7: + mes "7. Which monster doesn't drop Phracon?"; + next; + menu "Pupa",L_Test2_8,"Condor",-,"Savage Baby",L_Test2_8,"Desert Wolf Babe",L_Test2_8; + set @sage_test2,@sage_test2+5; + L_Test2_8: + mes "8. Who isn't involved in the Blacksmith class change?"; + next; +// ========================= +// Acording To mRO Site And eAthena Blacksmith Script the following ppl looking like ppl listed here are: +// - Baisulitst - looks like some1 listed by mRO +// - Wickebine - mRO has him as option listed +// - Gromgast - mRO has him as option listed +// - Mitmayer - translator has him listed as option +// == Conclusion == I took the following: +// ========================= + menu "Baisulitst",L_Test2_9,"Wickebine",L_Test2_9,"Barkdale",-,"Mitmayer",L_Test2_9; + set @sage_test2,@sage_test2+5; + L_Test2_9: + mes "9. Who doesn't live in Aldebaran?"; + next; + menu "RS125",L_Test2_10,"Maasaru",-,"Munster",L_Test2_10,"Isenberg",L_Test2_10; + set @sage_test2,@sage_test2+5; + L_Test2_10: + mes "10. Who is the youngest person in the Kapra organization?"; + next; + menu "Deflute",L_Test2_11,"Claris",L_Test2_11,"Tayelin",L_Test2_11,"Curly Sue",-; + set @sage_test2,@sage_test2+5; + L_Test2_11: + mes "11. When you use the skill 'Safety Wall Lv6', how much SP is consumed and how many attacks will it block?"; + next; + menu "SP 40, 6bl",L_Test2_12,"SP 35, 6bl",L_Test2_12,"SP 35, 7bl",L_Test2_12,"SP 40, 7bl",-; + set @sage_test2,@sage_test2+5; + L_Test2_12: + mes "12. When you use 'Napalm Beat Lv6', what is the attack power relative to MATK?"; + next; + menu "1.2x MATK",L_Test2_13,"1.3x MATK",-,"1.4x MATK",L_Test2_13,"1.5x MATK",L_Test2_13; + set @sage_test2,@sage_test2+5; + L_Test2_13: + mes "13. Which one catalyzes the reaction of Liquid #4 during the Magician class change test?"; + next; + menu "Blue Gemstone",L_Test2_14,"Red Gemstone",L_Test2_14,"Orange Gemstone",L_Test2_14,"Carat Diamond",-; + set @sage_test2,@sage_test2+5; + L_Test2_14: + mes "14. What is the damage multiplier and SP consumption for 'Bash Lv6'?"; + next; + menu "250% / 8",L_Test2_15,"280% / 8",L_Test2_15,"280% / 15",-,"310% / 15",L_Test2_15; + set @sage_test2,@sage_test2+5; + L_Test2_15: + mes "15. Which isn't necessary to unlock the Hunter skill 'Claymore Trap'?"; + next; + menu "Remove Trap",-,"Land Mine",L_Test2_16,"Ankle Snare",L_Test2_16,"Flash",L_Test2_16; + set @sage_test2,@sage_test2+5; + L_Test2_16: + mes "16. What is the defense power and supplemental ability of a Veil?"; + next; + menu "0 / MDEF +3",L_Test2_17,"0 / MDEF +5",-,"1 / MDEF +3",L_Test2_17,"1 / MDEF +5",L_Test2_17; + set @sage_test2,@sage_test2+5; + L_Test2_17: + mes "17. Which class can't equip a Coat?"; + next; + menu "Swordsman",L_Test2_18,"Magician",L_Test2_18,"Thief",L_Test2_18,"Novice",-; + set @sage_test2,@sage_test2+5; + L_Test2_18: + mes "18. Which item isn't blue in color?"; + next; + menu "Alcohol",L_Test2_19,"Detrimindexta",-,"Karvodailnirol",L_Test2_19,"Blue Herb",L_Test2_19; + set @sage_test2,@sage_test2+5; + L_Test2_19: + mes "19. Which item did the god Odin use to create the world?"; + next; +// menu "Yomir's Heart",L_Test2_20,"Yomir's Nail",-,"Yomir's Tooth",L_Test2_20,"Yomir's Stuff",L_Test2_20; +// All answers correct untill i know the real answer, only Stuff is wrong cause that NOT it + menu "Yomir's Heart",-,"Yomir's Nail",-,"Yomir's Tooth",-,"Yomir's Stuff",L_Test2_20; + set @sage_test2,@sage_test2+5; + L_Test2_20: + mes "20. Which metal can change the fate of the world?"; + next; + menu "Envertacon",L_Menu2_3,"Emperium",-,"Enbera",L_Menu2_3,"Phracon",L_Menu2_3; + set @sage_test2,@sage_test2+5; + goto L_Menu2_3; +//================================== +//Written Test: Route 3. +//================================== + L_Test3_1: + mes "1.Which of these items isn't sold at Prontera's knicknack shop?"; + next; + menu "White Plate",L_Test3_2,"Red Frame",L_Test3_2,"Flower",-,"Glass Ball",L_Test3_2; + set @sage_test2,@sage_test2+5; + L_Test3_2: + mes "2. Which town doesn't sell stilettos?"; + next; + menu "Prontera",-,"Morocc",L_Test3_3,"Gefen",L_Test3_3,"Lutie",L_Test3_3; + set @sage_test2,@sage_test2+5; + L_Test3_3: + mes "3. Which town is closest to Turtle Island?"; + next; + menu "Aldebaran",L_Test3_4,"Alberta",-,"Comodo",L_Test3_4,"Izlude",L_Test3_4; + set @sage_test2,@sage_test2+5; + L_Test3_4: + mes "4. Which monster is of a different monster race than the other three?"; + next; + menu "Raggler",L_Test3_5,"Pest",L_Test3_5,"Frilldora",L_Test3_5,"Aster",-; + set @sage_test2,@sage_test2+5; + L_Test3_5: + mes "5. Which monster has a different elemental affinity than the other three?"; + next; + menu "Mantis",L_Test3_6,"Metaller",-,"Rokker",L_Test3_6,"Horn",L_Test3_6; + set @sage_test2,@sage_test2+5; + L_Test3_6: + mes "6. Which monster is in a different size class than the others?"; + next; + menu "Raydric",-,"Raydric Archer",L_Test3_7,"Wander Man",L_Test3_7,"Dark Flame",L_Test3_7; + set @sage_test2,@sage_test2+5; + L_Test3_7: + mes "7. Which monster doesn't drop alcohol?"; + next; + menu "Horn",L_Test3_8,"Plankton",L_Test3_8,"Poison Spore",-,"Toad",L_Test3_8; + set @sage_test2,@sage_test2+5; + L_Test3_8: + mes "8. Which isn't involved in the Knight class change?"; + next; +// ========================= +// Acording To mRO Site And eAthena Knight Script the following ppl looking like ppl listed here +// ========================= + menu "James Syracuse",L_Test3_9,"Thomas Bishop",-,"Amy Veattris",L_Test3_9,"Edmond Groster",L_Test3_9; + set @sage_test2,@sage_test2+5; + L_Test3_9: + mes "9. Which of these people doesn't live in Prontera?"; + next; + menu "Nami",L_Test3_10,"Aldefun",-,"Thomas",L_Test3_10,"Hollengrhen",L_Test3_10; + set @sage_test2,@sage_test2+5; + L_Test3_10: + mes "10. Which Kapra wears glasses?"; + next; + menu "Deflute",L_Test3_11,"Tayelin",L_Test3_11,"Leilah",-,"Debril",L_Test3_11; + set @sage_test2,@sage_test2+5; + L_Test3_11: + mes "11. How much SP does it cost to use 'Thunderstorm Lv7'?"; + next; + menu "49",L_Test3_12,"59",-,"69",L_Test3_12,"74",L_Test3_12; + set @sage_test2,@sage_test2+5; + L_Test3_12: + mes "12. If you have 50% of your SP left, how much damage will 'Energy Coat' block and how much SP will be consumed?"; + next; + menu "24% blocked SP1.5% consumed",L_Test3_13,"24% blocked SP2% consumed",L_Test3_13,"18% blocked SP1.5% consumed",L_Test3_13,"18% blocked SP2% consumed",-; + set @sage_test2,@sage_test2+5; + L_Test3_13: + mes "13. Which element cannot be used in bolt form by a Magician?"; + next; + menu "Water",L_Test3_14,"Earth",-,"Fire",L_Test3_14,"Wind",L_Test3_14; + set @sage_test2,@sage_test2+5; + L_Test3_14: + mes "14. When a thief has the skill 'Double Attack Lv7', what is the trigger probability and attack power multiplier?"; + next; + menu "35% / 120%",L_Test3_15,"35% / 140%",-,"40% / 120%",L_Test3_15,"40% / 140%",L_Test3_15; + set @sage_test2,@sage_test2+5; + L_Test3_15: + mes "15. Which of these isn't necessary to unlock the Priest skill 'Magnus Exorcism'?"; + next; + menu "Divine Protection",-,"Heal",L_Test3_16,"Revive",L_Test3_16,"Aqua Benedicta",L_Test3_16; + set @sage_test2,@sage_test2+5; + L_Test3_16: + mes "16. What is the defense power and supplemental ability of a Rabbit Headband?"; + next; + menu "1 / LUK +2",L_Test3_17,"1 / LUK +5",L_Test3_17,"2 / LUK +2",-,"2 / LUK +5",L_Test3_17; + set @sage_test2,@sage_test2+5; + L_Test3_17: + mes "17. Which class can't equip armor?"; + next; + menu "Swordsman",L_Test3_18,"Merchant",L_Test3_18,"Thief",L_Test3_18,"Archer",-; + set @sage_test2,@sage_test2+5; + L_Test3_18: + mes "18. Which item completely restores HP and SP?"; + next; + menu "Royal Jelly",L_Test3_19,"Ig Drasil Seed",L_Test3_19,"Ig Drasil Fruit",-,"Master Fruit",L_Test3_19; + set @sage_test2,@sage_test2+5; + L_Test3_19: + mes "19. What's the name of the king of Rune-Midgard?"; + next; + menu "Trisdan III",L_Test3_20,"Tristan III",-,"Traisda III",L_Test3_20,"Trist III",L_Test3_20; + set @sage_test2,@sage_test2+5; + L_Test3_20: + mes "20. Which god do Crusaders serve?"; + next; + menu "Odin",-,"Loki",L_Menu2_3,"Tooru",L_Menu2_3,"Aragamsaree",L_Menu2_3; + set @sage_test2,@sage_test2+5; + L_Menu2_3: + mes "[Kreitos]"; + mes "Are you finished?"; + mes "Alright, then I'll grade the test."; + next; + mes "[Kreitos]"; + mes "Hmmm..."; + mes "Yes...."; + next; + if (@sage_test2 >= 100) goto L_Menu2_5; + if (@sage_test2 < 80) goto L_Menu2_4; + mes "[Kreitos]"; + mes "All done."; + mes "You scored " + @sage_test2 + " points."; + mes "Looking good."; + mes "You've scored highly enough to pass."; + next; + goto L_Menu2_6; + L_Menu2_4: + set sagecheck,sagecheck-1; + mes "[Kreitos]"; + mes "All done."; + mes "You scored " + @sage_test2 + " points."; + mes "......"; + mes "Sorry, that's not good enough."; + next; + mes "[Kreitos]"; + mes "We exepect our students to have command of much information about the world."; + mes "Learn some more and come back."; + mes "You can take the test again then."; + close; + L_Menu2_5: + mes "[Kreitos]"; + mes "All done."; + mes "You scored " + @sage_test2 + " points."; + mes "Amazing. You did wonderfully."; + mes "There is no doubt you'll make a great Sage."; + next; + L_Menu2_6: + set job2nd_sage,5; + mes "[Kreitos]"; + mes "Alright."; + mes "You've completed the placement test."; + mes "Now you need to take the skill test from Professor Hermes."; + close; +L_Menu3_1: + mes "[Kreitos]"; + mes "Heh?"; + mes "Do you love tests so much that you want to take the placement test again?"; + next; + mes "[Kreitos]"; + mes "Go see Professor Hermes and take the skill test."; + mes "Future Sages can't be slacking off."; + close; +L_Menu3_2: + mes "[Kreitos]"; + mes "I'm busy grading other students' exams at the moment."; + mes "If you need something, please see me later."; + close; +L_Menu3_3: + mes "[Kreitos]"; + mes "It's great that you finished your thesis, but I don't grade those."; + next; + mes "[Kreitos]"; + mes "Show that to Headmaster Keiron."; + mes "He'll judge whether or not it's quality warrants your graduation."; + close; +L_Menu3_4: + mes "[Kreitos]"; + mes "You've graduated already?"; + mes "Do you want to take more classes?"; + next; + mes "[Kreitos]"; + mes "I know it feels great to have graduated, but you've got to keep learning."; + mes "You might burn out if you become complacent and never venture out of the library once in a while."; + mes "Danger is exhilerating."; + next; + mes "[Kreitos]"; + mes "Don't forget to keep notes about your journies."; + mes "They can come in handy when you want to teach others about a subject you've studied."; + close; +} + +//================================== +//Skill Test Room +//================================== +job_sage.gat mapflag nobranch dummy +job_sage.gat mapflag noteleport dummy +job_sage.gat mapflag nopenalty dummy +job_sage.gat mapflag nosave SavePoint + +job_sage.gat,50,165,4 script Skill Test Coordinator::jobsage_wroom 700,{ + mes "[Skill Test Coordinator]"; + mes "Welcome to the Sage skill test."; + mes "Please go to the waiting area if you want to take the test."; + next; + mes "[Skill Test Coordinator]"; + mes "Others are being tested at the moment."; + mes "When it's time for you to be tested, we'll call your name."; + next; + mes "[Skill Test Coordinator]"; + mes "It takes around 5-10 minutes to test one person."; + close; +OnInit: + waitingroom "Test Waiting Area",10,"jobsage_wroom::OnStart",1; + end; +OnStart: + disablewaitingroomevent; + warpwaitingpc "job_sage.gat",118,99; + set $@jobsage_pid,$@warpwaitingpc[0]; + if( attachrid($@jobsage_pid)==0 ) goto L_Error; + set $@jobsage_pname$,strcharinfo(0); + donpcevent "jobsage_1st::OnStart"; + end; +L_Error: + enablewaitingroomevent; + end; +OnEnable: + enablewaitingroomevent; + end; +} + +//======== Test Step 1 +job_sage.gat,1,1,1 script jobsage_1st -1,{ + end; +OnStart: + set $@jobsage_m,16; + monster "job_sage.gat",115,106,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",120,102,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",124,98,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",120,93,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",115,90,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",111,93,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",107,98,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",111,102,"Unit",1183,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",128,110,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",124,106,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",124,89,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",128,85,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",107,89,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",103,85,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",107,106,"Unit",1184,1,"jobsage_1st::OnKilled"; + monster "job_sage.gat",103,110,"Unit",1184,1,"jobsage_1st::OnKilled"; + initnpctimer; + end; +OnReset: + killmonster "job_sage.gat","All"; + end; +OnKilled: + set $@jobsage_m,$@jobsage_m-1; + if( $@jobsage_m > 0 )goto L_NotWin; + if (getnpctimer(1,"jobsage_1st") < 60000 ) set sagecheck,sagecheck+1; + if ((getnpctimer(1,"jobsage_1st") >= 120000 ) && (getnpctimer(1,"jobsage_1st") <= 170000 )) set sagecheck,sagecheck-1; + if (getnpctimer(1,"jobsage_1st") > 170000 ) set sagecheck,sagecheck-2; + stopnpctimer; + mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + " killed all the monsters!",8; + donpcevent "jobsage_2nd::OnStart"; + L_NotWin: + end; +OnTimer1000: + mapannounce "job_sage.gat","Examiner: The skill test begins now.",8; + end; +OnTimer2500: + mapannounce "job_sage.gat","Examiner: The time limit for this portion of the test is 3 minutes.",8; + end; +OnTimer4000: + mapannounce "job_sage.gat","Examiner: You must kill all the monsters within that time period.",8; + end; +OnTimer30000: + mapannounce "job_sage.gat","Examiner: 2 minutes, 30 seconds remaining.",8; + end; +OnTimer60000: + mapannounce "job_sage.gat","Examiner: 2 minutes remaining.",8; + end; +OnTimer90000: + mapannounce "job_sage.gat","Examiner: 1 minute, 30 seconds remaining.",8; + end; +OnTimer120000: + mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8; + end; +OnTimer150000: + mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8; + end; +OnTimer170000: + mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8; + end; +OnTimer180000: + donpcevent "jobsage_1st::OnReset"; + mapannounce "job_sage.gat","Examiner: Time has expired.",8; + end; +OnTimer181500: + mapannounce "job_sage.gat","Examiner:" + $@jobsage_pname$ + "failed the test.",8; + areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258; + end; +OnTimer183000: + mapannounce "job_sage.gat","Next candidate, please step forward.",8; + end; +OnTimer184000: + donpcevent "jobsage_wroom::OnEnable"; + stopnpctimer; + end; +} + +//======== Test Step 2 +job_sage.gat,1,1,1 script jobsage_2nd -1,{ + end; +OnStart: + donpcevent "jobsage_2nd::OnReset"; + set $@jobsage_m,24; + monster "job_sage.gat",120,102,"GeographyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,102,"StatisticsInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,102,"MeteorologyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,102,"AstronomyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,102,"LinguisticsInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,102,"CityLifeInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",124,98,"ForestryInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",124,98,"HealthInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",124,98,"PsychologyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,93,"AnthropologyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,93,"BiologyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",120,93,"EthicsInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,93,"ArchitectureInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,93,"PlasticsInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,93,"NutritionInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,93,"FoodInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,93,"ManagementInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,93,"SociologyInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",107,98,"EconomicsInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",107,98,"MagicInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",107,98,"PoliSciInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,102,"MathInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,102,"HistoryInfo",1063,1,"jobsage_2nd::OnKilled"; + monster "job_sage.gat",111,102,"PhysicsInfo",1063,1,"jobsage_2nd::OnKilled"; + initnpctimer; + end; +OnReset: + killmonster "job_sage.gat","All"; + end; +OnKilled: + set $@jobsage_m,$@jobsage_m-1; + if( $@jobsage_m > 0 )goto L_NotWin; + stopnpctimer; + if (getnpctimer(1,"jobsage_2nd") < 60000 ) set sagecheck,sagecheck+1; + if ((getnpctimer(1,"jobsage_2nd") >= 120000 ) && (getnpctimer(1,"jobsage_2nd") <= 170000 )) set sagecheck,sagecheck-1; + if (getnpctimer(1,"jobsage_2nd") > 170000 ) set sagecheck,sagecheck-2; + mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + " killed all the monsters!",8; + donpcevent "jobsage_3rd::OnStart"; + L_NotWin: + end; +OnTimer1500: + mapannounce "job_sage.gat","Examiner: The time limit for this portion of the test is 3 minutes.",8; + end; +OnTimer3000: + mapannounce "job_sage.gat","Examiner: You must kill all the monsters within that time period.",8; + end; +OnTimer30000: + mapannounce "job_sage.gat","Examiner: 2 minutes, 30 seconds remaining.",8; + end; +OnTimer60000: + mapannounce "job_sage.gat","Examiner: 2 minutes remaining.",8; + end; +OnTimer90000: + mapannounce "job_sage.gat","Examiner: 1 minute, 30 seconds remaining.",8; + end; +OnTimer120000: + mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8; + end; +OnTimer150000: + mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8; + end; +OnTimer170000: + mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8; + end; +OnTimer180000: + donpcevent "jobsage_2nd::OnReset"; + mapannounce "job_sage.gat","Examiner: Time has expired.",8; + end; +OnTimer181500: + mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + "has failed the test.",8; + areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258; + end; +OnTimer183000: + mapannounce "job_sage.gat","Next candidate, please step forward.",8; + end; +OnTimer184000: + donpcevent "jobsage_wroom::OnEnable"; + stopnpctimer; + end; +} + + +//======== Test Step 3 +job_sage.gat,1,1,1 script jobsage_3rd -1,{ + end; +OnStart: + donpcevent "jobsage_3rd::OnReset"; + set $@jobsage_m,1; + monster "job_sage.gat",116,98,"Bachelor",1179,1,"jobsage_3rd::OnKilled"; + monster "job_sage.gat",124,106,"Tardy",1185,1; + monster "job_sage.gat",124,89,"Loaner",1185,1; + monster "job_sage.gat",107,89,"Cheater",1185,1; + monster "job_sage.gat",107,106,"Absentee",1185,1; + initnpctimer; + end; +OnReset: + end; +OnKilled: + set $@jobsage_m,$@jobsage_m-1; + if( $@jobsage_m > 0 )goto L_NotWin; + stopnpctimer; + killmonster "job_sage.gat","All"; + set job2nd_sage,7; + if (getnpctimer(1,"jobsage_3rd") < 20000 ) set sagecheck,sagecheck+1; + if ((getnpctimer(1,"jobsage_3rd") >= 30000 ) && (getnpctimer(1,"jobsage_2nd") <= 50000 )) set sagecheck,sagecheck-1; + if (getnpctimer(1,"jobsage_3rd") > 50000 ) set sagecheck,sagecheck-2; + mapannounce "job_sage.gat","Examiner: Congratulations. " + $@jobsage_pname$ + "passed the test!",8; + donpcevent "jobsage_success::OnSuccess"; + L_NotWin: + end; +OnTimer1500: + mapannounce "job_sage.gat","Examiner: 1 minute remaining.",8; + end; +OnTimer30000: + mapannounce "job_sage.gat","Examiner: 30 seconds remaining.",8; + end; +OnTimer50000: + mapannounce "job_sage.gat","Examiner: 10 seconds remaining.",8; + end; +OnTimer60000: + donpcevent "jobsage_3rd::OnReset"; + mapannounce "job_sage.gat","Examiner: Time has expired.",8; + end; +OnTimer61500: + mapannounce "job_sage.gat","Examiner: " + $@jobsage_pname$ + "failed the test.",8; + areawarp "job_sage.gat",100,82,131,113,"yuno.gat",324,258; + end; +OnTimer63000: + mapannounce "job_sage.gat","Examiner: This concludes the test. Next candidate, please step forward.",8; + end; +OnTimer64000: + donpcevent "jobsage_wroom::OnEnable"; + stopnpctimer; + end; +} + +//======== Successful +job_sage.gat,1,7,1 script jobsage_success 66,{ +OnSuccess: + killmonster "job_sage.gat","All"; + initnpctimer; + end; +OnTimer3000: + mapannounce "job_sage.gat","Examiner: Please allow me to guide you out.",8; + end; +OnTimer6000: + mapannounce "job_sage.gat","Next candidate, please step forward.",8; + areawarp "job_sage.gat",100,82,131,113,"yuno_in03.gat",163,180; + end; +OnTimer7000: + donpcevent "jobsage_wroom::OnEnable"; + stopnpctimer; + end; +} diff --git a/npc/jobs/custom/jobchange.txt b/npc/jobs/custom/jobchange.txt new file mode 100644 index 000000000..a83a6dcdd --- /dev/null +++ b/npc/jobs/custom/jobchange.txt @@ -0,0 +1,758 @@ +//Jobchanger for Athena by Script&DB Team +//Added missing param into resetlevel [Lupus] + +prontera.gat,160,186,6 script Jobchanger 94,{ +mes "[ ^0065DFJobra^000000 ]"; +mes "Sup? I'm the insanely cool and supra-l337 jobchanger thingy for Athena! First of all, what class would you like to change into (must meet preliminary requirements for each class..)"; +next; +menu "First Class",LFirstClass,"Second Class (2-1)",LSecondClass,"Second Class (2-2)",LSecondClass2,"Novice High",LNovice2,"Advance First Class",LFirstClass1,"Advance Second Class (2-1-1)",LASecondClass,"Advance Second Class (2-2-1)",LASecondClass2; +LNovice2: + if(class < 7) goto LClass2; + if(baselevel<99) goto LReq; + if(joblevel<50) goto LReq2; + if(SkillPoint != 0) goto Lskillpt; + mes "[ ^0065DFJobra^000000 ]"; + mes "So... getting your reborn, eh? Thats cool, we all need a rebirth sometime I guess..."; + next; + jobchange 24;// Job: Job_Novice_High + resetlvl(1); + close; +LReq: + mes "You need to be level 99"; + mes "To Be Reborn"; + close; +LReq2: + mes "You need to be job level 50"; + mes "To Be Reborn"; + close; +LFirstClass: + if(class !=0) goto Lnovice; + if(joblevel<10) goto Ljobten; + if(SkillPoint != 0) goto Lskillpt; + mes "[ ^0065DFJobra^000000 ]"; + mes "So... getting your first job, eh? Thats cool, we all need to grow up sometime I guess..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Pick a job, any job! Bwahaha........."; + menu "Swordsman",LSword,"Mage",LMage,"Thief",LThief,"Merchant",LMerc,"Acolyte",LAco,"Archer",LArch,"Cancel",LCancel; + +Lnovice: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ummmm, excuse me... o.O..."; + mes "You don't LOOK like a novice..."; + mes "Hey! You're no novice! Get away, punk! *rolls eyes*"; + mes "Only NOVICES can change into the First Job... jeeze."; + cutin "kafra_01",255; + close; + +LClass2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ummmm, excuse me... o.O..."; + mes "You don't MEET the class requirements..."; + mes "Hey! You're not read! Get away, punk! *rolls eyes*"; + mes "Only 2nd Classes and Alternate 2nd Classes can change into the Novice High... jeeze."; + cutin "kafra_01",255; + close; + +Ljobten: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ugh, you need to have at least a Job Level of 10 before changing into the first class... go kill some porings or something.. >.>'"; + cutin "kafra_01",255; + close; + +LSword: + mes "[ ^0065DFJobra^000000 ]"; + mes "Wow, fantastic! Doesn't all that hard work feel like its paid off? *kekeke* I see the ^B70004BLOOD of Porings^000000 on your hands! You truly are fit for the ^0005CESwordsman^000000 job! ^_^"; + cutin "kafra_01",255; + jobchange 1;// Job: Job_Swordman + close; + +LMage: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nice, now you can finally wield the power of ^2200DFM^7600F9A^AF00FBN^DA00DFA^000000, your spiritual energy!!!"; + cutin "kafra_01",255; + jobchange 2;// Job: Job_Mage + close; + +LThief: + mes "[ ^0065DFJobra^000000 ]"; + mes "Those devious hand of yours really look like they need to grab something (no comment)..... go forth and steal!!"; + cutin "kafra_01",255; + jobchange 6;// Job: Job_Thief + close; + +LMerc: + mes "[ ^0065DFJobra^000000 ]"; + mes "Oh yeah, Mr. Moneybags, SOMEBODY here just loves the sound of coins jinglin'..."; + mes "Well its not me!.. >_>..... <_<... bah.. "; + cutin "kafra_01",255; + jobchange 5;// Job: Job_Merchant + close; + +LAco: + mes "[ ^0065DFJobra^000000 ]"; + mes "Yay.. go read a Bible.. or whatever.. er..yeah"; + cutin "kafra_01",255; + jobchange 4;// Job: Job_Acolyte + close; + +LArch: + mes "[ ^0065DFJobra^000000 ]"; + mes "I used to poke things with a stick when I was a child.."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "I guess you're like me! You hurl pointed sticks at things! Kekeke..."; + cutin "kafra_01",255; + jobchange 3;// Job: Job_Archer + close; + +LSecondClass: + if(SkillPoint != 0) goto Lskillpt; + if(joblevel<40) goto Ljobforty; + mes "[ ^0065DFJobra^000000 ]"; + mes "Nice... you are ready to change into the Second Job! Things get really fun after this!"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "What would you like to be? (Please be the preliminary job)"; + menu "Knight",LKnight,"Wizard",LWizard,"Hunter",LHunter,"Blacksmith",LBlacksmith,"Assassin",LAssassin,"Priest",LPriest,"Cancel",LCancel; + + Ljobforty: + mes "[ ^0065DFJobra^000000 ]"; + mes "You must be at least Job Level 40 before even thinking about changing into the Second Job."; + cutin "kafra_01",255; + close; + LKnight: + if(class !=1) goto LNotSword; + goto LKnight2; + + LNotSword: + mes "[ ^0065DFJobra^000000 ]"; + mes "Well... you see, there's a little, teensy-weensy problem with YOU becoming a Knight."; + mes "Please be a Swordman before even thinking about 'magically' turning into a Knight... jeeze. *rolls eyes*"; + cutin "kafra_01",255; + close; + + LKnight2: + mes "[ ^0065DFJobra^000000 ]"; + mes "w00t w00t! You are Job Level 40, you've been a Swordie all your life..."; + mes "Alrite, you are ready to become the doer of Justice, the embodiment of Heroism, the very soul and life of Valor! "; + mes "..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Yes! You are ready to become... a Knight! "; + mes "Go save a Damsel in Distress or something.."; + cutin "kafra_01",255; + jobchange 7;// Job: Job_Knight + close; + + + LHunter: + if(class !=3) goto LNotArcher; + goto LHun2; + + LNotArcher: + mes "[ ^0065DFJobra^000000 ]"; + mes "Guess what? ^_^"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "YOU'RE NOT AN ARCHER >_<...."; + mes "WTF?! Do you really think you can magically turn into a Hunter!? I DONT THINK SO BIYATCH!!! >8-(..."; + mes "Go away! *grumble grumble*"; + cutin "kafra_01",255; + close; + + LHun2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Oh goodie, you've met all the requirements... did you have fun hurling pointed sticks at monsters? Well guess what?"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Now you can hurl pointed sticks at monsters AND keep them in one place! w00t, yea! Traps are a great thing..."; + jobchange 11;// Job: Job_Hunter + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "You know what... since I'm just soooo nice... (as long as you dont piss me off *grumble grumble*)"; + mes "I'm gonna give you a complimentary falcon! Use it well! Oh.. and you might wanna wear a hat, this falcon sometimes, uh... poops.."; + cutin "kafra_01",255; + setfalcon; + close; + + LBlacksmith: + mes "[ ^0065DFJobra^000000 ]"; + if(class !=5) goto LNotMerc; + goto LBla2; + + LNotMerc: + mes "[ ^0065DFJobra^000000 ]"; + mes "No, uh-uh, you are no Merchant! Go away! Only MERCHANTS can change into Blacksmiths!!"; + mes "Its like the cycle of life or something! Stop trying to disrupt the order of the universe >__>... go away.."; + close; + + + LAssass2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Did you know I used to be a male Assassin? Well, I had a few things done to my hair, got a face lift, some implants here and there..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Oh my, too much information, right? Kekeke, okay, go off and become the most sinister of all Jobs in this world... ^6500BFAssassin..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Poof! Kekeke... "; + jobchange 12;// Job: Job_Assassin + close; + + LPriest: + if(class !=4) goto LNotAco; + goto LPri2; + + LNotAco: + mes "[ ^0065DFJobra^000000 ]"; + mes "Okay I'm getting tired of this.. you are NOT an Acolyte... I bet you haven't even read the Bible ONCE! You're going to HELL!"; + close; + + LPri2: + mes "[ ^0065DFJobra^000000 ]"; + mes "I bet you are GODDAMNED TIRED of NOT having Sp Recovery, right? Well I am tired of hearing little Jesus-Hugging Acolytes scream this every time they're low on Sp... "; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Yay! You've now reached Priesthood! It's sorta like Manhood.. but not really, see with Manhood, you get this little thingy between your legs.. WHOOPs, I am getting so off topic.."; + jobchange 8;// Job: Job_Priest + close; + + LWizard: + if(class !=2) goto LNotMage; + goto LWiz2; + + LNotMage: + mes "[ ^0065DFJobra^000000 ]"; + mes "I bet you've never cast a spell in your life.. go away >_>..."; + close; + + LWiz2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Weeee, doesn't it feel great to finally become a Wizard? It's like a warm bath.... ahhhhhhh......"; + jobchange 9;// Job: Job_Wizard + close; + +LSecondClass2: + if(SkillPoint != 0) goto Lskillpt; + if(joblevel<40) goto Ljobforty; + if(sex==0) goto LFsecond2; + if(sex==1) goto LMsecond2; + +LFsecond2: +mes "[ ^0065DFJobra^000000 ]"; +mes "Wow, your ready to become second job already?!"; +next; +mes "[ ^0065DFJobra^000000 ]"; +mes "Very well then, what would you like to be?"; +menu "Crusader",LCrusader,"Sage",LSage,"Dancer",LDancer,"Alchemist",LAlchemist,"Rogue",LRogue,"Monk",LMonk,"Cancel",LCancel; + +LMsecond2: +mes "[ ^0065DFJobra^000000 ]"; +mes "Wow, your ready to become second job already?!"; +next; +mes "[ ^0065DFJobra^000000 ]"; +mes "Very well then, what would you like to be?"; +menu "Crusader",LCrusader,"Sage",LSage,"Bard",LBard,"Alchemist",LAlchemist,"Rogue",LRogue,"Monk",LMonk,"Cancel",LCancel; + + LCrusader: + if(class !=1) goto LNotSword2; + goto LCrus2; + + LNotSword2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nuh-uh... you ain't no Swordman! Get out of here! Scat!"; + mes ".......Everybody can't be a Crusader."; + close; + + LCrus2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Mmmmm, I always liked Crusaders.. their Broad Shoulders always turned me on...."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Oooo~~~ yeah, thats it... yummy..."; + jobchange 14;// Job: Job_Crusader + close; + + + LBard: + if(class !=3) goto LNotArch3; + goto LBard2; + + LNotArch3: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nope.. you got it wrong bub.. you gotta be an ARCHER before becoming a Bard.."; + mes "Silly players.. just don't know when to stop..."; + close; + + LBard2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Yay! Go play some ballads for some Dancers or something, I just can't stand your clothes... ewww."; + jobchange 19;// Job: Job_Bard + close; + + LDancer: + if(class !=3) goto LNotArch2; + goto LDanc2; + + LNotArch2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nope.. you got it wrong girl.. you gotta be an ARCHER before becoming a Dancer.."; + mes "Silly players.. just don't know when to stop..."; + close; + + LDanc2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Uh-huh, swivel those hips girl ^_~ Dancers are sooo sexy.. too bad I'm stuck in this ugly Kafra dress.. blah, if only I could strip down to a little thong too... *sigh*"; + jobchange 20;// Job: Job_Dancer + close; + + LAlchemist: + mes "[ ^0065DFJobra^000000 ]"; + if(class !=5) goto LNotMerc2; + goto LAlch2; + + LNotMerc2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ummm... no, you gotta be a Merchant first..."; + close; + + LAlch2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Cool! Go make some potions! Open a Pharmacy! yeah yeah yeah! ^_^"; + jobchange 18;// Job: Job_Alchem + close; + + LRogue: + if(class !=6) goto LNotThief2; + goto LRogue2; + + LNotThief2: + mes "[ Second Master ]"; + mes "Look... you gotta be a THIEF before becoming a Rogue.."; + mes "I know you think they are really cool.. but NO is NO!"; + close; + + LRogue2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Wow! ^_^ You.. are.. SOOOOO COOOL!! KYAAHH XD!! *drools*"; + jobchange 17;// Job: Job_Rogue + close; + + LMonk: + if(class !=4) goto LNotAco2; + goto LMonk2; + + LNotAco2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Go read a Bible.. you're not an Acolyte.. and guess what?"; + mes "YOU GOTTA BE A ACO BEFORE BECOMING A MONK!!! >_<"; + close; + + LMonk2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nice.... Monks are pretty darn cool!"; + jobchange 15;// Job: Job_Monk + close; + + LSage: + if(class !=2) goto LNotMage2; + goto LSage2; + + LNotMage2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Other jobs except `Mage' are not permitted to be Sages."; + close; + + LSage2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ahhhh, soo cool! I'll never get tired of seeing people turn into those new 2-2 sprites.. KYAHH XD!!"; + mes "Go forth Sage! Show those wizzies what a real mana-wielder can do! Mwahaha..."; + jobchange 16;// Job: Job_Sage + close; +LFirstClass1: + if(class !=4001) goto Lnovice3; + if(joblevel<10) goto Ljobten; + if(SkillPoint != 0) goto Lskillpt; + mes "[ ^0065DFJobra^000000 ]"; + mes "So... getting your first advance job, eh? Thats cool, we all need to advance sometimes I guess..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Pick a job, any advance job! Bwahaha........."; + menu "Swordsman High",LSword2,"Mage High",LMage2,"Thief High",LThief2,"Merchant High",LMerc2,"Acolyte High",LAco2,"Archer High",LArch2,"Cancel",LCancel; + +Lnovice3: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ummmm, excuse me... o.O..."; + mes "You don't LOOK like a novice high..."; + mes "Hey! You're no novice high! Get away, punk! *rolls eyes*"; + mes "Only NOVICE HIGHS can change into the First Advance Job... jeeze."; + cutin "kafra_01",255; + close; + +LSword2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Wow, fantastic! Doesn't all that hard work feel like its paid off? *kekeke* I see the ^B70004BLOOD of Porings^000000 on your hands! You truly are fit for the ^0005CESwordsman^000000 job! ^_^"; + cutin "kafra_01",255; + jobchange 25;// Job: Job_Swordman_High + close; + +LMage2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nice, now you can finally wield the power of ^2200DFM^7600F9A^AF00FBN^DA00DFA^000000, your spiritual energy!!!"; + cutin "kafra_01",255; + jobchange 26;// Job: Job_Mage_High + close; + +LThief2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Those devious hand of yours really look like they need to grab something (no comment)..... go forth and steal!!"; + cutin "kafra_01",255; + jobchange 30;// Job: Job_Thief_High + close; + +LMerc2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Oh yeah, Mr. Moneybags, SOMEBODY here just loves the sound of coins jinglin'..."; + mes "Well its not me!.. >_>..... <_<... bah.. "; + cutin "kafra_01",255; + jobchange 29;// Job: Job_Merchant_High + close; + +LAco2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Yay.. go read a Bible.. or whatever.. er..yeah"; + cutin "kafra_01",255; + jobchange 28;// Job: Job_Acolyte_High + close; + +LArch2: + mes "[ ^0065DFJobra^000000 ]"; + mes "I used to poke things with a stick when I was a child.."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "I guess you're like me! You hurl pointed sticks at things! Kekeke..."; + cutin "kafra_01",255; + jobchange 27;// Job: Job_Archer_High + close; +LASecondClass: + if(SkillPoint != 0) goto Lskillpt; + if(joblevel<40) goto Ljobforty2; + mes "[ ^0065DFJobra^000000 ]"; + mes "Nice... you are ready to change into the Second Advance Job! Things get really fun after this!"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "What would you like to be? (Please be the preliminary job)"; + menu "Lord Knight",L_LordKnight,"High Wizard",LHighWizard,"Sniper",LSniper,"Whitesmith",LWhitesmith,"Assassin Cross",LAssassinCross,"High Priest",LHighPriest,"Cancel",LCancel; + +L_LordKnight: + if(class !=4002) goto LNotSwordHigh; + goto L_LordKnight2; + +LNotSwordHigh: + mes "[ ^0065DFJobra^000000 ]"; + mes "Well... you see, there's a little, teensy-weensy problem with YOU becoming a Lord Knight."; + mes "Please be a Swordman High before even thinking about 'magically' turning into a Lord Knight... jeeze. *rolls eyes*"; + cutin "kafra_01",255; + close; + +L_LordKnight2: + mes "[ ^0065DFJobra^000000 ]"; + mes "w00t w00t! You are Job Level 40, you've been a Swordie High all your life..."; + mes "Alrite, you are ready to become the doer of Justice, the embodiment of Heroism, the very soul and life of Valor! "; + mes "..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Yes! You are ready to become... a Lord Knight! "; + mes "Go save a Damsel in Distress or something.."; + cutin "kafra_01",255; + jobchange 31;// Job: Job_Lord_Knight + close; + + +LSniper: + if(class !=4004) goto LNotArcherHigh; + goto LSniper2; + +LNotArchHigh: + mes "[ ^0065DFJobra^000000 ]"; + mes "Guess what? ^_^"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "YOU'RE NOT AN ARCHER HIGH >_<...."; + mes "WTF?! Do you really think you can magically turn into a Sniper!? I DONT THINK SO BIYATCH!!! >8-(..."; + mes "Go away! *grumble grumble*"; + cutin "kafra_01",255; + close; + +LSniper2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Oh goodie, you've met all the requirements... did you have fun hurling pointed sticks at monsters? Well guess what?"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Now you can hurl pointed sticks at monsters AND keep them in one place! w00t, yea! Traps are a great thing..."; + jobchange 35;// Job: Job_Sniper + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "You know what... since I'm just soooo nice... (as long as you dont piss me off *grumble grumble*)"; + mes "I'm gonna give you a complimentary falcon! Use it well! Oh.. and you might wanna wear a hat, this falcon sometimes, uh... poops.."; + cutin "kafra_01",255; + setfalcon; + close; + +LWhitesmith: + mes "[ ^0065DFJobra^000000 ]"; + if(class !=4006) goto LNotMercHigh; + goto LWhite2; + +LNotMercHigh: + mes "[ ^0065DFJobra^000000 ]"; + mes "No, uh-uh, you are no Merchant! Go away! Only MERCHANTS can change into Blacksmiths!!"; + mes "Its like the cycle of life or something! Stop trying to disrupt the order of the universe >__>... go away.."; + close; + + + LAssassC2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Did you know I used to be a male Assassin? Well, I had a few things done to my hair, got a face lift, some implants here and there..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Oh my, too much information, right? Kekeke, okay, go off and become the most sinister of all Jobs in this world... ^6500BFAssassin..."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Poof! Kekeke... "; + jobchange 36;// Job: Job_Assassin_Cross + close; + +LHighPriest: + if(class !=4005) goto LNotAcoHigh; + goto LHPri2; + +LNotAcoHigh: + mes "[ ^0065DFJobra^000000 ]"; + mes "Okay I'm getting tired of this.. you are NOT an Acolyte... I bet you haven't even read the Bible ONCE! You're going to HELL!"; + close; + +LHPri2: + mes "[ ^0065DFJobra^000000 ]"; + mes "I bet you are GODDAMNED TIRED of NOT having Sp Recovery, right? Well I am tired of hearing little Jesus-Hugging Acolytes scream this every time they're low on Sp... "; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Yay! You've now reached Priesthood! It's sorta like Manhood.. but not really, see with Manhood, you get this little thingy between your legs.. WHOOPs, I am getting so off topic.."; + jobchange 32;// Job: Job_High_Priest + close; + +LHighWizard: + if(class !=4003) goto LNotMageH; + goto LHWiz2; + +LNotMageH: + mes "[ ^0065DFJobra^000000 ]"; + mes "I bet you've never cast a spell in your life.. go away >_>..."; + close; + +LHWiz2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Weeee, doesn't it feel great to finally become a Wizard? It's like a warm bath.... ahhhhhhh......"; + jobchange 33;// Job: Job_High_Wizard + close; +LASecondClass2: + if(SkillPoint != 0) goto Lskillpt; + if(joblevel<40) goto Ljobforty2; + if(sex==0) goto LAFsecond2; + if(sex==1) goto LAMsecond2; + +LAFsecond2: +mes "[ ^0065DFJobra^000000 ]"; +mes "Wow, your ready to become second advance alternate job already?!"; +next; +mes "[ ^0065DFJobra^000000 ]"; +mes "Very well then, what would you like to be?"; +menu "Paladin",LPaladin,"Professor",LProfessor,"Gypsy",LGypsy,"Creator",LCreator,"Stalker",LStalker,"Champion",LChampion,"Cancel",LCancel; + +LAMsecond2: +mes "[ ^0065DFJobra^000000 ]"; +mes "Wow, your ready to become second advance alternate job already?!"; +next; +mes "[ ^0065DFJobra^000000 ]"; +mes "Very well then, what would you like to be?"; +menu "Paladin",LPaladin,"Professor",LProfessor,"Clown",LClown,"Creator",LCreator,"Stalker",LStalker,"Champion",LChampion,"Cancel",LCancel; + +LPaladin: + if(class !=4002) goto LNotSword3; + goto LPaladin2; + +LNotSword3: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nuh-uh... you ain't no Swordman! Get out of here! Scat!"; + mes ".......Everybody can't be a holy servant of God."; + close; + +LPaladin2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Mmmmm, I always liked Crusaders.. their Broad Shoulders always turned me on...."; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "Go Forth On Your Mission To Serve God"; + mes "This Mission is Free of Charge"; + next; + mes "[ ^0065DFJobra^000000 ]"; + mes "That means your not getting paid dumbass (/gg)"; + jobchange 38;// Job: Job_Paladin + close; + + +LClown: + if(class !=4004) goto LNotArch4; + goto LBard2; + +LNotArch4: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nope.. you got it wrong bub.. you gotta be an ARCHER before becoming a Bard.."; + mes "Silly players.. just don't know when to stop..."; + close; + +LClown2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Yay! Go play some ballads for some Dancers or something, I just can't stand your clothes... ewww."; + jobchange 43;// Job: Job_Clown + close; + +LGypsy: + if(class !=4004) goto LNotArch5; + goto LGypsy2; + + LNotArch5: + mes "[ ^0065DFJobra^000000 ]"; + mes "Nope.. you got it wrong girl.. you gotta be an ARCHER HIGH before becoming a Gypsy.."; + mes "Silly players.. just don't know when to stop..."; + close; + +LGypsy2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Uh-huh, swivel those hips girl ^_~ Gypsies are sooo sexy.. too bad I'm stuck in this ugly Kafra dress.. blah, if only I could strip down to a little thong too... *sigh*"; + jobchange 44;// Job: Job_Gypsy + close; + +LCreator: + mes "[ ^0065DFJobra^000000 ]"; + if(class !=4006) goto LNotMerc5; + goto LCre2; + +LNotMerc5: + mes "[ ^0065DFJobra^000000 ]"; + mes "Ummm... no, you gotta be a Merchant High first..."; + close; + +L:Cre2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Cool! Go make some potions! Open a Pharmacy! yeah yeah yeah! ^_^"; + jobchange 42;// Job: Job_Creator + close; + +LStalker: + if(class !=4007) goto LNotThiefH2; + goto LStalker2; + +LNotThiefH2: + mes "[ Second Master ]"; + mes "Look... you gotta be a THIEF HIGH before becoming a Stalker.."; + mes "I know you think they are really cool.. but NO is NO!"; + close; + +LStalker2: + mes "[ ^0065DFJobra^000000 ]"; + mes "How goes the stalking lately?"; + mes "Found Any New Victims?"; + jobchange 41;// Job: Job_Stalker + close; + +LChampion: + if(class !=4005) goto LNotAco2; + goto LChamp2; + +LNotAcoH2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Go read a Bible.. you're not an Acolyte High.. and guess what?"; + mes "YOU GOTTA BE A ACO BEFORE BECOMING A MONK!!! >_<"; + close; + +LChamp2: + mes "[ ^0065DFJobra^000000 ]"; + mes "You are the Champion of the Weak and Poor."; + mes "Wow it must suck being you ^_^!!!"; + jobchange 39;// Job: Job_Champion + close; + +LProfessor: + if(class !=4003) goto LNotMageH2; + goto LSage2; + +LNotMageH2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Other jobs except `Mage Highs' are not permitted to be Professors."; + close; + +LProfessor2: + mes "[ ^0065DFJobra^000000 ]"; + mes "Time for you to teach your first quantum physics class"; + jobchange 40;// Job: Job_Professor + next; + mes "OMG YOUR MY COLLEGE PROFESSOR"; + mes ".... Well Not Really But You Sure DO LOOK like him"; + close; + +Lskillpt: + mes "[ ^0065DFJobra^000000 ]"; + mes "Please use up all your skill points before changing into the next job! ^_^"; + cutin "kafra_01",255; + close; + +Ljobforty2: + mes "[ ^0065DFJobra^000000 ]"; + mes "You must be at least Job Level 40 before even thinking about changing into the Second Advance Job."; + cutin "kafra_01",255; + close; + +LCancel: + mes "[ ^0065DFJobra^000000 ]"; + mes "Blah.. be that way.. >_>.."; + cutin "kafra_01",255; + close; +} diff --git a/npc/jobs/custom/reset.txt b/npc/jobs/custom/reset.txt new file mode 100644 index 000000000..5caaf6ad2 --- /dev/null +++ b/npc/jobs/custom/reset.txt @@ -0,0 +1,40 @@ +//Reset NPC for Athena by Script&DB Team +prontera.gat,150,193,4 script Reset Girl 124,{ + mes "[Reset Girl]"; + mes "I am a Reset Girl."; + mes "Reset Stats: 5,000z"; + mes "Reset Skills: 5,000z"; + mes "Reset Both: 9,000z"; + next; + mes "Please select the service you want:"; + menu "^FF3355Reset Skills",L0,"Reset Stats",L1,"Reset Both^000000",L2,"Quit",LEnd; + + L0: + mes "[Reset Girl]"; + if (Zeny < 5000) goto NeedZenys; + mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!"; + set Zeny,zeny-5000; + ResetSkill; + close; + L1: + mes "[Reset Girl]"; + if (Zeny < 5000) goto NeedZenys; + mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!"; + set Zeny,zeny-5000; + ResetStatus; + close; + L2: + mes "[Reset Girl]"; + if (Zeny < 9000) goto NeedZenys; + mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!"; + set Zeny,zeny-9000; + ResetSkill; + ResetStatus; + close; + + NeedZenys: + mes "Sorry, you don't have enough Zeny."; + close; + LEnd: + close; +} \ No newline at end of file diff --git a/npc/jobs/novice/novice.txt b/npc/jobs/novice/novice.txt new file mode 100644 index 000000000..4710d6cda --- /dev/null +++ b/npc/jobs/novice/novice.txt @@ -0,0 +1,2338 @@ +//===== eAthena Script ======================================= +//= Novice Training Grounds +//===== By: ================================================== +//= eAthena Dev Team (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + +//-------------------------------------------------------------- +//------------------ EXPLANATION OF VARIABLES ------------------ +// Permanent variables: +// before first course: +// - nov_get_item01: flag to know if Usher had given 150 z +// in first course: +// - nov_1_2_cos_c: to know first course advancement +// - nov_1st_cos: to know number of right/correct answers with Leo Von Frisch +// - Done_milk: to know if milk has been given by the Newbie Instructor +// in third course: +// - set nov_1_4_cos_c: to know third course advancement (to avoid to repeat question) +// - nov_3_merchant: count the number of answers to become merchant +// - nov_3_swordman: count the number of answers to become swordman +// - nov_3_archer: count the number of answers to become archer +// - nov_3_thief: count the number of answers to become thief +// - nov_3_magician: count the number of answers to become magician +// - nov_3_acolyte: count the number of answers to become acolyte + + +// == MONSTERS == +//Spawn is included in this file so make shure its not elsewhere to! +new_1-3.gat,0,0,0,0 monster FABRE 1184,50,0,0,0 + + +// == NPCs == +// -- Board -- +new_1-1.gat,66,114,1 script Bulletin Board 111,{ + mes "^FF0000=================================^000000"; + mes "^FF0000 == ^E40CAA[Welcome] ^CC0000to^FF9000Training ^0000FFGround ^FF0000==^000000"; + mes "^FF0000=================================^000000"; + close; +} + +// -- Guards -- +new_1-1.gat,117,107,2 script Guard 105,{ + set @TEMP,rand(2); + if (@TEMP !=0) goto L0; + mes "[Guard]"; + mes "Go! Newbie! Go! You will see a New sun tomorrow!"; + close; + + L0: + mes "[Guard]"; + mes "Come in! Welcome to the Real world!"; + mes "We are trying to do our best to support newbies like you!"; + close; +} + +new_1-1.gat,117,116,2 script Guard 105,{ + mes "[Guard]"; + mes "Welcome~ Now, you're in Training Ground~"; + mes "Please go inside the Castle."; + close; +} + +// -- Chief -- +new_1-1.gat,157,124,3 script Training Ground Chief 56,{ + mes "[Training Ground Chief]"; + mes "Umm...? Aren't you a Freshman? You have a lot of guts to dare to come up."; + mes "Didn't that Guide stop you?"; + next; + menu "He did, but I didn't listen to him.",Lyes,"Nope, he didn't.",Lno; + + Lyes: + mes "[Training Ground Chief]"; + mes "He did? And you came up without any timidity!?"; + mes "Giggle... giggle..."; + mes "Muhahahahaha!"; + next; + mes "[Training Ground Chief]"; + mes "Wow man! You are really something, huh?"; + mes "Well... Rune-Midgard wants brave man like you. I expect you will be the most efficient man for Ragnarok. Do your best."; + close; + Lno: + mes "[Training Ground Chief]"; + mes "What...? He didn't? Hmm... I need to improve the moral fiber. Even though the World is in Great fear..."; + next; + mes "[Training Ground Chief]"; + mes "Go downstairs. Don't disturb me. I need time to think of."; + close; +} + +// -- Usher -- +// nov_get_item01: flag to know if Usher had given 150 z. +// 0: not given +// 1: given +new_1-2.gat,100,29,4 script Usher 86,{ + mes "[Usher]"; + mes "Welcome to the ^FF0000Training Ground^000000 ."; + mes "Please choose ^0099FFIntroduction^000000 first if you need to check detailed information about Training Ground."; + Lmenu: + next; + menu "Sign Up on the Training Ground.",Lsign,"Direct Access to Ragnarok.",Ldirect,"^0099FFIntroduction.^000000",Lintro,"Cancel.",Lcancel; + + Lsign: + mes "[Usher]"; + mes "Registration has been confirmed."; + mes "Please inquire at each Guide on the course when you need."; + next; + if (nov_get_item01 == 1) goto Lsign1; + + set nov_get_item01,1; + set Zeny,Zeny+150; + mes "[Usher]"; + mes "Training Subsidy 150 Zeny supplied. Please inquire at a Guide on the Center when you need to know your Current Progress."; + mes "I will lead you into the Hall."; + next; + + Lsign1: + set nov_get_item01,0; + warp "new_1-2",100,70; + close; + + Ldirect: + mes "[Usher]"; + mes "I see."; + mes "Hopefully you will contribute to public wellfare in near future, good luck."; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + set @TEMP,rand(6); + + if (@TEMP !=0) goto Ldirect0; + savepoint "prontera.gat",273,354; + warp "prontera.gat",273,354; + close; + Ldirect0: + if (@TEMP !=1) goto Ldirect1; + savepoint "morocc.gat",160,94; + warp "morocc.gat",160,94; + close; + Ldirect1: + if (@TEMP !=2) goto Ldirect2; + savepoint "geffen.gat",120,100; + warp "geffen.gat",120,100; + close; + Ldirect2: + if (@TEMP !=3) goto Ldirect3; + savepoint "payon.gat",87,117; + warp "payon.gat",87,117; + close; + Ldirect3: + if (@TEMP !=4) goto Ldirect4; + savepoint "alberta.gat",116,57; + warp "alberta.gat",116,57; + close; + Ldirect4: + savepoint "izlude.gat",94,103; + warp "izlude.gat",94,103; + close; + + Lintro: + mes "[Usher]"; + mes "The Training Grounds were founded to support New Players of Ragnarok Online,"; + mes "under the Auspices of the Ministry of Education in Rune Midgard Kingdom."; + next; + mes "[Usher]"; + mes "We guide you on to adapt the Mechanics of Ragnarok at ease, also we recommend the Best profession for your personality through the Typology Test."; + next; + mes "[Usher]"; + mes "You can train yourself with 3 courses in here."; + next; + mes "[Usher]"; + mes "You can learn entire theoretical information in the First Course."; + next; + mes "[Usher]"; + mes "You will practice on the Actual spot in Fabres Field, the Second Course. Please do everything as you can do before jumping into the Real Ragnarok World."; + next; + mes "[Usher]"; + mes "The Third course is the Typology Test. You will figure out the best job for you with this test."; + mes "You just answer the most suited answer when the course master asks you."; + next; + mes "[Usher]"; + mes "When you finish whole courses, we'll inform you the result and recommend the Job for you."; + mes "Also if you accept our recommendation, we will tender you with small subsidy and let you begin in the specfic town for that Job."; + mes "For example, when the result comes 'Archer', you will start in 'Payon'."; + next; + mes "[Usher]"; + mes "If you want to apply on the Training Ground, Please choose 'Sign Up on the Training Ground'."; + mes "if you not, choose 'Direct Access to Ragnarok'."; + goto Lmenu; + + Lcancel: + mes "[Usher]"; + mes "Take your time."; + close; +} + + +// == FIRST COURSE == +// nov_1_2_cos_c: to know first course advancement +// 0: newbie. Have not begin to speak (must speak to Leo Von Frish). +// 1: Question 1 Leo Von Frisch done +// 2: Question 2 Leo Von Frisch done +// 3: Question 3 Leo Von Frisch done +// 4: Question 4 Leo Von Frisch done +// 5: Question 5 Leo Von Frisch done +// 6: Question 6 Leo Von Frisch done +// 7: Question 7 Leo Von Frisch done +// 8: 'NPC Guide' Master done. +// 9: 'Manner Master' done. Must register for Fabres forest. +// 10: Register for Fabres forest. Must begin 2nd Course 1th test +// 11: have been at least once in the Fabres forest. +// nov_1st_cos: to know number of right/correct answers with Leo Von Frisch + +// Done_milk: to know if milk has been given by the Newbie Instructor +// 0: not speak to Newbie Instructor (or at Fabres forest or more) +// 1: speak to Newbie Instructor + +// -- Instructor -- +new_1-2.gat,81,110,4 script Newbie Instructor 84,{ + if (Done_milk==0) goto Lyes; + + mes "[Newbie Instructor]"; + mes "Do you want listen me again?"; + next; + menu "Yes!",Lyes,"No, not again.",Lno; + + Lno: + mes "[Newbie Instructor]"; + mes "Move along to the next course!"; + close; + + Lyes: + mes "[Newbie Instructor]"; + mes "Ho? A Rookie? So, are you gonna get some education from Sir Leo Von Frisch?"; + mes "Well ~ I must say he is sort of restless person, so that he tends to skip important issues while training."; + mes "I am afraid to say you need aditional education besides his lecture... Alright! I will give you a favour, buddy!"; + next; + mes "[Newbie Instructor]"; + mes "First off all you need to realise yourself. Your Chracter, the avatar of yourself inside the game has various distictive quality."; + mes "Level, EXPerience points, Status et cetera et cetera... many facts gather and construct your character."; + mes "Now let's take a look on character Status."; + next; + mes "[Newbie Instructor]"; + mes "^FF0000STR (Strength)^000000"; + mes "- Increase hit point and maximum weight."; + mes "^FF0000AGI (Agility)^000000"; + mes "- Increase flee rate and attack speed."; + mes "^FF0000VIT (Vitality)^000000"; + mes "- Increase defence, maximum health point and HP recovering amount."; + next; + mes "[Newbie Instructor]"; + mes "^FF0000INT (intelligence)^000000"; + mes "- Increase magic attack and magic defence."; + mes "^FF0000DEX (Dexterity)^000000"; + mes "- Increase hitting accuracy and weapon damage."; + mes "^FF0000LUK (Luck)^000000"; + mes "- Affect on various parts."; + next; + mes "[Newbie Instructor]"; + mes "You must keep Status abilities in mind before everything."; + next; + mes "[Newbie Instructor]"; + mes "When right-clicking on the 'status' button, you will see 'Status window' which shows current condition of a character. Shortcut is 'Alt + A'."; + mes "When you bring a cursor on each status, you can see the real meaning of it."; + mes "You will gain some points everytime Base Level is up, you can freely distribute them into ^FF00006 status^000000."; + next; + mes "[Newbie Instructor]"; + mes "The boxes next to each stat show the ^FF0000base value of the stat plus any bonuses from equipment. The left box shows the point cost to upgrade the stat by 1^000000."; + mes "When the character levels up, Blue button appears on the bottom of right side of the monitor screen. Click it to open the status window."; + mes "Click the blue Arrow to spend the points you get, ^FF0000You can upgrade stats as you want ^000000."; + next; + mes "[Newbie Instructor]"; + mes "Oh well, 'Tendency' hasn't been implemented yet, let's talk later then."; + next; + mes "[Newbie Instructor]"; + mes "Shall we move onto the next issue?"; + next; + mes "[Newbie Instructor]"; + mes "Right-clicking on a character leads you to see individual menu including Trade command."; + mes "When left-clicking on Trade menu, ^FF0000'Trade window'^000000 pops up. That's the way you can exchange ^FF0000items or zeny, Ragnarok currency^000000 with another character."; + mes "There are 2 different buttons on the bottom of trade window, one is ´OK´ the other is ´Cancel´."; + mes "Press ´OK´ if you are ready or ´Cancel´ if you want to cancel the deal."; + next; + mes "[Newbie Instructor]"; + mes "Let's check the ^FF0000'Chat Window'^000000 on the bottom of game screen, which allows you to chat with others. It is devided into 2 parts, you can enter a ^FF0000character name you want to whisper^000000 at the left part."; + mes "If you click the button beside the left part, you can check all character names who you have already whispered to or you got whispered so far. So you can whisper to the characters without typing their names again."; + mes "At the right part of chat window, you can type the message you want to send. And with the first button beside this part, you can choose chat type as public or private among party members."; + mes "With the last button on the chat window, you can arrange chat window size."; + next; + mes "[Newbie Instructor]"; + mes "The following text tells you more about the 'Character View'."; + mes "When you drag mouse from right to left with the right mouse button held down, the character view rotates (360°)."; + mes "Holding down the 'Ctrl' key and the right mouse button while dragging the mouse up and down, makes the view ^FF0000Zooming in and out toward the character^000000."; + mes "Holding down the 'Shift' key and the right mouse button while dragging the mouse up and down, controls the angle of the view ^FF0000for fixed range^000000."; + next; + mes "[Newbie Instructor]"; + mes "This is the last thing I have to teach you about shorcuts. You will realize how important Shorcuts are if you want to play with efficiency."; + next; + mes "[Newbie Instructor]"; + mes "^FF0000The 'ESC' ^000000key is the function key, it ^0087FFcalls 'Exit to window' command or 'Return to game' command^000000."; + mes "^FF0000 Keys From 'F1' to 'F9'^000000 are shortcut keys for ^0087FFeach item registered on Hot key window^000000."; + mes "^FF0000The Key 'F10'^000000 adjusts ^0087FFthe size of chat window^000000."; + next; + mes "[Newbie Instructor]"; + mes "^FF0000The key 'F11'^000000 clears ^0087FFall windows except basic information window and chatting box^000000."; + mes "^FF0000The key 'F12'^000000 calls ^0087FFHot key window^000000."; + mes "^FF0000The key 'insert' on the keyboard^000000 is the hot key for character's to ^0087FFsit or stand^000000. Also you can type ^0087FF'/sit or /stand'^000000 in the chatting Box."; + next; + mes "[Newbie Instructor]"; + mes "^FF0000The key 'alt+home'^000000 is ^0087FFShorcut for Ground cursor on / off^000000."; + mes "^FF0000The key 'alt+end'^000000 is ^0087FFShorcut for character Health and SKill Point gauge on / off ^000000. You'd better turn it on all the time."; + mes "^FF0000The key 'page up & down'^000000 will scroll ^0087FFText in interfaces and the chatting box, Mouse whirl will also scroll^000000."; + next; + mes "[Newbie Instructor]"; + mes "We have a system called 'Alignment System'."; + mes "When you meet somebody nice or somebody helps you, you can give the person a good point in recognition of services."; + mes "On the contrary, to someone who is ill-mannered or doing evil things on people, you can give the person 2 bad points. Meanwhile you will get 1 bad point for the penalty. This is to prevent abuse of the alignment system."; + next; + mes "[Newbie Instructor]"; + mes "The Alignment system is only available for adult characters over Novice level 8 and can be used once a day."; + mes "I know you don't think this is not important right now, but be careful, it causes you the cumulative effects on your character."; + mes "Somehow I believe nice persons will play fair even without this kind of restriction!"; + next; + if (Done_milk==1) goto AfterMilk; + set Done_milk,1; + getitem 519,1; + goto AfterMilk; + + AfterMilk: + mes "[Newbie Instructor]"; + mes "Well... This is all I can tell you, buddy. Leo Von Frisch will take care of you from now on."; + mes "Do your best, Ok? Ragnarok is a worthwhile game."; + mes "By the way... this is my present for you. I sneaked this from mess hall. Promise me you will do your best, OK?"; + close; +} + +// -- Leo, Quiz Npc -- +new_1-2.gat,84,115,4 script Leo Von Frisch 85,{ + if (nov_1_2_cos_c<1) goto startL0; + if (nov_1_2_cos_c<7) goto Lcontinue; + if (nov_1_2_cos_c==7) goto LNPCMaster; + if (nov_1_2_cos_c==8) goto LMannerMaster; + + mes "[Leo Von Frisch]"; + mes "Umm? What brings you to me? My time is already over. You have finish the First course..."; + next; + goto Lend; + + LMannerMaster: + mes "[Leo Von Frisch]"; + mes "Umm? What brings you to me? My time is already over. Probably your next course will be to speak to the 'Manner Master'..."; + next; + goto Lend; + + LNPCMaster: + mes "[Leo Von Frisch]"; + mes "Um? What's matter? My class is over. Your next course would be 'NPC Guide'..."; + next; + goto Lend; + + Lend: + mes "Or... Are you willing to attend again?"; + next; + menu "No, Sir! I apologise about my behaviour!",Lendno,"Yes, Sir! I am!",Lendyes; + + Lendno: + mes "[Leo Von Frisch]"; + mes "If you think not enough, come anytime. Dismissed."; + close; + Lendyes: + mes "[Leo Von Frisch]"; + mes "Ok! I love your passionate answer!! Let's begin!"; + next; + goto LQ2; + + Lcontinue: + set nov_1st_cos, 0; + mes "[Leo Von Frisch]"; + mes "Um... Something interrupted my class without reason."; + mes "Anyhow alright. Shall we begin all over again!"; + next; + mes "[Leo Von Frisch]"; + mes "Are you ready!? Answer me!"; + next; + menu "Yes sir!",LcontinueY,"No,I am not ready yet.",Lno; + LcontinueY: + if (nov_1_2_cos_c==1) goto LQ2; + if (nov_1_2_cos_c==2) goto LQ3; + if (nov_1_2_cos_c==3) goto LQ4; + if (nov_1_2_cos_c==4) goto LQ5; + if (nov_1_2_cos_c==5) goto LQ6; + if (nov_1_2_cos_c==6) goto LQ7; + close; + Lno: + mes "[Leo Von Frisch]"; + mes "'Noooo.'?! You said 'Noooo.'! What were you thinking, you rascal! Go get ready to move! Right now!"; + close; + + startL0: + mes "[Leo Von Frisch]"; + mes "Come on! Beginner!! Now You are with an Expert of Ragnarok!!"; + mes "Me! I am God of beginners and I enlighten your pathetic souls from the Darkened World."; + mes "Besides I am a Tutor and an itelligence Officer in the 4th Chivarly of Prontera!"; + mes "You can call me Sir Leo Von Frisch, got that clear?"; + next; + mes "[Leo Von Frisch]"; + mes "Are you ready!? Answer me!"; + next; + menu "Yes sir!",Lyes,"No, I am not ready yet.",Lno; + + Lyes: + mes "[Leo Von Frisch]"; + mes "Well Done! Ok, Let's begin!! The first chapter is 'Let's Start Ragnarok'!"; + next; + mes "[Leo Von Frisch]"; + mes "Ah~ I almost forgot to question you something."; + mes "What is the best introduction for 'Ragnarok'?"; + next; + menu "War among human beings",LQ1_1,"War between human beings and monsters",LQ1_2,"World that humans have taken over",LQ1_3,"World humans have coexisted with monsters",LQ1_4; + + LQ1_1: + set nov_1_2_cos_c,1; + mes "[Leo Von Frisch]"; + mes "Umm... Be cooperate with other people. The world will be end without nothing."; + mes "Answer is ^FF0000War between human beings and monsters^000000."; + next; + mes "[Leo Von Frisch]"; + mes "I will keep surprising you with unexpectable questions, concentrate on my lesson."; + mes "I meant you, dumbhead, alright?"; + mes "Let's carry on."; + next; + goto LQ2; + LQ1_2: + getitem 513,1; + set nov_1st_cos, nov_1st_cos+1; + set nov_1_2_cos_c,1; + mes "[Leo Von Frisch]"; + mes "Yes, that's right. You know well. We are fighting with evil creatures. In most of MMORPG games, they are known as Monsters or commonly just called as Mob."; + next; + mes "[Leo Von Frisch]"; + mes "I will keep surprising you with unexpectable questions, concentrate on my lesson."; + mes "I meant you, dumbhead, alright?"; + mes "Let's carry on."; + next; + goto LQ2; + LQ1_3: + set nov_1_2_cos_c,1; + mes "[Leo Von Frisch]"; + mes "...What the bloody hell are you saying? Why would humans torment creatures for?"; + mes "Answer is ^FF0000War between human beings and monsters^000000."; + next; + mes "[Leo Von Frisch]"; + mes "I will keep surprising you with unexpectable questions, concentrate on my lesson."; + mes "I meant you, dumbhead, alright?"; + mes "Let's carry on."; + next; + goto LQ2; + LQ1_4: + set nov_1_2_cos_c,1; + mes "[Leo Von Frisch]"; + mes "Oh well... I fully understand your pursue ideal world... Not now, not now."; + mes "Answer is ^FF0000War between human beings and monsters^000000."; + next; + mes "[Leo Von Frisch]"; + mes "I will keep surprising you with unexpectable questions, concentrate on my lesson."; + mes "I meant you, dumbhead, alright?"; + mes "Let's carry on."; + next; + goto LQ2; + + LQ2: + mes "[Leo Von Frisch]"; + mes "When you click the shortcut for Ragnarok, it will be automatically connected to patch server, which enables you to continually update game articles. MMORPG game keeps being developed to improve its quality."; + mes "In the meantime, you can check ^FF0000the Notice^000000 on the patch window."; + mes "Read that notice if you don't want to miss any game event or update articles."; + next; + mes "[Leo Von Frisch]"; + mes "You can coose between one or more servers."; + mes "After choosing one of game servers, you can make a character."; + mes "3 empty slots or more for character are given to you on the first place, you can have 3 kinds of different characters."; + mes "For character appearance, you can choose a favourable hairstyle from a lot of kinds and from some kinds of hair colour. In near future, we will introduce more hair colour and clothings."; + next; + mes "[Leo Von Frisch]"; + mes "Double Click an empty slot and you can make your character."; + mes "^FF0000You can arrange beginning Stats of your character. With that, Your character could be the best for job you wish for.^000000."; + mes "So You should consider beginning Stats as well fitting for the job you want your character to be in the future."; + next; + if (nov_1_2_cos_c>1) goto LQ3; + mes "[Leo Von Frisch]"; + mes "I give you one easy question!"; + mes "What is the wrong description for each Stat? You should choose WRONG one not right one!!"; + next; + menu "STR - Increase hit point and maximum weight.",LQ2_1,"AGI - Increase flee rate and attack speed.",LQ2_2,"DEX - Increase accuracy and magic defence.",LQ2_3,"INT - Increase magic attack/defence.",LQ2_4; + + LQ2_1: + set nov_1_2_cos_c,2; + mes "That's wrong!"; + mes "'DEX - Increase accuracy and magic defence.' is not correct, it should be:"; + mes "^FF0000'DEX - Increase accuracy and weapon damage.'^000000."; + next; + goto LQ3; + LQ2_2: + set nov_1_2_cos_c,2; + mes "That's wrong!"; + mes "'DEX - Increase accuracy and magic defence.' is not correct, it should be:"; + mes "^FF0000'DEX - Increase accuracy and weapon damage.'^000000."; + next; + goto LQ3; + LQ2_3: + getitem 513,1; + set nov_1st_cos, nov_1st_cos+1; + set nov_1_2_cos_c,2; + mes "[Leo Von Frisch]"; + mes "Alright! You got it."; + mes "It is not 'DEX - Increase accuracy and magic defence.', correct description is:"; + mes "^FF0000'DEX - Increase accuracy and weapon damage.'^000000."; + mes "This is reward. Take it."; + next; + goto LQ3; + LQ2_4: + set nov_1_2_cos_c,2; + mes "That's wrong!"; + mes "'DEX - Increase accuracy and magic defence.' is not correct, it should be:"; + mes "^FF0000'DEX - Increase accuracy and weapon damage.'^000000."; + next; + goto LQ3; + + LQ3: + mes "[Leo Von Frisch]"; + mes "Let's go on."; + next; + mes "[Leo Von Frisch]"; + mes "Let's move on to 'Basic Interface'."; + mes "Alright, check 'Basic Information window' on the upper-left side of your screen. You can see full screen of it with ^FF0000Double Click^000000, when it's shown as the smallest one."; + next; + mes "[Leo Von Frisch]"; + mes "'Basic Information Window shows ^FF0000Every Fundamental Functions^000000. Also, you can click the specific function windows with the pertinent button ."; + next; + mes "[Leo Von Frisch]"; + mes "^FF0000'Base Lv'^000000 is the level of character. ^FF0000'Job Lv'^000000 Specializes the Character, it allows a character to learn a skill with ^FF0000Skill Point^000000 everytime at levelup."; + mes "Let's spare skill point part for later."; + mes "The Gauge bar beside each level is shown how much % of EXP Point you've gained for a next levelup. When it goes into 100% you will raise one level up, this bar will reset into 0 for a next turn."; + next; + mes "[Leo Von Frisch]"; + mes "Weight shows 'Current Belongings/Maximum Belongings'. When a player possesses things more than a half, it will shown in ^FF0000Red Colour^000000."; + mes "From this moment, this player ^FF0000cannot regenerate HP, SP naturally^000000. Furthermore when its amount is over than 90%, ^FF0000a player cannot Fight.^000000"; + next; + mes "[Leo Von Frisch]"; + mes "If you don't want to be murdered due to your stupidity, lighten your weight as you can."; + mes "You can use Kafra Wearhouse to store items. And it will cost you the different local fee from 35 Zeny to 50 Zeny."; + next; + if (nov_1_2_cos_c>2) goto LQ4; + mes "[Leo Von Frisch]"; + mes "Let's take a break~ Phew..."; + mes "Ah~ I have an idea~ I will give you a 'for-Fun' question."; + next; + mes "[Leo Von Frisch]"; + mes "You... Do you remember who I am?"; + mes "I told you about me before the lesson got started. Now remember? Or you just ignored me as 'Poof~ you are just a nothing but a NPC~'..."; + next; + mes "[Leo Von Frisch]"; + mes "Ah Ah~ I don't want to show off myself but because I am your tutor. I am just curious. By the way this is just '^990000for fun^000000', you know."; + mes "Choose one thing which has nothing to do with me."; + next; + menu "Instructor.",LQ3_1,"An Intelligence Officer in the 4th Chivarly of Prontera.",LQ3_2,"Public Prosecutor.",LQ3_3,"I have no idea.",LQ3_4; + + LQ3_1: + set nov_1_2_cos_c,3; + mes "[Leo Von Frisch]"; + mes "Damn you!... Next!"; + next; + goto LQ4; + LQ3_2: + set nov_1_2_cos_c,3; + mes "[Leo Von Frisch]"; + mes "Damn you!... Next!"; + next; + goto LQ4; + LQ3_3: + mes "[Leo Von Frisch]"; + mes "Fine! I am not a 'Public Prosecutor' but a ^ff0000'Newbie Tutor^000000!"; + next; + getitem 516,3; + set nov_1st_cos, nov_1st_cos+1; + set nov_1_2_cos_c,3; + mes "[Leo Von Frisch]"; + mes "Take this. It is nothing, but I am so pleased that you remembered me in detail. Share with your pals."; + next; + goto LQ4; + LQ3_4: + set nov_1_2_cos_c,3; + mes "[Leo Von Frisch]"; + mes "Damn you!... Next!"; + next; + goto LQ4; + + LQ4: + mes "[Leo Von Frisch]"; + mes "When you click 'Item' button, it shows your inventory. Shortcut is 'Alt + E'."; + mes "Item windows is devided into 3 parts, the equipment you are wearing is not shown on the item window."; + mes "^FF0000Right Click^000000on each item, you can see its description and a picture."; + next; + mes "[Leo Von Frisch]"; + mes "To equip items, ^FF0000it is possible to change equipment by Dragging & Dropping it onto your equipment window, Shorcut is 'ALT+Q'. You can also double click the item ^000000."; + mes "^FF0000You can register 9 items or skills from F1 to F9 in the hotkey window^000000."; + mes "You should have the hot key window open at all time. You can play easier that way."; + next; + mes "[Leo Von Frisch]"; + mes "You can see ^FF0000Present skills^000000when you click 'Skill' button. Shorcut is 'Alt + S'."; + mes "^FF0000Every time the character's job levels up, you get skill points^000000. You will see blue button in the bottom left corner of your monitor screen."; + mes "You can check skill informations ^FF0000by right clicking on each Skill Icon^000000."; + next; + mes "[Leo Von Frisch]"; + mes "Passive skill means ^FF0000You don't have to spend your SP to use it. It is always in effect^000000. The opposite from Active skill."; + mes "Also skills are ^FF0000possible to register on the Hot key window^000000, you can use your favorite skills quickly and easily this way."; + next; + if (nov_1_2_cos_c>3) goto LQ5; + mes "[Leo Von Frisch]"; + mes "One Question for you!"; + mes "How to see each item's description and the picture with the mouse?"; + next; + menu "Double Click",LQ4_1,"Right Click",LQ4_2,"Drag & Drop",LQ4_3; + + LQ4_1: + set nov_1_2_cos_c,4; + mes "[Leo Von Frisch]"; + mes "That's wrong!"; + mes "It is ^FF0000'Right Click'^000000!"; + next; + goto LQ5; + LQ4_2: + getitem 512,1; + set nov_1st_cos, nov_1st_cos+1; + set nov_1_2_cos_c,4; + mes "[Leo Von Frisch]"; + mes "It is ^FF0000'Right Click'^000000! Correct!"; + mes "I will reward you for the correct answer. Take it."; + next; + goto LQ5; + LQ4_3: + set nov_1_2_cos_c,4; + mes "[Leo Von Frisch]"; + mes "That's wrong!"; + mes "It is ^FF0000'Right Click'^000000!"; + next; + goto LQ5; + + LQ5: + mes "[Leo Von Frisch]"; + mes "Ok, Back to the Lesson."; + next; + mes "[Leo Von Frisch]"; + mes "^FF0000At novice level 4 or above, you can make your own chat room with 'Chat' Button^000000. Shorcut is 'Alt + C'."; + mes "You can't move when you are in chatroom, but chatting and item trading are available."; + next; + mes "[Leo Von Frisch]"; + mes "With 'Friend' button, a 'Party' window pops up. You can see all party members and their present location."; + mes "Shorcut is 'Alt + Z'."; + next; + mes "[Leo Von Frisch]"; + mes "Party members being on the same map with you, ^FF0000are shown on the mini-map^000000, Party window is going to be updated."; + mes "So that it will act as messenger function like party members log-in. Also it will be upgraded like G-Freind that can connect between Ragnarok and outside."; + next; + mes "[Leo Von Frisch]"; + mes "With 'Map' button, you can use mini-map in various ways. It can be translucent, opaque and invisible. Also with the +, - button, ^FF0000it is possible to enlarge and reduce its Size^000000. Shorcut is 'Ctrl + Tab'."; + mes "Red spot on the mini-map is the loading point to the next map. Player's location is shown like a white arrow. The direction of the white arrow shows which way the player facing."; + next; + mes "[Leo Von Frisch]"; + mes "The 'Equip' button, ^FF0000opens The window showing the character's equipped items^000000. Shorcut is 'Alt + Q'."; + mes "Each equipped item can be ^FF0000right clicked for description and picture^000000, ^FF0000You can equip and unequip items by dragging and dropping between the equipment and inventory windows^000000."; + mes "Also Every equipment can be registered on the Hot Key window so you can change your weapon easily."; + next; + mes "[Leo Von Frisch]"; + mes "The 'Option' button opens the window that allows you to controll the BGM and Sound Effect and turn on/off them. Shorcut is 'Alt + O'."; + mes "After Feb 2002, you can also select a window skin from self-made skins shared in fansites."; + next; + if (nov_1_2_cos_c>4) goto LQ6; + mes "[Leo Von Frisch]"; + mes "Another Question!"; + mes "Which one is the shortcut for hot key window that hleps you to play easier ?"; + next; + menu "F1",LQ5_1,"F15",LQ5_2,"F16",LQ5_3,"F12",LQ5_4; + + LQ5_1: + set nov_1_2_cos_c,5; + mes "[Leo Von Frisch]"; + mes "That's wrong!"; + mes "The right key is 'F12'"; + next; + goto LQ6; + LQ5_2: + set nov_1_2_cos_c,5; + mes "[Leo Von Frisch]"; + mes "That's wrong!"; + mes "The right key is 'F12'"; + next; + goto LQ6; + LQ5_3: + set nov_1_2_cos_c,5; + mes "[Leo Von Frisch]"; + mes "That's wrong!"; + mes "The right key is 'F12'"; + next; + goto LQ6; + LQ5_4: + getitem 517,1; + set nov_1st_cos, nov_1st_cos+1; + set nov_1_2_cos_c,5; + mes "[Leo Von Frisch]"; + mes "That's right. 'F12' is correct answer."; + mes "This is for you."; + next; + goto LQ6; + + LQ6: + mes "[Leo Von Frisch]"; + mes "OK Let's move on."; + next; + mes "[Leo Von Frisch]"; + mes "The End."; + next; + if (nov_1_2_cos_c>5) goto LQ7; + mes "[Leo Von Frisch]"; + mes "Quiz time!"; + mes "Choose One showing the Right Shortcut for 'Sit' and the Command you type in the Chat Box."; + next; + menu "'insert' - /Sit",LQ6_1,"'page down' - /Sitting",LQ6_2,"'home' - /Sitdown",LQ6_3,"'delete' - /stand",LQ6_4; + + LQ6_1: + getitem 519,1; + set nov_1st_cos, nov_1st_cos+1; + set nov_1_2_cos_c,6; + mes "[Leo Von Frisch]"; + mes "Yeah, correct."; + next; + goto LQ7; + LQ6_2: + set nov_1_2_cos_c,6; + mes "[Leo Von Frisch]"; + mes "Wrong. 'insert' - /Sit is the correct one."; + next; + goto LQ7; + LQ6_3: + set nov_1_2_cos_c,6; + mes "[Leo Von Frisch]"; + mes "Wrong. 'insert' - /Sit is the correct one."; + next; + goto LQ7; + LQ6_4: + set nov_1_2_cos_c,6; + mes "[Leo Von Frisch]"; + mes "Wrong. 'insert' - /Sit is the correct one."; + next; + goto LQ7; + + LQ7: + mes "[Leo Von Frisch]"; + mes "Guys, Thank you for standing my boring class for now. And I am not sure whether you fully understand or not."; + mes "If you can't get it, play by yourself. 'The proof of the pudding is in the eating.', the proverb."; + mes "I hope my class will be helpful to your wretched future in Ragnarok."; + next; + if (nov_1_2_cos_c > 6) goto LFinishAgain; + if (nov_1st_cos > 0) goto nov1stcosCont; + mes "[Leo Von Frisch]"; + mes "By the way... You've missed all answer!!!"; + mes "You are the worst trainee I've ever had. Sigh..."; + next; + goto nov1stcosCont; + + nov1stcosCont: + if (nov_1st_cos < 5) goto nov1stcosCheckL5; + if (nov_1st_cos == 5) goto nov1stcosCheckE5; + if (nov_1st_cos == 6) goto nov1stcosCheckE6; + + nov1stcosCheckL5: + getitem 507,1; + goto nov1stcosContNext; + nov1stcosCheckE5: + getitem 507,2; + goto nov1stcosContNext; + nov1stcosCheckE6: + getitem 507,4; + goto nov1stcosContNext; + + nov1stcosContNext: + set nov_1_2_cos_c,7; + mes "[Leo Von Frisch]"; + mes "I will reward you for the successful lesson. Take it. They will be useful when you have a hard time to fight."; + next; + mes "[Leo Von Frisch]"; + mes "Anyway, Let's call it a day with me, you may go to the 'NPC' master."; + mes "If you can't find him, inquire at the sly dog at the centre"; + close; + + LFinishAgain: + mes "[Leo Von Frisch]"; + mes "Anyway, Let's call it a day with me, you may go to the 'Guide' to know what you must do now."; + mes "If you can't find him, search at the centre of the room."; + close; + +} + +// -- Guide Npc -- +new_1-2.gat,99,156,4 script Guide 105,{ + mes "[Guide]"; + mes "Hey Hey Where are you going? There is nothing for a Newbie like you upstairs."; + mes "Go and take the required trainings!"; + close; +} + +// -- Guide Npc -- +new_1-2.gat,100,113,4 script Guide 97,{ + set @R_SEL_NUM,rand(2); + mes "[Guide]"; + if (@R_SEL_NUM != 0) goto tmp1; + mes "Mumble~Mumble~Life is getting Sick~What a boring Job I have~~ I was stupid enough to choose this Boring and Solitary thing! Ah~"; + goto NMes; + tmp1: + mes "I miss my good-for-nothing day~ Phew~ I should never accepted the Full time job... Eh?!"; + goto NMes; + + NMes: + mes "Hey Buddy~ Want some Help?"; + next; + menu "Current Course State.",-, "Quit.",L0; + + mes "[Guide]"; + mes "Hmm... Let me see..."; + if (nov_1_2_cos_c == 9) goto L00a; + if (nov_1_2_cos_c == 8) goto L00b; + if (nov_1_2_cos_c == 7) goto L00c; + mes "I assure you are at the first place with this empty list of yours. You must go toward the Northwest."; + mes "And meet 'Leo Von Frisch', the odd veteran Knight. He is a little bit boring, but that's ok. If you work out a correct answer to his question, he will give you some Snacks. So concentrate on him, Okay?"; + close; + + L00a: + mes "Ah...? finished the First Course?"; + mes "Then meet the guy over there at the southwest, tell him 'I got the 1st lesson.'. He will lead you to the Second Hall."; + mes "Well done~ Bye Bye~ Take Care, Okay?"; + close; + L00b: + mes "Err...? Didn't you hear the 'NPC Guide' Master's saying? Told you to go to the table right next him. Sigh~ Hurry up~"; + close; + L00c: + mes "Did you attend to 'Sir Leo Von Frisch''s Lesson already? Umm the next is..."; + mes "Go toward next hall at the Southeast, you will see two guys over there."; + mes "Ask either of them~"; + close; + + L0: + mes "[Guide]"; + mes "Alright~ Bye Bye~ Don't comback unless you have no idea~"; + close; +} + +// -- Monster Explaination -- +new_1-2.gat,115,115,4 script Monster Expert 93,{ + mes "[Monster Expert]"; + mes "Hello My name is 'Rane' the Monster Expert in Rune-Midagrd Kingdom."; + mes "I'll explain things about Monsters, Briefly."; + next; + mes "[Monster Expert]"; + mes "You can See 2 types of Monsters, Non-Aggressive One and Hostile One."; + mes "Luckily, there are Non-Aggressive ones around Every City or town so that you don't have to worry about getting assaulted, but in Caves, Dungeons or even the Deep Forest Hostile Monsters are ready to attack you."; + next; + mes "[Monster Expert]"; + mes "Besides, the round and pink monster 'Poring' or 'Thief Bug' tends to swallows items rather than attack."; + mes "So just ignore them even if they walk up to near you. They won't harm you before you attack."; + next; + mes "[Monster Expert]"; + mes "You can see a living statue of the famous 'Poring', a looter, behind me,"; + mes "and another of the little 'Baphomet Jr.', one of the strongest agressiv monster."; + next; + mes "[Monster Expert]"; + mes "And Just run away when you feel danger while fighting. If you go to the distance they won't be able to follow you."; + mes "Good Luck."; + close; +} + +// -- Fake Poring -- +new_1-2.gat,112,120,5 script Statue of Poring 1002,{ + mes "[Living statue of Poring]"; + mes "'Don't touch please.'"; + close; +} + +// -- Fake Bapho Jr. -- +new_1-2.gat,119,120,3 script Statue of Baphomet Jr. 1101,{ + mes "[Living statue of Baphomet Jr.]"; + mes "'Don't touch please.'"; + close; +} + +// -- Fake Kafra -- +new_1-2.gat,158,158,8 script Kafra 117,{ + mes "'Please leave me alone.'"; + close; +} + +// -- Fake Guide -- +new_1-2.gat,161,158,8 script Guide 105,{ + mes "'Please leave me alone.'"; + close; +} + +// -- Npc Explanation -- +new_1-2.gat,160,183,5 script NPC Master 83,{ + if (nov_1_2_cos_c==7) goto Lstart; + if (nov_1_2_cos_c>7) goto nov12coscM7; + + mes "[NPC Master]"; + mes "You are not supposed to be here yet. Attend 'Sir Leo Von Frisch''s Lesson first."; + mes "If you can't find him, go outside this hall, inquire at the Guide on the Centre."; + close; + + nov12coscM7: + mes "[NPC Master]"; + mes "Huh? Why are you here again? I told you everything. Do you want me to do that again?"; + next; + menu "Yeah.",L0,"No not really.",L1; + + L0: + mes "[NPC Master]"; + mes "Alright alrighty. I will repeat for you."; + next; + goto Ltell; + L1: + if (nov_1_2_cos_c>8) goto nov12coscM8; + mes "[NPC Master]"; + mes "Next Course is about 'Various examples of rude mannered players and cheaters'. Go to the right table."; + close; + + nov12coscM8: + mes "[NPC Master]"; + mes "Did you finish the Newbie Class? What am I talking about? Err... You know what I am saying~whatever..."; + close; + + Lstart: + mes "[NPC Master]"; + mes "You said you finished the Newbie Class, didn't you? Then from now on I will give tips about NPCs which serve you in Ragnarok."; + next; + goto Ltell; + + Ltell: + mes "[NPC Master]"; + mes "First, Rune-Midgard Troops which^ff0000 have building locations of each Town^000000."; + next; + mes "[NPC Master]"; + mes "They are standing at ^FF0000the enterance or the centre of Town^000000, if you don't know much about buildings, inquire at them. You won't ever be disappointed."; + next; + mes "[NPC Master]"; + mes "Second, Kafra Wearhouse where you can ^ff0000'Save'^000000and ^ff0000'Store items'^000000 and ^ff0000'Rent a Cart'^000000."; + mes "'Save' means, ^ff0000set your respawn point preparing death while fighting or for the next time ^000000."; + mes "So better save than forget? Kafra Staffs are standing at the similar spots as Rune-Midgard Troops."; + mes "If you don't save at all, you walk a long way and bam~!you die. Then~There is no choice but to walk all the way back again. Doesn't it sound horrible?"; + next; + mes "[NPC Master]"; + mes "And you can store your extra items in 'Kafra Wearhouse'. You can access the Storage wherever Kafra Staffs are located."; + mes "I always think: 'Use storage' Service is the best for Infrastructure among MMORPG world!! Muhahahaha!!!"; + if (nov_1_2_cos_c==7) goto LtellNext; + mes "Heh Heh~ And they are all beautiful girls~ What about their boss...? Is it a she or He? I am curious..."; + goto LtellNext; + + LtellNext: + next; + mes "[NPC Master]"; + mes "Unlike 'Save', 'Use the Storage' requires a small fee. The fee is different in different areas."; + next; + mes "[NPC Master]"; + mes "Last, Those Babes allow you to rent a Cart for the merchant's skill, 'Pushcart'..."; + next; + mes "[NPC Master]"; + mes "Now let's check how they look like. So You will find them easily next time."; + mes "We display figures of them over there. Just take a look before you go the next course."; + next; + if (nov_1_2_cos_c>7) goto LtellM7; + mes "[NPC Master]"; + mes "Those figures... they were supposed to be right beside me first time... For me they felt really spooky... Imagine, Someone behind you without motion... spooky, huh?"; + mes "That's why I moved them over there... And now I can see them in front of my eyes... They feel more spooky now..."; + next; + set nov_1_2_cos_c,8; + goto LtellM7; + + LtellM7: + mes "[NPC Master]"; + mes "Let's call it a day. Next Course is about 'Various examples of rude mannered players and cheaters'. Go to the right table."; + close; +} + +// -- Guide -- +new_1-2.gat,183,183,3 script Guide 95,{ + if (nov_1_2_cos_c==8) goto Lstart; + if (nov_1_2_cos_c>=9) goto Lagain; + mes "[Manner Master]"; + mes "Eh... Ah... Not here not yet... Well... What I mean is... Well... uh..."; + mes "What I mean is... You should attend to ^FF0000Leo Von Frisch's class on beginner help^000000 first..."; + mes "Eh... And after... Speak to 'NPC Master'... uh..."; + close; + + Lstart: + mes "[Manner Master]"; + mes "Greetings~ I am just simple man who will inform you of 'Various examples of Ill-mannered players and cheaters'."; + mes "Shall we begin?"; + next; + goto Ltell; + + Ltell: + mes "[Manner Master]"; + mes "1st, Let's get Started with ^ff0000Examples for Ill-manners and attentions ^000000. Just sit down and take it easy."; + next; + mes "[Manner Master]"; + mes "There are 3 kinds of Rude manners, 'Mob Stealing', 'Looting' and 'Mob Train'. First off I will tell you about 'Mob Stealing'."; + mes "Ah~Before get started, let me tell you about 'Experience Points System in Ragnarok' that is much helpful to your understanding of 'Mob Stealing'. This is very important, Please listen."; + next; + mes "[Manner Master]"; + mes "The player who deals the most damage to the monster, takes the most Experience Points. It is based on the percentage of damage you do. You can get more Experience Points by doing more damages."; + next; + mes "[Manner Master]"; + mes "For example, if the player named 'Kitten the cat' attacks a monster having 100 HP and he does 65 damage on it, 'Kitten the cat' can get 65% of Experience Points from the monster."; + mes "Usually this is the way you get Experience Points from Monsters. But it could be different in some situation."; + next; + mes "[Manner Master]"; + mes "This is a different situation when someone joins in on the attack."; + next; + mes "[Manner Master]"; + mes "First, the previous player 'Kitten the cat' attacks a monster having 100 HP and he does 50 damage, the other player 'Polar bear' attacks that monster and does the same damage."; + next; + mes "[Manner Master]"; + mes "In this situation, 'Kitten the cat' can get double the Experience Points of 'Polar bear'. 'Kitten the cat' gets '66.6%'of the Experience Points, 'Polar bear' gets '33.3%' of the Experience Points."; + mes "Get it? Don't ask me about the remaining '0.1' of the Experience Points.I don't know where it goes~.I am not a director.HeHe~"; + next; + mes "[Manner Master]"; + mes "'Kitten the cat' takes damage from the monster during the fight,"; + mes "'Polar Bear', a stranger to 'Kitten the cat' can get 1/2 of the Experience Points from 'Kitten the cat' without taking any damage."; + mes "That's why we called this '^ff0000Mob Stealing^000000'."; + next; + mes "[Manner Master]"; + mes "Briefely and clearly, 'Mob Stealing' is a behaviour of a player ^970197Who doesn't care about the others^000000."; + mes "And ^970197Just try to take advantage of others^000000 without any self-effort."; + next; + mes "[Manner Master]"; + mes "'Looting' is similar as Mob Stealing. While 'Mob Stealing', when a Player who Never fought picks up items belonging others, it is called '^ff0000Looting^000000'."; + mes "Difference Between 'Mob Stealing' and 'Looting'is 'Experience Points'and 'Item'. Very Simple."; + mes "But, after the Anti-Loot Patch came, The Sistuation has been getting better. And Anti-Loot wll be patched continuously."; + next; + mes "[Manner Master]"; + mes "Let's talk about 'Mob Train'."; + mes "One player starts to attack a bunch of monsters. Those monsters start to follow that player. Because Monster AI is not fully implemented yet."; + mes "The player then walks near other players and either exits the game or uses the thief skill hide. The monsters lose their target and immediately attack the nearlest person."; + next; + mes "[Manner Master]"; + mes "Briefly, 'Mob Train' means attacking a bunch of monsters with a purpose of abusing other players."; + mes "If you want to be infamous in Ragnarokonline, I will suggest you do these things above. But if you do that, you would be the worst enemy to the public. Many players will dislike you."; + next; + mes "[Manner Master]"; + mes "OK the Next topic is 'The Cheaters'."; + mes "The Cheaters are usually called 'Impersonating Server Staffs', 'Scammers', 'Beginer Scammers'."; + mes "Umm... Let's start with 'Server Staff Imposter'."; + next; + mes "[Manner Master]"; + mes "Usually There are Players who pretend to be Management Crews. They ask other players let them know things like userID and Password. They then try to steal players' items and zeny."; + mes "But Management Crews will never ask you for your userID or password. Please remember."; + next; + mes "[Manner Master]"; + mes "And please check out the official board frequently as you can. You can see what is going on clearly."; + next; + mes "[Manner Master]"; + mes "'Scammer' means a merchant player who try to cheat on the price of their items to the other players."; + mes "For example, A Merchant opens a shop with the name 'Weapon price 20,000 zeny', but the actual weapon price in his Shop is 200,000 zeny."; + mes "When you trade with merchants, Please always check the price of item. Here is a tip, Zeny is separated with a comma after every three units.like this:'2,000', '20,000' or '200,000'."; + next; + mes "[Manner Master]"; + mes "Our last one is 'Beginner Scammers'."; + mes "Beginners are especially easy to be cheated. The cheaters tempt you with unavailable items or weapon upgrading."; + next; + mes "[Manner Master]"; + mes "So beginners should refer item descriptions on the website. You can check them in 'Guide' section."; + mes "In addition, In Ragnarokonline Unathorized item Duplication is a Violation of applicable laws. Please remember that."; + next; + mes "[Manner Master]"; + mes "Heh~ It's a lot of informations for you right...? I didn't mean to take so long. Heh Heh..."; + mes "Ah~ Right! I forgot one really important thing."; + next; + mes "[Manner Master]"; + mes "About 'Swearing'... Heh Heh~~I believe you already know... Anyway... No way No swearwords~~"; + mes "Rude behaviour plus! Swearing... Ummm This is what they mean by ^970197the audacity of the thief^000000..."; + mes "... That would be '^FF0000The worst kind of player in Ragnarokonline^000000'...?"; + next; + mes "[Manner Master]"; + mes "Please E-mail us when you want to report these rude players showing the chat window text. You can use 'Print Screen' button when you want to take a picture of screen."; + mes "If you report to us with the perfect proof, The player accused of being rude mannered could be warned at first time. Then he could be banned forever."; + next; + mes "[Manner Master]"; + mes "Especially to players with a past conviction for rude behaviour, we take strong actions~."; + next; + mes "[Manner Master]"; + mes "Listen, Rude players~! When The day comes to PK..."; + mes "You might be dead under the feet of outraged players who have been abused..."; + mes "Also You would be freaked out and could not play forever."; + next; + mes "[Manner Master]"; + mes "Ok, This is the end of my lesson. You just finished your 1st course. Congratulations."; + mes "When you go to the west side through the centre, See the helper who help you to go to the 2nd Course."; + if (nov_1_2_cos_c>8) goto LtellM8; + set nov_1_2_cos_c,9; + goto LtellM8; + + LtellM8: + close; + + Lagain: + mes "[Manner Master]"; + mes "Ah... Well... Going to next is no problem... But..."; + mes "Would you like to attend to 'Various examples of Ill-mannered players and cheaters' again...?"; + next; + menu "Yes.",Ltell,"No.",Lno; + + Lno: + mes "[Manner Master]"; + mes "Umm Sorry. I don't know well about your next course so please inquire at the guide in the Central Hall."; + close; +} + +// == SECOND COURSE == +// -- Helper -- +new_1-2.gat,78,101,6 script Helper 105,{ + if (nov_1_2_cos_c>= 9) goto Lcourse2; + mes "[Helper]"; + mes "I am a helper who will guide you to the 2nd registration office. Please attend all classes in 1st course First."; + close; + + Lcourse2: + mes "[Helper]"; + mes "You just finished 1st course... OK."; + mes "I will let you go to the 2nd registration office."; + next; + set Done_milk,0; + warp "new_1-2.gat",44,171; + close; +} + +// -- Helper -- +new_1-2.gat,39,183,3 script Helper 92,{ + if (nov_1_2_cos_c>=10) goto Lend; + mes "[Helper]"; + mes "Your registration has confirmed. I would like to say 'Congratulations' also."; + mes "I will let you know about 2nd course breifly."; + next; + mes "[Helper]"; + mes "Your mission is: You must reach at the Castle of the other side from here, through the Fabres Forest. You can do it easily."; + next; + mes "[Helper]"; + mes "Notice - If you lose consciousness during fight, you will lose your points and come back here automatically."; + next; + mes "[Helper]"; + mes "Ask the helper located in the left side about the entrance of 2nd Course."; + mes "OK, We wish you luck."; + set nov_1_2_cos_c,10; + close; + + Lend: + mes "[Helper]"; + mes "You can ask the helper located in the left side when you are ready for 2nd course."; + close; +} + +// -- Helper -- +new_1-2.gat,16,183,5 script Helper 84,{ + if (nov_1_2_cos_c==10) goto Lstep2; + if (nov_1_2_cos_c>=11) goto Lrespawn; + mes "[Helper]"; + mes "Heh... I can't find your name on the list."; + mes "Could you register first at the front desk?"; + close; + + Lstep2: + mes "[Helper]"; + mes "Heh... I can't find your name on the list..."; + mes "Ah! Here you are. Ok " + strcharinfo(0) + ". Are you ready?"; + next; + menu "Yes.",Lyes,"No.",Lno; + + Lyes: + set nov_1_2_cos_c,11; + mes "[Helper]"; + mes "Well... We wish you luck."; + savepoint "new_1-2.gat",23,183; + warp "new_1-3.gat",96,21; + close; + Lno: + mes "[Helper]"; + mes "Take some rest before the 2nd Course."; + close; + Lrespawn: + mes "[Helper]"; + mes "You've been knocked out by Fabre. Yeah you can't fight with a bunch of Fabres anyway."; + mes "By the way, 2nd Course 1th test. Are you going to start now?"; + next; + menu "Yes.",Lspawnyes,"No.",Lno; + + Lspawnyes: + mes "[Helper]"; + mes "Well... We wish you luck."; + next; + warp "new_1-3.gat",96,21; + close; +} + + +// == THIRD COURSE == +// nov_3_merchant: count the number of answers to become merchant +// nov_3_swordman: count the number of answers to become swordman +// nov_3_archer: count the number of answers to become archer +// nov_3_thief: count the number of answers to become thief +// nov_3_magician: count the number of answers to become magician +// nov_3_acolyte: count the number of answers to become acolyte +// set nov_1_4_cos_c: to know third course advancement (to avoid to repeat question) + +// -- Helper -- +new_1-4.gat,100,29,4 script Helper 54,{ + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + set @TEMP,rand(4); + mes "[Helper]"; + mes "Welcome, Newbie!! I don't have much time to talk. I just tell you the basic details."; + mes "Your registration has been confirmed at the time you arrived here! You can go directly through to the next 3 courses..."; + mes "Are you gonna start now?"; + next; + menu "Let's Rock!",-,"Quit",L1; + + mes "[Helper]"; + mes "The guide will inform you details!"; + mes "Bye!"; + next; + if (@TEMP != 0) goto L0a; + warp "new_1-4.gat",94,56; + close; + L0a: + if (@TEMP != 1) goto L0b; + warp "new_1-4.gat",98,56; + close; + L0b: + if (@TEMP != 2) goto L0c; + warp "new_1-4.gat",102,56; + close; + L0c: + warp "new_1-4.gat",106,56; + close; + + L1: + mes "[Helper]"; + mes "Are you waiting for someone here..?"; + close; +} + +// -- Helper -- +new_1-4.gat,100,70,4 script Helper 67,{ + if (nov_1_4_cos_c > 13) goto LQFin; + if (nov_1_4_cos_c > 5) goto LQ00; + if (nov_1_4_cos_c > 0) goto ContinueQuestions; + mes "[Helper]"; + mes "Here we are. From now on we will have 1st personality test."; + mes "Take it easy and choose the right one for you."; + mes "There are no standards for good and evil, it's just a test for your personality."; + mes "Shall we start now?"; + next; + goto ContinueQuestions; + + ContinueQuestions: + mes "[Helper]"; + mes "Choose one word most familiar to you."; + next; + if (nov_1_4_cos_c == 1) goto LQ1; + if (nov_1_4_cos_c == 2) goto LQ2; + if (nov_1_4_cos_c == 3) goto LQ3; + if (nov_1_4_cos_c == 4) goto LQ4; + if (nov_1_4_cos_c == 5) goto LQ5; + + menu "Individual",LQ0a,"Public",LQ0b; + + LQ0a: + set nov_1_4_cos_c,1; + set nov_3_archer,nov_3_archer+1; + goto LQ1; + LQ0b: + set nov_1_4_cos_c,1; + set nov_3_thief,nov_3_thief+1; + goto LQ1; + + LQ1: + menu "Chances",LQ1a,"Permanence",LQ1b; + + LQ1a: + set nov_1_4_cos_c,2; + set nov_3_magician,nov_3_magician+1; + goto LQ2; + LQ1b: + set nov_1_4_cos_c,2; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ2; + + LQ2: + menu "Consumer",LQ2a,"Distributor",LQ2b; + + LQ2a: + set nov_1_4_cos_c,3; + set nov_3_swordman,nov_3_swordman+1; + goto LQ3; + LQ2b: + set nov_1_4_cos_c,3; + set nov_3_merchant,nov_3_merchant+1; + goto LQ3; + + LQ3: + menu "Swiftness",LQ3a,"Prudence",LQ3b; + + LQ3a: + set nov_1_4_cos_c,4; + set nov_3_thief,nov_3_thief+1; + goto LQ4; + LQ3b: + set nov_1_4_cos_c,4; + set nov_3_archer,nov_3_archer+1; + goto LQ4; + + LQ4: + menu "Theory",LQ4a,"Experience",LQ4b; + + LQ4a: + set nov_1_4_cos_c,5; + set nov_3_magician,nov_3_magician+1; + goto LQ5; + LQ4b: + set nov_1_4_cos_c,5; + goto LQ5; + + LQ5: + menu "Reality",LQ5a,"Ideal",LQ5b; + + LQ5a: + set nov_1_4_cos_c,6; + set nov_3_merchant,nov_3_merchant+1; + goto LQ00; + LQ5b: + set nov_1_4_cos_c,6; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ00; + + LQ00: + mes "[Helper]"; + mes "Choose 'Yes' or 'No'."; + next; + if (nov_1_4_cos_c == 7) goto LQ01; + if (nov_1_4_cos_c == 8) goto LQ02; + if (nov_1_4_cos_c == 9) goto LQ03; + if (nov_1_4_cos_c == 10) goto LQ04; + if (nov_1_4_cos_c == 11) goto LQ05; + if (nov_1_4_cos_c == 12) goto LQ06; + if (nov_1_4_cos_c == 13) goto LQ07; + mes "[Helper]"; + mes "To die with honor is better than to live with disgrace."; + next; + menu "Yes",LQ00a,"No",LQ00b; + + LQ00a: + set nov_1_4_cos_c,7; + set nov_3_swordman,nov_3_swordman+1; + goto LQ01; + LQ00b: + set nov_1_4_cos_c,7; + set nov_3_thief,nov_3_thief+1; + goto LQ01; + + LQ01: + mes "[Helper]"; + mes "It gives me headache even when my cousin makes big success."; + next; + menu "Yes",LQ01a,"No",LQ01b; + + LQ01a: + set nov_1_4_cos_c,8; + set nov_3_merchant,nov_3_merchant+1; + goto LQ02; + LQ01b: + set nov_1_4_cos_c,8; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ02; + + LQ02: + mes "[Helper]"; + mes "Always check the manual first before assemble something like household electric appliance."; + next; + menu "Yes",LQ02a,"No",LQ02b; + + LQ02a: + set nov_1_4_cos_c,9; + set nov_3_magician,nov_3_magician+1; + goto LQ03; + LQ02b: + set nov_1_4_cos_c,9; + set nov_3_archer,nov_3_archer+1; + goto LQ03; + + LQ03: + mes "[Helper]"; + mes "I am always at the head of everything."; + next; + menu "Yes",LQ03a,"No",LQ03b; + + LQ03a: + set nov_1_4_cos_c,10; + set nov_3_swordman,nov_3_swordman+1; + goto LQ04; + LQ03b: + set nov_1_4_cos_c,10; + set nov_3_archer,nov_3_archer+1; + goto LQ04; + + LQ04: + mes "[Helper]"; + mes "When I see the sign 'PULL' on the door I want to PUSH."; + next; + menu "Yes",LQ04a,"No",LQ04b; + + LQ04a: + set nov_1_4_cos_c,11; + set nov_3_thief,nov_3_thief+1; + goto LQ05; + LQ04b: + set nov_1_4_cos_c,11; + set nov_3_merchant,nov_3_merchant+1; + goto LQ05; + + LQ05: + mes "[Helper]"; + mes "Sometimes I see things unreal."; + next; + menu "Yes",LQ05a,"No",LQ05b; + + LQ05a: + set nov_1_4_cos_c,12; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ06; + LQ05b: + set nov_1_4_cos_c,12; + set nov_3_swordman,nov_3_swordman+1; + goto LQ06; + + LQ06: + mes "[Helper]"; + mes "I could fly if I fall off."; + next; + menu "Yes",LQ06a,"No",LQ06b; + + LQ06a: + set nov_1_4_cos_c,13; + goto LQ07; + LQ06b: + set nov_1_4_cos_c,13; + set nov_3_magician,nov_3_magician+1; + goto LQ07; + + LQ07: + mes "[Helper]"; + mes "Money talks. I can buy even human being if I want."; + next; + menu "Yes",LQ07a,"No",LQ07b; + + LQ07a: + set nov_1_4_cos_c,14; + set nov_3_merchant,nov_3_merchant+1; + set nov_3_magician,nov_3_magician+1; + set nov_3_thief,nov_3_thief+1; + goto LQFin; + LQ07b: + set nov_1_4_cos_c,14; + set nov_3_swordman,nov_3_swordman+1; + set nov_3_archer,nov_3_archer+1; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQFin; + + LQFin: + set @TEMP,rand(4); + mes "[Helper]"; + mes "You just finished 1st test. Congratulations."; + mes "You can now go to the next test right away"; + next; + if (@TEMP != 0) goto LQFin1; + warp "new_1-4.gat",13,96; + close; + LQFin1: + if (@TEMP != 1) goto LQFin2; + warp "new_1-4.gat",17,96; + close; + LQFin2: + if (@TEMP != 2) goto LQFin3; + warp "new_1-4.gat",21,96; + close; + LQFin3: + warp "new_1-4.gat",25,96; + close; +} + +// -- Helper -- +// nov_1_4_cos_c (variable) starts with value 14 +new_1-4.gat,20,109,4 script Helper 48,{ + if (nov_1_4_cos_c > 22) goto LQFin; + if (nov_1_4_cos_c > 14) goto ContinueQuestions; + mes "[Helper]"; + mes "We start your 2nd test now!"; + mes "Take it easy and choose the right answer for you!"; + mes "OK Start now!"; + next; + goto LQ1; + + ContinueQuestions: + mes "[Helper]"; + mes "We continue your 2nd test now!"; + mes "Take it easy and choose the right answer for you!"; + mes "OK continue now!"; + next; + if (nov_1_4_cos_c == 15) goto LQ2; + if (nov_1_4_cos_c == 16) goto LQ3; + if (nov_1_4_cos_c == 17) goto LQ4; + if (nov_1_4_cos_c == 18) goto LQ5; + if (nov_1_4_cos_c == 19) goto LQ6; + if (nov_1_4_cos_c == 20) goto LQ7; + if (nov_1_4_cos_c == 21) goto LQ8; + if (nov_1_4_cos_c == 22) goto LQ9; + + LQ1: + mes "[Helper]"; + mes "For you life means..."; + next; + menu "Feel irritated.",LQ1a,"I like it.",LQ1b,"Doesn't come to my mind.",LQ1c; + + LQ1a: + set nov_1_4_cos_c,15; + set nov_3_swordman,nov_3_swordman+1; + set nov_3_thief,nov_3_thief+1; + goto LQ2; + LQ1b: + set nov_1_4_cos_c,15; + set nov_3_merchant,nov_3_merchant+1; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ2; + LQ1c: + set nov_1_4_cos_c,15; + set nov_3_archer,nov_3_archer+1; + set nov_3_magician,nov_3_magician+1; + goto LQ2; + + LQ2: + mes "[Helper]"; + mes "Before you buy something in a shop..."; + next; + menu "Check first whether it's neccessary.",LQ2a,"Check the cash first.",LQ2b,"Regret after shopping.",LQ2c; + + LQ2a: + set nov_1_4_cos_c,16; + set nov_3_archer,nov_3_archer+1; + goto LQ3; + LQ2b: + set nov_1_4_cos_c,16; + set nov_3_merchant,nov_3_merchant+1; + goto LQ3; + LQ2c: + set nov_1_4_cos_c,16; + set nov_3_thief,nov_3_thief+1; + goto LQ3; + + LQ3: + mes "[Helper]"; + mes "When you have to compete with others..."; + next; + menu "I enjoy it.",LQ3a,"I do if I have to.",LQ3b,"I hate it.",LQ3c; + + LQ3a: + set nov_1_4_cos_c,17; + set nov_3_swordman,nov_3_swordman+1; + goto LQ4; + LQ3b: + set nov_1_4_cos_c,17; + set nov_3_archer,nov_3_archer+1; + goto LQ4; + LQ3c: + set nov_1_4_cos_c,17; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ4; + + LQ4: + mes "[Helper]"; + mes "When you deal something..."; + next; + menu "I prefer to deal alone.",LQ4a,"I prefer to deal together.",LQ4b; + + LQ4a: + set nov_1_4_cos_c,18; + set nov_3_magician,nov_3_magician+1; + goto LQ5; + LQ4b: + set nov_1_4_cos_c,18; + set nov_3_thief,nov_3_thief+1; + goto LQ5; + + LQ5: + mes "[Helper]"; + mes "If anyone ask you a favour..."; + next; + menu "Anything I can help, I will do my best.",LQ5a,"Simply I would help.",LQ5b,"Just ignore.",LQ5c; + + LQ5a: + set nov_1_4_cos_c,19; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ6; + LQ5b: + set nov_1_4_cos_c,19; + set nov_3_archer,nov_3_archer+1; + goto LQ6; + LQ5c: + set nov_1_4_cos_c,19; + set nov_3_magician,nov_3_magician+1; + goto LQ6; + + LQ6: + mes "[Helper]"; + mes "If anyone offer you to be President / Vise-President / a Congressman..."; + next; + menu "President.",LQ6a,"Vise-President",LQ6b,"Congressman is ok.",LQ6c,"I don't want to be a politican.",LQ6d; + + LQ6a: + set nov_1_4_cos_c,20; + set nov_3_swordman,nov_3_swordman+1; + goto LQ7; + LQ6b: + set nov_1_4_cos_c,20; + set nov_3_merchant,nov_3_merchant+1; + goto LQ7; + LQ6c: + set nov_1_4_cos_c,20; + set nov_3_thief,nov_3_thief+1; + goto LQ7; + LQ6d: + set nov_1_4_cos_c,20; + goto LQ7; + + LQ7: + mes "[Helper]"; + mes "If you come across the keen knife on the street then you think..."; + next; + menu "'Look so sharp!'",LQ7a,"'Who the hell is the owner of this?'",LQ7b,"'Could be dead harm to people. Should be careful!'",LQ7c,"'Nice Brand~!'",LQ7d; + + LQ7a: + set nov_1_4_cos_c,21; + set nov_3_swordman,nov_3_swordman+1; + goto LQ8; + LQ7b: + set nov_1_4_cos_c,21; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ8; + LQ7c: + set nov_1_4_cos_c,21; + set nov_3_magician,nov_3_magician+1; + goto LQ8; + LQ7d: + set nov_1_4_cos_c,21; + set nov_3_merchant,nov_3_merchant+1; + goto LQ8; + + LQ8: + mes "[Helper]"; + mes "When you meet a difficult situation during conversation"; + next; + menu "I hush up with a joke.",LQ8a,"I change subject.",LQ8b,"I try to excuse.",LQ8c,"I appoligize even though it's not my fault.",LQ8d; + + LQ8a: + set nov_1_4_cos_c,22; + set nov_3_thief,nov_3_thief+1; + goto LQ9; + LQ8b: + set nov_1_4_cos_c,22; + set nov_3_swordman,nov_3_swordman+1; + goto LQ9; + LQ8c: + set nov_1_4_cos_c,22; + set nov_3_magician,nov_3_magician+1; + goto LQ9; + LQ8d: + set nov_1_4_cos_c,22; + set nov_3_acolyte,nov_3_acolyte+1; + goto LQ9; + + LQ9: + mes "[Helper]"; + if (sex==1) goto SexLQ9; + mes "Now your girl friend asks you to buy a useless gift like souvenir..."; + next; + goto LQ9Norm; + + SexLQ9: + mes "Now your boy friend asks you to buy a useless gift like souvenir..."; + next; + goto LQ9Norm; + + LQ9Norm: + menu "I would do anything for that person.",LQ9a,"I try to bring around not to buy it.",LQ9b; + + LQ9a: + set nov_1_4_cos_c,23; + set nov_3_archer,nov_3_archer+1; + goto LQFin; + LQ9b: + set nov_1_4_cos_c,23; + set nov_3_merchant,nov_3_merchant+1; + goto LQFin; + + LQFin: + mes "[Helper]"; + mes "Now you finished 2nd test! Good job!!"; + mes "You can go to the result room now."; + next; + set @TEMP,rand(4); + if (@TEMP !=0 ) goto LQFin0; + warp "new_1-4.gat",54,136; + close; + LQFin0: + if (@TEMP !=1 ) goto LQFin1; + warp "new_1-4.gat",58,136; + close; + LQFin1: + if (@TEMP !=2 ) goto LQFin2; + warp "new_1-4.gat",62,136; + close; + LQFin2: + warp "new_1-4.gat",66,136; + close; +} + +// -- Helper -- +// @job_number: best job (0: Swordman, 1: Archer, 2: Thief, 3: Magican, 4: Acolyte, 5: Merchant) +// @nov_2nd_cos: number of answers for the best job +// nov_1_4_cos_c (variable) starts with value 23 +new_1-4.gat,60,149,4 script Helper 55,{ + mes "[Helper]"; + mes "Congratulations~! You finished whole courses by yourself!"; + mes "You should remember what you've learned from Training Ground. It would be useful to you."; + next; + mes "[Helper]"; + mes "Ok, here is the result of your own."; + next; + + set @nov_2nd_cos,nov_3_swordman; + set @job_number,0; + + if (@nov_2nd_cos >= nov_3_archer) goto L_ROOT_1; + set @nov_2nd_cos,nov_3_archer; + set @job_number,1; + goto L_ROOT_1; + + L_ROOT_1: + if (@nov_2nd_cos >= nov_3_thief) goto L_ROOT_2; + set @nov_2nd_cos,nov_3_thief; + set @job_number,2; + goto L_ROOT_2; + + L_ROOT_2: + if (@nov_2nd_cos >= nov_3_magician) goto L_ROOT_3; + set @nov_2nd_cos,nov_3_magician; + set @job_number,3; + goto L_ROOT_3; + + L_ROOT_3: + if (@nov_2nd_cos >= nov_3_acolyte) goto L_ROOT_4; + set @nov_2nd_cos,nov_3_acolyte; + set @job_number,4; + goto L_ROOT_4; + + L_ROOT_4: + if (@nov_2nd_cos >= nov_3_merchant) goto L_START; + set @nov_2nd_cos,nov_3_merchant; + set @job_number,5; + goto L_START; + + L_START: + mes "[Helper]"; + if (nov_1st_cos != 0) goto L_SCORE_1; + mes "1st course: 0 / 6 Points."; + goto L_SCORE_2; + L_SCORE_1: + mes "1st course: " + nov_1st_cos + " / 6 Points."; + goto L_SCORE_2; + + L_SCORE_2: + if (@nov_2nd_cos != 0) goto L_SCORE_3; + mes "2nd course: 0 / 10 Points"; + goto L_SCORE_4; + L_SCORE_3: + mes "2nd course: " + @nov_2nd_cos + " / 10 Points."; + goto L_SCORE_4; + + L_SCORE_4: + mes "And the result of personally test is..."; + next; + + if (@job_number==0) goto JobSwordman; + if (@job_number==1) goto JobArcher; + if (@job_number==2) goto JobThief; + if (@job_number==3) goto JobMagican; + if (@job_number==4) goto JobAcolyte; + if (@job_number==5) goto JobMerchant; + + JobSwordman: + mes "[Helper]"; + mes "'You have simple-minded and always talk straight. And you have an unshaken faith so that you want to rule the world. Also you always stand by the weak.'"; + mes "'So We suggest you ^696969Swordman^000000."; + goto SelJob; + JobArcher: + mes "[Helper]"; + mes "'You are very emotional and sensitive person. And you have open-minded.'"; + mes "'Also, You don't want to be ordinary, always eager for valuable life of your own.'"; + mes "'So we suggest you ^696969Archer^000000.'"; + goto SelJob; + JobThief: + mes "[Helper]"; + mes "'You always try to enjoy your life. Life is like adventure for you.'"; + mes "'So we suggest you ^696969Thief^000000.'"; + goto SelJob; + JobMagican: + mes "[Helper]"; + mes "'You are self-diciplined person. Sometimes you pretend to understand whole things in the world not to be silly to the other person."; + mes "'You are man of reason, an introvert, an analyst, a man of keen insight.'"; + mes "'So we suggest you ^696969Mage^000000."; + goto SelJob; + JobAcolyte: + mes "[Helper]"; + mes "'You are warm-hearted, easy-going person, taking care of people.'"; + mes "'But actually you pretend not to need help from the other, people think you are an altruist*."; + mes "'So we suggest you ^696969Acolyte^000000.'"; + mes " "; + mes "'* The person who really enjoy helping people with self-sacrifice.'"; + goto SelJob; + JobMerchant: + mes "[Helper]"; + mes "'You can easily catch what the public wants, and you have a talent to organize system, and you have a strong sense of responsibility.'"; + mes "'So we suggest you ^696969Merchant^000000.'"; + goto SelJob; + + SelJob: + next; + mes "[Helper]"; + mes "...Report says like this. It is not my intention, I don't mean to nice to you!! To me you are just a novice!!"; + mes "Never take it seriously, it's just a game."; + next; + mes "[Helper]"; + mes "Here are the subsides from the Training Ground. Even if they are not worthless to veteran players, not to you."; + next; + if (nov_1_4_cos_c > 23) goto BeL0; + + nov12coscE0: + getitem 519,1; + set nov_1_4_cos_c,24; + set @temp,nov_1st_cos+@nov_2nd_cos; + if (@temp <= 8) goto nov1stcosPnov2ndcosL8; + if (@temp <= 15) goto nov1stcosPnov2ndcosL15; + if (@temp == 16) goto nov1stcosPnov2ndcosE16; + set Zeny,Zeny-500; + getitem 507,10; + goto BeL0; + + nov1stcosPnov2ndcosL8: + set Zeny,Zeny+500; + getitem 507,10; + goto BeL0; + nov1stcosPnov2ndcosL15: + set Zeny,Zeny+100; + getitem 507,1; + goto BeL0; + nov1stcosPnov2ndcosE16: + set Zeny,Zeny+300; + getitem 507,3; + goto BeL0; + + BeL0: + mes "[Helper]"; + mes "Now I will let you go to the Job Agency. Before going there are a few things you have to know."; + next; + mes "[Helper]"; + mes "Are you going to choose the job following the test? Or are you going to choose you job by your own will?"; + next; + mes "[Helper]"; + mes "If you follow the test, you can get a lot of subsidy for headstart from guild and association and get to start in the specific town for your job."; + mes "If you follow your will, you get to start in specific town for your job with 100 zeny before we gave you."; + next; + mes "[Helper]"; + mes "Choose one. This is your only chance."; + next; + menu "I want to be what I wanted!",L0,"I will follow the result of the test",L1; + + L0: + mes "[Helper]"; + mes "Ok. I see. Choose one what you wanted to be. I will send you to the town right away."; + if (nov_1_4_cos_c > 24) goto JobMenu; + set nov_1_4_cos_c,25; + set Zeny,Zeny+100; + mes "I give you 100z to begin in the great world or ragnarok."; + goto JobMenu; + + JobMenu: + next; + menu "Swordman.",L00,"Archer.",L01,"Thief.",L02,"Mage.",L03,"Acolyte.",L04,"Merchant",L05; + + L00: + mes "[Helper]"; + mes "I expect you the best."; + savepoint "izlude.gat",94,104; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "izlude_in.gat",121,165; + close; + L01: + mes "[Helper]"; + mes "I expect you the best."; + savepoint "payon.gat",87,117; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "payon_in02.gat",21,71; + close; + L02: + mes "[Helper]"; + mes "I expect you the best."; + savepoint "morocc.gat",160,94; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "morocc.gat",27,291; + close; + L03: + mes "[Helper]"; + mes "I expect you the best."; + savepoint "geffen.gat",120,100; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "geffen.gat",66,175; + close; + L04: + mes "[Helper]"; + mes "I expect you the best."; + savepoint "prontera.gat",273,354; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "prontera.gat",233,313; + close; + L05: + mes "[Helper]"; + mes "I expect you the best."; + savepoint "alberta.gat",116,57; + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "alberta.gat",40,42; + close; + + L1: + if (@job_number==0) goto WarpJobSwordman; + if (@job_number==1) goto WarpJobArcher; + if (@job_number==2) goto WarpJobThief; + if (@job_number==3) goto WarpJobMagican; + if (@job_number==4) goto WarpJobAcolyte; + if (@job_number==5) goto WarpJobMerchant; + + WarpJobSwordman: + mes "[Helper]"; + mes "Let warp you"; + next; + warp "new_1-4.gat",20,176; + close; + WarpJobArcher: + mes "[Helper]"; + mes "Let warp you"; + next; + warp "new_1-4.gat",60,176; + close; + WarpJobThief: + mes "[Helper]"; + mes "Let warp you"; + next; + warp "new-5_4.gat",100,176; + close; + WarpJobMagican: + mes "[Helper]"; + mes "Let warp you"; + next; + warp "new_1-4.gat",140,176; + close; + WarpJobAcolyte: + mes "[Helper]"; + mes "Let warp you"; + next; + warp "new_1-4.gat",180,176; + close; + WarpJobMerchant: + mes "[Helper]"; + mes "Let warp you"; + next; + warp "new_1-4.gat",180,136; + close; +} + +// == JOB AGENCIES == + +// -- Swordman -- +// nov_1_4_cos_c (variable) starts with value 25 +// Bonus: 1 Sword, 1 Red Potion, 3 Meats +new_1-4.gat,19,189,4 script Swordman's Helper 105,{ + save "izlude_in.gat",121,165; + mes "['Swordman' Agency Helper]"; + mes "Welcome!"; + mes "Here is Swordman Agency"; + mes "We are so pleased with you doing great until now."; + next; + mes "['Swordman' Agency Helper]"; + mes "Also we hope you will become the greatest adventurer in Ragnarok."; + mes "Are you ready?"; + next; + mes "['Swordman' Agency Helper]"; + mes "Ok."; + mes "I will give you a few subsidy and let you get there."; + mes "Here are 1 Sword, 1 Red Potion and 3 Meats for you."; + if (nov_1_4_cos_c > 25) goto nov_get_item05cont; + set nov_1_4_cos_c,26; + getitem 1103,1; + getitem 501,1; + getitem 517,3; + goto nov_get_item05cont; + + nov_get_item05cont: + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "izlude_in.gat",121,165; + close; +} + +// -- Archer -- +// nov_1_4_cos_c (variable) starts with value 25 +// Bonus: 3 Red Potions, 50 zenys +new_1-4.gat,59,186,4 script Archer's Helper 105,{ + savepoint "payon.gat",87,117; + mes "['Archer' Agency Helper]"; + mes "Wecome!"; + mes "Here is Archer Agency."; + mes "We are so pleased with you doing great until now."; + next; + mes "['Archer' Agency Helper]"; + mes "Also we hope you will become the greatest adventurer in Ragnarok."; + mes "Are you ready?"; + next; + mes "['Archer' Agency Helper]"; + mes "Ok."; + mes "I will give you a few subsidy and let you get there."; + mes "Here are 3 Red potions and 50 zeny for you."; + if (nov_1_4_cos_c > 25) goto nov_get_item05cont; + set nov_1_4_cos_c,26; + getitem 501,3; + set Zeny,Zeny+50; + goto nov_get_item05cont; + + nov_get_item05cont: + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "payon_in02.gat",21,71; + close; +} + +// -- Thief -- +// nov_1_4_cos_c (variable) starts with value 25 +// Bonus: 1 Jacket, 6 Sweet Patatos +new_1-4.gat,99,186,4 script Thief's Helper 105,{ + savepoint "morocc.gat",160,94; + mes "['Thief' Agency Helper]"; + mes "Welcome!"; + mes "Here is the thief agency."; + mes "We are so pleased with you doing great until now."; + next; + mes "['Thief' Agency Helper]"; + mes "Also we hope you will become the greatest adventurer in Ragnarok."; + mes "Are you ready?"; + next; + mes "['Thief' Agency Helper]"; + mes "Ok."; + mes "I will give a few subsidy and let you get there."; + mes "Here are 1 Jacket and 6 Sweet Patatos for you."; + if (nov_1_4_cos_c > 25) goto nov_get_item05cont; + set nov_1_4_cos_c,26; + getitem 2303,1; + getitem 516,6; + goto nov_get_item05cont; + + nov_get_item05cont: + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "morocc.gat",27,291; + close; +} + +// -- Mage -- +// nov_1_4_cos_c (variable) starts with value 25 +// Bonus: 3 Red Potions, 100 zenys +new_1-4.gat,139,186,4 script Mage's Helper 105,{ + savepoint "geffen.gat",120,100; + mes "['Mage' Agency Helper]"; + mes "Wecome!"; + mes "Here is Mage Agency."; + mes "We are so pleased with you doing great until now."; + next; + mes "['Mage' Agency Helper]"; + mes "Also we hope you will become the greatest adventurer in Ragnarok."; + mes "Are you ready?"; + next; + mes "['Mage'Agency Helper]"; + mes "Ok."; + mes "I will give you a few subsidy and let you get there."; + mes "Here are 3 Red potions and 100 Zeny for you."; + if (nov_1_4_cos_c > 25) goto nov_get_item05cont; + set nov_1_4_cos_c,26; + getitem 501,3; + set Zeny,Zeny+100; + goto nov_get_item05cont; + + nov_get_item05cont: + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "geffen.gat",66,175; + close; +} + +// -- Acolyte -- +// nov_1_4_cos_c (variable) starts with value 25 +// Bonus: 3 Red Potions, 1 Club +new_1-4.gat,179,186,4 script Acolyte's Helper 105,{ + savepoint "prontera.gat",273,354; + mes "['Acolyte' Agency Helper]"; + mes "Wecome!"; + mes "Here is Acolyte Agency."; + mes "We are so pleased with you doing great until now."; + next; + mes "['Acolyte' Agency Helper]"; + mes "Also we hope you will become the greatest adventurer in Ragnarok."; + mes "Are you ready?"; + next; + mes "['Acolyte' Agency Helper]"; + mes "Ok."; + mes "I will give you a few subsidy and let you get there."; + mes "Here are 3 Red Potions and a Club for you."; + if (nov_1_4_cos_c > 25) goto nov_get_item05cont; + set nov_1_4_cos_c,26; + getitem 501,3; + getitem 1503,1; + goto nov_get_item05cont; + + nov_get_item05cont: + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "prontera.gat",233,313; + close; +} + +// -- Merchant -- +// nov_1_4_cos_c (variable) starts with value 25 +// Bonus: 3 Red Potions, 100 zenys +new_1-4.gat,180,146,4 script Merchant's Helper 105,{ + savepoint "alberta.gat",116,57; + mes "['Merchant' Agency Helper]"; + mes "Wecome!"; + mes "Here is Merchant Agency."; + mes "We are so pleased with you doing great until now."; + next; + mes "['Merchant' Agency Helper]"; + mes "Also we hope you will become the greatest adventurer in Ragnarok."; + mes "Are you ready?"; + next; + mes "['Merchant' Agency Helper]"; + mes "Ok."; + mes "I will give you a few subsidy and let you get there."; + mes "Here are 3 Red potions and 100 Zeny for you."; + if (nov_1_4_cos_c > 25) goto nov_get_item05cont; + set nov_1_4_cos_c,26; + getitem 501,3; + set Zeny,Zeny+100; + goto nov_get_item05cont; + + nov_get_item05cont: + next; + set nov_1st_cos,0; + set nov_get_item01,0; + set nov_1_2_cos_c,0; + set Done_milk,0; + set nov_1_4_cos_c,0; + set nov_3_merchant,0; + set nov_3_swordman,0; + set nov_3_archer,0; + set nov_3_thief,0; + set nov_3_magician,0; + set nov_3_acolyte,0; + warp "alberta.gat",40,42; + close; +} + diff --git a/npc/jobs/novice/supernovice.txt b/npc/jobs/novice/supernovice.txt new file mode 100644 index 000000000..873025fcd --- /dev/null +++ b/npc/jobs/novice/supernovice.txt @@ -0,0 +1,273 @@ +//===== eAthena Script ======================================= +//= Super Novice Script +//===== By: ================================================== +//= Darkchild +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= Any eAthena +//===== Description: ========================================= +//= Super Novice Job Change Npc +//= Super Novice Cart Rental Npc +//= Some Other Useless Super Novice Npc +//===== Additional Comments: ================================= +//= Dialogs From Some Other Scripts (Most Of It) +//============================================================ + +// -- Jobchanger -- +aldeba_in.gat,223,167,3 script Tozel 709,{ + if(job_snovice == 1) goto L_Start2; + if(Class == 23) goto L_Twice; + if(Class != 0) goto L_Otherjob; + mes "[Tozel]"; + mes "Hello, Novice!"; + mes "Are you enjoying yourself as a novice, the preferred class of the common man?"; + next; + mes "[Tozel]"; + mes "Would you like to join the Novice Guild and add your common character"; + mes "to the common pool of talent so that we can perform common services?"; + next; + mes "[Tozel]"; + mes "If you join us, I'll change your class from Novice to the highly skilled Super Novice!"; + mes "How does that sound?"; + next; + menu "I'm sold!",-,"Super Novice is Super Stupid",L_Stupid,"Well, to make an informed choice...",L_Well; + if(JobLevel < 10) goto L_LowSkill; + if(BaseLevel < 45) goto L_Lowlevel; + if(SkillPoint != 0) goto L_StillSk; + mes "[Tozel]"; + mes "Wonderful!"; + mes "You're on the road to becoming an uncommonly common individual."; + next; + mes "[Tozel]"; + mes "Common is a great word, isn't it?"; + next; + mes "[Tozel]"; + mes "Just because you've applied to become a member of the Novice Guild doesn't mean automatic admission."; + mes "There are requirements you must meet."; + next; + mes "[Tozel]"; + mes "Being a guild of common men, it's only fitting that you bring me a common item as an entry requirement."; + mes "So, go and find thirty each of: "; + mes " ^FF0000Sticky Mucus^000000 and"; + mes " ^FF0000Resin^000000."; + next; + mes "[Tozel]"; + mes "Once you collect this common number of common items, head on back to this common guild of common men."; + set job_snovice,1; + close; + +L_Stupid: + mes "[Tozel]"; + mes "Hm...That's an attitude shared by a lot of common criminals and other commonly marginalized types."; + mes "...They don't understand the fulfillment gained by a common pool of friends."; + next; + mes "[Tozel]"; + mes "Of course, it's common to change one's mind as well."; + mes "If you do, please drop by again."; + close; + +L_Well: + mes "[Tozel]"; + mes "Oh, you want to know a bit more about this guild, eh?"; + mes "I'll be happy to explain!"; + next; + mes "[Tozel]"; + mes "Let me tell you about Kima, the guild founder."; + mes "Kima founded this guild because those of common ancestry and common our status had no place"; + mes "to assemble and enjoy each other's company."; + next; + mes "- Tozel talks for ten minutes. - "; + mes "- His tone is so common that it bores you to tears. -"; + next; + mes "[Tozel]"; + mes "...Anyway, the Novice guild has propsered greatly since its founding."; + mes "We pride ourselves on our slogan 'Common Man, Common Goals, Common Dreams'!"; + close; + +L_Start2: + if(countitem(938) < 30) goto L_ItemError; + if(countitem(907) < 30) goto L_ItemError; + mes "[Tozel]"; + mes "Well, your performance seems to be uh...common, but that's good enough for us!"; + mes "Welcome to the Novice Guild!"; + next; + mes "[Tozel]"; + mes "According to my promise, I'll make you a Super Novice."; + mes "Are you ready?!"; + next; + menu "Huh?!",-,"Maybe?!",-; + mes "- Tozel's uncommon demeanor catches you off guard, -"; + mes "- leaving you speechless! -"; + next; + jobchange 23; + delitem 938,30; + delitem 907,30; + getitem 2339,1; + mes "[Tozel]"; + mes "Hahahah! Were you surprised?!"; + mes "Just because we're common people doesn't mean we can't be misfits sometimes!"; + next; + mes "[Tozel]"; + mes "So, now your new life as a Super Novice begins!"; + next; + mes "[Tozel]"; + mes "Now you're a part of Kima's legacy!"; + mes "Please continue his good (but common) name."; + set job_snovice,2; + close; + +L_LowSkill: + mes "[Tozel]"; + mes "Well...it seems your level is a little too common at the moment."; + mes "You need to have a class level of ^0000FFat least 9^000000 in order to join us."; + close; + +L_LowLevel: + mes "[Tozel]"; + mes "Well...it seems your level is a little too common at the moment."; + mes "You need to have a primary level of ^0000FFat least 45^000000 in order to join us."; + close; + +L_StillSk: + mes "[Tozel]"; + mes "Well...it seems you still have some skill points."; + mes "You need to have ^0000FFNO^000000 skill points left in order to join our guild."; + close; + +L_ItemError: + mes "[Tozel]"; + mes "Did you forget what you were supposed to find?"; + mes "I'll tell you again."; + next; + mes "[Tozel]"; + mes "You need to find thirty each of"; + mes "^FF0000 Sticky Muscus^000000 and"; + mes "^FF0000 Resin^000000."; + close; + +L_Twice: + mes "[Tozel]"; + mes "You're a member of the Novice Guild now."; + mes "There's no need to have exceptional talents here."; + mes "Your common vigilance is all we require."; + next; + mes "[Tozel]"; + mes "Go, then, and live a common and unexceptional life, in order to bring respect to our guild."; + close; +L_Otherjob: + + mes "[Tozel]"; + mes "Hey! You're not a man of common heritage!"; + mes "I'm Tozel, the master of the Novice Guild."; + next; + mes "[Tozel]"; + mes "This place is for people who who have common goals,"; + mes "common beliefs, common lives."; + mes "For you, an uncommon person, this place is anathema."; + next; + mes "[Tozel]"; + mes "Such people don't have a place in our common society. I'm sorry."; + close; +} + +// -- Totaly Useless :) -- +aldeba_in.gat,216,169,5 script Serei 86,{ + if(Class == 23) goto L_Supernovice; + if(Class != 0) goto L_Otherjob; + mes "[Serei]"; + mes "You're pretty common."; + mes "A common man should live a happy life."; + mes "You should consider joining the Novice Guild."; + next; + mes "[Serei]"; + mes "GO NOVICE CLASS!"; + mes "Hahahahahahahaha!"; + close; + +L_Supernovice: + mes "[Serei]"; + mes "Yaaaaaaaaaaaaaaaaaaaaaaaay!"; + mes "You're a member of the Novice Guild! Sweet!"; + next; + mes "[Serei]"; + mes "That's great!"; + mes "Are you trying to extend the Guild's legacy of uneventfulness?"; + next; + mes "[Serei]"; + mes "I'm Guildmaster Tozel's number one man!"; + close; + +L_Otherjob: + mes "[Serei]"; + mes "Oh no!"; + mes "You're one of those people who rejected the common way of life!"; + mes "You might be dangerous to those who walk the common path!"; + mes "Ahhhh!"; + close; +} + + +// -- Car Rental -- +aldebaran.gat,54,238,5 script Kafra 117,{ + if(Class != 23) goto L_Otherjob; + if(checkcart(0) == 1) goto L_GotCart; + mes "[Kafra]"; + mes "Oh, a Super Novice!"; + mes "You're annoyed that the other Kafras won't lend you a cart?"; + mes "No problem!"; + next; + mes "[Kafra]"; + mes "I can lend you a cart, but try to keep a low profile,"; + mes "because we are under orders from Kafra management not to lend carts to any Novice."; + next; + mes "[Kafra]"; + mes "There will be a fee of ^FF00001900zeny^000000 to use the cart."; + next; + mes "[Kafra]"; + mes "You need to have the Push Cart skill in order to use a cart."; + mes "If you don't have this skill,"; + mes "you won't be able to use the cart and You'll lose your money."; + mes "Do you want me to lend you a cart?"; + next; + menu "Lend me a cart",-,"Not Necessary",L_End; + + mes "[Kafra]"; + mes "Since I'm secretly lending you a cart,"; + mes "I can't ensure you have the Push Cart skill."; + mes "If you don't, you won't be able to use the cart and You'll lose your money."; + mes "Are you sure you want the cart?"; + next; + menu "I heard you the first time!",-,"Uhhh...wait a minute...",L_End; + if(Zeny < 1900) goto L_Error; + set Zeny,Zeny-1900; + if(getskilllv(39)==0) goto L_End; + setcart; + mes "[Kafra]"; + mes "Thanks for using the Kafra service, even if it is under the table."; + mes "Hehehehehe..."; + close; + +L_Error: + mes "[Kafra]"; + mes "Hmmm. It seems you're short of funds."; + close; + +L_End: + mes "[Kafra]"; + mes "Thank you for your patronage."; + mes "Please come again."; + close; + +L_GotCart: + mes "[Kafra]"; + mes "HI There, Dear Super Novice."; + mes "I'm sorry but I can't help you, you already have an cart!"; + close; + +L_Otherjob: + mes "[Kafra]"; + mes "I'm sorry, but I'm not taking customers right now."; + mes "Please try asking the other Kafra staff for assistance."; + close; +} diff --git a/npc/kafras/functions_kafras.txt b/npc/kafras/functions_kafras.txt new file mode 100644 index 000000000..ad0547f3d --- /dev/null +++ b/npc/kafras/functions_kafras.txt @@ -0,0 +1,342 @@ +//===== eAthena Script ======================================= +//= Kafra Functions +//===== By: ================================================== +//= Lotsa People (1.0) +//= eAthena Dev Team +//= Darlskies +//= Darkchild +//= Syrus22 +//= Lupus +//= kobra_k88 (2.0) +//===== Current Version: ===================================== +//= 2.2b +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: =============================================== +//= These functions handle save, storage, cart rental, teleport, +//= and Kafra pass options for all Kafra NPCs. +//===== Additional Comments: ================================= +//= v1.1 Now using functions :) +//= v2.1 Added Cart Rent for Classes: Whitesmith, Professor. +//= Replaced checkoption(x) into checkcart(0) [Lupus] +//= v2.1b Added Fix Kafra Pass Func [Kobra_k88] +//= 2.2 Final fix of the Kafra Pass Exploit! [Lupus] a -Izlude[4] fix +//= 2.2a Minor changes to function calls. Using agruments. Added Guild options. [kobra_k88] +//= 2.2b This version uses arrays for the teleport option. +//= Rearranged next statements to make menu transitions smoother. [kobra_k88] +//= Fixed typo >_< [Aria] +//============================================================ + + +// Main Function =========================================================== +//= arg(0): Used to determine which welcome message to show. +//= arg(1): Used to determine which menu to display. +//= arg(2): Used to determine if the info menu is shown in F_KafInfo. +//========================================================================== +function script F_Kafra { + set @kafPass, 0; + mes "[Kafra]"; + if(getarg(0)==0) mes "Welcome to Kafra Corp. We will stay with you wherever you go."; + if(getarg(0)==1) mes "Welcome... Kafra Services.... Will be with you even if you die....."; + if(getarg(0)==2) mes "Welcome, ^5533FF" + GetGuildName(@GID) + "^000000 members. We will stay with you wherever you go"; + next; + M_Menu: + + if(getarg(0)==2) menu "-Use Storage",M_Storage, "-Use Guild Storage",M_GStorage, "-Rent a Cart",M_Cart, "-Use Teleport Service",M_Teleport, "-Cancel",M_End; + + if(getarg(1)==1) menu "-Save",M_Save, "-Use Storage",M_Storage, "-Rent a Cart",M_Cart, "-Kafra Pass",M_Pass, "-Other Information Check",M_Info, + "-Cancel",M_End; + + menu "-Save",M_Save, "-Use Storage",M_Storage, "-Use Teleport Service",M_Teleport, "-Rent a Cart",M_Cart, "-Kafra Pass",M_Pass, + "-Other Information Check",M_Info, "-Cancel",M_End; + + M_Save: + return; + M_Storage: + callfunc "F_KafStor",getarg(0); + next; + goto M_Menu; + M_GStorage: + callfunc "F_KafStor",3; + next; + goto M_Menu; + M_Teleport: + callfunc "F_KafTele",getarg(0); + goto M_Menu; + M_Cart: + if(callfunc("F_KafCart",getarg(0)) == 1) next; + goto M_Menu; + M_Pass: + if(callfunc("F_KafPass") == 1) next; + goto M_Menu; + M_Info: + callfunc "F_KafInfo",getarg(2); + goto M_Menu; + M_End: + callfunc "F_KafEnd",getarg(0),0; + end; +} + + +// Storage Function ======================================================= +function script F_KafStor { + if(getarg(0) == 3) goto L_Guild; + if((class ==Job_Novice) && (JobLevel<6)) goto sL_JbLvl; + if(Class == Job_Novice) set @fee, 30; + if(Class != Job_Novice) set @fee, 60; + if(@kafPass==1 || getarg(0)==2) set @fee, 0; + if(Zeny<@fee) goto sL_Zeny; + set Zeny, Zeny-@fee; + set RESRVPTS, RESRVPTS + (@fee/5); + openstorage; + callfunc "F_KafEnd",getarg(0),0; + end; + + sL_JbLvl: + mes "[Kafra]"; + mes "I am sorry but you have to be at leaset Novice level 6 if you want to use the storage."; + return; + sL_Zeny: + mes "[Kafra]"; + mes "Dear you don't have enough money. The Storage fee is "+@fee+" Zeny."; + return; +L_Guild: + if(guildopenstorage(0) == 1) goto L_InUse; + callfunc "F_KafEnd",0,0; + end; + + L_InUse: + mes "[Kafra]"; + mes "I'm sorry but another guild member is using the guild storage"; + mes "right now. Please wait untill that person is finished."; + close2; + cutin "", 255; + end; + +} + + +// Teleport Function ================================================== +function script F_KafTele { + mes "[Kafra]"; + if (@kafPass==1) mes "Since you're using a Kafra Pass, any warp is free!"; + mes "Please set your destination."; + next; + + menu @wrpC$[0],M_Wrp0, @wrpC$[1],M_Wrp1, @wrpC$[2],M_Wrp2, @wrpC$[3],M_Wrp3, + @wrpC$[4],M_Wrp4, @wrpC$[5],M_Wrp5, @wrpC$[6],M_Wrp6; + + M_Wrp0: + set @num, 0; + goto L_Warp; + M_Wrp1: + set @num, 1; + goto L_Warp; + M_Wrp2: + set @num, 2; + goto L_Warp; + M_Wrp3: + set @num, 3; + goto L_Warp; + M_Wrp4: + set @num, 4; + goto L_Warp; + M_Wrp5: + set @num, 5; + goto L_Warp; + M_Wrp6: + set @num, 6; + + L_Warp: + if (@wrpC$[@num] == "Cancel") return; + if (@kafPass==1) set @wrpP[@num], 0; + if (Zeny<@wrpP[@num]) goto sL_CantTele; + set Zeny, Zeny-@wrpP[@num]; + if (@kafPass==0) set RESRVPTS, RESRVPTS + (@wrpP[@num]/16); + + if (@wrpD$[@num] == "Alberta") warp "alberta.gat", 117, 56; + if (@wrpD$[@num] == "Al De Baran") warp "aldebaran.gat",143,110; + if (@wrpD$[@num] == "Comodo") warp "comodo.gat", 207, 144; + if (@wrpD$[@num] == "Izlude") warp "izlude.gat", 91, 105; + if (@wrpD$[@num] == "Geffen") warp "geffen.gat", 120, 39; + if (@wrpD$[@num] == "Morroc") warp "morocc.gat", 156, 46; + if (@wrpD$[@num] == "Payon") warp "payon.gat", 168, 103; + if (@wrpD$[@num] == "Prontera") warp "prontera.gat", 116, 72; + if (@wrpD$[@num] == "Coal Mine(Dead Pit)") warp "mjolnir_02.gat", 82, 347; + if (@wrpD$[@num] == "Comodo Pharos Lighthouse") warp "cmd_fild07.gat", 127, 134; + if (@wrpD$[@num] == "Orc Dungeon") warp "gef_fild10.gat", 52, 326; + if (@wrpD$[@num] == "Umbala") warp "umbala.gat", 130, 130; + end; + + sL_CantTele: + mes "[Kafra]"; + mes "Dear you don't have enough money. Please check your funds again."; + close2; + cutin "", 255; + end; +} + + +// Cart Function ======================================================== +function script F_KafCart { + if(callfunc("Is_Merc_Class") == 0) goto sL_CantRent; + if(getskilllv(39)==0) goto sL_NeedSkill; + if(checkcart(0) == 1) goto sL_GotCart; + if(getarg(0) == 2) goto L_Guild; + mes "[Kafra]"; + if(@kafPass==0) mes "The Cart Fee is 800 Zeny. Do you want to Rent a Cart?"; + if(@kafPass==1) mes "Since you're using a Kafra Pass, you can rent a cart for free!"; + next; + menu "-Rent a Cart.",-, "-Cancel.",M_End; + + if(Zeny<800 && kafPass==0) goto sL_CartFee; + if(@kafPass==0) set Zeny,Zeny-800; + if(@kafPass==0) set RESRVPTS, RESRVPTS + 48; + L_Guild: + setcart; + mes "[Kafra]"; + mes "Here is your cart."; + return 1; + + sL_CantRent: + mes "[Kafra]"; + mes "I'm sorry dear. The Cart service is only provided for the Merchant and Blacksmith Class."; + return 1; + sL_NeedSkill: + mes "[Kafra]"; + mes "I'm sorry but you need the skill ^0000FF'Pushcart'^000000 to rent a cart."; + return 1; + sL_GotCart: + mes "[Kafra]"; + mes "Excuse me... but you already have a cart...."; + emotion 4; + return 1; + sL_CartFee: + mes "[Kafra]"; + mes "Dear, you don't have enough Money. You need 800 Zeny."; + return 1; + M_End: + return 0; +} + + +// Pass Function =============================================================== +function script F_KafPass { + + sM_Menu: + menu "Use a Kafra Pass.",-, "What is a Kafra Pass?",sM_PassInfo, "Cancel",sM_End; + + mes "[Kafra]"; + mes "Let me just check your pass....."; + next; + if(usedKafPass==0 && countitem(1084)<1) goto sL_NeedPass; + set @kafPass,1; + set usedKafPass, usedKafPass + 1; + if(usedKafPass>=3) goto sL_PassExpire; + if(usedKafPass > 1) goto L_Cont; //fixed Lupus + mes "(you hand her your pass)"; + next; + mes "[Kafra]"; + mes "Great! Everything seems to be in order. Now that your pass is activated, you may rent a cart or use the teleport services for free."; + mes "Your pass number has been entered into our database so you no longer need it."; + delitem 1084,1; + next; + + L_Cont: + mes "[Kafra]"; + mes "You will be able to use the Cart Rental and Teleport services free of charge ^5533FF"+(3 - usedKafPass)+"^000000 more times with any Kafra service agent you choose."; + return 1; + + sL_NeedPass: + mes "[Kafra]"; + mes "I'm sorry but you don't have a kafra pass to use...."; + next; + goto sM_Menu; + sL_PassExpire: + mes "[Kafra]"; + mes "This is going to be the 3rd and final time you use this pass, therefore it is now expired."; + next; + set usedKafPass,0; + mes "[Kafra]"; + mes "You may now use the Teleport and Cart Rental services for free."; + return 1; + sM_PassInfo: + mes "[Kafra]"; + mes "A ^5533FFKafra Pass^000000 is a unique voucher that lets you use Kafra services for free!"; + mes "The Kafra services that you may use for free are the ^FF3355Teleport^000000 service and the ^FF3355Cart Rental^000000 service."; + next; + mes "[Kafra]"; + mes "Kafra passes can be purchased at the Kafra Corp. Main office in Al De Baran."; + next; + mes "[Kafra]"; + mes "To use a Kafra Pass, simply choose the option to 'Use a Kafra Pass', when speaking with a Kafra agent such as myself."; + mes "Your pass number will be entered into our database, and you will then be able to use the Teleport, and Cart Rental Kafra services free of charge."; + next; + mes "[Kafra]"; + mes "Once you have finished using the desired services, and have stoped interacting with the Kafra, your 'free use' session will end."; + mes "You will have a total of ^5533FF 3 'free use' sessions^000000 available upon activation of your Kafra Pass."; + next; + mes "[Kafra]"; + mes "To begin another 'free use' session, simply select the 'Use a Kafra Pass' option when speaking with a Kafra Agent."; + next; + mes "[Kafra]"; + mes "Believe me when I say that the Kafra Pass is a great bargain!!"; + mes "With the Kafra Pass, we hope to give players some incentive to use our great services."; + next; + goto sM_Menu; + + sM_End: + return 0; +} + +// Special Reserve Points Function =========================================== +function script F_KafInfo { + + sM_Menu: + if(getarg(0) == 0) menu "-Special Reserve Check",sM_ResChk, "-Kafra Locations",sM_KafLoc, "-Cancel",sM_End; + + sM_ResChk: + mes "[Kafra]"; + mes "Here is your current amount of special reserve points:"; + mes "^0000ff"+RESRVPTS+"^000000."; + next; + mes "[Kafra]"; + mes "Remember to continue using Kafra services such as Storage and Teleport, to earn more special reserve points."; + next; + mes "[Kafra]"; + mes "You can trade them in at the Kafra Main Office in Al De Baran for usefull items and cool prizes."; + next; + if(getarg(0) == 1) return; + goto sM_Menu; + sM_KafLoc: + mes "[Kafra]"; + mes "The flashing signals on your mini-map point to the locations of all of the Kafra Agents in this city."; + viewpoint 1,@viewpX[0],@viewpY[0],1,0xFF00FF; + viewpoint 1,@viewpX[1],@viewpY[1],2,0xFF00FF; + viewpoint 1,@viewpX[2],@viewpY[2],3,0xFF00FF; + viewpoint 1,@viewpX[3],@viewpY[3],4,0xFF00FF; + next; + viewpoint 2,@viewpX[0],@viewpY[0],1,0xFF00FF; + viewpoint 2,@viewpX[1],@viewpY[1],2,0xFF00FF; + viewpoint 2,@viewpX[2],@viewpY[2],3,0xFF00FF; + viewpoint 2,@viewpX[3],@viewpY[3],4,0xFF00FF; + goto sM_Menu; + sM_End: + return; +} + + +// End Function ===================================================== +// arg(0): used to determine what message to display. +// arg(1): used to determine if save message is diplayed. +//=================================================================== +function script F_KafEnd { + mes "[Kafra]"; + if(getarg(1)==1) mes "Your respawn point has been saved."; // only shown when a player uses save + if(getarg(0)!=1) mes "Thank you for using Kafra Services. We hope to see you again soon."; + if(getarg(0)==1) mes "We, Kafra Corporation.... Will be with you.... whenever.... wherever... therefore.... please don't forget us....."; + close2; + cutin "", 255; + emotion 15; + end; +} diff --git a/npc/kafras/kafras_alb.txt b/npc/kafras/kafras_alb.txt new file mode 100644 index 000000000..adea64b95 --- /dev/null +++ b/npc/kafras/kafras_alb.txt @@ -0,0 +1,67 @@ +//===== eAthena Script ============ +//= Alberta Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +// NorthWest ----------------------------------------------------------------- +alberta.gat,28,229,8 script Kafra 115,{ + cutin "kafra_03",2; + callfunc "F_KafSetAlb"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save Outside City.",sM_Out, "-Save inside City",sM_In; + + sM_Out: + savepoint "pay_fild03.gat",386,76; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "alberta.gat",31,231; + callfunc "F_KafEnd",0,1; +} + +// South --------------------------------------------------------------------- +alberta.gat,113,60,5 script Kafra 112,{ + cutin "kafra_06",2; + callfunc "F_KafSetAlb"; + callfunc "F_Kafra",0,0,0; + + M_Save: + savepoint "alberta.gat",117,57; + callfunc "F_KafEnd",0,1; +} + + +// Function: Sets variables for Ablerta Kafras ------------------------------- +function script F_KafSetAlb { + + setarray @wrpP[0], 900, 1400, 1700, 2400; + setarray @wrpD$[0], "Payon", "Prontera", "Morroc", "Comodo"; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], "Cancel"; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + setarray @viewpX[0], 28, 113, 0, 0; + setarray @viewpY[0], 229, 60, 0, 0; + return; +} diff --git a/npc/kafras/kafras_alde.txt b/npc/kafras/kafras_alde.txt new file mode 100644 index 000000000..61f518e37 --- /dev/null +++ b/npc/kafras/kafras_alde.txt @@ -0,0 +1,51 @@ +//===== eAthena Script ======================================= +//= Al De Baran Kafras +//===== By: ============================ +//= eAthena Dev Team +//===== Current Version: ======================= +//= 2.1b +//===== Compatible With: ============================ +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +// Kafra Main Office (Kafra Leilah) ------------------------------------ +aldeba_in.gat,96,181,4 script Kafra Leilah 113,{ + cutin "kafra_05",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "aldeba_in.gat",96,179; + callfunc "F_KafEnd",0,1; + +} + +// South -------------------------------------------------- +aldebaran.gat,143,119,4 script Kafra 113,{ + cutin "kafra_05",2; + setarray @wrpP[0], 1600, 2000, 1700, 2200; + setarray @wrpD$[0], "Geffen", "Payon", "Coal Mine(Dead Pit)", "Comodo"; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], "Cancel"; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "aldebaran.gat",143,109; + callfunc "F_KafEnd",0,1; +} diff --git a/npc/kafras/kafras_com.txt b/npc/kafras/kafras_com.txt new file mode 100644 index 000000000..31afc191e --- /dev/null +++ b/npc/kafras/kafras_com.txt @@ -0,0 +1,60 @@ +//===== eAthena Script =============== +//= Comodo Kafras +//===== By: ============================ +//= eAthena Dev Team +//===== Current Version: ======================= +//= 2.1b +//===== Compatible With: ============================ +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//= Corrected savepoint for in town kafra.[kobra_k88] +//===================================================================== + + +// In Town ==============================================>\\ +comodo.gat,200,148,4 script Kafra 721,{ + cutin "kafra_07",2; + setarray @wrpD$[0], "Comodo Pharos Lighthouse", "Morroc", "Prontera", "Umbala"; + setarray @wrpP[0], 800, 1500, 2100, 3000; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], "Cancel"; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "comodo.gat",204,143; + callfunc "F_KafEnd",0,1; +} + +// Comodo Pharos Lighthouse (Beacon Island) ===================>\\ +cmd_fild07.gat,135,134,4 script Kafra 721,{ + cutin "kafra_07",2; + setarray @wrpD$[0], "Comodo", "Morroc"; + setarray @wrpP[0], 500, 2500; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], "Cancel"; + set @wrpC$[3], ""; + set @wrpC$[4], ""; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "cmd_fild07.gat",127,134; + callfunc "F_KafEnd",0,1; +} diff --git a/npc/kafras/kafras_dungeons.txt b/npc/kafras/kafras_dungeons.txt new file mode 100644 index 000000000..6c621bd33 --- /dev/null +++ b/npc/kafras/kafras_dungeons.txt @@ -0,0 +1,129 @@ +//===== eAthena Script ================ +//= Kafras in Dungeons and Fields +//===== By: ============================ +//= eAthena Dev Team +//===== Current Version: ======================= +//= 2.1b +//===== Compatible With: ============================ +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ================================= +//= v1.1 Now using functions. Added teleport service for Orc Dungeon +//= and Coal Mine Kafras. +//= v2.1 Fixed bug with Merc job quest kafra.[Lupus] +//= v2.1b Minor changes to function calls. Using arguments. +//= Added ant hell kafras. This version uses arrays .[kobra_k88] +//=============================================================== + + +//<============================= Ant Hell ==============================>\\ +// Mocfild04 ----------------------------------------- +moc_fild04.gat,230,329,3 script Kafra 115,{ + + cutin "kafra_03",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "moc_fild04.gat",231,339; + callfunc "F_KafEnd",0,1; +} + +// Mocfild15 -------------------------------------------- +moc_fild15.gat,264,260,3 script Kafra 115,{ + + cutin "kafra_03",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "moc_fild15.gat",266,271; + callfunc "F_KafEnd",0,1; +} + +//<============================= Byalan Island ============================>\\ +izlu2dun.gat,106,58,8 script Kafra 115,{ + + cutin "kafra_03",2; + if(Class==Job_Novice && job_merchant_q3>0) callfunc "F_MercKafra"; //F_MercKafra found in merchant.txt + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "izlu2dun.gat",87,170; + callfunc "F_KafEnd",0,1; +} + + +//<============================ Culvert Sewers ============================>\\ +prt_fild05.gat,290,224,1 script Kafra 114,{ + cutin "kafra_04",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "prt_fild05.gat",274,243; + callfunc "F_KafEnd",0,1; +} + + +//<=========================== Coal Mine (Dead Pitt) =======================>\\ +mjolnir_02.gat,83,361,4 script Kafra 114,{ + cutin "kafra_04",2; + callfunc "F_KafSetOrcCoal"; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "mjolnir_02.gat",98,352; + callfunc "F_KafEnd",0,1; +} + + +//<=============================== Morroc Ruins ============================>\\ +moc_ruins.gat,61,156,5 script Kafra 114,{ + cutin "kafra_04",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "moc_ruins.gat",41,141; + callfunc "F_KafEnd",0,1; +} + + +//<================================ Orc Dungeon ============================>\\ +gef_fild10.gat,73,340,4 script Kafra 115,{ + cutin "kafra_02",2; + callfunc "F_KafSetOrcCoal"; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "gef_fild10.gat",54,326; + callfunc "F_KafEnd",0,1; +} + +// Function: Sets variables for Kafras at the Orc Dungeon and the Coal Mines +function script F_KafSetOrcCoal { + setarray @wrpD$[0], "Prontera", "Geffen"; + setarray @wrpP[0], 3000, 3000; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], "Cancel"; + set @wrpC$[3], ""; + set @wrpC$[4], ""; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + return; +} + + +//<============================== Treasure Island ==========================>\\ +alb2trea.gat,59,69,1 script Kafra 117,{ + cutin "kafra_01",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "alb2trea.gat",92,64; + callfunc "F_KafEnd",0,1; +} diff --git a/npc/kafras/kafras_gef.txt b/npc/kafras/kafras_gef.txt new file mode 100644 index 000000000..afd211a50 --- /dev/null +++ b/npc/kafras/kafras_gef.txt @@ -0,0 +1,101 @@ +//===== eAthena Script ======================================= +//= Geffen Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +// South ===================================== +geffen.gat,120,62,8 script Kafra 115,{ + cutin "kafra_03",2; + callfunc "F_KafSetGef"; + callfunc "F_Kafra",0,0,0; + + M_Save: + savepoint "geffen.gat",119,40; + callfunc "F_KafEnd",0,1; +} + +// East ============================================== +geffen.gat,203,123,3 script Kafra 114,{ + cutin "kafra_04",2; + callfunc "F_KafSetGef"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out, "-Save inside city.",sM_In; + + sM_Out: + savepoint "gef_fild00.gat",51,194; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "geffen.gat",200,124; + callfunc "F_KafEnd",0,1; +} + +// North ============================================== +geffen.gat,116,202,3 script Kafra 116,{ + cutin "kafra_02",2; + callfunc "F_KafSetGef"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out, "-Save inside city.",sM_In; + + sM_Out: + savepoint "gef_fild04.gat",192,49; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "geffen.gat",110,199; + callfunc "F_KafEnd",0,1; +} + +// West ========================================= +geffen.gat,37,116,6 script Kafra 117,{ + cutin "kafra_01",2; + callfunc "F_KafSetGef"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out, "-Save inside city.",sM_In; + + sM_Out: + savepoint "gef_fild07.gat",330,192; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "geffen.gat",43,108; + callfunc "F_KafEnd",0,1; +} + + +// Function: Sets variables for Geffen Kafras ------------------- +function script F_KafSetGef { + + setarray @wrpD$[0], "Prontera", "Payon", "Al De Baran", "Morroc"; + setarray @wrpP[0], 1400, 1800, 1800, 2200; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], "Cancel"; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + setarray @viewpX[0], 120, 203, 116, 37; + setarray @viewpY[0], 62, 123, 202, 116; + return; +} diff --git a/npc/kafras/kafras_izl.txt b/npc/kafras/kafras_izl.txt new file mode 100644 index 000000000..f3fd63c63 --- /dev/null +++ b/npc/kafras/kafras_izl.txt @@ -0,0 +1,39 @@ +//===== eAthena Script ======================================= +//= Izlude Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +izlude.gat,134,87,3 script Kafra 117,{ + cutin "kafra_01",2; + setarray @wrpD$[0], "Prontera", "Payon", "Geffen"; + setarray @wrpP[0], 900, 1700, 1800; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], "Cancel"; + set @wrpC$[4], ""; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "izlude.gat",96,107; + callfunc "F_KafEnd",0,1; +} diff --git a/npc/kafras/kafras_mor.txt b/npc/kafras/kafras_mor.txt new file mode 100644 index 000000000..5395de0d1 --- /dev/null +++ b/npc/kafras/kafras_mor.txt @@ -0,0 +1,100 @@ +//===== eAthena Script ======================================= +//= Morroc Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +// South ================================ +morocc.gat,156,97,4 script Kafra 115,{ + cutin "kafra_03",2; + callfunc "F_KafSetMoc"; + callfunc "F_Kafra",0,0,0; + + M_Save: + savepoint "morocc.gat",156,46; + callfunc "F_KafEnd",0,1; +} + +// North ================================= +morocc.gat,162,271,4 script Kafra 114,{ + cutin "kafra_04",2; + callfunc "F_KafSetMoc"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "moc_fild07.gat",212,30; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "morocc.gat",157,272; + callfunc "F_KafEnd",0,1; +} + +// West ================================= +morocc.gat,28,167,6 script Kafra 116,{ + cutin "kafra_02",2; + callfunc "F_KafSetMoc"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "moc_fild19.gat",164,107; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "morocc.gat",31,164; + callfunc "F_KafEnd",0,1; +} + +// East ================================= +morocc.gat,292,211,4 script Kafra 112,{ + cutin "kafra_06",2; + callfunc "F_KafSetMoc"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "moc_fild10.gat",24,107; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "morocc.gat",294,207; + callfunc "F_KafEnd",0,1; +} + +// Function: Sets variables for Morroc Kafras -------------------------------- +function script F_KafSetMoc { + + setarray @wrpD$[0], "Comodo", "Prontera", "Payon", "Geffen", "Alberta"; + setarray @wrpP[0], 1400, 1400, 1800, 2100, 2200; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], @wrpD$[4]+" -> "+@wrpP[4]; + set @wrpC$[5], "Cancel"; + set @wrpC$[6], ""; + setarray @viewpX[0], 156, 163, 28, 292; + setarray @viewpY[0], 97, 260, 167, 211; + return; +} diff --git a/npc/kafras/kafras_new.txt b/npc/kafras/kafras_new.txt new file mode 100644 index 000000000..df131c903 --- /dev/null +++ b/npc/kafras/kafras_new.txt @@ -0,0 +1,52 @@ +//===== eAthena Script =========== +//= New Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ============================================== +//= v1.1 Now using functions +//= v2.1 Added Niflheim Kafra by Dizzy +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//========================================================================== + + +// Gonryun ----------------------------------------------------------------- +gonryun.gat,159,122,4 script Kafra 116,{ + cutin "kafra_02",2; + callfunc "F_KafSetYun"; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "gonryun.gat",160,62; + callfunc "F_KafEnd",0,1; +} + +// Umbala Kafra ------------------------------------------------------------ +umbala.gat,128,133,4 script Kafra 115,{ + cutin "kafra_03",2; + callfunc "F_KafSetYun"; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "umbala.gat",126,131; + callfunc "F_KafEnd",0,1; +} + +// Niflheim ---------------------------------------------------------------- +niflheim.gat,190,180,5 script Kafra 791,{ + callfunc "F_Kafra",1,1,1; + + M_Save: + savepoint "niflheim.gat",192,182; + callfunc "F_KafEnd",1,1; diff --git a/npc/kafras/kafras_pay.txt b/npc/kafras/kafras_pay.txt new file mode 100644 index 000000000..e62316f49 --- /dev/null +++ b/npc/kafras/kafras_pay.txt @@ -0,0 +1,65 @@ +//===== eAthena Script ======================================= +//= Payon Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.2 +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ============================================== +//= v1.1 Now using functions +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//= v2.2 New Payon Locations. [Darkchild] +//========================================================================== + + +// Main Town ---------------------------------------------------------------- +payon.gat,181,104,4 script Kafra 113,{ + cutin "kafra_05",2; + callfunc "F_KafSetPay"; + callfunc "F_Kafra",0,0,1; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "pay_fild01.gat",340,347; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "payon.gat",179,97; + callfunc "F_KafEnd",0,1; +} + +// Archer Village ------------------------------------------------------------ +pay_arche.gat,55,123,8 script Kafra 115,{ + cutin "kafra_03",2; + callfunc "F_KafSetPay"; + callfunc "F_Kafra",0,0,1; + + M_Save: + savepoint "pay_arche.gat",49,144; + callfunc "F_KafEnd",0,1; +} + + +// Function: Sets variables for Payon Kafras --------------------------------- +function script F_KafSetPay { + setarray @wrpD$[0], "Alberta", "Prontera", "Morroc"; + setarray @wrpP[0], 1200, 1800, 2000; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], "Cancel"; + set @wrpC$[4], ""; + set @wrpC$[5], ""; + set @wrpC$[6], ""; + return; +} diff --git a/npc/kafras/kafras_pron.txt b/npc/kafras/kafras_pron.txt new file mode 100644 index 000000000..6429bbce1 --- /dev/null +++ b/npc/kafras/kafras_pron.txt @@ -0,0 +1,100 @@ +//===== eAthena Script ======================================= +//= Prontera Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +// North of Prontera================================== +prt_fild01.gat,198,47,8 script Kafra 112,{ + cutin "kafra_06",2; + callfunc "F_Kafra",0,1,1; + + M_Save: + savepoint "prt_fild01.gat",197,50; + callfunc "F_KafEnd",0,1; +} + +// SOUTH ====================================== +prontera.gat,151,29,8 script Kafra 116,{ + cutin "kafra_02",2; + callfunc "F_KafSetPront"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "prt_fild08.gat",170,369; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "prontera.gat",150,33; + callfunc "F_KafEnd",0,1; +} + +//WEST========================================= +prontera.gat,29,207,6 script Kafra 113,{ + cutin "kafra_05",2; + callfunc "F_KafSetPront"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "prt_fild05.gat",367,205; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "prontera.gat",33,208; + callfunc "F_KafEnd",0,1; +} + +// East =========================================== +prontera.gat,282,200,4 script Kafra 115,{ + cutin "kafra_03",2; + callfunc "F_KafSetPront"; + callfunc "F_Kafra",0,0,0; + + M_Save: + menu "-Save outside city.",sM_Out,"-Save inside city.",sM_In; + + sM_Out: + savepoint "prt_fild06.gat",31,192; + callfunc "F_KafEnd",0,1; + sM_In: + savepoint "prontera.gat",281,203; + callfunc "F_KafEnd",0,1; +} + + +// Function: Sets variables for Prontera Kafras ---------------------------- +function script F_KafSetPront { + + setarray @wrpD$[0], "Izlude", "Geffen", "Payon", "Morroc", "Comodo", "Orc Dungeon"; + setarray @wrpP[0], 900, 1400, 1700, 1800, 2100, 1700; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], @wrpD$[4]+" -> "+@wrpP[4]; + set @wrpC$[5], @wrpD$[5]+" -> "+@wrpP[5]; + set @wrpC$[6], "Cancel"; + setarray @viewpX[0], 151, 29, 282, 0; + setarray @viewpY[0], 29, 207, 200, 0; + return; +} diff --git a/npc/kafras/kafras_yun.txt b/npc/kafras/kafras_yun.txt new file mode 100644 index 000000000..3116f74ae --- /dev/null +++ b/npc/kafras/kafras_yun.txt @@ -0,0 +1,71 @@ +//===== eAthena Script ======================================= +//= Yuno Kafras +//===== By: ========================= +//= eAthena Dev Team +//===== Current Version: =================== +//= 2.1b +//===== Compatible With: ===================== +//= eAthena 1.0 +//===== Description: ============================================ +//= Description of argument settings for callfunc "F_Kafra". +//= arg(0): When set at 0 the default Kafra message is displayed. +//= When set to 1 the Niflhiem Kafra message is displayed. +//= When set to 2 the Guild Kafra message is displayed. +//= arg(1): Set to 1 to disable teleport menu option. Otherwise set to 0. +//= arg(2): Set to 1 to disable info menu. Otherwise set to 0. +//===== Additional Comments: ========================================== +//= v1.1 Now using functions :) +//= v2.1b Minor changes to function calls. Using arguments. +//= This version uses arrays .[kobra_k88] +//===================================================================== + + +// Center ------------------------------------------------------------------ +yuno.gat,153,187,6 script Kafra 114,{ + cutin "kafra_04",2; + callfunc "F_KafSetYun"; + callfunc "F_Kafra",0,0,0; + + M_Save: + savepoint "yuno.gat",332,107; + callfunc "F_KafEnd",0,1; +} + +// South East -------------------------------------------------------------- +yuno.gat,328,108,6 script Kafra 113,{ + cutin "kafra_05",2; + callfunc "F_KafSetYun"; + callfunc "F_Kafra",0,0,0; + + M_Save: + savepoint "yuno.gat",332,107; + callfunc "F_KafEnd",0,1; +} + +// East -------------------------------------------------------------------- +yuno.gat,278,221,6 script Kafra 117,{ + cutin "kafra_01",2; + callfunc "F_KafSetYun"; + callfunc "F_Kafra",0,0,0; + + M_Save: + savepoint "yuno.gat",332,107; + callfunc "F_KafEnd",0,1; +} + + +// Function: Sets variables for Yuno Kafras ------------ +function script F_KafSetYun { + setarray @wrpD$[0], "Izlude", "Geffen", "Payon", "Morroc", "Orc Dungeon", "Comodo"; + setarray @wrpP[0], 1000, 1400, 1700, 1800, 2500, 3000; + set @wrpC$[0], @wrpD$[0]+" -> "+@wrpP[0]; + set @wrpC$[1], @wrpD$[1]+" -> "+@wrpP[1]; + set @wrpC$[2], @wrpD$[2]+" -> "+@wrpP[2]; + set @wrpC$[3], @wrpD$[3]+" -> "+@wrpP[3]; + set @wrpC$[4], @wrpD$[4]+" -> "+@wrpP[4]; + set @wrpC$[5], @wrpD$[5]+" -> "+@wrpP[5]; + set @wrpC$[6], "Cancel"; + setarray @viewpX[0], 328, 278, 153, 0; + setarray @viewpY[0], 108, 221, 187, 0; + return; +} diff --git a/npc/merchants/2-2shop.txt b/npc/merchants/2-2shop.txt new file mode 100644 index 000000000..c8d9edc9b --- /dev/null +++ b/npc/merchants/2-2shop.txt @@ -0,0 +1 @@ +prontera.gat,155,211,5 shop 2-2 Class Shop 86,1950:-1,1952:-1,1954:-1,1956:-1,1958:-1,1960:-1,1801:-1,1803:-1,1805:-1,1811:-1,1809:-1,1901:-1,1903:-1,1905:-1,1909:-1,1911:-1,1907:-1,1550:-1,1551:-1,1552:-1,1553:-1,1554:-1,1555:-1,1556:-1,1557:-1,1558:-1,2341:-1,2343:-1 \ No newline at end of file diff --git a/npc/merchants/alchemist.txt b/npc/merchants/alchemist.txt new file mode 100644 index 000000000..41f8d1e8f --- /dev/null +++ b/npc/merchants/alchemist.txt @@ -0,0 +1,120 @@ +//===== eAthena Script ======================================= +//= Alchemist Shop +//===== By: ================================================== +//= Darkchild (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0+ +//===== Description: ========================================= +//= Selling Alchemist Shit :) +//===== Additional Comments: ================================= +//= Working. +//============================================================ +alde_alche.gat,24,188,3 script Gever AI Sharp 740, +{ + mes "[Gever AI Sharp]"; + mes "Welcome to the Alchemist Union."; + mes "How can I assist you today?"; + next; + menu "Purchase materials.",M_Material, "Purchase a production manual.",M_Manual, "Cancel Deal.", M_Bye; + + M_Material: + mes "[Gever AI Sharp]"; + mes "What would you like?"; + next; + menu "Medicine Bowl - 8z",-,"Cancel.",M_Bye; + + mes "[Gever AI Sharp]"; + mes "How many do you want?"; + mes "Enter '0' if you want to quit."; + next; + input @num; + if((@num < 1) || (@num > 10000)) goto M_Bye; + set @price,@num * 8; + mes "[Gever AI Sharp]"; + if(zeny < @price) goto sL_NoZeny; + if (checkweight(@item,@num) == 0) goto sL_OverW; + set zeny,Zeny-@price; + getitem 7134,@num; + goto L_Bye; + M_Manual: + mes "[Gever AI Sharp]"; + mes "What do you need?"; + mes "Manuals are generally 100,000 zeny."; + mes "Except for a couple of special manuals."; + next; + menu "Potion Creation Guide",sM_Pot, "Alchohol Creation Guide",sM_Alc, "Bottle Grenade Creation Guide",sM_Gren, + "Acid Bottle Creation Guide",sM_Acid, "Plant Bottle Creation Guide",sM_Plant, "Marine Sphere Bottle Creation Guide",sM_Mar, + "Glistening Coat Creation Guide",sM_Coat, "Concentration Potion Creation Guide",sM_Con, "Cancel Deal.",M_Bye; + sM_Pot: + set @itemid,7144; + set @price,100000; + set @itemname$,"Potion"; + goto L_Choice; + sM_Alc: + set @itemid,7127; + set @price,100000; + set @itemname$,"Alchohol"; + goto L_Choice; + sM_Gren: + set @itemid,7128; + set @price,100000; + set @itemname$,"Bottle Grenade"; + goto L_Choice; + sM_Acid: + set @itemid,7129; + set @price,100000; + set @itemname$,"Acid Bottle"; + goto L_Choice; + sM_Plant: + set @itemid,7130; + set @price,100000; + set @itemname$,"Plant Bottle"; + goto L_Choice; + sM_Mar: + set @itemid,7131; + set @price,100000; + set @itemname$,"Marine Sphere Bottle"; + goto L_Choice; + sM_Coat: + set @itemid,7132; + set @price,100000; + set @itemname$,"Glistening Coat"; + goto L_Choice; + sM_Con: + set @itemid,7133; + set @price,240000; + set @itemname$,"Concentration Potion"; + goto L_Choice; + L_Choice: + mes "[Gever AI Sharp]"; + mes "An " + @itemname$ + " Creation Guide??"; + if(@price == 100000) mes "That will be 100,000 Zeny"; + if(@price == 240000) mes "That will be 240,000 Zeny"; + next; + menu "Purchase.",-,"Quit.",M_Bye; + + mes "[Gever AI Sharp]"; + if(zeny < @price) goto sL_NoZeny; + if (checkweight(@itemid,1) == 0) goto sL_OverW; + getitem @itemid,1; + set zeny,zeny-@price; + L_Bye: + mes "Thank you for buying!"; + mes "Come again."; + close; + + sL_NoZeny: + mes "You dont seem to have enough money."; + close; + sL_OverW: + mes "Hmm.... it seems that you are overweight..."; + close; + + + M_Bye: + mes "[Gever AI Sharp]"; + mes "Then come again next time."; + close; +} diff --git a/npc/merchants/clothes_dyer.txt b/npc/merchants/clothes_dyer.txt new file mode 100644 index 000000000..374435892 --- /dev/null +++ b/npc/merchants/clothes_dyer.txt @@ -0,0 +1,325 @@ +//===== eAthena Script ======================================= +//= Clothes Dyer +//===== By: ================================================== +//= Usnul +//===== Current Version: ===================================== +//= 2.0 +//===== Compatible With: ===================================== +//= eAthena 1.0+ +//===== Description: ========================================= +//= Clothes dyer with standard palletes +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + +// Dyer Ginedin Rephere --------------------------------------------------- +prt_in.gat,284,168,2 script Dyer Ginedin Rephere 55,{ + mes "[Dyer Ginedin Rephere]"; + mes "11... 12... Mmm... good. I think I'll be able ot finish before tonights party. Oh! I didn't notice that you were here. Anyway how may I assist you?"; +M_Menu: + next; + menu "-Talk",L_Talk, "-Dye Clothing",L_Dye, "-Price list",L_PriceList, "-Cancel",L_End; + + L_Talk: + mes "[Dyer Ginedin Rephere]"; + mes "Life may have gotten a little better.... but when I look at all of the orders I've recieved... Whew!"; + mes "It seems that the young women of Rune Midgard must be very well off these days."; + next; + mes "[Dyer Ginedin Rephere]"; + mes "Not that I think that they are indulging in anything luxurious mind you."; + mes "I don't think there is anything wrong with the pursuit of beauty and being fashionable."; + next; + mes "[Dyer Ginedin Rephere]"; + mes "For us humans, who have no colorful fur or decorative scales, clothes are one of the few ways we have to display our personality, style, and beauty."; + next; + mes "[Dyer Ginedin Rephere]"; + mes "Haha... When I think about it, I really feel that my job is worthwhile. I believe that I provide a service that the people desire."; + next; + mes "[Dyer Ginedin Rephere]"; + mes "Can you feel it too? The energy that is released when rough fabric and leather are brought to life with color?....."; + next; + mes "[Dyer Ginedin Rephere]"; + mes "Although the process is very tedious and time consuming, the joy and happiness I feel when a dress is finished....."; + mes "more than makes up for all of the hard work!!"; + goto M_Menu; + + L_Dye: + mes "[Dyer Ginedin Rephere]"; + if(Class==0) goto sL_Novice; + mes "Oh... you need my work? Well... okay sounds good."; + next; + mes "[Dyer Ginedin Rephere]"; + mes "Please choose a color that suits you."; + next; + if(Sex==0) goto Female_dye; +//================================= +// Clothing Dyeing for Males +//================================= + +Male_dye: + //1 Class + if(Class==5 || Class==1) goto L_Wiz_Hunt_Bard_SN_M; + if(Class==2) goto L_Mage_M; + if(Class==3) goto L_Archer_M; + if(Class==4) goto L_Aco_M; + if(Class==6) goto L_Thief_M; + + //2 Class + if(Class==7 || Class==14) goto L_Knight_Crus_M; + if(Class==8 || Class==15) goto L_Priest_Monk_M; + if(Class==9 || Class==11 || Class==19 || Class==23) goto L_Wiz_Hunt_Bard_SN_M; + if(Class==10 || Class==18) goto L_BlackSmith_Alchemist_M; + if(Class==12) goto L_Assassin_M; + if(Class==17) goto L_Rogue_M; + + //1 Class + L_Mage_M: + set @red, 1; + set @violet, 2; + set @orange, 3; + set @white, 4; + menu "- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Orange",L_Dye_Orange,"- White",L_Dye_White,"- Cancel",L_End; + L_Archer_M: + set @red, 1; + set @violet, 2; + set @green, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Aco_M: + set @blue, 1; + set @red, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Thief_M: + set @blue, 1; + set @red, 2; + set @green, 3; + set @white, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Cancel",L_End; + + //2 Class + L_Knight_Crus_M: + set @orange, 1; + set @violet, 2; + set @red, 3; + set @black, 4; + menu "- Orange",L_Dye_Orange,"- Violet",L_Dye_Violet,"- Red",L_Dye_Red,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Priest_Monk_M: + set @blue, 1; + set @green, 2; + set @red, 3; + set @white, 4; + menu "- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Cancel",L_End; + L_Wiz_Hunt_Bard_SN_M: + set @red, 1; + set @blue, 2; + set @green, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End; + L_BlackSmith_Alchemist_M: + set @red, 1; + set @green, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Assassin_M: + set @blue, 1; + set @red, 2; + set @green, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Rogue_M: + set @red, 2; + set @green, 3; + menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Cancel",L_End; + +//================================= +// Clothing Dyeing for Females +//================================= +Female_dye: + //1 Class + if(Class==1 || Class==4) goto L_Sword_Aco_F; + if(Class==2) goto L_Knight_Crus_F; + if(Class==3) goto L_Priest_F; + if(Class==5) goto L_Merch_F; + //2 Class + if(Class==7 || Class==14) goto L_Knight_Crus_F; + if(Class==8) goto L_Priest_F; + if(Class==9 || Class==16) goto L_Wiz_Sage_F; + if(Class==10 || Class==18) goto L_BlackSmith_Alchemist_F; + if(Class==11 || Class==20) goto L_Hunt_Dancer_F; + if(Class==12 || Class==17) goto L_Assassin_Rogue_F; + if(Class==23) goto L_SN_F; + + //1 Class + L_Sword_Aco_F: + set @blue, 1; + set @red, 2; + set @green, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Merch_F: + set @violet, 1; + set @blue, 2; + set @green, 3; + set @black, 4; + menu "- Violet",L_Dye_Violet,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Thief_F: + set @blue, 1; + set @red, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + + //2 Class + L_Knight_Crus_F: + set @red, 1; + set @blue, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Priest_F: + set @red, 1; + set @green, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Wiz_Sage_F: + set @red, 1; + set @blue, 2; + set @white, 3; + set @green, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Green",L_Dye_Green,"- Cancel",L_End; + L_Hunt_Dancer_F: + set @red, 1; + set @blue, 2; + set @green, 3; + set @violet, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Cancel",L_End; + L_BlackSmith_Alchemist_F: + set @red, 1; + set @green, 2; + set @violet, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Black",L_Dye_Black,"- Cancel",L_End; + L_Assassin_Rogue_F: + set @red, 1; + set @yellow, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Yellow",L_Dye_Yellow,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + L_SN_F: + set @blue, 1; + set @red, 2; + set @white, 3; + set @black, 4; + menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End; + +L_Dye_Orange: + mes "[Dyer Ginedin Rephere]"; + if(countitem(980) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes Orange."; + setlook 7,@orange; + delitem 980,1; + set Zeny, Zeny - 10000; + close; +L_Dye_Violet: + mes "[Dyer Ginedin Rephere]"; + if(countitem(981) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes Violet."; + setlook 7,@violet; + delitem 981,1; + set Zeny, Zeny - 10000; + close; +L_Dye_Red: + mes "[Dyer Ginedin Rephere]"; + if(countitem(975) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes red."; + setlook 7,@red; + delitem 975,1; + set Zeny, Zeny - 10000; + close; +L_Dye_Black: + mes "[Dyer Ginedin Rephere]"; + if(countitem(983) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes black."; + setlook 7,@black; + delitem 983,1; + set Zeny, Zeny - 10000; + close; +L_Dye_Green: + mes "[Dyer Ginedin Rephere]"; + if(countitem(979) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes green."; + setlook 7,@green; + delitem 979,1; + set Zeny, Zeny - 10000; + close; +L_Dye_Blue: + mes "[Dyer Ginedin Rephere]"; + if(countitem(978) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes blue."; + setlook 7,@blue; + delitem 978,1; + set Zeny, Zeny - 10000; + close; +L_Dye_White: + mes "[Dyer Ginedin Rephere]"; + if(countitem(982) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes white."; + setlook 7,@white; + delitem 982,1; + set Zeny, Zeny - 10000; + close; +L_Dye_Yellow: + mes "[Dyer Ginedin Rephere]"; + if(countitem(976) < 1) goto sL_NoDye; + if(Zeny < 10000) goto sL_Zeny; + mes "Ok. I will dye you clothes yellow."; + setlook 7,@yellow; + delitem 976,1; + set Zeny, Zeny - 10000; + close; + + sL_Sorry: + mes "Wow, your clothes is very strange, I haven't seen anything like it before . Hmmm... I'm sorry, but there is no way I can paint it."; + close; + sL_NoDye: + mes "For me to dye your clothes, I'll need the appropriate Dyestuff. Please check my price list for the information."; + next; + goto L_PriceList; + + sL_Zeny: + mes "I'm sorry but you don't have enough money."; + close; + + sL_Novice: + mes "I'm sorry, but first you need to get a job."; + close; + + + L_PriceList: + mes "[Dyer Ginedin Rephere]"; + mes "Here is the list of colors you can choose from and their prices:"; + mes " - Red: 10000 zeny, 1 Scarlet Dyestuff"; + mes " - Yellow: 10000 zeny, 1 Lemon Dyestuff"; + mes " - Violet: 10000 zeny, 1 Violet Dyestuff"; + mes " - Orange: 10000 zeny, 1 Orange Dyestuff"; + mes " - Blue: 10000 zeny, 1 CobaltBlue Dyestuff"; + mes " - Green: 10000 zeny, 1 DarkGreen Dyestuff"; + goto M_Menu; + + L_End: + mes "[Dyer Ginedin Rephere]"; + mes "Make yourself at home. Even though I don't have time for you."; + close; +} diff --git a/npc/merchants/custom/breeder.txt b/npc/merchants/custom/breeder.txt new file mode 100644 index 000000000..76fe3a700 --- /dev/null +++ b/npc/merchants/custom/breeder.txt @@ -0,0 +1,67 @@ +//Peco Peco breeder for Knight by Darkchild v1.1 +//FIXED checkriding/cart/falcon funcs [Lupus] + +prontera.gat,122,200,1 script Universal Rental Npc 726,{ +mes "[Universal Rental Npc]"; +mes "Hi, here you can rent Carts, Falcons or Pecopecos."; +next; +L_Menu: +menu "Rent a Cart",L_Cart,"Rent a Falcon",L_Falcon,"Rent a Pecopeco",L_Peco,"Quit",L_Quit; +close; +L_Cart: +if(Class == 5 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 10 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 18 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 4006 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 4011 && checkcart(0) == 0) goto L_Cart_Ok; +if(Class == 4019 && checkcart(0) == 0) goto L_Cart_Ok; +if(getskilllv(39)<1) goto L_Need_Skill; +mes "[Universal Rental Npc]"; +mes "Sorry " + strcharinfo(0) + " but I only rent carts to Merchants, Blacksmiths and Alchimists who have enough skills to handle a cart."; +close; +L_Cart_Ok: + setcart; + goto L_Quit2; +L_Need_Skill: +mes "[Universal Rental Npc]"; +mes "Sorry you don't have the required skill to rent a cart."; +close; +L_Falcon: + if(Class == 11 && checkfalcon(0) == 0) goto L_falc; + if(Class == 4012 && checkfalcon(0) == 0) goto L_falc; + if(getskilllv(127)<1) goto L_Need_Skill2; + mes "[Universal Rental Npc]"; + mes "Sorry " + strcharinfo(0) + " but I only rent falcons to Hunters who the ability to handle 'em."; + close; + L_falc: + setfalcon; + goto L_Quit2; +L_Need_Skill2: +mes "[Universal Rental Npc]"; +mes "Sorry you don't have the required skill to own a Falcon."; +close; +L_Peco: +if (Class == 7 && checkriding(0) == 0) goto L_Peco_Ok; +if (Class == 14 && checkriding(0) == 0) goto L_Peco_Ok; +if (Class == 4008 && checkriding(0) == 0) goto L_Peco_Ok; +if (Class == 4015 && checkriding(0) == 0) goto L_Peco_Ok; +if(getskilllv(63)<1) goto L_Need_Skill3; +mes "[Universal Rental Npc]"; +mes "Sorry" + strcharinfo(0) + "but I only rent pecopecos to Knight and Crusader who have the ability to handle 'em"; +close; +L_Peco_Ok: +setriding; +goto L_Quit2; +L_Need_Skill3: +mes "[Universal Rental Npc]"; +mes "Sorry you don't have the required skill to ride a Peco Peco."; +close; +L_Quit: +mes "[Universal Rental Npc]"; +mes strcharinfo(0) + ", please come back when you are ready to rent something."; +close; +L_Quit2: +mes "[Universal Rental Npc]"; +mes strcharinfo(0) + ", please come again when you want another..."; +close; +} \ No newline at end of file diff --git a/npc/merchants/custom/dye.txt b/npc/merchants/custom/dye.txt new file mode 100644 index 000000000..0c5d19741 --- /dev/null +++ b/npc/merchants/custom/dye.txt @@ -0,0 +1,176 @@ +//===== eAthena Script ======================================= +//= Stylist & Tailor Script (former Dye Script) +//===== By: ================================================== +//= eAthena Dev team +//= Revised by Nekosume [pyRO v3.0] +//===== Current Version: ===================================== +//= 4.0 +//===== Compatible With: ===================================== +//= Any eAthena Version +//===== Description: ========================================= +//= Revised dye NPC, split into two NPCs, one for hair color +//= and style, the other for clothes color. +//===== Additional Comments: ================================= +//= v4.0 - Refined and Combined [Darkchild] +//= v3.0 - Added the 'Browse' options +//= v2.5 - Added more hair colors +//= v2.0 - Changed palette and hair style select +//= v1.5 - Revised script / different dialog +//= v1.0 - Split into two NPCs +//============================================================ + + +//Stylist------------------------------------------------------------------------------------------------------------ +prontera.gat,149,189,1 script Stylist 122,{ + mes "[^FF8000Stylist^000000]"; + mes "I'm the greatest stylist in all of Rune-Midgard~~!"; + mes "I can change your hair style or color!"; + mes "What do you wish to change?"; + next; + menu "Hair style",Lstyle,"Hair color",Lcolor,"Cloth Color",Lcloth,"Nothing",LCancel; + + Lstyle: + mes "[^FF8000Stylist^000000]"; + mes "Do you want to browse through the choices, or do you know what you want?"; + next; + menu "Browse",Lbrowsesty,"I know what I want",Lwantsty; + + Lwantsty: + mes "[^FF8000Stylist^000000]"; + mes "Great! Now just pick a style and I'll get started!"; + next; + mes "[^FF8000Stylist^000000]"; + mes "Please pick a style number ^0000FFbetween 0 and 18^000000."; + mes "Number 0, by the way, is the default style for your character."; + next; + input @sty; + if (@sty>18) close; + if (@sty<0) close; + setlook 1,@sty; + next; + mes "[^FF8000Stylist^000000]"; + mes "Is this good, or do you want a different style?"; + next; + menu "This is good",-,"Different style, please",Lwantsty; + next; + mes "[^FF8000Stylist^000000]"; + mes "You look great~! Come back again, okay?"; + close; + + Lbrowsesty: + set @look, -1; + mes "[^FF8000Stylist^000000]"; + mes "Okay, here we go~! Just stop me when you see something you like, okay?"; + next; + + Lbrowserep: + set @look,@look+1; + setlook 1,@look; + mes "This is Pallete Number^FF9009 "+@look+" ^000000!"; + if(@look == 18) menu "Back To The Begin",Lbrowsesty,"I like this one",Lstop; + if(@look != 18) menu "Keep going",Lbrowserep,"I like this one",Lstop; + + Lcolor: + mes "[^FF8000Stylist^000000]"; + mes "Do you want to browse through the choices, or do you know what you want?"; + next; + menu "Browse",Lbrowsecolor,"I know what I want",Lwantcolor; + + Lwantcolor: + mes "[^FF8000Stylist^000000]"; + mes "Just pick a color and we can get started."; + next; + mes "[^FF8000Stylist^000000]"; + mes "Please pick a style number ^0000FFbetween 0 and 20^000000."; + mes "Number 0, by the way, is the default color for your character."; + next; + mes "[^FF8000Stylist^000000]"; + mes "0 is default..."; + mes "1 is blonde..."; + mes "2 is lavender..."; + mes "3 is brown..."; + mes "4 is green..."; + mes "5 is blue..."; + mes "6 is white..."; + mes "7 is black..."; + mes "8 is red..."; + mes "and 9-20 are new colors."; + input @color; + if (@color>20) close; + if (@color<0) close; + setlook 6,@color; + next; + mes "[^FF8000Stylist^000000]"; + mes "Is this good, or do you want a different color?"; + next; + menu "This is good",-,"Different color, please",Lwantcolor; + next; + mes "[^FF8000Stylist^000000]"; + mes "You look great~! Come back again, okay?"; + close; + + Lbrowsecolor: + set @look, -1; + mes "[^FF8000Stylist^000000]"; + mes "Okay, here we go~! Just stop me when you see something you like, okay?"; + next; + + Lbrowsecolorrep: + set @look,@look+1; + setlook 6,@look; + mes "This is Pallete Number^FF9009 "+@look+" ^000000!"; + if(@look == 20) menu "Back To The Begin",Lbrowsecolor,"I like this one",Lstop; + if(@look != 20) menu "Keep going",Lbrowsecolorrep,"I like this one",Lstop; + + Lstop: + mes "[^FF8000Stylist^000000]"; + mes "You look great~! I love it~! ^_^"; + close; + + LCancel: + mes "[^FF8000Stylist^000000]"; + mes "Well come again."; + close; + + Lcloth: + mes "[^FF8000Stylist^000000]"; + mes "Do you want to browse through the choices, or do you know what you want?"; + next; + menu "Browse",Lbrowsecloth,"I know what I want",Lwantcloth; + + Lwantcloth: + mes "[^FF8000Stylist^000000]"; + mes "Great! Now just pick a pallete and I'll get started!"; + next; + mes "[^FF8000Stylist^000000]"; + mes "Please pick a style number ^0000FFbetween 0 and 77^000000."; + mes "Number 0, by the way, is the default style for your character."; + next; + input @pal; + if (@pal>77) close; + if (@pal<0) close; + setlook 7,@pal; + next; + mes "[^FF8000Stylist^000000]"; + mes "Is this good, or do you want a different pallet"; + next; + menu "This is good",-,"Different pallet, please",Lwantcloth; + next; + mes "[^FF8000Stylist^000000]"; + mes "You look great~! Come back again, okay?"; + close; + + Lbrowsecloth: + set @look, -1; + mes "[^FF8000Stylist^000000]"; + mes "Okay, here we go~! Just stop me when you see something you like, okay?"; + next; + + Lbrowseclothrep: + set @look,@look+1; + setlook 7,@look; + mes "This is Pallete Number^FF9009 "+@look+" ^000000!"; + if(@look == 77) menu "Back To The Begin",Lbrowsecloth,"I like this one",Lstop; + if(@look != 77) menu "Keep going",Lbrowseclothrep,"I like this one",Lstop; +} + diff --git a/npc/merchants/dye_maker.txt b/npc/merchants/dye_maker.txt new file mode 100644 index 000000000..d8b1cb181 --- /dev/null +++ b/npc/merchants/dye_maker.txt @@ -0,0 +1,277 @@ +//===== eAthena Script ======================================= +//= Dye Maker +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + +// Dye Maker JavaDullihan ======================= +morocc_in.gat,146,99,2 script Dye Maker JavaDullihan 122, +{ + mes "[Dye Maker JavaDullihan]"; + mes "Oh... What a Beautiful day today."; + mes "This is a perfect day to make Dyestuffs"; + next; + menu "-Talk",M_Talk,"-Make Dyestuffs",M_Make,"-Cancel",M_End; + + M_Talk: + mes "[Dye Maker JavaDullihan]"; + mes "I don't have much to say..."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "But if you want to know about my past, I'm sure I have a few stories to tell."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "Would you like to here some?"; + next; + menu "-Sure, why not.",sM_0a,"-Maybe some other time.",sM_0b; + + sM_0a: + mes "[Dye Maker JavaDullihan]"; + mes "My father had been making dyestuffs since I was young... .."; + mes "I can still picture him making dyestuffs all day long."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "Even durring the time of my mother's passing, my father kept making dyestuffs without end."; + mes "This made me angry at him. How could he keep making dyestuffs at a time like that?"; + next; + mes "[Dye Maker JavaDullihan]"; + mes "I just couldn't understand what my father was thinking. I became very disapointed in him."; + mes "My fathers actions made me despise Dye Making, so I ran away from home. I survived by doing a variety of odd jobs."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "However, as you can see, I ended up becoming a Dye Maker just like my father."; + mes "It's been 15 years since I first started making these goddamn things..."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "Now that I've been doing this for as long as I have... I think I can finally understand why my father fell in love with his job."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "Why he sacrificed everything he had for this job..."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "Maybe it was because of how the colors got more and more beautifull each time..."; + mes "Maybe he wanted to find his own perfet color..."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "I now have his feel for the colors... because... I am working with the same passion he had when he was living."; + mes "I am able to feel the colors from within my soul. I know it's hard to understand, but you will see what I mean."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "Father, I make these dyes for you...."; + close; + + sM_0b: + mes "[Dye Maker JavaDullihan]"; + mes "Hahahaha... I guess I can't blame ya, who wants to here about a plain old dye maker's life anyhow.... Hahahaha..."; + close; + + M_Make: + mes "[Dye Maker JavaDullihan]"; + mes "Alright! I will make the exact color you want. The cost of the dyestuff will depend on its quality."; + mes "Don't not be itimitaded by the prices, they are all my Masterpieces."; + next; + mes "[Dye Maker JavaDullihan]"; + mes "So what color do you want?"; + next; + menu "-Scarlet Dyestuffs",sM_Scarlet, "-Lemon Dyestuffs",sM_Lemon, "-Cobaltblue Dyestuffs",sM_Cobaltblue, + "-Darkgreen Dyestuffs",sM_Darkgreen, "-Orange Dyestuffs",sM_Orange, "-Violet Dyestuffs",sM_Violet, + "-White Dyestuffs",sM_White, "-Black Dyestuffs",sM_Black; + + sM_Scarlet: + mes "[Dye Maker JavaDullihan]"; + mes "Hmm... To make a Scarlet Dyestuffs, I need ^0000ff30 Red Herbs, 1 Counteragent and 1 Empty Bottle^000000."; + mes "The cost of labor will be 3000 Zeny. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make0, "Cancel",sm_Cancel; + + sm_Make0: + mes "[Dye Maker JavaDullihan]"; + if((countitem(507) < 30) || (countitem(973) < 1) || (countitem(713) < 1)) goto sl_LowItems; + if(Zeny < 3000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 507,30; + delitem 973,1; + delitem 713,1; + set Zeny, Zeny - 3000; + getitem 975,1; + close; + + sM_Lemon: + mes "[Dye Maker JavaDullihan]"; + mes "Um... to make a Lemon Dyestuffs I need ^0000ff30 Yellow Herbs, 1 Counteragent, and 1 Empty Bottle^000000."; + mes "The cost of labor will be 3000 Zeny. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make1,"Cancel",sm_Cancel; + + sm_Make1: + mes "[Dye Maker JavaDullihan]"; + if((countitem(508) < 30) || (countitem(973) < 1) || (countitem(713) < 1)) goto sl_LowItems; + if(Zeny < 3000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 508,30; + delitem 973,1; + delitem 713,1; + set Zeny, Zeny - 3000; + getitem 976,1; + close; + + sM_Cobaltblue: + mes "[Dye Maker JavaDullihan]"; + mes "Hmm... To make a Cobaltblue Dyestuffs, I need ^0000ff20 Blue Herbs, 1 Counteragent, and 1 Empty Bottle^000000."; + mes "Blue Herbs are a little bit difficult to work with, so the cost of labor will be 3500 Zeny. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make2,"Cancel",sm_Cancel; + + sm_Make2: + mes "[Dye Maker JavaDullihan]"; + if((countitem(510) < 20) || (countitem(973) < 1) || (countitem(713) < 1)) goto sl_LowItems; + if(Zeny < 3500) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 510,20; + delitem 973,1; + delitem 713,1; + set Zeny, Zeny - 3500; + getitem 978,1; + close; + + sM_Darkgreen: + mes "[Dye Maker JavaDullihan]"; + mes "Hmm... To make a Darkgreen Dyestuffs, I need ^0000ff5 Blue Herbs, 20 Green Herbs, 20 Yellow Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle^000000."; + mes "There are a lot of ingredients so please try to remember them all. The cost of labore will be 5000 Zeny. Are you still interested?"; + mes "Ok are you ready?"; + next; + menu "Make Dyestuffs",sm_Make3,"Cancel",sm_Cancel; + + sm_Make3: + mes "[Dye Maker JavaDullihan]"; + if((countitem(510) < 5) || (countitem(511) < 20) || (countitem(508) < 20) || (countitem(973) < 1) || (countitem(974) < 1) || (countitem(713)<1)) goto sl_LowItems; + if(Zeny < 5000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 510,5; + delitem 511,20; + delitem 508,20; + delitem 973,1; + delitem 977,1; + delitem 713,1; + set Zeny, Zeny - 5000; + getitem 979,1; + close; + + sM_Orange: + mes "[Dye Maker JavaDullihan]"; + mes "Hmm... To make a Orange Dyestuffs, I need ^0000ff20 Red Herbs, 20 Yellow Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle^000000."; + mes "The cost of labor is 5000 Zeny. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make4,"Cancel",sm_Cancel; + + sm_Make4: + mes "[Dye Maker JavaDullihan]"; + if((countitem(507) < 20) || (countitem(508) < 20) || (countitem(973) < 1) || (countitem(974) < 1) || (countitem(713) < 1)) goto sl_LowItems; + if(Zeny < 5000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 507,20; + delitem 508,20; + delitem 973,1; + delitem 977,1; + delitem 713,1; + set Zeny, Zeny - 5000; + getitem 980,1; + close; + + sM_Violet: + mes "[Dye Maker JavaDullihan]"; + mes "Hmm... To make a Violet Dyestuffs, I need ^0000ff10 Blue Herbs, 30 Red Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle^000000."; + mes "The cost of labor will be 5000 Zeny. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make5,"Cancel",sm_Cancel; + + sm_Make5: + mes "[Dye Maker JavaDullihan]"; + if((countitem(510) < 10) || (countitem(507) < 20) || (countitem(973) < 1) || (countitem(974) < 1) || (countitem(713) < 1)) goto sl_LowItems; + if(Zeny < 5000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 510,10; + delitem 507,20; + delitem 973,1; + delitem 974,1; + delitem 713,1; + set Zeny, Zeny - 5000; + getitem 981,1; + close; + + sM_White: + mes "[Dye Maker JavaDullihan]"; + mes "Umm... To make a White Dyestuffs, I need ^0000ff30 White Herbs, 1 Counteragent, and 1 Empty Bottle^000000."; + mes "The cost of labor will be 3000 Zeny. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make6,"Cancel",sm_Cancel; + + sm_Make6: + mes "[Dye Maker JavaDullihan]"; + if((countitem(509) < 30) || (countitem(973) < 1) || (countitem(713) < 1)) goto sl_LowItems; + if(Zeny < 3000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 509,30; + delitem 973,1; + delitem 713,1; + set Zeny, Zeny - 3000; + getitem 982,1; + close; + + sM_Black: + mes "[Dye Maker JavaDullihan]"; + mes "Hmm... To make a Black Dyestuffs, I need ^0000ff30 Red, Yellow, and Green Herbs, 5 Blue Herbs, 1 Counteragent, 1 Mixture, and 1 Empty Bottle^000000."; + mes "This is the most difficult and time consuming dye to make, so I will have to charge a 7000 Zeny labor fee. Are you still interested?"; + next; + menu "Make Dyestuffs",sm_Make7,"Cancel",sm_Cancel; + + sm_Make7: + mes "[Dye Maker JavaDullihan]"; + if((countitem(507) < 30) || (countitem(508) < 30) || (countitem(511) < 30) || (countitem(510) < 5) || (countitem(973) < 1) || (countitem(974) < 1) || (countitem(713)<1)) goto sl_LowItems; + if(Zeny < 7000) goto sl_LowZeny; + mes "Missing text."; + mes "Under development"; + delitem 507,30; + delitem 508,30; + delitem 511,30; + delitem 510,5; + delitem 973,1; + delitem 974,1; + delitem 713,1; + set Zeny, Zeny - 7000; + getitem 983,1; + close; + + + sl_LowItems: + mes "Hmm... you don't have enough of the items needed for the dyestuffs. Come back when you do."; + close; + + sl_LowZeny: + mes "You don't have enough zeny. I need to make a living ya know...."; + close; + + sm_Cancel: + mes "[Dye Maker JavaDullihan]"; + mes "How could you have change your mind so quickly?... oh boy..."; + close; + M_End: + close; +} diff --git a/npc/merchants/grandpa_pharmacist.txt b/npc/merchants/grandpa_pharmacist.txt new file mode 100644 index 000000000..35e662a85 --- /dev/null +++ b/npc/merchants/grandpa_pharmacist.txt @@ -0,0 +1,186 @@ +//===== eAthena Script ======================================= +//= Grandpa Pharmacist +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= trade in items for potions +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Negative input bug fixed [Lupus] +//============================================================ + + + + +alberta_in.gat,16,28,4 script Grampa Pharmacist 61, +{ + set @count, 0; + + mes "[Grampa Pharmacist]"; + mes "Hmmm... what do you want...?"; + next; + menu "Make Potion",M_Make, "Talk",M_Talk, "Information",M_Info, "Cancel",M_End; + + M_Make: + if(countitem(713) < 1) goto ssL_NdBottle; + mes "[Grampa Pharmacist]"; + mes "Did you prepare all the items needed? If so what potion do you want?"; + M_Menu: + next; + menu "Red Potion",M_0, "Orange Potion",M_1, "Yellow Potion",M_2, "White Potion",M_3, "Blue Potion",M_4, "Green Potion",M_5, + "Nah, I change my mind.",M_End; + + M_0: + set @pot$, "red"; + set @pot, 501; + set @item1, 507; + set @zeny, 3; + goto sL_Make; + M_1: + if(countitem(507)<1 || countitem(508)<1) goto ssL_NdHerbs; + if(Zeny < 5) goto ssL_NdZeny; + set @pot$, "orange"; + set @pot, 502; + mes "[Grampa Pharmacist]"; + mes "How many?"; + next; + menu "As many as possible.",sM_1a, "I will set the amount.",sM_1b, "Nah, forget about it",M_Menu; + + sM_1a: + if(countitem(507)<1 || countitem(508)<1 || countitem(713)<1 || Zeny< 5) goto ssL_End; + set @count, @count +1; + delitem 507, 1; + delitem 508, 1; + delitem 713, 1; + set Zeny, Zeny - 5; + goto sM_1a; + + sM_1b: + input @count; + if(@count<1) goto ssL_NdNegative; + if(countitem(507)<@count || countitem(508)<@count) goto ssL_NdHerbs; + if(countitem(713) < @count) goto ssL_NdBottle; + if(Zeny<(5*@count)) goto ssL_NdZeny; + delitem 507, @count; + delitem 508, @count; + delitem 713, @count; + set Zeny, Zeny - (@zeny*@count); + goto ssL_End; + + M_2: + set @pot$, "yellow"; + set @pot, 503; + set @item1, 508; + set @zeny, 10; + goto sL_Make; + M_3: + set @pot$, "white"; + set @pot, 504; + set @item1, 509; + set @zeny, 20; + goto sL_Make; + M_4: + set @pot$, "blue"; + set @pot, 505; + set @item1, 510; + set @zeny, 30; + goto sL_Make; + M_5: + set @pot$, "green"; + set @pot, 506; + set @item1, 511; + set @zeny, 3; + + sL_Make: + if(countitem(@item1) < 2) goto ssL_NdHerbs; + if(Zeny < @zeny) goto ssL_NdZeny; + + mes "[Grampa Pharmacist]"; + mes "How many?"; + next; + menu "As many as possible.",sM_0a, "I will set the amount.",sM_0b, "Nah, forget about it",M_Menu; + + sM_0a: + if((countitem(@item1) < 2) || (countitem(713) < 1) || (Zeny < @zeny)) goto ssL_End; + set @count, @count +1; + delitem @item1, 2; + delitem 713, 1; + set Zeny, Zeny - @zeny; + goto sM_0a; + + sM_0b: + input @count; + if(@count<1) goto ssL_NdNegative; + if(countitem(@item1) < (2*@count)) goto ssL_NdHerbs; + if(countitem(713) < @count) goto ssL_NdBottle; + if(Zeny < (@zeny*@count)) goto ssL_NdZeny; + delitem @item1, (2*@count); + delitem 713, @count; + set Zeny, Zeny - (@zeny*@count); + + ssL_End: + mes "[Grampa Pharmacist]"; + mes "Here are your "+@pot$+" potions."; + getitem @pot, @count; + close; + + ssL_NdBottle: + mes "[Grampa Pharmacist]"; + mes "You don't have enough empty tubes to put the medicine in you idiot!!"; + close; + + ssL_NdHerbs: + mes "[Grampa Pharmacist]"; + mes "You rascal! What did you expect from me? You didn't even bring all of the right herbs!"; + mes "Get lost!"; + close; + + ssL_NdNegative: + mes "[Grampa Pharmacist]"; + mes "You dirty cheater! What did you expect from me? Next time set positive amount of the potions!"; + mes "Get off!"; + close; + + ssL_NdZeny: + mes "[Gramp Pharmacist]"; + mes "You don't have enough zeny for potions."; + close; + + M_Talk: + mes "[Grampa Pharmacist]"; + mes "The right type of medicinal Herbs can replenish a person's HP or SP."; + mes "~Sigh~ I'm starting to reminisce about my youth.... a sign that I must be getting old....."; + next; + mes "[Grampa Pharmacist]"; + mes "Anyways, a potion is merely an, 'easy to use', form of medicinal Herbs..... nothing more and nothing less."; + close; + M_Info: + mes "[Grampa Pharmacist]"; + mes "~Sigh~... you young ones can be quite bothersome... Fine, I will explain to you how potions work...."; + next; + mes "[Grampa Pharmacist]"; + mes "Though the bennefits from consuming the various Herbs found around Rune-Midgard are great......"; + mes "By refining them into potions, the effects of the Herbs are dramatically enhanced."; + next; + mes "[Grampa Pharmacist]"; + mes "The process of refining herbs into potions is a special one that I created. For a small fee I can make any potion you desire."; + next; + mes "[Grampa Pharmacist]"; + mes "^FF5533Red Potion^000000 - 2 Red Herbs, 1 Empty Bottle, 2 Zeny fee."; + mes "^FF8000Orange Potion^000000 - 1 Red Herb, 1 Yellow Herb, 1 Empty Bottle, 5 Zeny fee."; + mes "^E8CF20Yellow Potion^000000 - 2 Yellow Herbs, 1 Empty Bottle, 10 Zeny fee."; + next; + mes "[Grampa Pharmacist]"; + mes "^999999White Potion^000000 - 2 White Herbs, 1 Empty Bottle, 20 Zeny fee."; + mes "^3355FFBlue Potion^000000 - 2 Blue Herbs, 1 Empty Bottle, 30 Zeny fee."; + mes "^00B000Green Potion^000000 - 2 Green Herbs, 1 Empty Bottle, 3 Zeny fee."; + close; + M_End: + mes "[Grampa Pharmacist]"; + mes "Didn't you have something to say?!"; + close; +} diff --git a/npc/merchants/hair_dyer.txt b/npc/merchants/hair_dyer.txt new file mode 100644 index 000000000..61bda6f1b --- /dev/null +++ b/npc/merchants/hair_dyer.txt @@ -0,0 +1,158 @@ +//===== eAthena Script ======================================= +//= Hair Dyer +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Hair Dyer with standard palletes +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Bugfix: fixed missing menu label LEnd->M_End [Lupus] +//============================================================ + + + + +// HairDyer Jovovich ----------------------------------------------------- +prt_in.gat,243,168,4 script HairDyer Jovovich 91,{ + mes "[HairDyer Jovovich]"; + mes "Welcome to my Hair Dying shop."; + next; + mes "[HairDyer Jovovich]"; + mes "Oh my..... your hair does not look like it's in good condition. I think it needs some special care. Come have a seat."; + qMenu0: + next; + menu "-Dye Hair.",M_0, "-Price List",M_1, "-Hair Tips",M_2, "-Cancel",M_End; + + M_0: + mes "[HairDyer Jovovich]"; + mes "Hohoho~ That's a good choice~~ Any time is a good time to change your hair color."; + next; + mes "[HairDyer Jovovich]"; + mes "Please choose a color that suits you"; + next; + menu "-Red please.",sM_a, "-Yellow please.",sM_b, "-Violet please.",sM_c, "-Orange please.",sM_d, "-Green please.",sM_e, + "-Blue please.",sM_f, "-White please.",sM_g, "-Black please.",sM_h, "-Sorry, I changed my mind.",M_End; + + sM_a: + mes "[HairDyer Jovovich]"; + if(countitem(975) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair red."; + setlook 6,8; + delitem 975,1; + set Zeny, Zeny - 1000; + close; + + sM_b: + mes "[HairDyer Jovovich]"; + if(countitem(976) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair yellow."; + setlook 6,1; + delitem 976,1; + set Zeny, Zeny - 1000; + close; + + sM_c: + mes "[HairDyer Jovovich]"; + if(countitem(981) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair Violet."; + setlook 6,2; + delitem 981,1; + set Zeny, Zeny - 1000; + close; + + sM_d: + mes "[HairDyer Jovovich]"; + if(countitem(980) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair Orange."; + setlook 6,3; + delitem 980,1; + set Zeny, Zeny - 1000; + close; + + sM_e: + mes "[HairDyer Jovovich]"; + if(countitem(979) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair Green."; + setlook 6,4; + delitem 979,1; + set Zeny, Zeny - 1000; + close; + + sM_f: + mes "[HairDyer Jovovich]"; + if(countitem(978) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair blue."; + setlook 6,5; + delitem 978,1; + set Zeny, Zeny - 1000; + close; + + sM_g: + mes "[HairDyer Jovovich]"; + if(countitem(982) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair white."; + setlook 6,6; + delitem 982,1; + set Zeny, Zeny - 1000; + close; + + sM_h: + mes "[HairDyer Jovovich]"; + if(countitem(983) < 1) goto sL_NoDye; + if(Zeny < 1000) goto sL_Zeny; + mes "Ok. I will dye you hair black."; + setlook 6,7; + delitem 983,1; + set Zeny, Zeny - 1000; + close; + + sL_NoDye: + mes "For me to dye your hair, I'll need the appropriate Dyestuff. Please check my price list for the information."; + close; + + sL_Zeny: + mes "I'm sorry but you don't have enough money."; + close; + + M_1: + mes "[HairDyer Jovovich]"; + mes "Here is the list of colors you can choose from and their prices:"; + mes " - Red: 1000 zeny, 1 Scarlet Dyestuff"; + mes " - Yellow: 1000 zeny, 1 Lemon Dyestuff"; + mes " - Violet: 1000 zeny, 1 Violet Dyestuff"; + mes " - Orange: 1000 zeny, 1 Orange Dyestuff"; + mes " - Green: 1000 zeny, 1 DarkGreen Dyestuff"; + mes " - Blue: 1000 zeny, 1 CobaltBlue Dyestuff"; + mes " - White: 1000 zeny, 1 White Dyestuff"; + mes " - Black: 1000 zeny, 1 Black Dyestuff"; + goto qMenu0; + + M_2: + mes "[HairDyer Jovovich]"; + mes "When your just feeling gloomy, of if you just got dumped... if you want to look hot, or when you just need to look better....."; + next; + mes "[HairDyer Jovovich]"; + mes "Change the color of your hair and your bound to regain your confidence and add an extra bounce to your step!!"; + next; + mes "[HairDyer Jovovich]"; + mes "For the small price of 1000 zeny and a Dyestuff, I can give you the haircolor you've been dreaming of!"; + next; + goto qMenu0; + + M_End: + mes "[HairDyer Jovovich]"; + mes "I think... every human being has the right to become beautiful......"; + close; +} + diff --git a/npc/merchants/inn.txt b/npc/merchants/inn.txt new file mode 100644 index 000000000..dfc0e7c3c --- /dev/null +++ b/npc/merchants/inn.txt @@ -0,0 +1,172 @@ +//===== eAthena Script ======================================= +//= Inn Npcs +//===== By: ================================================== +//= Darkchild (1.1) +//===== Current Version: ===================================== +//= 1.1a +//===== Compatible With: ===================================== +//= eAthena 1.0+ +//===== Description: ========================================= +//= Inn Npcs, Save and Heal +//===================================================== +//= variables: +//= arg0 - name of npc +//= arg1 - name of the inn +//= arg2 - map to save at +//= arg3, arg4 - x and y cord. to save at +//= @cost - cost of renting a room +//===== Additional Comments: ================================= +//= 1.1 Blind Effect By Kobra_k88 (Taken from his old script) +//= I added it to all of them though [Darkchild] +//= 1.1a Minor bug fixes and optimizations. Switched from @variables +//= to arguments.[kobra_k88] +//============================================================ + + +//======================== Prontera =================================== +// West Side Inn ------------------- +prt_in.gat,244,135,2 script Inn Maid::Sammy 53,{ + + callfunc "F_InnMaid","[Sammy]","West Inn","prt_in.gat",238,130; + addtimer 3900, "Sammy::OnTimerWarp"; + close; + +OnTimerWarp: + warp "prt_in.gat",237,102; + sc_end SC_BLIND; + end; +} +// East Side Inn ------------------ +prt_in.gat,61,141,2 script Inn Maid::Ahlma 53,{ + + callfunc "F_InnMaid","[Ahlma]","East Inn","prt_in.gat",64,136; + addtimer 3900, "Ahlma::OnTimerWarp"; + close; + +OnTimerWarp: + warp "prt_in.gat",49,173; + sc_end SC_BLIND; + end; +} + +//======================== Alberta ==================================== +// North -------------------------- +alberta_in.gat,32,142,5 script Inn Maid::Moira 53,{ + + callfunc "F_InnMaid","[Moira]","North Inn","alberta_in.gat",26,138; + addtimer 3900, "Moira::OnTimerWarp"; + close; + +OnTimerWarp: + warp "alberta_in.gat",18,188; + sc_end SC_BLIND; + end; +} +// South ----------------------------- +alberta_in.gat,55,142,8 script Inn Maid::Tina 53,{ + + callfunc "F_InnMaid","[Tina]","South Inn","alberta_in.gat",60,140; + addtimer 3900, "Tina::OnTimerWarp"; + close; + +OnTimerWarp: + warp "alberta_in.gat",68,188; + sc_end SC_BLIND; + end; +} + +//====================== Geffen ====================================== +geffen_in.gat,70,64,5 script Inn Maid::Betty 53,{ + + callfunc "F_InnMaid","[Betty]","Inn","geffen_in.gat",74,60; + addtimer 3900, "Betty::OnTimerWarp"; + close; + +OnTimerWarp: + warp "geffen_in.gat",106,106; + sc_end SC_BLIND; + end; +} + +//======================= Payon ====================================== +payon_in01.gat,131,62,5 script Inn Maid::SunHee 53,{ + + callfunc "F_InnMaid","[Sun Hee]","Inn","payon_in01.gat",132,56; + addtimer 3900, "SunHee::OnTimerWarp"; + close; + +OnTimerWarp: + warp "payon_in01.gat",140,15; + sc_end SC_BLIND; + close; +} + +//======================== Morocc ==================================== +// North East -------------------------- +morocc_in.gat,147,138,5 script Inn Maid::Suzie 53,{ + + callfunc "F_InnMaid","[Suzie]","North East Inn","morocc_in.gat",142,140; + addtimer 3900, "Suzie::OnTimerWarp"; + close; + +OnTimerWarp: + warp "morocc_in.gat",174,144; + sc_end SC_BLIND; + end; +} +// South -------------------------------- +morocc_in.gat,80,100,5 script Inn Maid::Shala 53,{ + + callfunc "F_InnMaid","[Shala]","South Inn","morocc_in.gat",78,95; + addtimer 3900, "Shala::OnTimerWarp"; + close; + +OnTimerWarp: + warp "morocc_in.gat",74,128; + sc_end SC_BLIND; + end; +} + +//======================= Inn Function ============================== +function script F_InnMaid { + mes getarg(0); + mes "Welcome to Nenkaras " + getarg(1) + ". What can I do for you?"; + next; + menu "Save",Msave, "Rent a Room",Mrent, "Nothing",Mend; + + Msave: + mes getarg(0); + mes "Location Saved."; + mes "I am waiting for another job to do."; + savepoint getarg(2),getarg(3),getarg(4); + close; + Mrent: + set @cost,50; + if(BaseLevel > 15) set @cost,100; + if(BaseLevel > 30) set @cost,200; + if(BaseLevel > 50) set @cost,300; + if(BaseLevel > 75) set @cost,400; + mes getarg(0); + mes "It will cost " + @cost + " zeny to rent a room for 1 night."; + mes "In the morning your HP and SP will be fully recovered."; + next; + menu "Ok.",-,"No thanks.",Mend; + + mes getarg(0); + mes "Thank you and enjoy your stay here."; + emotion 15; + if(Zeny < @cost) goto NoZeny; + set Zeny,Zeny - @cost; + sc_start SC_BLIND,500000,1; + percentheal 100,100; + return; + + NoZeny: + mes getarg(0); + mes "I'm sorry but you don't have enough money."; + close; + Mend: + mes getarg(0); + mes "I am waiting for a job to do."; + close; +} diff --git a/npc/merchants/milk_trader.txt b/npc/merchants/milk_trader.txt new file mode 100644 index 000000000..6fb84e59c --- /dev/null +++ b/npc/merchants/milk_trader.txt @@ -0,0 +1,63 @@ +//===== eAthena Script ======================================= +//= Milk Trader +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= trades bottles for milk +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Negative input bug fixed [Lupus] +//============================================================ + + + + +// Milk Trader ------------------------------------------------------------- +prontera.gat,71,131,7 script Milk Trader 86,{ + mes "[Milk Trader]"; + mes "If you bring me an empty bottle and 15 zeny, I will exchange it for 1 bottle of milk."; + next; + menu "-Exchange all empty bottles",M_0, "-Let me set the amount.",M_1, "-Cancel",M_End; + + M_0: + if(countitem(713) < 1) goto L_NoBottle; + if(Zeny < 15) goto L_NoZeny; + + sL_GetMilk: + if(countitem(713)<1 || Zeny<15) goto M_End; + getitem 519,1; + delitem 713,1; + set Zeny, Zeny - 15; + goto sL_GetMilk; + + M_1: + set @INPUT,0; + input @INPUT; + if(@INPUT < 1 ) goto M_End; + if(countitem(713) < @INPUT) goto L_NoBottle; + if(Zeny < (@INPUT*15)) goto L_NoZeny; + getitem 519, @INPUT; + delitem 713, @INPUT; + set Zeny, Zeny - (@INPUT*15); + goto M_End; + + M_End: + mes "[Milk Trader]"; + mes "Come back anytime."; + close; + + L_NoBottle: + mes "[Milk Trader]"; + mes "Ok, empty bottle please! Empty Bottle!!"; + mes "... Aww.. you don't have enough...?"; + close; + + L_NoZeny: + mes "[Milk Trader]"; + mes "You need more money."; + close; +} diff --git a/npc/merchants/refine.txt b/npc/merchants/refine.txt new file mode 100644 index 000000000..78afaa01f --- /dev/null +++ b/npc/merchants/refine.txt @@ -0,0 +1,873 @@ +//===== eAthena Script ======================================= +//= Refining NPCs +//===== By: ================================================== +//= Syrus22 (1.1) +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Description: ========================================= +//= Refining NPCs and Metal Salesmen. +//===== Additional Comments: ================================= +//= 1.0 by A bunch of people! +//= Syrus22 - Completely redid the script using functions... also +//= added the option for auto safe refining and multiple refining. +//= 1.1 Negative input bug fixed [Lupus] +//= 1.2 Added additional reparimen in morroc and payon. Added +//= Christopher the blacksmith in Geffen. Edited some dialogue [kobra_k88] +//= 1.3 New Payon Locations [Darkchild] +//= Corrected zeny subtraction thx to jpnmania77.[kobra_k88] +//============================================================ + + +//========================================================= +// Christopher: Geffen Blacksmith +//========================================================= +geffen_in.gat,110,172,2 script Christopher 63, +{ + mes "[Christopher Guillenrow]"; + mes "Welcome to Christopher's Workshop. Ye can find all yer forging equipment here. So what can I help ye with?"; + M_Menu: + next; + menu "Purchase Anvil",M_0, "Purchase Forging Item",M_1, "Purchase Metal",M_2, "Purify Rough Ores",M_3, "Cancel",M_End; + + M_0: + mes "[Christopher Guillenrow]"; + mes "Higher quality Anvils gives ye a better chance ta make better weapons, ye know. But they cost more than yer typical ones."; + next; + menu "Anvil - 30000z.",sM_Anvil, "Oridecon Anvil - 120000z.",sM_OriAnvil, "Golden Anvil - 300000z.",sM_GolAnvil, + "Better Anvil than others",sM_BetAnvil, "Cancel",M_Menu; + + sM_Anvil: + if(Zeny < 30000) goto L_NoZeny; + mes "[Christopher Guillenrow]"; + mes "This is the cheapest one but it's very efficient."; + set Zeny, Zeny - 30000; + getitem 986,1; + next; + goto L_Thanks; + sM_OriAnvil: + if(Zeny < 120000) goto L_NoZeny; + mes "[Christopher Guillenrow]"; + mes "Ah! Ye have a good eye for anvils. This here is the proper anvil for a Blacksmith."; + set Zeny, Zeny - 120000; + getitem 987,1; + next; + goto L_Thanks; + sM_GolAnvil: + if(Zeny < 300000) goto L_NoZeny; + mes "[Christopher Guillenrow]"; + mes "This is the best anvil in my workshop! With this ye'll be the best Blasksmith in no time."; + set Zeny, Zeny - 300000; + getitem 988,1; + next; + goto L_Thanks; + sM_BetAnvil: + mes "[Christopher Guillenrow]"; + mes "I'm sorry but I don't have anything better than a Golden Anvil."; + mes "Maybe 'Ringgel' the legendary Anvil maker would have one... but he be a hard fellow ta find."; + close; + + M_1: + mes "[Christopher Guillenrow]"; + mes "A respectable Blacksmith uses fine tools. Ye will come ta know my tools as being the finest around!"; + mes "Choose anything you want."; + sM_Menu1: + next; + menu "Mini-Furnace - 150z.",sM_Furn, "Iron Hammer - 1000z.",sM_IrHam, "Golden Hammer - 3000z.",sM_GldHam, + "Oridecon Hammer - 5000z.",sM_OriHam, "Cancel",M_Menu; + + sM_Furn: + mes "[Christopher Guillenrow]"; + mes "This is a prerequisite for Metal refining!!"; + mes "So, how many do ye wish to buy? If you want to quit, please input the number '0'."; + set @input, 0; + input @input; + next; + if(@input < 1 ) goto sM_Menu1; + if(Zeny < 150 * @input) goto L_NoZeny; + set Zeny, Zeny - (150 * @input); + getitem 612, @input; + goto L_Thanks; + sM_IrHam: + if(Zeny < 1000) goto L_NoZeny; + set Zeny, Zeny - 1000; + getitem 613,1; + goto L_Thanks; + sM_GldHam: + if(Zeny < 3000) goto L_NoZeny; + set Zeny, Zeny - 3000; + getitem 614,1; + goto L_Thanks; + sM_OriHam: + if(Zeny < 5000) goto L_NoZeny; + set Zeny, Zeny - 5000; + getitem 615,1; + goto L_Thanks; + + M_2: + mes "[Christopher Guillenrow]"; + mes "I have 2 kinds of metals for sale. Which do ye like?"; + set @chris, 1; + set @name$, "Christopher Guillenrow"; + callfunc "phramain"; + + M_3: + mes "[Christopher Guillenrow]"; + mes "I can purify yer rough Oridecon and rough Elunium ores. I'll need 5 rough ores to make 1 pure one."; + mes "Well... which one do ye want ta make?"; + set @chris, 1; + set @name$, "Christopher Guillenrow"; + callfunc "orimain"; + + M_End: + close; + + L_NoZeny: + mes "[Christopher Guillenrow]"; + mes "I don't think I can let ye have this at a lower price. I can't afford ta loose profits because of ye."; + emotion 4; + close; + + L_Thanks: + mes "[Christopher Guillenrow]"; + mes "Thank you for shopping at my workshop. Feel free to come anytime whenever you need."; + emotion 15; + close; + +} + + + +//===================================================================================== +//= Weapon/Armor Refiners +//===================================================================================== +prt_in.gat,63,60,4 script Hollengrhen 85,{ + set @name$,"Hollengrhen"; + callfunc "refinemain"; + break; +} +morocc_in.gat,73,38,4 script Aragham 99,{ + set @name$,"Aragham"; + callfunc "refinemain"; + break; +} +payon.gat,144,173,4 script Antonio 88,{ + set @name$,"Antonio"; + callfunc "refinemain"; + break; +} +alberta_in.gat,28,58,4 script Fredrik 85,{ + set @name$,"Fredrik"; + callfunc "refinemain"; + break; +} +yuno_in01.gat,164,26,6 script Disturb 88,{ + set @name$,"Disturb"; + callfunc "refinemain"; + break; +} + +//============================================================ +//= Main Refiner Function +//============================================================ +//= To allow auto safe refining/multiple refining set the +//= @features variable to 1 +//============================================================ +function script refinemain { + set @features,0; + + mes "[" + @name$ + "]"; + mes "I am the Armsmith... I can refine any weapon or piece of armor you choose!"; + mes "Which piece of equipment do you want to refine?"; + M_Menu: + next; + menu getequipname(1),PART1,getequipname(2),PART2,getequipname(3),PART3,getequipname(4),PART4,getequipname(5),PART5, + getequipname(6),PART6,getequipname(7),PART7,getequipname(8),PART8,getequipname(9),PART9,getequipname(10),PART10; + + //Head Gear + PART1: + set @part,1; + if (getequipisequiped(1)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "Do you want me to refine your dumb brain?"; + emotion 6; + goto M_Menu; + //Armor + PART2: + set @part,2; + if (getequipisequiped(2)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "Do you want me to melt your body with blazing heat...?"; + emotion 6; + goto M_Menu; + //Left Hand + PART3: + set @part,3; + if (getequipisequiped(3)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "I can't make your left hand into an ultimate weapon..."; + emotion 4; + goto M_Menu; + //Right Hand + PART4: + set @part,4; + if (getequipisequiped(4)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "I can't make your right hand into an ultimate weapon..."; + emotion 4; + goto M_Menu; + //Garment + PART5: + set @part,5; + if (getequipisequiped(5)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "Look here... you don't have any Garments on...."; + goto M_Menu; + //Foot Gear + PART6: + set @part,6; + if (getequipisequiped(6)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "Ack!! Those are some stinky feet. I definately can't refine those.... uck!!"; + emotion 16; + goto M_Menu; + //Accessory1 + PART7: + set @part,7; + if (getequipisequiped(7)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "What do you mean by Accessory? Which One?"; + emotion 20; + goto M_Menu; + //Accessory2 + PART8: + set @part,8; + if (getequipisequiped(8)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "What do you mean by Accessory? Which One?"; + emotion 20; + goto M_Menu; + PART9: + set @part,9; + if (getequipisequiped(9)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "What do you want from me? There's nothing equiped there..."; + emotion 20; + goto M_Menu; + PART10: + set @part,10; + if (getequipisequiped(10)) goto CHECK1; + mes "[" + @name$ + "]"; + mes "What do you want from me? There's nothing equiped there..."; + emotion 20; + goto M_Menu; + +//Check if the item is refinable... +CHECK1: + if(getequipisenableref(@part)) goto CHECK2; + mes "[" + @name$ + "]"; + mes "I can't work on this item..."; + close; +//Check if the item is identified... (Don't know why this is in here... but kept it anyway) +CHECK2: + if(getequipisidentify(@part)) goto CHECK3; + mes "[" + @name$ + "]"; + mes "You must appraise this item first."; + close; +//Check to see if the items is already +10 +CHECK3: + if(getequiprefinerycnt(@part) < 10) goto REFINE0; + mes "[" + @name$ + "]"; + mes "This weapon is allready at its maximum level and can no longer be refined."; + close; + +//Refine Armor +REFINE0: + if(getequipweaponlv(@part) > 0) goto REFINE1; + set @matname$,"Elunium"; + set @material,985; + set @price,2000; + set @safe,4; + if(@features == 1) callfunc "refinefeatures"; + callfunc "refinenormal"; +//Refine Level 1 Weapon +REFINE1: + if(getequipweaponlv(@part) > 1) goto REFINE2; + set @matname$,"Phracon"; + set @material,1010; + set @price,50; + set @safe,7; + if(@features == 1) callfunc "refinefeatures"; + callfunc "refinenormal"; +//Refine Level 2 Weapon +REFINE2: + if(getequipweaponlv(@part) > 2) goto REFINE3; + set @matname$,"Emveretarcon"; + set @material,1011; + set @price,200; + set @safe,6; + if(@features == 1) callfunc "refinefeatures"; + callfunc "refinenormal"; +//Refine Level 3 Weapon +REFINE3: + if(getequipweaponlv(@part) > 3) goto REFINE4; + set @matname$,"Oridecon"; + set @material,984; + set @price,5000; + set @safe,5; + if(@features == 1) callfunc "refinefeatures"; + callfunc "refinenormal"; +//Refine Level 4 Weapon +REFINE4: + set @matname$,"Oridecon"; + set @material,984; + set @price,20000; + set @safe,4; + if(@features == 1) callfunc "refinefeatures"; + callfunc "refinenormal"; +} + +// Normal Refining Functions ========================= +function script refinenormal -1,{ + mes "[" + @name$ + "]"; + mes "To refine this stuff,I need ^ff9999" + @matname$ + "^000000 and the fee " + @price + " Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",Lcancel; + + if (getequippercentrefinery(@part) == 100) goto L_Sub; + mes "[" + @name$ + "]"; + mes "Hmm... Hold on! This piece of equipment has already been refined to its maximum safety level."; + mes "I must warn you if it is refined ANYMORE, It could be DESTROYED and become USELESS!!"; + next; + mes "["+@name$+"]"; + mes "Do you still wish you refine it? If so I will not be able to gaurantee my work..."; + next; + menu "Yes",L_Sub,"No",Lcancel1; + + L_Sub: + if ((countitem(@material) < 1) || (Zeny < @price)) goto Lcancel2; + delitem @material,1; + set Zeny,Zeny-@price; + +Lrefine: + if (getequippercentrefinery(@part)<=rand(100)) goto Lfail; + mes "["+@name$+"]"; + mes "Clang! Clang! Clang!"; + successrefitem @part; + next; + mes "["+@name$+"]"; + mes "HAHA! It seems my skills haven't gotten rusty yet! Splendid... just splendid..."; + emotion 21; + close; + +Lfail: + mes "[" + @name$ + "]"; + mes "Clang! Clang! Clang!"; + failedrefitem @part; + next; + mes "["+@name$+"]"; + mes "Aaahhh!! Oh no....!!"; + emotion 16; + next; + mes "["+@name$+"]"; + mes "Eh..Ehem... I'm sorry but the refining proccess ^ff0000failed^000000."; + next; + mes "["+@name$+"]"; + mes "I am deeply ashamed of what I've done... but I DID warn you earlier about the risks."; + close; + +Lcancel: + mes "[" + @name$ + "]"; + mes "You said so..Hmm so be it..."; + close; + +Lcancel1: + mes "[" + @name$ + "]"; + mes "Good Choice."; + mes "Ah... good choice. I'd feel awfull if I'd destroyed another persons piece of equipment with my own hands."; + close; + +Lcancel2: + mes "[" + @name$ + "]"; + mes "Is that all you got? Unfortunately I can't work for you at a lower price. Try putting yourself in my shoes."; + close; +} + +// New Refining Functions ======================== +function script refinefeatures { + if(getequiprefinerycnt(@part) >= @safe) goto Lnosafe; + mes "[" + @name$ + "]"; + mes "I can refine this to the safe limit or a desired number of times... it's your choice..."; + next; + menu "To the safe limit please.",Lsafe,"I'll decide how many times.",Lnosafe,"I've changed my mind...",Lcancel; + +Lsafe: + set @refinecnt,@safe - getequiprefinerycnt(@part); + set @fullprice,@price * @refinecnt; + mes "[" + @name$ + "]"; + mes "That will cost you " + @refinecnt + " " + @matname$ + " and " + @fullprice + " Zeny. Is that ok?"; + next; + menu "Yes",-,"No...",Lcancel; + if((countitem(@material) < @refinecnt) || (Zeny < @fullprice)) goto Lcancel2; + delitem @material,@refinecnt; + set Zeny,Zeny - @fullprice; + callfunc "refinesafe"; + break; + +Lnosafe: + mes "[" + @name$ + "]"; + mes "So how many times would you like me to refine your item?"; + next; + input @refinecnt; + if (@refinecnt<1) goto Lcancel3; //fixed by Lupus + set @refinecheck,@refinecnt + getequiprefinerycnt(@part); + if(@refinecheck > 10) goto Lcancel3; + set @fullprice,@price * @refinecnt; + mes "[" + @name$ + "]"; + mes "This will cost you " + @refinecnt + " " + @matname$ + " and " + @price + " Zeny... Is that ok?"; + next; + menu "Yes...",-,"No...",Lcancel; + if(@refinecheck > @safe) goto Lwarn; + if((countitem(@material) < @refinecnt) || (Zeny < @fullprice)) goto Lcancel2; + delitem @material,@refinecnt; + set Zeny,Zeny - @fullprice; + callfunc "refinenumber"; + break; + + Lwarn: + set @refinecheck,@refinecheck - @safe; + mes "[" + @name$ + "]"; + mes "This will try to refine the equipment " + @refinecheck + " times past the safe limit. Your equipment may be destroyed... is that ok?"; + next; + menu "Yes",-,"No...",Lcancel1; + if((countitem(@material) < @refinecnt) || (Zeny < @fullprice)) goto Lcancel2; + delitem @material,@refinecnt; + set Zeny,Zeny - @fullprice; + callfunc "refinenumber"; + break; +Lcancel: + mes "[" + @name$ + "]"; + mes "If you say so... See you again soon I hope."; + close; +Lcancel1: + mes "[" + @name$ + "]"; + mes "Good... I don't like to break people's equipment..."; + close; +Lcancel2: + mes "[" + @name$ + "]"; + mes "Sorry but you don't have everything I need..."; + close; +Lcancel3: + mes "[" + @name$ + "]"; + mes "I can't refine this item that many times."; + close; +} + +// Function: Safe Refine --------------------- +function script refinesafe { + mes "Clang, clang!!!"; + successrefitem @part; + emotion 21; + set @refinecnt,@refinecnt - 1; + next; + if(@refinecnt == 0) goto Lend; + callfunc "refinesafe"; + break; + + Lend: + mes "[" + @name$ + "]"; + mes "All finished... Come again soon."; + close; +} +// Function: Refine +function script refinenumber { + mes "Clang, clang!!!"; + if (getequippercentrefinery(@part)<=rand(100)) goto Lfail; + successrefitem @part; + emotion 21; + set @refinecnt,@refinecnt - 1; + next; + if(@refinecnt == 0) goto Lend; + callfunc "refinenumber"; + break; + + Lend: + mes "[" + @name$ + "]"; + mes "All finished... Come again soon."; + close; + + Lfail: + failedrefitem @part; + emotion 23; + mes "[" + @name$ + "]"; + mes "WAHHHH!!! I'm so sorry... I warned you this could happen..."; + set @refinecnt,@refinecnt - 1; + if(@refinecnt == 0) goto Lend2; + mes "Here's the unused Zeny and Material back..."; + getitem @material,@refinecnt; + set @fullprice,@refinecnt * @price; + set Zeny,Zeny + @fullprice; + + Lend2: + close; +} + + + +//============================================================================== +//= Material Salesmen +//============================================================================== +prt_in.gat,56,69,4 script Vurewell 86,{ + set @name$,"Vurewell"; + callfunc "phramain"; + break; +} +payon.gat,145,178,4 script Begnahd 88,{ + set @name$,"Begnahd"; + callfunc "phramain"; + break; +} +morocc_in.gat,65,37,4 script Sade 99,{ + set @name$,"Sade"; + callfunc "phramain"; + break; +} +alberta_in.gat,18,59,5 script Kahlamanlith 86,{ + set @name$,"Kahlamanlith"; + callfunc "phramain"; + break; +} +yuno_in01.gat,171,26,6 script Dillemat 88,{ + set @name$,"Dillemat"; + callfunc "phramain"; + break; +} + +//============================================================ +//= Material Salesmen Functions +//============================================================ +function script phramain { + if(@chris == 1) goto M_Menu; + mes "[" + @name$ + "]"; + mes "Hello, Im selling metals I just mined."; + mes "They are Pharacon and Emvertacon."; + mes "Would you like to buy some?"; + M_Menu: + set @chris, 0; + next; + menu"Pharacon - 200z",PHARA,"Emveretarcon - 1000z",EMVER; + + PHARA: + set @itemid,1010; + set @value,200; + goto CONTINUE; + + EMVER: + set @itemid,1011; + set @value,1000; + +CONTINUE: + mes "[" + @name$ + "]"; + mes "How many would you like?"; + next; + input @ammount; + if (@ammount <= 0) goto L_BELOW; + if (@ammount > 999) goto L_ABOVE; + if (zeny<@value*@ammount) goto L_NOZENY; + if (checkweight(@item,@ammount) == 0) goto L_WEIGHT; + getitem @itemid,@ammount; + set Zeny,Zeny-@value*@ammount; + mes "[" + @name$ + "]"; + mes "Here you go."; + close; + +L_NOZENY: + mes "You do not have enough zeny!"; + close; +L_WEIGHT: + mes "You cant hold that many of that item"; + close; +L_BELOW: + mes "You have to buy a POSITIVE amount of items!"; + close; +L_ABOVE: + mes "You cant buy this much of this item!"; + close; +} + + + +//============================================================================== +//= Ori/Elu Refiners +//============================================================================== +prt_in.gat,63,69,4 script Dietrich 84,{ + set @name$,"Dietrich"; + callfunc "orimain"; + break; +} +payon.gat,137,178,4 script Hakhim 88,{ + set @name$,"Hakhim"; + callfunc "orimain"; + break; +} +morocc_in.gat,72,32,4 script Abdul 99,{ + set @name$,"Abdul"; + callfunc "orimain"; + break; +} +alberta_in.gat,21,63,5 script Xenophon 84,{ + set @name$,"Xenophon"; + callfunc "orimain"; + break; +} +yuno_in01.gat,171,22,6 script Delayt 88,{ + set @name$,"Delayt"; + callfunc "orimain"; +break; +} + +//============================================================ +//= Ori/Elu Functions +//============================================================ +function script orimain { + if(@chris == 1) goto M_Menu; + mes "[" + @name$ + "]"; + mes "If you bring Rough Oridecons and"; + mes "Rough Eluniums to me,"; + mes "I can refine them for you."; + mes "However, you must bring 5 of each."; + M_Menu: + set @chris, 0; + next; + menu "Make Oridecon",M_Ori, "Make Elunium",M_Elu, "Ask about enchanted stones",M_Stones; + + M_Ori: + if ((countitem(756) < 5)) goto L_NoOri; + delitem 756,5; + getitem 984,1; + mes "[" + @name$ + "]"; + mes "As promised, here's your oridecon."; + mes "Come back again anytime."; + close; + + L_NoOri: + mes "[" + @name$ + "]"; + mes "Huh? You're kidding, right? Didn't I say I can't make you an Oridecon unless you bring me 5 rough ones?"; + close; + M_Elu: + if ((countitem(757) < 5)) goto L_NoElu; + delitem 757,5; + getitem 985,1; + mes "[" + @name$ + "]"; + mes "As promised, here's your elunium."; + mes "Come back again anytime."; + close; + + L_NoElu: + mes "[" + @name$ + "]"; + mes "Huh? You're kidding, right? Didn't I say I can't make you an Elunium unless you bring me 5 rough ones?"; + close; + M_Stones: + mes "[" + @name$ + "]"; + mes "Enchanted stones, huh ...."; + next; + mes "[" + @name$ + "]"; + mes "Well, in the 20 years that I've been a stonesmith I've heard of them many times... though I've never actually seen them before."; + next; + mes "[" + @name$ + "]"; + mes "I've been told that enchanted stones possess different elemental properties such as ^5533FFWater, Earth, Fire, and Wind^000000."; + next; + mes "[" + @name$ + "]"; + mes "If someone combines an Enchanted Stone with a weapon durring the refining process, that weapon will possess the same property as the stone."; + next; + mes "[" + @name$ + "]"; + mes "Of course, that person needs to be skillfull enough to work on it."; + goto M_Menu; +} + + + +//===================================================================================== +//= Equipment Repairmen +//===================================================================================== +prt_in.gat,62,54,2 script Grendal 84,{ + set @name$,"Grendal"; + callfunc "repairmain"; + break; +} + +//Temp Spot, Not Shure Where To place +payon.gat,149,182,2 script Repairman 88,{ + set @name$,"Repairman"; + callfunc "repairmain"; + break; +} + +morocc_in.gat,71,40,2 script Repairman 99,{ + set @name$,"Repairman"; + callfunc "repairmain"; + break; +} + +//============================================================ +//= Equipment Repair Function +//============================================================ +function script repairmain { + mes "[" + @name$ + "]"; + mes "I am the Repair Smith and I can repair any Arms you want."; + mes "Tell me which Equipment you want to repair."; + set @broken1,getbrokenid(1); + set @broken2,getbrokenid(2); + set @broken3,getbrokenid(3); + set @broken4,getbrokenid(4); + set @broken5,getbrokenid(5); + set @broken6,getbrokenid(6); + set @broken7,getbrokenid(7); + set @broken8,getbrokenid(8); + set @broken9,getbrokenid(9); + set @broken10,getbrokenid(10); + next; + if(@broken1==NULL) goto L_CANCEL_3; + menu getitemname(@broken1),REPAIR1,getitemname(@broken2),REPAIR2,getitemname(@broken3),REPAIR3, + getitemname(@broken4),REPAIR4,getitemname(@broken5),REPAIR5,getitemname(@broken6),REPAIR6, + getitemname(@broken7),REPAIR7,getitemname(@broken8),REPAIR8,getitemname(@broken9),REPAIR9, + getitemname(@broken10),REPAIR10; + REPAIR1: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(1); + goto L_CLOSE; + REPAIR2: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(2); + goto L_CLOSE; + REPAIR3: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(3); + goto L_CLOSE; + REPAIR4: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(4); + goto L_CLOSE; + REPAIR5: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(5); + goto L_CLOSE; + REPAIR6: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(6); + goto L_CLOSE; + REPAIR7: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(7); + goto L_CLOSE; + REPAIR8: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(8); + goto L_CLOSE; + REPAIR9: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(9); + goto L_CLOSE; + REPAIR10: + mes "[" + @name$ + "]"; + mes "You're gonna repair " + getitemname(@broken1) + "."; + mes "To repair this, I need ^ff9999One Steel^000000, and 10,000 Zeny."; + mes "Continue?"; + next; + menu "Yes",-,"No",L_CANCEL_2; + if (countitem(999) < 1 || Zeny < 10000) goto L_CANCEL_1; + delitem 999,1; + set Zeny,Zeny-10000; + repair(10); + goto L_CLOSE; + +L_CANCEL_1: + mes "[" + @name$ + "]"; + mes "Is it all you got?"; + mes "Unfortunately, I have kids to feed..."; + goto L_CLOSE; +L_CANCEL_2: + mes "[" + @name$ + "]"; + mes "Ok, but don't expect to be using that..."; + goto L_CLOSE; +L_CANCEL_3: + mes "[" + @name$ + "]"; + mes "Looks like you don't need anything repaired today..."; + goto L_CLOSE; +L_CLOSE: + close; +} diff --git a/npc/merchants/renters.txt b/npc/merchants/renters.txt new file mode 100644 index 000000000..cb6cc99de --- /dev/null +++ b/npc/merchants/renters.txt @@ -0,0 +1,155 @@ +//===== eAthena Script ======================================= +//= Renters +//===== By: ================================================== +//= kobra_k88, mod by Lupus +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= PecoPeco Breeder, Grand PecoPeco Breeder, Falcon tamer scripts +//===== Additional Comments: ================================= +//= Fully working +//= Added another Falcon Master into the Hunters Guild [Lupus] +//= 1.2: replaced checkoption(x) with checkriding,checkfalcon [Lupus] +//= 1.3: Added support for Lord_Knight(2),Paladin(2) and Sniper. +//============================================================ + +// PecoPeco Breeder (for Knights)------------------------------------------- +prontera.gat,61,338,3 script PecoPeco Breeder 86,{ + mes "[PecoPeco Breeder]"; + if(Class == Job_Knight || Class == Job_Knight2 || Class == 4008 || Class == Job_Lord_Knight || Class == Job_Lord_Knight2) goto L_Start; + mes "I'm a PecoPeco breeder and I rent out PecoPeco's for^4444FF Knights ^000000to ride on."; + close; + +L_Start: + mes "Good day. Would you like to ride a PecoPeco?"; + next; + mes "[PecoPeco Breeder]"; + mes "You can rent one PecoPeco for 2500 Zeny, provided that you have the PecoPeco Riding skill."; + next; + menu "Lend me a trusty steed!... err... bird!",M_0,"Hmm...It's a bit too expensive.",M_1; + + M_0: + if(getskilllv(63) == 0) goto sL_NeedSkill; + if(Zeny < 2500) goto sL_Zeny; + if(checkriding(0) != 0) goto sL_GotPeco; + set Zeny, Zeny - 2500; + setriding; + mes "Thank you and good day."; + emotion 15; + close; + + sL_NeedSkill: + mes "[PecoPeco Breeder]"; + mes "As I mentioned earlier, you need the^3333FF Riding ^000000skill in order to rent a PecoPeco."; + close; + sL_Zeny: + mes "[PecoPeco Breeder]"; + mes "As I said before it will be 2500z. Come back when you aquire enough zeny."; + close; + sL_GotPeco: + mes "[PecoPeco Breeder]"; + mes "Umm... aren't you already riding a PecoPeco??...."; + emotion 20; + close; + M_1: + mes "[PecoPeco Breeder]"; + mes "Alright. Good day to you."; + close; + +} + +// Grand PecoPeco Breeder (for Crusaders)------------------------------------------- +prontera.gat,238,312,5 script Grand PecoPeco Breeder 86,{ + mes "[Grand PecoPeco Breeder]"; + if(Class == Job_Crusader || Class == Job_Crusader2 || Class == 4015 || Class == Job_Paladin || Class == Job_Paladin2 ) goto L_Start; + + mes "I'm a Grand PecoPeco breeder and I rent out Grand PecoPeco's for^4444FF Crusaders ^000000to ride on."; + close; + +L_Start: + mes "Good day. Would you like to ride a Grand PecoPeco?"; + next; + mes "[Grand PecoPeco Breeder]"; + mes "You can rent one Grand PecoPeco for 2500 Zeny, provided that you have the PecoPeco Riding skill."; + next; + menu "Lend me a trusty steed!... err... bird!",M_0,"Hmm...It's a bit too expensive.",M_1; + + M_0: + if(getskilllv(63) == 0) goto sL_NeedSkill; + if(Zeny < 2500) goto sL_Zeny; + if(checkriding(0) != 0) goto sL_GotPeco; + set Zeny, Zeny - 2500; + setriding; + mes "Thank you and good day."; + emotion 15; + close; + + sL_NeedSkill: + mes "[Grand PecoPeco Breeder]"; + mes "As I mentioned earlier, you need the^3333FF Riding ^000000skill in order to rent a Grand PecoPeco."; + close; + sL_Zeny: + mes "[Grand PecoPeco Breeder]"; + mes "As I said before it will be 2500z. Come back when you aquire enough zeny."; + close; + sL_GotPeco: + mes "[Grand PecoPeco Breeder]"; + mes "Umm... aren't you already riding a Grand PecoPeco??...."; + emotion 20; + close; + M_1: + mes "[Grand PecoPeco Breeder]"; + mes "Alright. Good day to you."; + close; + +} + +// Falcon Master-------------------------------------------------------------- +in_hunter.gat,146,100,2 script Falcon Master 59,{ + mes "[Falcon Master]"; + mes "Hellooooo, I am the Falcon Master."; + next; + menu "Speak with him",M_0, "Politely back away",M_End; + + M_0: + mes "[Falcon Master]"; + mes "I can train a Falcon for you, but you need to be a Hunter and have mastered the ^5555FF'Falcon Taming' skill^000000."; + next; + menu "Ok",sM_0, "No thanks",M_End; + + sM_0: + if(Class != Job_Hunter && Class != 4012 && Class != Job_Sniper) goto sL_NotHunter; + + if(checkfalcon(0) != 0) goto sL_GotFalc; + if(getskilllv(127)==0) goto sL_NoSkill; + mes "[Falcon Master]"; + mes "It looks like you meet all the requirements to handle a Falcon. Here you are"; + setfalcon; + next; + mes "[Falcon Master]"; + mes "Please take very good care of it. It will prove to be a valuble companion."; + close; + + sL_NotHunter: + mes "[Falcon Master]"; + mes "As I said, Falcons can only be given to Hunters. Falcons are very picky about who they travel with you know."; + close; + sL_GotFalc: + mes "[Falcon Master]"; + mes "You can only have 1 Falcon at a time."; + close; + sL_NoSkill: + mes "[Falcon Master]"; + mes "I'm sorry but you do not have the Falcon Taming skill. Please come back when you have learned it."; + close; + M_End: + mes "[Falcon Master]"; + mes "Have a nice day."; + close; +} + +//Not Supposed To Be One In Payon! +//Coordinate IS Correct For New Payon Map Though IF You Enable It +//payon_in01.gat,206,175,4 duplicate(Falcon Master) Falcon Master 59 diff --git a/npc/merchants/shops.txt b/npc/merchants/shops.txt new file mode 100644 index 000000000..947754e59 --- /dev/null +++ b/npc/merchants/shops.txt @@ -0,0 +1,205 @@ +//===== eAthena Script ======================================= +//= Shops +//===== By: ================================================== +//= eAthena Dev Team +//===== Current Version: ===================================== +//= 1.5 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= swapped shop titles in GONRYUN, thanks to Kashy +//= 1.3a Fixed Louyang map name. Added additional shops in Yuno. [kobra_k88] +//= 1.4 Added Niflheim Shops +//= 1.5 New Payon Locations [Darkchild] +//= Moved shops in Umbala.txt here. Commented out the duplicate +//= ones.[kobra_k88] +//============================================================ + + + +//======================================================= +//ALBERTA +//======================================================= +alb2trea.gat,87,65,1 shop Tool Dealer 83,1750:-1,1751:-1,1752:-1,501:-1,502:-1,503:-1,504:-1,506:-1,645:-1,656:-1,657:-1 +alberta_in.gat,94,56,4 shop Tool Dealer 83,501:-1,502:-1,503:-1,504:-1,506:-1,601:-1,602:-1,611:-1,610:-1,645:-1,656:-1,657:-1 +alberta_in.gat,165,96,1 shop Item Collector 74,909:-1,528:-1 +alberta_in.gat,182,96,1 shop Tool Dealer 73,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1750:-1,2243:-1,645:-1,656:-1,657:-1 +alberta_in.gat,180,15,1 shop Armor Dealer 101,2101:-1,2103:-1,2401:-1,2403:-1,2405:-1,2501:-1,2503:-1,2505:-1,2203:-1,2201:-1,2205:-1,2226:-1,2301:-1,2303:-1,2305:-1,2321:-1,2328:-1,2332:-1,2307:-1,2309:-1,2312:-1,2314:-1 +alberta_in.gat,188,21,1 shop Weapon Dealer 49,1750:-1,1751:-1,1101:-1,1104:-1,1107:-1,1201:-1,1204:-1,1207:-1,1601:-1,1701:-1,1301:-1,1351:-1,1354:-1,1357:-1,1360:-1 +//alberta_in.gat,18,59,5 shop Miner 48,1010:-1,1011:-1 + +//======================================================= +//AL DE BARAN +//======================================================= +aldeba_in.gat,20,60,5 shop Armor Dealer 101,2228:-1,2103:-1,2105:-1,2307:-1,2309:-1,2312:-1,2314:-1,2316:-1,2505:-1,2405:-1 +aldeba_in.gat,28,54,5 shop Weapon Dealer 85,1201:-1,1204:-1,1207:-1,1210:-1,1213:-1,1216:-1,1219:-1,1222:-1 +aldeba_in.gat,94,56,5 shop Tool Dealer 83,501:-1,502:-1,503:-1,504:-1,506:-1,601:-1,602:-1,611:-1,610:-1,645:-1,656:-1,657:-1 + +//======================================================= +//AMATSU +//======================================================= +amatsu.gat,176,126,4 shop Fruit Merchant 53,512:-1,513:-1,515:-1,514:-1,531:-1,532:-1,534:-1,533:-1 +amatsu.gat,169,111,6 shop Tool Dealer 83,611:-1,1750:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1065:-1,2239:-1 +amatsu.gat,180,102,3 shop Flower Girl 96,712:-1,744:-1,2612:-1,2215:-1 +amatsu.gat,189,99,7 shop Butcher 49,517:-1,528:-1,540:-1,541:-1 +amatsu.gat,169,119,6 shop Gift Merchant 91,734:-1,735:-1,736:-1,737:-1,746:-1 +amatsu.gat,183,127,5 shop Milk Merchant 90,713:-1,519:-1 +//1st set +ama_in01.gat,96,28,4 shop Weapon Dealer 54,1750:-1,1751:-1,1701:-1,1201:-1,1204:-1,1207:-1,1601:-1,1101:-1,1104:-1,1107:-1,1110:-1,1113:-1,1122:-1,1119:-1,1123:-1,1126:-1,1157:-1,1129:-1,1116:-1,1301:-1 +ama_in01.gat,103,24,1 shop Armor Dealer 48,2101:-1,2103:-1,2401:-1,2403:-1,2501:-1,2503:-1,2220:-1,2226:-1,2301:-1,2303:-1,2305:-1,2328:-1,2307:-1,2309:-1,2312:-1,2314:-1 +ama_in01.gat,101,18,8 shop Weapon Dealer 47,1401:-1,1404:-1,1407:-1,1451:-1,1454:-1,1457:-1,1460:-1,1463:-1,1410:-1 +//2nd set +ama_in01.gat,89,28,4 shop Armor Dealer 757,2211:-1,2401:-1,2403:-1,2501:-1,2503:-1,2101:-1,2103:-1,2305:-1,2321:-1,2332:-1,2314:-1,2627:-1 +ama_in01.gat,102,28,4 shop Weapon Dealer 766,1207:-1,1216:-1,1107:-1,1122:-1,1116:-11154:-1,1407:-1,1457:-1,1354:-1,1519:-1 +ama_in01.gat,24,30,4 shop Tool Dealer 763,611:-1,1750:-1,1770:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,645:-1,656:-1,601:-1,602:-1,1065:-1 + +//======================================================= +//COMODO +//======================================================= +cmd_in01.gat,117,165,4 shop Armor Dealer 101,2226:-1,2228:-1,2103:-1,2105:-1,2405:-1,2503:-1,2505:-1,2305:-1,2321:-1,2307:-1,2309:-1,2335:-1,2312:-1,2314:-1,2316:-1 +cmd_in01.gat,131,165,4 shop Weapon Dealer 49,1903:-1,1905:-1,1907:-1,1950:-1,1952:-1,1954:-1,1956:-1,1401:-1,1404:-1,1407:-1,1451:-1,1454:-1,1457:-1,1460:-1,1463:-1,1410:-1 +cmd_in01.gat,79,182,4 shop Tool Dealer 83,1753:-1,501:-1,502:-1,503:-1,504:-1,645:-1,656:-1,657:-1,601:-1,602:-1,611:-1,1065:-1 +comodo.gat,296,125,4 shop Souvenir Merchant 101,965:-1,964:-1 +comodo.gat,244,296,7 shop Item Collector 74,909:-1,5 + +//======================================================= +//GEFFEN +//======================================================= +geffen_in.gat,25,177,1 shop Armor Dealer 66,2101:-1,2107:-1,2401:-1,2501:-1,2230:-1,2301:-1,2303:-1,2305:-1,2321:-1,2332:-1 +geffen_in.gat,29,177,1 shop Weapon Dealer 47,1750:-1,1751:-1,1101:-1,1701:-1,1201:-1,1204:-1,1207:-1,1210:-1,1213:-1,1216:-1,1601:-1,1604:-1,1607:-1,1610:-1 +geffen_in.gat,74,144,1 shop Trader 66,909:-1,911:-1,910:-1,912:-1 +geffen_in.gat,77,167,1 shop Tool Dealer 68,1750:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,2241:-1,645:-1,656:-1,657:-1 +geffen_in.gat,77,173,1 shop Magical Tool Trade 64,717:-1,1601:-1,1604:-1,1607:-1,1610:-1,2232:-1,2321:-1,2332:-1 +geffen_in.gat,171,123,1 shop Tool Dealer 64,1092:-1,1093:-1 +geffen.gat,193,152,3 shop Pet Merchant 125,537:-1,643:-1,10013:-1,10014:-1 + +//======================================================= +//GONRYUN +//======================================================= +gonryun.gat,147,84,4 shop Tool Dealer 777,1750:-1,1751:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,645:-1,656:-1,601:-1,602:-1,1065:-1 +gonryun.gat,174,101,4 shop Weapon Dealer 774,1207:-1,1216:-1,1107:-1,1122:-1,1116:-1,1154:-1,1407:-1,1457:-1,1354:-1,1519:-1 +gonryun.gat,173,84,4 shop Armor Dealer 770,2211:-1,2401:-1,2403:-1,2501:-1,2503:-1,2101:-1,2103:-1,2305:-1,2321:-1,2332:-1,2328:-1,2627:-1 + +//======================================================= +//IZLUDE +//======================================================= +izlude_in.gat,60,127,4 shop Weapon Dealer 98,1750:-1,1751:-1,1701:-1,1601:-1,1201:-1,1204:-1,1207:-1,1101:-1,1104:-1,1107:-1,1116:-1,1151:-1,1154:-1,1157:-1,1160:-1,1301:-1 +izlude_in.gat,70,127,4 shop Armor Dealer 101,2103:-1,2105:-1,2403:-1,2405:-1,2503:-1,2505:-1,2226:-1,2228:-1,2303:-1,2305:-1,2328:-1,2307:-1,2309:-1,2312:-1,2314:-1,2316:-1 +izlude_in.gat,115,61,1 shop Tool Dealer 47,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1750:-1,1065:-1,645:-1,656:-1,657:-1 +izlude.gat,121,138,1 shop Butcher 54,517:-1 +izlude.gat,127,120,1 shop Fruit Merchant 72,512:-1,513:-1,515:-1,516:-1 +izlude.gat,137,126,3 shop Milk Merchant 701,519:-1 +izlude.gat,164,138,4 shop Pet Merchant 125,537:-1,643:-1,10013:-1,10014:-1 + +//======================================================= +//LOUYANG +//======================================================= +lou_in02.gat,121,181,5 shop Armor Dealer 770,2211:-1,2401:-1,2403:-1,2501:-1,2503:-1,2101:-1,2103:-1,2503:-1 +lou_in02.gat,130,182,5 shop Weapon Dealer 774,1204:-1,1216:-1,1107:-1,1113:-1,1116:-1,1157:-1,1407:-1,1410:-1,1354:-1,1519:-1 + +//======================================================= +//MORROC +//======================================================= +morocc_in.gat,141,67,1 shop Weapon Dealer 58,1750:-1,1751:-1,1701:-1,1601:-1,1201:-1,1204:-1,1207:-1,1210:-1,1213:-1,1216:-1,1219:-1,1222:-1,1250:-1,1252:-1,1254:-1 +morocc_in.gat,141,60,1 shop Armor Dealer 58,2101:-1,2103:-1,2401:-1,2403:-1,2405:-1,2501:-1,2503:-1,2218:-1,2301:-1,2303:-1,2305:-1,2321:-1,2328:-1,2332:-1,2307:-1,2309:-1,2335:-1 +morocc.gat,35,69,1 shop Trader 89,2609:-1,1516:-1,1522:-1 +morocc.gat,139,92,1 shop Trader 99,513:-1,513:-1,513:-1,513:-1,513:-1,513:-1 +morocc.gat,145,44,1 shop Jewel Seller 99,730:-1,2613:-1 +morocc.gat,147,102,5 shop Tool Dealer 93,1750:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1065:-1,645:-1,656:-1,657:-1 +morocc.gat,151,243,1 shop Tool Dealer 99,1750:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,2242:-1,645:-1,656:-1,657:-1 +morocc.gat,157,72,6 shop Butcher 49,517:-1 +morocc.gat,166,51,1 shop Jewel Seller 102,721:-1,722:-1,726:-1,728:-1,729:-1 +morocc.gat,170,101,3 shop Tool Dealer 85,909:-1,528:-1,919:-1,925:-1 +morocc.gat,206,250,1 shop Tool Dealer 85,909:-1,528:-1,919:-1,925:-1 +morocc.gat,244,134,1 shop Trader 93,2612:-1 +morocc.gat,259,193,1 shop Trader 99,747:-1 +morocc.gat,268,193,1 shop Trader 93,748:-1 +morocc.gat,269,167,4 shop Pet Merchant 125,537:-1,643:-1,10013:-1,10014:-1 +//morocc_in.gat,65,37,4 shop Miner 48,1010:-1,1011:-1 + +//======================================================= +//NIFLHEIM +//======================================================= +nif_in.gat,35,91,3 shop Armor Dealer 796,2101:-1,2107:-1,2401:-1,2501:-1,2230:-1,2301:-1,2303:-1,2305:-1,2321:-1,2332:-1 +nif_in.gat,35,84,3 shop Weapon Dealer 795,1750:-1,1751:-1,1101:-1,1701:-1,1201:-1,1204:-1,1207:-1,1210:-1,1213:-1,1216:-1,1601:-1,1604:-1,1607:-1,1610:-1 +nif_in.gat,154,21,3 shop Tool Dealer 798,611:-1,1750:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1065:-1,2239:-1,645:-1,656:-1,657:-1 +niflheim.gat,201,209,3 shop Milk Merchant 794,519:-1 +niflheim.gat,224,185,3 shop Fruit Merchant 795,512:-1,513:-1 +niflheim.gat,209,161,3 shop Butcher 794,517:-1,528:-1 +niflheim.gat,205,152,3 shop Gift Merchant 795,734:-1,735:-1,736:-1,737:-1,746:-1 + +//======================================================= +//PAYON +//======================================================= +payon_in01.gat,7,119,4 shop Weapon Dealer 86,1750:-1,1751:-1,1101:-1,1104:-1,1107:-1,1201:-1,1204:-1,1207:-1,1601:-1,1701:-1,1704:-1,1707:-1,1710:-1,1713:-1,1714:-1,1718:-1 +payon_in01.gat,15,119,4 shop Armor Dealer 87,2401:-1,2403:-1,2405:-1,2501:-1,2503:-1,2505:-1,2208:-1,2211:-1,2212:-1,2301:-1,2303:-1,2305:-1,2321:-1,2328:-1,2332:-1,2309:-1,2330:-1 +payon_in02.gat,87,34,1 shop Tool Dealer 98,1750:-1,1751:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1065:-1,645:-1,656:-1,657:-1 +payon.gat,160,97,4 shop Tool Dealer 88,1750:-1,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,601:-1,525:-1,602:-1,1065:-1,645:-1,656:-1,657:-1 +//Not Shure About Pet Shop +payon.gat,104,63,4 shop Pet Merchant 125,537:-1,643:-1,10013:-1,10014:-1 +pay_arche.gat,125,108,1 shop Milk Merchant 90,519:-1 +pay_arche.gat,132,101,1 shop Vegetable Merchant 102,515:-1,516:-1 +pay_arche.gat,140,124,1 shop Butcher 87,517:-1,528:-1 + + +//======================================================= +//PRONTERA +//======================================================= +prontera.gat,73,134,1 shop Milk Merchant 90,519:-1 +prontera.gat,104,49,1 shop Fruit Merchant 102,512:-1,513:-1 +prontera.gat,64,125,1 shop Butcher 87,517:-1,528:-1 +prontera.gat,58,182,1 shop Flower Girl 96,712:-1,744:-1 +prontera.gat,113,42,1 shop Flower Lady 90,712:-1,744:-1 +prontera.gat,105,87,1 shop Gift Merchant 91,734:-1,735:-1,736:-1,737:-1,746:-1 +prontera.gat,218,211,4 shop Pet Merchant 125,537:-1,643:-1,10013:-1,10014:-1 +prontera.gat,248,153,1 shop Doll Merchant 85,740:-1,741:-1,742:-1 +prt_church.gat,108,124,1 shop Nun 79,2608:-1,2216:-1,2323:-1,2325:-1,1501:-1,1504:-1,1507:-1,1510:-1,1513:-1,1519:-1 +prt_fild05.gat,290,221,1 shop Tool Dealer 83,1750:-1,611:-1,501:-1,502:-1,506:-1,601:-1,602:-1,645:-1,656:-1,657:-1 +prt_in.gat,211,169,1 shop Wedding Goods Merchant 71,744:-1,745:-1,2338:-1,2206:-1 +prt_in.gat,126,76,1 shop Tool Dealer 53,611:-1,1750:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1065:-1,2239:-1,645:-1,656:-1,657:-1 +prt_in.gat,172,130,1 shop Weapon Dealer 54,1750:-1,1751:-1,1701:-1,1201:-1,1204:-1,1207:-1,1601:-1,1101:-1,1104:-1,1107:-1,1110:-1,1113:-1,1122:-1,1119:-1,1123:-1,1126:-1,1157:-1,1129:-1,1116:-1,1301:-1 +prt_in.gat,172,132,1 shop Armor Dealer 48,2101:-1,2103:-1,2401:-1,2403:-1,2501:-1,2503:-1,2220:-1,2226:-1,2301:-1,2303:-1,2305:-1,2328:-1,2307:-1,2309:-1,2312:-1,2314:-1 +prt_in.gat,171,140,1 shop Weapon Dealer 47,1401:-1,1404:-1,1407:-1,1451:-1,1454:-1,1457:-1,1460:-1,1463:-1,1410:-1 +//prt_in.gat,56,69,4 shop Miner 48,1010:-1,1011:-1 + +//======================================================= +//TURTLE ISLAND +//======================================================= +tur_dun01.gat,158,54,6 shop Tool Dealer 99,1750:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,645:-1,656:-1,657:-1 +// Spectacles: missing as second item in list +// Luxury Sunglases: not sure of item/price. + +//======================================================= +//UMBALA +//======================================================= +um_in.gat,104,124,3 shop Item Merchant 788,512:15,515:15,535:15,516:15,513:15,517:50,528:60,537:1000,601:60,602:300,645:800,656:1500,610:4000 +um_in.gat,160,125,3 shop Weapon Merchant 789,1501:120,1504:1600,1507:9000,1510:16000,1513:41000,1519:23000,1807:53000,1811:58000,1809:67000 +um_in.gat,151,125,4 shop Armor Merchant 49,2103:-1,2105:-1,2403:-1,2405:-1,2503:-1,2505:-1,2226:-1,2228:-1,2303:-1,2305:-1,2328:-1,2307:-1,2309:-1,2312:-1,2314:-1,2316:-1 +//um_in.gat,159,123,3 shop Weapon Merchant 52,1750:-1,1751:-1,1701:-1,1601:-1,1201:-1,1204:-1,1207:-1,1101:-1,1104:-1,1107:-1,1116:-1,1151:-1,1154:-1,1157:-1,1160:-1,1301:-1 +//um_in.gat,98,124,3 shop Tool Merchant 47,611:-1,501:-1,502:-1,503:-1,504:-1,506:-1,525:-1,601:-1,602:-1,1750:-1,1065:-1 +//um_in.gat,103,124,4 shop Food Merchant 91,515:-1,516:-1,535:-1,519:-1,517:-1 + + +//======================================================= +//YUNO +//======================================================= +yuno.gat,65,122,4 shop Fruit Merchant 93,512:-1,513:-1,515:-1,516:-1 +yuno.gat,217,97,4 shop Tool Dealer 83,611:-1,1750:-1,501:-1,502:-1,503:-1,504:-1,505:-1,506:-1,645:-1,656:-1,601:-1,602:-1 +yuno.gat,226,106,5 shop Trader 97, 909:-1, 911:-1, 910:-1, 912:-1 +yuno.gat,197,115,4 shop Pet Merchant 124, 537:-1, 643:-1, 10013:-1, 10014:-1 +yuno.gat,205,104,4 shop Equip Dealer 84, 2340:-1, 2341:-1, 2411:-1, 2222:-1, 2230:-1; 1721:-1 +yuno.gat,163,187,5 shop Magic Dealer 90,717:-1,1601:-1,1604:-1,1607:-1,1610:-1,2232:-1,2321:-1,2332:-1 +yuno_in01.gat,25,34,4 shop Tool Dealer 83,611:-1,1750:-1,501:-1,502:-1,503:-1,504:-1,505:-1,506:-1,645:-1,656:-1,601:-1,602:-1 +yuno_in01.gat,104,35,4 shop Weapon Dealer 49,1750:-1,1751:-1,1101:-1,1701:-1,1201:-1,1204:-1,1207:-1,1210:-1,1213:-1,1216:-1,1601:-1,1604:-1,1607:-1,1610:-1 +yuno_in01.gat,112,25,5 shop Armor Dealer 101,2628:-1,2101:-1,2107:-1,2401:-1,2501:-1,2230:-1,2301:-1,2303:-1,2305:-1,2321:-1,2332:-1 + + +//======================================================= +// ST. CAPITOLINA ABBEY +//====================================== +//= Monk shop, sells Knuckle weapons) +//======================================================= +prt_monk.gat,135,263,3 shop Blacksmith 726, 1801:8000//Waghnak, 1803:25000//Knuckle Dusters, 1805:32000//Studded Knuckles + diff --git a/npc/mobs/dungeons/amatdun.txt b/npc/mobs/dungeons/amatdun.txt new file mode 100644 index 000000000..75b5c131d --- /dev/null +++ b/npc/mobs/dungeons/amatdun.txt @@ -0,0 +1,33 @@ +//===== eAthena Script ======================================= +//= Amatsu Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(ama_dun03.gat)* +ama_dun03.gat,0,0,0,0 monster Shinobi 1401,55,0,0,0 +ama_dun03.gat,0,0,0,0 monster Tengu 1405,55,0,0,0 +ama_dun03.gat,0,0,0,0 monster The Paper 1375,20,0,0,0 +ama_dun03.gat,0,0,0,0 monster Mimic 1191,5,0,0,1 +ama_dun03.gat,0,0,0,0 monster Antique Firelock 1403,25,0,0,0 +ama_dun03.gat,0,0,0,0 monster Miyabi Doll 1404,1,0,0,0 +ama_dun03.gat,0,0,0,0 monster Incantation Samurai 1492,1,5400000,5400000,0 + +//(ama_dun02.gat)* +ama_dun02.gat,0,0,0,0 monster Shinobi 1401,2,0,0,0 +ama_dun02.gat,0,0,0,0 monster The Paper 1375,1,0,0,0 +ama_dun02.gat,0,0,0,0 monster Antique Firelock 1403,20,0,0,0 +ama_dun02.gat,0,0,0,0 monster Poison Toad 1402,35,0,0,0 +ama_dun02.gat,0,0,0,0 monster Horong 1129,10,0,0,0 +ama_dun02.gat,0,0,0,0 monster Miyabi Doll 1404,5,0,0,0 + +//(ama_dun01.gat)* +ama_dun01.gat,0,0,0,0 monster Shinobi 1401,2,0,0,0 +ama_dun01.gat,0,0,0,0 monster Antique Firelock 1403,45,0,0,0 +ama_dun01.gat,0,0,0,0 monster Miyabi Doll 1404,65,0,0,0 diff --git a/npc/mobs/dungeons/anthell.txt b/npc/mobs/dungeons/anthell.txt new file mode 100644 index 000000000..c3ac3cd71 --- /dev/null +++ b/npc/mobs/dungeons/anthell.txt @@ -0,0 +1,117 @@ +//===== eAthena Script ======================================= +//= Ant Hell Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(anthell01.gat)* +anthell01.gat,0,0,0,0 monster Giearth 1121,1,60000,30000,0 +anthell01.gat,0,0,0,0 monster Vitata 1176,10,0,0,0 +anthell01.gat,0,0,0,0 monster Piere 1160,50,0,0,0 +anthell01.gat,0,0,0,0 monster Deniro 1105,40,0,0,0 +anthell01.gat,0,0,0,0 monster Andre 1095,25,0,0,0 +anthell01.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 +anthell01.gat,100,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,101,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,102,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,102,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,103,120,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,103,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,104,120,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,104,122,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,104,123,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,105,124,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,28,262,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,28,263,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,28,264,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,28,265,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,28,266,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,29,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,29,262,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,29,263,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,29,264,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,29,265,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,29,266,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,187,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,190,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,195,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,198,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,261,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,262,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,263,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,264,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,30,265,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,190,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,194,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,195,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,198,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,262,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,263,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,31,264,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,187,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,189,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,196,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,197,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,198,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,32,263,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,33,195,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,33,196,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,35,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,36,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,36,187,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,37,183,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,37,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,38,183,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,38,184,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,38,186,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,168,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,265,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,266,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,267,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,268,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,269,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,40,270,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,165,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,168,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,265,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,266,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,267,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,268,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,41,269,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,42,165,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,42,166,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,42,167,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,42,168,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,43,165,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,43,166,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,44,165,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,44,166,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,45,165,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,97,123,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,97,124,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,97,125,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,97,126,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,97,127,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,98,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,98,127,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,99,121,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,99,127,0,0 monster Ant Egg 1097,1,60000,30000,0 +anthell01.gat,0,0,0,0 monster Maya Purple 1289,1,7200000,3600000,0 + +//(anthell02.gat)* +anthell02.gat,0,0,0,0 monster Giearth 1121,3,60000,30000,0 +anthell02.gat,0,0,0,0 monster Vitata 1176,30,0,0,0 +anthell02.gat,0,0,0,0 monster Piere 1160,15,0,0,0 +anthell02.gat,0,0,0,0 monster Deniro 1105,15,0,0,0 +anthell02.gat,0,0,0,0 monster Andre 1095,40,0,0,0 +anthell02.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 +anthell02.gat,0,0,0,0 monster Ant Egg 1097,15,0,0,0 +anthell02.gat,0,0,0,0 monster Maya 1147,1,7200000,3600000,1 diff --git a/npc/mobs/dungeons/ayodun.txt b/npc/mobs/dungeons/ayodun.txt new file mode 100644 index 000000000..252bd1650 --- /dev/null +++ b/npc/mobs/dungeons/ayodun.txt @@ -0,0 +1,31 @@ +//===== eAthena Script ======================================= +//= Ayothana Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(ayothana dungeon 01)? +ayo_dun01.gat,0,0,0,0 monster Skeleton Archer 1016,40,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Skeleton Soldier 1028,25,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Pirate Skeleton 1071,40,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Skeleton 1076,20,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Orc Skeleton 1152,25,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Skeleton Worker 1169,30,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Skeleton Prisoner 1196,30,0,0,0 +ayo_dun01.gat,0,0,0,0 monster Skeleton General 1290,15,0,0,0 + +//(ayothana dungeon 02)? +ayo_dun02.gat,0,0,0,0 monster Succubus 1370,20,0,0,0 +ayo_dun02.gat,0,0,0,0 monster Skeleton Soldier 1028,25,0,0,0 +ayo_dun02.gat,0,0,0,0 monster Anubis 1098,40,0,0,0 +ayo_dun02.gat,0,0,0,0 monster Drainliar 1111,25,0,0,0 +ayo_dun02.gat,0,0,0,0 monster Rafflesia 1162,20,0,0,0 +ayo_dun02.gat,0,0,0,0 monster Skeleton General 1290,15,0,0,0 +ayo_dun02.gat,0,0,0,0 monster Blue Plant 1079,10,360000,180000,1 +ayo_dun02.gat,0,0,0,0 monster Evil Snake Lord 1418,2,3200000,400000,1 diff --git a/npc/mobs/dungeons/beachdun.txt b/npc/mobs/dungeons/beachdun.txt new file mode 100644 index 000000000..97e7cfa0f --- /dev/null +++ b/npc/mobs/dungeons/beachdun.txt @@ -0,0 +1,32 @@ +//===== eAthena Script ======================================= +//= Beach Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(beach_dun.gat)* +beach_dun.gat,0,0,0,0 monster Medusa 1148,20,0,0,0 +beach_dun.gat,0,0,0,0 monster Penomena 1216,5,30000,0,0 +beach_dun.gat,0,0,0,0 monster Merman 1264,3,10000,20,0 +beach_dun.gat,0,0,0,0 monster Neraid 1255,15,0,0,0 +beach_dun.gat,0,0,0,0 monster Pest 1256,15,0,0,0 + +//(beach_dun2.gat)* +beach_dun2.gat,0,0,0,0 monster Stalactite Golem 1278,40,5000,0,0 +beach_dun2.gat,0,0,0,0 monster Megalith 1274,30,0,0,0 +beach_dun2.gat,0,0,0,0 monster Neraid 1255,5,0,0,0 +beach_dun2.gat,0,0,0,0 monster Tri-Joint 1279,20,0,0,0 +beach_dun2.gat,0,0,0,0 monster Hydra 1068,15,0,0,0 + +//(beach_dun3.gat)* +beach_dun3.gat,0,0,0,0 monster Penomena 1216,3,30000,0,0 +beach_dun3.gat,0,0,0,0 monster Neraid 1255,1,0,0,0 +beach_dun3.gat,0,0,0,0 monster Megalodon 1064,30,0,0,0 +beach_dun3.gat,0,0,0,0 monster Thara Frog 1034,50,0,0,0 +beach_dun3.gat,0,0,0,0 monster Hydra 1068,30,0,0,0 diff --git a/npc/mobs/dungeons/byalan.txt b/npc/mobs/dungeons/byalan.txt new file mode 100644 index 000000000..a3e753bbe --- /dev/null +++ b/npc/mobs/dungeons/byalan.txt @@ -0,0 +1,104 @@ +//===== eAthena Script ======================================= +//= Byalan Island Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(iz_dun00.gat)* +iz_dun00.gat,0,0,0,0 monster Marina 1141,45,0,0,0 +iz_dun00.gat,0,0,0,0 monster Vadon 1066,30,0,0,0 +iz_dun00.gat,0,0,0,0 monster Hydra 1068,30,0,0,0 +iz_dun00.gat,0,0,0,0 monster Kukre 1070,30,0,0,0 +iz_dun00.gat,0,0,0,0 monster Plankton 1161,65,0,0,0 +iz_dun00.gat,0,0,0,0 monster Black Mushroom 1084,5,360000,180000,1 + +//(iz_dun01.gat)* +iz_dun01.gat,0,0,0,0 monster Cornutus 1067,30,300000,150000,1 +iz_dun01.gat,0,0,0,0 monster Marina 1141,40,0,0,0 +iz_dun01.gat,0,0,0,0 monster Vadon 1066,60,0,0,0 +iz_dun01.gat,0,0,0,0 monster Hydra 1068,30,0,0,0 +iz_dun01.gat,0,0,0,0 monster Kukre 1070,50,0,0,0 +iz_dun01.gat,0,0,0,0 monster Plankton 1161,10,0,0,0 +iz_dun01.gat,0,0,0,0 monster Black Mushroom 1084,10,360000,180000,1 + +//(iz_dun02.gat)* +iz_dun02.gat,0,0,0,0 monster Merman 1264,1,0,0,0 +iz_dun02.gat,0,0,0,0 monster Marse 1144,40,0,0,0 +iz_dun02.gat,0,0,0,0 monster Obeaune 1044,40,0,0,0 +iz_dun02.gat,0,0,0,0 monster Cornutus 1067,60,0,0,0 +iz_dun02.gat,0,0,0,0 monster Hydra 1068,40,0,0,0 +iz_dun02.gat,0,0,0,0 monster Black Mushroom 1084,15,360000,180000,1 + +//(iz_dun03.gat)* +iz_dun03.gat,0,0,0,0 monster Merman 1264,3,0,0,0 +iz_dun03.gat,0,0,0,0 monster Marc 1045,40,0,0,0 +iz_dun03.gat,0,0,0,0 monster Swordfish 1069,40,0,0,0 +iz_dun03.gat,0,0,0,0 monster Marine Sphere 1142,20,0,0,0 +iz_dun03.gat,0,0,0,0 monster Phen 1158,45,0,0,0 +iz_dun03.gat,0,0,0,0 monster Hydra 1068,10,0,0,0 +iz_dun03.gat,108,249,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,176,260,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,178,253,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,180,251,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,191,144,0,0 monster Hydra 1068,1,321000,150000,0 +iz_dun03.gat,193,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,194,144,0,0 monster Hydra 1068,1,316000,150000,0 +iz_dun03.gat,196,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,197,144,0,0 monster Hydra 1068,1,2960000,150000,0 +iz_dun03.gat,199,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,200,144,0,0 monster Hydra 1068,1,282000,150000,0 +iz_dun03.gat,202,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,203,144,0,0 monster Hydra 1068,1,310000,150000,0 +iz_dun03.gat,203,47,0,0 monster Hydra 1068,1,305000,150000,0 +iz_dun03.gat,203,50,0,0 monster Hydra 1068,1,323000,150000,0 +iz_dun03.gat,203,53,0,0 monster Hydra 1068,1,317000,150000,0 +iz_dun03.gat,203,56,0,0 monster Hydra 1068,1,323000,150000,0 +iz_dun03.gat,203,59,0,0 monster Hydra 1068,1,312000,150000,0 +iz_dun03.gat,204,48,0,0 monster Hydra 1068,1,313000,150000,0 +iz_dun03.gat,204,51,0,0 monster Hydra 1068,1,309000,150000,0 +iz_dun03.gat,204,54,0,0 monster Hydra 1068,1,310000,150000,0 +iz_dun03.gat,204,57,0,0 monster Hydra 1068,1,302000,150000,0 +iz_dun03.gat,204,60,0,0 monster Hydra 1068,1,304000,150000,0 +iz_dun03.gat,205,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,206,144,0,0 monster Hydra 1068,1,305000,150000,0 +iz_dun03.gat,208,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,209,144,0,0 monster Hydra 1068,1,308000,150000,0 +iz_dun03.gat,211,143,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun03.gat,212,144,0,0 monster Hydra 1068,1,321000,150000,0 +iz_dun03.gat,80,163,0,0 monster Hydra 1068,1,300000,150000,0 + +//(iz_dun04.gat)* +iz_dun04.gat,0,0,0,0 monster Penomena 1216,10,300000,150000,1 +iz_dun04.gat,0,0,0,0 monster Merman 1264,38,0,0,0 +iz_dun04.gat,103,231,10,10 monster Merman 1264,5,150000,0,0 +iz_dun04.gat,130,216,15,15 monster Merman 1264,5,160000,0,0 +iz_dun04.gat,160,231,10,10 monster Merman 1264,5,170000,0,0 +iz_dun04.gat,95,147,10,10 monster Merman 1264,5,150000,0,0 +iz_dun04.gat,0,0,0,0 monster Strouf 1065,3,0,0,0 +iz_dun04.gat,0,0,0,0 monster Swordfish 1069,20,0,0,0 +iz_dun04.gat,0,0,0,0 monster Marine Sphere 1142,20,0,0,0 +iz_dun04.gat,111,35,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,111,38,0,0 monster Hydra 1068,1,303000,150000,0 +iz_dun04.gat,111,41,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,124,233,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,134,233,0,0 monster Hydra 1068,1,305000,150000,0 +iz_dun04.gat,33,115,0,0 monster Hydra 1068,1,321000,150000,0 +iz_dun04.gat,33,129,0,0 monster Hydra 1068,1,308000,150000,0 +iz_dun04.gat,38,115,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,38,129,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,42,116,0,0 monster Hydra 1068,1,306000,150000,0 +iz_dun04.gat,42,129,0,0 monster Hydra 1068,1,312000,150000,0 +iz_dun04.gat,58,135,0,0 monster Hydra 1068,1,305000,150000,0 +iz_dun04.gat,61,135,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,69,243,0,0 monster Hydra 1068,1,321000,150000,0 +iz_dun04.gat,79,234,0,0 monster Hydra 1068,1,302000,150000,0 +iz_dun04.gat,79,246,0,0 monster Hydra 1068,1,300000,150000,0 +iz_dun04.gat,80,233,0,0 monster Hydra 1068,1,318000,150000,0 +iz_dun04.gat,80,246,0,0 monster Hydra 1068,1,294000,150000,0 +iz_dun04.gat,95,147,35,35 monster Deviace 1108,3,60000,30000,0 diff --git a/npc/mobs/dungeons/clocktower.txt b/npc/mobs/dungeons/clocktower.txt new file mode 100644 index 000000000..a907529a5 --- /dev/null +++ b/npc/mobs/dungeons/clocktower.txt @@ -0,0 +1,122 @@ +//===== eAthena Script ======================================= +//= Clock Tower Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(alde_dun01.gat)* +alde_dun01.gat,0,0,0,0 monster Arclouse 1194,50,0,0,0 +alde_dun01.gat,0,0,0,0 monster Drainliar 1111,40,0,0,0 + +//(alde_dun02.gat)* +alde_dun02.gat,0,0,0,0 monster Arclouse 1194,20,0,0,0 +alde_dun02.gat,0,0,0,0 monster High Orc 1213,40,0,0,0 +alde_dun02.gat,0,0,0,0 monster Orc Archer 1189,20,0,0,0 +alde_dun02.gat,0,0,0,0 monster Brilight 1211,20,0,0,0 +alde_dun02.gat,0,0,0,0 monster Drainliar 1111,10,0,0,0 + +//(alde_dun03.gat)* +alde_dun03.gat,102,40,10,10 monster Penomena 1216,12,300000,150000,0 +alde_dun03.gat,120,157,8,8 monster Penomena 1216,6,300000,150000,0 +alde_dun03.gat,126,53,20,20 monster Penomena 1216,12,300000,150000,0 +alde_dun03.gat,127,204,9,9 monster Penomena 1216,8,300000,150000,0 +alde_dun03.gat,130,220,40,40 monster Penomena 1216,20,300000,150000,0 +alde_dun03.gat,135,140,8,8 monster Penomena 1216,6,300000,150000,0 +alde_dun03.gat,142,157,8,8 monster Penomena 1216,6,300000,150000,0 +alde_dun03.gat,147,30,8,8 monster Penomena 1216,6,300000,150000,0 +alde_dun03.gat,155,201,25,25 monster Penomena 1216,12,300000,150000,0 +alde_dun03.gat,160,181,8,8 monster Penomena 1216,6,300000,150000,0 +alde_dun03.gat,163,56,10,10 monster Penomena 1216,8,300000,150000,0 +alde_dun03.gat,168,42,6,6 monster Penomena 1216,4,300000,150000,0 +alde_dun03.gat,179,166,6,6 monster Penomena 1216,4,300000,150000,0 +alde_dun03.gat,184,61,30,30 monster Penomena 1216,14,300000,150000,0 +alde_dun03.gat,194,37,8,8 monster Penomena 1216,6,300000,150000,0 +alde_dun03.gat,0,0,0,0 monster Cramp 1209,55,0,0,0 +alde_dun03.gat,77,28,5,5 monster Cramp 1209,1,40000,20000,0 +alde_dun03.gat,0,0,0,0 monster Drainliar 1111,55,0,0,0 + +//(alde_dun04.gat)* +alde_dun04.gat,0,0,0,0 monster Mysteltainn 1203,1,0,0,0 +alde_dun04.gat,0,0,0,0 monster Executioner 1205,1,0,0,0 +alde_dun04.gat,0,0,0,0 monster Joker 1131,10,0,0,0 +alde_dun04.gat,0,0,0,0 monster Bathory 1102,50,0,0,0 +alde_dun04.gat,0,0,0,0 monster Whisper 1179,10,0,0,0 +alde_dun04.gat,0,0,0,0 monster Tyrfing 1204,1,7200000,3600000,0 + +//(c_tower1.gat)* +c_tower1.gat,0,0,0,0 monster Tower Keeper 1270,1,0,0,0 +c_tower1.gat,0,0,0,0 monster Rideword 1195,70,0,0,0 +c_tower1.gat,205,210,85,90 monster Bathory 1102,1,0,0,0 +c_tower1.gat,250,345,110,35 monster Punk 1199,17,0,0,0 +c_tower1.gat,250,60,140,50 monster Punk 1199,17,0,0,0 +c_tower1.gat,60,197,40,177 monster Punk 1199,36,0,0,0 + +//(c_tower2.gat)* +c_tower2.gat,0,0,0,0 monster Tower Keeper 1270,1,0,0,0 +c_tower2.gat,0,0,0,0 monster Clock 1269,25,0,0,0 +c_tower2.gat,100,233,0,0 monster Clock 1269,1,355000,150000,1 +c_tower2.gat,100,233,0,0 monster Clock 1269,1,420000,150000,1 +c_tower2.gat,100,242,0,0 monster Clock 1269,1,395000,150000,1 +c_tower2.gat,101,242,0,0 monster Clock 1269,1,325000,150000,1 +c_tower2.gat,102,233,0,0 monster Clock 1269,1,450000,150000,1 +c_tower2.gat,103,234,0,0 monster Clock 1269,1,445000,150000,1 +c_tower2.gat,103,240,0,0 monster Clock 1269,1,430000,150000,1 +c_tower2.gat,185,110,0,0 monster Clock 1269,1,320000,180000,1 +c_tower2.gat,185,154,0,0 monster Clock 1269,1,340000,180000,1 +c_tower2.gat,187,194,0,0 monster Clock 1269,1,360000,180000,1 +c_tower2.gat,95,237,0,0 monster Clock 1269,1,475000,150000,1 +c_tower2.gat,95,238,0,0 monster Clock 1269,1,480000,150000,1 +c_tower2.gat,95,241,0,0 monster Clock 1269,1,385000,150000,1 +c_tower2.gat,96,242,0,0 monster Clock 1269,1,490000,150000,1 +c_tower2.gat,99,242,0,0 monster Clock 1269,1,400000,150000,1 +c_tower2.gat,0,0,0,0 monster Rideword 1195,16,0,0,0 +c_tower2.gat,0,0,0,0 monster Mimic 1191,3,0,0,0 +c_tower2.gat,0,0,0,0 monster Punk 1199,40,0,0,0 + +//(c_tower3.gat)* +c_tower3.gat,0,0,0,0 monster Mimic 1191,15,0,0,0 +c_tower3.gat,0,0,0,0 monster Alarm 1193,70,0,0,0 +c_tower3.gat,0,0,0,0 monster Rideword 1195,11,0,0,0 +c_tower3.gat,0,0,0,0 monster Tower Keeper 1270,1,0,0,0 + +//(c_tower4.gat)* +c_tower4.gat,0,0,0,0 monster Owl Duke 1320,30,0,0,0 +c_tower4.gat,0,0,0,0 monster Tower Keeper 1270,1,3600000,0,0 +c_tower4.gat,0,0,0,0 monster Tower Keeper 1270,2,1800000,0,0 +c_tower4.gat,0,0,0,0 monster Clock 1269,35,0,0,0 +c_tower4.gat,80,179,0,0 monster Rideword 1195,1,360000,150000,1 +c_tower4.gat,80,180,0,0 monster Rideword 1195,1,350000,150000,1 +c_tower4.gat,80,181,0,0 monster Rideword 1195,1,290000,150000,1 +c_tower4.gat,80,182,0,0 monster Rideword 1195,1,300000,150000,1 +c_tower4.gat,80,183,0,0 monster Rideword 1195,1,340000,150000,1 +c_tower4.gat,86,180,0,0 monster Rideword 1195,1,380000,150000,1 +c_tower4.gat,87,180,0,0 monster Rideword 1195,1,400000,150000,1 +c_tower4.gat,91,180,0,0 monster Rideword 1195,1,330000,150000,1 +c_tower4.gat,92,180,0,0 monster Rideword 1195,1,280000,150000,1 +c_tower4.gat,93,180,0,0 monster Rideword 1195,1,260000,150000,1 +c_tower4.gat,94,180,0,0 monster Rideword 1195,1,320000,150000,1 +c_tower4.gat,95,180,0,0 monster Rideword 1195,1,410000,150000,1 +c_tower4.gat,96,180,0,0 monster Rideword 1195,1,350000,150000,1 +c_tower4.gat,97,180,0,0 monster Rideword 1195,1,240000,150000,1 +c_tower4.gat,98,180,0,0 monster Rideword 1195,1,300000,150000,1 +c_tower4.gat,0,0,0,0 monster Alarm 1193,35,0,0,0 +c_tower4.gat,104,14,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,104,27,0,0 monster Mimic 1191,1,900000,400000,1 +c_tower4.gat,105,24,0,0 monster Mimic 1191,1,900000,400000,1 +c_tower4.gat,128,194,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,148,85,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,170,34,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,189,51,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,205,105,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,257,109,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,31,139,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,37,159,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,38,193,0,0 monster Mimic 1191,1,1800000,900000,1 +c_tower4.gat,0,0,0,0 monster Whisper 1179,5,0,0,0 +c_tower4.gat,42,41,0,0 monster Executioner 1205,1,7200000,3600000,1 diff --git a/npc/mobs/dungeons/coalmine.txt b/npc/mobs/dungeons/coalmine.txt new file mode 100644 index 000000000..6ebc4a5f8 --- /dev/null +++ b/npc/mobs/dungeons/coalmine.txt @@ -0,0 +1,29 @@ +//===== eAthena Script ======================================= +//= Coal Mine(Dead pit) Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(mjo_dun01.gat)* +mjo_dun01.gat,0,0,0,0 monster Martin 1145,40,0,0,0 +mjo_dun01.gat,0,0,0,0 monster Tarou 1175,80,0,0,0 +mjo_dun01.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 + +//(mjo_dun02.gat)* +mjo_dun02.gat,0,0,0,0 monster Skeleton Worker 1169,20,0,0,0 +mjo_dun02.gat,0,0,0,0 monster Giearth 1121,25,0,0,0 +mjo_dun02.gat,0,0,0,0 monster Drainliar 1111,20,0,0,0 +mjo_dun02.gat,0,0,0,0 monster Martin 1145,60,0,0,0 + +//(mjo_dun03.gat)* +mjo_dun03.gat,0,0,0,0 monster Cramp 1209,3,0,0,0 +mjo_dun03.gat,0,0,0,0 monster Myst 1151,35,0,0,0 +mjo_dun03.gat,0,0,0,0 monster Skeleton Worker 1169,70,0,0,0 +mjo_dun03.gat,0,0,0,0 monster Giearth 1121,10,0,0,0 +mjo_dun03.gat,0,0,0,0 monster Martin 1145,10,0,0,0 diff --git a/npc/mobs/dungeons/geftower.txt b/npc/mobs/dungeons/geftower.txt new file mode 100644 index 000000000..9c61d986d --- /dev/null +++ b/npc/mobs/dungeons/geftower.txt @@ -0,0 +1,68 @@ +//===== eAthena Script ======================================= +//= Geffen Tower Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(gef_dun00.gat)* +gef_dun00.gat,0,0,0,0 monster Hunter Fly 1035,20,0,0,0 +gef_dun00.gat,0,0,0,0 monster Poison Spore 1077,25,0,0,0 +gef_dun00.gat,0,0,0,0 monster Poporing 1031,15,0,0,0 +gef_dun00.gat,92,108,0,0 monster Yellow Plant 1081,1,600000,300000,1 +gef_dun00.gat,109,121,0,0 monster Shining Plant 1083,1,1800000,900000,1 +gef_dun00.gat,121,109,3,3 monster Black Mushroom 1084,3,180000,90000,1 +gef_dun00.gat,89,111,3,3 monster Black Mushroom 1084,3,180000,90000,1 +gef_dun00.gat,114,106,0,0 monster Green Plant 1080,1,300000,150000,1 +gef_dun00.gat,109,121,10,10 monster Red Plant 1078,6,300000,150000,1 +gef_dun00.gat,91,106,10,10 monster Red Plant 1078,6,300000,150000,1 + +//(gef_dun01.gat)* +gef_dun01.gat,0,0,0,0 monster Tyrfing 1204,1,0,0,0 +gef_dun01.gat,0,0,0,0 monster Nightmare 1061,30,0,0,0 +gef_dun01.gat,0,0,0,0 monster Ghoul 1036,40,0,0,0 +gef_dun01.gat,0,0,0,0 monster Drainliar 1111,30,0,0,0 +gef_dun01.gat,0,0,0,0 monster Zombie 1015,25,0,0,0 +gef_dun01.gat,0,0,0,0 monster White Plant 1082,10,180000,90000,1 +gef_dun01.gat,0,0,0,0 monster Jakk 1130,30,300000,150000,0 +gef_dun01.gat,234,121,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_dun01.gat,0,0,0,0 monster Dracula 1389,1,3600000,1800000,0 +gef_dun01.gat,89,111,3,3 monster Black Mushroom 1084,5,180000,90000,1 + +//(gef_dun02.gat)* +gef_dun02.gat,0,0,0,0 monster Nightmare 1061,50,300000,100000,0 +gef_dun02.gat,0,0,0,0 monster Deviruchi 1109,15,0,0,0 +gef_dun02.gat,0,0,0,0 monster Hunter Fly 1035,10,0,0,0 +gef_dun02.gat,0,0,0,0 monster Marionette 1143,15,0,0,0 +gef_dun02.gat,0,0,0,0 monster Ghoul 1036,20,0,0,0 +gef_dun02.gat,0,0,0,0 monster Whisper 1179,20,0,0,0 +gef_dun02.gat,0,0,0,0 monster White Plant 1082,12,0,0,1 +gef_dun02.gat,0,0,0,0 monster Shining Plant 1083,2,1800000,900000,1 +gef_dun02.gat,0,0,0,0 monster Doppelganger 1046,1,7200000,3600000,1 + +//(gef_dun03.gat)? +gef_dun03.gat,0,0,0,0 monster Baphomet 1039,1,7200000,3600000,1 +gef_dun03.gat,0,0,0,0 monster Doppelganger 1046,1,7200000,3600000,1 +gef_dun03.gat,0,0,0,0 monster Deviruchi 1109,8,0,0,0 +gef_dun03.gat,0,0,0,0 monster Joker 1131,5,300000,100000,0 +gef_dun03.gat,0,0,0,0 monster Khalitzburg 1132,2,0,0,0 +gef_dun03.gat,0,0,0,0 monster Knight of Abyss 1219,2,300000,0,0 +gef_dun03.gat,0,0,0,0 monster Gryphon 1259,1,7200000,3600000,1 +gef_dun03.gat,0,0,0,0 monster Blood Knight 1268,2,300000,0,0 +gef_dun03.gat,0,0,0,0 monster Dark Lord 1272,1,7200000,3600000,1 +gef_dun03.gat,0,0,0,0 monster Alice 1275,3,0,0,0 +gef_dun03.gat,0,0,0,0 monster Chimera 1283,1,7200000,3600000,1 +gef_dun03.gat,0,0,0,0 monster Mini Demon 1292,2,300000,0,0 +gef_dun03.gat,0,0,0,0 monster Dark Illusion 1302,2,300000,0,0 +gef_dun03.gat,0,0,0,0 monster Apocalypse 1365,2,300000,0,0 +gef_dun03.gat,0,0,0,0 monster Succubus 1370,10,0,0,0 +gef_dun03.gat,0,0,0,0 monster Fake Angel 1371,8,0,0,0 +gef_dun03.gat,0,0,0,0 monster Lord of Death 1373,1,7200000,7200000,1 +gef_dun03.gat,0,0,0,0 monster Incubus 1374,10,0,0,0 +gef_dun03.gat,0,0,0,0 monster Nightmare Terror 1379,3,0,0,0 +gef_dun03.gat,0,0,0,0 monster Violy 1390,10,0,0,0 diff --git a/npc/mobs/dungeons/glastheim.txt b/npc/mobs/dungeons/glastheim.txt new file mode 100644 index 000000000..83f2f6308 --- /dev/null +++ b/npc/mobs/dungeons/glastheim.txt @@ -0,0 +1,159 @@ +//===== eAthena Script ======================================= +//= Glast Heim Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(glast_01.gat)* +glast_01.gat,0,0,0,0 monster Gargoyle 1253,10,0,0,0 +glast_01.gat,0,0,0,0 monster Knight of Abyss 1219,2,0,0,1 +glast_01.gat,233,209,15,15 monster Blue Plant 1079,2,900000,450000,1 +glast_01.gat,233,209,15,15 monster Shining Plant 1083,1,1800000,900000,1 +glast_01.gat,233,209,15,15 monster Green Plant 1080,8,360000,180000,1 + +//(gl_cas01.gat)* +gl_cas01.gat,0,0,0,0 monster Alice 1275,1,0,0,0 +gl_cas01.gat,0,0,0,0 monster Rideword 1195,15,0,0,0 +gl_cas01.gat,0,0,0,0 monster Dark Frame 1260,20,0,0,0 +gl_cas01.gat,0,0,0,0 monster Carat 1267,40,0,0,0 +gl_cas01.gat,0,0,0,0 monster Sageworm 1281,40,0,0,0 +gl_cas01.gat,0,0,0,0 monster Whisper 1179,20,0,0,0 +gl_cas01.gat,0,0,0,0 monster Owl Baron 1295,3,30000,15000,0 +gl_cas01.gat,0,0,0,0 monster Tyrfing 1204,1,7200000,3600000,1 + +//(gl_cas02.gat)? +gl_cas02.gat,0,0,0,0 monster Evil Druid 1117,10,0,0,0 +gl_cas02.gat,133,83,3,3 monster Khalitzburg 1132,1,360000,180000,1 +gl_cas02.gat,173,127,3,3 monster Khalitzburg 1132,1,360000,180000,1 +gl_cas02.gat,173,167,3,3 monster Khalitzburg 1132,1,360000,180000,1 +gl_cas02.gat,182,65,3,3 monster Khalitzburg 1132,1,360000,180000,1 +gl_cas02.gat,189,20,1,1 monster Khalitzburg 1132,1,360000,180000,0 +gl_cas02.gat,45,177,3,3 monster Khalitzburg 1132,1,360000,180000,1 +gl_cas02.gat,0,0,0,0 monster Raydric 1163,45,0,0,0 +gl_cas02.gat,102,180,0,0 monster Whisper 1185,1,1800000,900000,1 +gl_cas02.gat,105,180,0,0 monster Whisper 1185,1,1800000,900000,1 +gl_cas02.gat,83,80,2,2 monster Mimic 1191,1,360000,180000,1 +gl_cas02.gat,83,84,2,2 monster Mimic 1191,1,360000,180000,1 +gl_cas02.gat,185,11,8,8 monster Rideword 1195,4,120000,60000,1 +gl_cas02.gat,46,124,15,15 monster Rideword 1195,15,360000,180000,1 +gl_cas02.gat,0,0,0,0 monster Mysteltainn 1203,1,7200000,3600000,1 +gl_cas02.gat,104,145,5,5 monster Mysteltainn 1203,1,7200000,3600000,1 +gl_cas02.gat,0,0,0,0 monster Tyrfing 1204,1,7200000,3600000,0 +gl_cas02.gat,0,0,0,0 monster Wanderer 1208,20,0,0,0 +gl_cas02.gat,190,23,1,1 monster Wanderer 1208,1,360000,180000,0 +gl_cas02.gat,104,38,4,4 monster Knight of Abyss 1219,1,1800000,900000,1 +gl_cas02.gat,115,177,3,3 monster Knight of Abyss 1219,1,1800000,900000,1 +gl_cas02.gat,24,35,4,4 monster Knight of Abyss 1219,1,1800000,900000,1 +gl_cas02.gat,93,177,3,3 monster Knight of Abyss 1219,1,1800000,900000,1 +gl_cas02.gat,0,0,0,0 monster Alice 1275,1,0,0,0 +gl_cas02.gat,0,0,0,0 monster Raydric Archer 1276,19,0,0,0 +gl_cas02.gat,190,38,1,1 monster Raydric Archer 1276,1,360000,180000,0 +gl_cas02.gat,0,0,0,0 monster Chimera 1283,1,7200000,3600000,0 + +//(gl_church.gat)? +gl_church.gat,0,0,0,0 monster Ghoul 1036,25,0,0,0 +gl_church.gat,0,0,0,0 monster Evil Druid 1117,15,0,0,0 +gl_church.gat,0,0,0,0 monster Mimic 1191,10,0,0,0 +gl_church.gat,0,0,0,0 monster Wraith 1192,10,0,0,0 +gl_church.gat,0,0,0,0 monster Dark Illusion 1302,1,0,0,0 + +//(gl_chyard.gat)? +gl_chyard.gat,0,0,0,0 monster Zombie 1015,20,0,0,0 +gl_chyard.gat,0,0,0,0 monster Hunter Fly 1035,15,0,0,0 +gl_chyard.gat,0,0,0,0 monster Ghoul 1036,25,0,0,0 +gl_chyard.gat,0,0,0,0 monster Evil Druid 1117,10,0,0,0 +gl_chyard.gat,0,0,0,0 monster Mimic 1191,5,0,0,0 +gl_chyard.gat,0,0,0,0 monster Wraith 1192,15,0,0,0 +gl_chyard.gat,0,0,0,0 monster Dark Lord 1272,1,3600000,1800000,0 + +//(gl_dun01.gat)? +gl_dun01.gat,0,0,0,0 monster Arclouse 1194,100,0,0,0 +gl_dun01.gat,0,0,0,0 monster Sting 1207,20,0,0,0 + +//(gl_dun02.gat)? +gl_dun02.gat,0,0,0,0 monster Minorous 1149,20,0,0,0 +gl_dun02.gat,0,0,0,0 monster Gargoyle 1253,20,0,0,0 +gl_dun02.gat,0,0,0,0 monster Majoruros 1310,40,0,0,0 + +//(gl_in01.gat)? +gl_in01.gat,0,0,0,0 monster Marionette 1143,10,0,0,0 +gl_in01.gat,0,0,0,0 monster Rideword 1195,10,0,0,0 +gl_in01.gat,0,0,0,0 monster Wanderer 1208,1,0,0,0 +gl_in01.gat,0,0,0,0 monster Dark Frame 1260,10,0,0,0 +gl_in01.gat,0,0,0,0 monster Alice 1275,1,0,0,0 +gl_in01.gat,0,0,0,0 monster Sageworm 1281,20,0,0,0 + +//(gl_knt01.gat)? +gl_knt01.gat,0,0,0,0 monster Khalitzburg 1132,5,0,0,0 +gl_knt01.gat,0,0,0,0 monster Raydric 1163,60,0,0,0 +gl_knt01.gat,21,278,0,0 monster Giant Whisper 1186,1,3600000,1800000,1 +gl_knt01.gat,122,266,0,0 monster Rideword 1195,1,120000,60000,1 +gl_knt01.gat,26,223,20,20 monster Rideword 1195,10,120000,60000,1 +gl_knt01.gat,33,120,30,30 monster Rideword 1195,30,120000,60000,1 +gl_knt01.gat,0,0,0,0 monster Knight of Abyss 1219,20,60000,30000,1 +gl_knt01.gat,0,0,0,0 monster Alice 1275,1,0,0,1 +gl_knt01.gat,0,0,0,0 monster Raydric Archer 1276,25,0,0,0 + +//(gl_knt02.gat)? +gl_knt02.gat,0,0,0,0 monster Joker 1131,20,0,0,0 +gl_knt02.gat,114,194,5,5 monster Khalitzburg 1132,1,1800000,900000,1 +gl_knt02.gat,118,241,5,5 monster Khalitzburg 1132,2,1800000,900000,1 +gl_knt02.gat,196,239,5,5 monster Khalitzburg 1132,2,1800000,900000,1 +gl_knt02.gat,208,45,5,5 monster Khalitzburg 1132,1,1800000,900000,1 +gl_knt02.gat,232,132,5,5 monster Khalitzburg 1132,2,1800000,900000,1 +gl_knt02.gat,243,74,5,5 monster Khalitzburg 1132,1,1800000,900000,1 +gl_knt02.gat,60,242,5,5 monster Khalitzburg 1132,1,1800000,900000,1 +gl_knt02.gat,62,80,5,5 monster Khalitzburg 1132,2,1800000,900000,1 +gl_knt02.gat,82,134,5,5 monster Khalitzburg 1132,1,1800000,900000,1 +gl_knt02.gat,99,49,5,5 monster Khalitzburg 1132,2,1800000,900000,1 +gl_knt02.gat,0,0,0,0 monster Raydric 1163,50,0,0,0 +gl_knt02.gat,0,0,0,0 monster Mysteltainn 1203,1,0,0,1 +gl_knt02.gat,149,26,5,5 monster Knight of Abyss 1219,10,60000,30000,1 +gl_knt02.gat,0,0,0,0 monster Blood Knight 1268,1,3600000,1800000,1 +gl_knt02.gat,0,0,0,0 monster Alice 1275,1,0,0,1 +gl_knt02.gat,0,0,0,0 monster Raydric Archer 1276,25,0,0,0 + +//(gl_prison.gat)? +gl_prison.gat,0,0,0,0 monster Hunter Fly 1035,10,0,0,0 +gl_prison.gat,0,0,0,0 monster Zombie Prisoner 1197,20,0,0,0 +gl_prison.gat,0,0,0,0 monster Rybio 1201,10,0,0,0 +gl_prison.gat,0,0,0,0 monster Injustice 1257,10,0,0,0 + +//(gl_prison1.gat)? +gl_prison1.gat,0,0,0,0 monster Hunter Fly 1035,10,0,0,0 +gl_prison1.gat,0,0,0,0 monster Skeleton Prisoner 1196,10,0,0,0 +gl_prison1.gat,0,0,0,0 monster Zherlthsh 1200,1,3600000,0,0 +gl_prison1.gat,0,0,0,0 monster Rybio 1201,10,0,0,0 +gl_prison1.gat,0,0,0,0 monster Phendark 1202,10,0,0,0 +gl_prison1.gat,0,0,0,0 monster Cramp 1209,30,0,0,0 +gl_prison1.gat,0,0,0,0 monster Injustice 1257,50,0,0,0 + +//(gl_sew01.gat)? +gl_sew01.gat,0,0,0,0 monster Whisper 1179,30,0,0,0 +gl_sew01.gat,0,0,0,0 monster Arclouse 1194,10,0,0,0 +gl_sew01.gat,0,0,0,0 monster Gargoyle 1253,10,0,0,0 + +//(gl_sew02.gat)? +gl_sew02.gat,0,0,0,0 monster Cramp 1209,30,0,0,0 +gl_sew02.gat,0,0,0,0 monster Gargoyle 1253,30,0,0,0 + +//(gl_sew03.gat)? +gl_sew03.gat,0,0,0,0 monster Sting 1207,50,0,0,0 +gl_sew03.gat,0,0,0,0 monster Cramp 1209,30,0,0,0 +gl_sew03.gat,0,0,0,0 monster Gargoyle 1253,15,0,0,0 + +//(gl_sew04.gat)? +gl_sew04.gat,0,0,0,0 monster Drainliar 1111,20,0,0,0 +gl_sew04.gat,0,0,0,0 monster Anolian 1206,10,0,0,0 +gl_sew04.gat,0,0,0,0 monster Gargoyle 1253,10,0,0,0 + +//(gl_step.gat)? +gl_step.gat,0,0,0,0 monster Mimic 1191,30,60000,30000,1 +gl_step.gat,0,0,0,0 monster Wind Ghost 1263,30,0,0,0 +gl_step.gat,0,0,0,0 monster Raydric Archer 1276,30,0,0,0 diff --git a/npc/mobs/dungeons/gondun.txt b/npc/mobs/dungeons/gondun.txt new file mode 100644 index 000000000..12fbfbbc2 --- /dev/null +++ b/npc/mobs/dungeons/gondun.txt @@ -0,0 +1,39 @@ +//===== eAthena Script ======================================= +//= Gonryun Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(gon_dun01.gat)* +gon_dun01.gat,0,0,0,0 monster Enchanted Peach Tree 1410,35,0,0,0 +gon_dun01.gat,0,0,0,0 monster Zipper Bear 1417,30,0,0,0 +gon_dun01.gat,0,0,0,0 monster Red Plant 1078,5,0,0,1 +gon_dun01.gat,0,0,0,0 monster White Plant 1082,10,0,0,1 +gon_dun01.gat,0,0,0,0 monster Yellow Plant 1081,10,0,0,1 +gon_dun01.gat,0,0,0,0 monster Bloody Butterfly 1408,55,900000,900000,0 + +//(gon_dun02.gat)* +gon_dun02.gat,240,223,35,40 monster Baby Leopard 1415,5,15000,30000,0 +gon_dun02.gat,37,110,20,38 monster Baby Leopard 1415,7,15000,30000,0 +gon_dun02.gat,0,0,0,0 monster Bloody Butterfly 1408,20,0,0,0 +gon_dun02.gat,0,0,0,0 monster Taoist Hermit 1412,25,0,0,0 +gon_dun02.gat,37,110,20,38 monster Enchanted Peach Tree 1410,5,10000,30000,0 +gon_dun02.gat,0,0,0,0 monster Enchanted Peach Tree 1410,9,0,0,0 +gon_dun02.gat,27,100,16,33 monster Enchanted Peach Tree 1410,2,15000,30000,0 +gon_dun02.gat,47,120,16,33 monster Enchanted Peach Tree 1410,2,15000,30000,0 +gon_dun02.gat,250,243,25,34 monster Enchanted Peach Tree 1410,7,15000,30000,0 +gon_dun02.gat,230,203,25,34 monster Enchanted Peach Tree 1410,5,15000,30000,0 +gon_dun02.gat,0,0,0,0 monster Yellow Plant 1081,4,600000,600000,1 + +//(gon_dun03.gat)* +gon_dun03.gat,0,0,0,0 monster Taoist Hermit 1412,30,0,0,0 +gon_dun03.gat,0,0,0,0 monster Evil Nymph 1416,50,0,0,0 +gon_dun03.gat,0,0,0,0 monster Hermit Plant 1413,20,0,0,1 +gon_dun03.gat,0,0,0,0 monster White Plant 1082,10,0,0,1 +gon_dun03.gat,0,0,0,0 monster Evil Snake Lord 1418,1,7200000,3600000,0 diff --git a/npc/mobs/dungeons/guilddun.txt b/npc/mobs/dungeons/guilddun.txt new file mode 100644 index 000000000..b261b4349 --- /dev/null +++ b/npc/mobs/dungeons/guilddun.txt @@ -0,0 +1,43 @@ +//===== eAthena Script ======================================= +//= Guild Dungeons Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(gld_dun01.gat)* +gld_dun01.gat,0,0,0,0 monster Skeleton General 1290,10,0,0,0 +gld_dun01.gat,0,0,0,0 monster Gajomart 1309,10,0,0,0 +gld_dun01.gat,0,0,0,0 monster Am Mut 1301,10,0,0,0 +gld_dun01.gat,0,0,0,0 monster Cat'o'Nine Tails 1307,3,1200000,0,0 +gld_dun01.gat,0,0,0,0 monster Vagabond Wolf 1092,1,14400000,7200000,1 +gld_dun01.gat,0,0,0,0 monster Eddga 1115,1,28800000,28800000,1 + +//(gld_dun02.gat)* +gld_dun02.gat,0,0,0,0 monster Owl Baron 1295,3,0,0,0 +gld_dun02.gat,0,0,0,0 monster Ancient Worm 1305,8,0,0,0 +gld_dun02.gat,0,0,0,0 monster Killer Mantis 1294,8,0,0,0 +gld_dun02.gat,0,0,0,0 monster Giant Hornet 1303,8,0,0,0 +gld_dun02.gat,0,0,0,0 monster Giant Spider 1304,8,0,0,0 +gld_dun02.gat,0,0,0,0 monster Doppelganger 1046,1,28800000,28800000,1 + +//(gld_dun03.gat)* +gld_dun03.gat,0,0,0,0 monster Maya Purple 1289,3,1200000,0,0 +gld_dun03.gat,0,0,0,0 monster Caterpillar 1300,20,0,0,0 +gld_dun03.gat,0,0,0,0 monster Gullinbursti 1311,10,0,0,0 +gld_dun03.gat,0,0,0,0 monster Creamy Fear 1293,20,0,0,0 +gld_dun03.gat,0,0,0,0 monster Leib Olmai 1306,20,0,0,0 +gld_dun03.gat,0,0,0,0 monster Maya 1147,1,28800001,28800000,1 + +//(gld_dun04.gat)* +gld_dun04.gat,0,0,0,0 monster Dark Illusion 1302,1,1200000,0,0 +gld_dun04.gat,0,0,0,0 monster Wraith Dead 1291,20,0,0,0 +gld_dun04.gat,0,0,0,0 monster Mini Demon 1292,20,0,0,0 +gld_dun04.gat,0,0,0,0 monster Zombie Master 1298,20,0,0,0 +gld_dun04.gat,0,0,0,0 monster Ghostring 1120,1,10800000,10800000,1 +gld_dun04.gat,0,0,0,0 monster Dark Lord 1272,1,28800000,28800000,1 diff --git a/npc/mobs/dungeons/louydun.txt b/npc/mobs/dungeons/louydun.txt new file mode 100644 index 000000000..f19d27af4 --- /dev/null +++ b/npc/mobs/dungeons/louydun.txt @@ -0,0 +1,33 @@ +//===== eAthena Script ======================================= +//= Louyang Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//lou_dun01)? +lou_dun01.gat,0,0,0,0 monster Thief Bug Egg 1048,20,0,0,0 +lou_dun01.gat,0,0,0,0 monster Sidewinder 1037,25,0,0,0 +lou_dun01.gat,0,0,0,0 monster Horong 1129,25,0,0,0 +lou_dun01.gat,0,0,0,0 monster Bigfoot 1060,15,0,0,0 +lou_dun01.gat,0,0,0,0 monster Zipper Bear 1417,15,0,0,0 + +//lou_dun02)? +lou_dun02.gat,0,0,0,0 monster Bon Gun 1188,30,0,0,0 +lou_dun02.gat,0,0,0,0 monster Munak 1026,30,0,0,0 +lou_dun02.gat,0,0,0,0 monster Hyegun 1512,15,0,0,0 +lou_dun02.gat,0,0,0,0 monster Dancing Dragon 1514,25,0,0,0 + +//lou_dun03)? +lou_dun03.gat,0,0,0,0 monster Chung E 1519,25,0,0,0 +lou_dun03.gat,0,0,0,0 monster Li Me Mang Ryang 1517,25,0,0,0 +lou_dun03.gat,0,0,0,0 monster Increase Soil 1516,15,0,0,0 +lou_dun03.gat,0,0,0,0 monster Dancing Dragon 1514,20,0,0,0 +lou_dun03.gat,0,0,0,0 monster Bon Gun 1188,20,0,0,0 +lou_dun03.gat,0,0,0,0 monster Munak 1026,20,0,0,0 +lou_dun03.gat,0,0,0,0 monster Bacsojin 1518,1,3600000,7200000,0 diff --git a/npc/mobs/dungeons/magmadun.txt b/npc/mobs/dungeons/magmadun.txt new file mode 100644 index 000000000..2129deb4a --- /dev/null +++ b/npc/mobs/dungeons/magmadun.txt @@ -0,0 +1,25 @@ +//===== eAthena Script ======================================= +//= Magma Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= 1.1 fixed 2,3,4 tabs instead of 1... and wrong mob names [Lupus] +//============================================================ + +//(mag_dun02.gat)* +mag_dun02.gat,0,0,0,0 monster Nightmare Terror 1379,30,0,0,0 +mag_dun02.gat,0,0,0,0 monster Diabolic 1382,10,0,0,0 +mag_dun02.gat,0,0,0,0 monster Sky Deleter 1384,10,0,0,0 +mag_dun02.gat,0,0,0,0 monster Earth Deleter 1385,10,0,0,0 +mag_dun02.gat,0,0,0,0 monster Gig 1387,20,0,0,0 +mag_dun02.gat,0,0,0,0 monster Blazer 1367,20,0,0,0 + +//(mag_dun01.gat)* +mag_dun01.gat,0,0,0,0 monster Lava Golem 1366,15,0,0,0 +mag_dun01.gat,0,0,0,0 monster Grizzly 1381,10,0,0,0 +mag_dun01.gat,0,0,0,0 monster Diabolic 1382,10,0,0,0 +mag_dun01.gat,0,0,0,0 monster Explosion 1383,30,0,0,0 diff --git a/npc/mobs/dungeons/moc_pyramid.txt b/npc/mobs/dungeons/moc_pyramid.txt new file mode 100644 index 000000000..6107c9cd2 --- /dev/null +++ b/npc/mobs/dungeons/moc_pyramid.txt @@ -0,0 +1,49 @@ +//===== eAthena Script ======================================= +//= Morocc Pryamid Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(moc_pryd01.gat)* +moc_pryd01.gat,0,0,0,0 monster Poporing 1031,50,0,0,0 +moc_pryd01.gat,0,0,0,0 monster Familiar 1005,50,0,0,0 + +//(moc_pryd02.gat)* +moc_pryd02.gat,0,0,0,0 monster Isis 1029,25,0,0,0 +moc_pryd02.gat,0,0,0,0 monster Mummy 1041,30,0,0,0 +moc_pryd02.gat,0,0,0,0 monster Skeleton Archer 1016,20,0,0,0 +moc_pryd02.gat,0,0,0,0 monster Skeleton Soldier 1028,20,0,0,0 +moc_pryd02.gat,0,0,0,0 monster Drainliar 1111,20,0,0,0 +moc_pryd02.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 + +//(moc_pryd03.gat)* +moc_pryd03.gat,0,0,0,0 monster Mimic 1191,10,600000,300000,1 +moc_pryd03.gat,0,0,0,0 monster Verit 1032,40,0,0,0 +moc_pryd03.gat,0,0,0,0 monster Mummy 1041,50,0,0,0 +moc_pryd03.gat,0,0,0,0 monster Matyr 1146,15,0,0,0 +moc_pryd03.gat,0,0,0,0 monster Drainliar 1111,15,0,0,0 + +//(moc_pryd04.gat)* +moc_pryd04.gat,0,0,0,0 monster Ancient Mummy 1297,3,0,0,0 +moc_pryd04.gat,0,0,0,0 monster Mimic 1191,15,600000,300000,1 +moc_pryd04.gat,0,0,0,0 monster Isis 1029,50,150000,75000,0 +moc_pryd04.gat,0,0,0,0 monster Mummy 1041,40,0,0,0 +moc_pryd04.gat,0,0,0,0 monster Matyr 1146,20,0,0,0 +moc_pryd04.gat,0,0,0,0 monster Osiris 1038,1,3600000,7200000,0 + +//(moc_pryd05.gat)* +moc_pryd05.gat,0,0,0,0 monster Minorous 1149,60,0,0,0 +moc_pryd05.gat,0,0,0,0 monster Verit 1032,50,0,0,0 +moc_pryd05.gat,0,0,0,0 monster Mummy 1041,10,0,0,0 + +//(moc_pryd06.gat)* +moc_pryd06.gat,100,90,80,50 monster Ancient Mummy 1297,20,0,0,0 +moc_pryd06.gat,0,0,0,0 monster Arclouse 1194,20,0,0,0 +moc_pryd06.gat,100,90,80,50 monster Mimic 1191,20,0,0,0 +moc_pryd06.gat,0,0,0,0 monster Verit 1032,10,0,0,0 diff --git a/npc/mobs/dungeons/moc_sphinx.txt b/npc/mobs/dungeons/moc_sphinx.txt new file mode 100644 index 000000000..392513009 --- /dev/null +++ b/npc/mobs/dungeons/moc_sphinx.txt @@ -0,0 +1,44 @@ +//===== eAthena Script ======================================= +//= Morocc Sphinx Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(in_sphinx1.gat)* +in_sphinx1.gat,0,0,0,0 monster Requiem 1164,20,0,0,0 +in_sphinx1.gat,0,0,0,0 monster Matyr 1146,20,0,0,0 +in_sphinx1.gat,0,0,0,0 monster Drainliar 1111,30,0,0,0 +in_sphinx1.gat,0,0,0,0 monster Zerom 1178,30,0,0,0 + +//(in_sphinx2.gat)* +in_sphinx2.gat,0,0,0,0 monster Requiem 1164,50,0,0,0 +in_sphinx2.gat,0,0,0,0 monster Matyr 1146,20,0,0,0 +in_sphinx2.gat,0,0,0,0 monster Drainliar 1111,15,0,0,0 +in_sphinx2.gat,0,0,0,0 monster Zerom 1178,50,0,0,0 + +//(in_sphinx3.gat)* +in_sphinx3.gat,0,0,0,0 monster Pasana 1154,15,0,0,0 +in_sphinx3.gat,0,0,0,0 monster Mimic 1191,10,600000,300000,1 +in_sphinx3.gat,0,0,0,0 monster Marduk 1140,30,0,0,0 +in_sphinx3.gat,0,0,0,0 monster Requiem 1164,22,0,0,0 +in_sphinx3.gat,0,0,0,0 monster Matyr 1146,25,0,0,0 + +//(in_sphinx4.gat)* +in_sphinx4.gat,0,0,0,0 monster Minorous 1149,50,0,0,0 +in_sphinx4.gat,0,0,0,0 monster Pasana 1154,20,0,0,0 +in_sphinx4.gat,0,0,0,0 monster Mimic 1191,4,600000,300000,1 +in_sphinx4.gat,0,0,0,0 monster Marduk 1140,15,0,0,0 + +//(in_sphinx5.gat)* +in_sphinx5.gat,0,0,0,0 monster Matyr 1146,30,0,0,0 +in_sphinx5.gat,0,0,0,0 monster Sidewinder 1037,20,0,0,0 +in_sphinx5.gat,0,0,0,0 monster Pasana 1154,30,0,0,0 +in_sphinx5.gat,0,0,0,0 monster Mimic 1191,7,600000,300000,1 +in_sphinx5.gat,0,0,0,0 monster Marduk 1140,30,0,0,0 +in_sphinx5.gat,0,0,0,0 monster Pharaoh 1157,1,3600000,1800000,1 diff --git a/npc/mobs/dungeons/orcdun.txt b/npc/mobs/dungeons/orcdun.txt new file mode 100644 index 000000000..67d061551 --- /dev/null +++ b/npc/mobs/dungeons/orcdun.txt @@ -0,0 +1,30 @@ +//===== eAthena Script ======================================= +//= Orc Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(orcsdun01.gat)* +orcsdun01.gat,0,0,0,0 monster Orc Skeleton 1152,10,30000,60000,0 +orcsdun01.gat,0,0,0,0 monster Orc Zombie 1153,70,3000,5000,0 +orcsdun01.gat,0,0,0,0 monster Drainliar 1111,5,0,0,0 +orcsdun01.gat,0,0,0,0 monster Steel ChonChon 1042,10,0,0,0 +orcsdun01.gat,0,0,0,0 monster Familiar 1005,15,0,0,0 +orcsdun01.gat,167,133,5,5 monster Black Mushroom 1084,5,900000,450000,1 +orcsdun01.gat,67,34,5,5 monster Black Mushroom 1084,5,900000,450000,1 +orcsdun01.gat,0,0,0,0 monster White Plant 1082,5,180000,90000,1 + +//(orcsdun02.gat)* +orcsdun02.gat,0,0,0,0 monster Zenorc 1177,50,3000,5000,0 +orcsdun02.gat,0,0,0,0 monster Orc Skeleton 1152,50,3000,5000,0 +orcsdun02.gat,0,0,0,0 monster Drainliar 1111,20,0,0,0 +orcsdun02.gat,0,0,0,0 monster Steel ChonChon 1042,20,0,0,0 +orcsdun02.gat,0,0,0,0 monster White Plant 1082,5,180000,90000,1 +orcsdun02.gat,0,0,0,0 monster Orc Archer 1189,5,1800000,900000,1 +orcsdun02.gat,0,0,0,0 monster Black Mushroom 1084,5,900000,450000,1 diff --git a/npc/mobs/dungeons/payoncave.txt b/npc/mobs/dungeons/payoncave.txt new file mode 100644 index 000000000..b514ff42c --- /dev/null +++ b/npc/mobs/dungeons/payoncave.txt @@ -0,0 +1,150 @@ +//===== eAthena Script ======================================= +//= Payon Cave Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(pay_dun00.gat)* +pay_dun00.gat,0,0,0,0 monster Zombie 1015,20,0,0,0 +pay_dun00.gat,0,0,0,0 monster Poporing 1031,15,0,0,0 +pay_dun00.gat,0,0,0,0 monster Skeleton 1076,35,0,0,0 +pay_dun00.gat,0,0,0,0 monster Familiar 1005,15,0,0,0 +pay_dun00.gat,140,140,5,5 monster Black Mushroom 1084,3,360000,180000,1 +pay_dun00.gat,140,140,35,35 monster Red Plant 1078,15,180000,90000,1 + +//(pay_dun01.gat)* +pay_dun01.gat,0,0,0,0 monster Skeleton Soldier 1028,60,0,0,0 +pay_dun01.gat,0,0,0,0 monster Skeleton Archer 1016,30,0,0,0 +pay_dun01.gat,0,0,0,0 monster Drainliar 1111,10,0,0,0 +pay_dun01.gat,0,0,0,0 monster Eggyra 1116,20,0,0,0 +pay_dun01.gat,235,54,10,10 monster Black Mushroom 1084,5,900000,450000,1 +pay_dun01.gat,0,0,0,0 monster Red Plant 1078,10,180000,90000,1 + +//(pay_dun02.gat)* +pay_dun02.gat,0,0,0,0 monster Bon Gun 1188,30,0,0,0 +pay_dun02.gat,0,0,0,0 monster Skeleton Archer 1016,20,180000,90000,1 +pay_dun02.gat,0,0,0,0 monster Munak 1026,40,0,0,0 +pay_dun02.gat,0,0,0,0 monster Skeleton Soldier 1028,15,180000,90000,1 +pay_dun02.gat,107,190,0,0 monster Hydra 1068,1,320000,100000,1 +pay_dun02.gat,108,191,0,0 monster Hydra 1068,1,332000,100000,1 +pay_dun02.gat,109,192,0,0 monster Hydra 1068,1,374000,100000,1 +pay_dun02.gat,109,193,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,110,190,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,110,194,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,111,191,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,112,192,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,113,193,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,113,194,0,0 monster Hydra 1068,1,319000,100000,1 +pay_dun02.gat,116,190,0,0 monster Hydra 1068,1,326000,100000,1 +pay_dun02.gat,116,196,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,116,199,0,0 monster Hydra 1068,1,306000,100000,1 +pay_dun02.gat,116,205,0,0 monster Hydra 1068,1,345000,100000,1 +pay_dun02.gat,117,191,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,117,197,0,0 monster Hydra 1068,1,314000,100000,1 +pay_dun02.gat,117,200,0,0 monster Hydra 1068,1,275000,100000,1 +pay_dun02.gat,117,206,0,0 monster Hydra 1068,1,302000,100000,1 +pay_dun02.gat,118,192,0,0 monster Hydra 1068,1,285000,100000,1 +pay_dun02.gat,118,198,0,0 monster Hydra 1068,1,312000,100000,1 +pay_dun02.gat,118,201,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,118,207,0,0 monster Hydra 1068,1,332000,100000,1 +pay_dun02.gat,119,196,0,0 monster Hydra 1068,1,315000,100000,1 +pay_dun02.gat,119,199,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,119,205,0,0 monster Hydra 1068,1,324000,100000,1 +pay_dun02.gat,120,194,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,120,200,0,0 monster Hydra 1068,1,303000,100000,1 +pay_dun02.gat,120,203,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,121,200,0,0 monster Hydra 1068,1,333000,100000,1 +pay_dun02.gat,122,197,0,0 monster Hydra 1068,1,321000,100000,1 +pay_dun02.gat,122,200,0,0 monster Hydra 1068,1,300000,100000,1 +pay_dun02.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +pay_dun02.gat,0,0,0,0 monster Mandragora 1020,3,300000,100000,1 +pay_dun02.gat,0,0,0,0 monster Nine-Tail 1180,1,3600000,1800000,0 +pay_dun02.gat,111,199,10,10 monster Black Mushroom 1084,7,900000,450000,1 +pay_dun02.gat,37,243,0,0 monster Black Mushroom 1084,1,600000,300000,1 +pay_dun02.gat,0,0,0,0 monster Red Plant 1078,9,600000,300000,1 + +//(pay_dun03.gat)* +pay_dun03.gat,0,0,0,0 monster Nine-Tail 1180,2,0,0,0 +pay_dun03.gat,0,0,0,0 monster Greatest General 1277,3,0,0,0 +pay_dun03.gat,0,0,0,0 monster Sohee 1170,40,0,0,0 +pay_dun03.gat,115,190,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,219,185,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,219,244,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,228,185,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,230,244,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,240,244,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,243,220,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,71,243,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,85,178,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,86,248,0,0 monster Sohee 1170,3,300000,100000,1 +pay_dun03.gat,0,0,0,0 monster Bon Gun 1188,3,0,0,0 +pay_dun03.gat,0,0,0,0 monster Munak 1026,3,0,0,0 +pay_dun03.gat,57,65,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,58,69,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,59,64,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,60,68,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,62,67,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,63,70,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,64,66,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,66,63,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,66,65,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,66,73,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,67,69,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,67,71,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,68,64,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,68,72,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,69,68,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,71,64,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,71,67,0,0 monster Hydra 1068,1,600000,300000,1 +pay_dun03.gat,126,131,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,126,132,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,126,133,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,126,134,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,126,135,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,179,130,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,179,131,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,179,132,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,179,133,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,179,134,0,0 monster Mandragora 1020,1,300000,100000,1 +pay_dun03.gat,138,42,0,0 monster Blue Plant 1079,1,600000,900000,1 +pay_dun03.gat,88,35,0,0 monster Yellow Plant 1081,1,600000,300000,1 +pay_dun03.gat,154,112,0,0 monster Whisper 1185,1,1800000,900000,1 +pay_dun03.gat,161,117,0,0 monster Whisper 1185,1,1800000,900000,1 +pay_dun03.gat,81,61,0,0 monster Whisper 1185,1,1800000,900000,1 +pay_dun03.gat,84,63,0,0 monster Whisper 1185,1,1800000,900000,1 +pay_dun03.gat,89,147,0,0 monster Giant Whisper 1186,1,3600000,1800000,1 +pay_dun03.gat,120,186,0,0 monster Green Plant 1080,1,600000,300000,1 +pay_dun03.gat,228,61,40,40 monster Red Plant 1078,16,600000,300000,1 +pay_dun03.gat,49,264,0,6 monster White Plant 1082,2,600000,300000,1 +pay_dun03.gat,225,62,6,12 monster White Plant 1082,3,600000,300000,1 + +//(pay_dun04.gat)* +pay_dun04.gat,0,0,0,0 monster Nine-Tail 1180,1,0,0,0 +pay_dun04.gat,0,0,0,0 monster Greatest General 1277,16,0,0,0 +pay_dun04.gat,123,99,0,0 monster Greatest General 1277,1,3600000,7200000,1 +pay_dun04.gat,140,114,0,0 monster Greatest General 1277,1,3600000,7200000,1 +pay_dun04.gat,154,75,0,0 monster Greatest General 1277,1,600000,300000,1 +pay_dun04.gat,77,163,0,0 monster Greatest General 1277,1,600000,300000,1 +pay_dun04.gat,0,0,0,0 monster Horong 1129,30,0,0,0 +pay_dun04.gat,0,0,0,0 monster Sohee 1170,4,0,0,0 +pay_dun04.gat,100,133,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,103,110,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,106,139,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,109,103,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,129,140,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,131,106,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,135,134,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,136,111,0,0 monster Sohee 1170,2,300000,100000,1 +pay_dun04.gat,0,0,0,0 monster Dokebi 1110,40,0,0,0 +pay_dun04.gat,0,0,0,0 monster Skeleton Soldier 1028,10,0,0,0 +pay_dun04.gat,0,0,0,0 monster Skeleton Archer 1016,20,0,0,0 +pay_dun04.gat,0,0,0,0 monster White Plant 1082,6,600000,300000,1 +pay_dun04.gat,120,120,10,10 monster Shining Plant 1083,2,1800000,900000,1 +pay_dun04.gat,120,115,0,0 monster Moonlight Flower 1150,1,3600000,7200000,1 +pay_dun04.gat,0,0,0,0 monster Red Plant 1078,10,180000,90000,1 diff --git a/npc/mobs/dungeons/pront_maze.txt b/npc/mobs/dungeons/pront_maze.txt new file mode 100644 index 000000000..0ac0718f2 --- /dev/null +++ b/npc/mobs/dungeons/pront_maze.txt @@ -0,0 +1,75 @@ +//===== eAthena Script ======================================= +//= Prontera Maze(Hidden Temple) Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(prt_maze01.gat)* +prt_maze01.gat,99,140,21,21 monster Sidewinder 1037,3,120000,40000,1 +prt_maze01.gat,59,140,21,21 monster Choco 1214,2,120000,40000,1 +prt_maze01.gat,19,100,21,21 monster Hunter Fly 1035,4,120000,40000,1 +prt_maze01.gat,179,100,21,21 monster Argiope 1099,3,120000,40000,1 +prt_maze01.gat,179,140,21,21 monster Mantis 1139,3,120000,40000,1 +prt_maze01.gat,19,180,21,21 monster Savage 1166,5,120000,40000,1 +prt_maze01.gat,139,60,21,21 monster Bigfoot 1060,5,120000,40000,1 +prt_maze01.gat,139,100,21,21 monster Argos 1100,3,120000,40000,1 +prt_maze01.gat,139,180,21,21 monster Caramel 1103,5,120000,40000,1 +prt_maze01.gat,59,140,21,21 monster Yoyo 1057,4,120000,40000,1 +prt_maze01.gat,59,180,21,21 monster Martin 1145,5,120000,40000,1 +prt_maze01.gat,179,180,21,21 monster Coco 1104,5,120000,40000,1 +prt_maze01.gat,19,140,21,21 monster Steel ChonChon 1042,5,120000,40000,1 +prt_maze01.gat,99,20,21,21 monster Creamy 1018,1,120000,40000,1 +prt_maze01.gat,139,140,21,21 monster Stainer 1174,5,120000,40000,1 +prt_maze01.gat,59,60,21,21 monster Boa 1025,5,120000,40000,1 +prt_maze01.gat,19,20,21,21 monster Poporing 1031,5,120000,40000,1 +prt_maze01.gat,19,60,21,21 monster Wolf 1013,5,120000,40000,1 +prt_maze01.gat,179,60,21,21 monster Rocker 1052,5,120000,40000,1 +prt_maze01.gat,99,100,21,21 monster ChonChon 1011,5,120000,40000,1 +prt_maze01.gat,139,20,21,21 monster Lunatic 1063,5,120000,40000,1 +prt_maze01.gat,99,20,21,21 monster Fabre 1007,5,120000,40000,1 +prt_maze01.gat,179,20,21,21 monster Poring 1002,5,120000,40000,1 +prt_maze01.gat,99,60,21,21 monster Smokie 1056,5,120000,40000,1 +prt_maze01.gat,19,180,21,21 monster Savage Babe 1167,3,120000,40000,1 +prt_maze01.gat,99,180,21,21 monster Dustiness 1114,5,120000,40000,1 +prt_maze01.gat,59,20,21,21 monster Pupa 1008,5,120000,40000,1 +prt_maze01.gat,59,100,21,21 monster Horn 1128,5,120000,40000,1 +prt_maze01.gat,0,0,0,0 monster Yellow Plant 1081,2,180000,90000,1 +prt_maze01.gat,0,0,0,0 monster Blue Plant 1079,3,360000,180000,1 +prt_maze01.gat,0,0,0,0 monster Shining Plant 1083,2,1800000,900000,1 +prt_maze01.gat,0,0,0,0 monster Vagabond Wolf 1092,1,3600000,1800000,1 +prt_maze01.gat,0,0,0,0 monster Black Mushroom 1084,5,360000,180000,1 +prt_maze01.gat,0,0,0,0 monster Red Plant 1078,5,180000,90000,1 +prt_maze01.gat,0,0,0,0 monster Red Mushroom 1085,5,180000,90000,1 +prt_maze01.gat,0,0,0,0 monster White Plant 1082,3,180000,90000,1 + +//(prt_maze02.gat)* +prt_maze02.gat,0,0,0,0 monster Bigfoot 1060,5,0,0,0 +prt_maze02.gat,0,0,0,0 monster Poporing 1031,25,0,0,0 +prt_maze02.gat,0,0,0,0 monster Sasquatch 1243,1,600000,300000,1 +prt_maze02.gat,0,0,0,0 monster Leib Olmai 1306,1,1800000,900000,1 + +//(prt_maze03.gat)* +prt_maze03.gat,0,0,0,0 monster Killer Mantis 1294,1,0,0,0 +prt_maze03.gat,0,0,0,0 monster Baphomet Jr. 1101,25,0,0,0 +prt_maze03.gat,0,0,0,0 monster Sidewinder 1037,30,0,0,0 +prt_maze03.gat,0,0,0,0 monster Hunter Fly 1035,30,0,0,0 +prt_maze03.gat,0,0,0,0 monster Stem Worm 1215,20,0,0,0 +prt_maze03.gat,0,0,0,0 monster Mantis 1139,30,0,0,0 +prt_maze03.gat,0,0,0,0 monster Yellow Plant 1081,1,600000,300000,1 +prt_maze03.gat,0,0,0,0 monster Blue Plant 1079,5,900000,450000,1 +prt_maze03.gat,0,0,0,0 monster Vocal 1088,1,1800000,200000,1 +prt_maze03.gat,0,0,0,0 monster Eclipse 1093,1,1800000,200000,1 +prt_maze03.gat,0,0,0,0 monster Mastering 1090,1,1800000,200000,1 +prt_maze03.gat,0,0,0,0 monster Shining Plant 1083,5,1800000,200000,1 +prt_maze03.gat,0,0,0,0 monster Vagabond Wolf 1092,1,3600000,200000,1 +prt_maze03.gat,0,0,0,0 monster Baphomet 1039,1,3600000,7200000,1 +prt_maze03.gat,0,0,0,0 monster Ghostring 1120,1,3600000,7200000,1 +prt_maze03.gat,0,0,0,0 monster Black Mushroom 1084,6,360000,180000,1 +prt_maze03.gat,0,0,0,0 monster Red Plant 1078,5,360000,180000,1 +prt_maze03.gat,0,0,0,0 monster Red Mushroom 1085,5,180000,90000,1 diff --git a/npc/mobs/dungeons/pront_sewers.txt b/npc/mobs/dungeons/pront_sewers.txt new file mode 100644 index 000000000..7ab142335 --- /dev/null +++ b/npc/mobs/dungeons/pront_sewers.txt @@ -0,0 +1,44 @@ +//===== eAthena Script ======================================= +//= Prontera Sewers(Culvert) Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(prt_sewb1.gat)* +prt_sewb1.gat,0,0,0,0 monster Tarou 1175,20,0,0,0 +prt_sewb1.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 +prt_sewb1.gat,0,0,0,0 monster Thief Bug Larva 1051,40,0,0,0 +prt_sewb1.gat,0,0,0,0 monster Thief Bug Egg 1048,90,0,0,0 + +//(prt_sewb2.gat)* +prt_sewb2.gat,0,0,0,0 monster Tarou 1175,60,0,0,0 +prt_sewb2.gat,0,0,0,0 monster Plankton 1161,30,0,0,0 +prt_sewb2.gat,0,0,0,0 monster Thief Bug Female 1053,10,0,0,0 +prt_sewb2.gat,0,0,0,0 monster Spore 1014,20,0,0,0 +prt_sewb2.gat,0,0,0,0 monster Familiar 1005,10,0,0,0 +prt_sewb2.gat,0,0,0,0 monster Thief Bug Larva 1051,70,0,0,0 +prt_sewb2.gat,0,0,0,0 monster Thief Bug Egg 1048,20,0,0,0 + +//(prt_sewb3.gat)* +prt_sewb3.gat,0,0,0,0 monster Poison Spore 1077,15,0,0,0 +prt_sewb3.gat,0,0,0,0 monster Thief Bug Male 1054,65,0,0,0 +prt_sewb3.gat,0,0,0,0 monster Tarou 1175,15,0,0,0 +prt_sewb3.gat,0,0,0,0 monster Thief Bug Female 1053,65,0,0,0 +prt_sewb3.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 +prt_sewb3.gat,0,0,0,0 monster Thief Bug Egg 1048,10,0,0,0 +prt_sewb3.gat,0,0,0,0 monster Thief Bug Larva 1051,20,0,0,0 + +//(prt_sewb4.gat)* +prt_sewb4.gat,0,0,0,0 monster Cramp 1209,5,0,0,0 +prt_sewb4.gat,0,0,0,0 monster Drainliar 1111,20,0,0,0 +prt_sewb4.gat,0,0,0,0 monster Thief Bug Female 1053,20,0,0,0 +prt_sewb4.gat,0,0,0,0 monster Thief Bug Male 1054,70,0,0,0 +prt_sewb4.gat,0,0,0,0 monster Thief Bug Larva 1051,20,0,0,0 +prt_sewb4.gat,0,0,0,0 monster Thief Bug Egg 1048,10,0,0,0 +prt_sewb4.gat,0,0,0,0 monster Golden Thief Bug 1086,1,3600000,7200000,0 diff --git a/npc/mobs/dungeons/sunkenship.txt b/npc/mobs/dungeons/sunkenship.txt new file mode 100644 index 000000000..5db290792 --- /dev/null +++ b/npc/mobs/dungeons/sunkenship.txt @@ -0,0 +1,141 @@ +//===== eAthena Script ======================================= +//= Sunken Ship Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(treasure01.gat)* +treasure01.gat,164,59,12,10 monster Whisper 1179,10,300000,100000,1 +treasure01.gat,106,111,9,9 monster Pirate Skeleton 1071,3,180000,90000,1 +treasure01.gat,150,162,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,160,60,27,19 monster Pirate Skeleton 1071,10,300000,100000,1 +treasure01.gat,163,141,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,163,151,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,163,161,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,34,112,17,11 monster Pirate Skeleton 1071,9,180000,90000,1 +treasure01.gat,58,165,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,69,165,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,79,165,5,5 monster Pirate Skeleton 1071,3,300000,100000,1 +treasure01.gat,107,39,15,15 monster Poison Spore 1077,3,180000,90000,1 +treasure01.gat,29,38,15,15 monster Poison Spore 1077,3,180000,90000,1 +treasure01.gat,54,154,11,9 monster Poison Spore 1077,3,100000,100000,1 +treasure01.gat,82,154,11,9 monster Poison Spore 1077,3,100000,100000,1 +treasure01.gat,107,39,15,15 monster Hydra 1068,1,180000,90000,1 +treasure01.gat,150,162,5,5 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,158,40,0,0 monster Hydra 1068,1,307000,100000,1 +treasure01.gat,158,41,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,158,42,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,158,43,0,0 monster Hydra 1068,1,305000,100000,1 +treasure01.gat,158,44,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,158,45,0,0 monster Hydra 1068,1,302000,100000,1 +treasure01.gat,158,62,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,158,63,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,159,40,0,0 monster Hydra 1068,1,290000,100000,1 +treasure01.gat,159,41,0,0 monster Hydra 1068,1,306000,100000,1 +treasure01.gat,159,42,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,159,43,0,0 monster Hydra 1068,1,318000,100000,1 +treasure01.gat,159,44,0,0 monster Hydra 1068,1,312000,100000,1 +treasure01.gat,159,45,0,0 monster Hydra 1068,1,285000,100000,1 +treasure01.gat,159,62,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,159,63,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,162,70,0,0 monster Hydra 1068,1,314000,100000,1 +treasure01.gat,162,71,0,0 monster Hydra 1068,1,273000,100000,1 +treasure01.gat,163,141,5,5 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,163,151,5,5 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,163,161,5,5 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,163,70,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,163,71,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,164,70,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,164,71,0,0 monster Hydra 1068,1,305000,100000,1 +treasure01.gat,165,70,0,0 monster Hydra 1068,1,293000,100000,1 +treasure01.gat,165,71,0,0 monster Hydra 1068,1,307000,100000,1 +treasure01.gat,168,40,0,0 monster Hydra 1068,1,322000,100000,1 +treasure01.gat,168,41,0,0 monster Hydra 1068,1,290000,100000,1 +treasure01.gat,168,42,0,0 monster Hydra 1068,1,306000,100000,1 +treasure01.gat,168,43,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,168,44,0,0 monster Hydra 1068,1,314000,100000,1 +treasure01.gat,168,45,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,169,40,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,169,41,0,0 monster Hydra 1068,1,313000,100000,1 +treasure01.gat,169,42,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,169,43,0,0 monster Hydra 1068,1,305000,100000,1 +treasure01.gat,169,44,0,0 monster Hydra 1068,1,302000,100000,1 +treasure01.gat,169,45,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,48,160,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,48,161,0,0 monster Hydra 1068,1,316000,100000,1 +treasure01.gat,49,160,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,49,161,0,0 monster Hydra 1068,1,310000,100000,1 +treasure01.gat,50,160,0,0 monster Hydra 1068,1,301000,100000,1 +treasure01.gat,50,161,0,0 monster Hydra 1068,1,308000,100000,1 +treasure01.gat,51,160,0,0 monster Hydra 1068,1,270000,100000,1 +treasure01.gat,51,161,0,0 monster Hydra 1068,1,314000,100000,1 +treasure01.gat,60,182,0,0 monster Hydra 1068,1,313000,100000,1 +treasure01.gat,67,160,0,0 monster Hydra 1068,1,293000,100000,1 +treasure01.gat,67,161,0,0 monster Hydra 1068,1,263000,100000,1 +treasure01.gat,68,160,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,68,161,0,0 monster Hydra 1068,1,317000,100000,1 +treasure01.gat,68,66,13,11 monster Hydra 1068,4,180000,90000,1 +treasure01.gat,69,160,0,0 monster Hydra 1068,1,290000,100000,1 +treasure01.gat,69,161,0,0 monster Hydra 1068,1,305000,100000,1 +treasure01.gat,70,160,0,0 monster Hydra 1068,1,306000,100000,1 +treasure01.gat,70,161,0,0 monster Hydra 1068,1,302000,100000,1 +treasure01.gat,76,182,0,0 monster Hydra 1068,1,269000,100000,1 +treasure01.gat,86,160,0,0 monster Hydra 1068,1,310000,100000,1 +treasure01.gat,86,161,0,0 monster Hydra 1068,1,285000,100000,1 +treasure01.gat,87,160,0,0 monster Hydra 1068,1,268000,100000,1 +treasure01.gat,87,161,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,88,160,0,0 monster Hydra 1068,1,296000,100000,1 +treasure01.gat,88,161,0,0 monster Hydra 1068,1,281000,100000,1 +treasure01.gat,89,160,0,0 monster Hydra 1068,1,305000,100000,1 +treasure01.gat,89,161,0,0 monster Hydra 1068,1,300000,100000,1 +treasure01.gat,0,0,0,0 monster Kukre 1070,10,0,0,1 +treasure01.gat,21,165,5,9 monster Kukre 1070,10,300000,150000,1 +treasure01.gat,162,58,0,0 monster Penomena 1216,1,900000,450000,0 +treasure01.gat,168,59,0,0 monster Wanderer 1208,1,1800000,900000,0 + +//(treasure02.gat)* +treasure02.gat,23,142,1,1 monster Marionette 1143,1,200000,100000,1 +treasure02.gat,0,0,0,0 monster Wanderer 1208,1,0,0,0 +treasure02.gat,101,126,2,2 monster Penomena 1216,1,1200000,600000,1 +treasure02.gat,101,135,2,2 monster Penomena 1216,1,60000,200000,1 +treasure02.gat,101,151,10,10 monster Penomena 1216,4,100000,100000,1 +treasure02.gat,0,0,0,0 monster Penomena 1216,2,0,0,0 +treasure02.gat,101,150,15,10 monster Whisper 1179,8,200000,100000,1 +treasure02.gat,102,68,13,13 monster Whisper 1179,6,300000,100000,1 +treasure02.gat,102,80,5,5 monster Whisper 1179,1,300000,100000,1 +treasure02.gat,102,88,5,5 monster Whisper 1179,1,300000,100000,1 +treasure02.gat,151,138,1,1 monster Whisper 1179,1,100000,100000,1 +treasure02.gat,157,143,1,1 monster Whisper 1179,1,100000,100000,1 +treasure02.gat,45,144,1,1 monster Whisper 1179,1,200000,100000,1 +treasure02.gat,52,139,1,1 monster Whisper 1179,1,200000,100000,1 +treasure02.gat,163,151,5,5 monster Pirate Skeleton 1071,35,300000,100000,1 +treasure02.gat,101,151,10,10 monster Mimic 1191,2,100000,100000,1 +treasure02.gat,101,151,10,10 monster Mimic 1191,3,500000,200000,1 +treasure02.gat,0,0,0,0 monster Mimic 1191,5,0,0,1 +treasure02.gat,100,136,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,100,143,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,100,85,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,101,136,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,101,143,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,101,57,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,101,85,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,102,136,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,102,143,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,102,57,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,102,85,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,103,136,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,103,143,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,103,85,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,107,57,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,108,57,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,95,57,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,96,57,0,0 monster Hydra 1068,1,300000,100000,1 +treasure02.gat,0,0,0,0 monster Kukre 1070,20,0,0,1 +treasure02.gat,0,0,0,0 monster Ghostring 1120,1,1800000,900000,1 +treasure02.gat,101,151,8,8 monster Drake 1112,1,3600000,7200000,1 diff --git a/npc/mobs/dungeons/toyfactory.txt b/npc/mobs/dungeons/toyfactory.txt new file mode 100644 index 000000000..f9ab1b090 --- /dev/null +++ b/npc/mobs/dungeons/toyfactory.txt @@ -0,0 +1,30 @@ +//===== eAthena Script ======================================= +//= Toy Factory Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//xmas_dun01 +//xmas_dun01.gat,0,0,0,0 monster Poring 1002,10,0,0,0 +xmas_dun01.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +xmas_dun01.gat,0,0,0,0 monster Mastering 1090,1,1800000,900000,0 +xmas_dun01.gat,0,0,0,0 monster Angeling 1096,1,3600000,1800000,0 +xmas_dun01.gat,0,0,0,0 monster Drops 1113,10,0,0,0 +xmas_dun01.gat,0,0,0,0 monster Marin 1242,30,0,0,0 +xmas_dun01.gat,0,0,0,0 monster Christmas Cookie 1246,50,0,0,0 +xmas_dun01.gat,0,0,0,0 monster Myst Case 1249,5,0,0,0 +xmas_dun01.gat,0,0,0,0 monster Chepet 1250,1,900000,450000,0 + +//xmas_dun02 +xmas_dun02.gat,0,0,0,0 monster Christmas Cookie 1246,20,0,0,0 +xmas_dun02.gat,0,0,0,0 monster Cookie 1265,20,0,0,0 +xmas_dun02.gat,0,0,0,0 monster Cruiser 1248,40,0,0,0 +xmas_dun02.gat,0,0,0,0 monster Myst Case 1249,55,0,0,0 +xmas_dun02.gat,0,0,0,0 monster Stormy Knight 1251,1,3600000,7200000,0 + diff --git a/npc/mobs/dungeons/turtleisland.txt b/npc/mobs/dungeons/turtleisland.txt new file mode 100644 index 000000000..d2d83d2bc --- /dev/null +++ b/npc/mobs/dungeons/turtleisland.txt @@ -0,0 +1,47 @@ +//===== eAthena Script ======================================= +//= Turtle Island Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(tur_dun01.gat)* +tur_dun01.gat,0,0,0,0 monster Perimeter 1314,10,0,0,0 +tur_dun01.gat,0,0,0,0 monster Dragon Tail 1321,25,0,0,0 +tur_dun01.gat,0,0,0,0 monster Spring Rabbit 1322,25,0,0,0 +tur_dun01.gat,0,0,0,0 monster Pest 1256,15,0,0,0 +tur_dun01.gat,0,0,0,0 monster Thara Frog 1034,10,0,0,0 + +//(tur_dun02.gat)* +tur_dun02.gat,0,0,0,0 monster Freezer 1319,20,0,0,0 +tur_dun02.gat,0,0,0,0 monster Soldier 1316,40,0,0,0 +tur_dun02.gat,0,0,0,0 monster Perimeter 1314,40,0,0,0 +tur_dun02.gat,0,0,0,0 monster Pest 1256,15,0,0,0 + +//(tur_dun03.gat)* +tur_dun03.gat,0,0,0,0 monster Assaulter 1315,35,0,0,0 +tur_dun03.gat,0,0,0,0 monster Freezer 1319,40,0,0,0 +tur_dun03.gat,0,0,0,0 monster Heater 1318,10,0,0,0 +tur_dun03.gat,0,0,0,0 monster Perimeter 1314,15,0,0,0 + +//(tur_dun04.gat)* +tur_dun04.gat,0,0,0,0 monster Wanderer 1208,5,0,0,0 +tur_dun04.gat,99,92,10,10 monster Wanderer 1208,2,60000,30000,0 +tur_dun04.gat,0,0,0,0 monster Assaulter 1315,26,0,0,0 +tur_dun04.gat,100,93,20,20 monster Assaulter 1315,15,120000,60000,0 +tur_dun04.gat,0,0,0,0 monster Freezer 1319,11,0,0,0 +tur_dun04.gat,100,93,20,20 monster Freezer 1319,4,120000,60000,0 +tur_dun04.gat,0,0,0,0 monster Heater 1318,30,0,0,0 +tur_dun04.gat,100,93,20,20 monster Heater 1318,3,120000,60000,0 +tur_dun04.gat,0,0,0,0 monster Perimeter 1314,4,0,0,0 +tur_dun04.gat,99,93,20,20 monster Turtle General 1312,1,3600000,7200000,0 + +//(tur_dun05.gat)? //no data at emp.org +tur_dun05.gat,0,0,0,0 monster Perimeter 1314,3,20000,0,0 +tur_dun05.gat,0,0,0,0 monster Assaulter 1315,1,20000,0,0 +tur_dun05.gat,0,0,0,0 monster Freezer 1319,5,30000,0,0 diff --git a/npc/mobs/dungeons/umbaladun.txt b/npc/mobs/dungeons/umbaladun.txt new file mode 100644 index 000000000..b4cca25a8 --- /dev/null +++ b/npc/mobs/dungeons/umbaladun.txt @@ -0,0 +1,25 @@ +//===== eAthena Script ======================================= +//= Umbala Dungeon Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + + +//(um_dun01.gat)? +um_dun01.gat,0,0,0,0 monster Stainer 1174,35,0,0,0 +um_dun01.gat,0,0,0,0 monster Dustiness 1114,15,0,0,0 +um_dun01.gat,0,0,0,0 monster Wooden Fighter 1499,30,0,0,0 +um_dun01.gat,0,0,0,0 monster Stone Shooter 1495,20,0,0,0 + +//(um_dun02.gat)? +um_dun02.gat,0,0,0,0 monster Wooden Fighter 1499,35,0,0,0 +um_dun02.gat,0,0,0,0 monster Wooden Shooter 1498,25,0,0,0 +um_dun02.gat,0,0,0,0 monster Dryad 1493,10,0,0,0 +um_dun02.gat,0,0,0,0 monster Wooden Golem 1497,25,0,0,0 +um_dun02.gat,0,0,0,0 monster Stone Shooter 1495,25,0,0,0 diff --git a/npc/mobs/fields/amatsu.txt b/npc/mobs/fields/amatsu.txt new file mode 100644 index 000000000..39218ffc2 --- /dev/null +++ b/npc/mobs/fields/amatsu.txt @@ -0,0 +1,38 @@ +//===== eAthena Script ======================================= +//= Amatsu Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(ama_fild01.gat)* +ama_fild01.gat,0,0,0,0 monster Kapha 1406,50,0,0,0 +ama_fild01.gat,0,0,0,0 monster Poison Toad 1402,1,0,0,0 +ama_fild01.gat,0,0,0,0 monster Miyabi Doll 1404,2,0,0,0 +ama_fild01.gat,0,0,0,0 monster Karakasa 1400,50,0,0,0 +ama_fild01.gat,0,0,0,0 monster Bigfoot 1060,15,0,0,0 +ama_fild01.gat,169,314,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,169,315,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,171,312,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,171,313,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,171,314,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,171,315,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,172,311,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,173,310,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,173,312,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,173,313,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,173,314,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,173,315,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,174,311,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,175,312,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,175,313,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,175,314,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,175,315,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,177,314,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,177,315,0,0 monster Hydra 1068,1,60000,30000,0 +ama_fild01.gat,0,0,0,0 monster Poporing 1031,15,0,0,0 diff --git a/npc/mobs/fields/ayothana.txt b/npc/mobs/fields/ayothana.txt new file mode 100644 index 000000000..94c767910 --- /dev/null +++ b/npc/mobs/fields/ayothana.txt @@ -0,0 +1,22 @@ +//===== eAthena Script ======================================= +//= Ayothana Field Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(ayothana Field 01)? +ayo_fild01.gat,0,0,0,0 monster Kind of Beetle 1494,20,0,0,0 +ayo_fild01.gat,0,0,0,0 monster Kaho 1072,10,0,0,0 +ayo_fild01.gat,0,0,0,0 monster Thief Bug Egg 1048,40,0,0,0 +ayo_fild01.gat,0,0,0,0 monster Coco 1104,25,0,0,0 + +//(ayothana Field 02)? +ayo_fild02.gat,0,0,0,0 monster Kind of Beetle 1494,20,0,0,0 +ayo_fild02.gat,0,0,0,0 monster Kaho 1072,10,0,0,0 +ayo_fild02.gat,0,0,0,0 monster Skeleton 1076,25,0,0,0 diff --git a/npc/mobs/fields/comodo.txt b/npc/mobs/fields/comodo.txt new file mode 100644 index 000000000..13ca8ba29 --- /dev/null +++ b/npc/mobs/fields/comodo.txt @@ -0,0 +1,151 @@ +//===== eAthena Script ======================================= +//= Comodo Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(cmd_fild01.gat)* +cmd_fild01.gat,0,0,0,0 monster Alligator 1271,60,0,0,0 +cmd_fild01.gat,0,0,0,0 monster Savage 1166,30,0,0,0 +cmd_fild01.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +cmd_fild01.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +cmd_fild01.gat,0,0,0,0 monster Blue Plant 1079,6,1800000,1800000,1 +cmd_fild01.gat,0,0,0,0 monster Green Plant 1080,5,1800000,1800000,1 +cmd_fild01.gat,0,0,0,0 monster Shining Plant 1083,1,1800000,1800000,1 + +//(cmd_fild02.gat)* +cmd_fild02.gat,0,0,0,0 monster Mobster 1313,1,0,0,0 +cmd_fild02.gat,200,130,150,40 monster Seal 1317,18,0,0,0 +cmd_fild02.gat,93,82,40,80 monster Seal 1317,2,180000,0,0 +cmd_fild02.gat,0,0,0,0 monster Galapago 1391,20,0,0,0 +cmd_fild02.gat,342,134,50,50 monster Alligator 1271,5,0,0,0 +cmd_fild02.gat,122,119,50,40 monster Alligator 1271,5,0,0,0 +cmd_fild02.gat,279,78,100,20 monster Cornutus 1067,7,60000,0,0 +cmd_fild02.gat,95,89,40,80 monster Cornutus 1067,8,180000,0,0 +cmd_fild02.gat,0,0,0,0 monster Raggler 1254,27,0,0,0 +cmd_fild02.gat,94,85,40,80 monster Raggler 1254,5,60000,0,0 +cmd_fild02.gat,0,0,0,0 monster Crab 1073,20,0,0,0 +cmd_fild02.gat,200,130,150,50 monster Aster 1266,7,0,0,0 +cmd_fild02.gat,73,100,40,100 monster Aster 1266,3,0,0,0 +cmd_fild02.gat,0,0,0,0 monster Shellfish 1074,35,0,0,0 +cmd_fild02.gat,93,82,40,80 monster Shellfish 1074,5,180000,0,0 + +//(cmd_fild03.gat)* +cmd_fild03.gat,0,0,0,0 monster Anolian 1206,60,0,0,0 +cmd_fild03.gat,0,0,0,0 monster Pest 1256,30,0,0,0 +cmd_fild03.gat,0,0,0,0 monster Rotar Zairo 1392,30,0,0,0 +cmd_fild03.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +cmd_fild03.gat,0,0,0,0 monster Toad 1089,1,1800000,1500000,0 +cmd_fild03.gat,0,0,0,0 monster Shining Plant 1083,3,1800000,1800000,1 +cmd_fild03.gat,0,0,0,0 monster Mutant Dragonoid 1262,1,3600000,2000000,0 + +//(cmd_fild04.gat)* +cmd_fild04.gat,221,120,120,40 monster Sea Otter 1323,20,0,0,0 +cmd_fild04.gat,296,311,100,100 monster Alligator 1271,13,0,0,0 +cmd_fild04.gat,93,222,100,100 monster Alligator 1271,13,0,0,0 +cmd_fild04.gat,0,0,0,0 monster Alligator 1271,14,0,0,0 +cmd_fild04.gat,0,0,0,0 monster Raggler 1254,20,0,0,0 +cmd_fild04.gat,0,0,0,0 monster Crab 1073,20,0,0,0 +cmd_fild04.gat,221,120,120,40 monster Aster 1266,45,0,0,0 +cmd_fild04.gat,0,0,0,0 monster Shellfish 1074,20,0,0,0 + +//(cmd_fild05.gat)* +cmd_fild05.gat,0,0,0,0 monster Anolian 1206,20,0,0,0 +cmd_fild05.gat,0,0,0,0 monster Stem Worm 1215,30,0,0,0 +cmd_fild05.gat,0,0,0,0 monster Pest 1256,20,0,0,0 +cmd_fild05.gat,206,98,20,50 monster Frilldora 1119,7,60000,0,0 +cmd_fild05.gat,263,274,50,40 monster Frilldora 1119,8,60000,0,0 +cmd_fild05.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +cmd_fild05.gat,0,0,0,0 monster Green Plant 1080,5,1800000,1800000,1 +cmd_fild05.gat,0,0,0,0 monster Shining Plant 1083,1,1800000,1800000,1 +cmd_fild05.gat,0,0,0,0 monster Yellow Plant 1081,6,360000,180000,1 + +//(cmd_fild06.gat)* +cmd_fild06.gat,0,0,0,0 monster Stem Worm 1215,55,0,0,0 +cmd_fild06.gat,244,113,0,0 monster Kobold Archer 1282,1,180000,0,0 +cmd_fild06.gat,284,197,0,0 monster Kobold Archer 1282,1,180000,0,0 +cmd_fild06.gat,286,289,0,0 monster Kobold Archer 1282,1,180000,0,0 +cmd_fild06.gat,290,164,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild06.gat,314,267,0,0 monster Kobold Archer 1282,1,180000,0,0 +cmd_fild06.gat,318,146,120,80 monster Kobold Archer 1282,7,0,0,0 +cmd_fild06.gat,357,299,80,70 monster Kobold Archer 1282,5,0,0,0 +cmd_fild06.gat,100,265,10,40 monster Goblin Archer 1258,3,130000,0,0 +cmd_fild06.gat,184,126,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,244,110,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,277,186,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,279,199,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,284,129,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,284,186,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,292,169,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,307,97,70,200 monster Goblin Archer 1258,7,0,0,0 +cmd_fild06.gat,340,334,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,354,342,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,355,294,80,70 monster Goblin Archer 1258,7,0,0,0 +cmd_fild06.gat,365,342,0,0 monster Goblin Archer 1258,1,180000,0,0 +cmd_fild06.gat,0,0,0,0 monster Drops 1113,20,0,0,0 +cmd_fild06.gat,0,0,0,0 monster Harpy 1376,1,1800000,0,0 +cmd_fild06.gat,0,0,0,0 monster Yellow Plant 1081,4,360000,180000,1 + +//(cmd_fild07.gat)* +cmd_fild07.gat,101,176,60,90 monster Raggler 1254,1,180000,0,0 +cmd_fild07.gat,204,317,60,60 monster Raggler 1254,1,60000,0,0 +cmd_fild07.gat,241,106,40,90 monster Raggler 1254,1,180000,0,0 +cmd_fild07.gat,323,310,60,60 monster Raggler 1254,1,60000,0,0 +cmd_fild07.gat,100,175,60,90 monster Crab 1073,2,60000,0,0 +cmd_fild07.gat,240,107,40,90 monster Crab 1073,3,60000,0,0 +cmd_fild07.gat,102,177,60,90 monster Aster 1266,3,60000,0,0 +cmd_fild07.gat,242,108,40,90 monster Aster 1266,2,60000,0,0 +cmd_fild07.gat,104,180,40,90 monster Shellfish 1074,3,60000,0,0 +cmd_fild07.gat,239,105,40,90 monster Shellfish 1074,2,60000,0,0 +cmd_fild07.gat,0,0,0,0 monster Drops 1113,20,0,0,0 + +//(cmd_fild08.gat)* +cmd_fild08.gat,0,0,0,0 monster Sidewinder 1037,3,0,0,0 +cmd_fild08.gat,130,192,110,150 monster Sidewinder 1037,15,0,0,0 +cmd_fild08.gat,326,258,50,110 monster Sidewinder 1037,2,0,0,0 +cmd_fild08.gat,0,0,0,0 monster Stem Worm 1215,25,0,0,0 +cmd_fild08.gat,326,258,50,110 monster Sandman 1165,15,0,0,0 +cmd_fild08.gat,127,279,30,50 monster Kobold Archer 1282,10,60000,0,0 +cmd_fild08.gat,130,192,110,150 monster Kobold Archer 1282,9,0,0,0 +cmd_fild08.gat,146,136,30,80 monster Kobold Archer 1282,10,0,0,0 +cmd_fild08.gat,146,136,30,90 monster Kobold Archer 1282,9,0,0,0 +cmd_fild08.gat,150,320,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,157,329,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,173,168,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,175,367,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,178,363,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,195,174,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,272,175,40,2 monster Kobold Archer 1282,7,60000,0,0 +cmd_fild08.gat,326,258,50,110 monster Kobold Archer 1282,18,0,0,0 +cmd_fild08.gat,52,238,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,53,248,0,0 monster Kobold Archer 1282,1,190000,0,0 +cmd_fild08.gat,73,132,40,100 monster Kobold Archer 1282,7,0,0,0 +cmd_fild08.gat,104,313,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,130,192,110,150 monster Goblin Archer 1258,5,0,0,0 +cmd_fild08.gat,177,210,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,182,205,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,194,291,25,40 monster Goblin Archer 1258,5,0,0,0 +cmd_fild08.gat,37,129,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,41,126,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,55,45,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,58,40,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,73,132,40,100 monster Goblin Archer 1258,5,0,0,0 +cmd_fild08.gat,80,348,60,40 monster Goblin Archer 1258,5,0,0,0 +cmd_fild08.gat,98,307,0,0 monster Goblin Archer 1258,1,150000,0,0 +cmd_fild08.gat,0,0,0,0 monster Drops 1113,10,0,0,0 +cmd_fild08.gat,0,0,0,0 monster Green Plant 1080,8,1800000,1800000,1 +cmd_fild08.gat,0,0,0,0 monster Gryphon 1259,1,3600000,1800000,0 + +//(cmd_fild09.gat)* +cmd_fild09.gat,0,0,0,0 monster Hode 1127,3,0,0,0 +cmd_fild09.gat,0,0,0,0 monster Anacondaq 1030,20,0,0,0 +cmd_fild09.gat,0,0,0,0 monster Steel ChonChon 1042,20,0,0,0 +cmd_fild09.gat,0,0,0,0 monster Condor 1009,60,0,0,0 +cmd_fild09.gat,0,0,0,0 monster Drops 1113,20,0,0,0 +cmd_fild09.gat,0,0,0,0 monster Gargoyle 1253,2,180000,1800000,0 diff --git a/npc/mobs/fields/gefenia.txt b/npc/mobs/fields/gefenia.txt new file mode 100644 index 000000000..0c20a9826 --- /dev/null +++ b/npc/mobs/fields/gefenia.txt @@ -0,0 +1,49 @@ +//===== eAthena Script ======================================= +//= Gefenia Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//gefenia01.gat +gefenia01.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 +gefenia01.gat,0,0,0,0 monster Dustiness 1114,20,0,0,0 +gefenia01.gat,0,0,0,0 monster Poison Spore 1077,40,0,0,0 +gefenia01.gat,0,0,0,0 monster Argos 1100,25,0,0,0 +gefenia01.gat,0,0,0,0 monster Whisper 1179,30,0,0,0 + +//gefenia02.gat +gefenia02.gat,0,0,0,0 monster Familiar 1005,10,0,0,0 +gefenia02.gat,0,0,0,0 monster Dustiness 1114,10,0,0,0 +gefenia02.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +gefenia02.gat,0,0,0,0 monster Argos 1100,15,0,0,0 +gefenia02.gat,0,0,0,0 monster Whisper 1179,30,0,0,0 +gefenia02.gat,0,0,0,0 monster Jakk 1130,20,300000,100000,0 +gefenia02.gat,0,0,0,0 monster Blue Plant 1079,10,300000,100000,1 +gefenia02.gat,0,0,0,0 monster Myst 1151,10,0,0,0 +gefenia02.gat,0,0,0,0 monster Nightmare 1061,8,300000,100000,0 + +//gefenia03.gat +gefenia03.gat,0,0,0,0 monster Doppelganger 1046,1,7200000,3600000,0 +gefenia03.gat,0,0,0,0 monster Deviruchi 1109,15,0,0,0 +gefenia03.gat,0,0,0,0 monster Raydric 1163,15,0,0,0 +gefenia03.gat,0,0,0,0 monster Raydric Archer 1276,20,0,0,0 +gefenia03.gat,0,0,0,0 monster Joker 1131,15,300000,100000,0 +gefenia03.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +gefenia03.gat,0,0,0,0 monster Whisper 1179,20,0,0,0 + +//gefenia04.gat +gefenia04.gat,0,0,0,0 monster Familiar 1005,20,0,0,0 +gefenia04.gat,0,0,0,0 monster Dustiness 1114,20,0,0,0 +gefenia04.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +gefenia04.gat,0,0,0,0 monster Argos 1100,25,0,0,0 +gefenia04.gat,0,0,0,0 monster Whisper 1179,10,0,0,0 +gefenia04.gat,0,0,0,0 monster Jakk 1130,10,300000,100000,0 +gefenia04.gat,0,0,0,0 monster Blue Plant 1079,10,300000,100000,1 +gefenia04.gat,0,0,0,0 monster Myst 1151,10,0,0,0 +gefenia04.gat,0,0,0,0 monster Nightmare 1061,8,300000,100000,0 diff --git a/npc/mobs/fields/geffen.txt b/npc/mobs/fields/geffen.txt new file mode 100644 index 000000000..c64d2093a --- /dev/null +++ b/npc/mobs/fields/geffen.txt @@ -0,0 +1,195 @@ +//===== eAthena Script ======================================= +//= Geffen Field Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(gef_fild00.gat)* +gef_fild00.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +gef_fild00.gat,0,0,0,0 monster Pupa 1008,20,0,0,0 +gef_fild00.gat,0,0,0,0 monster Fabre 1007,80,0,0,0 +gef_fild00.gat,0,0,0,0 monster Poring 1002,80,0,0,0 +gef_fild00.gat,124,321,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild00.gat,95,128,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild00.gat,54,186,5,5 monster Green Plant 1080,3,360000,180000,1 +gef_fild00.gat,54,212,5,5 monster Green Plant 1080,3,360000,180000,1 + +//(gef_fild01.gat)* +gef_fild01.gat,0,0,0,0 monster Poporing 1031,40,0,0,0 +gef_fild01.gat,0,0,0,0 monster Roda Frog 1012,80,0,0,0 +gef_fild01.gat,0,0,0,0 monster Toad 1089,1,1800000,200000,1 +gef_fild01.gat,215,225,10,10 monster Green Plant 1080,5,360000,180000,1 + +//(gef_fild02.gat)* +gef_fild02.gat,0,0,0,0 monster Choco 1214,1,0,0,0 +gef_fild02.gat,0,0,0,0 monster Orc Warrior 1023,40,0,0,0 +gef_fild02.gat,0,0,0,0 monster Yoyo 1057,10,0,0,0 +gef_fild02.gat,0,0,0,0 monster Smokie 1056,20,0,0,0 +gef_fild02.gat,0,0,0,0 monster Coco 1104,20,0,0,0 +gef_fild02.gat,207,214,1,1 monster Blue Plant 1079,1,360000,180000,1 +gef_fild02.gat,215,209,2,1 monster Blue Plant 1079,2,360000,180000,1 +gef_fild02.gat,220,214,1,1 monster Blue Plant 1079,1,360000,180000,1 +gef_fild02.gat,164,194,1,1 monster Shining Plant 1083,1,1800000,900000,1 +gef_fild02.gat,227,316,6,6 monster Green Plant 1080,8,360000,180000,1 +gef_fild02.gat,87,48,6,6 monster Red Mushroom 1085,5,360000,180000,1 + +//(gef_fild03.gat)* +gef_fild03.gat,0,0,0,0 monster High Orc 1213,10,0,0,0 +gef_fild03.gat,0,0,0,0 monster Savage 1166,40,0,0,0 +gef_fild03.gat,0,0,0,0 monster Orc Warrior 1023,30,0,0,0 +gef_fild03.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +gef_fild03.gat,118,281,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,135,344,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,169,92,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,210,363,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,215,345,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,216,135,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,280,92,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,282,192,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,285,223,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,304,202,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,316,143,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,326,79,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,337,104,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,348,42,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,350,247,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,359,316,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,44,133,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,45,350,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,45,93,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,66,300,3,3 monster Green Plant 1080,1,180000,90000,1 +gef_fild03.gat,80,252,3,3 monster Green Plant 1080,1,180000,90000,1 + +//(gef_fild04.gat)* +gef_fild04.gat,0,0,0,0 monster Roda Frog 1012,30,0,0,0 +gef_fild04.gat,0,0,0,0 monster ChonChon 1011,40,0,0,0 +gef_fild04.gat,0,0,0,0 monster Pupa 1008,60,0,0,0 +gef_fild04.gat,0,0,0,0 monster Fabre 1007,30,0,0,0 +gef_fild04.gat,0,0,0,0 monster Poring 1002,40,0,0,0 +gef_fild04.gat,152,82,5,2 monster Green Plant 1080,3,360000,180000,1 +gef_fild04.gat,224,82,5,2 monster Green Plant 1080,3,360000,180000,1 + +//(gef_fild05.gat)* +gef_fild05.gat,0,0,0,0 monster Wild Rose 1261,50,0,0,0 +gef_fild05.gat,0,0,0,0 monster Kobold Archer 1282,15,0,0,0 +gef_fild05.gat,0,0,0,0 monster Dustiness 1114,40,0,0,0 +gef_fild05.gat,0,0,0,0 monster Poring 1002,50,0,0,0 +gef_fild05.gat,108,317,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,124,207,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,130,293,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,146,161,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,153,180,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,170,337,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,187,249,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,187,265,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,235,322,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,238,326,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,50,189,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,51,166,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,56,285,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,65,256,0,0 monster Red Plant 1078,1,180000,90000,1 +gef_fild05.gat,74,228,0,0 monster Red Plant 1078,1,180000,90000,1 + +//(gef_fild06.gat)* +gef_fild06.gat,0,0,0,0 monster Sky Petite 1156,30,60000,30000,0 +gef_fild06.gat,0,0,0,0 monster Kobold 3 1135,10,0,0,0 +gef_fild06.gat,0,0,0,0 monster Kobold 2 1134,10,0,0,0 +gef_fild06.gat,0,0,0,0 monster Kobold 1 1133,20,0,0,0 +gef_fild06.gat,0,0,0,0 monster Mantis 1139,20,0,0,0 +gef_fild06.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +gef_fild06.gat,0,0,0,0 monster Shining Plant 1083,4,1800000,900000,1 + +//(gef_fild07.gat)* +gef_fild07.gat,0,0,0,0 monster ChonChon 1011,50,0,0,0 +gef_fild07.gat,0,0,0,0 monster Pupa 1008,10,0,0,0 +gef_fild07.gat,0,0,0,0 monster Fabre 1007,70,0,0,0 +gef_fild07.gat,0,0,0,0 monster Poring 1002,70,0,0,0 +gef_fild07.gat,269,289,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild07.gat,185,247,0,0 monster Shining Plant 1083,1,1800000,900000,1 +gef_fild07.gat,122,221,0,0 monster Green Plant 1080,3,360000,180000,1 +gef_fild07.gat,269,289,3,3 monster Green Plant 1080,3,360000,180000,1 + +//(gef_fild08.gat)* +gef_fild08.gat,0,0,0,0 monster Kobold 3 1135,20,0,0,0 +gef_fild08.gat,0,0,0,0 monster Kobold 2 1134,40,0,0,0 +gef_fild08.gat,0,0,0,0 monster Kobold 1 1133,20,0,0,0 +gef_fild08.gat,0,0,0,0 monster Golem 1040,40,0,0,0 +gef_fild08.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +gef_fild08.gat,0,0,0,0 monster Steel ChonChon 1042,80,0,0,0 +gef_fild08.gat,111,319,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,144,140,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,162,247,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,325,311,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,344,78,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,59,91,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,65,341,0,0 monster Blue Plant 1079,1,900000,450000,1 +gef_fild08.gat,70,80,0,0 monster Blue Plant 1079,1,900000,450000,1 + +//(gef_fild09.gat)* +gef_fild09.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +gef_fild09.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +gef_fild09.gat,0,0,0,0 monster Ambernite 1094,70,0,0,0 +gef_fild09.gat,277,201,5,5 monster Blue Plant 1079,3,900000,450000,1 +gef_fild09.gat,125,53,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,148,74,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,184,66,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,207,54,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,245,62,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,258,24,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,268,45,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,325,36,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,344,51,0,0 monster Red Mushroom 1085,1,180000,90000,1 +gef_fild09.gat,51,43,0,0 monster Red Mushroom 1085,1,180000,90000,1 + +//(gef_fild10.gat)* +gef_fild10.gat,0,0,0,0 monster Orc Lady 1273,40,0,0,0 +gef_fild10.gat,0,0,0,0 monster Orc Warrior 1023,50,0,0,0 +gef_fild10.gat,0,0,0,0 monster Poporing 1031,15,0,0,0 +gef_fild10.gat,287,61,5,5 monster Blue Plant 1079,3,900000,450000,1 +gef_fild10.gat,46,350,5,5 monster Blue Plant 1079,3,900000,450000,1 +gef_fild10.gat,0,0,0,0 monster Orc Lord 1190,1,7200000,3600000,0 +gef_fild10.gat,300,253,5,5 monster Green Plant 1080,3,360000,180000,1 + +//(gef_fild11.gat)* +gef_fild11.gat,0,0,0,0 monster Goblin Leader 1299,1,0,0,0 +gef_fild11.gat,0,0,0,0 monster Goblin Archer 1258,20,0,0,0 +gef_fild11.gat,0,0,0,0 monster Rotar Zairo 1392,10,0,0,0 +gef_fild11.gat,0,0,0,0 monster Goblin 1 1122,20,0,0,0 +gef_fild11.gat,0,0,0,0 monster Goblin 2 1123,20,0,0,0 +gef_fild11.gat,0,0,0,0 monster Goblin 3 1124,30,0,0,0 +gef_fild11.gat,0,0,0,0 monster Goblin 4 1125,20,0,0,0 +gef_fild11.gat,0,0,0,0 monster Goblin 5 1126,20,0,0,0 +gef_fild11.gat,0,0,0,0 monster Poporing 1031,15,0,0,0 +gef_fild11.gat,101,277,4,1 monster Black Mushroom 1084,3,360000,180000,1 +gef_fild11.gat,174,240,1,3 monster Black Mushroom 1084,3,360000,180000,1 +gef_fild11.gat,176,288,1,4 monster Black Mushroom 1084,3,360000,180000,1 +gef_fild11.gat,247,249,1,4 monster Black Mushroom 1084,3,360000,180000,1 +gef_fild11.gat,253,357,1,4 monster Black Mushroom 1084,3,360000,180000,1 +gef_fild11.gat,257,209,1,4 monster Black Mushroom 1084,3,360000,180000,1 +gef_fild11.gat,283,100,4,1 monster Black Mushroom 1084,3,360000,180000,1 + +//(gef_fild12.gat)* +gef_fild12.gat,0,0,0,0 monster Kobold Leader 1296,1,240000,0,0 +gef_fild12.gat,0,0,0,0 monster Kobold Archer 1282,40,0,0,0 +gef_fild12.gat,0,0,0,0 monster Kobold 3 1135,30,0,0,0 +gef_fild12.gat,0,0,0,0 monster Kobold 2 1134,30,0,0,0 +gef_fild12.gat,0,0,0,0 monster Kobold 1 1133,20,0,0,0 +gef_fild12.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 + +//(gef_fild13.gat)* +gef_fild13.gat,0,0,0,0 monster Creamy 1018,40,0,0,0 +gef_fild13.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +gef_fild13.gat,0,0,0,0 monster Ambernite 1094,30,0,0,0 + +//(gef_fild14.gat) +gef_fild14.gat,0,0,0,0 monster High Orc 1213,40,0,0,0 +gef_fild14.gat,0,0,0,0 monster Orc Archer 1189,30,0,0,0 +gef_fild14.gat,0,0,0,0 monster Orc Lady 1273,40,0,0,0 +gef_fild14.gat,0,0,0,0 monster Orc Warrior 1023,20,0,0,0 +gef_fild14.gat,0,0,0,0 monster Orc Hero 1087,1,3600000,3600000,0 diff --git a/npc/mobs/fields/gonryun.txt b/npc/mobs/fields/gonryun.txt new file mode 100644 index 000000000..051650b9d --- /dev/null +++ b/npc/mobs/fields/gonryun.txt @@ -0,0 +1,20 @@ +//===== eAthena Script ======================================= +//= Gon Ryun Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(gon_fild01.gat)* +gon_fild01.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +gon_fild01.gat,0,0,0,0 monster Baby Leopard 1415,40,0,0,0 +gon_fild01.gat,0,0,0,0 monster Dumpling Child 1409,30,0,0,0 +gon_fild01.gat,0,0,0,0 monster Zipper Bear 1417,20,0,0,0 +gon_fild01.gat,0,0,0,0 monster Green Plant 1080,5,0,0,1 +gon_fild01.gat,0,0,0,0 monster Shining Plant 1083,1,0,0,1 +gon_fild01.gat,0,0,0,0 monster Hermit Plant 1413,2,60000,120000,1 diff --git a/npc/mobs/fields/louyang.txt b/npc/mobs/fields/louyang.txt new file mode 100644 index 000000000..4c8a445d8 --- /dev/null +++ b/npc/mobs/fields/louyang.txt @@ -0,0 +1,15 @@ +//===== eAthena Script ======================================= +//= Louyang Fields Monster Spawn Script +//===== By: ================================================== +//= Evera/Lorri +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= May be more +//============================================================ + +//lou_fild01)? +lou_fild01.gat,0,0,00 monster Mantis 1139,25,0,0,0 +lou_fild01.gat,0,0,00 monster Civil Servant 1513,25,0,0,0 diff --git a/npc/mobs/fields/lutie.txt b/npc/mobs/fields/lutie.txt new file mode 100644 index 000000000..de58b998c --- /dev/null +++ b/npc/mobs/fields/lutie.txt @@ -0,0 +1,16 @@ +//===== eAthena Script ======================================= +//= Lutie Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//xmas_fild01 +xmas_fild01.gat,0,0,0,0 monster Marin 1242,35,0,0,0 +xmas_fild01.gat,0,0,0,0 monster Sasquatch 1243,20,0,0,0 +xmas_fild01.gat,0,0,0,0 monster Garm 1252,1,3600000,7200000,0 diff --git a/npc/mobs/fields/mjolnir.txt b/npc/mobs/fields/mjolnir.txt new file mode 100644 index 000000000..1854174cd --- /dev/null +++ b/npc/mobs/fields/mjolnir.txt @@ -0,0 +1,226 @@ +//===== eAthena Script ======================================= +//= Mt. Mjolnir Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(mjolnir_01.gat)* +mjolnir_01.gat,0,0,0,0 monster Creamy 1018,20,0,0,0 +mjolnir_01.gat,0,0,0,0 monster Stainer 1174,20,0,0,0 +mjolnir_01.gat,311,271,25,25 monster Blue Plant 1079,5,360000,180000,1 +mjolnir_01.gat,75,85,25,25 monster Green Plant 1080,5,180000,90000,1 +mjolnir_01.gat,78,219,25,25 monster Green Plant 1080,5,180000,90000,1 +mjolnir_01.gat,75,85,25,25 monster Shining Plant 1083,1,1800000,900000,1 +mjolnir_01.gat,78,219,25,25 monster Shining Plant 1083,1,1800000,900000,1 +mjolnir_01.gat,0,0,0,0 monster Caramel 1103,40,0,0,0 +mjolnir_01.gat,0,0,0,0 monster Coco 1104,70,0,0,0 +mjolnir_01.gat,0,0,0,0 monster Horn 1128,20,0,0,0 + +//(mjolnir_02.gat)* +mjolnir_02.gat,0,0,0,0 monster Earth Petite 1155,50,0,0,0 +mjolnir_02.gat,0,0,0,0 monster Flora 1118,30,0,0,0 +mjolnir_02.gat,0,0,0,0 monster Creamy 1018,20,0,0,0 +mjolnir_02.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +mjolnir_02.gat,0,0,0,0 monster Hornet 1004,30,0,0,0 +mjolnir_02.gat,122,195,0,0 monster Red Plant 1078,1,180000,90000,1 +mjolnir_02.gat,133,80,0,0 monster Red Plant 1078,1,180000,90000,1 +mjolnir_02.gat,156,254,0,0 monster Red Plant 1078,1,180000,90000,1 +mjolnir_02.gat,223,110,0,0 monster Red Plant 1078,1,180000,90000,1 +mjolnir_02.gat,254,155,0,0 monster Red Plant 1078,1,180000,90000,1 +mjolnir_02.gat,318,205,0,0 monster Red Plant 1078,1,180000,90000,1 +mjolnir_02.gat,112,268,0,0 monster Blue Plant 1079,1,360000,180000,1 +mjolnir_02.gat,188,192,10,10 monster Blue Plant 1079,2,360000,180000,1 +mjolnir_02.gat,273,74,0,0 monster Blue Plant 1079,1,360000,180000,1 +mjolnir_02.gat,275,199,0,0 monster Blue Plant 1079,1,360000,180000,1 +mjolnir_02.gat,79,49,0,0 monster Blue Plant 1079,1,360000,180000,1 +mjolnir_02.gat,107,128,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,145,282,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,167,160,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,191,71,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,193,304,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,204,263,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,237,55,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,243,208,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,257,292,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,273,240,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,282,101,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,289,276,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,292,49,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,312,342,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,325,146,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,325,146,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,325,146,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,335,301,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,349,45,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,80,211,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,86,180,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,86,270,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_02.gat,86,270,0,0 monster Green Plant 1080,1,180000,90000,1 + +//(mjolnir_03.gat)* +mjolnir_03.gat,0,0,0,0 monster Sky Petite 1156,70,0,0,0 +mjolnir_03.gat,0,0,0,0 monster Mantis 1139,30,0,0,0 +mjolnir_03.gat,0,0,0,0 monster Flora 1118,10,0,0,0 +mjolnir_03.gat,0,0,0,0 monster Argos 1100,20,0,0,0 +mjolnir_03.gat,0,0,0,0 monster Creamy 1018,10,0,0,0 +mjolnir_03.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +mjolnir_03.gat,128,319,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,135,94,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,168,341,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,199,97,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,255,349,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,262,98,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,322,144,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,324,355,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,352,288,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,356,213,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,66,219,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,77,271,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,91,161,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_03.gat,211,216,10,10 monster Shining Plant 1083,1,1800000,900000,1 +mjolnir_03.gat,280,252,10,10 monster Shining Plant 1083,1,1800000,900000,1 + +//(mjolnir_04.gat)* +mjolnir_04.gat,0,0,0,0 monster Argiope 1099,20,0,0,0 +mjolnir_04.gat,0,0,0,0 monster Mantis 1139,20,0,0,0 +mjolnir_04.gat,0,0,0,0 monster Flora 1118,30,0,0,0 +mjolnir_04.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +mjolnir_04.gat,0,0,0,0 monster Hornet 1004,70,0,0,0 +mjolnir_04.gat,200,200,30,30 monster Shining Plant 1083,3,1800000,900000,1 +mjolnir_04.gat,0,0,0,0 monster Mistress 1059,1,7200000,3600000,0 +mjolnir_04.gat,107,357,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,122,28,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,173,369,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,177,34,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,177,34,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,205,33,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,269,39,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,286,357,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,31,194,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,332,122,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,356,292,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,362,201,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,42,252,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,43,143,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,64,323,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,72,99,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_04.gat,76,53,0,0 monster Green Plant 1080,1,180000,90000,1 + +//(mjolnir_05.gat)* +mjolnir_05.gat,0,0,0,0 monster Argiope 1099,70,0,0,0 +mjolnir_05.gat,0,0,0,0 monster Mantis 1139,40,0,0,0 +mjolnir_05.gat,0,0,0,0 monster Flora 1118,20,0,0,0 +mjolnir_05.gat,0,0,0,0 monster Argos 1100,20,0,0,0 +mjolnir_05.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +mjolnir_05.gat,134,103,20,20 monster Blue Plant 1079,3,360000,180000,1 +mjolnir_05.gat,200,240,40,40 monster Blue Plant 1079,3,360000,180000,1 +mjolnir_05.gat,261,100,20,10 monster Blue Plant 1079,3,360000,180000,1 +mjolnir_05.gat,200,240,40,40 monster Shining Plant 1083,1,1800000,900000,1 +mjolnir_05.gat,0,0,0,0 monster Red Plant 1078,10,180000,90000,1 + +//(mjolnir_06.gat)* +mjolnir_06.gat,0,0,0,0 monster Caramel 1103,30,0,0,0 +mjolnir_06.gat,0,0,0,0 monster Horn 1128,20,0,0,0 +mjolnir_06.gat,0,0,0,0 monster Coco 1104,20,0,0,0 +mjolnir_06.gat,0,0,0,0 monster Stainer 1174,70,0,0,0 +mjolnir_06.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +mjolnir_06.gat,162,255,0,0 monster Blue Plant 1079,1,360000,180000,1 +mjolnir_06.gat,162,285,0,0 monster Blue Plant 1079,1,360000,180000,1 +mjolnir_06.gat,279,174,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,296,317,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,304,98,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,339,168,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,45,345,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,55,276,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,69,225,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_06.gat,73,339,0,0 monster Red Mushroom 1085,1,180000,90000,1 + +//(mjolnir_07.gat)* +mjolnir_07.gat,0,0,0,0 monster Poison Spore 1077,60,0,0,0 +mjolnir_07.gat,0,0,0,0 monster Horn 1128,20,0,0,0 +mjolnir_07.gat,0,0,0,0 monster Coco 1104,20,0,0,0 +mjolnir_07.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +mjolnir_07.gat,0,0,0,0 monster Ambernite 1094,30,0,0,0 +mjolnir_07.gat,0,0,0,0 monster Hornet 1004,20,0,0,0 +mjolnir_07.gat,249,214,0,0 monster Blue Plant 1079,2,1800000,900000,1 +mjolnir_07.gat,140,179,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,181,173,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,272,152,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,273,181,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,299,145,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,314,133,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,97,210,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_07.gat,217,185,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_07.gat,245,168,0,0 monster Red Mushroom 1085,1,180000,90000,1 + +//(mjolnir_08.gat)* +mjolnir_08.gat,0,0,0,0 monster Argiope 1099,30,0,0,0 +mjolnir_08.gat,0,0,0,0 monster Mantis 1139,60,0,0,0 +mjolnir_08.gat,0,0,0,0 monster Argos 1100,20,0,0,0 +mjolnir_08.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +mjolnir_08.gat,0,0,0,0 monster Poring 1002,10,0,0,0 +mjolnir_08.gat,280,280,20,40 monster Blue Plant 1079,2,840000,420000,1 +mjolnir_08.gat,149,328,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_08.gat,169,204,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_08.gat,176,153,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_08.gat,180,282,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_08.gat,207,232,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_08.gat,207,83,0,0 monster Green Plant 1080,1,180000,90000,1 + +//(mjolnir_09.gat)* +mjolnir_09.gat,0,0,0,0 monster Horn 1128,100,0,0,0 +mjolnir_09.gat,0,0,0,0 monster Coco 1104,10,0,0,0 +mjolnir_09.gat,0,0,0,0 monster Stainer 1174,30,0,0,0 +mjolnir_09.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +mjolnir_09.gat,0,0,0,0 monster Wolf 1013,40,0,0,0 +mjolnir_09.gat,120,126,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,125,82,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,139,84,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,198,297,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,199,344,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,204,321,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,205,352,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,210,331,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,212,312,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,73,122,0,0 monster Red Mushroom 1085,1,180000,90000,1 +mjolnir_09.gat,89,141,0,0 monster Red Mushroom 1085,1,180000,90000,1 + +//(mjolnir_10.gat)* +mjolnir_10.gat,0,0,0,0 monster Earth Petite 1155,10,0,0,0 +mjolnir_10.gat,0,0,0,0 monster Mantis 1139,30,0,0,0 +mjolnir_10.gat,0,0,0,0 monster Flora 1118,30,0,0,0 +mjolnir_10.gat,0,0,0,0 monster Argos 1100,70,0,0,0 +mjolnir_10.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +mjolnir_10.gat,123,331,10,10 monster Shining Plant 1083,1,1800000,900000,1 +mjolnir_10.gat,0,0,0,0 monster Green Plant 1080,10,180000,90000,1 + +//(mjolnir_11.gat)* +mjolnir_11.gat,0,0,0,0 monster Argiope 1099,10,0,0,0 +mjolnir_11.gat,0,0,0,0 monster Flora 1118,60,0,0,0 +mjolnir_11.gat,0,0,0,0 monster Thief Bug Male 1054,30,0,0,0 +mjolnir_11.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +mjolnir_11.gat,0,0,0,0 monster Mandragora 1020,50,0,0,0 +mjolnir_11.gat,126,93,0,0 monster Blue Plant 1079,1,900000,900000,1 +mjolnir_11.gat,332,327,0,0 monster Blue Plant 1079,1,900000,900000,1 +mjolnir_11.gat,112,276,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,116,240,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,129,135,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,145,177,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,146,215,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,159,283,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,197,123,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,198,210,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,231,277,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,282,300,0,0 monster Green Plant 1080,1,180000,90000,1 +mjolnir_11.gat,295,271,0,0 monster Green Plant 1080,1,180000,90000,1 + +//(mjolnir_12.gat)* +mjolnir_12.gat,0,0,0,0 monster Stem Worm 1215,20,0,0,0 +mjolnir_12.gat,0,0,0,0 monster Dustiness 1114,50,0,0,0 +mjolnir_12.gat,0,0,0,0 monster Thief Bug Female 1053,20,0,0,0 diff --git a/npc/mobs/fields/morocc.txt b/npc/mobs/fields/morocc.txt new file mode 100644 index 000000000..07cabb55a --- /dev/null +++ b/npc/mobs/fields/morocc.txt @@ -0,0 +1,256 @@ +//===== eAthena Script ======================================= +//= Morocc Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚P(moc_fild01.gat)* +moc_fild01.gat,0,0,0,0 monster Desert Wolf Puppy 1107,70,0,0,0 +moc_fild01.gat,0,0,0,0 monster Ant Egg 1097,20,0,0,0 +moc_fild01.gat,0,0,0,0 monster PecoPeco Egg 1047,20,0,0,0 +moc_fild01.gat,0,0,0,0 monster Picky 1049,10,0,0,0 +moc_fild01.gat,0,0,0,0 monster Drops 1113,30,0,0,0 +moc_fild01.gat,0,0,0,0 monster Poring 1002,10,0,0,0 +moc_fild01.gat,194,51,10,10 monster Yellow Plant 1081,10,900000,450000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚Q(moc_fild02.gat)* +moc_fild02.gat,0,0,0,0 monster PecoPeco 1019,70,0,0,0 +moc_fild02.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild02.gat,0,0,0,0 monster PecoPeco Egg 1047,40,0,0,0 +moc_fild02.gat,0,0,0,0 monster Picky 1049,10,0,0,0 +moc_fild02.gat,0,0,0,0 monster Drops 1113,30,0,0,0 +moc_fild02.gat,132,307,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,139,222,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,194,294,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,275,241,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,89,315,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,94,195,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,99,261,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild02.gat,230,62,0,0 monster Green Plant 1080,1,180000,90000,1 +moc_fild02.gat,299,61,0,0 monster Green Plant 1080,1,180000,90000,1 +moc_fild02.gat,313,149,0,0 monster Green Plant 1080,1,180000,90000,1 +moc_fild02.gat,337,35,0,0 monster Green Plant 1080,1,180000,90000,1 +moc_fild02.gat,342,267,0,0 monster Green Plant 1080,1,180000,90000,1 +moc_fild02.gat,353,103,0,0 monster Green Plant 1080,1,180000,90000,1 +moc_fild02.gat,359,215,0,0 monster Green Plant 1080,1,180000,90000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚R(moc_fild03.gat)* +moc_fild03.gat,0,0,0,0 monster Greatest General 1277,40,0,0,0 +moc_fild03.gat,0,0,0,0 monster Eggyra 1116,20,0,0,0 +moc_fild03.gat,0,0,0,0 monster Elder Willow 1033,80,0,0,0 +moc_fild03.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +moc_fild03.gat,0,0,0,0 monster Willow 1010,30,0,0,0 +moc_fild03.gat,0,0,0,0 monster Vagabond Wolf 1092,1,1800000,900000,0 +moc_fild03.gat,108,199,5,5 monster Green Plant 1080,2,180000,90000,1 +moc_fild03.gat,200,263,5,5 monster Green Plant 1080,2,180000,90000,1 +moc_fild03.gat,213,201,5,5 monster Green Plant 1080,2,180000,90000,1 +moc_fild03.gat,216,69,5,5 monster Green Plant 1080,2,180000,90000,1 +moc_fild03.gat,261,161,5,5 monster Green Plant 1080,2,180000,90000,1 +moc_fild03.gat,77,311,5,5 monster Green Plant 1080,2,180000,90000,1 +moc_fild03.gat,96,65,5,5 monster Green Plant 1080,2,180000,90000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚S(moc_fild04.gat)* +moc_fild04.gat,0,0,0,0 monster Desert Wolf 1106,20,0,0,0 +moc_fild04.gat,0,0,0,0 monster Magnolia 1138,40,0,0,0 +moc_fild04.gat,0,0,0,0 monster Scorpion 1001,30,0,0,0 +moc_fild04.gat,0,0,0,0 monster Metaller 1058,20,0,0,0 +moc_fild04.gat,0,0,0,0 monster Deniro 1105,20,0,0,0 +moc_fild04.gat,0,0,0,0 monster Piere 1160,20,0,0,0 +moc_fild04.gat,0,0,0,0 monster Andre 1095,20,0,0,0 +moc_fild04.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild04.gat,313,84,10,10 monster Yellow Plant 1081,10,900000,450000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚T(moc_fild05.gat)* +moc_fild05.gat,0,0,0,0 monster Magnolia 1138,50,0,0,0 +moc_fild05.gat,0,0,0,0 monster Golem 1040,70,0,0,0 +moc_fild05.gat,0,0,0,0 monster Metaller 1058,40,0,0,0 +moc_fild05.gat,0,0,0,0 monster Andre 1095,10,0,0,0 +moc_fild05.gat,0,0,0,0 monster Deniro 1105,10,0,0,0 +moc_fild05.gat,0,0,0,0 monster Piere 1160,10,0,0,0 +moc_fild05.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild05.gat,208,233,10,10 monster Yellow Plant 1081,5,360000,180000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚U(moc_fild06.gat)* +moc_fild06.gat,0,0,0,0 monster Magnolia 1138,10,0,0,0 +moc_fild06.gat,0,0,0,0 monster Piere 1160,5,0,0,0 +moc_fild06.gat,0,0,0,0 monster Deniro 1105,5,0,0,0 +moc_fild06.gat,0,0,0,0 monster Andre 1095,5,0,0,0 +moc_fild06.gat,0,0,0,0 monster Muka 1055,30,0,0,0 +moc_fild06.gat,0,0,0,0 monster PecoPeco 1019,70,0,0,0 +moc_fild06.gat,0,0,0,0 monster Condor 1009,50,0,0,0 +moc_fild06.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚V(moc_fild07.gat)* +moc_fild07.gat,0,0,0,0 monster Shell Picky 1050,30,0,0,0 +moc_fild07.gat,0,0,0,0 monster PecoPeco Egg 1047,50,0,0,0 +moc_fild07.gat,0,0,0,0 monster Picky 1049,30,0,0,0 +moc_fild07.gat,0,0,0,0 monster Drops 1113,70,0,0,0 +moc_fild07.gat,162,333,12,12 monster Yellow Plant 1081,5,360000,180000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚W(moc_fild08.gat)* +moc_fild08.gat,0,0,0,0 monster Desert Wolf 1106,40,0,0,0 +moc_fild08.gat,0,0,0,0 monster Magnolia 1138,30,0,0,0 +moc_fild08.gat,0,0,0,0 monster Scorpion 1001,80,0,0,0 +moc_fild08.gat,0,0,0,0 monster Anacondaq 1030,30,0,0,0 +moc_fild08.gat,0,0,0,0 monster Desert Wolf Puppy 1107,20,0,0,0 +moc_fild08.gat,0,0,0,0 monster Drops 1113,20,0,0,0 + +//ƒ\ƒOƒ‰ƒg»”™ ‚O‚X(moc_fild09.gat)* +moc_fild09.gat,0,0,0,0 monster Frilldora 1119,6,0,0,0 +moc_fild09.gat,0,0,0,0 monster Desert Wolf 1106,10,0,0,0 +moc_fild09.gat,0,0,0,0 monster Magnolia 1138,50,0,0,0 +moc_fild09.gat,0,0,0,0 monster Metaller 1058,70,0,0,0 +moc_fild09.gat,0,0,0,0 monster Deniro 1105,5,0,0,0 +moc_fild09.gat,0,0,0,0 monster Andre 1095,5,0,0,0 +moc_fild09.gat,0,0,0,0 monster Piere 1160,5,0,0,0 +moc_fild09.gat,0,0,0,0 monster Ant Egg 1097,20,0,0,0 +moc_fild09.gat,240,313,5,5 monster Yellow Plant 1081,2,180000,90000,1 +moc_fild09.gat,305,62,5,5 monster Yellow Plant 1081,2,180000,90000,1 +moc_fild09.gat,332,341,5,5 monster Yellow Plant 1081,2,180000,90000,1 +moc_fild09.gat,54,325,5,5 monster Yellow Plant 1081,2,180000,90000,1 +moc_fild09.gat,64,78,5,5 monster Yellow Plant 1081,2,180000,90000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚O(moc_fild10.gat)* +moc_fild10.gat,0,0,0,0 monster Magnolia 1138,1,0,0,0 +moc_fild10.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild10.gat,0,0,0,0 monster Shell Picky 1050,50,0,0,0 +moc_fild10.gat,0,0,0,0 monster PecoPeco Egg 1047,70,0,0,0 +moc_fild10.gat,0,0,0,0 monster Picky 1049,50,0,0,0 +moc_fild10.gat,0,0,0,0 monster Drops 1113,30,0,0,0 +moc_fild10.gat,198,150,40,30 monster Yellow Plant 1081,10,180000,90000,1 +moc_fild10.gat,198,150,40,30 monster Green Plant 1080,5,180000,90000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚P(moc_fild11.gat)* +moc_fild11.gat,0,0,0,0 monster Magnolia 1138,20,0,0,0 +moc_fild11.gat,0,0,0,0 monster Hode 1127,10,0,0,0 +moc_fild11.gat,0,0,0,0 monster Golem 1040,70,0,0,0 +moc_fild11.gat,0,0,0,0 monster Deniro 1105,10,60000,30000,0 +moc_fild11.gat,0,0,0,0 monster Piere 1160,10,60000,30000,0 +moc_fild11.gat,0,0,0,0 monster Andre 1095,10,60000,30000,0 +moc_fild11.gat,0,0,0,0 monster Muka 1055,20,0,0,0 +moc_fild11.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild11.gat,197,216,0,0 monster Shining Plant 1083,1,1800000,900000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚Q(moc_fild12.gat)* +moc_fild12.gat,0,0,0,0 monster Shell Picky 1050,50,0,0,0 +moc_fild12.gat,0,0,0,0 monster Picky 1049,50,0,0,0 +moc_fild12.gat,0,0,0,0 monster Drops 1113,35,0,0,0 +moc_fild12.gat,0,0,0,0 monster PecoPeco Egg 1047,35,0,0,0 +moc_fild12.gat,181,336,40,20 monster Yellow Plant 1081,10,180000,90000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚R(moc_fild13.gat)* +moc_fild13.gat,0,0,0,0 monster Sidewinder 1037,35,0,0,0 +moc_fild13.gat,0,0,0,0 monster Desert Wolf 1106,30,0,0,0 +moc_fild13.gat,0,0,0,0 monster Anacondaq 1030,70,0,0,0 +moc_fild13.gat,0,0,0,0 monster Boa 1025,35,0,0,0 +moc_fild13.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +moc_fild13.gat,0,0,0,0 monster Drops 1113,20,0,0,0 +moc_fild13.gat,101,185,5,5 monster Yellow Plant 1081,3,180000,90000,1 +moc_fild13.gat,101,297,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild13.gat,106,258,5,5 monster Yellow Plant 1081,3,180000,90000,1 +moc_fild13.gat,108,150,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild13.gat,109,168,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild13.gat,161,273,5,5 monster Yellow Plant 1081,3,180000,90000,1 +moc_fild13.gat,84,329,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild13.gat,89,92,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild13.gat,93,301,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild13.gat,264,136,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,264,64,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,265,197,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,266,289,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,280,99,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,281,333,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,282,155,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,284,227,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,295,358,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,304,244,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,304,333,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,305,91,0,0 monster Red Mushroom 1085,1,180000,90000,1 +moc_fild13.gat,307,307,0,0 monster Red Mushroom 1085,1,180000,90000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚S(moc_fild14.gat)* +moc_fild14.gat,0,0,0,0 monster Sidewinder 1037,20,0,0,0 +moc_fild14.gat,0,0,0,0 monster Desert Wolf 1106,80,0,0,0 +moc_fild14.gat,0,0,0,0 monster Magnolia 1138,25,0,0,0 +moc_fild14.gat,0,0,0,0 monster Desert Wolf Puppy 1107,40,0,0,0 +moc_fild14.gat,149,333,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild14.gat,160,366,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild14.gat,165,282,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild14.gat,64,342,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild14.gat,85,271,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild14.gat,124,93,5,5 monster Shining Plant 1083,1,1800000,900000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚T(moc_fild15.gat)* +moc_fild15.gat,0,0,0,0 monster Desert Wolf 1106,10,0,0,0 +moc_fild15.gat,0,0,0,0 monster Magnolia 1138,25,0,0,0 +moc_fild15.gat,0,0,0,0 monster Hode 1127,30,0,0,0 +moc_fild15.gat,0,0,0,0 monster Scorpion 1001,10,0,0,0 +moc_fild15.gat,0,0,0,0 monster Andre 1095,40,0,0,0 +moc_fild15.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild15.gat,104,347,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,158,144,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,195,373,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,232,126,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,294,74,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,341,164,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,341,365,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,353,230,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,370,85,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,40,126,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,46,250,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,57,39,0,0 monster Yellow Plant 1081,1,180000,90000,1 +moc_fild15.gat,0,0,0,0 monster Phreeoni 1159,1,7200000,3600000,0 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚U(moc_fild16.gat)* +moc_fild16.gat,0,0,0,0 monster Sandman 1165,70,0,0,0 +moc_fild16.gat,0,0,0,0 monster Magnolia 1138,25,0,0,0 +moc_fild16.gat,0,0,0,0 monster Hode 1127,30,0,0,0 +moc_fild16.gat,0,0,0,0 monster Andre 1095,10,0,0,0 +moc_fild16.gat,0,0,0,0 monster Deniro 1105,20,0,0,0 +moc_fild16.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚V(moc_fild17.gat)* +moc_fild17.gat,0,0,0,0 monster Sandman 1165,5,0,0,0 +moc_fild17.gat,0,0,0,0 monster Frilldora 1119,15,60000,30000,0 +moc_fild17.gat,0,0,0,0 monster Magnolia 1138,15,0,0,0 +moc_fild17.gat,0,0,0,0 monster Hode 1127,50,0,0,0 +moc_fild17.gat,0,0,0,0 monster Scorpion 1001,5,0,0,0 +moc_fild17.gat,0,0,0,0 monster Deniro 1105,20,0,0,0 +moc_fild17.gat,0,0,0,0 monster Piere 1160,20,0,0,0 +moc_fild17.gat,0,0,0,0 monster Andre 1095,10,0,0,0 +moc_fild17.gat,0,0,0,0 monster Steel ChonChon 1042,40,0,0,0 +moc_fild17.gat,0,0,0,0 monster Ant Egg 1097,10,0,0,0 +moc_fild17.gat,144,151,0,0 monster Yellow Plant 1081,1,1200000,600000,1 +moc_fild17.gat,243,138,0,0 monster Yellow Plant 1081,1,1200000,600000,1 +moc_fild17.gat,335,191,0,0 monster Yellow Plant 1081,1,1200000,600000,1 +moc_fild17.gat,347,224,0,0 monster Yellow Plant 1081,1,1200000,600000,1 +moc_fild17.gat,359,258,0,0 monster Yellow Plant 1081,1,1200000,600000,1 +moc_fild17.gat,40,258,0,0 monster Yellow Plant 1081,1,1200000,600000,1 +moc_fild17.gat,270,106,0,0 monster Blue Plant 1079,1,1800000,900000,1 + +//ƒ\ƒOƒ‰ƒg»”™ ‚P‚W(moc_fild18.gat)* +moc_fild18.gat,0,0,0,0 monster Magnolia 1138,25,0,0,0 +moc_fild18.gat,0,0,0,0 monster Metaller 1058,10,0,0,0 +moc_fild18.gat,0,0,0,0 monster Deniro 1105,5,0,0,0 +moc_fild18.gat,0,0,0,0 monster Piere 1160,5,0,0,0 +moc_fild18.gat,0,0,0,0 monster Andre 1095,5,0,0,0 +moc_fild18.gat,0,0,0,0 monster Steel ChonChon 1042,70,0,0,0 +moc_fild18.gat,0,0,0,0 monster Muka 1055,40,0,0,0 +moc_fild18.gat,0,0,0,0 monster Ant Egg 1097,5,0,0,0 +moc_fild18.gat,0,0,0,0 monster ChonChon 1011,40,0,0,0 +moc_fild18.gat,119,285,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,135,119,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,143,352,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,230,144,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,325,207,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,325,272,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,71,210,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,72,333,0,0 monster Yellow Plant 1081,1,600000,300000,1 +moc_fild18.gat,0,0,0,0 monster Dragonfly 1091,1,3600000,1800000,0 +moc_fild18.gat,0,0,0,0 monster Hunter Fly 1035,1,3600000,1800000,0 diff --git a/npc/mobs/fields/niflheim.txt b/npc/mobs/fields/niflheim.txt new file mode 100644 index 000000000..1dbe535ae --- /dev/null +++ b/npc/mobs/fields/niflheim.txt @@ -0,0 +1,42 @@ +//===== eAthena Script ======================================= +//= Niflheim Temporary Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= 1.1 commented the town mobs +//============================================================ + +//niflheim +//niflheim.gat,0,0,0,0 monster Lord Of Death 1373,1,3600000,1800000,1 +//niflheim.gat,0,0,0,0 monster Gibbet 1503,10,0,0,0 +//niflheim.gat,0,0,0,0 monster Dullahan 1504,10,0,0,0 +//niflheim.gat,0,0,0,0 monster Loli Ruri 1505,8,0,0,0 +//niflheim.gat,0,0,0,0 monster Disguise 1506,15,0,0,0 +//niflheim.gat,0,0,0,0 monster Bloody Murderer 1507,2,0,0,0 +//niflheim.gat,0,0,0,0 monster Quve 1508,10,0,0,0 +//niflheim.gat,0,0,0,0 monster Lude 1509,20,0,0,0 +//niflheim.gat,0,0,0,0 monster Hylozoist 1510,8,0,0,0 + +//nif_fild01)? +nif_fild01.gat,0,0,0,0 monster Gibbet 1503,10,0,0,0 +nif_fild01.gat,0,0,0,0 monster Dullahan 1504,10,0,0,0 +nif_fild01.gat,0,0,0,0 monster Loli Ruri 1505,8,0,0,0 +nif_fild01.gat,0,0,0,0 monster Disguise 1506,15,0,0,0 +nif_fild01.gat,0,0,0,0 monster Bloody Murderer 1507,2,0,0,0 +nif_fild01.gat,0,0,0,0 monster Quve 1508,10,0,0,0 +nif_fild01.gat,0,0,0,0 monster Lude 1509,20,0,0,0 +nif_fild01.gat,0,0,0,0 monster Hylozoist 1510,8,0,0,0 + +//nif_fild02)? +nif_fild02.gat,0,0,0,0 monster Gibbet 1503,10,0,0,0 +nif_fild02.gat,0,0,0,0 monster Dullahan 1504,10,0,0,0 +nif_fild02.gat,0,0,0,0 monster Loli Ruri 1505,8,0,0,0 +nif_fild02.gat,0,0,0,0 monster Disguise 1506,15,0,0,0 +nif_fild02.gat,0,0,0,0 monster Bloody Murderer 1507,2,0,0,0 +nif_fild02.gat,0,0,0,0 monster Quve 1508,10,0,0,0 +nif_fild02.gat,0,0,0,0 monster Lude 1509,20,0,0,0 +nif_fild02.gat,0,0,0,0 monster Hylozoist 1510,8,0,0,0 diff --git a/npc/mobs/fields/payon.txt b/npc/mobs/fields/payon.txt new file mode 100644 index 000000000..21a205b5e --- /dev/null +++ b/npc/mobs/fields/payon.txt @@ -0,0 +1,128 @@ +//===== eAthena Script ======================================= +//= Payon Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(pay_fild01.gat)* +pay_fild01.gat,0,0,0,0 monster Poporing 1031,10,0,0,0 +pay_fild01.gat,0,0,0,0 monster Spore 1014,20,0,0,0 +pay_fild01.gat,0,0,0,0 monster Willow 1010,50,0,0,0 +pay_fild01.gat,0,0,0,0 monster Poring 1002,60,0,0,0 +pay_fild01.gat,129,288,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,215,323,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,225,310,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,231,258,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,336,116,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,340,89,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,340,89,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,57,85,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,64,113,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,64,190,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,70,246,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,75,269,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,80,226,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,89,177,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,95,85,0,0 monster Black Mushroom 1084,1,180000,90000,1 +pay_fild01.gat,0,0,0,0 monster Green Plant 1080,5,180000,90000,1 + +//(pay_fild02.gat)* +pay_fild02.gat,0,0,0,0 monster Boa 1025,50,150000,75000,1 +pay_fild02.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +pay_fild02.gat,0,0,0,0 monster Wolf 1013,100,0,0,0 +pay_fild02.gat,0,0,0,0 monster Spore 1014,20,0,0,0 +pay_fild02.gat,105,256,10,10 monster Green Plant 1080,4,360000,180000,1 +pay_fild02.gat,105,256,10,10 monster Red Mushroom 1085,4,360000,180000,1 + +//(pay_fild03.gat)* +pay_fild03.gat,0,0,0,0 monster Willow 1010,30,0,0,0 +pay_fild03.gat,0,0,0,0 monster Lunatic 1063,50,0,0,0 +pay_fild03.gat,0,0,0,0 monster Pupa 1008,50,0,0,0 +pay_fild03.gat,0,0,0,0 monster Poring 1002,30,0,0,0 +pay_fild03.gat,372,64,15,15 monster Green Plant 1080,4,180000,90000,1 +pay_fild03.gat,153,216,10,10 monster Red Mushroom 1085,6,900000,450000,1 + +//(pay_fild04.gat)* +pay_fild04.gat,0,0,0,0 monster Marin 1242,10,0,0,0 +pay_fild04.gat,0,0,0,0 monster Poporing 1031,40,0,0,0 +pay_fild04.gat,0,0,0,0 monster Drops 1113,40,0,0,0 +pay_fild04.gat,0,0,0,0 monster Poring 1002,40,0,0,0 +pay_fild04.gat,0,0,0,0 monster Mastering 1090,1,1800000,900000,1 +pay_fild04.gat,346,335,5,5 monster Shining Plant 1083,1,1800000,900000,1 +pay_fild04.gat,0,0,0,0 monster Angeling 1096,1,3600000,1800000,1 +pay_fild04.gat,0,0,0,0 monster Ghostring 1120,1,3600000,1800000,1 +pay_fild04.gat,254,193,10,10 monster Green Plant 1080,5,360000,180000,1 + +//(pay_fild05.gat)* +pay_fild05.gat,0,0,0,0 monster Dragon Tail 1321,5,0,0,0 +pay_fild05.gat,0,0,0,0 monster Poison Spore 1077,70,0,0,0 +pay_fild05.gat,0,0,0,0 monster Poporing 1031,50,0,0,0 +pay_fild05.gat,86,90,5,5 monster Green Plant 1080,4,900000,450000,1 +pay_fild05.gat,95,147,5,5 monster Green Plant 1080,4,900000,450000,1 + +//(pay_fild06.gat)* +pay_fild06.gat,0,0,0,0 monster Worm Tail 1024,100,0,0,0 +pay_fild06.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +pay_fild06.gat,0,0,0,0 monster Thief Bug Female 1053,40,0,0,0 +pay_fild06.gat,0,0,0,0 monster Spore 1014,40,0,0,0 +pay_fild06.gat,268,155,20,20 monster Shining Plant 1083,1,1800000,900000,1 +pay_fild06.gat,268,155,20,20 monster Green Plant 1080,10,360000,180000,1 +pay_fild06.gat,211,191,2,10 monster Red Mushroom 1085,8,180000,90000,1 + +//(pay_fild07.gat)* +pay_fild07.gat,0,0,0,0 monster Bigfoot 1060,30,0,0,0 +pay_fild07.gat,0,0,0,0 monster Eggyra 1116,40,0,0,0 +pay_fild07.gat,0,0,0,0 monster Elder Willow 1033,70,0,0,0 +pay_fild07.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +pay_fild07.gat,0,0,0,0 monster Willow 1010,20,0,0,0 +pay_fild07.gat,171,331,20,20 monster Green Plant 1080,8,900000,450000,1 + +//(pay_fild08.gat)* +pay_fild08.gat,0,0,0,0 monster Spore 1014,50,0,0,0 +pay_fild08.gat,0,0,0,0 monster Willow 1010,70,0,0,0 +pay_fild08.gat,0,0,0,0 monster Pupa 1008,20,0,0,0 +pay_fild08.gat,0,0,0,0 monster Poring 1002,30,0,0,0 +pay_fild08.gat,143,156,40,40 monster Shining Plant 1083,1,3600000,1800000,1 +pay_fild08.gat,0,0,0,0 monster Green Plant 1080,10,60000,30000,1 + +//(pay_fild09.gat)* +pay_fild09.gat,0,0,0,0 monster Wanderer 1208,1,3600000,1800000,0 +pay_fild09.gat,0,0,0,0 monster Sohee 1170,3,0,0,0 +pay_fild09.gat,0,0,0,0 monster Bigfoot 1060,50,0,0,0 +pay_fild09.gat,0,0,0,0 monster Smokie 1056,50,0,0,0 +pay_fild09.gat,0,0,0,0 monster Boa 1025,30,0,0,0 +pay_fild09.gat,0,0,0,0 monster Worm Tail 1024,20,0,0,0 +pay_fild09.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +pay_fild09.gat,0,0,0,0 monster Spore 1014,20,0,0,0 +pay_fild09.gat,198,217,30,30 monster Shining Plant 1083,1,1800000,900000,1 +pay_fild09.gat,198,217,30,30 monster Green Plant 1080,10,360000,180000,1 + +//(pay_fild10.gat)* +pay_fild10.gat,0,0,0,0 monster Nine-Tail 1180,3,0,0,0 +pay_fild10.gat,0,0,0,0 monster Greatest General 1277,65,0,0,0 +pay_fild10.gat,0,0,0,0 monster Horong 1129,40,0,0,0 +pay_fild10.gat,0,0,0,0 monster Poison Spore 1077,20,0,0,0 +pay_fild10.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +pay_fild10.gat,213,157,10,10 monster Blue Plant 1079,1,360000,180000,1 +pay_fild10.gat,281,307,10,10 monster Blue Plant 1079,1,360000,180000,1 +pay_fild10.gat,66,332,10,10 monster Blue Plant 1079,1,360000,180000,1 +pay_fild10.gat,213,157,10,10 monster Green Plant 1080,5,360000,180000,1 +pay_fild10.gat,281,307,10,10 monster Green Plant 1080,5,360000,180000,1 +pay_fild10.gat,66,332,10,10 monster Green Plant 1080,5,360000,180000,1 + +//(pay_fild11.gat)* +pay_fild11.gat,0,0,0,0 monster Dragon Tail 1321,10,0,0,0 +pay_fild11.gat,0,0,0,0 monster Greatest General 1277,30,0,0,0 +pay_fild11.gat,0,0,0,0 monster Horong 1129,50,0,0,0 +pay_fild11.gat,0,0,0,0 monster Elder Willow 1033,10,0,0,0 +pay_fild11.gat,0,0,0,0 monster Poison Spore 1077,40,0,0,0 +pay_fild11.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +pay_fild11.gat,0,0,0,0 monster Eddga 1115,1,7200000,3600000,1 +pay_fild11.gat,241,162,5,5 monster Red Mushroom 1085,3,360000,180000,1 +pay_fild11.gat,66,293,5,5 monster Red Mushroom 1085,3,360000,180000,1 diff --git a/npc/mobs/fields/prontera.txt b/npc/mobs/fields/prontera.txt new file mode 100644 index 000000000..60c269e02 --- /dev/null +++ b/npc/mobs/fields/prontera.txt @@ -0,0 +1,113 @@ +//===== eAthena Script ======================================= +//= Prontera Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + +//(prt_fild00.gat)* +prt_fild00.gat,0,0,0,0 monster Creamy 1018,10,0,0,0 +prt_fild00.gat,0,0,0,0 monster Hornet 1004,40,0,0,0 +prt_fild00.gat,0,0,0,0 monster Lunatic 1063,30,0,0,0 +prt_fild00.gat,0,0,0,0 monster Pupa 1008,50,0,0,0 +prt_fild00.gat,0,0,0,0 monster Fabre 1007,20,0,0,0 +prt_fild00.gat,0,0,0,0 monster Poring 1002,40,0,0,0 +prt_fild00.gat,227,212,0,0 monster Shining Plant 1083,1,1800000,900000,1 +prt_fild00.gat,285,138,10,10 monster Green Plant 1080,5,360000,180000,1 + +//(prt_fild01.gat)* +prt_fild01.gat,0,0,0,0 monster Thief Bug Larva 1051,30,0,0,0 +prt_fild01.gat,0,0,0,0 monster Lunatic 1063,80,0,0,0 +prt_fild01.gat,0,0,0,0 monster Pupa 1008,10,0,0,0 +prt_fild01.gat,0,0,0,0 monster Fabre 1007,20,0,0,0 +prt_fild01.gat,0,0,0,0 monster Poring 1002,30,0,0,0 +prt_fild01.gat,199,266,3,3 monster Blue Plant 1079,1,900000,450000,1 +prt_fild01.gat,199,266,3,3 monster Green Plant 1080,3,360000,180000,1 + +//(prt_fild02.gat)* +prt_fild02.gat,0,0,0,0 monster Mandragora 1020,75,0,0,0 +prt_fild02.gat,0,0,0,0 monster Lunatic 1063,60,0,0,0 +prt_fild02.gat,0,0,0,0 monster Pupa 1008,20,0,0,0 +prt_fild02.gat,0,0,0,0 monster Fabre 1007,50,0,0,0 +prt_fild02.gat,0,0,0,0 monster Poring 1002,30,0,0,0 +prt_fild02.gat,0,0,0,0 monster Eclipse 1093,1,1800000,900000,1 +prt_fild02.gat,339,309,3,3 monster Shining Plant 1083,1,1800000,900000,1 + +//(prt_fild03.gat)* +prt_fild03.gat,0,0,0,0 monster Yoyo 1057,70,0,0,0 +prt_fild03.gat,0,0,0,0 monster Choco 1214,3,0,0,0 +prt_fild03.gat,0,0,0,0 monster Smokie 1056,50,0,0,0 +prt_fild03.gat,0,0,0,0 monster Fabre 1007,10,0,0,0 +prt_fild03.gat,0,0,0,0 monster Poring 1002,30,0,0,0 +prt_fild03.gat,296,58,15,15 monster Blue Plant 1079,2,900000,450000,1 +prt_fild03.gat,296,58,15,15 monster Green Plant 1080,20,180000,90000,1 + +//(prt_fild04.gat)* +prt_fild04.gat,0,0,0,0 monster Creamy 1018,40,0,0,0 +prt_fild04.gat,0,0,0,0 monster Rocker 1052,70,0,0,0 +prt_fild04.gat,0,0,0,0 monster Pupa 1008,10,0,0,0 +prt_fild04.gat,0,0,0,0 monster Poring 1002,30,0,0,0 +prt_fild04.gat,0,0,0,0 monster Vocal 1088,1,3600000,1800000,0 +prt_fild04.gat,147,319,5,5 monster Green Plant 1080,2,360000,180000,1 +prt_fild04.gat,148,107,5,5 monster Green Plant 1080,1,360000,180000,1 +prt_fild04.gat,307,75,5,5 monster Green Plant 1080,2,360000,180000,1 + +//(prt_fild05.gat)* +prt_fild05.gat,0,0,0,0 monster Thief Bug Larva 1051,10,0,0,0 +prt_fild05.gat,0,0,0,0 monster Thief Bug Egg 1048,20,0,0,0 +prt_fild05.gat,0,0,0,0 monster Lunatic 1063,30,0,0,0 +prt_fild05.gat,0,0,0,0 monster Pupa 1008,30,0,0,0 +prt_fild05.gat,0,0,0,0 monster Poring 1002,70,0,0,0 +prt_fild05.gat,208,37,10,10 monster Blue Plant 1079,1,900000,450000,1 +prt_fild05.gat,208,37,10,10 monster Green Plant 1080,6,900000,450000,1 + +//(prt_fild06.gat)* +prt_fild06.gat,0,0,0,0 monster Thief Bug Larva 1051,10,0,0,0 +prt_fild06.gat,0,0,0,0 monster Thief Bug Egg 1048,20,0,0,0 +prt_fild06.gat,0,0,0,0 monster Lunatic 1063,60,0,0,0 +prt_fild06.gat,0,0,0,0 monster Pupa 1008,20,0,0,0 +prt_fild06.gat,0,0,0,0 monster Poring 1002,60,0,0,0 +prt_fild06.gat,222,30,40,10 monster Green Plant 1080,15,900000,450000,1 + +//(prt_fild07.gat)* +prt_fild07.gat,0,0,0,0 monster Poporing 1031,30,0,0,0 +prt_fild07.gat,0,0,0,0 monster Rocker 1052,120,0,0,0 +prt_fild07.gat,225,110,5,5 monster Black Mushroom 1084,3,360000,180000,1 + +//(prt_fild08.gat)* +prt_fild08.gat,0,0,0,0 monster Lunatic 1063,40,0,0,0 +prt_fild08.gat,0,0,0,0 monster Drops 1113,10,0,0,0 +prt_fild08.gat,0,0,0,0 monster Pupa 1008,20,0,0,0 +prt_fild08.gat,0,0,0,0 monster Poring 1002,100,0,0,0 + +//(prt_fild09.gat)* +prt_fild09.gat,0,0,0,0 monster Desert Wolf Puppy 1107,20,0,0,0 +prt_fild09.gat,0,0,0,0 monster Savage Babe 1167,70,0,0,0 +prt_fild09.gat,0,0,0,0 monster Condor 1009,10,0,0,0 +moc_fild09.gat,0,0,0,0 monster PecoPeco Egg 1047,10,0,0,0 +prt_fild09.gat,0,0,0,0 monster Picky 1049,20,0,0,0 +prt_fild09.gat,237,115,5,5 monster Yellow Plant 1081,3,360000,180000,1 + +//(prt_fild10.gat)* +prt_fild10.gat,0,0,0,0 monster Savage 1166,70,0,0,0 +prt_fild10.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +prt_fild10.gat,0,0,0,0 monster Savage Babe 1167,40,0,0,0 +prt_fild10.gat,0,0,0,0 monster Thief Bug Larva 1051,10,0,0,0 +prt_fild10.gat,155,179,10,10 monster Shining Plant 1083,1,1800000,900000,1 +prt_fild10.gat,99,114,20,5 monster Red Mushroom 1085,15,360000,180000,1 + +//(prt_fild11.gat)* +prt_fild11.gat,0,0,0,0 monster Panzer Goblin 1308,1,0,0,0 +prt_fild11.gat,0,0,0,0 monster Steam Goblin 1280,30,0,0,0 +prt_fild11.gat,0,0,0,0 monster Goblin Archer 1258,20,0,0,0 +prt_fild11.gat,0,0,0,0 monster Goblin 5 1126,30,0,0,0 +prt_fild11.gat,0,0,0,0 monster Goblin 4 1125,30,0,0,0 +prt_fild11.gat,0,0,0,0 monster Goblin 3 1124,20,0,0,0 +prt_fild11.gat,0,0,0,0 monster Goblin 2 1123,30,0,0,0 +prt_fild11.gat,0,0,0,0 monster Goblin 1 1122,30,0,0,0 +prt_fild11.gat,0,0,0,0 monster Red Mushroom 1085,10,180000,90000,1 diff --git a/npc/mobs/fields/umbala.txt b/npc/mobs/fields/umbala.txt new file mode 100644 index 000000000..3189d0523 --- /dev/null +++ b/npc/mobs/fields/umbala.txt @@ -0,0 +1,38 @@ +//===== eAthena Script ======================================= +//= Umbala Monster Spawn +//===== By: ================================================== +//= Darkchild (1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= Any eAthena Version; RO Ep6+ +//===== Additional Comments: ================================= +//= +//============================================================ + + +//(um_fild01.gat)? no info +um_fild01.gat,0,0,0,0 monster Stem Worm 1215,15,0,0,0 +um_fild01.gat,0,0,0,0 monster Wooden Fighter 1499,40,0,0,0 +um_fild01.gat,0,0,0,0 monster Dryad 1493,15,0,0,0 +um_fild01.gat,0,0,0,0 monster Harpy 1376,25,0,0,0 + +//(um_fild02.gat)? +um_fild02.gat,0,0,0,0 monster Dustiness 1114,25,0,0,0 +um_fild02.gat,0,0,0,0 monster Kind of Beetle 1494,15,0,0,0 +um_fild02.gat,0,0,0,0 monster Wooden Fighter 1499,30,0,0,0 +um_fild02.gat,0,0,0,0 monster Wooden Shooter 1498,20,0,0,0 + +//(um_fild03.gat)? +um_fild03.gat,0,0,0,0 monster Pest 1256,25,0,0,0 +//um_fild03.gat,0,0,0,0 monster ƒtƒFƒAƒŠ[ƒt ????,30,0,0,0 +um_fild03.gat,0,0,0,0 monster Alligator 1271,15,0,0,0 +um_fild03.gat,0,0,0,0 monster Dragon Tail 1321,20,0,0,0 +um_fild03.gat,0,0,0,0 monster Gryphon 1447,1,150000,150000,0 + +//(um_fild04.gat)? +um_fild04.gat,0,0,0,0 monster Stainer 1174,25,0,0,0 +um_fild04.gat,0,0,0,0 monster Kind of Beetle 1494,20,0,0,0 +um_fild04.gat,0,0,0,0 monster Wooden Shooter 1498,20,0,0,0 +um_fild04.gat,0,0,0,0 monster Wooden Fighter 1499,30,0,0,0 +um_fild04.gat,0,0,0,0 monster Choco 1214,1,0,0,0 diff --git a/npc/mobs/fields/yuno.txt b/npc/mobs/fields/yuno.txt new file mode 100644 index 000000000..67e49a00c --- /dev/null +++ b/npc/mobs/fields/yuno.txt @@ -0,0 +1,60 @@ +//===== eAthena Script ======================================= +//= Yuno Fields Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= 1.1 fixed tabs, names [Lupus] +//============================================================ + +//(yuno_fild04.gat)* +yuno_fild04.gat,0,0,0,0 monster Goat 1372,40,0,0,0 +yuno_fild04.gat,0,0,0,0 monster Sleeper 1386,5,0,0,0 +yuno_fild04.gat,0,0,0,0 monster The Paper 1375,3,0,0,0 +yuno_fild04.gat,0,0,0,0 monster Geographer 1368,20,0,0,0 +yuno_fild04.gat,0,0,0,0 monster Driller 1380,10,0,0,0 +yuno_fild04.gat,0,0,0,0 monster Poring 1002,20,0,0,0 +yuno_fild04.gat,0,0,0,0 monster Green Plant 1080,10,180000,90000,1 +yuno_fild04.gat,0,0,0,0 monster Red Plant 1078,10,180000,90000,1 +yuno_fild04.gat,0,0,0,0 monster Yellow Plant 1081,10,360000,180000,1 +yuno_fild04.gat,0,0,0,0 monster Harpy 1376,1,0,0,0 + +//(yuno_fild03.gat)* +yuno_fild03.gat,0,0,0,0 monster Goat 1372,60,0,0,0 +yuno_fild03.gat,0,0,0,0 monster Sleeper 1386,30,0,0,0 +yuno_fild03.gat,0,0,0,0 monster The Paper 1375,3,0,0,0 +yuno_fild03.gat,0,0,0,0 monster Geographer 1368,20,0,0,0 +yuno_fild03.gat,0,0,0,0 monster Demon Pungus 1378,30,0,0,0 +yuno_fild03.gat,0,0,0,0 monster Red Plant 1078,15,180000,90000,1 +yuno_fild03.gat,0,0,0,0 monster Shining Plant 1083,2,1800000,900000,1 +yuno_fild03.gat,0,0,0,0 monster Blue Plant 1079,4,360000,180000,1 +yuno_fild03.gat,0,0,0,0 monster Yellow Plant 1081,20,360000,180000,1 +yuno_fild03.gat,0,0,0,0 monster Harpy 1376,2,0,0,0 + +//(yuno_fild02.gat)* +yuno_fild02.gat,0,0,0,0 monster Sleeper 1386,10,0,0,0 +yuno_fild02.gat,0,0,0,0 monster Grand Peco 1369,70,0,0,0 +yuno_fild02.gat,0,0,0,0 monster The Paper 1375,1,0,0,0 +yuno_fild02.gat,0,0,0,0 monster Geographer 1368,20,0,0,0 +yuno_fild02.gat,0,0,0,0 monster Driller 1380,30,0,0,0 +yuno_fild02.gat,0,0,0,0 monster Dustiness 1114,20,0,0,0 +yuno_fild02.gat,0,0,0,0 monster Poring 1002,20,0,0,0 +yuno_fild02.gat,0,0,0,0 monster Red Plant 1078,20,180000,90000,1 +yuno_fild02.gat,0,0,0,0 monster Shining Plant 1083,1,1800000,900000,1 +yuno_fild02.gat,0,0,0,0 monster Blue Plant 1079,3,360000,180000,1 +yuno_fild02.gat,0,0,0,0 monster Yellow Plant 1081,20,360000,180000,1 +yuno_fild02.gat,0,0,0,0 monster Archangeling 1388,1,3600000,1800000,1 + +//(yuno_fild01.gat)* +yuno_fild01.gat,0,0,0,0 monster Grand Peco 1369,3,0,0,0 +yuno_fild01.gat,0,0,0,0 monster Dustiness 1114,50,0,0,0 +yuno_fild01.gat,0,0,0,0 monster Poporing 1031,20,0,0,0 +yuno_fild01.gat,0,0,0,0 monster Poring 1002,20,0,0,0 +yuno_fild01.gat,0,0,0,0 monster Green Plant 1080,20,180000,90000,1 +yuno_fild01.gat,0,0,0,0 monster Red Plant 1078,15,180000,90000,1 +yuno_fild01.gat,0,0,0,0 monster Shining Plant 1083,3,1800000,900000,1 +yuno_fild01.gat,0,0,0,0 monster Blue Plant 1079,2,360000,180000,1 +yuno_fild01.gat,0,0,0,0 monster Yellow Plant 1081,23,360000,180000,1 diff --git a/npc/mobs/pvp.txt b/npc/mobs/pvp.txt new file mode 100644 index 000000000..dbdfd0c61 --- /dev/null +++ b/npc/mobs/pvp.txt @@ -0,0 +1,31 @@ +//===== eAthena Script ======================================= +//= PvP Nightmare Rooms Monster Spawn Script +//===== By: ================================================== +//= Athena (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version +//===== Additional Comments: ================================= +//= +//============================================================ + + +//PvP : “ì–k푈(pvp_n_8-1) +pvp_n_8-1.gat,0,0,0,0 monster Sidewinder 1037,2,360000,180000,1 +pvp_n_8-1.gat,0,0,0,0 monster Bigfoot 1060,2,360000,180000,1 + +//PvP : ƒƒbƒNƒIƒ“(pvp_n_8-2) +pvp_n_8-2.gat,0,0,0,0 monster Cramp 1209,4,360000,180000,1 + +//PvP : ƒtƒH[ƒ‹[ƒ€(pvp_n_8-3) +pvp_n_8-3.gat,0,0,0,0 monster Whisper 1179,3,360000,180000,1 +pvp_n_8-3.gat,0,0,0,0 monster Giant Whisper 1186,2,360000,180000,1 + +//PvP : ƒAƒ“ƒ_[ƒNƒƒX(pvp_n_8-4) +pvp_n_8-4.gat,0,0,0,0 monster Zombie 1015,4,360000,180000,1 +pvp_n_8-4.gat,0,0,0,0 monster Ghoul 1036,3,360000,180000,1 + +//PvP : ƒUƒiƒNƒ‹[ƒ€(pvp_n_8-5) +pvp_n_8-5.gat,0,0,0,0 monster Khalitzburg 1132,1,360000,180000,1 +pvp_n_8-5.gat,0,0,0,0 monster Raydric 1163,2,360000,180000,1 diff --git a/npc/other/Global_Functions.txt b/npc/other/Global_Functions.txt new file mode 100644 index 000000000..4c45a1db5 --- /dev/null +++ b/npc/other/Global_Functions.txt @@ -0,0 +1,80 @@ +//===== eAthena Script ======================================= +//= Global Functions +//===== By: ================================================== +//= Lupus, kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Added F_ClearJobVar - on getting a new job it clears all Job Quest variables +//= Removed individual job check functions as they were redundant [kobra_k88] +//============================================================ + + +//========================================= +// Function that clears job quest variables +//========================================= +function script F_ClearJobVar { + // Misc --------------------------------- + set JBLVL,0; + // First Class Jobs --------------------- + set job_acolyte_q,0; set job_acolyte_q2,0; + set job_archer_q,0; + set job_magician_q,0; + set job_merchant_q,0; set job_merchant_q2,0; set job_merchant_q3,0; + set job_sword_q,0; set job_sword_q2,0; + set job_thief_q,0; + // 2-1 Jobs ------------------------------ + set ASSIN_Q,0; set ASSIN_Q2,0; + set BSMITH_Q,0; set BSMITH_Q2,0; + set HNTR_Q,0; set HNTR_Q2,0; + set KNIGHT_Q,0; set KNIGHT_Q2,0; + set PRIEST_Q,0; set PRIEST_Q2,0; set PRIEST_Q3,0; + set WIZ_Q,0; set WIZ_Q2,0; + // 2-2 Jobs ------------------------------ + set ROGUE_Q,0; set ROGUE_Q2,0; + set ALCH_Q,0; set ALCH_Q2,0; + return; +} + +//===================================================== +// Functions used to check a players job class +//---------------------------------------------------- +// HOW TO USE: +// i.e. We need all holy classes but monks +// if ( callfunc("Is_Holy_Class") && callfunc("Is_Monk")==0 ) goto L_Start; +//======================================================= + +//------------------------------------------------------ +//returns 1 if the player is either Aco,Monk or Priest, 0 otherwise +function script Is_Holy_Class { + return ( Class==Job_Acolyte || Class==Job_Priest || Class==Job_Monk || Class==4005 || Class==4009 || Class==4016 ); +} +//------------------------------------------------------ +//returns 1 if the player is either Archer,Hunter,Bard,Dancer, 0 otherwise +function script Is_Bow_Class { + return ( Class==Job_Archer || Class==Job_Hunter || Class==Job_Bard || Class==Job_Dancer || Class==4004 || Class==4012 || Class==4020 || Class==4021); +} +//------------------------------------------------------ +//returns 1 if the player is either Mage,Wizard,Sage, 0 otherwise +function script Is_Magic_Class { + return ( Class==Job_Mage || Class==Job_Wizard || Class==Job_Sage || Class==4003 || Class==4010 || Class==4017 ); +} +//---------------------------------------------------- +//returns 1 if the player is either Merchant,Blacksmith,Alchemist, 0 otherwise +function script Is_Merc_Class { + return ( Class==Job_Merchant || Class==Job_Blacksmith || Class==Job_Alchem || Class==4006 || Class==4011 || Class==4019 ); +} +//------------------------------------------------------ +//returns 1 if the player is either Thief,Assassin,Rogue, 0 otherwise +function script Is_Thief_Class { + return ( Class==Job_Thief || Class==Job_Assassin || Class==Job_Rogue || Class==4007 || Class==4013 || Class==4018 ); +} +//----------------------------------------------------- +//returns 1 if the player is either Swordsman,Knight,Crusader, 0 otherwise +function script Is_Sword_Class { + return ( Class==Job_Swordman || Class==Job_Knight || Class==Job_Knight2 || Class==Job_Crusader || Class==Job_Crusader2 || Class==4002 || Class==4008 || Class==4014 || Class==4015 || Class==4022 ); +} diff --git a/npc/other/IceCream.txt b/npc/other/IceCream.txt new file mode 100644 index 000000000..fd35caf54 --- /dev/null +++ b/npc/other/IceCream.txt @@ -0,0 +1,64 @@ +// $Id: IceCream.txt,v 1.1.1.1 2004/09/10 17:26:42 MagicalTux Exp $ +//===== eAthena Script ======================================= +//= Ice Cream Maker +//===== By: ================================================== +//= KOOK SWU +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= A man makes you ice-cream +//===== Additional Comments: ================================= +//= 1.1 Optimized, changed overlapping coords in Alberta [Lupus] +//============================================================ + +//ALBERTA +alberta.gat,120,45,2 script Ice Cream Maker::IceCreamer 85,{ + mes "[Ice Cream Maker]"; + mes "Fresh Ice Cream made with snow from Lutie!"; + mes "Enjoy it now, it won't be on sale for long!"; + mes "^0000FF100 Zeny^000000 Ice Cream,"; + mes "Ice Cream!"; + next; + menu "Gimme Ice Cream!",-,"Cancel Trade",L_End; + + mes "[Ice Cream Maker]"; + mes "Fresh Ice Cream made with snow from Lutie!"; + mes "Everyone wants our delicious ice cream, but we have limited amount,"; + mes "so you can only purchase 5 at a time!!"; + next; + input @input; + if(@input<1) goto L_inpC; + if(@input>5) goto L_inpM; + if(Zeny< @input*100) goto L_NoZ; + getitem 536,@input; + set Zeny,Zeny-100*@input; + mes "[Ice Cream Maker]"; + mes "Here you go " +@input+ " Ice Cream for you."; + close; + + L_inpC: + mes "[Ice Cream Maker]"; + mes "Deal is canceled."; + close; + L_inpM: + mes "[Ice Cream Maker]"; + mes "Sorry, but you can only buy 5 at a time."; + close; + L_NoZ: + mes "[Ice Cream Maker]"; + mes "Sorry, but you need more money."; + close; + L_End: + mes "[Ice Cream Maker]"; + mes "Are you sure you don't want any?"; + mes "I won't be selling it for long, and once I run out, there won't be anymore!!!"; + close; +} + +//MORROC FIELD +moc_fild16.gat,88,304,4 duplicate(IceCreamer) Ice Cream Maker#2 85 + +//MORROC +morocc.gat,160,144,4 duplicate(IceCreamer) Ice Cream Maker#3 85 diff --git a/npc/other/Valkyrie.txt b/npc/other/Valkyrie.txt new file mode 100644 index 000000000..82a52a5db --- /dev/null +++ b/npc/other/Valkyrie.txt @@ -0,0 +1,50 @@ +//1.1 label fixed [Lupus] + +yuno_in02.gat,93,207,0 script Heaven's Door 111,{ + if (Class < 7) goto L_Can; + mes "[The writing on the paper]"; + mes "You have found the entrance to the temple."; + mes "This path is only open to those who are born again."; + mes "Only heroes can open new paths."; + next; + mes "[The writing on the paper]"; + mes "The area for heroes has been completed,"; + mes "You cannot be immortal, but in this land..."; + mes "Heroes are able to."; + next; + mes "[The writing on the paper]"; + mes "The area for heroes has been completed,"; + mes "You cannot be immortal, but in this land..."; + mes "Heroes are able to."; + next; + menu "Continue reading",-,"Stop reading",L_Can; + mes "[The writing on the paper]"; + mes "Heaven and the closest palce,"; + mes "In the Valkyrie's temple you shall find the path"; + mes "A normal mortal cannot live for ever."; + next; + warp "valkyrie",48,8; + close; +L_Can: + mes "[The writing on the paper]"; + mes "...................."; + close; + +} + +valkyrie.gat,48,86,6 script Valkyrie 811,{ + if (class > 7) goto L_Rest; + mes "[Valkyrie]"; + mes "Welcome to Valhalla."; + mes "But, you have not been invited yet."; + mes "Leave here without leaving a trace."; + mes "Glory to the Swordsmans!"; + warp "yuno_in02",93,205; + close; +L_Rest: + mes "[Valkyrie]"; + mes "Welcome to Valhalla."; + mes "Take plenty of rest while you are here."; + mes "Honor and glory to the Swordsmans"; + close; +} \ No newline at end of file diff --git a/npc/other/arena.txt b/npc/other/arena.txt new file mode 100644 index 000000000..38436d8ba --- /dev/null +++ b/npc/other/arena.txt @@ -0,0 +1,568 @@ +// ------------------------------------------------------------------ +// Setup Of Arena +// ------------------------------------------------------------------ + +// The following maps are used +//map: prontera.gat +//map: prt_are_in.gat +//map: force_1-1.gat + +// Disallow Teleport, etc. +force_1-1.gat mapflag pvp dummy +force_1-2.gat mapflag pvp dummy +force_1-3.gat mapflag pvp dummy +force_2-1.gat mapflag pvp dummy +force_2-2.gat mapflag pvp dummy +force_2-3.gat mapflag pvp dummy +force_3-1.gat mapflag pvp dummy +force_3-2.gat mapflag pvp dummy +force_3-3.gat mapflag pvp dummy +prt_are_in.gat mapflag nomemo dummy +prt_are_in.gat mapflag noteleport dummy +prt_are_in.gat mapflag nosave prontera.gat,156,191 +force_1-1.gat mapflag nomemo dummy +force_1-1.gat mapflag noteleport dummy +force_1-1.gat mapflag nosave prontera.gat,156,191 + +// An entrance is placed in Prontera. +prontera.gat,160,185,3 script Arena Entrance 116,{ + mes "Want to go to the arena?"; + next; + menu "Let's go!",L_GOARENA,"Nah..",L_YAME; +L_GOARENA: + warp "prt_are_in.gat",31,82; + close; +L_YAME: + close; +} + +// Teleport from waiting room to ready room +prt_are_in.gat,29,79,0 script Time Attack 116,{ + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + + mes "This is the Time Attack selection."; + mes "Please choose your challenge."; + menu "Level 1 - 5 Porings, 30 secs!",L_GOLV1,"Level 2 - 7 Roda Frogs, 60 secs!",L_GOLV2,"Level 3 - 9 PecoPecos, 100 secs!",L_GOLV3,"Never mind.",L_YAME; +L_GOLV1: + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + disablenpc "fc103-1"; + disablenpc "fc105"; + disablenpc "fc107"; + addtimer 5000,"arenalv1st"; + warp "force_1-1.gat",99,12; + break; +L_GOLV2: + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + disablenpc "fc103-1"; + disablenpc "fc105"; + disablenpc "fc107"; + addtimer 5000,"arenalv2st"; + warp "force_1-1.gat",99,12; + break; +L_GOLV3: + if( getmapusers("force_1-1.gat")>0 ) goto L_WAIT; + disablenpc "fc103-1"; + disablenpc "fc105"; + disablenpc "fc107"; + addtimer 5000,"arenalv3st"; + warp "force_1-1.gat",99,12; + break; +L_WAIT: + mes "Since the arena is in use,"; + mes "please wait for a while."; +L_YAME: + close; +} + + +// Ready room (10-second preparation) +force_1-1.gat,99,12,0 script arenalv1st -1,{ + announce "It will begin in 10 seconds!",3; + addtimer 10000,"arenalv1fgt"; +} +force_1-1.gat,99,12,0 script arenalv2st -1,{ + announce "It will begin in 10 seconds!",3; + addtimer 10000,"arenalv2fgt"; +} +force_1-1.gat,99,12,0 script arenalv3st -1,{ + announce "It will begin in 10 seconds!",3; + addtimer 10000,"arenalv3fgt"; +} + + +// Transmission to the room, and mob organization +//Time Attack Level 1 +force_1-1.gat,99,12,0 script arenalv1fgt -1,{ + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + monster "force_1-1.gat",25,25,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",20,25,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",25,20,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",30,25,"Arena Enemy",1002,1,"arenalv1mon"; + monster "force_1-1.gat",25,30,"Arena Enemy",1002,1,"arenalv1mon"; + set $arena00,5; + disablenpc "fc101"; + disablenpc "fc103"; + warp "force_1-1.gat",25,26; + enablenpc "fc103-1"; + enablenpc "fc105"; + enablenpc "fc107"; + announce "Do it within 30 seconds!",19; + addtimer 30000,"arenalv1fail"; + addtimer 20000,"tensecsleft"; +} + +//Time Attack Level 2 +force_1-1.gat,99,12,0 script arenalv2fgt -1,{ + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + monster "force_1-1.gat",20,20,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",20,25,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",20,30,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",30,20,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",30,25,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",30,30,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",25,30,"Arena Enemy",1012,1,"arenalv2mon"; + monster "force_1-1.gat",25,20,"Arena Enemy",1012,1,"arenalv2mon"; + set $arena00,7; + disablenpc "fc101"; + disablenpc "fc103"; + warp "force_1-1.gat",25,26; + enablenpc "fc103-1"; + enablenpc "fc105"; + enablenpc "fc107"; + announce "You have 60 seconds to destroy all seven!",19; + addtimer 60000,"arenalv2fail"; + addtimer 50000,"tensecsleft"; +} + +//Time Attack Level 3 +force_1-1.gat,99,12,0 script arenalv3fgt -1,{ + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + monster "force_1-1.gat",20,20,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",20,25,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",20,30,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",30,20,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",30,25,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",30,30,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",25,30,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",25,25,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",25,20,"Arena Enemy",1019,1,"arenalv3mon"; + monster "force_1-1.gat",20,35,"Arena Enemy",1019,1,"arenalv3mon"; + set $arena00,9; + disablenpc "fc101"; + disablenpc "fc103"; + warp "force_1-1.gat",25,26; + enablenpc "fc103-1"; + enablenpc "fc105"; + enablenpc "fc107"; + announce "You have 90 seconds to destroy all nine!",19; + addtimer 90000,"arenalv3fail"; + addtimer 80000,"tensecsleft"; +} + +// Pushed-down Processing +//Time Attack Level 1 +force_1-1.gat,25,26,0 script arenalv1mon -1,{ + set $arena00, $arena00 - 1; + if( $arena00 > 0 ) goto L_CONT; + deltimer "arenaev8000"; + announce "Crash!!",3; + enablenpc "fc101"; + enablenpc "fc103"; + areaannounce "force_1-1.gat",0,0,350,350, + "You cleared Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + areaannounce "gonryun.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 1.",0; + addtimer 5000,"arenareturn"; +L_CONT: + break; +} + +force_1-1.gat,25,26,0 script arenalv2mon -1,{ + set $arena00, $arena00 - 1; + if( $arena00 > 0 ) goto L_CONT; + deltimer "arenaev8000"; + announce "Crash!!",3; + enablenpc "fc101"; + enablenpc "fc103"; + areaannounce "force_1-1.gat",0,0,350,350, + "You cleared Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + areaannounce "gonryun.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 2.",0; + addtimer 5000,"arenareturn"; +L_CONT: + break; +} + + +force_1-1.gat,25,26,0 script arenalv3mon -1,{ + set $arena00, $arena00 - 1; + if( $arena00 > 0 ) goto L_CONT; + deltimer "arenaev8000"; + announce "Crash!!",3; + enablenpc "fc101"; + enablenpc "fc103"; + areaannounce "force_1-1.gat",0,0,350,350, + "You cleared Time Attack Level 3.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + areaannounce "gonryun.gat",0,0,350,350, + strcharinfo(0) + " cleared Time Attack Level 3.",0; + addtimer 5000,"arenareturn"; +L_CONT: + break; +} + +// Timeout +force_1-1.gat,25,26,0 script arenalv1fail -1,{ + set $arena00,99; + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + announce "Time Over!!",3; + areaannounce "force_1-1.gat",0,0,350,350, + "You failed Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + areaannounce "gonryun",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 1.",0; + addtimer 5000,"arenareturn"; +} + +force_1-1.gat,25,26,0 script arenalv2fail -1,{ + set $arena00,99; + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + announce "Time Over!!",3; + areaannounce "force_1-1.gat",0,0,350,350, + "You failed Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + areaannounce "gonryun",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 2.",0; + addtimer 5000,"arenareturn"; +} + +force_1-1.gat,25,26,0 script arenalv3fail -1,{ + set $arena00,99; + killmonster "force_1-1.gat","arenalv1mon"; + killmonster "force_1-1.gat","arenalv2mon"; + killmonster "force_1-1.gat","arenalv3mon"; + announce "Time Over!!",3; + areaannounce "force_1-1.gat",0,0,350,350, + "You failed Time Attack Level 2.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prontera.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "morocc.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "geffen.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payon.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "alberta.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "izlude.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "aldebaran.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prt_are_in.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "xmas.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "comodo.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prt_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "prtg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "pay_gld.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas01.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas02.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas03.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas04.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "payg_cas05.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "yuno.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "amatsu.gat",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + areaannounce "gonryun",0,0,350,350, + strcharinfo(0) + " failed Time Attack Level 3.",0; + addtimer 5000,"arenareturn"; +} + +// Reminding the player of time constraints. +force_1-1.gat,25,26,0 script tensecsleft -1,{ + announce "Ten seconds remaining!",3; +} + + +// Return to Prontera +force_1-1.gat,25,26,0 script arenareturn -1,{ + warp "prontera.gat",156,191; +} \ No newline at end of file diff --git a/npc/other/arena_mvp.txt b/npc/other/arena_mvp.txt new file mode 100644 index 000000000..8253e1aa1 --- /dev/null +++ b/npc/other/arena_mvp.txt @@ -0,0 +1,1105 @@ +// ---- MVP ARENA!!!!!! By Darkchild with 16 diff MVP's inside +// --- NPC in prontera +prontera.gat,154,197,3 script MVP Warper 768,{ +mes "[ ^0065DFMVP Warper^000000 ]"; +mes "Would you like to go to the MVP Arena ?..."; +menu "Yes!",L_MVP,"No thanks.",L_No; + +L_MVP: +warp "quiz_00",44,24; +close; +L_No: +close; +} +// --- Inside the Arena +// --- NPC's That explains thigns +quiz_00.gat,49,31,4 script MVP Arena Guide 778,{ +menu "Intro",L_Intro,"I want to go back",L_Leave,"Heal me please",L_Heal,"Cancel",L_Cancel; + +L_Intro: +mes "[ ^0065DFMVP Arena Guide^000000 ]"; +mes "Welcome and behold this sacred place, Here you will find out if you truly have what it takes to call yourself a warrior, and a Team mate."; +next; +mes "Here in [ ^0065DFSvRO^000000 ] we like to be a family, and as a family you learn you must help and assist one-another, so if you want to survive you should learn to Co-operate."; +next; +mes "There are Plenty of rooms with MVP's in them so don't all fight over the one room just cause you think it's the only one, just move to the next one."; +next; +mes "If you can't get along, and there is too much complaining about people stealing MVP kills and items... then this place will be removed."; +next; +mes "Now the npc's are in groups of monsters, there are 4 different mvps per each npc, i wont tell you which it's a surprise hehe."; +next; +mes "Good luck, Live long and Prosper!."; +close; + +L_Leave: +warp "prontera",156,179; +close; + +L_Heal: +Heal 32500,32500; +close; + +L_Cancel: +close; +} + +// --- The first Alpha-MVP warper +quiz_00.gat,56,31,4 script Alpha MVP 770,{ +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-2.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-2.gat") + " / 50]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-2.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-2.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-2.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-2.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-2.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-2.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-2.gat") > 49) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-2",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-2.gat") > 49) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-2",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-2",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-2",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-2",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-2",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-2",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-2.gat") > 14) goto Lsorry; +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-2",102,102; +close; + +Lsorry: +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + +// --- The first Beta-MVP warper +quiz_00.gat,58,31,4 script Beta MVP 773,{ +mes "[ ^0065DFAlpha MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-3.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-3.gat") + " / 15]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-3.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-3.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-3.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-3.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-3.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-3.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-3.gat") > 49) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-3",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-3",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-3",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-3.gat",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-3.gat",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-3.gat",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-3.gat",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-3.gat") > 14) goto Lsorry; +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-3.gat",102,102; +close; + +Lsorry: +mes "[ ^0065DFBeta MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + + +// --- The first Theta-MVP warper +quiz_00.gat,60,31,4 script Theta MVP 774,{ +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-4.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-4.gat") + " / 15]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-4.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-4.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-4.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-4.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-4.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-4.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-4.gat") > 49) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-4.gat",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-4.gat",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-4.gat",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-4.gat",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-4.gat",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-4.gat",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-4.gat",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-4.gat") > 14) goto Lsorry; +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-4.gat",102,102; +close; + +Lsorry: +mes "[ ^0065DFTheta MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + + +// --- The first Epsilon-MVP warper +quiz_00.gat,62,31,4 script Epsilon MVP 776,{ +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "I am the first Keeper, are you ready?."; +menu "Yes!",L_Yes,"Urrr No.",L_No; + +L_Yes: +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Which Arena you want to go to??"; + menu "Arena 1 [" + getmapusers("pvp_n_1-5.gat") + " / 50]",Larena1, + "Arena 2 [" + getmapusers("pvp_n_2-5.gat") + " / 15]",Larena2, + "Arena 3 [" + getmapusers("pvp_n_3-5.gat") + " / 15]",Larena3, + "Arena 4 [" + getmapusers("pvp_n_4-5.gat") + " / 15]",Larena4, + "Arena 5 [" + getmapusers("pvp_n_5-5.gat") + " / 15]",Larena5, + "Arena 6 [" + getmapusers("pvp_n_2-5.gat") + " / 15]",Larena6, + "Arena 7 [" + getmapusers("pvp_n_3-5.gat") + " / 15]",Larena7, + "Arena 8 [" + getmapusers("pvp_n_4-5.gat") + " / 15]",Larena8, + "Quit",Lcancel; + +L_No: +close; + +Larena1: +if (getmapusers("pvp_n_1-5.gat") > 49) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_1-5.gat",102,102; +close; + +Larena2: +if (getmapusers("pvp_n_2-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_2-5.gat",102,102; +close; + +Larena3: +if (getmapusers("pvp_n_3-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_3-5.gat",102,102; +close; + +Larena4: +if (getmapusers("pvp_n_4-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_4-5.gat",102,102; +close; + +Larena5: +if (getmapusers("pvp_n_5-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_5-5.gat",102,102; +close; + +Larena6: +if (getmapusers("pvp_n_6-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_6-5.gat",102,102; +close; + +Larena7: +if (getmapusers("pvp_n_7-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_7-5.gat",102,102; +close; + +Larena8: +if (getmapusers("pvp_n_8-5.gat") > 14) goto Lsorry; +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Here you go!"; +warp "pvp_n_8-5.gat",102,102; +close; + +Lsorry: +mes "[ ^0065DFEpsilon MVP^000000 ]"; +mes "Sorry but this Arena is already full, maybe you can try another one!"; +close; +} + + +// ---- Inside MVP-Arena NPC's +// --- Alpha-MVP #1 +pvp_n_1-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-2",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera",156,179; + close; +} + +// --- Alpha-MVP #2 +pvp_n_2-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-2",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera",156,179; + close; +} +// --- Alpha-MVP #3 +pvp_n_3-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #4 +pvp_n_4-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #5 +pvp_n_5-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #6 +pvp_n_6-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #7 +pvp_n_7-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-2.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Alpha-MVP #8 +pvp_n_8-2.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #1 +pvp_n_1-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// --- Beta-MVP #2 +pvp_n_2-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #3 +pvp_n_3-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #4 +pvp_n_4-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #5 +pvp_n_5-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #6 +pvp_n_6-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #7 +pvp_n_7-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-3.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Beta-MVP #8 +pvp_n_8-3.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #1 +pvp_n_1-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// --- Theta-MVP #2 +pvp_n_2-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #3 +pvp_n_3-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #4 +pvp_n_4-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #5 +pvp_n_5-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #6 +pvp_n_6-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #7 +pvp_n_7-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-4.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Theta-MVP #8 +pvp_n_8-4.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #1 +pvp_n_1-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_2-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// --- Epsilon-MVP #2 +pvp_n_2-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_3-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #3 +pvp_n_3-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_4-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #4 +pvp_n_4-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_5-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #5 +pvp_n_5-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_6-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #6 +pvp_n_6-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_7-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #7 +pvp_n_7-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Harder Monsters",L_Next,"Heal Please",L_Heal,"Leave",L_Leave; + + L_Next: + warp "pvp_n_8-5.gat",102,102; + close; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} +// --- Epsilon-MVP #8 +pvp_n_8-5.gat,100,100,4 script MVP-Protector 727,{ + mes "[ ^0065DFMVP-Protector^000000 ]"; + mes "How do you need help?."; + menu "Heal Please",L_Heal,"Leave",L_Leave; + + L_Heal: + Heal 32500,32500; + close; + + L_Leave: + warp "prontera.gat",156,179; + close; +} + +// ---- Monsters for the MVP-Arena + +// --- Alpha-MVP Maps +// --- First Alpha-MVP area +pvp_n_1-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000 +pvp_n_1-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000 +// --- Second Alpha-MVP area +pvp_n_2-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_2-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +// --- Third Alpha-MVP area +pvp_n_3-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000 +pvp_n_3-2.gat,0,0,0,0 monster Moonlight 1150,2,60000,66000 +pvp_n_3-2.gat,0,0,0,0 monster Maya 1147,1,60000,66000 +// --- Fourth Alpha-MVP area +pvp_n_4-2.gat,0,0,0,0 monster Eddga 1115,1,60000,66000 +pvp_n_4-2.gat,0,0,0,0 monster Mistress 1059,1,60000,66000 +pvp_n_4-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +pvp_n_4-2.gat,0,0,0,0 monster Maya 1147,1,60000,66000 +// --- Fifth Alpha-MVP area +pvp_n_5-2.gat,0,0,0,0 monster Eddga 1115,1,60000,66000 +pvp_n_5-2.gat,0,0,0,0 monster Mistress 1059,2,60000,66000 +pvp_n_5-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +pvp_n_5-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000 +// --- Sixth Alpha-MVP area +pvp_n_6-2.gat,0,0,0,0 monster Eddga 1115,2,60000,66000 +pvp_n_6-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_6-2.gat,0,0,0,0 monster Moonlight 1150,1,60000,66000 +pvp_n_6-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000 +// --- Seventh Alpha-MVP area +pvp_n_7-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000 +pvp_n_7-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_7-2.gat,0,0,0,0 monster Moonlight 1150,2,60000,66000 +pvp_n_7-2.gat,0,0,0,0 monster Maya 1147,2,60000,66000 +// --- Eighth Alpha-MVP area +pvp_n_8-2.gat,0,0,0,0 monster Eddga 1115,3,60000,66000 +pvp_n_8-2.gat,0,0,0,0 monster Mistress 1059,3,60000,66000 +pvp_n_8-2.gat,0,0,0,0 monster Moonlight 1150,3,60000,66000 +pvp_n_8-2.gat,0,0,0,0 monster Maya 1147,3,60000,66000 + +// --- Beta-MVP Maps +// --- First Beta-MVP area +pvp_n_1-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000 +pvp_n_1-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +// --- Second Beta-MVP area +pvp_n_2-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_2-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000 +// --- Third Beta-MVP area +pvp_n_3-3.gat,0,0,0,0 monster Phreeoni 1159,1,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000 +pvp_n_3-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000 +// --- Fourth Beta-MVP area +pvp_n_4-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000 +pvp_n_4-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_4-3.gat,0,0,0,0 monster Orc Hero 1087,1,60000,66000 +pvp_n_4-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000 +// --- Fifth Beta-MVP area +pvp_n_5-3.gat,0,0,0,0 monster Phreeoni 1159,1,60000,66000 +pvp_n_5-3.gat,0,0,0,0 monster Turtle General 1312,2,60000,66000 +pvp_n_5-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000 +pvp_n_5-3.gat,0,0,0,0 monster Orc Lord 1190,1,60000,66000 +// --- Sixth Beta-MVP area +pvp_n_6-3.gat,0,0,0,0 monster Phreeoni 1159,2,60000,66000 +pvp_n_6-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_6-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000 +pvp_n_6-3.gat,0,0,0,0 monster Orc Lord 1190,2,60000,66000 +// --- Seventh Beta-MVP area +pvp_n_7-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000 +pvp_n_7-3.gat,0,0,0,0 monster Turtle General 1312,1,60000,66000 +pvp_n_7-3.gat,0,0,0,0 monster Orc Hero 1087,2,60000,66000 +pvp_n_7-3.gat,0,0,0,0 monster Orc Lord 1190,3,60000,66000 +// --- Eighth Beta-MVP area +pvp_n_8-3.gat,0,0,0,0 monster Phreeoni 1159,3,60000,66000 +pvp_n_8-3.gat,0,0,0,0 monster Turtle General 1312,3,60000,66000 +pvp_n_8-3.gat,0,0,0,0 monster Orc Hero 1087,3,60000,66000 +pvp_n_8-3.gat,0,0,0,0 monster Orc Lord 1190,3,60000,66000 + +// --- Theta-MVP Maps +// --- First Theta-MVP area +pvp_n_1-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_1-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +// --- Second Theta-MVP area +pvp_n_2-4.gat,0,0,0,0 monster Drake 1112,2,60000,66000 +pvp_n_2-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +pvp_n_2-4.gat,0,0,0,0 monster Doppelganger 1046,1,60000,66000 +// --- Third Theta-MVP area +pvp_n_3-4.gat,0,0,0,0 monster Drake 1112,1,60000,66000 +pvp_n_3-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +pvp_n_3-4.gat,0,0,0,0 monster Doppelganger 1046,1,60000,66000 +pvp_n_3-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000 +// --- Fourth Theta-MVP area +pvp_n_4-4.gat,0,0,0,0 monster Drake 1112,2,60000,66000 +pvp_n_4-4.gat,0,0,0,0 monster Osiris 1038,1,60000,66000 +pvp_n_4-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000 +pvp_n_4-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000 +// --- Fifth Theta-MVP area +pvp_n_5-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_5-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000 +pvp_n_5-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000 +pvp_n_5-4.gat,0,0,0,0 monster Lord of Death 1373,1,60000,66000 +// --- Sixth Theta-MVP area +pvp_n_6-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_6-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000 +pvp_n_6-4.gat,0,0,0,0 monster Doppelganger 1046,2,60000,66000 +pvp_n_6-4.gat,0,0,0,0 monster Lord of Death 1373,2,60000,66000 +// --- Seventh Theta-MVP area +pvp_n_7-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_7-4.gat,0,0,0,0 monster Osiris 1038,2,60000,66000 +pvp_n_7-4.gat,0,0,0,0 monster Doppelganger 1046,3,60000,66000 +pvp_n_7-4.gat,0,0,0,0 monster Lord of Death 1373,2,60000,66000 +// --- Eighth Theta-MVP area +pvp_n_8-4.gat,0,0,0,0 monster Drake 1112,3,60000,66000 +pvp_n_8-4.gat,0,0,0,0 monster Osiris 1038,3,60000,66000 +pvp_n_8-4.gat,0,0,0,0 monster Doppelganger 1046,3,60000,66000 +pvp_n_8-4.gat,0,0,0,0 monster Lord of Death 1373,3,60000,66000 + +// --- Epsilon-MVP Maps +// --- First Epsilon-MVP area +pvp_n_1-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000 +pvp_n_1-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_2-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_2-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +pvp_n_2-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_3-5.gat,0,0,0,0 monster Incantation Samurai 1492,1,60000,66000 +pvp_n_3-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +pvp_n_3-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000 +pvp_n_3-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_4-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000 +pvp_n_4-5.gat,0,0,0,0 monster Pharoh 1157,1,60000,66000 +pvp_n_4-5.gat,0,0,0,0 monster Dark Lord 1272,1,60000,66000 +pvp_n_4-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_5-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_5-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_5-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_5-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_6-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_6-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_6-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_6-5.gat,0,0,0,0 monster Baphomet 1039,1,60000,66000 +// --- First Epsilon-MVP area +pvp_n_7-5.gat,0,0,0,0 monster Incantation Samurai 1492,2,60000,66000 +pvp_n_7-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_7-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_7-5.gat,0,0,0,0 monster Baphomet 1039,2,60000,66000 +// --- First Epsilon-MVP area +pvp_n_8-5.gat,0,0,0,0 monster Incantation Samurai 1492,3,60000,66000 +pvp_n_8-5.gat,0,0,0,0 monster Pharoh 1157,2,60000,66000 +pvp_n_8-5.gat,0,0,0,0 monster Dark Lord 1272,2,60000,66000 +pvp_n_8-5.gat,0,0,0,0 monster Baphomet 1039,2,60000,66000 diff --git a/npc/other/bank.txt b/npc/other/bank.txt new file mode 100644 index 000000000..ae8ce7829 --- /dev/null +++ b/npc/other/bank.txt @@ -0,0 +1,126 @@ +//===== eAthena Script ======================================= +//= Banker Script +//===== By: ================================================== +//= Syrus22 (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any eAthena version with Account variables. +//===== Description: ========================================= +//= An account wide Banker to store Zeny +//===== Additional Comments: ================================= +//= Syrus22 - There's an optional transaction fee at the top of +//= the script. To use it simply change the first set command +//= to set the cost variable to whatever you want the fee to be. +//============================================================ +prontera.gat,132,217,5 script Banker 109,{ +set @cost,0; +mes "[Banker]"; +mes "Welcome to the First Bank of Prontera. How can I help you today?"; +next; +menu "I'd like to make a deposit.",Ldeposit,"I'd like to make a withdrawl.",Lwithdrawl,"What's my current balance?",Lbalance,"Cancel",Lcancel; + +Ldeposit: + mes "[Banker]"; + mes "Very well... How much would you like to deposit? The maximum you can deposit at once is 999,999 Zeny."; + next; + if (@cost > 0) goto Ldepocost; + goto Ldepocont; + + Ldepocost: + mes "[Banker]"; + mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions."; + next; + goto Ldepocont; + +Ldepocont: + input @deposit; + if (@deposit < 1) goto Lrealamount; + if (@deposit > Zeny) goto Lneedzeny; + if (@deposit > (Zeny - @cost)) goto Lneedzeny2; + set Zeny,Zeny - @deposit; + set Zeny,Zeny - @cost; + set #bankstorage,#bankstorage + @deposit; + mes "[Banker]"; + mes "Thank you very much... Your zeny is in good hands."; + close; + +Lwithdrawl: + mes "[Banker]"; + mes "Very well... How much would you like to withdraw? The maximum you can withdraw at one time is 999,999 Zeny"; + next; + if (@cost > 0) goto Lwithcost; + goto Lwithcont; + + Lwithcost: + mes "[Banker]"; + mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions."; + next; + goto Lwithcont; + +Lwithcont: + input @withdrawl; + if (@withdrawl < 1) goto Lrealamount; + if (@withdrawl > #bankstorage) goto Lneedzeny3; + if ((@cost > Zeny) && ((Zeny + @withdrawl) > @cost)) goto Lcostask; + if (@cost > Zeny) goto Lneedzeny2; + goto Lwithcont2; + + Lcostask: + mes "[Banker]"; + mes "You don't have the Zeny for the transaction fee right now. Would you like me to take the fee directly from your withdrawl?"; + next; + menu "Yes please.",Lwithtake,"No thank you.",Lcancel; + + Lwithtake: + mes "[Banker]"; + mes "Ok then."; + set @withdrawl,@withdrawl - @cost; + set #bankstorage,#bankstorage - @cost; + set @cost,0; + next; + goto Lwithcont2; + +Lwithcont2: + set Zeny,Zeny - @cost; + set Zeny,Zeny + @withdrawl; + set #bankstorage,#bankstorage - @withdrawl; + mes "[Banker]"; + mes "There's your Zeny. Have a good day."; + close; + +Lbalance: + mes "[Banker]"; + mes "Hmmmm lemme check the paper work."; + next; + mes "*Rustle, Rustle*"; + next; + mes "[Banker]"; + mes "You currently have " + #bankstorage + " Zeny in your account."; + close; + +Lrealamount: + mes "[Banker]"; + mes "Don't play jokes with me please. Next time ask for a real amount."; + close; + +Lneedzeny: + mes "[Banker]"; + mes "You don't have enough Zeny to make that deposit."; + close; + +Lneedzeny2: + mes "[Banker]"; + mes "You don't have enough Zeny to cover the transaction fee."; + close; + +Lneedzeny3: + mes "[Banker]"; + mes "You don't have enough Zeny in your account."; + close; + +Lcancel: + mes "[Banker]"; + mes "Very well... come again soon."; + close; +} \ No newline at end of file diff --git a/npc/other/books.txt b/npc/other/books.txt new file mode 100644 index 000000000..ece0e4d63 --- /dev/null +++ b/npc/other/books.txt @@ -0,0 +1,2291 @@ +// $Id: books.txt,v 1.1.1.1 2004/09/10 17:26:42 MagicalTux Exp $ +// Changed Mage Guild Book to the correct one (now located in mage.txt) +//<--------------- NPCs BOOKS [Update: July. 27, 2004] --------------->\\ + +//<=========== Library - Begin ==========>\\ +prt_in.gat,159,56,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Monster Encyclopedia]^000000"; + mes "This is a Monster Encyclopedia including information of Earth,Fire,Neutral Monsters!"; + next; + menu "Monsters of Earth Property",MonEarPro,"Monsters of Fire Property",MonFirPro,"Monsters of Neutral Property",MonNeuPro,"Cancel",Cancel; + + MonEarPro: + menu "Small Size Monster",SmaMonEarPro,"Medium Size Monster",MedMonEarPro,"Great Size Monster",GrMonEarPro,"Cancel",EndMonEarPro; + + SmaMonEarPro: + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "1.Fabre"; + mes "Larva of Creamy. It is cute when it wiggles,even though it is a weak and small monster,"; + mes "People often tend to slay Fabres,only for the reason they can get `Feather's,one of required items for `Bunny Band'."; + mes "^0099FFFound Items^000000: Feather.Fluff .Green Herb.Clover"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "2.Pupa"; + mes "Monster on the Fabre's pupal stage. It deosn't attack at all, so easy to kill for Novice people."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "3.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "3.Savage Bebe"; + mes "Tiny Pink baby of Savage.Unlike its small size, It is running about fields making annoying noise."; + mes "^0099FFFound Items^000000: Leather,Meat,Arrow,Feather"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "4.Andre"; + mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "5.Coco"; + mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson."; + mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "6.Piere"; + mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "7.Smokie"; + mes "It's working out all the time.Often tries to shapeshift with Raccon Leaves,but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up."; + mes "^0099FFFound Items^000000: Raccon Leaf,Leather,Sweet Potato"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "8.Deniro"; + mes "A kind of Work Ants, tend to group in a same kind as well as other ants."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "9.Yoyo"; + mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative, you must be cautious of being attacked by a group."; + mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "10.Vitata"; + mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey."; + mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "11.Caramel"; + mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately."; + mes "^0099FFFound Items^000000: Porcupine Quill,Leather"; + next; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "12.Giearth"; + mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners."; + mes "^0099FFFound Items^000000: Old Pixie's Moustache"; + next; + goto MonEarPro; + close; + MedMonEarPro: + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "1.Willow"; + mes "Creature reborn from a Gigantic Old Tree.Everything like the feagure or the sound to related it is eerie."; + mes "^0099FFFound Items^000000: Tree Root,Trunk,Red Herb,Sweet Potato"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "2.Rocker"; + mes "Lazy Grasshpper which loves playing Violin."; + mes "^0099FFFound Items^000000: Grasshopper's Leg,Jellopy"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "3.Madragora"; + mes "Stays the same but attacks passengers using Stalks under the ground. Look so Horrible,also attacks Very annoyingly."; + mes "^0099FFFound Items^000000: Stem,Green Herb,Shoot"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "4.Wolf"; + mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch."; + mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "5.Snake"; + mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful."; + mes "^0099FFFound Items^000000: Snake Scale,Red Herb"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "6.Horn"; + mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound."; + mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "7.Orc Warrior"; + mes "Self-Confident Warrior of the Orc Tribe."; + mes "^0099FFFound Items^000000:Orcish Voucher"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "8.Hode"; + mes "Huge earthworm without any more description.Huge earthworm!Usually conceals itself under the ground,commonly found in the Desert."; + mes "^0099FFFound Items^000000: Earthworm Peeling,Sticky Muscus"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "9.Mantis"; + mes "It wanders about the field waving a tiny fan."; + mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "10.Savage"; + mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one."; + mes "^0099FFFound Items^000000: Mane,Leather"; + next; + mes "^FF0000[Earth,Medium Monster Encyclopedia]^000000"; + mes "11.Petite"; + mes "Tiny little Walking Dragon.It seems like there exists 2 different kinds of Petite, flying one and walking one and this is the 2nd one."; + mes "^0099FFFound Items^000000: Dragon Canine,Dragon Tail,Zargon"; + next; + goto MonEarPro; + close; + GrMonEarPro: + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "1.Worm Tail"; + mes "Tiny little creature of light green which has a spiky,thin and long stick on the back.Usually it is very gentle but attacks using the stick on the back when got attacked,so be careful!"; + mes "^0099FFFound Items^000000: Pointed Scale,Yellow Herb"; + next; + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "2.Muka"; + mes "Cute Cactus commonly found in the Desert.It tries to threaten passengers with some funny sound but always failed."; + mes "^0099FFFound Items^000000: Cactus Needle,Empty Bottle,Green Herb,Red Herb"; + next; + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "3.Big Foot"; + mes "Dull-Looking Bear with a huge build.Although it looks dumb but you will realise how it can be fast after you provoke it."; + mes "^0099FFFound Items^000000: Bear's Foot Skin,Leather,Sweet Potato"; + next; + mes "^FF0000[Earth,Great Monster Encyclopedia]^000000"; + mes "4.Flora"; + mes "Maneater with a big mouth.It pretends just a simple plant but anybody coming near,it rushes into him fiercely."; + mes "^0099FFFound Items^000000: Maneater Blossom,Stem"; + next; + goto MonEarPro; + close; + EndMonEarPro: + close; + close; + MonFirPro: + menu "Small Size Monster",SmaMonFirPro,"Medium Size Monster",MedMonFirPro,"Great Size Monster",GrMonFirPro,"Cancel",EndMonFirPro; + + SmaMonFirPro: + mes "^FF0000[Fire,Small Monster Encyclopedia]^000000"; + mes "1.Picky"; + mes "Cute little chick before Peco Peco. It can't be realised that this little creature grows into a Peco Peco the big,strong bird."; + mes "Sometimes you can find a picky with an egg shell which is a bit stronger than a normal picky."; + mes "^0099FFFound Items^000000: Feather of Birds.Feather.Red Herb.Milk."; + next; + mes "^FF0000[Fire,Small Monster Encyclopedia]^000000"; + mes "2.Baby Desert Wolf"; + mes "Baby of Desert Wolf,trying to threaten passengers with a big bay."; + mes "If you want to pat one of them,because you think it is pretty,don't do that before taking a look around enough.Not babies come to rush you but their parents will assault you at the same time.Parents don't want thier babies being harmed."; + mes "^0099FFFound Items^000000: Leather,Meat"; + next; + mes "^FF0000[Fire,Small Monster Encyclopedia]^000000"; + mes "3.Horong"; + mes "Eerie-looking fireball of violet colour.Recognises the living when gets near."; + mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow"; + next; + goto MonFirPro; + close; + MedMonFirPro: + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "1.Drops"; + mes "A kind of Poring,but commonly found in the Desert and colors in Pale Orange.It eats everything just like Poring does."; + mes "However it seems to be a bit stronger than Poring anyway."; + mes "^0099FFFound Items^000000: Jellopy,Sticky Muscus,Apple,Empty Bottle,Red Herb"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "2.Elder Willow"; + mes "A kind of Willow but it looks older and colors in red. Frightening as much as Willow."; + + mes "^0099FFFound Items^000000: Resin,Trunk,Sweet Potato"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "3.Metaller"; + mes "Evolved one of Rocker.It is dim brown and lives in the Desert.Lazy equally to Rocker,but it steals stuffs on the ground."; + mes "^0099FFFound Items^000000: Red Blood,Grasshopper's Leg,Scell,Shell"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "4.Zerom"; + mes "Undead Slave who had been extremely abused before he died.He is wandering in the Sphinx,carrying a big box on the back.."; + mes "^0099FFFound Items^000000: Panties"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "5.Scorpion"; + mes "Scorpion spreaded over the Desert.It is dangerous as much as its beautiful colour.Watch out its sharp tail."; + mes "^0099FFFound Items^000000: Scorpion Tail,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "6.Desert Wolf"; + mes "Wolf commonly found in the desert,which is stronger than a Forest one.Take a look around before doing attacks,because Wolf tends to be cooperative each other!"; + mes "^0099FFFound Items^000000: Leather,Mink Coat,Meat,Wolf Claw"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "7.Frilldora"; + mes "Lizard which has a Unique neck.Looks a bit funny but is very Strong unlike its appearance."; + mes "^0099FFFound Items^000000: Frill,Reptile Tongue,Red Potion,Zargon"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "8.Cobold the 3rd"; + mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers."; + mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion"; + next; + mes "^FF0000[Fire,Medium Monster Encyclopedia]^000000"; + mes "9.Jakk"; + mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone."; + mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon"; + next; + goto MonFirPro; + close; + GrMonFirPro: + mes "^FF0000[Fire,Great Monster Encyclopedia]^000000"; + mes "1.Peco Peco"; + mes "Nowadays peco peco is popular as vehicle for knights. They lives in the Desert or Forest and also cooperative."; + mes "^0099FFFound Items^000000: Bill of Birds,Yellow Herb,Red Herb"; + next; + mes "^FF0000[Fire,Great Monster Encyclopedia]^000000"; + mes "2.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + goto MonFirPro; + close; + EndMonFirPro: + close; + close; + MonNeuPro: + menu "Small Size Monster",SmaMonNeuPro,"Medium Size Monster",MedMonNeuPro,"Great Size Monster",GrMonNeuPro,"Cancel",EndMonNeuPro; + + SmaMonNeuPro: + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "1.Lunatic"; + mes "Plump and shaggy monster shaped in Rabbit.However it won't give you a `Bunny Band'."; + mes "^0099FFFound Items^000000: Clover,Feather,Carrot,Red Herb"; + next; + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "2.Peco Peco Egg"; + mes "Egg of Peco Peco.It is so tiny that doesn't look like an egg of Big Bird.Novice people love to Crack it because it doesn't attack at all."; + mes "^0099FFFound Items^000000: Shell,Red Potion,Empty Bottle"; + next; + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "3.Ant Egg"; + mes "Simple Ant Egg."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle"; + next; + mes "^FF0000[Neutral,Small Monster Encyclopedia]^000000"; + mes "2.Baby Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + goto MonNeuPro; + close; + MedMonNeuPro: + mes "^FF0000[Neutral,Medium Monster Encyclopedia]^000000"; + mes "Unfortunately there is no medium monster of Neutral property which has been discovered so far."; + next; + goto MonNeuPro; + close; + GrMonNeuPro: + mes "^FF0000[Neutral,Great Monster Encyclopedia]^000000"; + mes "1.Golem"; + mes "Living Stone wich has spell-bound by Black Magic.Its gigantic body makes its moving slow.Recognises Magic Spell Casting."; + mes "^0099FFFound Items^000000: Scell"; + next; + goto MonNeuPro; + close; + EndMonNeuPro: + close; + close; + Cancel: + close; +} + +prt_in.gat,161,50,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Monster Encyclopedia]^000000"; + mes "This is a Monster Encyclopedia including Monsters of Dark,Poison and Undead Property!"; + next; + menu "Monster of Dark Property",MonDrkPro,"Monster of Poison Property",MonPsoPro,"Monster of Undead Property",MonUndPro,"Cancel",Cancel; + + MonDrkPro: + menu "Small Size Monster",SmaMonDrkPro,"Medium Size Monster",MedMonDrkPro,"Great Size Monster",GrMonDrkPro,"Cancel",EndMonDrkPro; + + SmaMonDrkPro: + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "2.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "3.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "4.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "5.Dokkaebi"; + mes "Korean Traditional Ghost with Dark Skin. It looks so cute and has a small horn on the head."; + mes "^0099FFFound Items^000000: Dokkaebi Horn"; + next; + mes "^FF0000[Dark,Small Monster Encyclopedia]^000000"; + mes "6.Deviruchi"; + mes "Little evil creature,which carries a cute fork with."; + mes "^0099FFFound Items^000000: Little Evil Horn,Little Evil Wing,Zargon"; + next; + goto MonDrkPro; + close; + MedMonDrkPro: + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "1.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "2.Male Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler,Yellow Herb"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "3.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "4.Zenorc"; + mes "Mutent Orc with a small and short build.It moves around using both hands and feet. It owns High AGI stat,so that it passes off almost every attack."; + mes "^0099FFFound Items^000000: Znorc's Fang,Sticky Muscus,Yellow Potion"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "5.Requiem"; + mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back."; + mes "^0099FFFound Items^000000: Mystic Blue Box"; + next; + mes "^FF0000[Dark,Medium Monster Encyclopedia]^000000"; + mes "6.Bathory"; + mes "Witch with a big wen on the nose.She rides on her magic broom flying around in the air."; + mes "^0099FFFound Items^000000: Witched Starsand"; + next; + goto MonDrkPro; + close; + GrMonDrkPro: + mes "^FF0000[Dark,Great Monster Encyclopedia]^000000"; + mes "1.Isis."; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + mes "^FF0000[Dark,Great Monster Encyclopedia]^000000"; + mes "3.Raydric"; + mes "Ghost Knight of misfortune."; + mes "^0099FFFound Items^000000: Elunium,Chivarly Emblem"; + next; + goto MonDrkPro; + close; + EndMonDrkPro: + close; + close; + MonPsoPro: + menu "Small Size Monster",SmaMonPsoPro,"Medium Size Monster",MedMonPsoPro,"Great Size Monster",GrMonPsoPro,"Cancel",EndMonPsoPro; + + SmaMonPsoPro: + mes "^FF0000[Poison,Small Monster Encyclopedia]^000000"; + mes "Unfortunately there is no small monster of Poison Property which has been discovered so far."; + next; + goto MonPsoPro; + close; + MedMonPsoPro: + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "1.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "2.Poison Spore"; + mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items^000000: Spore,Green Herb"; + next; + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "3.Cobold the 2nd"; + mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers."; + mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion"; + next; + mes "^FF0000[Poison,Medium Monster Encyclopedia]^000000"; + mes "4.Side Winder"; + mes "Horrendous Snake of Dark colour."; + mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale"; + next; + goto MonPsoPro; + close; + GrMonPsoPro: + mes "^FF0000[Poison,Great Monster Encyclopedia]^000000"; + mes "1.Argos"; + mes "Big Spider of Dark colour.It often invades passangers who intend to go over Mt.Mjornir. Be cautious of Argos,if you are the one of those passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Poison,Great Monster Encyclopedia]^000000"; + mes "2.Argiope"; + mes "Monster crawling around with several articular legs."; + mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb"; + next; + mes "^FF0000[Poison,Great Monster Encyclopedia]^000000"; + mes "4.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + goto MonPsoPro; + close; + EndMonPsoPro: + close; + close; + MonUndPro: + menu "Small Size Monster",SmaMonUndPro,"Medium Size Monster",MedMonUndPro,"Great Size Monster",GrMonUndPro,"Cancel",EndMonUndPro; + + SmaMonUndPro: + mes "^FF0000[Undead,Small Monster Encyclopedia]^000000"; + mes "Unfortunately there is no small monster of Undead Property which has been discovered so far."; + next; + goto MonUndPro; + close; + MedMonUndPro: + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "1.Zombie"; + mes "Bad Case of the Dead which has been reborn as a Walking Corpse by Back magic.Let's lead it to Nirvana."; + mes "^0099FFFound Items^000000: Decayed Nail,Sticky Muscus,Horrendous Mouth"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "2.Megalodon"; + mes "Skeleton Fish having spooky empty eye-holes."; + mes "^0099FFFound Items^000000: Stinky Scale,Skel-Bone"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "3.Orc Zombie"; + mes "Corpes of the Orc which has been given a new life by Black magic."; + mes "^0099FFFound Items^000000: Orc Claw,Sticky Muscus"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "4.Pirate Skel"; + mes "Walking Corpse of a Pirate which had ordered all over the Sea."; + mes "^0099FFFound Items^000000: Skel-Bone"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "5.Orc Skeleton"; + mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried."; + mes "^0099FFFound Items^000000: Orc's Fang,Green Potion"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "6.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "7.Munak"; + mes "Pretty-looking Female corpse which had been frozen for a long time.She looks like holding a long story deep inside, the story people want to know about.Anyway Don't give her a break,she'll give strong damages on you."; + mes "^0099FFFound Items^000000: Daenggie ,Munak Turban"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "8.Skel Worker"; + mes "Walking Skeletion which was dead in a mine."; + mes "^0099FFFound Items^000000: Iron,Lantern"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "9.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "10.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "11.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + mes "^FF0000[Undead,Medium Monster Encyclopedia]^000000"; + mes "12.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + goto MonUndPro; + close; + GrMonUndPro: + mes "^FF0000[Undead,Great Monster Encyclopedia]^000000"; + mes "3.Evil Druid"; + mes "You'll shudder even once looking at it."; + mes "^0099FFFound Items^000000: Amulet,White Herb"; + next; + goto MonUndPro; + close; + EndMonUndPro: + close; + close; + Cancel: + close; +} + +prt_in.gat,162,68,4 script `Merchant Guideline' for Dummies 111,{ + mes "^FF0000[`Merchant Guideline' for Dummies]^000000"; + mes "Please go over the next page if you want to check `Vending'."; + next; + menu "Go over the next page",NextPage,"Close the book",CloseB; + + NextPage: + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "To Vend a Shop,first you must equip a ^0099FFCart^000000."; + mes "You can rent a cart from Kafra.When equipped once,it won't be disappeared as long as you don't take off."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "However,this cart diminishes moving speed.You can recover moving speed after learning `Push Cart' the skill."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "When learn `Push Cart' over 3 points,it will allow you to learn `Vending'.You can display 3 kinds of item on your shop with Vending at first."; + mes "As Vending skill goes higher, it will allow you to display more items."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "Let's store things you want to sell in the Cart."; + mes "To open Cart Window,Use ^0099FFalt+W^000000 as hotkey.Or it will be open when you click `Item' icon on equipment(alt+Q) window."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "Now Use `Vending' skill.2 kinds of Window-`Item Shop' and `Item you want to sell'- will pop up."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "On `Item Shop' window,name your shop.Then Drag items onto `Item you want to sell' window and Fix the price."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "When close `My Shop' window,your shop will be closed.You can check each price of items with a mouse on the items. Meanwhile it keeps being recorded on Chat window how many items or which kind have been sold."; + next; + mes "^FF0000[Vending Guide for Dummies]^000000"; + mes "When everything's sold out,the shop will be closed automatically."; + close; + CloseB: + close; +} + +prt_in.gat,164,96,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "This is an Encyclopedia describing Monsters living in Dungeons."; + next; + next; + menu "Orc Dungeon",OrcDung,"Byalan Cave near Izlude",ByaCave,"Prontera Culvert",PrtCul; + + OrcDung: + menu "F1",OrcDungF1,"F2",OrcDungF2,"Cancel",EndOrcDung; + + OrcDungF1: + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "1.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "2.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "3.Orc Zombie"; + mes "Corpes of the Orc which has been given a new life by Black magic."; + mes "^0099FFFound Items^000000: Orc Claw,Sticky Muscus"; + next; + mes "^FF0000[Orc Dungeon 1F Monster Encyclopedia]^000000"; + mes "4.Orc Skeleton"; + mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried."; + mes "^0099FFFound Items^000000: Orc's Fang,Green Potion"; + next; + goto OrcDung; + close; + OrcDungF2: + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "1.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "2.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "3.Orc Skeleton"; + mes "Ancient Living Skeleton of the Orc which had been buried for a long time.It has Great Power as well as the period of being buried."; + mes "^0099FFFound Items^000000: Orc's Fang,Green Potion"; + next; + mes "^FF0000[Orc Dungeon 2F Monster Encyclopedia]^000000"; + mes "4.Zenorc"; + mes "Mutent Orc with a small and short build.It moves around using both hands and feet. It owns High AGI stat,so that it passes off almost every attack."; + mes "^0099FFFound Items^000000: Znorc's Fang,Sticky Muscus,Yellow Potion"; + next; + goto OrcDung; + close; + EndOrcDung: + close; + close; + ByaCave: + menu "1F",ByaCaveF1,"2F",ByaCaveF2,"3F",ByaCaveF3,"4F",ByaCaveF4,"5F",ByaCaveF5,"Cancel",EndByaCave; + + ByaCaveF1: + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "1.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "2.Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items^000000: Worm Peeling.Garlet.Monster's Feed.Red Herb.Insect Feeler"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "3.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "4.Vadon"; + mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite.Be careful anyway."; + mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell"; + next; + mes "^FF0000[Byalan Cave 1F Monster Encyclopedia]^000000"; + mes "5.Marina"; + mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water."; + mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus"; + next; + goto ByaCave; + close; + ByaCaveF2: + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "1.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "2.Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items^000000: Worm Peeling.Garlet.Monster's Feed.Red Herb.Insect Feeler"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "3.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "4.Vadon"; + mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite.Be careful anyway."; + mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "5.Marina"; + mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water."; + mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus"; + next; + mes "^FF0000[Byalan Cave 2F Monster Encyclopedia]^000000"; + mes "6.Thara Frog"; + mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot"; + next; + goto ByaCave; + close; + ByaCaveF3: + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "1.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "2.Thara Frog"; + mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "3.Cornutus"; + mes "Some buddies concealing themselves within hard turban shells and try to lead a quiet life."; + mes "^0099FFFound Items^000000: Conch.Scell.Solid Shell"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "4.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Byalan Cave 3F Monster Encyclopedia]^000000"; + mes "5.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + goto ByaCave; + close; + ByaCaveF4: + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "1.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "2.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "3.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "4.Marine Sphere"; + mes "Strange, round-shaped monsters beating so fast that they seem like they will burst."; + mes "^0099FFFound Items^000000: Tendon.Detonator"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "5.Phen"; + mes "Fish of blue color which is kicking and definitely alive."; + mes "^0099FFFound Items^000000: Fish Tail,Sharp Scale,Meat,Fin"; + next; + mes "^FF0000[Byalan Cave 4F Monster Encyclopedia]^000000"; + mes "6.Sword Fish"; + mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters."; + mes "^0099FFFound Items^000000: Sharp Scale,Gill"; + next; + goto ByaCave; + close; + ByaCaveF5: + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "1.Marine Sphere"; + mes "Strange, round-shaped monsters beating so fast that they seem like they will burst."; + mes "^0099FFFound Items^000000: Tendon.Detonator"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "2.Sword Fish"; + mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters."; + mes "^0099FFFound Items^000000: Sharp Scale,Gill"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "3.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "4.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "5.Marc"; + mes "Sea Horse. Don't ever think about riding a Sea Horse!"; + mes "^0099FFFound Items^000000: Gill,Fin"; + next; + mes "^FF0000[Byalan Cave 5F Monster Encyclopedia]^000000"; + mes "6.Strouf"; + mes "Fish rarely seen under the deep sea."; + mes "^0099FFFound Items^000000: Fin,Feather,Gill"; + next; + goto ByaCave; + close; + EndByaCave: + close; + close; + PrtCul: + menu "1F",PrtCulF1,"2F",PrtCulF2,"3F",PrtCulF3,"4F",PrtCulF4,"Cancel",EndPrtCul; + + PrtCulF1: + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "3.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "4.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Prontera Culvert 1F Monster Encyclopedia]^000000"; + mes "5.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + goto PrtCul; + close; + PrtCulF2: + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "3.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "4.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "5.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "6.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell.Garlet.Sticky Muscus.Empty Bottle"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "7.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle.Sticky Muscus.Meat"; + next; + mes "^FF0000[Prontera Culvert 2F Monster Encyclopedia]^000000"; + mes "8.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + goto PrtCul; + close; + PrtCulF3: + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "3.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "4.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "5.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Prontera Culvert 3F Monster Encyclopedia]^000000"; + mes "6.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + goto PrtCul; + close; + PrtCulF4: + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "1.Thief Bug Egg"; + mes "Egg of Filthy Bug.Let's cut off the evil at its root."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "2.Thief Bug Baby"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "3.Female Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "4.Male Thief Bug"; + mes "Dirty and filthy Creatures having a strong solidarity with the same kind, eat everything on the ground as well.They are sorted into 3 kinds by the Size and Colour."; + mes "^0099FFFound Items^000000: Worm Peeling,Red Herb,Jellopy,Garlet.Insect Feeler,Yellow Herb"; + next; + mes "^FF0000[Prontera Culvert 4F Monster Encyclopedia]^000000"; + mes "5.Golden Thief Bug"; + mes "Impertinent Thief Bug of Golden Colour,wearing a solid shell all around the body.It's rarely seen by human's eye."; + mes "^0099FFFound Items^000000: Blue Herb,Gold,Ora Ora,Insect Feeler"; + next; + goto PrtCul; + close; + EndPrtCul: + close; + close; + Cancel: + close; +} + +prt_in.gat,164,102,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "The is an Encyclopedia describing Monsters living in Dungeons."; + next; + menu "Sunken ship near Alberta",SunkShip,"Prontera Maze",PrtMaze; + + SunkShip: + menu "F1",SunkShipF1,"F2",SunkShipF2,"Cancel",EndSunkShip; + + SunkShipF1: + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "1. Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with serveral projections."; + mes "^0099FFFound Items:^000000 Single Cell. Garlet. Sticky Mocus. Empty Bottle"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "2. Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items:^000000 Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "3. Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items:^000000 Tentacles. Sticky Mocus. Meat"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "4. Poporing"; + mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger."; + mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "5. Poison Spore"; + mes "Poisonous Spore in Violet. Besides, it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items:^000000 Spore. Green Herb"; + next; + mes "^FF0000[Sunken Ship 1F Monster Encyclopedia]^000000"; + mes "6. Pirate Skel"; + mes "Walking Corpse of a Pirate which had ordered all over the Sea."; + mes "^0099FFFound Items:^000000 Skel-Bone"; + next; + goto SunkShip; + close; + SunkShipF2: + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "1. Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items:^000000 Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "2. Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be in the ass. It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items:^000000 Tentacles. Sticky Mocus. Meat"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "3. Poporing"; + mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger."; + mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "4. Thara Frogs"; + mes "Frogs of red color, surely stonger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items:^000000 Spawn. Scell. Skicky Webfoot"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "5. Whisper"; + mes "Living Fabric, which gives spooking feeling."; + mes "^0099FFFound Items:^000000 Fabric"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "6. Megalodon"; + mes "Skeleton Fish having spooky empty eye-holes."; + mes "^0099FFFound Items:^000000 Skinky Scale. Skel-Bone"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "7. Pirate Skel"; + mes "Walking Corpse of a Pirate which had ordered all over the Sea."; + mes "^0099FFFound Items:^000000 Skel-Bone"; + next; + mes "^FF0000[Sunken Ship 2F Monster Encyclopedia]^000000"; + mes "8. Marionette"; + mes "Monster reborn from bewitched Doll, bound to strings on Wooden Sticks."; + mes "^0099FFFound Items:^000000 Skinky Golden Hair, Trunk"; + next; + mes "9. Drake"; + mes "Awfully Strong Monster which looks like the Captain of this Sunken Ship."; + mes "^0099FFFound Items:^000000 Skel-Bone. White"; + next; + goto SunkShip; + close; + EndSunkShip: + close; + PrtMaze: + menu "F1",PrtMazeF1,"F3",PrtMazeF3,"Cancel",EndPrtMaze; + + PrtMazeF1: + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "1. Poring"; + mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped."; + mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry. They are not strong, and you will get your back once you kill the monster, which eat your stuff."; + mes "^0099FFFound Items:^000000 Jellopy. Skicky Mocus. Apple. Empty Bottle. Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "2. Lunatic"; + mes "Plump and shaggy monster shaped in Rabbit. However it won't give you `Bunny Band'."; + mes "^0099FFFound Items:^000000 Clover. Feather. Carrot. Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "3. Fabre"; + mes "Larva of Creamy. It is cute when it wiggles, even though it is a weak and small monster,"; + mes "People often tends to slay Fabres, only for the reason they can get `Feather's', one of required items for `Bunny Band'."; + mes "^0099FFFound Items:^000000 Fluff. Feather. Green Herb. Clover"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "4. Creamy"; + mes "Monster with Beautiful Wings. `Hah~ it's just a buttefly!'. Careless thinking like this will make you bleeding~! It is much stronger then you expect. Be careful!"; + mes "^0099FFFound Items:^000000 Powder of Butterfly. Honey. Butterfly Wing. Flower"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "5. Pupa"; + mes "Monster on the Fabre's pupal stage. It doesn't attack at all, so easy to kill for Novice people."; + mes "^0099FFFound Items:^000000 Chrysalis. Sticky Mocus"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "6. Poporing"; + mes "Poisonous Poring in light green. Every character is the same as poring, but much more stronger."; + mes "^0099FFFound Items:^000000 Skicky Mocus. Garlet. Green Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "7. Rocker"; + mes "Lazy Grasshopper which loves playing Violin."; + mes "^0099FFFound Items:^000000 Grasshopper's Leg. Jellopy"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "8. Big Foot"; + mes "Dull-Looking Bear with a huge build. Although it looks dumb but you will realise how it can be fast after you provoke it."; + mes "^0099FFFound Items:^000000 Bear's Foot Skin. Leather. Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "9. Smokie"; + mes "It's working out all the time. Often tries to shapeshift with Raccon Leaves, but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up."; + mes "^0099FFFound Items:^000000 Raccon Leaf. Leather. Sweet Potato"; + next; + mes "10. Snake"; + mes "Green Coloured Snake living in the Forest or Desert. Not poisonous but be careful."; + mes "^0099FFFound Items:^000000 Snake Scale. Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "11.Wolf"; + mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch."; + mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "12.Argiope"; + mes "Monster crawling around with several articular legs."; + mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "13.Argos"; + mes "Big Spider of Dark colour.It often invades people lost in the Maze."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "14.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "15.Horn"; + mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound."; + mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "16.Hunter Fly"; + mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can."; + mes "^0099FFFound Items^000000: Solid Shell,Zargon"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "17.Mantis"; + mes "It wanders about the field waving a tiny fan."; + mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "18.Steiner"; + mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting."; + mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "19.Side Winder"; + mes "Horrendous Snake of Dark colour."; + mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "20.Yoyo"; + mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative,you must be cautious of being attacked by a group."; + mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "^FF0000[Earth,Small Monster Encyclopedia]^000000"; + mes "21.Caramel"; + mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately."; + mes "^0099FFFound Items^000000: Porcupine Quill,Leather"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "22.Steel Chonchon"; + mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up."; + mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "23.Coco"; + mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson."; + mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "24.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "25.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Prontera Maze 1F Monster Encyclopedia]^000000"; + mes "26.Savage"; + mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one."; + mes "^0099FFFound Items^000000: Mane,Leather"; + next; + goto PrtMaze; + close; + PrtMazeF3: + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "1.Poring"; + mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped,"; + mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry. They are not strong, and you will get yours back once you kill the monster, which eat your stuff."; + mes "^0099FFFound Items^000000: Jellopy.Sticky Muscus.Apple.Empty Bottle.Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "2.Lunatic"; + mes "Plump and shaggy monster shaped in Rabbit.However it won't give you a `Bunny Band'."; + mes "^0099FFFound Items^000000: Clover,Feather,Carrot,Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "3.Fabre"; + mes "Larva of Creamy. It is cute when it wiggles,even though it is a weak and small monster,"; + mes "People often tend to slay Fabres,only for the reason they can get `Feather's,one of required items for `Bunny Band'."; + mes "^0099FFFound Items^000000: Fluff.Feather.Green Herb.Clover"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "4.Creamy"; + mes "Monster with Beautiful Wings. `Hah~ it's just a butterfly!'. Careless thinking like this will make you bleeding~! It is much stronger than you expect. Be careful!"; + mes "^0099FFFound Items^000000: Powder of Butterfly,Honey,Butterfly Wing,Flower"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "5.Pupa"; + mes "Monster on the Fabre's pupal stage. It deosn't attack at all, so easy to kill for Novice people."; + mes "^0099FFFound Items^000000: Chrysalis,Sticky Muscus"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "6.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "7.Rocker"; + mes "Lazy Grasshpper which loves playing Violin."; + mes "^0099FFFound Items^000000: Grasshopper's Leg,Jellopy"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "8.Big Foot"; + mes "Dull-Looking Bear with a huge build.Although it looks dumb but you will realise how it can be fast after you provoke it."; + mes "^0099FFFound Items^000000: Bear's Foot Skin,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "9.Smokie"; + mes "It's working out all the time.Often tries to shapeshift with Raccon Leaves,but always failed. Back then, it tended to gather stuffs diligently, now it seems to give up."; + mes "^0099FFFound Items^000000: Raccon Leaf,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "10.Snake"; + mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful."; + mes "^0099FFFound Items^000000: Snake Scale,Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "11.Wolf"; + mes "Wanderers having Blue Manes.They are cooperative,so attack in a group when one got attacked.Let's just let them mind their business and watch."; + mes "^0099FFFound Items^000000: Wolf Claw,Meat,Monster's Feed,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "12.Argiope"; + mes "Monster crawling around with several articular legs."; + mes "^0099FFFound Items^000000: Bug Leg,Zargon,Green Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "13.Argos"; + mes "Big Spider of Dark colour.It often invades passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "14.Horn"; + mes "Compliant Insect unlike its offensive appearance.It's wandering about the field making some crunching sound."; + mes "^0099FFFound Items^000000: Horn,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "15.Hunter Fly"; + mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can."; + mes "^0099FFFound Items^000000: Solid Shell,Zargon"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "16.Mantis"; + mes "It wanders about the field waving a tiny fan."; + mes "^0099FFFound Items^000000: Mantis Scythe,Scell,Solid Shell,Red Potion"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "17.Steiner"; + mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting."; + mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "18.Side Winder"; + mes "Horrendous Snake of Dark colour."; + mes "^0099FFFound Items^000000: Shining Scale,Zargon,Poisonous Canine,Snake Scale"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "19.Yoyo"; + mes "Pink coloured Monkey.Not only they pick up every stuff dropped on the gound outrageously, but they are nimble and cooperative,you must be cautious of being attacked by a group."; + mes "^0099FFFound Items^000000: Yoyo Tail,Banana,Yellow Herb,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "20.Caramel"; + mes "Cute porcupine with tiny spiky quills.But don't ever touch it without intention,it will get mad immeduately."; + mes "^0099FFFound Items^000000: Porcupine Quill,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "21.Steel Chonchon"; + mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up."; + mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "22.Coco"; + mes "Little but fierce-looking eyed Creature carrying an Acorn on both hands. It is very unpleasant when it gives a dirty look,let's give it a lesson."; + mes "^0099FFFound Items^000000: Acorn,Fluff,Leather,Sweet Potato"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "23.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "24.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "25.Savage"; + mes "Wild Boar always walking around restlessly,making some noise. It has Big fangs and looks different from the young one."; + mes "^0099FFFound Items^000000: Mane,Leather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "26.Savage Bebe"; + mes "Tiny Pink baby of Savage.Unlike its small size, It is running about fields making annoying noise"; + mes "^0099FFFound Items^000000: Leather,Meat,Arrow,Feather"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "27.Mastering"; + mes "Giant Poring rarely seen in the Morroc Desert,Mt.Mjornir or the Prontera Maze.It might be the leader of Porings.Surely stronger than normal Porings but, still it can't be more than a Poring anyway."; + mes "^0099FFFound Items^000000: Apple,Apple Juice"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "28.Eclipse"; + mes "Giant Lunatic which might be the Boss among Lunatics!It does weak attacks but is highly defensive at the same time."; + mes "^0099FFFound Items^000000: Carrot,Glass Bead,Milk,Carrot Juice"; + next; + mes "^FF0000[Prontera Maze 3F Monster Encyclopedia]^000000"; + mes "29.Baphomet"; + mes "Dreadful Monster having huge horns on the head.It uses a Gargantuan Scythe to slay foes,often attacks with bare hands."; + mes "^0099FFFound Items^000000: Evil Horn,Yggdrasilberry,Leather,Oridecon"; + next; + EndPrtMaze: + close; +} + +prt_in.gat,168,56,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Monster Encyclopedia]^000000"; + mes "I am a Monster Encyclopedia, you can check several types of Monster with me."; + next; + menu "Monsters of Water Property",MonWatPro,"Monsters of Wind Property",MonWinPro,"Monsters of Spiritual Property",MonSpiPro,"Cancel",Cancel; + + MonWatPro: + menu "Small Size Monster",SmaMonWatPro,"Medium Size Monster",MidMonWatPro,"Great Size Monster",GrMonWatPro,"Cancel",EndWatPro; + + SmaMonWatPro: + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "1.Plankton"; + mes "Even though looks like trifle creatures, they fly into a rage when stepped on. They are light, drifting on the water and attack with several projections."; + mes "^0099FFFound Items^000000: Single Cell. Garlet. Sticky Muscus. Empty Bottle"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "2.Kukre"; + mes "Look better than Thief Bugs but basically do the same thing. But luckily they don't attack players in a group."; + mes "^0099FFFound Items^000000: Worm Peeling. Garlet. Monster's Feed. Red Herb. Insect Feeler"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "3.Hydra"; + mes "Veggie Monsters which live near water or in the deep sea. Attack using tentacles. When run into them in a group, it will be the pain in the ass."; + mes "It will be effective to kill one by one before they gather."; + mes "^0099FFFound Items^000000: Tentacle. Sticky Muscus. Meat"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "4.Vadon"; + mes "They wear thick shells all around the body and walk around tinkling nippers. Also their red color looks so tempting an appetite. Be careful anyway."; + mes "^0099FFFound Items^000000: Nipper.Garlet.Solid Shell.Shell"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "5.Marina"; + mes "Jelly Fishes of transparent white color. Do flexible attacks stretching its body as long as they can. They live in cool places near water."; + mes "^0099FFFound Items^000000: Single Cell.Sticky Muscus"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "6.Cornutus"; + mes "Some buddies concealing themselves within hard turban shells and try to lead a quiet life."; + mes "^0099FFFound Items^000000: Conch. Scell. Solid Shell"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "7.Magnolia"; + mes "Creatures shaped in Big Egg Frying Fans. They spank attackers with the Frying Fans without mercy."; + mes "Don't let your guard down just because they look cute. You will suffer if you do so."; + mes "^0099FFFound Items^000000: Jellopy. Garlet. Scell"; + next; + mes "^FF0000[Water, Small Monster Encyclopedia]^000000"; + mes "8.Marine Sphere"; + mes "Strange, round-shaped monsters beating so fast that they seem like they will burst."; + mes "^0099FFFound Items^000000: Tendon.Detonator"; + next; + goto MonWatPro; + close; + MidMonWatPro: + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "1.Poring"; + mes "Small and circular monsters of transparent pink color. Swallow anything on the ground with sparkling eyes, without any hesitations. No matter what kind of things dropped,"; + mes "They tend to eat first. So be cautious when you put down drop something on the ground. But don't worry."; + mes "They are not strong, and you will get yours back once you kill the monster, which eat your stuff."; + mes "^0099FFFound Items^000000: Jellopy.Sticky Muscus.Apple.Empty Bottle.Red Herb"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "2.Roda Frog"; + mes "Usually they are hopping around, croaking very annoyingly. Let's stomp on them when found."; + mes "^0099FFFound Items^000000: Sticky Webfoot,Spawn,Green Herb,Empty Bottle"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "3.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "4.Goblin"; + mes "They are small and attack passengers using different kinds of mace. They always wear Masques, which frighten people more because we can't see what they might look like."; + mes "There are all 5 different types, and they seem to be brothers."; + mes "^0099FFFound Items^000000: Yellow Herb,Red Potion"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "5.Thara Frog"; + mes "Frogs of red color, surely stronger than Roda Frogs. However there is obvious one thing in common about them, annoying croaking noise."; + mes "^0099FFFound Items^000000: Spawn,Scell,Sticky Webfoot"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "6.Phen"; + mes "Fish of blue color which is kicking and definitely alive."; + mes "^0099FFFound Items^000000: Fish Tail,Sharp Scale,Meat,Fin"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "7.Mars"; + mes "Have many legs, flapping under the water. Do not rush to it because of its tempting look."; + mes "^0099FFFound Items^000000: Squid Ink,Tentacle"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "8.Obeaune"; + mes "Female Mermaid. Attacks using long hair, with a grim face."; + mes "^0099FFFound Items^000000: Heart of Mermaid,Fin"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "9. Sohee"; + mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely."; + mes "^0099FFFound Items^000000: Black Hair,Red Potion"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "10.Marc"; + mes "Sea Horse. Don't ever think about riding a Sea Horse!"; + mes "^0099FFFound Items^000000: Gill,Fin"; + next; + mes "^FF0000[Water,Medium Monster Encyclopedia]^000000"; + mes "11.Deviace"; + mes "Fish monster with a big mouth possibly carrying something within. Small but Strong."; + mes "^0099FFFound Items^000000: Ancient Tooth,Ancient Lips"; + next; + goto MonWatPro; + close; + GrMonWatPro: + mes "^FF0000[Water,Great Monster Encyclopedia]^000000"; + mes "1.Ambernite"; + mes "Snail shaped monster, it is highly strong and defensive at the same time. Don't you worry though. It is too slow to catch you so that you can run away at ease any time."; + mes "^0099FFFound Items^000000: Snail's Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Water,Great Monster Encyclopedia]^000000"; + mes "2.Sword Fish"; + mes "Fish Monster with a sharp, thin, and long nose. Goggle eyes are funny but it belongs to one of those dangerous monsters."; + mes "^0099FFFound Items^000000: Sharp Scale,Gill"; + next; + goto MonWatPro; + close; + EndMonWatPro: + close; + close; + MonWinPro: + menu "Small Size Monster",SmaMonWinPro,"Medium Size Monster",MedMonWinPro,"Great Size Monster",GrMonWinPro,"Cancel",EndMonWinPro; + + SmaMonWinPro: + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "1.Chonchon"; + mes "Flying monsters, they are not strong but make as annoying noises as Roda Frog. Make sure to eliminate them whenever you see."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Fly Wing"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "2.Hornet"; + mes "Usually they are doing their duty but when get harmed, they will group themselves to attack the enemy without mercy!"; + mes "^0099FFFound Items^000000: Bee Sting,Jellopy,Green Herb"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "3.Creamy"; + mes "Monster with Beautiful Wings. `Hah~ it's just a butterfly!'. Careless thinking like this will make you bleeding~! It is much stronger than you expect. Be careful!"; + mes "^0099FFFound Items^000000: Powder of Butterfly,Honey,Butterfly Wing,Flower"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "4.Steiner"; + mes "Tiny little insect with a Splendid shell. Don't ever look down upon it. It is stronger than you expect. Besides it recognizes Magical Spell Casting."; + mes "^0099FFFound Items^000000: Rainbow Shell,Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "5.Steel Chonchon"; + mes "This is similar as Chonchon, but in yellow and green. Picks up every stuff on the ground. It is strong and well-cooperative with its fellows, so don't forget to get items before it picks up."; + mes "^0099FFFound Items^000000: Garlet,Shell,Solid Shell"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "6.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Wind,Small Monster Encyclopedia]^000000"; + mes "7.Hunter Fly"; + mes "Winged insect of Blood. It is Strong meanwhile very annoying. Be advised, you'd better flee away if you can."; + mes "^0099FFFound Items^000000: Solid Shell,Zargon"; + next; + goto MonWinPro; + close; + MedMonWinPro: + mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000"; + mes "1.Condor"; + mes "Bald head eagle in funny feature. They tends to be gathered when one gets attacked. So don't look down upon them and think of `I will caress you!'"; + mes "^0099FFFound Items^000000: Talon,Arrow,Meat,Feather of Birds"; + next; + mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000"; + mes "2.Cobold the 1st"; + mes "Small monster looks like a Wolf but it is smart enough to handle several tools. It is hostile and strong unlike its appearance. All Cobolds seem to be brothers."; + mes "^0099FFFound Items^000000: Blue Hair,Zargon,Orange Potion"; + next; + mes "^FF0000[Wind,Medium Monster Encyclopedia]^000000"; + mes "3.Petite"; + mes "Tiny Cute flying Dragon. It seems like there exists 2 different kinds of Petite, flying one and walking one and this is the 1st one."; + mes "^0099FFFound Items^000000: Dragon Canine,Dragon Tail,Zargon"; + next; + goto MonWinPro; + close; + GrMonWinPro: + mes "^FF0000[Wind,Great Monster Encyclopedia]^000000"; + mes "4.Joker"; + mes "A big Poker Card with Ugly looking girl printed on both side assaults you."; + mes "^0099FFFound Items^000000: High Heels"; + next; + goto MonWinPro; + close; + EndMonWinPro: + close; + close; + MonSpiPro: + menu "Small Size Monster",SmaMonSpiPro,"Medium Size Monster",MedMonSpiPro,"Great Size Monster",GrMonSpiPro,"Cancel",EndMonSpiPro; + + SmaMonSpiPro: + mes "^FF0000[Spiritual,Small Monster Encyclopedia]^000000"; + mes "1.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Spiritual,Small Monster Encyclopedia]^000000"; + mes "2.Marionette"; + mes "Monster reborn from a bewitched Doll, bound to strings on Wooden Sticks."; + mes "^0099FFFound Items^000000: Golden Hair,Trunk"; + next; + goto MonSpiPro; + close; + MedMonSpiPro: + mes "^FF0000[Spiritual,Medium Monster Encyclopedia]^000000"; + mes "1.Eggyra"; + mes "Hovering here and there, while making a clattering sound. Tough-Looking Face scares people but it is not as strong as it looks."; + mes "^0099FFFound Items^000000: Scell,Sticky Muscus,Red Herb"; + next; + goto MonSpiPro; + close; + GrMonSpiPro: + mes "^FF0000[Spiritual,Great Monster Encyclopedia]^000000"; + mes "1.Nightmare"; + mes "Ghost Horse radiating an Aura of Violet all over the body."; + mes "^0099FFFound Items^000000: Horseshoe,Blue Herb"; + next; + mes "^FF0000[Spiritual,Great Monster Encyclopedia]^000000"; + mes "3.Medusa"; + mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet."; + mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Hair,White Potion"; + next; + goto MonSpiPro; + close; + EndMonSpiPro: + close; + close; + Cancel: + close; +} + +prt_in.gat,168,68,4 script `Merchant Guideline' for Dummies 111,{ + mes "^FF0000[Blacksmith Guide for Dummies]^000000"; + mes "You can get the information about how to refine Ores and about Weapon Craft Skills."; + next; + menu "Ore Refining.",OreRef,"Weapon Craft.",WeaCra,"Cancel.",Cancel; + + OreRef: + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "Please go over the next page if you want to know how to refine Ores."; + next; + menu "Ok",OreRefOk,"Cancel",EndOreRef; + + OreRefOk: + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "Rough Ores like Iron Ore or Raw Materials for Enchanted Stones can be polished into High Quality Ones.For that, ^0099FFFurnace^000000 is needed."; + mes "One High Quality Ore needs several Rough Ones to be refined."; + next; + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "When enough items are gathered,Double Click `Furnace'.You can use a Furnace only one time for refining."; + next; + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "Possible ores you can refine will pop up on a new window.You can make Ore with a click the name of Ore you need."; + next; + mes "^FF0000[Ore Refining for Dummies]^000000"; + mes "However it has a possiblity to be failed."; + close; + EndOreRef: + close; + close; + WeaCra: + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "Please go over the next page if you want to learn how to Smith Weapons."; + next; + menu "Ok",WeaCraOk,"Cancel",EndWeaCra; + + WeaCraOk: + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "Learn a Skill from `Smith Sword,Two-Handed Sword,Spear,Mace,Brassknuckle' which allows you to make the pertinent weapon."; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "Every Weapon needs ^0099FFSteel^000000 and ^0099FFHammer^000000.You can use a Hammer one time and it will be disapeared whenever used."; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "When Double Click on a Hammer,a new window which lists of items you can make will pop up."; + mes "Clicking a Weapon on that list will show the required items and their numbers.But they will be exhausted automatically,so just know this."; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "On that list window,there are 3 sockets which enable you to input some special items like Enchanted Stone or Star Crumb.These items amplify the weapon ability"; + next; + mes "^FF0000[Weapon Craft for Dummies]^000000"; + mes "And they have different possibility of Success by their characters."; + close; + EndWeaCra: + close; + close; + Cancel: + close; +} + +prt_in.gat,172,96,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "This is an Encyclopedia describing monsters living in Dungeons."; + next; + menu "Ant Hell",AntHell,"Geffen Dungeon",GefDung,"Sphinx",Sphinx,"Cancel",Cancel; + + AntHell: + menu "1F",AntHellF1,"2F",AntHellF2,"Cancel",EndAntHell; + + AntHellF1: + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "1.Ant Egg"; + mes "Simple Ant Egg."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "2.Andre"; + mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "3.Piere"; + mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "4.Deniro"; + mes "A kind of Work Ants, tend to group in a same kind as well as other ants."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "5.Vitata"; + mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey."; + mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey"; + next; + mes "^FF0000[Ant Hell 1F Monster Encyclopedia]^000000"; + mes "6.Giearth"; + mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners."; + mes "^0099FFFound Items^000000: Old Pixie's Moustache"; + next; + goto AntHell; + close; + AntHellF2: + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "1.Ant Egg"; + mes "Simple Ant Egg."; + mes "^0099FFFound Items^000000: Shell,Jellopy,Sticky Muscus,Empty Bottle"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "2.Andre"; + mes "A kind of Worker Ants,they are very diligent in their work.They gather everything to save a sufficient stock and are well-cooperative,you need to be careful."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "3.Piere"; + mes "A kind of Work Ants,seems to be very diligent.Its appearance is similar with other Ants,but you can easily distinguish them from others as they only gather in a same kind."; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "4.Deniro"; + mes "A kind of Work Ants, tend to group in a same kind as well as other ants"; + mes "^0099FFFound Items^000000: Worm Peeling,Garlet,Sticky Muscus,Shell"; + + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "5.Vitata"; + mes "Work Ants in charge of storing honey inside the body for emergency.It is a little pathetic to see their chubby tummy filled with Honey."; + mes "^0099FFFound Items^000000: Worm Peeling,Scell,Honey"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "6.Giearth"; + mes "Little Grampa Pixie. Usually lives in Caves to gather Ores.Even though he is short, but actually an adult.Show your manners."; + mes "^0099FFFound Items^000000: Old Pixie's Moustache"; + next; + mes "^FF0000[Ant Hell 2F Monster Encyclopedia]^000000"; + mes "7.Phreeoni"; + mes "Some bastard with a huge creepy tongue.Extremely strong Monster rarely seen around."; + mes "^0099FFFound Items^000000: Tongue,Ant Jaw"; + next; + goto AntHell; + close; + EndAntHell: + close; + close; + GefDung: + menu "1F",GefDungF1,"2F",GefDungF2,"3F",GefDungF3,"4F",GefDungF4,"Cancel",EndGefDung; + + GefDungF1: + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "2.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "3.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 1F Monster Encyclopedia]^000000"; + mes "4.Poison Spore"; + mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items^000000: Spore,Green Herb"; + next; + goto GefDung; + close; + GefDungF2: + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "2.Dustiness"; + mes "This monster owns high dodge rate because it is flying. Need to be attentive if you want to attack."; + mes "^0099FFFound Items^000000: Moth Dust,Moth Wing,Insect Feeler,Red Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "3.Poison Spore"; + mes "Poisonous Spore in Violet.Besides,it tends to attack haphazardly if anybody gets near."; + mes "^0099FFFound Items^000000: Spore,Green Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "4.Argos"; + mes "Big Spider of Dark colour.It often invades passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "5.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Geffen Dungeon 2F Monster Encyclopedia]^000000"; + mes "6.Jakk"; + mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone."; + mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon"; + next; + goto GefDung; + close; + GefDungF3: + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "1.Argos"; + mes "Big Spider of Dark colour.It often invades passangers."; + mes "^0099FFFound Items^000000: Cobweb,Scell,Bug Leg,Green Herb,Yellow Herb"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "2.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "3.Jakk"; + mes "Quite Odd monster in a nice suit,but with a pumpkin head.It looks funny but changes the attitude fiercely when attacks someone."; + mes "^0099FFFound Items^000000: Jack'o'Pumpkin,Zargon"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "4.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "5.Marionette"; + mes "Monster reborn from a bewitched Doll, bound to strings on Wooden Sticks."; + mes "^0099FFFound Items^000000: Golden Hair,Trunk"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "6.Bathory"; + mes "Witch with a big wen on the nose.She rides on her magic broom flying around in the air.."; + mes "^0099FFFound Items^000000: Witched Starsand"; + next; + mes "^FF0000[Geffen Dungeon 3F Monster Encyclopedia]^000000"; + mes "7.Nightmare"; + mes "Ghost Horse radiating an Aura of Violet all over the body."; + mes "^0099FFFound Items^000000: Horseshoe,Blue Herb"; + next; + goto GefDung; + close; + GefDungF4: + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "1.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "2.Deviruchi"; + mes "Little evil creature,which carries a cute fork with."; + mes "^0099FFFound Items^000000: Little Evil Horn,Little Evil Wing,Zargon"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "3.Raydric"; + mes "Ghost Knight of misfortune."; + mes "^0099FFFound Items^000000: Elunium,Chivarly Emblem"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "4.Joker"; + mes "A big Poker Card with Ugly looking girl printed on both side assaults you."; + mes "^0099FFFound Items^000000: High Heels"; + next; + mes "^FF0000[Geffen Dungeon 4F Monster Encyclopedia]^000000"; + mes "5.Doppelganger"; + mes "A ghostly double of a swordman,Spooky and Powerful."; + mes "^0099FFFound Items^000000: Spiky Band,Blue Potion,Cursed Ruby,Ruby"; + next; + goto GefDung; + close; + EndGefDung: + close; + close; + Sphinx: + menu "1F",SphinxF1,"2F",SphinxF2,"3F",SphinxF3,"4F",SphinxF4,"5F",SphinxF5,"Cancel",EndSphinx; + + SphinxF1: + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "2.Snake"; + mes "Green Cloloured Snake living in the Forest or Desert.Not poisonous but be careful."; + mes "^0099FFFound Items^000000: Snake Scale,Red Herb"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "3.Zerom"; + mes "Undead Slave who had been extremely abused before he died.He is wandering in the Sphinx,carrying a big box on the back.."; + mes "^0099FFFound Items^000000: Panties"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "4.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Sphinx 1F Monster Encyclopedia]^000000"; + mes "5.Requiem"; + mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back."; + mes "^0099FFFound Items^000000: Mystic Blue Box"; + next; + goto Sphinx; + close; + SphinxF2: + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "2.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "3.Requiem"; + mes "It seems like an Ancient Slave,carrying a heavy Coffin on the back."; + mes "^0099FFFound Items^000000: Mystic Blue Box"; + next; + mes "^FF0000[Sphinx 2F Monster Encyclopedia]^000000"; + mes "4.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + goto Sphinx; + close; + SphinxF3: + mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000"; + mes "1.Matyr"; + mes "Creature shaped in Black Dog."; + mes "^0099FFFound Items^000000: Monster's Feed,Leather"; + next; + mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000"; + mes "2.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Sphinx 3F Monster Encyclopedia]^000000"; + mes "3.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + goto Sphinx; + SphinxF4: + mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000"; + mes "1.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000"; + mes "2.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + mes "^FF0000[Sphinx 4F Monster Encyclopedia]^000000"; + mes "3.Medusa"; + mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet."; + mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Snake,White Potion"; + next; + goto Sphinx; + close; + SphinxF5: + mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000"; + mes "1.Whisper"; + mes "Living Fabric, which gives spooky feeling."; + mes "^0099FFFound Items^000000: Fabric"; + next; + mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000"; + mes "2.Marduk"; + mes "Unknown monster wearing Catholic uniform and looking serious."; + mes "^0099FFFound Items^000000: Flame Heart"; + next; + mes "^FF0000[Sphinx 5F Monster Encyclopedia]^000000"; + mes "3.Medusa"; + mes "Each of her hairs is a snake. It has rumored to turn people into stone when their eyes happen to meet."; + mes "^0099FFFound Items^000000: Dead Medusa,Horrendous Snake,White Potion"; + next; + goto Sphinx; + close; + EndSphinx: + close; + close; + Cancel: + close; +} + +prt_in.gat,172,102,4 script Monster Encyclopedia 111,{ + mes "^FF0000[Dungeon Monster Encyclopedia]^000000"; + mes "The is an Encyclopedia describing Monsters living in Dungeons."; + next; + menu "Mjornir Dead Pit",MjrDeadPit,"Payon Cave",PayCave,"Pyramid",Pyramid; + + MjrDeadPit: + menu "F1",MjrDeadPitF1,"F2",MjrDeadPitF2,"F3",MjrDeadPitF3,"Cancel",EndMjrDeadPit; + + MjrDeadPitF1: + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "2.Tarou"; + mes "Little mouse of white colour. It is squicking very loudly in the Dead Pit or the Prontera Culvert.."; + mes "^0099FFFound Items^000000: Rat Tail,Leather,Feather,Monster's Feed"; + next; + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "3.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Dead Pit 1F Monster Encyclopedia]^000000"; + mes "4.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + goto MjrDeadPit; + close; + MjrDeadPitF2: + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "1.Martin"; + mes "Funny looking Mole wearing a Safety Helmet on the head,which is always busy to walk around."; + mes "^0099FFFound Items^000000: Mole Whiskers,Mole Claw"; + next; + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "2.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "3.Skel Worker"; + mes "Walking Skeletion which was dead in a mine."; + mes "^0099FFFound Items^000000: Iron,Lantern"; + next; + mes "^FF0000[Dead Pit 2F Monster Encyclopedia]^000000"; + mes "4.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + goto MjrDeadPit; + close; + MjrDeadPitF3: + mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000"; + mes "1.Skel Worker"; + mes "Walking Skeletion which was dead in a mine."; + mes "^0099FFFound Items^000000: Iron,Lantern"; + next; + mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000"; + mes "2.Myst"; + mes "Mist-like Monster."; + mes "^0099FFFound Items^000000: Trunk.Gas Mask"; + next; + mes "^FF0000[Dead Pit 3F Monster Encyclopedia]^000000"; + mes "3.Evil Druid"; + mes "You'll shudder even once looking at it."; + mes "^0099FFFound Items^000000: Amulet,White Herb"; + next; + goto MjrDeadPit; + close; + EndMjrDeadPit: + close; + close; + PayCave: + menu "1F",PayCaveF1,"2F",PayCaveF2,"3F",PayCaveF3,"4F",PayCaveF4,"5F",PayCaveF5,"Cancel",EndPayCave; + + PayCaveF1: + mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000"; + mes "2.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Payon Cave 1F Monster Encyclopedia]^000000"; + mes "3.Zombie"; + mes "Bad Case of the Dead which has been reborn as a Walking Corpse by Back magic.Let's lead it to Nirvana."; + mes "^0099FFFound Items^000000: Decayed Nail,Sticky Muscus,Horrendous Mouth"; + next; + goto PayCave; + close; + PayCaveF2: + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "2.Eggyra"; + mes "Hovering here and there, while making a clattering sound. Tough-Looking Face scares people but it is not as strong as it looks."; + mes "^0099FFFound Items^000000: Scell,Sticky Muscus,Red Herb"; + next; + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "3.Magnolia"; + mes "Creatures shaped in Big Egg Frying Fans. They spank attackers with the Frying Fans without mercy. Don't let your guard down just because they look cute. You will suffer if you do so."; + mes "^0099FFFound Items^000000: Jellopy.Garlet.Scell"; + next; + mes "^FF0000[Payon Cave 2F Monster Encyclopedia]^000000"; + mes "4.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + goto PayCave; + close; + PayCaveF3: + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "2.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "3.Munak"; + mes "Pretty-looking Female corpse which had been frozen for a long time.She looks like holding a long story deep inside, the story people want to know about.Anyway Don't give her a break,she'll give strong damages on you."; + mes "^0099FFFound Items^000000: Daenggie ,Munak Turban"; + next; + mes "^FF0000[Payon Cave 3F Monster Encyclopedia]^000000"; + mes "4.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + goto PayCave; + close; + PayCaveF4: + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "1.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "2.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "3.Sohee"; + mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely."; + mes "^0099FFFound Items^000000: Black Hair,Red Potion"; + next; + mes "^FF0000[Payon Cave 4F Monster Encyclopedia]^000000"; + mes "4.Horong"; + mes "Eerie-looking fireball of violet colour.Recognises the living when gets near."; + mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow"; + next; + goto PayCave; + close; + PayCaveF5: + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "1.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "2.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "3.Sohee"; + mes "Female Ghost which holds grudge deep inside. She is always crying as waving long hair. But when running into the living, she suddenly changes her attitude fiercely."; + mes "^0099FFFound Items^000000: Black Hair,Red Potion"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "4.Horong"; + mes "Eerie-looking fireball of violet colour.Recognises the living when gets near."; + mes "^0099FFFound Items^000000: Stone Heart,Zargon,Fire Arrow"; + next; + mes "^FF0000[Payon Cave 5F Monster Encyclopedia]^000000"; + mes "5.Moonlight"; + mes "Wild Girl having 9 tails of a Fox, and with a Big Bell on the back."; + mes "^0099FFFound Items^000000: 9 Tails,White Potion,Topaz,Elunium"; + next; + goto PayCave; + close; + EndPayCave: + close; + close; + Pyramid: + menu "1F",PyramidF1,"2F",PyramidF2,"3F",PyramidF3,"4F",PyramidF4,"5F",PyramidF5,"6F",PyramidF6,"Cancel",EndPyramid; + + PyramidF1: + mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000"; + mes "1.Familiar"; + mes "Bat of Violet Colour.Not that strong but really annoying because it attacks very fast and outregeously when somebody gets near it."; + mes "^0099FFFound Items^000000: Tooth of Bat,Fly Wing,Grape,Red Herb"; + next; + mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000"; + mes "2.Spore"; + mes "Mushroom-like monsters. Usually live in the Forest or Dungeons. By the way Don't try to eat it!"; + mes "^0099FFFound Items^000000: Spore,Red Herb,Blue Herb"; + next; + mes "^FF0000[Pyramid 1F Monster Encyclopedia]^000000"; + mes "3.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + goto Pyramid; + close; + PyramidF2: + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "1.Poporing"; + mes "Poisonous Poring in light green.Every character is the same as poring,but much more stronger."; + mes "^0099FFFound Items^000000: Sticky Muscus,Garlet,Green Herb"; + next; + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "2.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + + next; + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "3.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Pyramid 2F Monster Encyclopedia]^000000"; + mes "4.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + goto Pyramid; + close; + PyramidF3: + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "1.Drainliar"; + mes "Freaking Bloody bat with a might."; + mes "^0099FFFound Items^000000: Tooth of Bat,Red Herb"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "2.Soldier Skeleton"; + mes "Skeleton holding 2 swords on both grips,attacks fast.One of the dangerous monsters in the Cave."; + mes "^0099FFFound Items^000000: Skel-Bone,Red Potion"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "3.Archer Skeleton"; + mes "It seems to be an expert of bow when it was alive.It'll come to attack in no time when somebody gets inside of its range."; + mes "^0099FFFound Items^000000: Skel-Bone,Fire Arrow,Red Potion"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "4.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 3F Monster Encyclopedia]^000000"; + mes "5.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + goto Pyramid; + close; + PyramidF4: + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "1.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "2.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "3.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + mes "^FF0000[Pyramid 4F Monster Encyclopedia]^000000"; + mes "4.Isis"; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + goto Pyramid; + close; + PyramidF5: + mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000"; + mes "1.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000"; + mes "2.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + mes "^FF0000[Pyramid 5F Monster Encyclopedia]^000000"; + mes "3.Isis"; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + goto Pyramid; + close; + PyramidF6: + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "1.Mummy"; + mes "Walking Corpse with a bandage all around the body.It smells so bad because its body is still on the decomposed stage."; + mes "^0099FFFound Items^000000: Rotten Bandage"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "2.Verit"; + mes "Dog with a bandage all around the body which was dead once before.It tends to eat everything dropped on the ground."; + mes "^0099FFFound Items^000000: Immortal Heart,Zargon,Rotten Bandage"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "3.Ghoul"; + mes "Similar as Zombie but much more stronger. Yet very slow, you'd better run for your life when happen to meet this thing."; + mes "^0099FFFound Items^000000: Horrendous Mouth"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "4.Isis"; + mes "Creature having the head and upper body of a woman and the tail of a snake.Her nail is quite a menace."; + mes "^0099FFFound Items^000000: Scale Skin,Shining Scale"; + next; + mes "^FF0000[Pyramid 6F Monster Encyclopedia]^000000"; + mes "5.Osiris"; + mes "Mummy King with a rotten bandage all over the body, wearing a Crown on the head.He threatens Adventurers with an incredible might."; + mes "^0099FFFound Items^000000: Memento,Rotten Bandage,Hand of God,Elunium"; + next; + goto Pyramid; + close; + EndPyramid: + close; + close; + Cancel: + close; +} +//<=========== Library - End ==========>\\ diff --git a/npc/other/card_remover.txt b/npc/other/card_remover.txt new file mode 100644 index 000000000..be3ec14a8 --- /dev/null +++ b/npc/other/card_remover.txt @@ -0,0 +1,169 @@ +// Card removal NPC by TyrNemesis^ +prt_in.gat,28,73,4 script Wise Old Woman 78,{ + +UPGRADEROOT: + mes "[Wise Old Woman]"; + mes "Good day, young one. I have the power to remove cards that you have compounded onto your equipment. Does this idea please you?"; + next; + menu "Yes, it does.",REMOVEMENU, + "What do you charge?",REMOVEPRICE, + "No thanks.",CLOSEOUT; + +REMOVEPRICE: + mes "[Wise Old Woman]"; + mes "I charge a flat fee of 200000 zeny, plus 25000 zeny for each card I remove from the item. In addition, I need a star crumb and a yellow gemstone to work my magic."; + next; + menu "Very well. Let's do it.",REMOVEMENU, + "No thanks.",CLOSEOUT; + +REMOVEMENU: + mes "[Wise Old Woman]"; + mes "Very well. Which item shall I examine for you?"; + next; + menu "I changed my mind.",CLOSEOUT, + getequipname(1),SLOT1, + getequipname(2),SLOT2, + getequipname(3),SLOT3, + getequipname(4),SLOT4, + getequipname(5),SLOT5, + getequipname(6),SLOT6, + getequipname(7),SLOT7, + getequipname(8),SLOT8, + getequipname(9),SLOT9, + getequipname(10),SLOT10; + +SLOT1: + set @part,1; + goto CARDNUMCHECK; + +SLOT2: + set @part,2; + goto CARDNUMCHECK; + +SLOT3: + set @part,3; + goto CARDNUMCHECK; + +SLOT4: + set @part,4; + goto CARDNUMCHECK; + +SLOT5: + set @part,5; + goto CARDNUMCHECK; + +SLOT6: + set @part,6; + goto CARDNUMCHECK; + +SLOT7: + set @part,7; + goto CARDNUMCHECK; + +SLOT8: + set @part,8; + goto CARDNUMCHECK; + +SLOT9: + set @part,9; + goto CARDNUMCHECK; + +SLOT10: + set @part,10; + goto CARDNUMCHECK; + +CARDNUMCHECK: + if(getequipcardcnt(@part) == 0) goto DENYCARDCOUNT; + set @cardcount,getequipcardcnt(@part); + if(@cardcount > 1) goto CARDNUMMULTIMSG; + mes "[Wise Old Woman]"; + mes "This item has " + @cardcount + " card compounded on it. To perform my magic, I will need 225000 zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; + goto CARDNUMPOSTMSG; +CARDNUMMULTIMSG: + mes "[Wise Old Woman]"; + mes "This item has " + @cardcount + " cards compounded on it. To perform my magic, I will need " + (200000+(@cardcount * 25000)) + " zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; +CARDNUMPOSTMSG: + next; + menu "Very well. Do it.",REMOVECARDWARNING, + "Never mind.",CLOSEOUT; + +REMOVECARDWARNING: + mes "[Wise Old Woman]"; + mes "Before I begin, I must warn you--I may fail. If I do, I may destroy the cards, the item, or both. I do not give refunds. That being said, which is more important to you: The cards, or the item?"; + next; + menu "I changed my mind about this.",CLOSEOUT, + "The item.",PRIORITYITEM, + "The cards.",PRIORITYCARD; + +PRIORITYITEM: + set @failtype,1; + goto REMOVECARD; + +PRIORITYCARD: + set @failtype,2; + goto REMOVECARD; + +REMOVECARD: + mes "[Wise Old Woman]"; + mes "Very well. I shall begin."; + next; + if((zeny < (200000+(@cardcount * 25000))) || (countitem(1000) < 1) || (countitem(715) < 1)) goto DENYMATERIAL; + set zeny,zeny - (200000+(@cardcount * 25000)); + delitem 1000,1; + delitem 715,1; + +// Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt +// First value = Total failure chance (item and cards destroyed) +// Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe) +// Third value = Harmless failure chance (all that's lost is your investment) + + set @failchance,rand(100); +// if(@failchance < 2) goto FAILREMOVECARD0; +// if((@failchance < 8) && (@failtype == 1)) goto FAILREMOVECARD1; +// if((@failchance < 8) && (@failtype == 2)) goto FAILREMOVECARD2; + if(@failchance < 10) goto FAILREMOVECARD3; + successremovecards @part; + mes "[Wise Old Woman]"; + mes "The process was a success. Here are your cards and your item. Farewell."; + close; + +FAILREMOVECARD0: + mes "[Wise Old Woman]"; + mes "The process was a total failure. I am afraid the item and the cards were destroyed."; + failedremovecards @part,0; + close; + +FAILREMOVECARD1: + mes "[Wise Old Woman]"; + mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay."; + failedremovecards @part,1; + close; + +FAILREMOVECARD2: + mes "[Wise Old Woman]"; + mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process."; + failedremovecards @part,2; + close; + +FAILREMOVECARD3: + mes "[Wise Old Woman]"; + mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay."; + failedremovecards @part,3; + close; + +DENYCARDCOUNT: + mes "[Wise Old Woman]"; + mes "Young one... There are no cards compounded on this item. I can do nothing with it, I'm afraid."; + close; + +DENYMATERIAL: + mes "[Wise Old Woman]"; + mes "You do not have all the items I require to work my magic, child. Come again when you do."; + close; + +CLOSEOUT: + mes "[Wise Old Woman]"; + mes "Very well. Return at once if you seek my services."; + close; + +} diff --git a/npc/other/devnpc.txt b/npc/other/devnpc.txt new file mode 100644 index 000000000..15390e671 --- /dev/null +++ b/npc/other/devnpc.txt @@ -0,0 +1,284 @@ +//===== eAthena Script ======================================= +//= Dev edition NPCs! +//===== By: ================================================== +//= Most NPCs by Aria +//= MouseJstr NPC by MouseJstr +//===== Current Version: ===================================== +//= 0.5 +//===== Compatible With: ===================================== +//= eAthena 1.0 Final + +//===== Description: ========================================= +//= NPCs of the devs! +//===== Additional Comments: ================================= +//= Some devs don't have their quotes yet >_> +//= currently we only have Aria, Mouse, and MC_Cameri done. +//= David is there because he has coords, but he's incomplete; +//= he has no biography +//============================================================ + +// Aria =========================================================>\\ +prontera.gat,156,179,4 script Aria 805,{ + npcspeed 150; + announce "Your wedding has been cancelled.",3; + npctalk strcharinfo(0)+ " , you suck."; + mes "[Aria]"; + mes "Okay, I'm Evera's brother, Aria!"; + mes "^FF00FFReal Name^000000: Brandon"; + mes "^FF00FFAge^000000: 13 Years"; + mes "^FF00FFWhere I live^000000: Near Los Angeles, California"; + next; + mes "[Aria]"; + mes "^FF00FFWhat I Do^000000: NPCs and Graphics! =D"; + mes "^FF00FFWhy I'm here^000000: Cuz of Evera =o"; + next; + mes "[Aria]"; + mes "Anyway, here. I get to talk about myself now!"; + mes "I'm from California, and I wub MMORPGS"; + mes "So yeah that's it. GO EA!"; + initnpctimer; + close; + OnTimer15000: + npcwalkto 150+rand(17),169+rand(16); + setnpctimer 0; + +Lariatalk: + set $ariatalk,rand(10); + if($ariatalk == 0) goto Lquote0; + if($ariatalk == 1) goto Lquote1; + if($ariatalk == 2) goto Lquote2; + if($ariatalk == 3) goto Lquote3; + if($ariatalk == 4) goto Lquote4; + if($ariatalk == 5) goto Lquote5; + if($ariatalk == 6) goto Lquote6; + if($ariatalk == 7) goto Lquote7; + if($ariatalk == 8) goto Lquote8; + if($ariatalk == 9) goto Lquote9; + if($ariatalk == 10) goto Lquote10; + goto Lariatalk; + +Lquote0: + npctalk "OMGWTFBBQ"; + setnpctimer 0; + break; +Lquote1: + npctalk "So its u -> 0"; + timer 500; + npctalk "... That did not look right"; + setnpctimer 0; + break; +Lquote2: + npctalk "OMGITSJEEBUS!#!@%!"; + setnpctimer 0; + break; +Lquote3: + npctalk "Evera died. I guess."; + setnpctimer 0; + break; +Lquote4: + npctalk "I CLICK THE BUTTON AND THEY DON'T DIE!"; + setnpctimer 0; + break; +Lquote5: + npctalk "RO? wtf?"; + timer 500; + npctalk "Oh yeah."; + setnpctimer 0; + break; +Lquote6: + npctalk "omgnoob. DIE!"; + setnpctimer 0; + break; +Lquote7: + npctalk "WooT!"; + setnpctimer 0; + break; +Lquote8: + npctalk "(I'm not here, so ignore me and mob Valaris)"; + setnpctimer 0; + break; +Lquote9: + npctalk "Is that why u bought windows"; + timer 500; + npctalk "cuz bill has red hair?"; + setnpctimer 0; + break; +Lquote10: + setnpctimer 0; + break; +} + +// MouseJstr =========================================================>\\ +ayothaya.gat,76,145,5 script MouseJstr 763,{ + npcspeed 100; + mes "[MouseJstr]"; + mes "Yo homeslices.."; + mes "I am MouseJstr on AIM and josh in real life.."; + next; + mes "I enjoy maintaining a RO server because of the abuse I get"; + initnpctimer; + close; + OnTimer15000: + npcwalkto 70+rand(17),135+rand(16); + setnpctimer 0; + +doitagain: + set $foo,rand(5); + if($foo == 0) goto Lquote0; + if($foo == 1) goto Lquote1; + if($foo == 2) goto Lquote2; + if($foo == 3) goto Lquote3; + if($foo == 4) goto Lquote4; + goto doitagain; + +Lquote0: + npctalk "Brb.. my baby is throwing up on my leg."; + setnpctimer 0; + break; +Lquote1: + npctalk "The only difference between a hurricane and skydiving is which direction the tree's come at you from.."; + setnpctimer 0; + break; +Lquote2: + npctalk "Wanna be a GM? Write me a C routine that reverses a string in place.."; + setnpctimer 0; + break; +Lquote3: + npctalk "Wanna be a GM? Write me a C routine that finds me the highest bit set in a network order 32 bit integer..."; + setnpctimer 0; + break; +Lquote4: + npctalk "I am the dark angel of eAthena.. withen weeks of my arrival, almost everybody was gone or dead.. fear me..."; + setnpctimer 0; + break; +} + +// MC Cameri =========================================================>\\ +morocc.gat,160,97,4 script MC Cameri 706,{ + npcspeed 150; + mes "[MC Cameri]"; + mes "I'm the @command guy from oA..."; + mes "^FF00FFReal Name^000000: Can't tell you my name"; + mes "^FF00FFAge^000000: 16 years"; + mes "^FF00FFWhere I live^000000: Dominican Republic, in the caribbean"; + next; + mes "[MC Cameri]"; + mes "^FF00FFWhat I Do^000000: mostly working on @commands for GMs..."; + mes "^FF00FFWhy I'm here^000000: Because I like programming..."; + next; + mes "[MC Cameri]"; + mes "I'm a senior student, programmer, body builder(yes, I lift weights), etc."; + initnpctimer; + close; + OnTimer15000: + npcwalkto 154+rand(17),87+rand(16); + setnpctimer 0; + +Lmctalk: + set $mctalk,rand(10); + if($mctalk == 0) goto Lquote0; + if($mctalk == 1) goto Lquote1; + if($mctalk == 2) goto Lquote2; + if($mctalk == 3) goto Lquote3; + if($mctalk == 4) goto Lquote4; + if($mctalk == 5) goto Lquote5; + if($mctalk == 6) goto Lquote6; + if($mctalk == 7) goto Lquote7; + if($mctalk == 8) goto Lquote8; + if($mctalk == 9) goto Lquote9; + if($mctalk == 10) goto Lquote10; + goto Lmctalk; +Lquote0: + npctalk "OMGWTFBBQ"; + setnpctimer 0; + break; +Lquote1: + npctalk "160,95-I owns you all, under my commands. *lol*"; + setnpctimer 0; + break; +Lquote2: + npctalk "I forgot what my script, what do I have to say again? *_*U"; + setnpctimer 0; + break; +Lquote3: + npctalk "¿Donde estoy? *wonders* (<-- Means, where am I?)"; + setnpctimer 0; + break; +Lquote4: + npctalk "Are you guys my friends?"; + setnpctimer 0; + break; +Lquote5: + npctalk "My mom told me not to talk to strangers. *stares*"; + setnpctimer 0; + break; +Lquote6: + npctalk "How can you be SO ugly!?"; + setnpctimer 0; + break; +Lquote7: + npctalk "I need a friend to play with =(. *sobs*"; + setnpctimer 0; + break; +Lquote8: + npctalk "I've been kicking this rock for as long as I can remember."; + setnpctimer 0; + break; +Lquote9: + npctalk "My computer just broke, and I don't know how to format. *sobs*"; + setnpctimer 0; + break; +Lquote10: + setnpctimer 0; + break; +} + + +// Davidsiaw =========================================================>\\ +payon.gat,182,104,4 script Davidsiaw 1002,{ + npcspeed 150; + mes "[Davidsiaw]"; + mes "omghi"; + initnpctimer; + close; + OnTimer15000: + npcwalkto 176+rand(17),94+rand(16); + setnpctimer 0; + +Ldavidtalk: + set $davidtalk,rand(10); + if($davidtalk == 0) goto Lquote0; + if($davidtalk == 1) goto Lquote1; + if($davidtalk == 2) goto Lquote2; + if($davidtalk == 3) goto Lquote3; + if($davidtalk == 4) goto Lquote4; + if($davidtalk == 5) goto Lquote5; + if($davidtalk == 6) goto Lquote6; + goto Ldavidtalk; +Lquote0: + npctalk "OMGWTFBBQ"; + setnpctimer 0; + break; +Lquote1: + npctalk "Wud are you looking at?"; + setnpctimer 0; + break; +Lquote2: + npctalk "baka..."; + setnpctimer 0; + break; +Lquote3: + npctalk "¿Donde estoy? *wonders* (<-- Means, where am I?)"; + setnpctimer 0; + break; +Lquote4: + npctalk "*drops 100 Mjolnirs on the floor*"; + setnpctimer 0; + break; +Lquote5: + npctalk "There ya go ;)"; + setnpctimer 0; + break; +Lquote6: + setnpctimer 0; + break; +} \ No newline at end of file diff --git a/npc/other/gefenia.txt b/npc/other/gefenia.txt new file mode 100644 index 000000000..dbda378ce --- /dev/null +++ b/npc/other/gefenia.txt @@ -0,0 +1,31 @@ +//===== Athena Script ======================================== +//= Gefenia Warper Script +//===== By: ================================================== +//= Darkchild (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any Athena Version; RO Episode 6+ +//===== Description: ========================================= +//= Temp Warper to Gefenia +//===== Additional Comments: ================================= +//= IF you know how you SHOULD get there then please tell me +//============================================================ +prontera.gat,154,198,5 script Geovani 805,{ +mes "[Geovani]"; +mes "Hi there my friend,"; +mes "A while ago a very wise man taught me something."; +next; +mes "[Geovani]"; +mes "He taught me how to warp people"; +mes "And yesterday i finally mastered it!!"; +next; +mes "[Geovani]"; +mes "Want me to show you?"; +mes "I can warp you to Gefenia, the old ruins of the rebuild city, Geffen"; +next; +menu "Sure, Warp Me ;)",Mwarpme,"Nah, Don't Try It On me",-; +close; +Mwarpme: +warp "gefenia01.gat", 40, 103; close; +} \ No newline at end of file diff --git a/npc/other/heal.txt b/npc/other/heal.txt new file mode 100644 index 000000000..f5ee1886b --- /dev/null +++ b/npc/other/heal.txt @@ -0,0 +1,41 @@ +//===== eAthena Script ======================================= +//= Heal Npc +//===== By: ================================================== +//= Lotsa People (1.x) +//===== Current Version: ===================================== +//= 2.0 +//===== Compatible With: ===================================== +//= eAthena 0.1+; +//===== Description: ========================================= +//= Poring Which Heals For Free +//===== Additional Comments: ================================= +//= 2.0 By Darkchild, Duplicates And Changed A Bit +//= you can replace this script file by heal_payment.txt +//= if you want that players have to pay their healings. +//============================================================ + +prontera.gat,150,184,5 script Healring#h1-1::Healring 1002,{ + mes "[Healring]"; + mes "Booooiiing!!"; + next; + menu "Heal",-,"Quit",CANCEL; + heal 30000,30000; + mes "[Healring]"; + mes "Boooing! Booiing Boing! (Healed! Have fun!)"; + close; + CANCEL: + mes "[Healring]"; + mes "Boing Boing! (Bye Bye!)"; + close; +} + +morocc.gat,159,96,5 duplicate(Healring) Healring#h1-2 1002 +geffen.gat,121,61,5 duplicate(Healring) Healring#h1-3 1002 +payon.gat,180,105,5 duplicate(Healring) Healring#h1-4 1002 +alberta.gat,185,144,5 duplicate(Healring) Healring#h1-5 1002 +aldebaran.gat,134,123,5 duplicate(Healring) Healring#h1-6 1002 +izlude.gat,125,118,5 duplicate(Healring) Healring#h1-7 1002 +xmas.gat,149,136,5 duplicate(Healring) Healring#h1-8 1002 +comodo.gat,188,162,5 duplicate(Healring) Healring#h1-9 1002 +amatsu.gat,200,80,5 duplicate(Healring) Healring#h1-10 1002 +gonryun.gat,164,130,5 duplicate(Healring) Healring#h1-1 1002 \ No newline at end of file diff --git a/npc/other/heal_payment.txt b/npc/other/heal_payment.txt new file mode 100644 index 000000000..344ee96d9 --- /dev/null +++ b/npc/other/heal_payment.txt @@ -0,0 +1,99 @@ +//===== eAthena Script ======================================= +//= Dog Script (for healings) +//===== By: ================================================== +//= Yor +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= Any Athena Version (need dog sprite) +//===== Description: ========================================= +//= Dog heals/regenerates people against zenys +//===== Additional Comments: ================================= +//= alternative dog with payment. +//= each HP need 1 zeny +//= each SP need (baselevel / 5) zenys +//= calculation is done at start of the script +//= Added Duplicates And Correct payon Loc [Darkchild] +//============================================================ + +prontera.gat,150,184,5 script Healring#h2-1::Healring 1002,{ + set @tempHp, MaxHp-Hp; + set @tempSp, ((MaxSp-Sp) * BaseLevel) / 5; + if (@tempHp > 0) goto WOUNDED; + if (@tempSp > 0) goto ONLY_REGENERATION; + + mes "[Healring]"; + mes "Booiiing Boiing (You don't need healings)."; + mes "Boing Boing! (Bye Bye!)"; + close; + + WOUNDED: + if (@tempSp > 0) goto WITH_REGENERATION; + mes "[Healring]"; + mes "Booiing: BoooiiinnnG (Need healings: "+@tempHp+" z)?"; + mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!"; + next; + menu "Healing ("+@tempHp+"z)",HEALINGS,"No, thanks",CANCEL; + + WITH_REGENERATION: + mes "[Healring]"; + mes "Booiing: BoooiiinnnG (Need only healing: "+@tempHp+" z)?"; + mes "Boooing: BoooiiinnnG (Only a regeneration: "+@tempSp+" z)?"; + mes "Booiing Boooing: BoooiiinnnG (or healing and regeneration: "+(@tempHp+@tempSp)+" z)?"; + mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!"; + next; + menu "Only healings ("+@tempHp+"z)",HEALINGS,"Only a regeneration ("+@tempSp+"z)",REGENERATION,"Healings with regeneration ("+(@tempHp+@tempSp)+"z)",HEALINGS_AND_REGENERATION,"Nothing, thanks",CANCEL; + + ONLY_REGENERATION: + mes "[Healring]"; + mes "Boooing: BoooiiinnnG (Need a regeneration: "+@tempSp+" z)?"; + mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!"; + next; + menu "Regeneration ("+@tempSp+"z)",REGENERATION,"No, thanks",CANCEL; + + HEALINGS: + if (Zeny < @tempHp) goto NO_ZENYS; + set Zeny, Zeny-@tempHp; + heal 30000,0; + goto FIN; + + REGENERATION: + if (Zeny < @tempSp) goto NO_ZENYS; + set Zeny, Zeny-@tempSp; + heal 0,30000; + goto FIN; + + HEALINGS_AND_REGENERATION: + if (Zeny < (@tempHp+@tempSp)) goto NO_ZENYS; + set Zeny, Zeny-(@tempHp+@tempSp); + heal 30000,30000; + goto FIN; + + NO_ZENYS: + mes "[Healring]"; + mes "BOIING! (You don't have enough zenys)!"; + mes "BOING BOING!! (Starver)!"; + close; + + FIN: + mes "[Healring]"; + mes "Boooing! Booiing Boing! (Healed! Have fun!)"; + close; + + CANCEL: + mes "[Healring]"; + mes "Boing Boing! (Bye Bye!)"; + close; +} + + +morocc.gat,159,96,5 duplicate(Healring) Healring#h2-2 1002 +geffen.gat,121,61,5 duplicate(Healring) Healring#h2-3 1002 +payon.gat,180,105,5 duplicate(Healring) Healring#h2-4 1002 +alberta.gat,185,144,5 duplicate(Healring) Healring#h2-5 1002 +aldebaran.gat,134,123,5 duplicate(Healring) Healring#h2-6 1002 +izlude.gat,125,118,5 duplicate(Healring) Healring#h2-7 1002 +xmas.gat,149,136,5 duplicate(Healring) Healring#h2-8 1002 +comodo.gat,188,162,5 duplicate(Healring) Healring#h2-9 1002 +amatsu.gat,200,80,5 duplicate(Healring) Healring#h2-10 1002 +gonryun.gat,164,130,5 duplicate(Healring) Healring#h2-1 1002 \ No newline at end of file diff --git a/npc/other/kafra_bank.txt b/npc/other/kafra_bank.txt new file mode 100644 index 000000000..f332dcada --- /dev/null +++ b/npc/other/kafra_bank.txt @@ -0,0 +1,106 @@ +//===== eAthena Script ======================================= +//= 2nd Bank of Prontera ( with daily 0.01% income! ) +//===== By: ================================================== +//= Lupus (1.0) +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.x +//===== Description: ========================================= +//= A bank which has an interest % +//===== Additional Comments: ================================= +// Look for this formula and setup your Bank daily % interest +// #kafrabank/1000 = 0.1% of interest per day +// #kafrabank/100 = 1% of interest per day +// #kafrabank/10 = 10% of interest per day +//============================================================ + +prontera.gat,131,190,1 script Bank Clerk 112,{ + cutin "kafra_06",2; + mes"[Manya]"; + mes strcharinfo(0)+", welcome to the 2nd Bank of Prontera!"; + + set @kb_int,(gettime(6)*31)+gettime(5); //today's number + set @income,0; +//calculate % + if (#kafrabank<=0 || #kb_int>=@kb_int) goto L_NoIncomeToday; + set @income,(#kafrabank/1000)*(@kb_int-#kb_int); //@income == % of the summ +L_NoIncomeToday: + set #kb_int,@kb_int; //reset days timer + + if(#kafrabank==0) mes "We could open you an account."; + if(@income>0) mes "Today's income ^135445" + @income + "^000000 zeny."; + set #kafrabank,#kafrabank+@income; + if(#kafrabank>0) mes "Your account: ^135445" + #kafrabank + "^000000 zeny."; + mes "What would you like?"; + next; + if(#kafrabank==0) menu "-Open a bank account",-,"-Quit",B_EXIT2; + if(#kafrabank>0) menu "-Deposit money",-,"-Withdraw money",M_WITHDRAW,"-Quit",B_EXIT2; + + mes"[Manya]"; + mes "Please, tell me how much zeny you would like to deposit."; + next; + input @kafrabank; + + if(@kafrabank<1000) goto L_LESS_1000; + if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT; + if(@kafrabank>zeny) goto L_NOT_ENOUGH; + set zeny,zeny-@kafrabank; + set #kafrabank,#kafrabank+@kafrabank; + mes"[Manya]"; + mes "You've made a deposit of ^135445" + @kafrabank + "z^000000."; + + goto B_EXIT; + +M_WITHDRAW: + if(#kafrabank==0) goto L_ZERO_ACCOUNT; + mes"[Manya]"; + mes "Your account: ^135445" + #kafrabank + "^000000 zeny."; + mes "How much zeny would you like to withdraw?"; + next; + input @kafrabank; + + if(@kafrabank<1) goto B_EXIT2; + if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT; + if(@kafrabank>#kafrabank) goto L_NOT_ENOUGH; + set #kafrabank,#kafrabank-@kafrabank; + set zeny,zeny+@kafrabank; + mes"[Manya]"; + mes "Here is your ^135445" + @kafrabank + "z^000000, put your sign here..."; + goto B_EXIT; + +L_NOT_ENOUGH: + mes"[Manya]"; + mes "You don't have enough zeny for this operation."; + next; + goto B_EXIT2; + +L_ZERO_ACCOUNT: + mes"[Manya]"; + mes "You don't have any zeny on your account!"; + next; + goto B_EXIT2; + +L_TOO_BIG_AMOUNT: + mes"[Manya]"; + mes "Sorry. The maximum deposit you can make on a time is 1,000,000 zeny."; + next; + goto B_EXIT2; + +L_LESS_1000: + mes"[Manya]"; + mes "We're sorry, the minimum amount of zeny you can deposit is 1,000 zeny."; + next; + goto B_EXIT2; + +B_EXIT: + mes "Very well... Come again soon!"; + next; + +B_EXIT2: + mes"[Manya]"; + mes "Thank you for using our Bank Service. We hope to see you again soon."; + cutin "kafra_06",255; + close; + +} \ No newline at end of file diff --git a/npc/other/mc_cameri/bank.txt b/npc/other/mc_cameri/bank.txt new file mode 100644 index 000000000..95fdb0618 --- /dev/null +++ b/npc/other/mc_cameri/bank.txt @@ -0,0 +1,2793 @@ +//======================================================================================== +// -»» OmniAthena Scripts ««- +// Copyright (c) 2004, Athena Advanced +// http://agelessanime.com/aaforums/ +// By MC_Cameri +// This Bank NPC doesn't need any items. +// It is useful for servers in which you +// lose zeny when you die. +// Also, if you have 1,000,000,000z this +// will be good to use. +//======================================================================================== +//0072FF (sky blue) +//FF7F01 (orange) + +prt_in.gat,165,141,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +izlude_in.gat,57,110,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +morocc_in.gat,142,64,3 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} +geffen_in.gat,77,169,2 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +payon_in01.gat,68,64,7 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +alberta_in.gat,187,26,2 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} +aldebaran.gat,144,120,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +xmas_in.gat,35,37,5 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +cmd_in01.gat,115,171,7 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +yuno_in01.gat,119,29,2 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +amatsu.gat,189,108,6 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +gonryun.gat,146,142,3 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} + +um_in.gat,154,125,4 script Bank Manager 109,{ + set @tInterestRate, 2; //no decimals + set @tMaxAccZeny, 1000000000; //max zeny allowed in ^FF7F01Bank Account^000000 1,000,000,000=1 billion + set @tMaxZeny, 1000000000; //max zeny that a player can carry + set @tMinZeny, 100; //min zeny allowed or Bank Account is closed + set @tCreateZeny, 500; //zeny needed in order to create a Bank Account + set @tMinDeposit,100; //min zeny to deposit + set @tBeginningZeny, 100; //amount of zeny in Bank Account after creating + mes "^0072FF[Bank Manager]^000000"; + mes "Welcome to this office branch of Midgard's Bank."; + next; + if (vBankAccActive==1) goto AccMenu; + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have a ^FF7F01Bank Account^000000 yet, you must buy one."; + mes "It will cost you ^0000FF" + @tCreateZeny + "z^000000 to create it."; + next; + menu "^FF7F01Create Account.^000000",CreateAcc,"^FF7F01Information.^000000",BankInfo,"^FF7F01No thanks.^000000",NoCreateAcc; + BankInfo: + mes "^0072FF[Bank Manager]^000000"; + mes "Here are some points that you need to know:"; + mes "1. To create a ^FF7F01Bank Account^000000 you have to pay ^0000FF" + @tCreateZeny + "z^000000."; + mes "2. You will be charged ^0000FF" + @tInterestRate + " percent^000000 everytime you Deposit."; + mes "3. You must always have no less than ^0000FF" + @tMinZeny + "z^000000 on your ^FF7F01Bank Account^000000."; + next; + mes "4. You can save up to ^0000FF" + @tMaxAccZeny + "z^000000 in your bank account."; + mes "5. You will be able to access your ^FF7F01Bank Account^000000 in any town with a Bank Office."; + mes "6. You will start by having ^0000FF" + @tBeginningZeny + "z^000000 in your bank account."; + close; + CreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "First of all, you will have to have at least ^0000FF" + @tCreateZeny + "z^000000 with you."; + mes "Your account will start with ^0000FF" + @tBeginningZeny +"z^000000."; + mes "Are you sure you want to continue?"; + next; + menu "^FF7F01Sure.^000000",CreateAccCont,"^FF7F01Nah, it's ok.^000000",NoCreateAcc; + CreateAccCont: + if (@tCreateZeny > Zeny) goto CreateAccNoEnoughZeny; + set Zeny, Zeny - @tCreateZeny; + set vBankAccActive,1; + set vBankAccZeny, @tBeginningZeny; + set vBankAccLastZeny, @tBeginningZeny; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Congratulations, your ^FF7F01Bank Account^000000 is now created with ^0000FF" + vBankAccZeny + "z^000000."; + mes "You may now proceed to do any transactions."; + next; + goto AccMenu; + CreateAccNoEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Didn't I tell you to make sure you had enough zeny?"; + mes "You can't create it with just ^0000FF" + Zeny + "z^000000."; + mes "Come back when you get those ^0000FF" + @tCreateZeny + "z^000000..."; + next; + goto EndNPC; + NoCreateAcc: + mes "^0072FF[Bank Manager]^000000"; + mes "Come back when you change your mind!"; + next; + goto EndNPC; + AccMenu: + mes "^0072FF[Bank Manager]^000000"; + mes "Your current balance is ^0000FF" + vBankAccZeny +"z^000000."; + mes "What would you like to do now?"; + next; + menu "^FF7F01Deposit.^000000",AccDeposit,"^FF7F01Withdraw.^000000",AccWithdraw,"^FF7F01Bank Account Info.^000000",AccBalance,"^FF7F01Close Bank Account^000000",AccClose,"^FF7F01Cancel.^000000",EndNPC; + AccDeposit: + mes "^0072FF[Bank Manager]^000000"; + mes "It's always good to deposit every once in a while."; + mes "Be noticed that we charge a ^0000FF" + @tInterestRate + " percent ^000000 of interest rate in every deposit you make."; + mes "This means that to deposit ^0000FF100z^000000 you need to have pay us ^0000FF" + 100 * @tInterestRate / 100 + "z^000000."; + mes "How much are you willing to deposit?"; + next; + AccDepositInput: + input @tDeposit; + set @tDepositTax, @tDeposit * @tInterestRate / 100; + set @tDepositTotal, @tDeposit - @tDepositTax; + if (@tDeposit <= 0) goto AccDepositNoInput; + if (@tDeposit < @tMinDeposit) goto AccDepositNotEnoughInput; + if (@tDepositTotal > Zeny) goto AccDepositNotEnoughZeny; + set @tBankAccZenyTemp, vBankAccZeny + @tDepositTotal; + if (@tBankAccZenyTemp > @tMaxAccZeny) goto AccDepositOver; + if ((@tDeposit <= Zeny) && (@tBankAccZenyTemp <= @tMaxAccZeny)) goto AccDepositCont; + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, for some weird reason I couldn't deposit your money."; + next; + goto AccMenu; + AccDepositCont: + set Zeny, Zeny - @tDeposit; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, @tBankAccZenyTemp; + set vBankAccInterests, vBankAccInterests + @tDepositTax; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "^0000FF" + @tDeposit + "z^000000 substracted from your money (Taxes applied)."; + mes "^0000FF" + @tDepositTotal + "z^000000 successfully added to your ^FF7F01Bank Account^000000."; + next; + goto AccMenu; + AccDepositOver: + mes "^0072FF[Bank Manager]^000000"; + mes "There is a limit of ^0000FF" + @tMaxAccZeny + "z^000000 of how much zeny your ^FF7F01Bank Account^000000 can hold."; + mes "You can't deposit more than that, please try again."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You need to put more money in order to make a deposit."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "You must enter a value higher than ^0000FF" + @tMinDeposit + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccDepositNotEnoughZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "You don't have ^0000FF" + @tDepositTotal + "z^000000."; + mes "Remember that taxes are being applied."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccDepositInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdraw: + mes "^0072FF[Bank Manager]^000000"; + mes "This is the only transaction I don't like... you figure out why..."; + mes "You can't withdraw leaving less than ^0000FF" + @tMinZeny +"z^000000 in your ^FF7F01Bank Account^000000."; + mes "Your current balance is ^0000FF" + vBankAccZeny + "z^000000."; + mes "How much are you going to widthdraw?"; + next; + AccWithdrawInput: + input @tWithdraw; + set @tZenyLeft, vBankAccZeny - @tWithdraw; + set @tZenyTemp, Zeny + @tWithdraw; + if (@tWithdraw == 0) goto AccWithdrawNoInput; + if (@tZenyLeft < @tMinZeny) goto AccWithdrawMinZeny; + if (@tZenyTemp > @tMaxZeny) goto AccWithDrawOverCharZeny; + set Zeny, Zeny + @tWithdraw; + set vBankAccLastZeny, vBankAccZeny; + set vBankAccZeny, vBankAccZeny - @tWithdraw; + mes "^0072FF[Bank Manager]^000000"; + mes "Transaction completed successfully."; + mes "Thank you for using our services."; + next; + goto AccMenu; + AccWithdrawNoInput: + mes "^0072FF[Bank Manager]^000000"; + mes "In order to withdraw from the bank, you must withdraw more than 0 zeny."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithdrawMinZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "I'm sorry..."; + mes "You can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your ^FF7F01Bank Account^000000 must have ^0000FF" + @tMinZeny + "z^000000 left or more at all times."; + mes "In order to take all your money from the bank you must select Close Account in the Account Menu."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccWithDrawOverCharZeny: + mes "^0072FF[Bank Manager]^000000"; + mes "Sorry, but you can't withdraw ^0000FF" + @tWithdraw + "z^000000 because your Player can't carry more than ^0000FF" + @tMaxZeny + "z^000000."; + mes "Do you want to try again?"; + next; + menu "^FF7F01Yes, please.^000000",AccWithdrawInput,"^FF7F01No, thanks.^000000",AccMenu; + AccBalance: + mes "^0072FF[Bank Manager]^000000"; + mes "Account Status:"; + //shown in blue if the same or more, show in red if less than previous balance + if (vBankAccZeny >= vBankAccLastZeny) goto AccBalance2; + mes "Current Balance: ^FF0000" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance2: + mes "Current Balance: ^0000FF" + vBankAccZeny +"z^000000."; + goto AccBalance3; + AccBalance3: + mes "Previous Balance: ^0000FF" + vBankAccLastZeny +"z^000000."; + mes "Interest Rate: ^0000FF" + @tInterestRate + "%^000000."; + mes "Interests Payed: ^0000FF" + vBankAccInterests + "z^000000."; + next; + goto AccMenu; + AccClose: + mes "^0072FF[Bank Manager]^000000"; + mes "If you close your ^FF7F01Bank Account^000000, it means you eliminate it."; + mes "Of course, you will get all your money back."; + mes "Are you sure you want to close your ^FF7F01Bank Account^000000?"; + next; + menu "^FF7F01I don't want it anymore.^000000",AccCloseConfirm,"^FF7F01No, I'll keep it.^000000",AccCloseKeep; + AccCloseConfirm: + set vBankAccActive,0; + set Zeny, Zeny + vBankAccZeny; + set vBankAccZeny,0; + set vBankAccLastZeny,0; + set vBankAccInterests,0; + mes "^0072FF[Bank Manager]^000000"; + mes "Thanks for using our services, we hope you come back to visit us."; + mes "Here's your money."; + next; + goto EndNPC; + AccCloseKeep: + mes "^0072FF[Bank Manager]^000000"; + mes "Good choice, thanks for staying with us."; + next; + goto AccMenu; + EndNPC: + set @random,rand(4); + mes "^0072FF[Bank Manager]^000000"; + if (@random == 0) mes "Have a nice day!"; + if (@random == 1) mes "See you soon!"; + if (@random == 2) mes "See you next time!"; + if (@random == 3) mes "Come back soon!"; + close; +} \ No newline at end of file diff --git a/npc/other/momotaro.txt b/npc/other/momotaro.txt new file mode 100644 index 000000000..c2eb7f475 --- /dev/null +++ b/npc/other/momotaro.txt @@ -0,0 +1,439 @@ +//===================================================================== +//MOMOTAROevent +//===================================================================== +amatsu.gat,223,235,4 script o”ÅŽÐEˆõ 763,{ + if (event_momo == 10) goto Lfin; + if ((event_momo >= 1) && (event_momo <= 4)) goto Lget; + mes "[o”ÅŽÐEˆõ]"; + mes "‚±‚ñ‚É‚¿‚Í`"; + mes "‘º‚É‘ãX“`‚í‚é̘b‚Ì‚Ý‚ð"; + mes "ˆµ‚¤Ž„‚Ç‚à^009CFFƒcƒ‹ƒJƒo”ÅŽÐ^000000‚Å‚Í"; + mes "˜VŽá’j—‚ð–â‚킸l‹C‚Ì̘b"; + mes "^009CFF<ƒ‚ƒ‚ƒ^ƒ>^000000‚ð‚È‚ñ‚Æcc"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "•S–œ•”I”­s‚·‚邱‚Æ‚ª"; + mes "‚Å‚«‚½‚ñ‚Å‚·B"; + mes "‚»‚Ì‹L”O‚ÉA^3163FFƒ‚ƒ‚ƒ^ƒ‘ÌŒ±ŠÙ^000000‚ð"; + mes "Ý—§‚µ‚Ü‚µ‚½B"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "ŽÀÛƒ‚ƒ‚ƒ^ƒ˜b‚ÌŽålŒö‚É‚È‚Á‚Ä"; + mes "¬‹S‚ð‘ÞŽ¡‚Å‚«‚¿‚Ⴄ‚Ì‚Å‚·B"; + mes "Œi•i‚à‚ ‚è‚Ü‚·‚æI"; + next; + menu "ƒ‚ƒ‚ƒ^ƒ‚Á‚ĉ½H",-,"‚º‚Б̌±‚µ‚½‚¢‚Å‚·I",L1,"Ž„‚Í–Z‚µ‚¢‚Ì‚Åcc",L2; + mes "[o”ÅŽÐEˆõ]"; + mes "I ƒ‚ƒ‚ƒ^ƒ˜b‚ð’m‚ç‚È‚¢‚È‚ñ‚Ä"; + mes "—¬s‚É“ÝŠ´‚È‚¨l‚Å‚·‚Ëcc"; + mes "‚»‚ê‚Å‚ÍŽ„‚ª‚¨˜b‚µ‚Ü‚µ‚傤cc"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "ÌXA”N˜V‚¢‚½•v•w‚ª•é‚炵‚Ä"; + mes "‚¢‚Ü‚µ‚½cc•v•w‚Í‚Æ‚Ä‚à’‡‚ª"; + mes "—Ç‚©‚Á‚½‚Ì‚Å‚·‚ªAŽq‹Ÿ‚ª"; + mes "‚¢‚È‚©‚Á‚½‚Ì‚Å‚·cc"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "‚ ‚é“úA‚¨”k‚³‚ñ‚ªì‚Åô‘󂵂Ä"; + mes "‚¢‚é‚ÆA‘å‚«‚È“‚ª—¬‚ê‚Ä‚«‚½‚Ì‚Å‚·B"; + mes "‚·‚®‚É“‚ðˆø‚«ã‚°‚ÄA‰Æ‚É‹A‚Á‚Ä"; + mes "‚¨–ꂳ‚ñ‚ÆŠ„‚Á‚Ä‚Ý‚é‚Æcc"; + mes "‚»‚Ì’†‚©‚ç‚È‚ñ‚ÆI"; + mes "Ô‚ñ–V‚ªŒ»‚ꂽ‚Ì‚Å‚·B"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "‚¨–ꂳ‚ñ‚Æ‚¨”k‚³‚ñ‚Í‚½‚¢‚»‚¤"; + mes "‚Ñ‚Á‚­‚肵‚Ü‚µ‚½‚ªA‚»‚ÌÔ‚ñ–V‚ð"; + mes "Ž©•ª‚½‚¿‚ÌŽq‚Æ‚µ‚Ĉç‚Ă邱‚Æ‚É"; + mes "‚µ‚½‚Ì‚Å‚·B"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "‚»‚ÌŽq‚Í‚·‚­‚·‚­‚ƈ炿A"; + mes "”“úŒã‚É‚Í‚à‚¤A‚·‚Á‚©‚è"; + mes "‚½‚­‚Ü‚µ‚¢­”N‚É‚È‚Á‚½‚Ì‚Å‚·B"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "‚»‚ÌŽq‚Ì–¼‘O‚Í<ƒ‚ƒ‚ƒ^ƒ>"; + mes "‚Æ–¼‚¯‚ç‚êA“–Žž‘ºl‚ð"; + mes "‹ê‚µ‚ß‚Ä‚¢‚½¬‹S‚ð‘ÞŽ¡‚·‚é"; + mes "‚½‚ß‚É—·‚Éo‚½‚Ì‚Å‚·cc"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "“¹’†‚ʼnï‚Á‚½^3163FF‰ŽAè³AŒ¢^000000‚ð"; + mes "’‡ŠÔ‚É‚µ‚ÄA‚Æ‚¤‚Æ‚¤ÅŒã‚É‚Í"; + mes "‚Ý‚²‚Ƭ‹S‚ð‘ÞŽ¡‚µ‚Ä"; + mes "‚¨–ꂳ‚ñ‚Æ‚¨”k‚³‚ñ‚ÆK‚¹‚É"; + mes "•é‚炵‚½‚»‚¤‚Ècc -Š®-"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "‚Ç‚¤‚Å‚·H"; + mes "•S–œ•”‚Ì‚¨‚à‚µ‚낳‚ÍI"; + close; +L1: + mes "[o”ÅŽÐEˆõ]"; + mes "‚ÞIˆÐ¨‚Ì—Ç‚¢‚¨•û‚Å‚·‚ËI"; + mes "Ž„‚Ü‚ÅŒ³‹C‚É‚È‚è‚»‚¤‚Å‚·B"; + mes "‚Å‚ÍA‚±‚Ì\ž‘‚Ö‹L“ü‚ðcc"; + next; + mes "[o”ÅŽÐEˆõ]"; + mes "cc"; + mes "cc‚Ó‚Þ‚Ó‚Þcc"; + mes "cc‚Í‚¢I—Ç‚¢‚Å‚·I"; + mes "‚»‚ê‚Å‚Í‘‘¬cc"; + mes "<ƒ‚ƒ‚ƒ^ƒ‘ÌŒ±ŠÙ>!!"; + mes "Šy‚µ‚ñ‚Å‚«‚Ä‚­‚¾‚³‚¢"; + next; + warp "ama_test",52,35; + break; +L2: + mes "[o”ÅŽÐEˆõ]"; + mes "Œi•i‚ào‚é‚ñ‚Å‚·‚ªcc(ƒ{ƒ\ƒb)"; + close; +Lget: + mes "[o”ÅŽÐEˆõ]"; + mes "‚Ç‚¤‚Å‚·AŠy‚µ‚ñ‚Å‚¢‚½‚¾‚¯"; + mes "‚Ü‚µ‚½‚©H"; + mes "‚ЂÁ‚»‚è‚Æ€”õ‚µ‚Ä‚«‚½"; + mes "‘ÌŒ±ŠÙ‚Å‚·‚ªA­‚µ‚Å‚à"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‰ß‚²‚¹‚Ä‚¢‚½‚¾‚¯"; + mes "‚½‚çK‚¢‚Å‚·B"; + next; + if (event_momo == 1) getitem 627,1; + if (event_momo == 2) getitem 629,1; + if (event_momo == 3) getitem 625,1; +//ƒAƒ€ƒ€ƒg¬Œ÷Œã•s–¾ + if (event_momo == 4) getitem 629,1; + set event_momo,10; + mes "[o”ÅŽÐEˆõ]"; + mes "‚Å‚ÍAŽ„‚Ç‚à‚ª—pˆÓ‚µ‚½‘e•i‚ð"; + mes "i’æ‚¢‚½‚µ‚Ü‚µ‚傤B"; + mes "¡Œã‚Æ‚à̘b‚ª"; + mes "L‚­ˆ¤‚³‚ê‚Ü‚·‚悤‚Écc"; + close; +Lfin: + mes "[o”ÅŽÐEˆõ]"; + mes "—Ç‚¢“V‹C‚Å‚·‚Ë‚¥cc"; + mes "‚±‚ñ‚È“ú‚Í•z’c‚ðŠ±‚µ‚½‚­‚È‚è‚Ü‚·B"; + close; +} +//===================================================================== +ama_test.gat,52,44,4 script ‘Ò‹@Žº’S“–ŽÒ 109,{ + mes "[ƒTƒgƒV]"; + mes "<ƒ‚ƒ‚ƒ^ƒ‘ÌŒ±ŠÙ>‚É"; + mes "‚悤‚±‚»I"; + next; + mes "[ƒTƒgƒV]"; + mes "Ž„‚Í<ƒ‚ƒ‚ƒ^ƒ‘ÌŒ±ŠÙ>‚Ì"; + mes "TŽº’S“–AƒTƒgƒV‚Æ\‚µ‚Ü‚·B"; + next; + mes "[ƒTƒgƒV]"; + mes "Œ³X‚Ío”ŎЂœ­‚¢‚Ä‚¢‚½"; + mes "‚Ì‚Å‚·‚ªccl‚ª‘«‚è‚È‚­‚Ä"; + mes "‹}‚É”hŒ­‚³‚ê‚Ä‚µ‚Ü‚¢‚Ü‚µ‚½cc"; + mes "‚Å‚àA‚æ‚©‚Á‚½‚Å‚·I"; + mes "‚±‚ñ‚È‚Ó‚¤‚É‚Ú[‚Á‚Æ‚µ‚È‚ª‚ç"; + mes "’§í‚·‚él‚ðŒ©•¨‚Å‚«‚é‚ñ‚Å‚·‚©‚çB"; + next; + mes "[ƒTƒgƒV]"; + mes "cc"; + mes "‚¢‚â‚¢‚âAç’k‚Å‚·‚æcc"; + mes "(Š¾‚ð‚Ê‚®‚¤)"; + next; + mes "[ƒTƒgƒV]"; + mes "‚Å‚ÍA‘ÌŒ±ŠÙ‚ɂ‚¢‚Ä"; + mes "‚²à–¾‚ð‚³‚µ‚ ‚°‚Ü‚·B"; + next; + mes "[ƒTƒgƒV]"; + mes "ˆê‰žAƒ‚ƒ‚ƒ^ƒ‚̘b‚ɂ‚¢‚Ä‚Í"; + mes "ŠO‚ÌEˆõ‚©‚çŽf‚Á‚Ä‚Ü‚·‚æ‚ËH"; + next; + menu "‚Í‚¢",L1,"‚¢‚¢‚¦",-; + mes "[TŽº’S“–]"; + mes "‚ ‚ñ‚Å‚·‚ÆH"; + mes "‚±‚±‚Ü‚Å—ˆ‚Ęb‚ð’m‚ç‚È‚¢‚ÆH"; + mes "cc"; + mes "ƒ‚ƒ‚ƒ^ƒƒtƒ@ƒ“‚Æ‚µ‚Ä"; + mes "”F‚߂邱‚Æ‚Í‚Å‚«‚Ü‚¹‚ñ‚Ècc"; + next; + mes "[TŽº’S“–]"; + mes "ŠO‚ÌEˆõ‚©‚ç˜b‚ð•·‚¢‚Ä‚«‚È‚³‚¢B"; + mes "‚»‚ê‚©‚ç‚Å‚·cc"; + mes "‚³‚悤‚È‚ç`"; + next; + warp "amatsu.gat",223,230; + break; +L1: + mes "[ƒTƒgƒV]"; + mes "‚Ó‚Ócc"; + mes "ƒ‚ƒ‚ƒ^ƒ‚̘b‚ÍAŽ„‚Ç‚à‚Ì"; + mes "o”ŎЂ̎©–ì‚Å‚·I"; + mes "Å‚Œ†ì‚Å‚µ‚傤H"; + mes "ƒnƒnƒnƒb!!!"; + next; + mes "[ƒTƒgƒV]"; + mes "ccƒtƒ€ƒtƒ€"; + next; + mes "[ƒTƒgƒV]"; + mes "‘ÌŒ±ŠÙ‚̃‹[ƒ‹‚ÍŠÈ’P‚Å‚·B"; + mes "’†‚É“ü‚Á‚ă‚ƒ‚ƒ^ƒ‚̂悤‚É"; + mes "—E‚Ü‚µ‚­!!! ¬‹S‚ð‘ÞŽ¡‚·‚ê‚Î"; + mes "—Ç‚¢‚ñ‚Å‚·B"; + mes "‚»‚¤A—E‚Ü‚µ‚­!!!!! ‚Å‚·B"; + next; + mes "[ƒTƒgƒV]"; + mes "‚»‚µ‚ÄA’ˆÓŽ–€‚ª"; + mes "ŽO‚‚ ‚è‚Ü‚·B"; + next; + mes "[ƒTƒgƒV]"; + mes "ˆê‚–ÚA"; + mes "“–‘ÌŒ±ŠÙ‚͈ê“x‚Å‚àƒNƒŠƒA‚³‚ê‚é‚Æ"; + mes "‚Ü‚½“ü‚邱‚Æ‚ª‚Å‚«‚Ü‚¹‚ñB"; + mes "‚»‚Ì“_‚É‹C‚ð‚‚¯‚Ä‚­‚¾‚³‚¢B"; + next; + mes "[ƒTƒgƒV]"; + mes "“ñ‚–ÚA"; + mes "‘ÌŒ±ŠÙ“à‚ɂ̓yƒbƒg‚ð"; + mes "˜A‚ê‚Ä‚¢‚©‚È‚¢‚Å‚­‚¾‚³‚¢B"; + mes "‚à‚µƒyƒbƒg‚ð˜A‚ê‚Ä‚¢‚ç‚Á‚µ‚á‚Á‚½‚ç"; + mes "—‘‚É•Ï‚¦‚Ä‚©‚炨“ü‚è‚­‚¾‚³‚¢B"; + next; + mes "[ƒTƒgƒV]"; + mes "ÅŒã‚Ì’ˆÓŽ–€A"; + mes "‘ÌŒ±ŠÙ‚͈êl‚ ‚½‚è6•ªŠÔ"; + mes "‚̧ŒÀŽžŠÔ‚ª‚ ‚è‚Ü‚·B"; + next; + mes "[ƒTƒgƒV]"; + mes "‚³‚ŸA‚»‚ê‚Å‚ÍTŽºƒ`ƒƒƒbƒg‚É"; + mes "“ü‚Á‚ć”Ô‚ð‚¨‘Ò‚¿‚­‚¾‚³‚¢B"; + mes "Œ’“¬‚ð‹F‚è‚Ü‚·!!!"; + close; +OnInit: + waitingroom "‘ÌŒ±ŠÙTŽº",1,"‘Ò‹@Žº’S“–ŽÒ::OnMax"; + break; +OnMax: + doevent "roomt"; + warpwaitingpc "ama_test.gat",50,83; + disablenpc "‘Ò‹@Žº’S“–ŽÒ"; + disablenpc "ŠÇ—l"; + enablenpc "‚¨”k‚³‚ñ"; + enablenpc "‚¨–ꂳ‚ñ"; + break; +} +ama_test.gat,49,93,4 script ‚¨–ꂳ‚ñ 766,{ + close; +} +ama_test.gat,50,93,4 script ‚¨”k‚³‚ñ 761,{ + mes "[‚¨”k‚³‚ñ]"; + mes "ƒtƒH[[!?"; + next; + mes "[‚¨”k‚³‚ñ]"; + mes "‚¨–ꂳ‚ñA"; + mes "Ž„‚Ì‚¨‹àA‚Ç‚±‚Ö‚¢‚Á‚½‚©"; + mes "’m‚ç‚È‚¢‚©‚¢H"; + next; + mes "[‚¨–ꂳ‚ñ]"; + mes "”k‚³‚ñ‚âcc‘º’·—l‚ªŒ¾‚¤‚É‚ÍA"; + mes "‚±‚Ì‚²‚묋S‚ªl‚©‚炨‹à‚ð"; + mes "“‚ނ悤‚É‚È‚Á‚Ä‘º’†‘å‘›‚¬"; + mes "‚È‚ñ‚¶‚á‚æcc"; + next; + mes "[‚¨”k‚³‚ñ]"; + mes "ƒLƒBƒBƒBccI"; + next; + mes "[‚¨–ꂳ‚ñ]"; + mes "‚»‚±‚©‚µ‚±‚Å‚»‚̘b‚ÅŽ‚¿‚«‚肶‚ácc"; + next; + mes "[‚¨–ꂳ‚ñ]"; + mes "‚»‚±‚Ń‚ƒ‚ƒ^ƒ‚æcc"; + next; + mes "[‚¨–ꂳ‚ñ]"; + mes "‚¨‘O‚à’m‚Á‚Ä‚¢‚é‚悤‚É"; + mes "‚±‚±‚̘A’†‚͉°•aŽÒ‚΂©‚è‚Å"; + mes "¬‹S‚ð‘ÞŽ¡‚·‚é—Í‚à‚È‚¢cc"; + mes "ƒ‚ƒ‚ƒ^ƒA‚¨‚Ü‚¦‚É—Š‚Ý‚½‚¢"; + mes "‚Ì‚¶‚ácc"; + next; + mes "[‚¨”k‚³‚ñ]"; + mes "ƒ‚ƒ‚ƒ^ƒcc"; + mes "‚±‚Ì”k‚ª‚¨‘O‚Ì‚½‚ß‚É‚Æ"; + mes "^3355ff‚±‚Ì¢‚ňê”Ô”ü–¡‚µ‚¢Ôƒ|[ƒVƒ‡ƒ“"; + mes "‚ðŽ‚½‚¹‚Ä‚â‚肽‚©‚Á‚½‚ªcc"; + mes "‘S•”ì‚é‚Ì‚ðŽ¸”s‚µ‚Ä‚µ‚à‚¤‚½cc^000000"; + next; + mes "[‚¨”k‚³‚ñ]"; + mes "‚·‚Ü‚È‚¢‚Ëccƒ‚ƒ‚ƒ^ƒ‚âcc"; + next; + mes "[‚¨”k‚³‚ñE‚¨–ꂳ‚ñ]"; + mes "‚»‚ê‚Å‚Í—Š‚ñ‚¾‚¼cc"; + disablenpc "‚¨”k‚³‚ñ"; + disablenpc "‚¨–ꂳ‚ñ"; + set @mobdie,0; + monster "ama_test.gat",47,101,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",51,101,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",55,101,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",55,97,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",55,93,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",53,91,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",49,91,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",45,96,"¬‹S",1110,1,"mobcount"; + monster "ama_test.gat",45,99,"¬‹S",1110,1,"mobcount"; + close; +} +ama_test.gat,50,100,4 script ŠÇ—l 762,{ + mes "[ŠÇ—l]"; + mes "ƒzƒzƒb‚â‚é‚Ècc"; + mes "Ž„‚Í‚±‚±‚ÌŠÇ—l‚ð‚µ‚Ä‚¨‚邪cc"; + mes "‚¨‚Ê‚µ‚½‚¾‚à‚Ì‚Å‚Í‚È‚¢‚ÈH"; + mes "‚È‚©‚È‚©‹Á‚¢‚½‚¼B"; + next; + mes "[ŠÇ—l]"; + mes "˜b‚Ì’†‚̃‚ƒ‚ƒ^ƒ‚ª"; + mes "‚±‚Ì¢‚ÉŒ»‚ê‚é‚Æ‚Í‚ÈI"; + mes "ƒzƒzƒzƒzƒzI"; + next; + menu "—]—T‚Å‚µ‚½‚Ë",L1,"‚­‚¾‚ç‚È‚¢cc",L2; +L1: + mes "[ŠÇ—l]"; + mes "ƒzƒbƒzƒbƒzcc"; + mes "‚ ‚Ü‚è’²Žq‚Éæ‚é‚Å‚È‚¢cc"; + mes "Ž„‚ª‚¨‚Ê‚µ‚Ù‚Ç‚ÌŽž‚Í"; + mes "¬‹S‚È‚ÇŽw‚ÅŒy‚­‚Ђ˂Á‚Ä"; + mes "‚­‚ꂽ‚íccƒzƒzƒzcc"; + next; + mes "[ŠÇ—l]"; + mes "cc"; + mes "ç’k‚¶‚áB"; + next; + mes "[ŠÇ—l]"; + mes "‚»‚ꂶ‚áAƒ‚ƒ‚ƒ^ƒ‘ÌŒ±ŠÙ‚ð"; + mes "Šy‚µ‚ñ‚Å‚­‚ꂽ‚©‚ÈH"; + mes "ʼn‚ɉï‚Á‚½Eˆõ‚Ƙb‚¹‚Î"; + mes "‰äX‚ª—pˆÓ‚µ‚½Œi•i‚Æ‚­‚ê‚邾‚낤B"; + next; + mes "[ŠÇ—l]"; + mes "‰½‚Í‚Æ‚à‚ ‚êA‚»‚Ì‹­‚«S‚ð"; + mes "Ž¸‚¤‚È‚©‚êI"; + next; + set event_momo,1; + deltimer "roomt"; + disablenpc "ŠÇ—l"; + enablenpc "‘Ò‹@Žº’S“–ŽÒ"; + warp "amatsu.gat",223,230; + break; +L2: + mes "[ŠÇ—l]"; + mes "!!!!!"; + mes "ccƒzcƒzƒzƒzcc"; + mes "‚¨‚à‚µ‚ë‚¢“z‚¾‚Ècc"; + mes "‚悵cc"; + mes "Ž„‚©‚çˆê‚Â’ñˆÄ‚ª‚ ‚éB"; + next; + mes "[ŠÇ—l]"; + mes "–{—ˆ‚È‚ç¡‚·‚®‚¨‘O‚ð"; + mes "’@‚«o‚·‚Æ‚±‚낾‚ªcc"; + mes "‚¨‚Ê‚µ‚Ì–{“–‚ÌŽÀ—Í‚ª’m‚肽‚¢"; + mes "‚©‚ç‚ÈccƒzƒzƒzB"; + mes "‚Ü‚é‚ÅŽ„‚ÌŽá‚©‚肵 ‚ðŒ©‚é‚悤‚¾B"; + mes "ƒzƒzƒzƒzƒb"; + next; + mes "[ŠÇ—l]"; + mes "‚Ç‚¤‚¾HŽ„‚©‚çˆê“x‹@‰ï‚ð"; + mes "—^‚¦‚悤Bˆê“x’§í‚µ‚½‚ç"; + mes "^3355ff“ñ“x‚Æ’§í‚Å‚«‚È‚¢^000000‚ªcc"; + mes "ŽŸ‚Í‚¨‚Ê‚µ‚Å‚à“‚¢‚¾‚낤B"; + next; + menu "‚à‚¤[•ª‚Å‚·",L2_1,"’§í‚µ‚Ä‚Ý‚Ü‚·",L2_2; +L2_1: + mes "[ŠÇ—l]"; + mes "ƒzƒzcc"; + mes "‚¨‚Ê‚µ‚à‘O‚Ìí‚¢‚Å”æ‚ê‚Ä‚¨‚é‚©B"; + mes "‚Ü‚Ÿ‚¢‚¢ccƒ‚ƒ‚ƒ^ƒ‘ÌŒ±ŠÙ‚ÍŠy‚µ‚ñ‚Å‚­‚ꂽ‚©‚ÈH"; + mes "ʼn‚ɉï‚Á‚½Eˆõ‚Ƙb‚¹‚Î"; + mes "‰äX‚ª—pˆÓ‚µ‚½Œi•i‚ð‚­‚ê‚邾‚낤B"; + next; + mes "[ŠÇ—l]"; + mes "‰½‚Í‚Æ‚à‚ ‚êA‚»‚Ì‹­‚«S‚ð"; + mes "Ž¸‚¤‚È‚©‚êI"; + next; + set event_momo,2; + deltimer "roomt"; + disablenpc "ŠÇ—l"; + enablenpc "‘Ò‹@Žº’S“–ŽÒ"; + warp "amatsu.gat",223,230; + break; +L2_2: + mes "[ŠÇ—l]"; + mes "ƒzƒzƒzA‚Ü‚·‚Ü‚·‹C‚É“ü‚Á‚½‚¼I"; + mes "ÅŒã‚ÌŒˆí‚¾B"; + mes "‚¨‚Ê‚µ‚ÌŽÀ—Í‚ðˆâŠ¶‚È‚­"; + mes "”­Šö‚·‚é‚悤‚ÉI"; + monster "ama_test.gat",35,103,"‹S",1301,1,"mobcount2"; + monster "ama_test.gat",56,111,"‹S",1301,1,"mobcount2"; + monster "ama_test.gat",40,91,"‹S",1301,1,"mobcount2"; + disablenpc "ŠÇ—l"; + set event_momo,3; + close; +Onstart: + mes "[ŠÇ—l]"; + mes "ƒzƒzcc"; + close; +} +//=======================================MobCount===============================- +ama_test.gat,0,1,0 script mobcount -1,{ + if (@mobdie == 8) goto Lfin; + set @mobdie,@mobdie+1; + set @mobrand,rand(4); + if (@mobrand == 1) goto Lrand2; + if (@mobrand == 2) goto Lrand3; + if (@mobrand == 3) goto Lrand4; +Lrand1: + areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: ƒIƒ‰‚̓iƒjƒ‚ƒVƒeƒiƒCI",8;break; +Lrand2: + areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: ƒSƒƒ“ƒiƒTƒCƒSƒƒ“ƒiƒTƒC",8;break; +Lrand3: + areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: ƒA[[c",8;break; +Lrand4: + areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: •sˆÓ‘Å‚¿‚©[c",8;break; +Lfin: + areaannounce "ama_test.gat",30,78,68,120,"DOKEBI: ƒSƒIƒIƒIƒIcc",8; + enablenpc "ŠÇ—l"; + doevent "ŠÇ—l::Onstart"; + break; +} +//=======================================MobCount2==============================- +ama_test.gat,50,101,0 script mobcount2 -1,{ + if (@mobdie2 == 2) goto Lfin; + set @mobdie2,@mobdie2+1; + areaannounce "ama_test.gat",30,78,68,120,"AMMUT: ‚®‚¨‚¨‚¨‚¨c",8;break; +Lfin: + set event_momo,4; + deltimer "roomt"; + enablenpc "‘Ò‹@Žº’S“–ŽÒ"; + warp "amatsu.gat",223,230; + break; +} +//=======================================TIMER==================================- +ama_test.gat,50,102,0 script roomt -1,{ + deltimer "roomt"; + mapannounce "ama_test.gat","¡‚©‚秌ÀŽžŠÔ‚Í‚U•ªŠÔ‚Å‚·B",8; + addtimer 180000,"roomt::On180000"; + break; +On180000: + deltimer "roomt"; + mapannounce "ama_test.gat","‚ ‚ÆŽO•ª‚Å‚·B",8; + addtimer 120000,"roomt::On300000"; + break; +On300000: + deltimer "roomt"; + mapannounce "ama_test.gat","‚ ‚ƈꕪB",8; + addtimer 60000,"roomt::On360000"; + break; +On360000: + mapannounce "ama_test.gat","ƒs- ƒs- ƒs- Ž‚¿ŽžŠÔ‚ª–³‚­‚È‚è‚Ü‚µ‚½B",8; + deltimer "roomt"; + disablenpc "ŠÇ—l"; + enablenpc "‘Ò‹@Žº’S“–ŽÒ"; + areawarp "ama_test.gat",30,78,68,120,"amatsu.gat",223,230; + break; +} \ No newline at end of file diff --git a/npc/other/msg_boards.txt b/npc/other/msg_boards.txt new file mode 100644 index 000000000..a3dfe38f2 --- /dev/null +++ b/npc/other/msg_boards.txt @@ -0,0 +1,175 @@ +//===== eAthena Script ======================================= +//= Message Boards +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Rearranged [Lupus] +//============================================================ + + + +//=======================================================================// +// Al De Baran // +//=======================================================================// +/ Welcome Sign ------------------------------------------------ +aldebaran.gat,133,104,1 script Welcome Sign 111, +{ + mes "~sign reads....~"; + mes "Hello and enjoy your visit to Aldebaran! Aldebaran is the mystical city of clocks and Kafras!"; + close; +} + +// Kafra Corp. Main Office Sign --------------------------------------------------------------- +aldebaran.gat,53,223,1 script Kafra Corp. Main Office 111, +{ + mes "~sign reads...~"; + mes "This is the Kafra Services Main Office, home to the lovely Kafra employees."; + close; +} + + +//=======================================================================// +// Alberta // +//=======================================================================// +// Sign: Alberta Harbor ----------------------------------------------- +alberta.gat,35,241,1 script Alberta Harbor 111, +{ + mes "~sign reads....~"; + mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!"; + close; +} + +// Welcome Sign ----------------------------------------------- +alberta.gat,196,152,1 script Welcome Sign 111, +{ + mes "~sign reads...~"; + mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!"; + close; +} + +// Sign: Merchant Guild ------------------------------------------ +alberta.gat,37,39,1 script Merchant Guild 111, +{ + mes "~sign reads...~"; + mes "Enjoy the art of buying and selling? Love making unbeatable deals?"; + mes "Then the Alberta Merchant Guild is perfect for you!"; + mes "Come on inn and find out all you need to know about becoming a Merchant."; + close; +} + + +//=======================================================================// +// Geffen // +//=======================================================================// +// Welcome Sign ---------------------------------------------- +geffen.gat,116,58,1 script Welcome Sign 111, +{ + mes "~sign reads...~"; + mes "Greetings!! You are in the wonderfull city of Geffen! Geffen is the city of Magic and home to Mages and Wizards!."; + close; +} + +// Sign: Restaurant Inn --------------------------------------------- +geffen.gat,167,175,1 script Geffen Restaurant Inn 111, +{ + mes "~sign reads..... ~"; + mes "Welcome weary travelers! Have a hot meal and stay the night at the the Geffen Restaurant Inn!"; + close; +} + +// Sign: Mage Association --------------------------------------- +geffen.gat,61,174,1 script Mage Association 111, +{ + mes "~sign reads...~"; + mes "Greetings!! This is the Geffen Magic Academy. Come in if you have an interest in all things magic!"; + close; +} + +// Sign: Geffen Tower Sign ---------------------------------------------- +geffen.gat,113,104,1 script Geffen Tower 111, +{ + mes "~sign reads...~"; + mes "This is the Geffen Tower, home to the Wizard Academey as well as the infamous Geffen Dungeon. Novices beware!!!"; + close; +} + +// Sign: Blacksmith Guild ------------------------------------------- +geffen.gat,184,61,1 script Blacksmith Guild 111, +{ + mes "~sign reads...~"; + mes "This is the Blacksmith Guild."; + close; +} + +// Sign Post ----------------------------------------------------------- +geffen.gat,119,190,0 script Sign Post 111, +{ + mes "~sign reads...~"; + mes "North to Geffen Fields"; + mes "NorthEast to Al De Baran"; + mes "NorthWest to Glast Heim"; + mes "East to Geffen Fields"; + mes "South to Morroc"; + mes "SouthEast to Prontera"; + mes "Further SouthEast to Alberta"; + mes "Further SouthWest to Comodo"; + mes "West to Geffen Fields"; + close; +} + + +//=======================================================================// +// Morroc // +//=======================================================================// +// Welcome Sign --------------------------------------------------- +morocc.gat,168,264,1 script Welcome Sign 111, +{ + mes "~sign reads...~"; + mes "Morocc welcomes you! Morocc is the city of the desert and home to Thieves, Assassins, and alls sorts of Egyption temptations!"; + close; +} + +// Sign: Inn ---------------------------------------------------------- +morocc.gat,272,272,1 script Morroc Town Inn 111, +{ + mes "~sign reads....~"; + mes "Welcome weary travelers! Stay the night at the Morroc Town Inn."; + close; +} + + +//=======================================================================// +// Payon // +//=======================================================================// + + + +//=======================================================================// +// Prontera // +//=======================================================================// +// Welcome Sign ----------------------------------------------------------- +prontera.gat,156,197,1 script Welcome Sign 111, +{ + mes"~sign reads...~"; + mes "You've found yourself in the great city of Prontera! Prontera is one of the largest cities in Rune-Midgard and is home to the Prontera Chivalry!"; + close; +} + +// Sign Post ---------------------------------------------------------------- +prontera.gat,158,213,1 script Sign Post 111, +{ + mes "~ the sign post reads ~"; + mes "North to Prontera Castle"; + mes "Farther North to Al De Baran"; + mes "Northwest to Geffen"; + mes "East to Prontera Fields"; + mes "South to Prontera Fields"; + mes "Farther SouthEast to Alberta"; + close; +} diff --git a/npc/other/old/guide.txt b/npc/other/old/guide.txt new file mode 100644 index 000000000..8952fd20b --- /dev/null +++ b/npc/other/old/guide.txt @@ -0,0 +1,1153 @@ +//===== eAthena Script ======================================= +//= Guide Script +//===== By: ================================================== +//= Lotsa People (1.0) +//= Even More People (1.1) +//= Darkchild (1.2) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= Any eAthena Version In Which Duplicate Works +//===== Description: ========================================= +//= Guides In RO World +//===== Additional Comments: ================================= +//= 1.2 - Used the duplicate and fixed minor things +//============================================================ + +//[Prontera Guide] + +//Complete +prontera.gat,154,187,4 script Guide#p1-1::guide_p 105,{ + cutin "prt_soldier",2; + mes "[Prontera Squad]"; + mes "Welcome to Prontera,the Capital City of Rune-Midgard Kingdom."; + mes "We can help you to find Buildings easily, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Prontera Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please.",-,"No, Thanks.",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + mes "[Prontera Squad]"; + mes "Please select location you want me to show you."; + L_SUB_1: + next; + menu "Swordman Asosiation",L_MENU_1_1,"^0000FFSantuary^000000",L_MENU_1_2,"Prontera Chivalry",L_MENU_1_3,"Armory",L_MENU_1_4,"Kit Shop",L_MENU_1_5,"Inn",L_MENU_1_6,"Trading Post",L_MENU_1_7,"Pub",L_MENU_1_8,"Library",L_MENU_1_9,"Job Agency",L_MENU_1_10,"The Castle of Prontera",L_MENU_1_11,"City Hall",L_MENU_1_12,"Cancel",L_MENU_1_13; + L_MENU_1_1: + mes "[Prontera Squad]"; + mes "The 'Swordman Assosiation' has moved to Izlude, the Sattelite of Prontera, now that Building is Empty"; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,237,41,1,0x00FF00; + goto L_SUB_1; + L_MENU_1_2: + mes "[Prontera Squad]"; + mes "The main Chapel of Rune-Midgard Kingdom, `Santuary' is located at Northeast. Usually citizens visit there to become Acolyte"; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,236,316,2,0xFF0000; + goto L_SUB_1; + L_MENU_1_3: + mes "[Prontera Squad]"; + mes "'Prontera Chivalry' the Defense Force of Prontera City is located at Northwest."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,46,345,3,0x00FF00; + goto L_SUB_1; + L_MENU_1_4: + mes "[Prontera Squad]"; + mes "'Armory' is located at Northeast around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,175,220,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Prontera Squad]"; + mes "'Kit Shop' is located Northwest around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,134,221,5,0xFF00FF; + goto L_SUB_1; + L_MENU_1_6: + mes "[Prontera Squad]"; + mes "There are 2 'Inn's' around the Fountain, on is located at West, other one at East."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,204,214,6,0xFF00FF; + viewpoint 1,107,192,7,0xFF00FF; + goto L_SUB_1; + L_MENU_1_7: + mes "[Prontera Squad]"; + mes "'Trading Post' is located at Southeast around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,179,184,8,0x00FF00; + goto L_SUB_1; + L_MENU_1_8: + mes "[Prontera Squad]"; + mes "'Pub is located at Southeast around the Fountain, right behind Trading Post building."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,208,154,9,0x00FF00; + goto L_SUB_1; + L_MENU_1_9: + mes "[Prontera Squad]"; + mes "There are 2 Buildings of 'Library', located both at Northern East and Northern West around the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,120,267,10,0x00FF00; + viewpoint 1,192,267,11,0x00FF00; + goto L_SUB_1; + L_MENU_1_10: + mes "[Prontera Squad]"; + mes "'Job Agency' is located at Southeast of the Fountain."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,133,183,12,0x00FF00; + goto L_SUB_1; + L_MENU_1_11: + mes "[Prontera Squad]"; + mes "'The Castle Of Prontera' is located at Due North. Clockwise rotation is 12."; + mes "And when you go outside the Castle through a postern, you will see the North Prontera Field."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,156,360,13,0x00FF00; + goto L_SUB_1; + L_MENU_1_12: + mes "[Prontera Squad]"; + mes "City Hall is located at Southeast Contour. The Clockwise rotarion is 7."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,75,91,14,0x00FF00; + goto L_SUB_1; + L_MENU_1_13: + mes "[Prontera Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,237,41,1,0x00FF00; + viewpoint 2,236,316,2,0xFF0000; + viewpoint 2,46,345,3,0x00FF00; + viewpoint 2,175,220,4,0xFF00FF; + viewpoint 2,8,134,5,0xFF00FF; + viewpoint 2,204,214,6,0xFF00FF; + viewpoint 2,107,192,7,0xFF00FF; + viewpoint 2,179,184,8,0x00FF00; + viewpoint 2,208,154,9,0x00FF00; + viewpoint 2,120,267,10,0x00FF00; + viewpoint 2,192,267,11,0x00FF00; + viewpoint 2,133,183,12,0x00FF00; + viewpoint 2,156,360,13,0x00FF00; + viewpoint 2,75,91,14,0x00FF00; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Prontera Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Prontera Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Prontera Squad]"; + mes "Have a nice day."; + cutin "prt_soldier",255; + close; +} +//Duplicate +prontera.gat,282,208,2 duplicate(guide_p) Guide#p1-2 105 + +prontera.gat,29,200,6 duplicate(guide_p) Guide#p1-3 105 + +prontera.gat,160,29,0 duplicate(guide_p) Guide#p1-4 105 + +prontera.gat,151,330,4 duplicate(guide_p) Guide#p1-5 105 + + +//[Izlude] + +//Complete +izlude.gat,123,87,6 script Guide 105,{ + mes "[Izlude Squad]"; + mes "Welcome to Izlude, the New Satelite of Prontera."; + mes "Feel free to inquire at us anytime, Algight?"; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Izlude Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_SUB_1; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Swordman Asosiation^000000",L_MENU_1_1,"Swordman Hall",L_MENU_1_2,"Arena",L_MENU_1_3,"Izlude Marina",L_MENU_1_4,"Armory",L_MENU_1_5,"Kit Shop",L_MENU_1_6,"Cancel",L_MENU_1_7; + L_MENU_1_1: + mes "[Izlude Squad]"; + mes "Do you want to be a Swordman?"; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,52,140,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Izlude Squad]"; + mes "Swordman Hall, the official Building of Swordman Assosiation is at East Contour."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,214,130,2,0x00FF00; + goto L_SUB_1; + L_MENU_1_3: + mes "[Izlude Squad]"; + mes "'Arena' the Popular Colosseum is at Due North. The Clockwise totation is 12."; + mes "You can have fun there, you know."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,128,225,3,0x00FF00; + goto L_SUB_1; + L_MENU_1_4: + mes "[Izlude Squad]"; + mes "Marina which allows you to go to 'Alberta' or 'Byalan Island' is at Northeast."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,200,180,4,0xFF0000; + goto L_SUB_1; + L_MENU_1_5: + mes "[Izlude Squad]"; + mes "Armory is near at Northwest, and you can find it easily."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,111,149,5,0xFF00FF; + goto L_SUB_1; + L_MENU_1_6: + mes "[Izlude Squad]"; + mes "Kit Shop is near at Northeast, and you can find it easily."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,148,148,6,0xFF00FF; + goto L_SUB_1; + L_MENU_1_7: + mes "[Izlude Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,52,140,1,0xFF0000; + viewpoint 2,214,130,2,0x00FF00; + viewpoint 2,128,225,3,0x00FF00; + viewpoint 2,200,180,4,0xFF0000; + viewpoint 2,111,149,5,0xFF00FF; + viewpoint 2,148,148,6,0xFF00FF; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Izlude Squad]"; + mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Izlude Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Izlude Squad]"; + mes "Don't get lost."; + close; +} + +//[Geffen] + +//Complete +geffen.gat,203,116,0 script Guide#p1-6::guide_g 705,{ + cutin "gef_soldier",2; + mes "[Geffen Squad]"; + mes "Welcome to Geffen, the City of Magic."; + mes "We will help you when you take the Wrong way, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Geffen Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Magic Acadamy^000000",L_MENU_1_1,"Forge",L_MENU_1_2,"Armory",L_MENU_1_3,"Kit Shop",L_MENU_1_4,"Pub",L_MENU_1_5,"Inn",L_MENU_1_6,"Cancel",L_MENU_1_7; + L_MENU_1_1: + mes "[Geffen Squad]"; + mes "'Magic Acadamy' is the Building in charge of Every Magical Theory."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,61,180,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Geffen Squad]"; + mes "'Forge' is located at Southeast around the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,182,59,2,0x00FF00; + goto L_SUB_1; + L_MENU_1_3: + mes "[Geffen Squad]"; + mes "'Armory' is located at Northwest oround the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,99,140,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Geffen Squad]"; + mes "'Kit Shop' is located at Southwest arround the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,44,86,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Geffen Squad]"; + mes "'Pub' is located at Northeast around the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,138,138,5,0xFF00FF; + goto L_SUB_1; + L_MENU_1_6: + mes "[Geffen Squad]"; + mes "'Inn' is located at Northeast around the Tower of Magic."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,172,174,6,0xFF00FF; + goto L_SUB_1; + L_MENU_1_7: + mes "[Geffen Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,61,180,1,0xFF0000; + viewpoint 2,182,59,2,0x00FF00; + viewpoint 2,99,140,3,0xFF00FF; + viewpoint 2,44,86,4,0xFF00FF; + viewpoint 2,138,138,5,0xFF00FF; + viewpoint 2,172,174,6,0xFF00FF; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Geffen Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Geffen Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Geffen Squad]"; + mes "Have a nice day."; + cutin "gef_soldier",255; + close; +} + +//Duplicate +geffen.gat,118,62,0 duplicate(guide_g) Guide#p1-7 105 + +//[Payon] +payon.gat,82,116,4 script Guide#p1-8::guide_p 708,{ + cutin "pay_soldier",2; + mes "[Payon Squad]"; + mes "Welcome to Payon, the uplander village."; + mes "We will help you when you take the wrong way, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_MENU_1_ROOT; + mes "[Payon Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Archer Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Central Palace",L_MENU_1_5,"Cancel",L_MENU_1_6; + L_MENU_1_1: + mes "[Payon Squad]"; + mes "'Archer Guild' is a Control Office of Archers. It is located at Northeast Contour of the Archer Village."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,174,189,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Payon Squad]"; + mes "'Armory' is located at Northwest around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,30,176,2,0xFF00FF; + goto L_SUB_1; + L_MENU_1_3: + mes "[Payon Squad]"; + mes "'Kit Shop' is located at Northwest Contour of the Archer Village."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,174,189,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Payon Squad]"; + mes "'Inn' is located at East around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,172,134,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Payon Squad]"; + mes "'Central Palace' is at North around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,89,166,5,0x00FF00; + goto L_SUB_1; + L_MENU_1_6: + mes "[Payon Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,174,189,1,0xFF0000; + viewpoint 2,30,176,2,0xFF00FF; + viewpoint 2,174,189,3,0xFF00FF; + viewpoint 2,172,134,4,0xFF00FF; + viewpoint 2,89,166,5,0x00FF00; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Payon Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Payon Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Payon Squad]"; + mes "Bon Voyage, Wanderer."; + cutin "pay_soldier",255; + close; +} + +//Duplicate +pay_arche.gat,85,30,2 duplicate(guide_p) Guide#p1-9 105 + +//[Alberta] + +alberta.gat,23,238,4 script Guide#p1-10::guide_a 105,{ + mes "[Alberta Squad]"; + mes "Welcome to Alberta, the The Port Town."; + mes "We will helpyou when you take a wrong way, Feel free to inquire at us anytime."; + mes "Please Choose a menu `Notice' if you are a beginner of Ragnarok."; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_SUB_1; + mes "[Alberta Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + menu "^FF0000Merchant Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Kit Shop",L_MENU_1_3,"Inn",L_MENU_1_4,"Cancel",L_MENU_1_5; + L_MENU_1_1: + mes "[Alberta Squad]"; + mes "'Merchant Guild' will help you to transform into a Merchant."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,33,41,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Alberta Squad]"; + mes "'Armory' is located at North Contour from the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,117,37,2,0xFF00FF; + goto L_SUB_1; + L_MENU_1_3: + mes "[Alberta Squad]"; + mes "'Kit Shop' is located at the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,98,154,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Alberta Squad]"; + mes "'Armory' is located at North Contour around the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,65,233,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Alberta Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,33,41,1,0xFF0000; + viewpoint 2,117,37,2,0xFF00FF; + viewpoint 2,98,154,3,0xFF00FF; + viewpoint 2,65,233,4,0xFF00FF; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Alberta Squad]"; + mes "We altered the Location Guideinto de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Alberta Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Alberta Squad]"; + mes "Ta Ta."; + close; +} + +//Duplicate +alberta.gat,120,60,3 duplicate(guide_a) Guide#p1-11 105 + +//[Morroc] + +morocc.gat,153,286,6 script Guide#p1-12::guide_m 707,{ + cutin "moc_soldier",2; + mes "[Morocc Squad]"; + mes "Welcome to Morroc,the Frontier."; + mes "We will help you when you take a Wrong Way, Feel free to inquire at us anytime, Algight?"; +L_START_1: + next; + menu "View Buildings",L_MENU_1,"Wipe all Indications on Mini-Map.",L_MENU_2,"Notice",L_MENU_3,"Cancel",L_MENU_4; + L_MENU_1: + if (@COMPASS_CHECK != 0) goto L_SUB_1; + mes "[Morocc Squad]"; + mes "Please choose a Menu first."; + mes "Do you want me to leave indications on the Mini-Map?"; + next; + menu "Yes, Please",-,"No, Thanks",L_MENU_1_ROOT; + set @COMPASS_CHECK,1; + L_MENU_1_ROOT: + L_SUB_1: + next; + menu "^FF0000Thief Guild^000000",L_MENU_1_1,"Armory",L_MENU_1_2,"Inn",L_MENU_1_3,"Pub",L_MENU_1_4,"Mercenary Guild",L_MENU_1_5,"Cancel",L_MENU_1_6; + L_MENU_1_1: + mes "[Morocc Squad]"; + mes "'Thief Guild' wich grants you to be a Thief is located inside by hearsay..."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,24,297,1,0xFF0000; + goto L_SUB_1; + L_MENU_1_2: + mes "[Morocc Squad]"; + mes "'Armory' is located at Southwest around the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,253,56,2,0xFF00FF; + goto L_SUB_1; + L_MENU_1_3: + mes "[Morocc Squad]"; + mes "In Morroc there are 2 'Inn's' located both at South and Northeast around the Centre on Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,274,269,3,0xFF00FF; + viewpoint 1,197,66,3,0xFF00FF; + goto L_SUB_1; + L_MENU_1_4: + mes "[Morocc Squad]"; + mes "'Pub' is located at Northwest around the Centre."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,52,259,4,0xFF00FF; + goto L_SUB_1; + L_MENU_1_5: + mes "[Morocc Squad]"; + mes "'Mercenary Guild' is at East Contour around the Centre of Mini-Map."; + if (@COMPASS_CHECK != 1) goto L_SUB_1; + viewpoint 1,284,171,5,0x00FF00; + goto L_SUB_1; + L_MENU_1_6: + mes "[Morocc Squad]"; + mes "If you want to remove location marks, Please choose 'Wipe all Indications on the Mini-Map.'."; + goto L_START_1; + L_MENU_2: + viewpoint 2,24,297,1,0xFF0000; + viewpoint 2,253,56,2,0xFF00FF; + viewpoint 2,274,269,3,0xFF00FF; + viewpoint 2,197,66,3,0xFF00FF; + viewpoint 2,52,259,4,0xFF00FF; + viewpoint 2,284,171,5,0x00FF00; + set @COMPASS_CHECK,0; + goto L_START_1; + L_MENU_3: + mes "[Morocc Squad]"; + mes "We altered the Location Guide into de Newest Digital Style, out of the former Analog One."; + mes "Please Check this gorgeous newest system with your own eyes."; + next; + mes "[Morroc Squad]"; + mes "Don't forget to refer the Mini-Map on Upper-Right of the Screen."; + mes "If you can't see the Mini-Map, just use Shortcut 'ctrl+tab' or Click 'map' button on the Basic Information Window"; + mes "After that, Click '-' button on the Mini-Map until whole buildings are shown on it."; + goto L_START_1; + L_MENU_4: + mes "[Morocc Squad]"; + mes "Good by for now."; + cutin "moc_soldier",255; + close; +} + +//Duplicate +morocc.gat,54,97,6 duplicate(guide_m) Guide#p1-13 707 + + +//[Comodo] + +comodo.gat,322,178,4 script Guide#p1-14::guide_c 700,{ + mes "[Native Papaya]"; + mes "Where the night life continues 24 hours a day"; + mes "The city of Dreams and Fantasy!"; + mes "We welcome you to the land of Comodo!"; + mes "I know the area very well."; + mes "If you need directions, ask me anytime for asistance"; + next; + menu "Casino",L_MENU_1,"Hula dancing stage ^0000FF(Dancer Job Change)^000000",L_MENU_2,"Weapons and Armor Shop",L_MENU_3,"Tool store",L_MENU_4,"Tourist Shop",L_MENU_5,"Kafra Corp. Western Branch",L_MENU_6,"Chief's House",L_MENU_7,"Pub",L_MENU_8,"Camp Ground",L_MENU_9,"End Conversation",L_MENU_10; + L_MENU_1: + viewpoint 1,140,98,1,0xFF6633; + mes "^FF0000+^000000 -> Casino!"; + mes "The heart of Comodo's night life!"; + mes "A heaven of rest for tired travelers!"; + mes "Another service provided here.!"; + mes "The COmodo Casino ~!"; + close; + L_MENU_2: + viewpoint 1,188,168,2,0x0000FF; + mes "^0000FF+^000000 -> Hula dancing Stage"; + mes "Hula Hula - Hula Hula"; + mes "When you become more comfortable performing on stage, you should consider changing job to be a Dancer"; + mes "What do you think? Hula Dancing Stage - ^0000FF(Change job to Dancer)^000000"; + close; + L_MENU_3: + viewpoint 1,266,70,3,0x00FFFF; + mes "^00FFFF+^000000 -> Weapons and Armor Shop"; + mes "Here in Comodo, you can find unique items only found in Comodo."; + mes "'Comodo Weapons and Armor Shop'"; + close; + L_MENU_4: + viewpoint 1,86,128,4,0x515151; + mes "^808080+^000000 -> Tool Shop"; + mes "Here in Comodo, you can find tools only found in Comodo"; + mes "'Comodo Tool Store'"; + close; + L_MENU_5: + viewpoint 1,298,124,5,0x3355FF; + mes "^0000FF+^000000 -> Tourist Shop"; + mes "Here in Comodo, you can find unique gifts only found in Comodo"; + mes "'Comodo Tourist Shop'"; + close; + L_MENU_6: + viewpoint 1,136,202,6,0xFF5555; + mes "^FF0000+^000000 -> Kafra Corp. Western Branch"; + mes "The Western Branch of Midgards Kafra Corp."; + mes "Ofering you the best service!"; + mes "Kafra Corp.'s Western Branch center is located here in Comodo"; + close; + L_MENU_7: + viewpoint 1,114,294,7,0xFF5555; + mes "^FF0000+^000000 -> Chief's House"; + mes "This is the house where the Chief of Comodo resides."; + mes "If you are one who posseses a serious interest in Comodo, you can meet the Chief in person."; + mes "I think that would be okay with him."; + close; + L_MENU_8: + viewpoint 1,166,298,8,0xFF5555; + mes "^FF0000+^000000 -> Pub"; + mes "The pub is a place where tourists from all over the world come to converse and exchange ideas"; + mes "Bringing the ethnic atmosphere of Comodo, to an environment which tourists can enjoy"; + close; + L_MENU_9: + viewpoint 1,210,308,9,0xFF5555; + mes "^FF0000+^000000 -> Camp Ground"; + mes "Sometimes with family and sometimes with friends, people come to Comodo campground to creat great memories."; + mes "BBQ Camp Ground is where you can taste the ethnic flavors of Comodo's Spit BBQ!"; + close; + L_MENU_10: + mes "[Native Papaya]"; + mes "Because Comodo is located in a cave, sunlight cannot shine into this area."; + mes "It is dark 24 hours a day!"; + mes "The residents of Comodo are using this unusual circumstance to draw tourists to our area..."; + close; +} + +//Duplicates +comodo.gat,176,350,4 duplicate(guide_c) Guide#p1-14 700 + +comodo.gat,37,219,4 duplicate(guide_c) Guide#p1-15 700 + +//[Yuno] + +//Needs Translation +yuno.gat,153,47,4 script "ƒWƒ…ƒm[ƒKƒCƒh" 700,{ + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + mes "‰ß‹Ž‚ð’m‚ècc"; + mes "Œ»Ý‚ðŒ©‚Â‚ßcc"; + mes "–¢—ˆ‚ð—\’m‚·‚écc"; + mes "‚±‚±‚ÍŒ«ŽÒ‚½‚¿‚Ì“sŽs"; + mes "- ƒWƒ…ƒm[ -"; + mes "ƒWƒ…ƒm[‚ɂ悤‚±‚»"; + next; + menu "•Ší–h‹ï“X",L1,"“¹‹ï“X",L2,"ƒZ[ƒWƒLƒƒƒbƒXƒ‹ (ƒZ[ƒW“]EŠ)",L3,"‘“X’Ê‚è",L4,"’†‰›Lê",L5,"‹¤˜a‘}‘ŠÙ",L6,"ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~[",L7,"ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ",L8,"‰ï˜b‚ðCancel",LEnd; +L1: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,120,138,1,0xFF3355; + mes "^FF3355+^000000 -> •Ší–h‹ï“X"; + goto Lgo; +L2: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,193,142,2,0x3355FF; + mes "^3355FF+^000000 -> “¹‹ï“X"; + goto Lgo; +L3: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,90,318,3,0x33FF55; + mes "^33FF55+^000000 -> ƒZ[ƒWƒLƒƒƒbƒXƒ‹"; + mes "(ƒZ[ƒW“]EŠ)"; + goto Lgo; +L4: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,257,102,4,0xFF3355; + mes "^FF3355+^000000 -> ‘“X’Ê‚è"; + goto Lgo; +L5: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,157,170,5,0x3355FF; + mes "^3355FF+^000000 -> ’†‰›Lê"; + goto Lgo; +L6: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,336,204,6,0x33FF55; + mes "^33FF55+^000000 -> ‹¤˜a‘}‘ŠÙ"; + goto Lgo; +L7: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,323,281,7,0xFF3355; + mes "^FF3355+^000000 -> ƒVƒ…ƒoƒCƒ`ƒFƒ‹–‚–@ƒAƒJƒfƒ~["; + goto Lgo; +L8: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + viewpoint 1,278,288,8,0x3355FF; + mes "^3355FF+^000000 -> ƒ‚ƒ“ƒXƒ^[”Ž•¨ŠÙ"; + goto Lgo; +Lgo: + mes "‚É‚È‚è‚Ü‚·B"; + mes "—Ç‚¢Žž‚ð‚¨‰ß‚²‚µ‚­‚¾‚³‚¢B"; + close; +LEnd: + mes "[ƒWƒ…ƒm[ƒKƒCƒh]"; + mes "Œ«ŽÒ‚½‚¿‚Ì‘å“sŽs"; + mes "‚»‚µ‚Ä’mŽ¯‚Ì•óŒÉ"; + mes "ƒWƒ…ƒm[‚ւ悤‚±‚»I"; + close; +} + +//[Amatsu] + +//Needs Translation +amatsu.gat,207,91,4 script ƒ~ƒXEƒAƒ}ƒc 758,{ + mes "[Œu‚¿‚á‚ñ]"; + mes "Ž„‚ÍA‘æ13‘ãƒ~ƒXEƒAƒ}ƒc"; + mes "¢Œu£‚Æ\‚µ‚Ü‚·B"; + mes "ƒAƒ}ƒc‘ã•\‚Æ‚µ‚Ä"; + mes "‘º‚̈ēà‚ð‹Â‚¹‚‚©‚Á‚Ä‚¨‚è‚Ü‚·B"; + mes "‚È‚É‚©‚²Ž¿–₪‚ ‚è‚Ü‚µ‚½‚ç"; + mes "‚È‚ñ‚È‚è‚Æ‚¨‚Á‚µ‚á‚Á‚Ä‚­‚¾‚³‚¢‚Ü‚¹B"; + next; + menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4; +L1: + viewpoint 1,85,235,0,0xFF3355; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^FF3355+^000000•”•ª‚ª"; + mes "é‚Å‚²‚´‚¢‚Ü‚·B"; + goto LEnd; +L2: + viewpoint 1,96,118,1,0xCE6300; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^CE6300+^000000•”•ª‚ª"; + mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L3: + viewpoint 1,132,117,2,0x55FF33; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^55FF33+^000000•”•ª‚ª"; + mes "•Ší“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L4: + viewpoint 1,217,116,3,0x3355FF; + mes "[Œu‚¿‚á‚ñ]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^3355FF+^000000•”•ª‚ª"; + mes "‹Žð‰®‚É‚È‚è‚Ü‚·B"; +LEnd: + mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B"; + close; +} + +amatsu.gat,251,283,4 script ˆÄ“àl 767,{ + mes "[ˆÄ“àl]"; + mes "‚悤‚±‚»B"; + mes "—·‚ð‚·‚é‚É‚Í—Ç‚¢‹Gß‚Å‚·‚ËB"; + mes "Ž„‚Í‚±‚̃Aƒ}ƒc‚Ì"; + mes "ˆÄ“à‚ðˆø‚«Žó‚¯‚Ä‚¨‚éŽÒ‚Å‚·B"; + next; + mes "[ˆÄ“àl]"; + mes "‰½‚ð‚¨’T‚µ‚Å‚·‚©H"; + next; + menu "é",L1,"“¹‹ï“X",L2,"•Ší“X",L3,"‹Žð‰®",L4; +L1: + viewpoint 1,85,235,0,0xFF3355; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^FF3355+^000000•”•ª‚ª"; + mes "é‚Å‚²‚´‚¢‚Ü‚·B"; + goto LEnd; +L2: + viewpoint 1,96,118,1,0xCE6300; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^CE6300+^000000•”•ª‚ª"; + mes "“¹‹ï“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L3: + viewpoint 1,132,117,2,0x55FF33; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^55FF33+^000000•”•ª‚ª"; + mes "•Ší“X‚É‚È‚è‚Ü‚·B"; + goto LEnd; +L4: + viewpoint 1,217,116,3,0x3355FF; + mes "[ˆÄ“àl]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^3355FF+^000000•”•ª‚ª"; + mes "‹Žð‰®‚É‚È‚è‚Ü‚·B"; +LEnd: + mes "‚»‚ê‚Å‚ÍAƒAƒ}ƒc‚Å"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‰º‚³‚¢‚Ü‚¹B"; + close; +} + + +//[Gonryun] + +//Needs Translation +gonryun.gat,163,60,4 script ƒRƒ“ƒƒ“ƒKƒCƒh 780,{ + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "‚¢‚Â‚àŠˆ‹C‚É–ž‚¿‚ÄA”M‹C‚ª‚ ‚Ó‚ê"; + mes "–ˆ“úlX‚ªs‚«Œð‚Á‚Ä‚¢‚é"; + mes "ƒRƒ“ƒƒ“‚É‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹!"; + next; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "¤”„‚ª‚çA‘º‚̈ēà‚ð‚µ‚Ä"; + mes "‚¢‚Ü‚·B’m‚肽‚¢‚±‚Æ‚ª‚ ‚ê‚Î"; + mes "‰½‚Å‚à•·‚¢‚Ä‚­‚¾‚³‚¢B"; + next; + menu "‘º’·‚̉Æ",L1,"“¹‹ï¤l",L2,"•Ší¤l",L3,"–h‹ï¤l",L4,"—·ŠÙ",L5; +L1: + viewpoint 1,109,131,0,0xff3355; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^ff3355+^000000‚̈ʒu‚É"; + mes "‘º’·‚̉Ƃª‚ ‚è‚Ü‚·B"; + goto Lend; +L2: + viewpoint 1,147,84,1,0xce6300; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^ce6300+^000000‚̈ʒu‚É"; + mes "“¹‹ï¤l‚ª‚¢‚Ü‚·B"; + goto Lend; +L3: + viewpoint 1,174,101,2,0x55ff33; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^55ff33+^000000‚̈ʒu‚É"; + mes "•Ší¤l‚ª‚¢‚Ü‚·B"; + goto Lend; +L4: + viewpoint 1,173,84,3,0x3355ff; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^3355ff+^000000‚̈ʒu‚É"; + mes "–h‹ï¤l‚ª‚¢‚Ü‚·B"; + goto Lend; +L5: + viewpoint 1,215,114,4,0xffffff; + mes "[ƒn ƒEƒHƒ“ƒ`]"; + mes "ƒ~ƒjƒ}ƒbƒv‚Ì"; + mes "^ffffff+^000000‚̈ʒu‚É"; + mes "—·ŠÙ‚ª‚ ‚è‚Ü‚·B"; + goto Lend; +Lend: + mes "Ž„’B‚ÌŠy‚µ‚¢ƒRƒ“ƒƒ“‚ð"; + mes "Žv‚¢‚Á‚«‚èŠy‚µ‚ñ‚Å‚­‚¾‚³‚¢I"; + close; +} + +// Below not in japanese NPC + +aldebaran.gat,139,63,4 script Soldier 105,{ + mes "[Al De Baran Guard]"; + mes "I am just any ordinary guard you could find in any other cities!!"; + mes "I am in charge of Service Guide in Al De Baran Garrison, and the name is Al De Baran Guard (No Name) !!"; + mes "I will guide you though our town!"; + next; + menu "Get Location Guide",L0,"End conversation",End; + + L0: + mes "^FF0000+^000000 -> Kafra Main Office"; + mes "^0000FF+^000000 -> Weapon Shop"; + mes "^00F0F0+^000000 -> Sorcerer Guild (Closed)"; + mes "^808080+^000000 -> Pub"; + mes "^00FF00+^000000 -> Item Shop"; + mes "^F0F000+^000000 -> Chemical Acadamy (Closed)"; + viewpoint 0,53,228,1,0xFF0000; + viewpoint 1,48,198,1,0x0000FF; + viewpoint 2,48,198,1,0x00F0F0; + viewpoint 3,48,198,1,0x808080; + viewpoint 4,48,198,1,0x00FF00; + viewpoint 5,35,35,1,0xF0F000; + close; + LEnd: + mes "[Al De Baran Guard]"; + mes "We are shown to protect Al De Baran!!"; + close; +} + +izlude.gat,124,178,4 script Soldier 105,{ + mes "[Soldier]"; + mes "HeHeHeHe... HaHaHaHa"; + mes "Huh? Why am I so happy?"; + mes "you wanna know?"; + next; + menu "Sure, why?",Sure,"Not really, I don't care.",NotReally; + + Sure: + mes "[Soldier]"; + mes "Ah~~ There is not much for us to do these days. Merchants buy items, which monsters drop. You knew that, right?"; + next; + menu "Of course",OfCourse,"Eh? Really?",EhReally; + + OfCourse: + mes "[Soldier]"; + mes "HaHa In fact, that was actually our job."; + mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle."; + next; + mes "[Soldier]"; + mes "We had to work over time every day."; + mes "Ah~~~ that was a nightmare...~~~"; + mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration."; + next; + mes "[Soldier]"; + mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements."; + next; + mes "[Soldier]"; + mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~"; + mes "People who suffered first know how to thank even the slightest comfort."; + mes "HaHaHaHaHa!"; + close; + EhReally: + mes "[Soldier]"; + mes "What?! What do you mean you didn't know?!"; + mes "Hm... well... well... You know you could get some items killing some monsters. You could make some money out of it if you bring and sell those to a merchant."; + mes "ANYWAYS!"; + next; + mes "[Soldier]"; + mes "HaHa In fact, that was actually our job."; + mes "But there were more and more hunters who come in order to get paid. So it was just too much to handle."; + next; + mes "[Soldier]"; + mes "We had to work over time every day."; + mes "Ah~~~ that was a nightmare...~~~"; + mes "Anyways, the government took a smart action, making the Registration System. The Office of Prize Compensation only pays those who have the Registration."; + next; + mes "[Soldier]"; + mes "Requirements for the Registration are for a merchant to secure sufficient funds and to stay at one place all the time. The Office gives away the registration to any merchant who fullfills those requirements."; + next; + mes "[Soldier]"; + mes "So there aren't too many people that come to us any more. I mean we are still busy, but that's nothing compared to how it was before~~"; + mes "People who suffered first know how to thank even the slightest comfort."; + mes "HaHaHaHaHa!"; + close; + NotReally: + mes "[Soldier]"; + mes "OK Good bye~~"; + close; +} + +prontera.gat,160,330,4 script Guard#p2-1::guard_p 105,{ + mes "Welcome to Prontera."; + close; +} + +prontera.gat,223,99,1 duplicate(guard_p) Guard#p2-2 105 + +prontera.gat,229,104,1 duplicate(guard_p) Guard#p2-3 105 + +prontera.gat,47,339,5 duplicate(guard_p) Guard#p2-4 105 + +prontera.gat,52,344,5 duplicate(guard_p) Guard#p2-5 105 + + +prt_maze02.gat,100,69,4 script Soldier#p3-1::soldier_p 105,{ + mes "[Soldier]"; + mes "Yo yo, you'd be better not to go in there. It has rumored there is a Demon living in the forest."; + mes "Of course it is just a rumor because no one see the people turning back from the palce."; + mes "hmmm... it's up to you to go in or leave."; + close; +} +prt_maze02.gat,110,69,4 duplicate(soldier_p) Soldier#p3-2 105 + +//Yuno +yuno.gat,46,165,4 script Soldier#p4-1::soldier_y 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,61,165,4 duplicate(soldier_y) Soldier#p4-2 105 + +yuno.gat,150,228,4 duplicate(soldier_y) Soldier#p4-2 105 + +yuno.gat,165,228,4 duplicate(soldier_y) Soldier#p4-2 105 + +yuno.gat,262,319,2 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to Yuno, the scholar's city where ancient wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "There is a holy shield for Crusaders called 'The Messenger of the God'."; + next; + mes "[Yuno Soldier]"; + mes "It looks like a long shield with a angel's wing image on its center."; + mes " It is especially strong against undead or demons."; + close; +} + +yuno.gat,227,292,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Around the City of Juno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'."; + next; + mes "[Yuno Soldier]"; + mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them."; + mes "It looks all beautiful, so it's bad if you fall for its appearance."; + close; +} + +yuno.gat,150,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma."; + mes "....from the body, it flows..."; + next; + mes "[Yuno Soldier]"; + mes "Magma is really hot as to even melt away armor and weapon made with steel."; + mes "if you attack thoughtlessly, "; + next; + mes "[Yuno Soldier]"; + mes "you might get a lot of damage on yourself and even get your armor and weapon broken."; + close; +} + +yuno.gat,165,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth."; + mes "Thus, even if it's far away, you can't think less of it."; + next; + mes "[Yuno Soldier]"; + mes "it got such name 'cause the passing-by geography scholar got eaten away during his research."; + close; +} + +//Comodo + +//Yuno +yuno.gat,46,165,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,61,165,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + + +yuno.gat,150,228,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,165,228,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + close; +} + +yuno.gat,262,319,2 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to Yuno, the scholar's city where ancient wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "There is a holy shield for Crusaders called 'The Messenger of the God'."; + next; + mes "[Yuno Soldier]"; + mes "It looks like a long shield with a angel's wing image on its center."; + mes " It is especially strong against undead or demons."; + close; +} + +yuno.gat,227,292,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Around the City of Juno, there is fallen angel that fakes himself as the real angel, named 'Fake Angel'."; + next; + mes "[Yuno Soldier]"; + mes "This one fakes itself as the real angel, and acts as if it's blessing travelers, and attacks them."; + mes "It looks all beautiful, so it's bad if you fall for its appearance."; + close; +} + +yuno.gat,150,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists, Yuno."; + next; + mes "[Yuno Soldier]"; + mes "Larva Golem is a stone doll that has a stone heart in which its magical power was induced by magma."; + mes "....from the body, it flows..."; + next; + mes "[Yuno Soldier]"; + mes "Magma is really hot as to even melt away armor and weapon made with steel."; + mes "if you attack thoughtlessly, "; + next; + mes "[Yuno Soldier]"; + mes "you might get a lot of damage on yourself and even get your armor and weapon broken."; + close; +} + +yuno.gat,165,283,4 script Yuno Soldier 105,{ + mes "[Yuno Soldier]"; + mes "Welcome to City of scholars where wisdom exists."; + next; + mes "[Yuno Soldier]"; + mes "'Geographer', it is a hard shell type thing that grows around flowers from the earth."; + mes "Thus, even if it's far away, you can't think less of it."; + next; + mes "[Yuno Soldier]"; + mes "it got such name 'cause the passing-by geography scholar got eaten away during his research."; + close; +} diff --git a/npc/other/old/kafra.txt b/npc/other/old/kafra.txt new file mode 100644 index 000000000..dcf05a1ce --- /dev/null +++ b/npc/other/old/kafra.txt @@ -0,0 +1,1866 @@ +//===== eAthena Script ======================================= +//= Kafra Script +//===== By: ================================================== +//= Lotsa People (1.0) +//= Darlskies (1.1) +//= Darkchild (1.2) +//= Syrus22 (2.0) +//= Syrus22 (2.1) +//= Darkchild (2.2) +//===== Current Version: ===================================== +//= 2.2 +//===== Compatible With: ===================================== +//= Any eAthena Version In Which functions work. +//===== Description: ========================================= +//= All The Kafra's In Ro, Incl HQ +//===== Additional Comments: ================================= +//= Darkskies did all the kafra points stuff. +//= Syrus22 - I compltely rewrote the script pretty much except for +//= the normal conversation text in the Kafra HQ NPCs. +//= Syrus22 - I fixed the Special Reserve in the Kafra HQ to really +//= give you items. I will add the Lottery Chances when I get +//= full info on the prizes. +//= Syrus22 - I will add a Louyang Kafra when I get better location info. +//= Darkchild - Added Comodo +//============================================================ + +//**********************************************// +//Actual Kafra NPCs // +//**********************************************// +//These will set the necessary variables for my // +//functions to work. // +//**********************************************// +//---Orc Dungeon Kafra--- +gef_fild10.gat,73,340,4 script Kafra#orc1 115,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"gef_fild10.gat"; +set @save1x,54; +set @save1y,232; + +callfunc "kaframain"; +break; +} +//---Byalan Kafra--- +izlu2dun.gat,106,58,8 script Kafra 115,{ +if (class != Job_Novice) goto Lkafra; +if((job_merchant_q==8) || (job_merchant_q==7)) goto JobMerQE8oE7; +if((job_merchant_q==6) || (job_merchant_q==5)) goto JobMerQE6oE5; + +JobMerQE8oE7: + if(countitem(Delivery_Message) != 0) goto JobMerQE8oE7Cont; + +JobMerQE8oE7Cont: + menu "Excuse me.",M0; + + M0: + mes "[Kafra]"; + mes "Yes?"; + cutin "kafra_03",255; + close; + +JobMerQE6oE5: + mes "[Kafra]"; + mes "Delivery fro the Merchant Guild?? Ah, Right! Yes! I almost forgot."; + mes "Okay,Please put down here...."; + if((countitem(1081)==1) || (countitem(1082)==1) || (countitem(1083)==1)) goto MerBox123E1; + mes ".... I think our orders are almost one Box of Oversized and Heavy....But you seem to carry it on without difficulty."; + close; + + MerBox123E1: + next; + mes "[Kafra]"; + mes "Let me check its Serial numbers, I have to give the receipt to you anyhow."; + if(nov_1_2_cos_c==7) goto JobMerQ2E7; + if(nov_1_2_cos_c==8) goto JobMerQ2E8; + next; + mes "[Kafra]"; + mes "......? Excuse me! I think you gave me the wrong one."; + mes "Our order should have the serial numbers as either of 3318702 or 3543625..."; + cutin "kafra_03",255; + close; + +JobMerQ2E7: + if(countitem(1081) !=0) goto MerBox1NE0; + + MerBox1NE0: + mes "Um.... 3012685. Yes! This is the right one we ordered. Here, your receipt."; + delitem 1081,1; + getitem 1079,1; + goto JobMerQ2Cont; + +JobMerQ2E8: + if(countitem(1081) !=0) goto MerBox2NE0; + + MerBox2NE0: + mes "Um.... 3543625. Yes! This is the right one we ordered. Here, your receipt."; + delitem 1082,1; + getitem 1080,1; + goto JobMerQ2Cont; + +JobMerQ2Cont: + if(job_merchant_q==6) goto JobMerQE6; + getitem 3005,2; + goto JobMerQ2Cont1; + +JobMerQE6: + getitem 3005,2; + goto JobMerQ2Cont1; + +JobMerQ2Cont1: + getitem 3017,1; + if(countitem(Delivery_Message) != 0) goto DevMsg; + goto DevMsgCont; + +DevMsg: + menu "This is from Mr. Mahnsoo...",M1; + + M1: + delitem 1072,1; + set nov_3_merchant,11; + mes "[Kapra]"; + mes "Oh, my good Lord! Mr. Mansoo wrote me a Letter? Thank you, Thank you~"; + mes "I though he would send one one of these days, but I've never expected it would be so soon like this time~"; + goto DevMsgCont; + + DevMsgCont: + next; + mes "[Kafra]"; + mes "I really appreciate you for what you've done so far. This is my Small Gift for you to lay my heart."; + mes "I hope you will help me next time."; + set @TEMP,rand(2); + goto R0; + + R0: + if(@TEMP !=0) goto R1; + getitem 513,3; + cutin "kafra_03",255; + close; + R1: + getitem 512,3; + cutin "kafra_03",255; + close; + +Lkafra: +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"izlu2dun.gat"; +set @save1x,87; +set @save1y,170; + +callfunc "kaframain"; +break; +} +//---Pyramids Kafra--- +moc_ruins.gat,61,156,5 script Kafra#pyr1 114,{ +set @cutinpic$,"kafra_04"; + +set @save,1; +set @save1map$,"moc_ruins.gat"; +set @save1x,41; +set @save1y,141; + +callfunc "kaframain"; +break; +} +//---Northern Prontera Field Kafra--- +prt_fild01.gat,198,47,8 script Kafra#pfl1 112,{ +set @cutinpic$,"kafra_06"; + +set @save,1; +set @save1map$,"prt_fild01.gat"; +set @save1x,197; +set @save1y,50; + +callfunc "kaframain"; +break; +} +//---Culvert Kafra--- +prt_fild05.gat,290,224,1 script Kafra#pfl2 114,{ +set @cutinpic$,"kafra_04"; + +set @save,1; +set @save1map$,"prt_fild05.gat"; +set @save1x,274; +set @save1y,243; + +callfunc "kaframain"; +break; +} +//---In Alberta Kafras--- +alberta.gat,28,229,8 script Kafra#alb1 115,{ +set @cutinpic$,"kafra_02"; + +set @save1map$,"alberta.gat"; +set @save1x,31; +set @save1y,231; +set @save2map$,"pay_fild03.gat"; +set @save2x,386; +set @save2y,76; + +set @warps,4; + +set @warp1$,"Payon"; +set @warp1name$,"payon.gat"; +set @warp1x,69; +set @warp1y,100; +set @warp1zeny,1300; + +set @warp2$,"Prontera"; +set @warp2name$,"prontera.gat"; +set @warp2x,116; +set @warp2y,75; +set @warp2zeny,2100; + +set @warp3$,"Morocc"; +set @warp3name$,"morocc.gat"; +set @warp3x,156; +set @warp3y,46; +set @warp3zeny,2200; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2400; + +set @kaflocations,1; +set @location1x,113; +set @location1y,60; + +set @special,1; + +callfunc "kaframain"; +break; +} +alberta.gat,113,60,5 script Kafra#alb2 112,{ +set @cutinpic$,"kafra_06"; + +set @save,1; +set @save1map$,"alberta.gat"; +set @save1x,117; +set @save1y,57; + +set @warps,4; + +set @warp1$,"Payon"; +set @warp1name$,"payon.gat"; +set @warp1x,69; +set @warp1y,100; +set @warp1zeny,1300; + +set @warp2$,"Prontera"; +set @warp2name$,"prontera.gat"; +set @warp2x,116; +set @warp2y,75; +set @warp2zeny,2100; + +set @warp3$,"Morocc"; +set @warp3name$,"morocc.gat"; +set @warp3x,156; +set @warp3y,46; +set @warp3zeny,2200; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2400; + +set @kaflocations,1; +set @location1x,28; +set @location1y,229; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---Sunken Ship Kafra--- +alb2trea.gat,59,69,1 script Kafra#snk1 117,{ +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"alb2trea.gat"; +set @save1x,92; +set @save1y,64; + +callfunc "kaframain"; +break; +} +//---In Al De Baran Kafra--- +aldebaran.gat,143,119,4 script Kafra#ald1 113,{ +set @cutinpic$,"kafra_05"; + +set @save,1; +set @save1map$,"aldebaran.gat"; +set @save1x,143; +set @save1y,109; + +set @warps,3; + +set @warp1$,"Geffen"; +set @warp1name$,"geffen.gat"; +set @warp1x,120; +set @warp1y,39; +set @warp1zeny,1600; + +set @warp2$,"Mjolnir Dead Pit"; +set @warp2name$,"mjolnir_02.gat"; +set @warp2x,99; +set @warp2y,351; +set @warp2zeny,1700; + +set @warp3$,"Comodo"; +set @warp3name$,"comodo.gat"; +set @warp3x,209; +set @warp3y,143; +set @warp3zeny,2200; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Geffen Kafras--- +geffen.gat,120,62,8 script Kafra#gef1 115,{ +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"geffen.gat"; +set @save1x,119; +set @save1y,40; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1400; + +set @warp2$,"Izlude"; +set @warp2name$,"izlude.gat"; +set @warp2x,91; +set @warp2y,105; +set @warp2zeny,1800; + +set @warp3$,"Al De Baran"; +set @warp3name$,"aldebaran.gat"; +set @warp3x,143; +set @warp3y,110; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,2400; + +set @kaflocations,1; +set @location1x,203; +set @location1y,123; + +set @special,1; + +callfunc "kaframain"; +break; +} +geffen.gat,203,123,3 script Kafra#gef2 114,{ +set @cutinpic$,"kafra_04"; + +set @save1map$,"geffen.gat"; +set @save1x,200; +set @save1y,124; +set @save2map$,"gef_fild00.gat"; +set @save2x,51; +set @save2y,194; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1400; + +set @warp2$,"Izlude"; +set @warp2name$,"izlude.gat"; +set @warp2x,91; +set @warp2y,105; +set @warp2zeny,1800; + +set @warp3$,"Al De Baran"; +set @warp3name$,"aldebaran.gat"; +set @warp3x,143; +set @warp3y,110; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,2400; + +set @kaflocations,1; +set @location1x,120; +set @location1y,62; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Izlude Kafra--- +izlude.gat,124,115,6 script Kafra#izl1 117,{ +set @cutinpic$,"kafra_01"; + +set @save1map$,"izlude.gat"; +set @save1x,128; +set @save1y,111; +set @save2map$,"prt_fild08.gat"; +set @save2x,349; +set @save2y,202; + +set @warps,4; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,900; + +set @warp2$,"Payon"; +set @warp2name$,"payon.gat"; +set @warp2x,69; +set @warp2y,100; +set @warp2zeny,1700; + +set @warp3$,"Geffen"; +set @warp3name$,"geffen.gat"; +set @warp3x,120; +set @warp3y,39; +set @warp3zeny,1800; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2000; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Morocc Kafras--- +morocc.gat,156,97,4 script Kafra#moc1 115,{ +set @cutinpic$,"kafra_03"; + +set @save,1; +set @save1map$,"morocc.gat"; +set @save1x,156; +set @save1y,46; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1800; + +set @warp2$,"Payon"; +set @warp2name$,"payon.gat"; +set @warp2x,69; +set @warp2y,100; +set @warp2zeny,1800; + +set @warp3$,"Alberta"; +set @warp3name$,"alberta.gat"; +set @warp3x,117; +set @warp3y,56; +set @warp3zeny,2200; + +set @warp4$,"Geffen"; +set @warp4name$,"geffen.gat"; +set @warp4x,120; +set @warp4y,39; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,1800; + +set @kaflocations,1; +set @location1x,163; +set @location1y,260; + +set @special,1; + +callfunc "kaframain"; +break; +} +morocc.gat,163,260,4 script Kafra 114,{ +set @cutinpic$,"kafra_04"; + +set @save1map$,"morocc.gat"; +set @save1x,187; +set @save1y,281; +set @save2map$,"moc_fild07.gat"; +set @save2x,212; +set @save2y,30; + +set @warps,5; + +set @warp1$,"Prontera"; +set @warp1name$,"prontera.gat"; +set @warp1x,116; +set @warp1y,75; +set @warp1zeny,1800; + +set @warp2$,"Payon"; +set @warp2name$,"payon.gat"; +set @warp2x,69; +set @warp2y,100; +set @warp2zeny,1800; + +set @warp3$,"Alberta"; +set @warp3name$,"alberta.gat"; +set @warp3x,117; +set @warp3y,56; +set @warp3zeny,2200; + +set @warp4$,"Geffen"; +set @warp4name$,"geffen.gat"; +set @warp4x,120; +set @warp4y,39; +set @warp4zeny,2200; + +set @warp5$,"Comodo"; +set @warp5name$,"comodo.gat"; +set @warp5x,209; +set @warp5y,143; +set @warp5zeny,1800; + +set @kaflocations,1; +set @location1x,156; +set @location1y,97; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Payon Kafra--- +payon.gat,99,116,4 script Kafra#pay1 113,{ +set @cutinpic$,"kafra_05"; + +set @save1map$,"payon.gat"; +set @save1x,69; +set @save1y,100; +set @save2map$,"pay_fild01.gat"; +set @save2x,340; +set @save2y,347; + +set @warps,4; + +set @warp1$,"Alberta"; +set @warp1name$,"alberta.gat"; +set @warp1x,117; +set @warp1y,56; +set @warp1zeny,1300; + +set @warp2$,"Prontera"; +set @warp2name$,"prontera.gat"; +set @warp2x,116; +set @warp2y,72; +set @warp2zeny,1800; + +set @warp3$,"Morocc"; +set @warp3name$,"morocc.gat"; +set @warp3x,156; +set @warp3y,46; +set @warp3zeny,1800; + +set @warp4$,"Comodo"; +set @warp4name$,"comodo.gat"; +set @warp4x,209; +set @warp4y,143; +set @warp4zeny,2000; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---Archer Village Kafra--- +pay_arche.gat,55,123,8 script Kafra 117,{ +set @cutinpic$,"kafra_01"; + +set @save,1; +set @save1map$,"pay_arche.gat"; +set @save1x,49; +set @save1y,144; + +callfunc "kaframain"; +break; +} +//---In Prontera Kafras--- +prontera.gat,29,207,6 script Kafra#pro2 113,{ +set @cutinpic$,"kafra_05"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save1map$,"prontera.gat"; +set @save1x,33; +set @save1y,208; +set @save2map$,"prt_fild05.gat"; +set @save2x,367; +set @save2y,205; + +set @kaflocations,1; +set @location1x,146; +set @location1y,89; +set @location2x,282; +set @location2y,200; +set @location3x,151; +set @location3y,29; + +set @special,1; + +callfunc "kaframain"; +break; +} +prontera.gat,146,89,6 script Kafra#pro1 115,{ +set @cutinpic$,"kafra_03"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save,1; +set @save1map$,"prontera.gat"; +set @save1x,116; +set @save1y,73; + +set @kaflocations,1; +set @location1x,29; +set @location1y,207; +set @location2x,282; +set @location2y,200; +set @location3x,151; +set @location3y,29; + +set @special,1; + +callfunc "kaframain"; +break; +} +prontera.gat,282,199,6 script Kafra 115,{ +set @cutinpic$,"kafra_03"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save,1; +set @save1map$,"prontera.gat"; +set @save1x,117; +set @save1y,73; + +set @kaflocations,1; +set @location1x,29; +set @location1y,207; +set @location2x,146; +set @location2y,89; +set @location3x,151; +set @location3y,29; + +set @special,1; + +callfunc "kaframain"; +break; +} +prontera.gat,151,29,8 script Kafra 115,{ +set @cutinpic$,"kafra_03"; + +set @warps,6; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,1400; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,1700; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,1800; + +set @warp5$,"Orc Dungeon"; +set @warp5name$,"gef_fild10.gat"; +set @warp5x,52; +set @warp5y,326; +set @warp5zeny,1700; + +set @warp6$,"Comodo"; +set @warp6name$,"comodo.gat"; +set @warp6x,209; +set @warp6y,143; +set @warp6zeny,2000; + +set @save1map$,"prontera.gat"; +set @save1x,150; +set @save1y,33; +set @save2map$,"prt_fild08.gat"; +set @save2x,170; +set @save2y,369; + +set @kaflocations,1; +set @location1x,29; +set @location1y,207; +set @location2x,146; +set @location2y,89; +set @location3x,282; +set @location3y,199; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Yuno Kafras--- +yuno.gat,328,108,6 script Kafra 117,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"yuno.gat"; +set @save1x,332; +set @save1y,107; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @kafralocations,1; +set @location1x,151; +set @location1y,87; +set @location2x,278; +set @location2y,221; + +set @special,1; + +callfunc "kaframain"; +break; +} +yuno.gat,151,87,4 script Kafra 115,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"yuno.gat"; +set @save1x,154; +set @save1y,75; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @kafralocations,1; +set @location1x,328; +set @location1y,108; +set @location2x,278; +set @location2y,221; + +set @special,1; + +callfunc "kaframain"; +break; +} +yuno.gat,278,221,6 script Kafra 117,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"yuno.gat"; +set @save1x,332; +set @save1y,107; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @kafralocations,1; +set @location1x,328; +set @location1y,108; +set @location2x,151; +set @location2y,87; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Umbala Kafra--- +umbala.gat,128,133,4 script Kafra 115,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"umbala.gat"; +set @save1x,126; +set @save1y,131; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---In Gonryun Kafra--- +//Note: Gave this Kafra the same warps as Umbala and Yuno till I get the +//real warp information. +gonryun.gat,159,122,4 script Kafra 116,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"gonryun.gat"; +set @save1x,160; +set @save1y,62; + +set @warps,4; + +set @warp1$,"Izlude"; +set @warp1name$,"izlude.gat"; +set @warp1x,91; +set @warp1y,105; +set @warp1zeny,900; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @warp3$,"Payon"; +set @warp3name$,"payon.gat"; +set @warp3x,69; +set @warp3y,100; +set @warp3zeny,2100; + +set @warp4$,"Morocc"; +set @warp4name$,"morocc.gat"; +set @warp4x,156; +set @warp4y,46; +set @warp4zeny,2100; + +set @special,1; + +callfunc "kaframain"; +break; +} +//---Comodo--- +comodo.gat,166,163,3 script Kafra 721,{ +set @cutinpic$,"kafra_02"; + +set @save,1; +set @save1map$,"comodo.gat"; +set @save1x,188; +set @save1y,148; + +set @warps,2; + +set @warp1$,"Morroc"; +set @warp1name$,"morocc.gat"; +set @warp1x,156; +set @warp1y,46; +set @warp1pay,2400; + +set @warp2$,"Geffen"; +set @warp2name$,"geffen.gat"; +set @warp2x,120; +set @warp2y,39; +set @warp2zeny,2100; + +set @special,1; + +callfunc "kaframain"; +break; +} +//**********************************************// +//Kafra Main // +//**********************************************// +//The main kafra script. This will call the // +//necessary functions from the rest of the // +//script. // +//**********************************************// +function script kaframain -1,{ +cutin @cutinpic$,2; +mes "[Kafra Employee]"; +mes "Welcome to Kafra Corporation. The Kafra services are always by your side."; +mes "How may I assist you?"; +next; +if ((@warps > 0) && (@special > 0)) goto Lallmenu; +if ((@warps > 0) && (@special == 0)) goto Lwarpmenu; +if (@warps == 0) goto Lnowarpmenu; + +Lallmenu: +menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Check Other Information",Lother,"Cancel",Lcancel; + +Lwarpmenu: +menu "Save",Lsave,"Use Storage",Lstorage,"Use Teleport Service",Lwarp,"Rent a Cart",Lcart,"Cancel",Lcancel; + +Lnowarpmenu: +menu "Save",Lsave,"Use Storage",Lstorage,"Rent a Cart",Lcart,"Cancel",Lcancel; + +Lsave: +callfunc "kafrasave"; +break; + +Lstorage: +callfunc "kafrastorage"; +break; + +Lwarp: +callfunc "kafrawarps"; +break; + +Lcart: +callfunc "kafracart"; +break; + +Lother: +callfunc "kafrainfo"; +break; + +Lcancel: +callfunc "kafraend"; +break; +} +//**********************************************// +//Kafra Save // +//**********************************************// +//This will handle the save function for all the// +//kafras. // +//**********************************************// +function script kafrasave -1,{ +if (@save == 1) goto Lsavein; +mes "[Kafra]"; +mes "Where would you like to save?"; +next; +menu "Save Outside City",Lsaveout,"Save Inside City",Lsavein; + +Lsavein: + savepoint @save1map$,@save1x,@save1y; + mes "[Kafra]"; + mes "Your respawn point has been saved. Thank you."; + callfunc "kafraend"; + break; + +Lsaveout: + savepoint @save2map$,@save2x,@save2y; + mes "[Kafra]"; + mes "Your respawn point has been saved. Thank you."; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Storage // +//**********************************************// +//This will handle the storage functions for // +//all the kafras. // +//**********************************************// +function script kafrastorage -1,{ +if (getskilllv(1) < 6) goto NeedJobLevel; +if (Zeny < 30) goto NeedZenys; +set specialreserve,specialreserve + 30; +set Zeny, Zeny - 30; +mes "[Kafra]"; +mes "Ok let me just open your storage for you."; +openstorage; +callfunc "kafraend"; +break; + +NeedJobLevel: + mes "[Kafra]"; + mes "I'm sorry but you must have Basic Skill 6 to use storage."; + callfunc "kafraend"; + break; + +NeedZenys: + mes "[Kafra]"; + mes "I'm sorry but you are short on Zeny."; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Warps // +//**********************************************// +//This will handle all the actual warping and // +//the payment of Zeny // +//**********************************************// +function script kafrawarps -1,{ +mes "[Kafra]"; +mes "Please choose your destination."; +next; +if (@warps == 7) goto L7; +if (@warps == 6) goto L6; +if (@warps == 5) goto L5; +if (@warps == 4) goto L4; +if (@warps == 3) goto L3; +if (@warps == 2) goto L2; + +L2: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,"Cancel",Lcancel; + +L3: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,"Cancel",Lcancel; + +L4: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,"Cancel",Lcancel; + +L5: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,"Cancel",Lcancel; + +L6: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,"Cancel",Lcancel; + +L7: + menu @warp1$ + " -> " + @warp1zeny,Lwarp1,@warp2$ + " -> " + @warp2zeny,Lwarp2,@warp3$ + " -> " + @warp3zeny,Lwarp3,@warp4$ + " -> " + @warp4zeny,Lwarp4,@warp5$ + " -> " + @warp5zeny,Lwarp5,@warp6$ + " -> " + @warp6zeny,Lwarp6,@warp7$ + " -> " + @warp7zeny,Lwarp7,"Cancel",Lcancel; + +Lwarp1: + if (Zeny < @warp1zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp1zeny; + set Zeny,Zeny - @warp1zeny; + warp @warp1name$,@warp1x,@warp1y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp2: + if (Zeny < @warp2zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp2zeny; + set Zeny,Zeny - @warp2zeny; + warp @warp2name$,@warp2x,@warp2y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp3: + if (Zeny < @warp3zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp3zeny; + set Zeny,Zeny - @warp3zeny; + warp @warp3name$,@warp3x,@warp3y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp4: + if (Zeny < @warp4zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp4zeny; + set Zeny,Zeny - @warp4zeny; + warp @warp4name$,@warp4x,@warp4y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp5: + if (Zeny < @warp5zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp5zeny; + set Zeny,Zeny - @warp5zeny; + warp @warp5name$,@warp5x,@warp5y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp6: + if (Zeny < @warp6zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp6zeny; + set Zeny,Zeny - @warp6zeny; + warp @warp6name$,@warp6x,@warp6y; + set @end,1; + callfunc "kafraend"; + break; + +Lwarp7: + if (Zeny < @warp7zeny) goto Lneedzeny; + set specialreserve,specialreserve + @warp7zeny; + set Zeny,Zeny - @warp7zeny; + warp @warp7name$,@warp7x,@warp7y; + set @end,1; + callfunc "kafraend"; + break; + +Lneedzeny: + mes "[Kafra]"; + mes "I'm sorry you don't have the necessary amount of zeny."; + callfunc "kafraend"; + break; + +Lcancel: + mes "[Kafra]"; + mes "Ok, Come again soon."; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Cart // +//**********************************************// +//This will handle the cart rental function for // +//all the Kafras. // +//**********************************************// +function script kafracart -1,{ +if ((class == Job_Merchant) || (class == Job_Blacksmith) || (class == Job_Alchem) || (class == Job_Merchant_High) || (class == Job_Whitesmith) || (class == Job_Creator)) goto Lrentcart; +mes "[Kafra]"; +mes "Sorry this service is only provided for Merchant classes."; +callfunc "kafraend"; +break; + +Lrentcart: + if (getskilllv(39) < 1) goto Lnopush; + mes "[Kafra]"; + mes "The cart rental fee is 800 zeny. Do you want to rent a cart?"; + next; + menu "Rent a Cart",Lrent,"Cancel",Lcancel; + +Lrent: + if (Zeny < 800) goto Lneedzeny; + set specialreserve,specialreserve + 800; + set Zeny,Zeny - 800; + setcart; + mes "[Kafra]"; + mes "There ya go..."; + callfunc "kafraend"; + break; + +Lnopush: + mes "[Kafra]"; + mes "Sorry but you must have at least ^ff0000Pushcart^000000 level 1."; + callfunc "kafraend"; + break; + +Lneedzeny: + mes "[Kafra]"; + mes "Sorry but you don't have the zeny."; + callfunc "kafraend"; + break; + +Lcancel: + mes "[Kafra]"; + mes "Ok. Goodbye then"; + callfunc "kafraend"; + break; +} +//**********************************************// +//Kafra Information // +//**********************************************// +//This will handle the extra Kafra functions // +//such as your kafra points and the locations of// +//other kafras. // +//**********************************************// +function script kafrainfo -1,{ +if (@kaflocations == 1) goto Lfullmenu; +menu "Check Special Reserve Points",Lreserve,"Cancel",Lcancel; + +Lfullmenu: + menu "Check Special Reserve Points",Lreserve,"Location Tip",Llocation,"Cancel",Lcancel; + +Lreserve: + mes "[Kafra]"; + mes strcharinfo(0) + ", you have accumulated " + specialreserve + " Special Reserve Points."; + next; + mes "[Kafra]"; + mes "You can redeem your points at our Headquarters in Al De Baran."; + callfunc "kafraend"; + break; + +Llocation: + mes "[Kafra]"; + mes "Ok I'll mark them on your map."; + if (@location1x == 0) goto Lfinished; + viewpoint 0,@location1x,@location1y,1,0x0000FF; + if (@location2x == 0) goto Lfinished; + viewpoint 1,@location2x,@location2y,1,0x0000FF; + if (@location3x == 0) goto Lfinished; + viewpoint 2,@location3x,@location3y,1,0x0000FF; + if (@location4x == 0) goto Lfinished; + viewpoint 3,@location4x,@location4y,1,0x0000FF; + callfunc "kafraend"; + break; + +Lfinished: + callfunc "kafraend"; + break; + +Lcancel: + mes "[Kafra]"; + mes "Ok. Bye then..."; + callfunc "kafraend"; + break; +} +//**********************************************// +//End Kafra Function // +//**********************************************// +//This will empty all possible variables and end// +//the kafra scripts. // +//**********************************************// +function script kafraend -1,{ +set @warps,0; +set @save,0; +set @special,0; +set @kaflocations,0; +set @location1x,0; +set @location2x,0; +set @location3x,0; +set @location4x,0; +if (@end == 1) goto Lbreak; +cutin @cutinpic$,255; +close; + +Lbreak: + set @end,0; + cutin @cutinpic$,255; + break; +} +//---Kafra Warehouse--- +aldeba_in.gat,24,245,4 script Kafra Service 115,{ + cutin "kafra_03",2; + mes "[Kapra Jasmine]"; + mes "Hi~ I am Kafra No. 1 Type Jasmine."; + mes "Thank you for comming all the way to Kafra Main Office here at Al De Baran!"; + next; + mes "[Kapra Jasmine]"; + mes "Our Kapra Service is always together with our customers!"; + mes "Our Kapra Service has a history and legacy of 5 thousand 8 hundred years old..."; + mes "Blah-blah-blah....."; + next; + menu "FIVE THOUSNAD AND EIGHT HUNDRED YEARS?!",L0,"Ahh~ Shut Up!",L1,"You go a boyfriend?",L3; + + L0: + mes "[Kapra Jasmine]"; + mes "Shut UP! And listen! It to me a week to memorice this!"; + mes "I've got poor memory unlike other Kafra agents!"; + mes "..... Eh!... What did I just say..."; + next; + mes "[Kapra Jasmine]"; + mes "Hohohoho. S-sorry... I-it was a show, a standing comedy..."; + mes "Right... Dream Show only for Ka-Kafra customers~!"; + mes "(but a solo show)"; + close; + L1: + mes "[Kapra Jasmine]"; + mes ". . . . ."; + mes "I was the member of Kafra Garrion before I joined Kafra Service Team..."; + mes "The speciality was 'Bash'!!"; + mes "I'm trying to be feminine and live a quiet life"; + mes "So please don0t tempt me..."; + close; + L2: + mes "[Kapra Jasmine]"; + mes "My, my~. Kafra Service has a ridiculous rule that no Agent can have a boyfriend"; + mes ". . . . ."; + mes ". . . . . . . . . ."; + next; + mes "[Kapra Jasmine]"; + mes "Just kidding~~ Hehe"; + close; +} + +aldeba_in.gat,79,161,6 script Kafra 115,{ + mes "[Kafra]"; + mes "Welcome, my dearest " + strcharinfo(0) + "."; + mes "Take goods as many as you've got speacial reserve from Kafra Service~"; + next; + mes "[Kafra]"; + mes "Please keep in mind that each window requires a different special reserve for your information."; + mes "Window I am at allows you to use special reserve form ^FF00FF100p to 3000p^000000."; + next; + mes "[Kafra]"; + mes "Your special reserve is ^FF0000" + specialreserve + "^000000~"; + mes "Please choose the items you want."; + next; + menu "100 = Carrot 7 ea",100,"200 = Carrot 15 ea",200,"300 = Carrot 25 ea",300,"400 = Carrot 35 ea",400,"500 = Carrot 50 ea",500,"600 = Carrot 60 ea",600,"700 = Carrot 75 ea",700,"800 = Carrot 85 ea",800,"900 = Carrot 100 ea",900,"1000 = 1st Lotery Chance!",1000,"Next Articles",L0,"Cancel",LEnd; + + 100: + if(specialreserve < 100) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,7; + set specialreserve,specialreserve - 100; + close; + 200: + if(specialreserve < 200) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,15; + set specialreserve,specialreserve - 200; + close; + 300: + if(specialreserve < 300) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,25; + set specialreserve,specialreserve - 300; + close; + 400: + if(specialreserve < 400) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,35; + set specialreserve,specialreserve - 400; + close; + 500: + if(specialreserve < 500) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,50; + set specialreserve,specialreserve - 500; + close; + 600: + if(specialreserve < 600) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,60; + set specialreserve,specialreserve - 600; + close; + 700: + if(specialreserve < 700) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,75; + set specialreserve,specialreserve - 700; + close; + 800: + if(specialreserve < 800) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,85; + set specialreserve,specialreserve - 800; + close; + 900: + if(specialreserve < 900) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 515,100; + set specialreserve,specialreserve - 900; + close; + 1000: + mes "^FF0000Under Construction^000000"; + close; + L0: + menu "1100 = Red Potion 7 ea",1100,"1300 = Red Potion 15 ea",1300,"1500 = Red Potion 25 ea",1500,"1700 = Red Potion 35 ea",1700,"1900 = Red Potion 50 ea",1900,"2100 = Red Potion 60 ea",2100,"2300 = Red Potion 75 ea",2300,"2500 = Red Potion 85 ea",2500,"2800 = Red Potion 100 ea",2800,"3000 = 2nd Lotery Chance!",3000,"Cancel",EndL0; + + 1100: + if(specialreserve < 1100) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,7; + set specialreserve,specialreserve - 1100; + close; + 1300: + if(specialreserve < 1300) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,15; + set specialreserve,specialreserve - 1300; + close; + 1500: + if(specialreserve < 1500) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,25; + set specialreserve,specialreserve - 1500; + close; + 1700: + if(specialreserve < 1700) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,35; + set specialreserve,specialreserve - 1700; + close; + 1900: + if(specialreserve < 1900) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,50; + set specialreserve,specialreserve - 1900; + close; + 2100: + if(specialreserve < 2100) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,60; + set specialreserve,specialreserve - 2100; + close; + 2300: + if(specialreserve < 2300) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,75; + set specialreserve,specialreserve - 2300; + close; + 2500: + if(specialreserve < 2500) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,85; + set specialreserve,specialreserve - 2500; + close; + 2800: + if(specialreserve < 2800) goto Lneedpoints; + mes "[Kafra]"; + mes "Good choice... Here ya go."; + getitem 501,100; + set specialreserve,specialreserve - 2800; + close; + 3000: + mes "^FF0000Under Construction^000000"; + close; +Lend: + mes "[Kafra]"; + mes "Ok then... Come again if you change your mind."; + close; +} + +aldeba_in.gat,81,166,4 script Kafra Service 117,{ + cutin "kafra_01",2; + mes "[Kafra Pavianne]"; + mes "Welcome! I'm Kafra service's the first Kapra Type 'Pavianne'"; + next; + mes "[Kafra Pavianne]"; + mes "Our Kapra Service is always trying to meet 100% customers satisfaction based on 3 principles, Trust, Devotion and Truest."; + mes "With complete Service training and supervision, we serve our customers to meet thier needs."; + next; + menu "Buy Kafra Pass",L0,"What is Kafra Pass",L1,"Good Bye",L3; + + L0: + getitem 1084,1; + set Zeny, Zeny-2000; + mes "[Kafra Pavianne]"; + mes "Thank you for using our Kapra Service all the time!"; + mes "Have a Nice Day!"; + cutin "kafra_01",255; + close; + L1: + mes "[Kafra Pavianne]"; + mes "The best gift you could get only at Kafra Main Office!"; + mes "^4040FF'K A P R A's P A S S'^000000!!"; + mes "TaDa~!"; + next; + mes "[Kafra Pavianne]"; + mes "With Kafra Pass, you could experience the convenience of Kafra Service world-wide! No Hassle!"; + mes "The price is 2000 zeny~~"; + next; + mes "[Kafra Pavianne]"; + mes "Visit any Kafra Service in Midgard, and you could enjoy Kafra Service any time any where for once."; + mes "Ending a a conversation with Kafra Service Agent will expire the pass."; + cutin "kafra_01",255; + close; + L3: + mes "[Kafra Pavianne]"; + mes "Thank you for using Kafra Service!"; + mes "It was Kafra Pavianne"; + cutin "kafra_01",255; + close; +} + +aldeba_in.gat,83,244,4 script Kafra Service 116,{ + cutin "kafra_02",2; + mes "[Kafra Blossom]"; + mes "..... Pavianne is such an old-timer!"; + mes "Too stubborn..."; + mes "We should make customers to experience more unique, never-seen, aspects of Kafra here at Main Office."; + next; + mes "[Kafra Blossom]"; + mes "Now! WELCOOOOOME~~ I am Kafra Tailing Type."; + mes "Please don't forget to continue using our Kafra Service, and ask for me, Tailing~~"; + next; + menu "I'm an admirer of you~!",L0,"Ehhaha",L1; + + L0: + mes "[Kafra Blossom]"; + mes "Really!"; + mes "Thank you sooo much~"; + mes "Here is... my... autograph..."; + next; + mes "[Kafra Blossom]"; + mes "Don't even bother to look in your Item Iventory. It won't be there... Hehe.."; + mes "My autograph will remail win your heart."; + cutin "kafra_02",255; + close; + L1: + mes "[Kafra Blossom]"; + mes "Huh?"; + mes ". . . . ."; + mes "That's all?"; + mes "Phew~ such a dull customer..."; + cutin "kafra_02",255; + close; +} + +aldeba_in.gat,91,244,4 script Kafra Service 112,{ + cutin "kafra_06",2; + mes "[Kafra Curly Sue]"; + mes "Hello, hello?!!"; + mes "The youngest of all! Kafra cutty~~"; + mes "I am Kafra Type 'Curly Sue'"; + next; + mes "[Kafra Curly Sue]"; + mes "It hasn't been long meeting customers since I am new, but I am always doing my best!!"; + next; + menu "Where is your mom?",L0,"End conversation",LEnd; + + L0: + mes "[Kafra Curly Sue]"; + mes ". . . . ."; + mes "Sob sob ..."; + mes "I am no a KID!!"; + next; + cutin "kafra_06",255; + close; + LEnd: + mes "[Kafra Curly Sue]"; + mes "Here at Kafra Service, We're all doing out B-E-S-T! to provide our customers the B-E-S-T! services."; + mes "We really appreciate your business with us."; + next; + cutin "kafra_06",255; + close; +} + +aldeba_in.gat,96,181,4 script Kafra Service 113,{ + cutin "kafra_05",2; + mes "[Kafra Leilah]"; + mes "Kafra Service."; + mes "What can I do for you?"; + next; + menu "Save.",Lsave,"Use Storage Service",Lstorage,"Use Cart Service.",Lcart,"End conversation.",Lcancel; + + Lsave: + mes "[Kafra Leilah]"; + mes "Please. This is Kafra Service Command Center in charge of training Kafra Service Agent."; + next; + mes "[Kafra Leilah]"; + mes "For Actual Services you must visit Kafra Service Center Agent at each city including Al De Baran."; + mes "... But I will do that for you..."; + next; + savepoint "aldeba_in.gat",96,179; + cutin "kafra_05",255; + close; + Lstorage: + if((class ==Job_Novice) && (JobLevel<6)) goto NeedJobLevel; + if(Zeny<30) goto NeedZenys; + set Zeny, Zeny-30; + openstorage; + cutin "kafra_02",255; + close; + + NeedJobLevel: + mes "[Kafra Leilah]"; + mes "I am sorry but you have to be at least novice with job level 6 if you want to use the storage"; + cutin "kafra_05",255; + close; + NeedZenys: + mes "[Kafra Leilah]"; + mes "Dear, you don't have enough zeny. The Storage fee is 30 Zeny."; + cutin "kafra_05",255; + close; + Lcart: + if((class ==Job_Merchant) || (class==Job_Blacksmith) || (class==Job_Alchem)) goto UseCart; + mes "[Kafra Leilah]"; + mes "I'm sorry. The cart service is only provided for Merchants, Blacksmiths and Alchemists only."; + cutin "kafra_04",255; + close; + + UseCart: + mes "[Kafra Leilah]"; + mes "The Cart Fee is 800 Zeny. Do you want to Rent a Cart?"; + next; + menu "Rent a Cart.",RentCart,"Cancel.",RCCancel; + + RentCart: + if(Zeny<800) goto RCNeedZenys; + if(getskilllv(39) < 1) got Lneedskill; + if((CheckCart)==1) goto GetCart; + + GetCart: + set Zeny,Zeny-800; + set specialreserve,specialreserve + 800; + setcart; + mes "[Kafra]"; + mes "There you go.."; + cutin "kafra_08",255; + close; + RCNeedZenys: + mes "[Kafra Leilah]"; + mes "Dear, you don't have enough zeny. You need 800 Zeny."; + cutin "kafra_04",255; + close; + Lneedskill: + mes "[Kafra Leilah]"; + mes "Sorry dear but you need the Pushcart skill to rent a cart."; + cutin "kafra_04",255; + close; + RCCancel: + cutin "kafra_04",255; + close; + Lcancel: + cutin "kafra_05",2; + close; +} + +aldeba_in.gat,142,238,4 script Kafra Service 114,{ + cutin "kafra_04",2; + mes "[Kafra Roxie]"; + mes "Welcome! I'm Kafra Type 'Roxie'"; + mes "The Special Secret about Kapra only for you Kapra!"; + next; + mes "[Kafra Roxie]"; + mes "You know... Our Kapra Service wasn't actually called Kapra originally~~"; + mes "Well what do you think it actually was?~"; + next; + mes "[Kafra Roxie]"; + mes "TaDa~ Surprisingly it was~~~!"; + mes "Ka! P (Ring Ring Ring)"; + mes "Oh... my phone... Sorry please wait..."; + next; + mes "[Kafra Roxie]"; + mes "Hi? Kapra Type Roxie"; + mes "Huh! Director, sir! Yes! Yes! I understand! ..... Sure!"; + mes "Ah... Huh?!"; + next; + mes "[Kafra Roxie]"; + mes "No-no sir!"; + mes "Yes! I understand!!"; + next; + mes "[Kafra Roxie]"; + mes "*Click*"; + mes "..... Hehehe..."; + mes ". . . . ."; + next; + mes "[Kafra Roxie]"; + mes "Ah... Please ignore what you've just heard from me, haha."; + mes ". . . . ."; + close; +} \ No newline at end of file diff --git a/npc/other/old/pvp.txt b/npc/other/old/pvp.txt new file mode 100644 index 000000000..6dcbdfec3 --- /dev/null +++ b/npc/other/old/pvp.txt @@ -0,0 +1,1455 @@ +// Original Athena Japanese Dev PVP Script +// *With added NPCs, missing Warps, and Warpers* +// *Caution! This is an intended version/addition of the Izlude Arena!* +// +// Additions/Translation By DiaDz +// Jan 24, 2004 +// +//Addition 2v2 script by: Unknown - added + + + +// Begin PVP Room N +pvp_y_room.gat,30,85,4 script Usher 31~40 105,{ + if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_1-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_1-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_1-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_1-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_1-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_1-1.gat") >= 128 ) goto LError; + warp "pvp_y_1-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_1-2.gat") >= 128 ) goto LError; + warp "pvp_y_1-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_1-3.gat") >= 128 ) goto LError; + warp "pvp_y_1-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_1-4.gat") >= 128 ) goto LError; + warp "pvp_y_1-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_1-5.gat") >= 128 ) goto LError; + warp "pvp_y_1-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 31~40"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 41 ~ LV 50",0; + break; +} +pvp_y_room.gat,38,85,4 script Usher 41~50 105,{ + if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_2-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_2-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_2-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_2-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_2-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_2-1.gat") >= 128 ) goto LError; + warp "pvp_y_2-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_2-2.gat") >= 128 ) goto LError; + warp "pvp_y_2-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_2-3.gat") >= 128 ) goto LError; + warp "pvp_y_2-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_2-4.gat") >= 128 ) goto LError; + warp "pvp_y_2-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_2-5.gat") >= 128 ) goto LError; + warp "pvp_y_2-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 41~50"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 40 ~ LV 50",0; + break; +} +pvp_y_room.gat,46,85,4 script Usher 51~60 105,{ + if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_3-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_3-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_3-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_3-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_3-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_3-1.gat") >= 128 ) goto LError; + warp "pvp_y_3-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_3-2.gat") >= 128 ) goto LError; + warp "pvp_y_3-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_3-3.gat") >= 128 ) goto LError; + warp "pvp_y_3-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_3-4.gat") >= 128 ) goto LError; + warp "pvp_y_3-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_3-5.gat") >= 128 ) goto LError; + warp "pvp_y_3-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 51~60"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 51 ~ LV 60",0; + break; +} +pvp_y_room.gat,54,85,4 script Usher 61~70 105,{ + if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_4-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_4-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_4-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_4-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_4-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_4-1.gat") >= 128 ) goto LError; + warp "pvp_y_4-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_4-2.gat") >= 128 ) goto LError; + warp "pvp_y_4-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_4-3.gat") >= 128 ) goto LError; + warp "pvp_y_4-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_4-4.gat") >= 128 ) goto LError; + warp "pvp_y_4-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_4-5.gat") >= 128 ) goto LError; + warp "pvp_y_4-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 61~70"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 61 ~ LV 70",0; + break; +} +pvp_y_room.gat,62,85,4 script Usher 71~80 105,{ + if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_5-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_5-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_5-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_5-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_5-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_5-1.gat") >= 128 ) goto LError; + warp "pvp_y_5-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_5-2.gat") >= 128 ) goto LError; + warp "pvp_y_5-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_5-3.gat") >= 128 ) goto LError; + warp "pvp_y_5-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_5-4.gat") >= 128 ) goto LError; + warp "pvp_y_5-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_5-5.gat") >= 128 ) goto LError; + warp "pvp_y_5-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 71~80"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 71 ~ LV 80",0; + break; +} +pvp_y_room.gat,70,85,4 script Usher 81~90 105,{ + if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_6-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_6-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_6-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_6-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_6-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_6-1.gat") >= 128 ) goto LError; + warp "pvp_y_6-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_6-2.gat") >= 128 ) goto LError; + warp "pvp_y_6-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_6-3.gat") >= 128 ) goto LError; + warp "pvp_y_6-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_6-4.gat") >= 128 ) goto LError; + warp "pvp_y_6-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_6-5.gat") >= 128 ) goto LError; + warp "pvp_y_6-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 81~90"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 81 ~ LV 90",0; + break; +} +pvp_y_room.gat,78,85,4 script Usher 91~Higher 105,{ + if (BaseLevel < 91) goto LVNG; + menu "Prontera Arena [" + getmapusers("pvp_y_7-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_7-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_7-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_7-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_7-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_7-1.gat") >= 128 ) goto LError; + warp "pvp_y_7-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_7-2.gat") >= 128 ) goto LError; + warp "pvp_y_7-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_7-3.gat") >= 128 ) goto LError; + warp "pvp_y_7-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_7-4.gat") >= 128 ) goto LError; + warp "pvp_y_7-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_7-5.gat") >= 128 ) goto LError; + warp "pvp_y_7-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 91~Higher"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 91 ~ Higher",0; + break; +} +pvp_y_room.gat,86,85,4 script Usher All Levels 105,{ + menu "Prontera Arena [" + getmapusers("pvp_y_8-1.gat") + " / 128]",Lpro, + "Izlude Arena [" + getmapusers("pvp_y_8-2.gat") + " / 128]",Lizu, + "Payon Arena [" + getmapusers("pvp_y_8-3.gat") + " / 128]",Lpay, + "Alberta Arena [" + getmapusers("pvp_y_8-4.gat") + " / 128]",Lalb, + "Morroc Arena [" + getmapusers("pvp_y_8-5.gat") + " / 128]",Lmoc, + "Quit",Lcancel; +Lpro: + if(getmapusers("pvp_y_8-1.gat") >= 128 ) goto LError; + warp "pvp_y_8-1",0,0; + break; +Lizu: + if(getmapusers("pvp_y_8-2.gat") >= 128 ) goto LError; + warp "pvp_y_8-2",0,0; + break; +Lpay: + if(getmapusers("pvp_y_8-3.gat") >= 128 ) goto LError; + warp "pvp_y_8-3",0,0; + break; +Lalb: + if(getmapusers("pvp_y_8-4.gat") >= 128 ) goto LError; + warp "pvp_y_8-4",0,0; + break; +Lmoc: + if(getmapusers("pvp_y_8-5.gat") >= 128 ) goto LError; + warp "pvp_y_8-5",0,0; + break; +Lcancel: + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "All Levels",0; + break; +} + +// Begin PVP Room N +pvp_n_room.gat,30,85,4 script Usher 31~40 105,{ + if ((BaseLevel < 31) || (BaseLevel > 40)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_1-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_1-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_1-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_1-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_1-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_1-1.gat") >= 64 ) goto LError; + warp "pvp_n_1-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_1-2.gat") >= 32 ) goto LError; + warp "pvp_n_1-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_1-3.gat") >= 32 ) goto LError; + warp "pvp_n_1-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_1-4.gat") >= 32 ) goto LError; + warp "pvp_n_1-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_1-5.gat") >= 32 ) goto LError; + warp "pvp_n_1-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 31~40"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 31 ~ LV 40",0; + break; +} +pvp_n_room.gat,38,85,4 script Usher 41~50 105,{ + if ((BaseLevel < 41) || (BaseLevel > 50)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_2-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_2-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_2-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_2-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_2-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_2-1.gat") >= 64 ) goto LError; + warp "pvp_n_2-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_2-2.gat") >= 32 ) goto LError; + warp "pvp_n_2-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_2-3.gat") >= 32 ) goto LError; + warp "pvp_n_2-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_2-4.gat") >= 32 ) goto LError; + warp "pvp_n_2-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_2-5.gat") >= 32 ) goto LError; + warp "pvp_n_2-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 41~50"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 41 ~ LV 50",0; + break; +} +pvp_n_room.gat,46,85,4 script Usher 51~60 105,{ + if ((BaseLevel < 51) || (BaseLevel > 60)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_3-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_3-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_3-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_3-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_3-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_3-1.gat") >= 64 ) goto LError; + warp "pvp_n_3-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_3-2.gat") >= 32 ) goto LError; + warp "pvp_n_3-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_3-3.gat") >= 32 ) goto LError; + warp "pvp_n_3-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_3-4.gat") >= 32 ) goto LError; + warp "pvp_n_3-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_3-5.gat") >= 32 ) goto LError; + warp "pvp_n_3-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 51~60"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 51 ~ LV 60",0; + break; +} +pvp_n_room.gat,54,85,4 script Usher 61~70 105,{ + if ((BaseLevel < 61) || (BaseLevel > 70)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_4-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_4-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_4-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_4-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_4-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_4-1.gat") >= 64 ) goto LError; + warp "pvp_n_4-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_4-2.gat") >= 32 ) goto LError; + warp "pvp_n_4-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_4-3.gat") >= 32 ) goto LError; + warp "pvp_n_4-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_4-4.gat") >= 32 ) goto LError; + warp "pvp_n_4-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_4-5.gat") >= 32 ) goto LError; + warp "pvp_n_4-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 61~70"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 61 ~ LV 70",0; + break; +} +pvp_n_room.gat,62,85,4 script Usher 71~80 105,{ + if ((BaseLevel < 71) || (BaseLevel > 80)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_5-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_5-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_5-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_5-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_5-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_5-1.gat") >= 64 ) goto LError; + warp "pvp_n_5-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_5-2.gat") >= 32 ) goto LError; + warp "pvp_n_5-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_5-3.gat") >= 32 ) goto LError; + warp "pvp_n_5-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_5-4.gat") >= 32 ) goto LError; + warp "pvp_n_5-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_5-5.gat") >= 32 ) goto LError; + warp "pvp_n_5-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 71~80"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 71 ~ LV 80",0; + break; +} +pvp_n_room.gat,70,85,4 script Usher 81~90 105,{ + if ((BaseLevel < 81) || (BaseLevel > 90)) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_6-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_6-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_6-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_6-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_6-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_6-1.gat") >= 64 ) goto LError; + warp "pvp_n_6-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_6-2.gat") >= 32 ) goto LError; + warp "pvp_n_6-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_6-3.gat") >= 32 ) goto LError; + warp "pvp_n_6-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_6-4.gat") >= 32 ) goto LError; + warp "pvp_n_6-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_6-5.gat") >= 32 ) goto LError; + warp "pvp_n_6-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 81~90"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 81 ~ LV 90",0; + break; +} +pvp_n_room.gat,78,85,4 script Usher 91~Higher 105,{ + if (BaseLevel < 91) goto LVNG; + menu "Sandwich Arena [" + getmapusers("pvp_n_7-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_7-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_7-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_7-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_7-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_7-1.gat") >= 64 ) goto LError; + warp "pvp_n_7-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_7-2.gat") >= 32 ) goto LError; + warp "pvp_n_7-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_7-3.gat") >= 32 ) goto LError; + warp "pvp_n_7-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_7-4.gat") >= 32 ) goto LError; + warp "pvp_n_7-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_7-5.gat") >= 32 ) goto LError; + warp "pvp_n_7-5",0,0; + break; +Lcancel: + close; +LVNG: + mes "[PVP Usher]"; + mes "Sorry, this arena is only for levels 91~Higher0"; + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "LV 91 ~ Higher",0; + break; +} +pvp_n_room.gat,86,85,4 script Usher All Levels 105,{ + menu "Sandwich Arena [" + getmapusers("pvp_n_8-1.gat") + " / 64]",Lsand, + "Rock Arena [" + getmapusers("pvp_n_8-2.gat") + " / 32]",Llock, + "Four Arena [" + getmapusers("pvp_n_8-3.gat") + " / 32]",Lpolu, + "Undercross Arena [" + getmapusers("pvp_n_8-4.gat") + " / 32]",Lunder, + "Copass Arena [" + getmapusers("pvp_n_8-5.gat") + " / 32]",Lcom, + "Quit",Lcancel; +Lsand: + if(getmapusers("pvp_n_8-1.gat") >= 64 ) goto LError; + warp "pvp_n_8-1",0,0; + break; +Llock: + if(getmapusers("pvp_n_8-2.gat") >= 32 ) goto LError; + warp "pvp_n_8-2",0,0; + break; +Lpolu: + if(getmapusers("pvp_n_8-3.gat") >= 32 ) goto LError; + warp "pvp_n_8-3",0,0; + break; +Lunder: + if(getmapusers("pvp_n_8-4.gat") >= 32 ) goto LError; + warp "pvp_n_8-4",0,0; + break; +Lcom: + if(getmapusers("pvp_n_8-5.gat") >= 32 ) goto LError; + warp "pvp_n_8-5",0,0; + break; +Lcancel: + close; +LError: + mes "[PVP Usher]"; + mes "Sorry, this arena is currently full"; + close; +OnInit: + waitingroom "All Levels",0; + break; +} + +// PvP Representative NPC prontera 164 175 +prontera.gat,164,175,5 script PvP Representative 116,{ + mes "[PvP Representative]"; + mes "Hello there! I'm the PvP Representative!"; + next; + mes "[PvP Representative]"; + mes "I'm here to advertise our Arena in Izlude! It's specially designed for you players to beat each other up!"; + next; + menu "Sounds interesting! I'll join!",entrance,"PvP? Whats that?",info,"Nah, maybe later.",quit; +entrance: + mes "[PvP Representative]"; + mes "Most excellent! I'll warp you to our Arena's Front Gate!"; + next; + warp "izlude.gat",128,218; + close; +info: + mes "[PvP Representative]"; + mes "PvP Stands For 'Player versus Player', where you get to choose from a variety of arenas in which to fight in!"; + next; + mes "[PvP Representative]"; + mes "You don't have to worry about losing items, we have a NO PENALTY rule that states you cannot loose items or EXP!"; + next; + mes "[PvP Representative]"; + mes "So whadduya think?"; + next; + menu "Sounds interesting! I'll join!",entrance,"Nah, maybe later.",quit; +quit: + mes "[PvP Representative]"; + mes "'Kay - I hope you change your mind in the near future."; + mes " "; + mes "Come Again! ^_^"; + close; +} + +// Arena Bulletin Board NPC izlude 125 219 +izlude.gat,125,219,5 script Arena Bulletin Board 111,{ + mes "[Arena Bulletin Board]"; + mes "Welcome to the one and only..."; + mes " "; + mes "Player Versus Player Arena!"; + close; +} + +// Arena Master NPC prt_are_in 100 84 +prt_are_in.gat,100,84,4 script Arena Master 734,{ + mes "[Arena Master]"; + mes "Aaahh yes! Welcome to my humble and world renown PvP Arena!"; + next; + mes "[Arena Master]"; + mes "Tell me...do you wish to learn more of my Arena?"; + next; + menu "Sure",sure,"Maybe later...",later; +sure: + mes "[Arena Master]"; + mes "After much boredom that I've went through all my life of killing simple monsters, I decided that it wasn't enough!"; + next; + mes "[Arena Master]"; + mes "I needed HUMAN FLESH! To satisfy my need to kill..."; + next; + mes "[Arena Master]"; + mes "And after years of construction and planning ~ it's finally complete for all of Midgard to see and cherish!"; + next; + mes "[Arena Master]"; + mes "I present you..."; + mes " "; + mes "MY ARENA!!!"; + close; +later: + mes "[Arena Master]"; + mes "Fine fine, please do enjoy your stay."; + close; +} + +// PvP Attendant NPC prt_are_in 97 86 +prt_are_in.gat,97,86,4 script PvP Attendant 98,{ + mes "[PvP Attendant]"; + mes "Welcome To The PVP ARENA!"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Left leads to City simulation Arenas"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Right leads to our Special map Arenas"; + close; +} + +// PvP Attendant NPC prt_are_in 102 86 +prt_are_in.gat,102,86,4 script PvP Attendant 98,{ + mes "[PvP Attendant]"; + mes "Welcome To The PVP ARENA!"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Left leads to City simulation Arenas"; + next; + mes "[PvP Attendant]"; + mes "The Hall to the Right are our Special map Arenas"; + close; +} + +// Begin 2v2 pvp Script +pvp_2vs2.gat,32,22,2 script Bruno 87,{ + mes "[Bruno]"; + mes "You wimpin out already?"; + menu "Yes",goback,"No",stay; + goback: + mes "Man!, you don't even got scratches, you wimp."; + next; + warp "prt_are_in.gat",167,90; + close; + stay: + mes "Impressive!, I respect your stamina!"; + close; +} + +prt_are_in.gat,167,92,4 script Bruno 87,{ + mes "[Bruno]"; + mes "You sure you wanna goto our underground 2vs2 arena dork?"; + menu "Yes",gopvp,"No",nopvp; + gopvp: + mes "Was nice knowin you chump."; + next; + warp "pvp_2vs2.gat",36,49; + close; + nopvp: + mes "Didn't think so, wuss!"; + close; +} + +prt_are_in.gat,92,86,4 script Herman 125,{ + mes "[Herman]"; + mes "Welcome to Royal Rumble!"; + mes "Ladies and Gents, my name is Herman from 'Cool Event Corp.'!"; + next; + menu "What's Royal Rumble?",M0,"Boo~Go Home~",MEnd; + + M0: + mes "[Herman]"; + mes "We, Cool Event Corp., have opened a special event open to everyone visiting the Arena."; + mes "You can escape your monotonous life with this really great even we are providing you!"; + next; + mes "[Herman]"; + mes "This event is called ..Rooooooyal Rumbbbbbbble!!"; + mes "*Cough*..*Cough*..*Cough* !!"; + next; + mes "[Herman]"; + mes ". . . . ."; + mes "Arrggghhh Sooorry..."; + next; + mes "[Herman]"; + mes "When there are enough players in every 'Stand-By Room',"; + mes "We will guide you to the beautiful Colosseum."; + next; + mes "[Herman]"; + mes "In that Colosseum, you have to fight with hard and hostile Monsters within 5 minutes,"; + mes "Using 8 warp zones located in 8 directions."; + next; + mes "[Herman]"; + mes "When you strike into the deep inside of Monsters you will see Organ NPCs which control and generate Monsters."; + mes "You should have to speak them if you want to make an easy way to get a victory. They will release you from enemies."; + next; + mes "[Herman]"; + mes "Whatever you eliminate all enemies by yourself or get helped by Organ NPCs, When you kill them all,"; + mes "It is regarded as the Perfect Clear on Royal Rumble!"; + next; + mes "[Herman]"; + mes "Have some fun in Royal Rumble with your companions."; + mes "Once again, My name is Herman from Cool Event Corp. Thank you!"; + close; + + MEnd: + mes "[Herman]"; + mes "You go Home, Baby"; + close; +} + +prt_are_in.gat,93,86,4 script Lancelot 125,{ + mes "[Lancelot]"; + mes "Hi Hi! Come on ! Make yourself at Home!"; + mes "My name is Lacelot from Cool Event Corp. I am here to tell you about Time Limit Fight. Do you want to Listen?"; + next; + menu "Yeah, Cool.",M0,"Sorry, I don't want to.",MEnd; + + M0: + mes "[Lancelot]"; + mes "We, Cool Event Corp., open a Special event to give a fun to everybody visiting Arena."; + mes "You can slip your monotonous day life for the moment during the event we provide you!"; + next; + mes "[Lancelot]"; + mes "The Event Called ..Timeeeee-- Limmmmmitttt---Figgggghhtt !!"; + mes "*Aaahchoo* !! *Achoo* !! *Cough**Cough* .."; + next; + mes "[Lancelot]"; + mes ". . . . . Whack.."; + mes "Oh Boy.. Really Sorry to make you uncomfortable with this."; + next; + mes "[Lancelot]"; + mes "When players gather as many as we need in Each Standbyroom"; + mes "We will guide you to the Labylinth."; + next; + mes "[Lancelot]"; + mes "In that Labylinth,you have to terminate all monsters within 5 minutes,"; + mes "Using this Warp zone and that warp zone..."; + next; + mes "[Lancelot]"; + mes "When you kill all Monsters in one room,another gate will be opened ..and you can go in there."; + mes "One thing you must know is when you enter the new room door is totally closed to block your exit .."; + next; + mes "[Lancelot]"; + mes "You cannot go back to where you're from."; + next; + mes "[Lancelot]"; + mes "In case of Level 1 Stage, the door of Boss Stage will be opened when you eliminate all monsters in every room .."; + mes "But in Level 2 and 3, even though there are many complexed corridors, if you follow the shortcut, you will enter the Boss Room at ease."; + next; + mes "[Lancelot]"; + mes "Get some fun with your companions."; + mes "Thank you for your time, once again my name is Lancelot!"; + close; + MEnd: + mes "[Lancelot]"; + mes "Alright, Bye Bye"; + close; +} + +prt_are_in.gat,94,85,4 Zakkie 84,{ + mes "[Zakkie]"; + mes "Welcome to Royal Rumble,the World of Fighters!"; + mes "My name is Zakkie from Cool Event Corp.!"; + mes "If you don't mind let me give you some tips for more fun."; + next; + menu "No!i don't mind.Go ahead.",M0,"Errr....I know already.",MEnd; + + M0: + mes "[Zakkie]"; + mes "when get started, You will ecounter many monsters through 8 warp zones."; + mes "You can choose either way of the Battle. You can find Organ NPCs behind each Warp Zone or You can kill all Enemies by yourself."; + next; + mes "[Zakkie]"; + mes "When you satisfy one of them, it is regarded as Clear on that Round."; + mes "We suggest you to discuss with party members to find out better way of the Battle."; + close; + MEnd: + mes "[Zakkie]"; + mes "Whattt!! Did you say you know the tips?!"; + mes "Wow~Excellent. Then you don't need my help. Well have fun~!"; + close; +} + +prt_are_in.gat,108,86,4 script Boris 84,{ + mes "[Boris]"; + mes "Hmm.. I can easily imagine how frustrated you have been in your life, dear.. Because Common people cannot dare to visit me."; + mes "Let me introduce myself. My name is Boris and the director of Customer Support Team in Cool Event Corp."; + mes "I will give you the exceptional tips only for the Bloodthirsty."; + next; + menu "Will you please?",M0,"Thank you but I already know about it.",MEnd; + + M0: + mes "[Boris]"; + mes "Before get started, you must work out a strategy considering your members."; + mes "Then you can warp into the Battle."; + next; + mes "[Boris]"; + mes "If 8 men jump into the Warp zone together, You will succeed."; + mes "Otherwise If a man or two, I don't think you can survive."; + next; + mes "[Boris]"; + mes "And let's talk about the Running Time of Royal Rumble and of Time Limit Fight."; + mes "Although every Battle Time is limitted, but sometimes it is increased by a Bonus when you clear One Round."; + next; + mes "[Boris]"; + mes "Bonus Time will be increased by Second.. When you get a Bonus Time"; + mes "Definately you could extent the Limit of Battle. You can check the Time passage with the announcement of our employee."; + close; + + MEnd: + mes "[Boris]"; + mes ".. Ahh...I need my room in Dark .."; + mes "Hmm Hmm Nothing, Nothing."; + close; +} + +// Add missing Warps Begins Here +prt_are_in.gat,32,95,0 warp areawarpfix1 1,1,pvp_y_room.gat,52,23 +prt_are_in.gat,170,95,0 warp areawarpfix2 1,1,pvp_n_room.gat,52,23 +pvp_y_room.gat,52,18,0 warp areawarpfix3 1,1,prt_are_in.gat,32,92 +pvp_n_room.gat,52,18,0 warp areawarpfix4 1,1,prt_are_in.gat,170,92 + +// PvP Mapflags +pvp_y_1-1.gat mapflag nopenalty +pvp_y_1-2.gat mapflag nopenalty +pvp_y_1-3.gat mapflag nopenalty +pvp_y_1-4.gat mapflag nopenalty +pvp_y_1-5.gat mapflag nopenalty +pvp_y_2-1.gat mapflag nopenalty +pvp_y_2-2.gat mapflag nopenalty +pvp_y_2-3.gat mapflag nopenalty +pvp_y_2-4.gat mapflag nopenalty +pvp_y_2-5.gat mapflag nopenalty +pvp_y_3-1.gat mapflag nopenalty +pvp_y_3-2.gat mapflag nopenalty +pvp_y_3-3.gat mapflag nopenalty +pvp_y_3-4.gat mapflag nopenalty +pvp_y_3-5.gat mapflag nopenalty +pvp_y_4-1.gat mapflag nopenalty +pvp_y_4-2.gat mapflag nopenalty +pvp_y_4-3.gat mapflag nopenalty +pvp_y_4-4.gat mapflag nopenalty +pvp_y_4-5.gat mapflag nopenalty +pvp_y_5-1.gat mapflag nopenalty +pvp_y_5-2.gat mapflag nopenalty +pvp_y_5-3.gat mapflag nopenalty +pvp_y_5-4.gat mapflag nopenalty +pvp_y_5-5.gat mapflag nopenalty +pvp_y_6-1.gat mapflag nopenalty +pvp_y_6-2.gat mapflag nopenalty +pvp_y_6-3.gat mapflag nopenalty +pvp_y_6-4.gat mapflag nopenalty +pvp_y_6-5.gat mapflag nopenalty +pvp_y_7-1.gat mapflag nopenalty +pvp_y_7-2.gat mapflag nopenalty +pvp_y_7-3.gat mapflag nopenalty +pvp_y_7-4.gat mapflag nopenalty +pvp_y_7-5.gat mapflag nopenalty +pvp_y_8-1.gat mapflag nopenalty +pvp_y_8-2.gat mapflag nopenalty +pvp_y_8-3.gat mapflag nopenalty +pvp_y_8-4.gat mapflag nopenalty +pvp_y_8-5.gat mapflag nopenalty +pvp_n_1-1.gat mapflag nopenalty +pvp_n_1-2.gat mapflag nopenalty +pvp_n_1-3.gat mapflag nopenalty +pvp_n_1-4.gat mapflag nopenalty +pvp_n_1-5.gat mapflag nopenalty +pvp_n_2-1.gat mapflag nopenalty +pvp_n_2-2.gat mapflag nopenalty +pvp_n_2-3.gat mapflag nopenalty +pvp_n_2-4.gat mapflag nopenalty +pvp_n_2-5.gat mapflag nopenalty +pvp_n_3-1.gat mapflag nopenalty +pvp_n_3-2.gat mapflag nopenalty +pvp_n_3-3.gat mapflag nopenalty +pvp_n_3-4.gat mapflag nopenalty +pvp_n_3-5.gat mapflag nopenalty +pvp_n_4-1.gat mapflag nopenalty +pvp_n_4-2.gat mapflag nopenalty +pvp_n_4-3.gat mapflag nopenalty +pvp_n_4-4.gat mapflag nopenalty +pvp_n_4-5.gat mapflag nopenalty +pvp_n_5-1.gat mapflag nopenalty +pvp_n_5-2.gat mapflag nopenalty +pvp_n_5-3.gat mapflag nopenalty +pvp_n_5-4.gat mapflag nopenalty +pvp_n_5-5.gat mapflag nopenalty +pvp_n_6-1.gat mapflag nopenalty +pvp_n_6-2.gat mapflag nopenalty +pvp_n_6-3.gat mapflag nopenalty +pvp_n_6-4.gat mapflag nopenalty +pvp_n_6-5.gat mapflag nopenalty +pvp_n_7-1.gat mapflag nopenalty +pvp_n_7-2.gat mapflag nopenalty +pvp_n_7-3.gat mapflag nopenalty +pvp_n_7-4.gat mapflag nopenalty +pvp_n_7-5.gat mapflag nopenalty +pvp_n_8-1.gat mapflag nopenalty +pvp_n_8-2.gat mapflag nopenalty +pvp_n_8-3.gat mapflag nopenalty +pvp_n_8-4.gat mapflag nopenalty +pvp_n_8-5.gat mapflag nopenalty +pvp_2vs2.gat mapflag nopenalty + +pvp_y_1-1.gat mapflag pvp +pvp_y_1-2.gat mapflag pvp +pvp_y_1-3.gat mapflag pvp +pvp_y_1-4.gat mapflag pvp +pvp_y_1-5.gat mapflag pvp +pvp_y_2-1.gat mapflag pvp +pvp_y_2-2.gat mapflag pvp +pvp_y_2-3.gat mapflag pvp +pvp_y_2-4.gat mapflag pvp +pvp_y_2-5.gat mapflag pvp +pvp_y_3-1.gat mapflag pvp +pvp_y_3-2.gat mapflag pvp +pvp_y_3-3.gat mapflag pvp +pvp_y_3-4.gat mapflag pvp +pvp_y_3-5.gat mapflag pvp +pvp_y_4-1.gat mapflag pvp +pvp_y_4-2.gat mapflag pvp +pvp_y_4-3.gat mapflag pvp +pvp_y_4-4.gat mapflag pvp +pvp_y_4-5.gat mapflag pvp +pvp_y_5-1.gat mapflag pvp +pvp_y_5-2.gat mapflag pvp +pvp_y_5-3.gat mapflag pvp +pvp_y_5-4.gat mapflag pvp +pvp_y_5-5.gat mapflag pvp +pvp_y_6-1.gat mapflag pvp +pvp_y_6-2.gat mapflag pvp +pvp_y_6-3.gat mapflag pvp +pvp_y_6-4.gat mapflag pvp +pvp_y_6-5.gat mapflag pvp +pvp_y_7-1.gat mapflag pvp +pvp_y_7-2.gat mapflag pvp +pvp_y_7-3.gat mapflag pvp +pvp_y_7-4.gat mapflag pvp +pvp_y_7-5.gat mapflag pvp +pvp_y_8-1.gat mapflag pvp +pvp_y_8-2.gat mapflag pvp +pvp_y_8-3.gat mapflag pvp +pvp_y_8-4.gat mapflag pvp +pvp_y_8-5.gat mapflag pvp +pvp_n_1-1.gat mapflag pvp +pvp_n_1-2.gat mapflag pvp +pvp_n_1-3.gat mapflag pvp +pvp_n_1-4.gat mapflag pvp +pvp_n_1-5.gat mapflag pvp +pvp_n_2-1.gat mapflag pvp +pvp_n_2-2.gat mapflag pvp +pvp_n_2-3.gat mapflag pvp +pvp_n_2-4.gat mapflag pvp +pvp_n_2-5.gat mapflag pvp +pvp_n_3-1.gat mapflag pvp +pvp_n_3-2.gat mapflag pvp +pvp_n_3-3.gat mapflag pvp +pvp_n_3-4.gat mapflag pvp +pvp_n_3-5.gat mapflag pvp +pvp_n_4-1.gat mapflag pvp +pvp_n_4-2.gat mapflag pvp +pvp_n_4-3.gat mapflag pvp +pvp_n_4-4.gat mapflag pvp +pvp_n_4-5.gat mapflag pvp +pvp_n_5-1.gat mapflag pvp +pvp_n_5-2.gat mapflag pvp +pvp_n_5-3.gat mapflag pvp +pvp_n_5-4.gat mapflag pvp +pvp_n_5-5.gat mapflag pvp +pvp_n_6-1.gat mapflag pvp +pvp_n_6-2.gat mapflag pvp +pvp_n_6-3.gat mapflag pvp +pvp_n_6-4.gat mapflag pvp +pvp_n_6-5.gat mapflag pvp +pvp_n_7-1.gat mapflag pvp +pvp_n_7-2.gat mapflag pvp +pvp_n_7-3.gat mapflag pvp +pvp_n_7-4.gat mapflag pvp +pvp_n_7-5.gat mapflag pvp +pvp_n_8-1.gat mapflag pvp +pvp_n_8-2.gat mapflag pvp +pvp_n_8-3.gat mapflag pvp +pvp_n_8-4.gat mapflag pvp +pvp_n_8-5.gat mapflag pvp +pvp_2vs2.gat mapflag pvp + +pvp_y_1-1.gat mapflag pvp_noparty +pvp_y_1-2.gat mapflag pvp_noparty +pvp_y_1-3.gat mapflag pvp_noparty +pvp_y_1-4.gat mapflag pvp_noparty +pvp_y_1-5.gat mapflag pvp_noparty +pvp_y_2-1.gat mapflag pvp_noparty +pvp_y_2-2.gat mapflag pvp_noparty +pvp_y_2-3.gat mapflag pvp_noparty +pvp_y_2-4.gat mapflag pvp_noparty +pvp_y_2-5.gat mapflag pvp_noparty +pvp_y_3-1.gat mapflag pvp_noparty +pvp_y_3-2.gat mapflag pvp_noparty +pvp_y_3-3.gat mapflag pvp_noparty +pvp_y_3-4.gat mapflag pvp_noparty +pvp_y_3-5.gat mapflag pvp_noparty +pvp_y_4-1.gat mapflag pvp_noparty +pvp_y_4-2.gat mapflag pvp_noparty +pvp_y_4-3.gat mapflag pvp_noparty +pvp_y_4-4.gat mapflag pvp_noparty +pvp_y_4-5.gat mapflag pvp_noparty +pvp_y_5-1.gat mapflag pvp_noparty +pvp_y_5-2.gat mapflag pvp_noparty +pvp_y_5-3.gat mapflag pvp_noparty +pvp_y_5-4.gat mapflag pvp_noparty +pvp_y_5-5.gat mapflag pvp_noparty +pvp_y_6-1.gat mapflag pvp_noparty +pvp_y_6-2.gat mapflag pvp_noparty +pvp_y_6-3.gat mapflag pvp_noparty +pvp_y_6-4.gat mapflag pvp_noparty +pvp_y_6-5.gat mapflag pvp_noparty +pvp_y_7-1.gat mapflag pvp_noparty +pvp_y_7-2.gat mapflag pvp_noparty +pvp_y_7-3.gat mapflag pvp_noparty +pvp_y_7-4.gat mapflag pvp_noparty +pvp_y_7-5.gat mapflag pvp_noparty +pvp_y_8-1.gat mapflag pvp_noparty +pvp_y_8-2.gat mapflag pvp_noparty +pvp_y_8-3.gat mapflag pvp_noparty +pvp_y_8-4.gat mapflag pvp_noparty +pvp_y_8-5.gat mapflag pvp_noparty +pvp_n_1-1.gat mapflag pvp_noparty +pvp_n_1-2.gat mapflag pvp_noparty +pvp_n_1-3.gat mapflag pvp_noparty +pvp_n_1-4.gat mapflag pvp_noparty +pvp_n_1-5.gat mapflag pvp_noparty +pvp_n_2-1.gat mapflag pvp_noparty +pvp_n_2-2.gat mapflag pvp_noparty +pvp_n_2-3.gat mapflag pvp_noparty +pvp_n_2-4.gat mapflag pvp_noparty +pvp_n_2-5.gat mapflag pvp_noparty +pvp_n_3-1.gat mapflag pvp_noparty +pvp_n_3-2.gat mapflag pvp_noparty +pvp_n_3-3.gat mapflag pvp_noparty +pvp_n_3-4.gat mapflag pvp_noparty +pvp_n_3-5.gat mapflag pvp_noparty +pvp_n_4-1.gat mapflag pvp_noparty +pvp_n_4-2.gat mapflag pvp_noparty +pvp_n_4-3.gat mapflag pvp_noparty +pvp_n_4-4.gat mapflag pvp_noparty +pvp_n_4-5.gat mapflag pvp_noparty +pvp_n_5-1.gat mapflag pvp_noparty +pvp_n_5-2.gat mapflag pvp_noparty +pvp_n_5-3.gat mapflag pvp_noparty +pvp_n_5-4.gat mapflag pvp_noparty +pvp_n_5-5.gat mapflag pvp_noparty +pvp_n_6-1.gat mapflag pvp_noparty +pvp_n_6-2.gat mapflag pvp_noparty +pvp_n_6-3.gat mapflag pvp_noparty +pvp_n_6-4.gat mapflag pvp_noparty +pvp_n_6-5.gat mapflag pvp_noparty +pvp_n_7-1.gat mapflag pvp_noparty +pvp_n_7-2.gat mapflag pvp_noparty +pvp_n_7-3.gat mapflag pvp_noparty +pvp_n_7-4.gat mapflag pvp_noparty +pvp_n_7-5.gat mapflag pvp_noparty +pvp_n_8-1.gat mapflag pvp_noparty +pvp_n_8-2.gat mapflag pvp_noparty +pvp_n_8-3.gat mapflag pvp_noparty +pvp_n_8-4.gat mapflag pvp_noparty +pvp_n_8-5.gat mapflag pvp_noparty + +pvp_y_1-1.gat mapflag nomemo +pvp_y_1-2.gat mapflag nomemo +pvp_y_1-3.gat mapflag nomemo +pvp_y_1-4.gat mapflag nomemo +pvp_y_1-5.gat mapflag nomemo +pvp_y_2-1.gat mapflag nomemo +pvp_y_2-2.gat mapflag nomemo +pvp_y_2-3.gat mapflag nomemo +pvp_y_2-4.gat mapflag nomemo +pvp_y_2-5.gat mapflag nomemo +pvp_y_3-1.gat mapflag nomemo +pvp_y_3-2.gat mapflag nomemo +pvp_y_3-3.gat mapflag nomemo +pvp_y_3-4.gat mapflag nomemo +pvp_y_3-5.gat mapflag nomemo +pvp_y_4-1.gat mapflag nomemo +pvp_y_4-2.gat mapflag nomemo +pvp_y_4-3.gat mapflag nomemo +pvp_y_4-4.gat mapflag nomemo +pvp_y_4-5.gat mapflag nomemo +pvp_y_5-1.gat mapflag nomemo +pvp_y_5-2.gat mapflag nomemo +pvp_y_5-3.gat mapflag nomemo +pvp_y_5-4.gat mapflag nomemo +pvp_y_5-5.gat mapflag nomemo +pvp_y_6-1.gat mapflag nomemo +pvp_y_6-2.gat mapflag nomemo +pvp_y_6-3.gat mapflag nomemo +pvp_y_6-4.gat mapflag nomemo +pvp_y_6-5.gat mapflag nomemo +pvp_y_7-1.gat mapflag nomemo +pvp_y_7-2.gat mapflag nomemo +pvp_y_7-3.gat mapflag nomemo +pvp_y_7-4.gat mapflag nomemo +pvp_y_7-5.gat mapflag nomemo +pvp_y_8-1.gat mapflag nomemo +pvp_y_8-2.gat mapflag nomemo +pvp_y_8-3.gat mapflag nomemo +pvp_y_8-4.gat mapflag nomemo +pvp_y_8-5.gat mapflag nomemo +pvp_n_1-1.gat mapflag nomemo +pvp_n_1-2.gat mapflag nomemo +pvp_n_1-3.gat mapflag nomemo +pvp_n_1-4.gat mapflag nomemo +pvp_n_1-5.gat mapflag nomemo +pvp_n_2-1.gat mapflag nomemo +pvp_n_2-2.gat mapflag nomemo +pvp_n_2-3.gat mapflag nomemo +pvp_n_2-4.gat mapflag nomemo +pvp_n_2-5.gat mapflag nomemo +pvp_n_3-1.gat mapflag nomemo +pvp_n_3-2.gat mapflag nomemo +pvp_n_3-3.gat mapflag nomemo +pvp_n_3-4.gat mapflag nomemo +pvp_n_3-5.gat mapflag nomemo +pvp_n_4-1.gat mapflag nomemo +pvp_n_4-2.gat mapflag nomemo +pvp_n_4-3.gat mapflag nomemo +pvp_n_4-4.gat mapflag nomemo +pvp_n_4-5.gat mapflag nomemo +pvp_n_5-1.gat mapflag nomemo +pvp_n_5-2.gat mapflag nomemo +pvp_n_5-3.gat mapflag nomemo +pvp_n_5-4.gat mapflag nomemo +pvp_n_5-5.gat mapflag nomemo +pvp_n_6-1.gat mapflag nomemo +pvp_n_6-2.gat mapflag nomemo +pvp_n_6-3.gat mapflag nomemo +pvp_n_6-4.gat mapflag nomemo +pvp_n_6-5.gat mapflag nomemo +pvp_n_7-1.gat mapflag nomemo +pvp_n_7-2.gat mapflag nomemo +pvp_n_7-3.gat mapflag nomemo +pvp_n_7-4.gat mapflag nomemo +pvp_n_7-5.gat mapflag nomemo +pvp_n_8-1.gat mapflag nomemo +pvp_n_8-2.gat mapflag nomemo +pvp_n_8-3.gat mapflag nomemo +pvp_n_8-4.gat mapflag nomemo +pvp_n_8-5.gat mapflag nomemo +pvp_2vs2.gat mapflag nomemo + +pvp_y_1-1.gat mapflag noteleport +pvp_y_1-2.gat mapflag noteleport +pvp_y_1-3.gat mapflag noteleport +pvp_y_1-4.gat mapflag noteleport +pvp_y_1-5.gat mapflag noteleport +pvp_y_2-1.gat mapflag noteleport +pvp_y_2-2.gat mapflag noteleport +pvp_y_2-3.gat mapflag noteleport +pvp_y_2-4.gat mapflag noteleport +pvp_y_2-5.gat mapflag noteleport +pvp_y_3-1.gat mapflag noteleport +pvp_y_3-2.gat mapflag noteleport +pvp_y_3-3.gat mapflag noteleport +pvp_y_3-4.gat mapflag noteleport +pvp_y_3-5.gat mapflag noteleport +pvp_y_4-1.gat mapflag noteleport +pvp_y_4-2.gat mapflag noteleport +pvp_y_4-3.gat mapflag noteleport +pvp_y_4-4.gat mapflag noteleport +pvp_y_4-5.gat mapflag noteleport +pvp_y_5-1.gat mapflag noteleport +pvp_y_5-2.gat mapflag noteleport +pvp_y_5-3.gat mapflag noteleport +pvp_y_5-4.gat mapflag noteleport +pvp_y_5-5.gat mapflag noteleport +pvp_y_6-1.gat mapflag noteleport +pvp_y_6-2.gat mapflag noteleport +pvp_y_6-3.gat mapflag noteleport +pvp_y_6-4.gat mapflag noteleport +pvp_y_6-5.gat mapflag noteleport +pvp_y_7-1.gat mapflag noteleport +pvp_y_7-2.gat mapflag noteleport +pvp_y_7-3.gat mapflag noteleport +pvp_y_7-4.gat mapflag noteleport +pvp_y_7-5.gat mapflag noteleport +pvp_y_8-1.gat mapflag noteleport +pvp_y_8-2.gat mapflag noteleport +pvp_y_8-3.gat mapflag noteleport +pvp_y_8-4.gat mapflag noteleport +pvp_y_8-5.gat mapflag noteleport +pvp_n_1-1.gat mapflag noteleport +pvp_n_1-2.gat mapflag noteleport +pvp_n_1-3.gat mapflag noteleport +pvp_n_1-4.gat mapflag noteleport +pvp_n_1-5.gat mapflag noteleport +pvp_n_2-1.gat mapflag noteleport +pvp_n_2-2.gat mapflag noteleport +pvp_n_2-3.gat mapflag noteleport +pvp_n_2-4.gat mapflag noteleport +pvp_n_2-5.gat mapflag noteleport +pvp_n_3-1.gat mapflag noteleport +pvp_n_3-2.gat mapflag noteleport +pvp_n_3-3.gat mapflag noteleport +pvp_n_3-4.gat mapflag noteleport +pvp_n_3-5.gat mapflag noteleport +pvp_n_4-1.gat mapflag noteleport +pvp_n_4-2.gat mapflag noteleport +pvp_n_4-3.gat mapflag noteleport +pvp_n_4-4.gat mapflag noteleport +pvp_n_4-5.gat mapflag noteleport +pvp_n_5-1.gat mapflag noteleport +pvp_n_5-2.gat mapflag noteleport +pvp_n_5-3.gat mapflag noteleport +pvp_n_5-4.gat mapflag noteleport +pvp_n_5-5.gat mapflag noteleport +pvp_n_6-1.gat mapflag noteleport +pvp_n_6-2.gat mapflag noteleport +pvp_n_6-3.gat mapflag noteleport +pvp_n_6-4.gat mapflag noteleport +pvp_n_6-5.gat mapflag noteleport +pvp_n_7-1.gat mapflag noteleport +pvp_n_7-2.gat mapflag noteleport +pvp_n_7-3.gat mapflag noteleport +pvp_n_7-4.gat mapflag noteleport +pvp_n_7-5.gat mapflag noteleport +pvp_n_8-1.gat mapflag noteleport +pvp_n_8-2.gat mapflag noteleport +pvp_n_8-3.gat mapflag noteleport +pvp_n_8-4.gat mapflag noteleport +pvp_n_8-5.gat mapflag noteleport +pvp_2vs2.gat mapflag noteleport + +pvp_y_1-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_1-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_2-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_3-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_4-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_5-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_6-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_7-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_y_8-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_1-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_2-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_3-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_4-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_5-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_6-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_7-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-1.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-2.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-3.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-4.gat mapflag nosave prt_are_in.gat,100,80 +pvp_n_8-5.gat mapflag nosave prt_are_in.gat,100,80 +pvp_2vs2.gat mapflag nosave prt_are_in.gat,100,80 diff --git a/npc/other/platinum_skills.txt b/npc/other/platinum_skills.txt new file mode 100644 index 000000000..ba2f0bdad --- /dev/null +++ b/npc/other/platinum_skills.txt @@ -0,0 +1,94 @@ +//-------------------------------------------------------------------------------------------------------------------------\\ +// PLATINUM SKILL NPC MADE BY KEIICHI AND EDITED BY DARKCHILD \\ +//-------------------------------------------------------------------------------------------------------------------------\\ +prontera.gat,128,200,6 script Platinum Skill NPC 94,{ +mes "[Platinum Skill NPC]"; +mes "I can give you the special skills available to your job. Would you like these skills now?"; +next; +menu "Yes",Lgetskills,"No",Lnogetskills; + +Lgetskills: +if (Class==0) goto Lskillsnovice; +if ((Class==1) || (Class==7) || (Class==14)) goto Lskillsswordie; +if ((Class==2) || (Class==9) || (Class==16)) goto Lskillsmage; +if ((Class==3) || (Class==11) || (Class==19) || (Class==20)) goto Lskillsarcher; +if ((Class==4) || (Class==8) || (Class==15)) goto Lskillsaco; +if ((Class==5) || (Class==10) || (Class==18)) goto Lskillsmerchie; +if ((Class==6) || (Class==12) || (Class==17)) goto Lskillsthief; +Lskillsnovice: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Novice. I will now add the special skills available to the Novice job."; +skill 142,1,0; +skill 143,1,0; +mes " "; +mes "You now have all the special skills available to the Novice job."; +next; +goto LskillsEND; +Lskillsswordie: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Swordman, Knight, or Crusader. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 144,1,0; +skill 145,1,0; +skill 146,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsmage: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Mage, Wizard, or Sage. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 157,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsarcher: +mes "[Platinum Skill NPC]"; +mes "I see that you are an Archer, Hunter, Bard, or Dancer. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 147,1,0; +skill 148,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsaco: +mes "[Platinum Skill NPC]"; +mes "I see that you are an Acolyte, Priest, or Monk. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 156,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsmerchie: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Merchant, Blacksmith, or Alchemist. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 153,1,0; +skill 154,1,0; +skill 155,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +Lskillsthief: +mes "[Platinum Skill NPC]"; +mes "I see that you are a Thief, Assassin, or Rogue. I will now add the special skills available to these jobs."; +skill 142,1,0; +skill 149,1,0; +skill 150,1,0; +skill 151,1,0; +skill 152,1,0; +mes " "; +mes "You now have all the special skills available to the these jobs."; +next; +goto LskillsEND; +LskillsEND: +mes "[Platinum Skill NPC]"; +mes "Have a nice day."; +close; +} + diff --git a/npc/other/pvp.txt b/npc/other/pvp.txt new file mode 100644 index 000000000..5e3eadc3e --- /dev/null +++ b/npc/other/pvp.txt @@ -0,0 +1,443 @@ +//===== eAthena Script ======================================= +//= PvP +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 0.5.2 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.1 Fixed arena names for Nightmare mode. Added room limit check. +//============================================================ + + +//***********************************************************************************************************************************************************// +// PvP Narrator and Gate Keeper Scripts // +//***********************************************************************************************************************************************************// + +// Alberta =========================================================>\\ +// PvP Narrator ------------------------------------------------------ +alberta_in.gat, 22, 146,4 script PvP Narrator#1::PvPNarr 84, +{ + mes "[PvP Narrator]"; + mes "Hello and welcome! I am in charge of explaining the PvP mode to all of those who inquire. I am the PvP Narrator!"; + M_Menu: + next; + menu "What is PvP?",M_0, "What are the PvP modes?",M_1, "What are the rules for PvP?",M_2, "Save position.",M_3; + + M_0: + mes "[PvP Narrator]"; + mes "PvP is short for 'Player versus Player'! It is a unique play mode that allows players to duel other players!"; + next; + mes "[PvP Narrator]"; + mes "If you're interested just speak with the ^5533FFGate Keeper'^000000. He will let you into the PvP square."; + next; + mes "[PvP Narrator]"; + mes "That IS, IF you have at least a base level of 31 and you have 500 zeny to pay for the enterance fee."; + mes "Those are the requirements to participate in PvP."; + goto M_Menu; + M_1: + mes "[PvP Narrator]"; + mes "There are 2 PvP modes to choose from."; + mes "One is called ^5533FF'Yoyo'^000000 Mode and the other is called ^5533FF'Nightmare'^000000 Mode."; + next; + mes "[PvP Narrator]"; + mes "Yoyo mode essentially lets you play risk free. You can experience the thrill of PvP without any restrictions or penalties."; + mes "It is recomended that you practice your skills in this mode before you move on."; + next; + mes "[PvP Narrator]"; + mes "Nightmare Mode is very dangerous! Please use caution when trying this mode of play."; + mes "You will lose some of your real EXP if you are defeated. There is also the small chance that you will drop some items and equipment."; + next; + mes "[PvP Narrator]"; + mes "Of course if you win, the rewards can be great!! Even so you should really think twice before you attempt Nightmare Mode."; + mes "Anyways, good luck."; + goto M_Menu; + M_2: + mes "[PvP Narrator]"; + mes "Before you enter any actual PvP areana, you must first choose your level of ability based on your base level."; + mes "You will do this in the pre-fight room. There will be a row of narrators, each one representing a set of player levels."; + next; + mes "[PvP Narrator]"; + mes "Speak to the narrator that represents your base level. You will then be asked to choose from five different fight maps."; + mes "You will be able to see how many people are currently participating in any given map."; + next; + mes "[PvP Narrator]"; + mes "This will be represented by the 'Attendee/Total' figure in the corner of the screen. There is a limit to how many can play on a map."; + mes "There is a hidden EXP value in PvP mode. This EXP will only apply inside of the PvP zone and not outside."; + next; + mes "[PvP Narrator]"; + mes "Every one will recieve a base EXP of 5 points when they first start. If you win a match your EXP with increase by 1 point."; + mes "If you loose your EXP will drop by 5 points, so be carefull!"; + next; + mes "[PvP Narrator]"; + mes "If you are defeated and your EXP is equal to or less than 0, you will be removed from the PvP arena."; + mes "If your EXP is more than 0 than you may continue fighting and even get help from healers."; + next; + mes "[PvP Narrator]"; + mes "The fighting commands inside of PvP are the same as outside. Just remember that you won't be able to save inside a PvP arena."; + next; + mes "[PvP Narrator]"; + mes "Remember these rules well as they can help to ensure your victory."; + goto M_Menu; + M_3: + savepoint "geffen_in.gat",64,60; + mes "[PvP Narrator]"; + mes "Your position has been saved."; + close; +} + +// Gate Keeper --------------------------------------------------------------- +alberta_in.gat, 26,146,4 script Gate Keeper#1::GateKeep 83, +{ + mes "[Gate Keeper]"; + mes "Hi. I'm glad to be of service. I will open the PvP fight square for you!"; + mes "If you have any questions about the PvP modes or rules, please ask the Narrator....."; + next; + menu "^5533FF'PvP Yoyo Mode'^000000 Fight Square.",M_0, + "^FF5533'PvP Nightmare Mode'^000000 Fight Square.",M_1, + "^5533FF'PvP Duel (Fighting) Mode'^000000 Combat Square.",M_2, "End Conversation.",M_End; + M_0: + set @mode$, "Yoyo"; + set @players1, 128; + set @players2, 128; + set @room1$, "Prontera"; + set @room2$, "Izlude"; + set @room3$, "Payon"; + set @room4$, "Alberta"; + set @room5$, "Morroc"; + callsub sF_Move; + warp "pvp_y_room.gat", 51, 23; + end; + M_1: + set @mode$, "Nightmare"; + set @players1, 64; + set @players2, 32; + set @room1$, "Sandwhich Arena"; + set @room2$, "Rock Arena"; + set @room3$, "Four Arena"; + set @room4$, "UnderCross Arena"; + set @room5$, "Copass Arena"; + callsub sF_Move; + warp "pvp_n_room.gat", 51, 23; + end; + M_2: + + mes "[Gate Keeper]"; + mes "To enter the Duel (Fighting) Mode square you must have an admission ticket. Do you have one?"; + next; + menu "Yes I do.",-, "No I don't.",sM_1; + + if(countitem(7029) < 1) goto sM_1; + delitem 7029, 1; + set @mode$, "Fighting"; + callsub sF_Move; + warp "pvp_y_room.gat", 51, 23; + end; + + sM_1: + mes "[Gate Keeper]"; + mes "Eh? You don't have one? I'm sorry but this fight square is only for people who have admission or viewing tickets."; + mes "You cannot come in without one."; + close; + M_End: + mes "[Gate Keeper]"; + mes "In this war between Monsters and Humans this competition between people, PvP, encourages all of us to become stronger."; + mes "Come again anytime. We welcome your challenge!"; + close; + +sF_Move: + mes "[Gate Keeper]"; + mes "The admission fee is 500 Zeny. Do you want to move to the "+@mode$+" fight square?"; + next; + menu "Yes",-, "No",M_End; + + if(BaseLevel < 31) goto sL_LowLvl; + if(Zeny < 500) goto sL_NdZeny; + set Zeny, Zeny - 500; + mes "[Gate Keeper]"; + mes "Prepare to be warped to the arena....."; + next; + return; + + sL_LowLvl: + mes "[Gate Keeper]"; + mes "In order to participate in PvP you must have a base level of at least ^FF4444'31'^000000."; + close; + sL_NdZeny: + mes "[Gate Keeper]"; + mes "As I stated, the admission fee is ^FF4444'500'^000000 Zeny. You seem to be short on Zeny."; + close; +} + +// Geffen ===================================================>\\ +geffen_in.gat, 67,63,4 duplicate(PvPNarr) PvP Narrator#2 84 +geffen_in.gat, 63,63,4 duplicate(GateKeep) Gate Keeper#2 83 + +// Morroc ===================================================>\\ +morocc_in.gat,144,138,4 duplicate(PvPNarr) PvP Narrator#3 84 +morocc_in.gat, 144,142,4 duplicate(GateKeep) Gate Keeper#3 83 + +// Payon ===================================================>\\ +payon_in01.gat,6,55,4 duplicate(PvPNarr) PvP Narrator#5 84 +payon_in01.gat,10,54,4 duplicate(GateKeep) Gate Keeper#5 83 + +// Prontera =================================================>\\ +prt_in.gat,56,140,4 duplicate(PvPNarr) PvP Narrator#6 84 +prt_in.gat,52,140,4 duplicate(GateKeep) Gate Keeper#6 83 + + + +//***********************************************************************************************************************************************// +// PvP Yoyo Mode Fight Square Helpers // +//***********************************************************************************************************************************************// + +// LV31 ~ 40 ------------------------------------------------------------------------------ +pvp_y_room.gat,30,85,4 script Fight Square Helper::YHelper1 105, +{ + set @map$, "y_1"; + set @lvl2, 40; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV31 ~ LV40",0; + end; +} + +// LV41 ~ 50 ------------------------------------------------------------------------------ +pvp_y_room.gat,38,85,4 script Fight Square Helper::YHelper2 105, +{ + set @map$, "y_2"; + set @lvl1, 41; + set @lvl2, 50; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV41 ~ LV50",0; + end; +} + +// LV51 ~ 60 ------------------------------------------------------------------------------ +pvp_y_room.gat,46,85,4 script Fight Square Helper::YHelper3 105, +{ + set @map$, "y_3"; + set @lvl1, 51; + set @lvl2, 60; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV51 ~ LV60", 0; + end; +} + +// LV61 ~ 70 ------------------------------------------------------------------------------ +pvp_y_room.gat,54,85,4 script Fight Square Helper::YHelper4 105, +{ + set @map$, "y_4"; + set @lvl1, 61; + set @lvl2, 70; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV61 ~ LV70", 0; + end; +} + +// LV71 ~ 80 ------------------------------------------------------------------------------ +pvp_y_room.gat,62,85,4 script Fight Square Helper::YHelper5 105, +{ + set @map$, "y_5"; + set @lvl1, 71; + set @lvl2, 80; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV71 ~ LV80", 0; + end; +} + +// LV81 ~ 90 ------------------------------------------------------------------------------ +pvp_y_room.gat,70,85,4 script Fight Square Helper::YHelper6 105, +{ + set @map$, "y_6"; + set @lvl1, 81; + set @lvl2, 90; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV81 ~ LV90", 0; + end; +} + +// LV91 ~ ------------------------------------------------------------------------------ +pvp_y_room.gat,78,85,4 script Fight Square Helper::YHelper7 105, +{ + set @map$, "y_7"; + set @lvl1, 91; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV91 ~ ", 0; + end; +} + +// No Limit ------------------------------------------------------------------------------ +pvp_y_room.gat,86,85,4 script Fight Square Helper::YHelper8 105, +{ + set @map$, "y_8"; + set @lvl1, 0; + set @lvl2, 200; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "No Limit", 0; + end; +} + + + +//***********************************************************************************************************************************************// +// PvP Nightmare Mode Fight Square Helpers // +//***********************************************************************************************************************************************// +// LV31 ~ 40 ------------------------------------------------------------------------------ +pvp_n_room.gat,30,85,4 script Fight Square Helper#N1 105, +{ + set @map$, "n_1"; + set @lvl2, 40; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV31 ~ LV40",0; + end; +} + +// LV41 ~ 50 ------------------------------------------------------------------------------ +pvp_n_room.gat,38,85,4 script Fight Square Helper#N2 105, +{ + set @map$, "n_2"; + set @lvl1, 41; + set @lvl2, 50; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV41 ~ LV50",0; + end; +} + +// LV51 ~ 60 ------------------------------------------------------------------------------ +pvp_n_room.gat,46,85,4 script Fight Square Helper#N3 105, +{ + set @map$, "n_3"; + set @lvl1, 51; + set @lvl2, 60; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV51 ~ LV60", 0; + end; +} + +// LV61 ~ 70 ------------------------------------------------------------------------------ +pvp_n_room.gat,54,85,4 script Fight Square Helper#N4 105, +{ + set @map$, "n_4"; + set @lvl1, 61; + set @lvl2, 70; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV61 ~ LV70", 0; + end; +} + +// LV71 ~ 80 ------------------------------------------------------------------------------ +pvp_n_room.gat,62,85,4 script Fight Square Helper#N5 105, +{ + set @map$, "n_5"; + set @lvl1, 71; + set @lvl2, 80; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV71 ~ LV80", 0; + end; +} + +// LV81 ~ 90 ------------------------------------------------------------------------------ +pvp_n_room.gat,70,85,4 script Fight Square Helper#N6 105, +{ + set @map$, "n_6"; + set @lvl1, 81; + set @lvl2, 90; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV81 ~ LV90", 0; + end; +} + +// LV91 ~ ------------------------------------------------------------------------------ +pvp_n_room.gat,78,85,4 script Fight Square Helper#N7 105, +{ + set @map$, "n_7"; + set @lvl1, 91; + set @lvl2, 255; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "LV91 ~ ", 0; + end; +} + +// No Limit ------------------------------------------------------------------------------ +pvp_n_room.gat,86,85,4 script Fight Square Helper#N8 105, +{ + set @map$, "n_8"; + set @lvl1, 0; + set @lvl2, 255; + callfunc "F_PvPRoom"; +OnInit: + waitingroom "No Limit", 0; + end; +} + + + +//***********************************************************************************************************************************************************// +// Function: PvP Fight Square Helper // +//***********************************************************************************************************************************************************// +function script F_PvPRoom { + + mes "[Fight Square Helper]"; + if(BaseLevel < @lvl1) goto L_LowLvl; + if(BaseLevel > @lvl2) goto L_HiLvl; + mes "Please choose an arena to fight in..."; + M_Menu: + next; + menu @room1$ + " [" + getmapusers("pvp_"+@map$ + "-1.gat") + "/" +@players1+ "]",M_Rm1, + @room2$ + " [" + getmapusers("pvp_"+@map$ + "-2.gat") + "/" +@players2+ "]",M_Rm2, + @room3$ + " [" + getmapusers("pvp_"+@map$ + "-3.gat") + "/" +@players2+ "]",M_Rm3, + @room4$ + " [" + getmapusers("pvp_"+@map$ + "-4.gat") + "/" +@players2+ "]",M_Rm4, + @room5$ + " [" + getmapusers("pvp_"+@map$ + "-5.gat") + "/" +@players2+ "]",M_Rm5, "Cancel",M_End; + M_Rm1: + if (getmapusers("pvp_"+@map$+"-1.gat") == @players1) goto L_Full; + warp "pvp_"+@map$+"-1.gat",0,0; + end; + M_Rm2: + if (getmapusers("pvp_"+@map$+"-2.gat") == @players2) goto L_Full; + warp "pvp_"+@map$+"-2.gat",0,0; + end; + M_Rm3: + if (getmapusers("pvp_"+@map$+"-3.gat") == @players2) goto L_Full; + warp "pvp_"+@map$+"-3.gat",0,0; + end; + M_Rm4: + if (getmapusers("pvp_"+@map$+"-4.gat") == @players2) goto L_Full; + warp "pvp_"+@map$+"-4.gat",0,0; + end; + M_Rm5: + if (getmapusers("pvp_"+@map$+"-5.gat") == @players2) goto L_Full; + warp "pvp_"+@map$+"-5.gat",0,0; + end; + M_End: + close; + + + L_LowLvl: + mes "I'm sorry but you do not meet the Base Level requirements to enter. Please try a lower level room."; + close; + L_HiLvl: + mes "I'm sorry but you exceed the Base Level requirements to enter. Please try a higher level room."; + close; + L_Full: + mes "[Fight Square Helper]"; + mes "I'm sorry but this arena is full. Please choose another one to participate in...."; + goto M_Menu; +} diff --git a/npc/other/tougijou.txt b/npc/other/tougijou.txt new file mode 100644 index 000000000..85d8324a5 --- /dev/null +++ b/npc/other/tougijou.txt @@ -0,0 +1,372 @@ +/=============================================================================== +// “¬‹ZêEVENT +//=============================================================================== +gonryun.gat,180,117,0 script ƒ\ƒ“ ƒ€ƒh 85,{ + if (Class == 0) goto Lnovice; + if (event_tougijou == 1) goto LStart2; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚ ‚ `A‰´‚ðŠy‚µ‚Ü‚¹‚é“z‚ª"; + mes "—ˆ‚È‚¢‚©‚È‚ B‚ñHŒNA—Í‚ª"; + mes "‚ ‚é‚悤‚¾‚ÈB‚¿‚å‚Á‚Æ‚µ‚½‚à‚Ì‚ª"; + mes "‚ ‚é‚ñ‚¾‚ªA‚â‚Á‚Ä‚Ý‚é‚©H"; + next; + menu "‚â‚Á‚Ä‚Ý‚é",L1,"‹»–¡‚È‚¢",L2,"–³Ž‹‚·‚é",L3; +L1: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚¨‚¨`A‚â‚Á‚ς艴‚Ì–Ú‚É‹¶‚¢‚Í"; + mes "‚È‚©‚Á‚½B‚±‚ê‚ðŽ‚¿ã‚°‚½‚ç"; + mes "‚¢‚¢‚±‚Æ‚ð‹³‚¦‚Ä‚â‚éB"; + mes "‚³‚ A€”õ‚µ‚ëB"; + next; +//ƒvƒŠƒnƒ“ƒ^[730ƒAƒR690BS770(ATK‚ÅŒˆ‚Ü‚éHܶÝÈ) + if (checkweight(7049,730)) goto Lweightok; + mes "^0000ffƒ\ƒ“ ƒ€ƒh‚ÍA‚ ‚È‚½‚æ‚è"; + mes "‚©‚È‚è‘å‚«‚»‚¤‚È΂ðŽw‚µA"; + mes "Ž‚¿ã‚°‚Ä‚Ý‚ë‚ÆŒ¾‚Á‚½B"; + mes "‚¾‚ªAd‚·‚¬‚ÄŽ‚¿ã‚°‚ç‚ê‚È‚©‚Á‚½B^000000"; + next; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚Ü‚¾Cs•s‘«‚¾‚ÈB"; + mes "‚à‚¤­‚µCs‚µ‚Ä‚©‚ç—ˆ‚ÈB"; + close; +Lweightok: + getitem 7049,730; + set event_tougijou,1; + mes "^0000ffƒ\ƒ“ ƒ€ƒh‚ÍA‚ ‚È‚½‚æ‚è"; + mes "‚©‚È‚è‘å‚«‚»‚¤‚È΂ðŽw‚µA"; + mes "Ž‚¿ã‚°‚Ä‚Ý‚ë‚ÆŒ¾‚Á‚½B"; + mes "‚ ‚È‚½‚ÍAŒyX‚ÆÎ‚ðŽ‚¿ã‚°‚½B^000000"; + next; + emotion 21; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚Í‚Í‚ÁA‚â‚Á‚ς艴‚Ì–Ú‚É"; + mes "‹¶‚¢‚Í‚È‚©‚Á‚½B¡“x—ˆ‚½Žž‚ÉA"; + mes "‚¢‚¢Š‚ð‹³‚¦‚Ä‚â‚é‚æB"; + mes "‚»‚ꂶ‚á‚ ‚ÈI"; + close; +L2: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚»‚¤‚©B"; + mes "‚¾‚ªA‚¿‚å‚Á‚Æ—Í‚ª‚ ‚ê‚ÎA"; + mes "–Ê”’‚¢‘ÌŒ±‚ª‚Å‚«‚é‚ñ‚¾‚ª‚ËB"; + mes "‚Í‚Í‚ÁA‹C‚ªŒü‚¢‚½‚çA"; + mes "’§í‚µ‚Ä‚Ý‚ÈB"; + close; +L3: + emotion 32; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚±‚ê‚ÍAl‚ðŒ©Œë‚Á‚½‚ÈB"; + mes "‚Í‚ ‚ŸccB"; + close; +LStart2: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚¨`A‚Ü‚½‰ï‚Á‚½‚ÈI"; + mes "–Ê”’‚¢Š‚És‚Á‚Ä‚Ý‚½‚¢‚©H"; + next; + menu "s‚­",-,"‚â‚ß‚é",Lno; + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚»‚¤‚±‚È‚­‚Á‚¿‚áB"; + mes "‚ ‚Í‚Í‚Í‚Í‚ÁB"; + mes "‚»‚ꂶ‚á‚ AŠy‚µ‚ñ‚Å‚±‚¢I"; + next; + warp "gon_test.gat",53,6; + break; + Lno: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "‚â‚ß‚é‚Ì‚©B‚Ü‚ A"; + mes "‚»‚ê‚à‚¢‚¢‚©‚à‚ÈB"; + mes "‚»‚ꂶ‚á‚ ‚ÈI"; + close; +Lnovice: + mes "[ƒ\ƒ“ ƒ€ƒh]"; + mes "ƒm[ƒrƒX‚ÍAŠX‚Ös‚¯B"; + close; +} +//=============================================================================== +gon_test.gat,50,14,4 script TŽºŠÇ—ŽÒ 780,{ + close; +OnInit: + waitingroom "“ü‚Á‚Ä‚­‚¾‚³‚¢!!",1,"TŽºŠÇ—ŽÒ::Onwarp"; + break; +Onwarp: + set @addmon,0; + set @kengaku,0; + warp "gon_test.gat",44,86; + KillMonster "gon_test.gat","All"; + addtimer 120000,"gontimer120000"; + disablenpc "TŽºŠÇ—ŽÒ"; + break; +} +//=============================================================================== +gon_test.gat,46,14,4 script “¬‹ZêˆÄ“àˆõ 770,{ + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "cc"; + mes "‚ cc‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹B"; + mes "‚±‚¿‚ç‚Í“¬‹Zê‚Å‚·B"; + mes "‰½‚©‚²‚´‚¢‚Ü‚·‚©H"; + next; + menu "“¬‹Zê‚Á‚ÄH",L1,"‚¨ì‚³‚ñA‚¨ŽžŠÔ‚Í‚ ‚è‚Ü‚·‚©H",L2,"ŠÏ——È‚És‚«‚½‚¢",L3,"‹A‚é",L4,"“Á‚É‚È‚¢",L5; +L1: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "“¬‹Zê‚ÍAŽš‚Ì‚²‚Æ‚­A"; + mes "ƒ‚ƒ“ƒXƒ^[‚Æ키Š‚Å‚·B"; + next; + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "ƒŒƒxƒ‹•Ê‚̃‚ƒ“ƒXƒ^[‚ð—pˆÓ‚µ‚Ä‚ ‚è"; + mes "‚Ü‚·‚Ì‚ÅA“¬‹Zê“üŽºŒãA¢Š«ŽÒ‚É"; + mes "˜b‚µ‚©‚¯A‚¨D‚«‚ȃ‚ƒ“ƒXƒ^[‚ð"; + mes "‚¨ŒÄ‚Ñ‚­‚¾‚³‚¢B"; + next; + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚Ü‚½A§ŒÀŽžŠÔ‚Í“üê‚©‚ç3•ª‚Å‚·B"; + mes "‚²’ˆÓ‚­‚¾‚³‚¢B"; + close; +L2: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚¦cc‚Í‚¢H"; + mes "¡AŽdŽ–’†‚Å‚·‚©‚çccB"; + mes "\‚µ–󂲂´‚¢‚Ü‚¹‚ñB"; + close; +L3: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚©‚µ‚±‚Ü‚è‚Ü‚µ‚½B"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·B"; + mes "Šy‚µ‚¢ŽžŠÔ‚ð‚¨‰ß‚²‚µ‚­‚¾‚³‚¢B"; + next; + set @kengaku,1; + warp "gon_test.gat",25,99; + break; +L4: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B"; + mes "¥”ñAŽŸ‰ñ‚à‚²—˜—p‰º‚³‚¢B"; + next; + warp "gonryun.gat",177,112; + break; +L5: + mes "[ƒ\ƒ“ ƒtƒBƒˆƒ“]"; + mes "ccB"; + mes "‚³‚悤‚È‚çB"; + close; +} +//=============================================================================== +gon_test.gat,42,89,4 script ¢Š«ŽÒ 774,{ + if (@kengaku == 1) goto LError; + if (@addmon == 1) goto Lalready; + mes "[ƒ\ƒ“ ƒˆƒ“ƒE]"; + mes "‚¢‚ç‚Á‚µ‚á‚¢‚Ü‚¹B"; + mes "‚ǂ̃‚ƒ“ƒXƒ^[‚𢊫‚µ‚Ü‚·‚©H"; + next; + menu "ƒOƒ‹[ƒv‚P",L1,"ƒOƒ‹[ƒv‚Q",L2,"ƒOƒ‹[ƒv‚R",L3,"ƒOƒ‹[ƒv‚S",L4,"ƒOƒ‹[ƒv‚T",L5,"ƒOƒ‹[ƒv‚U",L6,"ƒOƒ‹[ƒv‚V",L7,"ƒOƒ‹[ƒv‚W",L8,"ƒOƒ‹[ƒv‚X",L9,"ƒOƒ‹[ƒv‚P‚O",L10,"ƒOƒ‹[ƒv‚P‚P",L11; + L1: + menu "‚ß‚Ü‚¢",L1_1,"H’†“Å",L1_2,"•nŒŒ",L1_3,"’Ž‚³‚³‚ê",L1_4,"Ø‚è",L1_5,"‹¶Œ¢•a",L1_6; + L1_1: + monster "gon_test.gat",58,87,"‚ß‚Ü‚¢",1419,1,"mobend";set @addmon,1;close; + L1_2: + monster "gon_test.gat",58,87,"H’†“Å",1428,1,"mobend";set @addmon,1;close; + L1_3: + monster "gon_test.gat",58,87,"•nŒŒ",1434,1,"mobend";set @addmon,1;close; + L1_4: + monster "gon_test.gat",58,87,"’Ž",1430,1,"mobend";set @addmon,1;close; + L1_5: + monster "gon_test.gat",58,87,"Ø‚è",1457,1,"mobend";set @addmon,1;close; + L1_6: + monster "gon_test.gat",58,87,"‹¶Œ¢•a",1432,1,"mobend";set @addmon,1;close; + L2: + menu "ƒTƒ}ƒGƒ‹",L2_1,"ƒgƒƒ‹",L2_2,"ƒJƒ“ƒQƒCƒV",L2_3,"ƒuƒ‰ƒbƒNƒhƒbƒN",L2_4,"ƒƒƒE",L2_5,"ƒLƒ‡ƒEƒV",L2_6; + L2_1: + monster "gon_test.gat",58,87,"ƒTƒ}ƒGƒ‹",1462,1,"mobend";set @addmon,1;close; + L2_2: + monster "gon_test.gat",58,87,"ƒgƒƒ‹",1442,1,"mobend";set @addmon,1;close; + L2_3: + monster "gon_test.gat",58,87,"ƒJƒ“ƒQƒCƒV",1469,1,"mobend";set @addmon,1;close; + L2_4: + monster "gon_test.gat",58,87,"ƒuƒ‰ƒbƒNƒhƒbƒN",1460,1,"mobend";set @addmon,1;close; + L2_5: + monster "gon_test.gat",58,87,"ƒƒƒE",1425,1,"mobend";set @addmon,1;close; + L2_6: + monster "gon_test.gat",58,87,"ƒLƒ‡ƒEƒV",1472,1,"mobend";set @addmon,1;close; + L3: + menu "‘«Œ³",L3_1,"I‚Þ",L3_2,"‹ó‚Á‚Û",L3_3,"—₽‚¢",L3_4,"”M‚¢",L3_5,"•…‚é",L3_6; + L3_1: + monster "gon_test.gat",58,87,"‘«Œ³",1454,1,"mobend";set @addmon,1;close; + L3_2: + monster "gon_test.gat",58,87,"I‚Þ",1443,1,"mobend";set @addmon,1;close; + L3_3: + monster "gon_test.gat",58,87,"‹ó‚Á‚Û",1455,1,"mobend";set @addmon,1;close; + L3_4: + monster "gon_test.gat",58,87,"—₽‚¢",1426,1,"mobend";set @addmon,1;close; + L3_5: + monster "gon_test.gat",58,87,"”M‚¢",1436,1,"mobend";set @addmon,1;close; + L3_6: + monster "gon_test.gat",58,87,"•…‚é",1423,1,"mobend";set @addmon,1;close; + L4: + menu "ÕŽi",L4_1,"ƒ^ƒ}ƒlƒM",L4_2,"‘å•S‘«",L4_3,"‘€‚èlŒ`",L4_4,"ƒ}ƒbƒ`”„‚è‚Ì­—",L4_5,"å¢",L4_6; + L4_1: + monster "gon_test.gat",58,87,"ÕŽi",1458,1,"mobend";set @addmon,1;close; + L4_2: + monster "gon_test.gat",58,87,"ƒ^ƒ}ƒlƒM",1440,1,"mobend";set @addmon,1;close; + L4_3: + monster "gon_test.gat",58,87,"‘å•S‘«",1429,1,"mobend";set @addmon,1;close; + L4_4: + monster "gon_test.gat",58,87,"‘€‚èlŒ`",1459,1,"mobend";set @addmon,1;close; + L4_5: + monster "gon_test.gat",58,87,"ƒ}ƒbƒ`”„‚è‚Ì­—",1444,1,"mobend";set @addmon,1;close; + L4_6: + monster "gon_test.gat",58,87,"å¢",1422,1,"mobend";set @addmon,1;close; + L5: + menu "—‰Ð",L5_1,"‘§ë",L5_2,"CŽÖ",L5_3,"“Å—´",L5_4,"—³",L5_5,"‰u‹S",L5_6; + L5_1: + monster "gon_test.gat",58,87,"—‰Ð",1421,1,"mobend";set @addmon,1;close; + L5_2: + monster "gon_test.gat",58,87,"‘§ë",1481,1,"mobend";set @addmon,1;close; + L5_3: + monster "gon_test.gat",58,87,"CŽÖ",1424,1,"mobend";set @addmon,1;close; + L5_4: + monster "gon_test.gat",58,87,"“Å—´",1465,1,"mobend";set @addmon,1;close; + L5_5: + monster "gon_test.gat",58,87,"—³",1466,1,"mobend";set @addmon,1;close; + L5_6: + monster "gon_test.gat",58,87,"‰u‹S",1433,1,"mobend";set @addmon,1;close; + L6: + menu "àÑ",L6_1,"‚¨‚¢‚Ä‚¯Œ@",L6_2,"—‹_",L6_3,"‰…—ì",L6_4,"•t‘r_",L6_5,"”Ñj",L6_6; + L6_1: + monster "gon_test.gat",58,87,"àÑ",1427,1,"mobend";set @addmon,1;close; + L6_2: + monster "gon_test.gat",58,87,"‚¨‚¢‚Ä‚¯–x",1473,1,"mobend";set @addmon,1;close; + L6_3: + monster "gon_test.gat",58,87,"—‹_",1431,1,"mobend";set @addmon,1;close; + L6_4: + monster "gon_test.gat",58,87,"‰…—ì",1446,1,"mobend";set @addmon,1;close; + L6_5: + monster "gon_test.gat",58,87,"•t‘r_",1474,1,"mobend";set @addmon,1;close; + L6_6: + monster "gon_test.gat",58,87,"”Ñj",1471,1,"mobend";set @addmon,1;close; + L7: + menu "ñ",L7_1,"•€",L7_2,"‘å’Æ",L7_3,"ŠZ",L7_4,"‹|",L7_5,"“S‹…",L7_6; + L7_1: + monster "gon_test.gat",58,87,"ñ",1450,1,"mobend";set @addmon,1;close; + L7_2: + monster "gon_test.gat",58,87,"•€",1439,1,"mobend";set @addmon,1;close; + L7_3: + monster "gon_test.gat",58,87,"‘å’Æ",1461,1,"mobend";set @addmon,1;close; + L7_4: + monster "gon_test.gat",58,87,"ŠZ",1467,1,"mobend";set @addmon,1;close; + L7_5: + monster "gon_test.gat",58,87,"‹|",1453,1,"mobend";set @addmon,1;close; + L7_6: + monster "gon_test.gat",58,87,"“S‹…",1479,1,"mobend";set @addmon,1;close; + L8: + menu "O",L8_1,"Ž•",L8_2,"”¯",L8_3,"Žè",L8_4,"‹Ø“÷",L8_5,"œ",L8_6; + L8_1: + monster "gon_test.gat",58,87,"O",1451,1,"mobend";set @addmon,1;close; + L8_2: + monster "gon_test.gat",58,87,"Ž•",1475,1,"mobend";set @addmon,1;close; + L8_3: + monster "gon_test.gat",58,87,"”¯",1437,1,"mobend";set @addmon,1;close; + L8_4: + monster "gon_test.gat",58,87,"Žè",1441,1,"mobend";set @addmon,1;close; + L8_5: + monster "gon_test.gat",58,87,"‹Ø“÷",1476,1,"mobend";set @addmon,1;close; + L8_6: + monster "gon_test.gat",58,87,"œ",1435,1,"mobend";set @addmon,1;close; + L9: + menu "‹…",L9_1,"‹¾",L9_2,"–{",L9_3,"Žè‘Ü",L9_4,"Š“",L9_5,"•ž",L9_6; + L9_1: + monster "gon_test.gat",58,87,"‹…",1477,1,"mobend";set @addmon,1;close; + L9_2: + monster "gon_test.gat",58,87,"‹¾",1448,1,"mobend";set @addmon,1;close; + L9_3: + monster "gon_test.gat",58,87,"–{",1478,1,"mobend";set @addmon,1;close; + L9_4: + monster "gon_test.gat",58,87,"Žè‘Ü",1489,1,"mobend";set @addmon,1;close; + L9_5: + monster "gon_test.gat",58,87,"Š“",1488,1,"mobend";set @addmon,1;close; + L9_6: + monster "gon_test.gat",58,87,"•ž",1438,1,"mobend";set @addmon,1;close; + L10: + menu "—‰¤",L10_1,"”MŒŒ’j",L10_2,"Ž€ŒYŽ·sl",L10_3,"“Ë‘R•ÏˆÙ—³",L10_4,"‡¬b",L10_5,"ˆ«–‚",L10_6; + L10_1: + monster "gon_test.gat",58,87,"—‰¤",1482,1,"mobend";set @addmon,1;close; + L10_2: + monster "gon_test.gat",58,87,"”MŒŒ’j",1464,1,"mobend";set @addmon,1;close; + L10_3: + monster "gon_test.gat",58,87,"Ž€ŒYŽ·sl",1487,1,"mobend";set @addmon,1;close; + L10_4: + monster "gon_test.gat",58,87,"“Ë‘R•ÏˆÙ—³",1449,1,"mobend";set @addmon,1;close; + L10_5: + monster "gon_test.gat",58,87,"‡¬b",1456,1,"mobend";set @addmon,1;close; + L10_6: + monster "gon_test.gat",58,87,"ˆ«–‚",1486,1,"mobend";set @addmon,1;close; + L11: + menu "Žël",L11_1,"ˆÃŽEŽÒ",L11_2,"Ž˜",L11_3,"•“¹‰Æ",L11_4,"Œ•Žm",L11_5; + L11_1: + monster "gon_test.gat",58,87,"Žël",1447,1,"mobend";set @addmon,1;close; + L11_2: + monster "gon_test.gat",58,87,"ˆÃŽEŽÒ",1483,1,"mobend";set @addmon,1;close; + L11_3: + monster "gon_test.gat",58,87,"Ž˜",1490,1,"mobend";set @addmon,1;close; + L11_4: + monster "gon_test.gat",58,87,"•“¹‰Æ",1484,1,"mobend";set @addmon,1;close; + L11_5: + monster "gon_test.gat",58,87,"Œ•Žm",1485,1,"mobend";set @addmon,1;close; +Lalready: + mes "[ƒ\ƒ“ ƒˆƒ“ƒE]"; + mes "Šù‚Ƀ‚ƒ“ƒXƒ^[‚𢊫‚µ‚Ü‚µ‚½B"; + mes "1‰ñ‚Ƀ‚ƒ“ƒXƒ^[‚ð1•C‚¾‚¯"; + mes "‘¼‚̃‚ƒ“ƒXƒ^[‚𢊫‚·‚é‚È‚ç‚ÎA"; + mes "Ä“üꂵ‚Ä‚­‚¾‚³‚¢B"; + close; +LError: + mes "[ƒ\ƒ“ ƒˆƒ“ƒE]"; + mes "³Ž®‚É\‚µž‚Ý‚ð‚µ‚Ä‚©‚ç"; + mes "‚²—ˆê‚­‚¾‚³‚¢B"; + close; +} +//=============================================================================== +gon_test.gat,51,90,0 script gontimer120000 -1,{ + mapannounce "gon_test.gat",": Žc‚è‚P•ª‚Å‚·B",0; + deltimer "gontimer120000"; + addtimer 60000,"gontimer180000"; + break; +} +gon_test.gat,50,90,0 script gontimer180000 -1,{ +Onend: + mapannounce "gon_test.gat",": §ŒÀŽžŠÔ‚É‚È‚è‚Ü‚µ‚½B",0; + areawarp "gon_test.gat",42,82,73,91,"gon_test.gat",44,4; + deltimer "gontimer180000"; + enablenpc "TŽºŠÇ—ŽÒ"; + killmonster "gon_test.gat","All"; + break; +} +//=============================================================================== +gon_test.gat,58,87,0 script mobend -1,{ + mapannounce "gon_test.gat","¢Š«ŽÒ : ‚¨‚ß‚Å‚Æ‚¤‚²‚´‚¢‚Ü‚·I‚Ü‚½‚Ì‚²—ˆê‚ð‚¨‘Ò‚¿‚µ‚Ä‚¨‚è‚Ü‚·B",0; + addtimer 3000,"mobend::OnReturn"; + break; +OnReturn: + warp "gon_test.gat",44,4; + deltimer "mobend"; + deltimer "gontimer180000"; + deltimer "gontimer120000"; + enablenpc "TŽºŠÇ—ŽÒ"; + break; +} +//=============================================================================== +gon_test.gat,70,103,4 script oŒûˆÄ“àˆõ 773,{ + mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]"; + mes "‹A‚è‚Ü‚·‚©H"; + next; + menu "‹A‚é",-,"‹A‚ç‚È‚¢",Lno; + mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B"; + mes "‚悯‚ê‚ÎA‚Ü‚½—ˆ‚Ä‚­‚¾‚³‚¢‚ËB"; + next; + warp "gon_test.gat",44,4; + set @kengaku,0; + break; + Lno: + mes "[ƒ`ƒF ƒGƒ“ƒGƒ“]"; + mes "‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚µ‚½B"; + close; +} diff --git a/npc/other/warper.txt b/npc/other/warper.txt new file mode 100644 index 000000000..064cd0728 --- /dev/null +++ b/npc/other/warper.txt @@ -0,0 +1,99 @@ +//===== eAthena Script ======================================= +//= Warper Script +//===== By: ================================================== +//= Darkchild +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= Any eAthena Version; +//===== Description: ========================================= +//= Generic warper... +//===== Additional Comments: ================================= +//= 1.0 by Darkchild +//= 1.1 by jabs +//= 1.2 by Lupus (placement fixed in Amatsu) +//= 1.3 fixed Louyang label typo, added warp and WARPRA into +//= Nifleheim. Also sorted all names in alphabet order [Lupus] +//= 1.4 fixed morroc warp npc overlaying kafra [Aria] +//============================================================ + +- script Warp NPC::warpra 115,{ + mes "[Warp NPC]"; + mes "Hello,"; + mes "I can warp you to any Town and Dungeon!"; + mes "Were do you want to go?"; + next; + menu "Towns",stadt,"Dungeons",dungeon; + + stadt: + menu "Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Comodo",wcomodo,"Geffen",wgeffen,"Gonryun",wgonryun,"Izlude",wizlude,"Louyang",wlouyang,"Lutie",wxmas,"Morroc",wmorroc,"Niflheim",wniflheim,"Payon",wpayon,"Prontera",wprontera,"Umbala",wumbala,"Yuno",wyuno; + + dungeon: + menu "Amatsu Dungeon",damatsu,"Anthell",dant,"Bibilan Dungeon",dbibilan,"Coal Mine (Dead Pit)",dcoal,"Culvert",dculvert,"Glast Heim",dglast,"Gonryun Dungeon",dgonryun,"Magma-Dungeon",dmagma,"Orc-Dungeon",dorc,"Payon-Dungeon",dpayon,"Pyramids",dpyramids,"Sphinx",dsphinx,"Sunken Ship",dsunken,"Turtle Dungeon",dturtle; + + +//----------------Towns----------------\\ + +walberta: warp "alberta.gat", 27, 236; close; +waldebaran: warp "aldebaran.gat", 145, 120; close; +wamatsu: warp "amatsu.gat", 197, 86; close; +wcomodo: warp "comodo.gat", 188, 161; close; +wgonryun: warp "gonryun.gat", 150, 130; close; +wgeffen: warp "geffen.gat", 119, 66; close; +wizlude: warp "izlude.gat", 128, 111; close; +wlouyang: warp "louyang.gat", 210, 108; close; +wmorroc: warp "morocc.gat", 159, 93; close; +wniflheim: warp "niflheim.gat", 35, 161; close; +wprontera: warp "prontera.gat", 156, 187; close; +wpayon: warp "payon.gat", 152, 75; close; +wumbala: warp "umbala.gat", 130, 130; close; +wxmas: warp "xmas.gat", 148, 131; close; +wyuno: warp "yuno.gat", 160, 168; close; + +//----------------Dungeons----------------\\ + +damatsu: warp "ama_fild01.gat", 172, 324; close; +dant: warp "moc_fild04.gat", 210, 328; close; +dbibilan: warp "izlu2dun.gat", 106, 88; close; +dculvert: warp "prt_fild05.gat", 273, 210; close; +dcoal: warp "mjolnir_02.gat", 81, 359; close; +dglast: warp "glast_01.gat", 368, 303; close; +dgonryun: warp "gonryun.gat", 160, 195; close; +dmagma: warp "yuno_fild03.gat", 39, 140; close; +dorc: warp "gef_fild10.gat", 70, 332; close; +dpayon: warp "pay_arche.gat", 43, 132; close; +dpyramids: warp "moc_ruins.gat", 62, 162; close; +dsphinx: warp "moc_fild19.gat", 107, 100; close; +dsunken: warp "alb2trea.gat", 75, 98; close; +dturtle: warp "tur_dun01.gat", 149, 238; close; +} + +alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115 +alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115 +aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115 +amatsu.gat,192,81,1 duplicate(warpra) Warp NPC 115 +ama_fild01.gat,178,325,1 duplicate(warpra) Warp NPC 115 +comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115 +gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115 +geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115 +glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115 +gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115 +gonryun.gat,164,196,4 duplicate(warpra) Warp NPC 115 +izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115 +izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115 +louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115 +mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115 +moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115 +moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115 +moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115 +morocc.gat,156,95,4 duplicate(warpra) Warp NPC 115 +niflheim.gat,32,161,4 duplicate(warpra) Warp NPC 115 +pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115 +payon.gat,182,110,4 duplicate(warpra) Warp NPC 115 +prontera.gat,161,192,4 duplicate(warpra) Warp NPC 115 +prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115 +tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115 +umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115 +xmas_fild01.gat,115,174,4 duplicate(warpra) Warp NPC 115 +yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115 +yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115 diff --git a/npc/other/warper2.txt b/npc/other/warper2.txt new file mode 100644 index 000000000..92275d551 --- /dev/null +++ b/npc/other/warper2.txt @@ -0,0 +1,263 @@ +//===== eAthena Script ======================================= +//= Warp Npc With Warp To Almost Everywhere +//===== By: ================================================== +//= Someone(thats his name!) (1.0) +//===== Current Version: ===================================== +//= 1.4 +//===== Compatible With: ===================================== +//= Any eAthena Version with duplicate; RO Ep6+ +//===== Description: ========================================= +//= - +//===== Additional Comments: ================================= +//= 1.1 by Darkchild +//= 1.2 by Darkchild +//= 1.3 Fixed by x[tsk] Added missing code for Valkyrie + Added +//= a warp NPC in Valkyrie it self. Checked/Added by Lupus +//= 1.4 morocc coords overlapping fixed +//============================================================ + +- script Warp NPC::warpra 115,{ + mes "[Warp NPC]"; + mes "Hello, I can warp you to any Town and Dungeon! Were do you want to go?"; + next; + menu "Towns",town,"Dungeons",dungeon; +town: + menu "Alberta",walberta,"Aldebaran",waldebaran,"Amatsu",wamatsu,"Comodo",wcomodo,"Gonryun",wgonryun,"Geffen",wgeffen,"Izlude",wizlude,"Lutie",wxmas,"Morroc",wmorroc,"Niflheim",wniflheim,"Payon",wpayon,"Prontera",wprontera,"Yuno",wyuno,"Umbala",wumbala,"Valkyrie",wvalk,"Louyang",wlouyang; +dungeon: + menu "Amatsu Dungeon",ama,"Gonryun Dungeon",gon,"Anthell",ant,"Beach Dungeon",beach,"Byalan Dungeon",byalan,"Clock Tower",clock,"Coal Mines",coal,"Culvert",culvert,"Geffen Dungeon",geffen,"Glast Heim",glast,"Hidden Dungeon",hidden,"Magma Dungeon",magma,"Orc Dungeon",orc,"Payon Dungeon",payon,"Pyramids",pyramids,"Sphinx",sphinx,"Sunken Ship",sunken,"Toy Factory",toy,"Turtle Dungeon",turtle,"Gefenia",gefenia; +ant: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",danthell1,"Level 2",danthell2; +beach: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dbeach1,"Level 2",dbeach2,"Level 3",dbeach3; +byalan: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dbyalan1,"Level 2",dbyalan2,"Level 3",dbyalan3,"Level 4",dbyalan4,"Level 5",dbyalan5; +clock: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dclock1,"Level 2",dclock2,"Level 3",dclock3,"Level 4",dclock4,"Basement 1",dalde1,"Basement 2",dalde2,"Basement 3",dalde3,"Basement 4",dalde4; +coal: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dcoal1,"Level 2",dcoal2,"Level 3",dcoal3; +culvert: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dculvert1,"Level 2",dculvert2,"Level 3",dculvert3,"Level 4",dculvert4; +geffen: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dgeffen1,"Level 2",dgeffen2,"Level 3",dgeffen3,"Level 4",dgeffen4; +glast: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Entrance",dglastent,"Castle 1",dglastcast1,"Castle 2",dglastcast2,"Chivalry 1",dglastchiv1,"Chivalry 2",dglastchiv2,"Churchyard",dglastyard,"Culvert 1",dglastcul1,"Culvert 2",dglastcul1,"Culvert 3",dglastcul3,"Culvert 4",dglastcul4,"St.Abbey",dglastchur,"Staircase Dungeon",dglaststep,"Underground Cave 1",dglastcave1,"Underground Cave 2",dglastcave2,"Underground Prison 1",dglastpris1,"Underground Prison 2",dglastpris2; +hidden: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dhidden1,"Level 2",dhidden2,"Level 3",dhidden3; +magma: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dmagma1,"Level 2",dmagma2; +orc: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dorc1,"Level 2",dorc2; +payon: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dpayon1,"Level 2",dpayon2,"Level 3",dpayon3,"Level 4",dpayon4,"Level 5",dpayon5; +pyramids: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dpyramids1,"Level 2",dpyramids2,"Level 3",dpyramids3,"Level 4",dpyramids4,"Basement 1",dpyramidsb1,"Basement 2",dpyramidsb2; +sphinx: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dsphinx1,"Level 2",dsphinx2,"Level 3",dsphinx3,"Level 4",dsphinx4,"Level 5",dsphinx5; +sunken: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dsunken1,"Level 2",dsunken2; +toy: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dtoy1,"Level 2",dtoy2; +turtle: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Entrance",dturtleent,"Level 1",dturtle1,"Level 2",dturtle2,"Level 3",dturtle3; +ama: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dama1,"Level 2",dama2,"Level 3",dama3; +gon: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dgon1,"Level 2",dgon2,"Level 3",dgon3; +gefenia: + mes "[Warp NPC]"; + mes "Please select a Level. Beware that you will be warped directly into the dungeon."; + next; + menu "Level 1",dgefenia1,"Level 2",dgefenia2,"Level 3",dgefenia3,"Level 4",dgefenia4; + +//----------------Towns----------------\\ + +walberta: warp "alberta.gat",192,147; close; +waldebaran: warp "aldebaran.gat",140,131; close; +wamatsu: warp "amatsu.gat",198,84; close; +wcomodo: warp "comodo.gat",209,143; close; +wgonryun: warp "gonryun.gat",160,121; close; +wgeffen: warp "geffen.gat",119,59; close; +wizlude: warp "izlude.gat",128,114; close; +wxmas: warp "xmas.gat",147,134; close; +wmorroc: warp "morocc.gat",156,93; close; +wniflheim: warp "niflheim.gat",85,154; close; +wpayon: warp "payon.gat",152,75; close; +wprontera: warp "prontera.gat",156,191; close; +wyuno: warp "yuno.gat",157,51; close; +wumbala: warp "umbala.gat",145,155; close; +wlouyang: warp "louyang.gat",210,108; close; +wvalk: warp "valkyrie",48,8; close; + +//----------------Dungeons----------------\\ + +danthell1: warp "anthell01.gat",35,262; close; +danthell2: warp "anthell02.gat",168,170; close; +dbeach1: warp "beach_dun.gat",266,67; close; +dbeach2: warp "beach_dun2.gat",255,244; close; +dbeach3: warp "beach_dun3.gat",23,260; close; +dbyalan1: warp "iz_dun00.gat",168,168; close; +dbyalan2: warp "iz_dun01.gat",253,252; close; +dbyalan3: warp "iz_dun02.gat",236,204; close; +dbyalan4: warp "iz_dun03.gat",32,63; close; +dbyalan5: warp "iz_dun04.gat",26,27; close; +dalde1: warp "alde_dun01.gat",297,25; close; +dalde2: warp "alde_dun02.gat",127,169; close; +dalde3: warp "alde_dun03.gat",277,178; close; +dalde4: warp "alde_dun04.gat",268,74; close; +dclock1: warp "c_tower1.gat",199,159; close; +dclock2: warp "c_tower2.gat",148,283; close; +dclock3: warp "c_tower3.gat",65,147; close; +dclock4: warp "c_tower4.gat",56,155; close; +dcoal1: warp "mjo_dun01.gat",52,17; close; +dcoal2: warp "mjo_dun02.gat",381,343; close; +dcoal3: warp "mjo_dun03.gat",302,262; close; +dculvert1: warp "prt_sewb1.gat",131,247; close; +dculvert2: warp "prt_sewb2.gat",19,19; close; +dculvert3: warp "prt_sewb3.gat",180,169; close; +dculvert4: warp "prt_sewb4.gat",100,92; close; +dgeffen1: warp "gef_dun00.gat",104,99; close; +dgeffen2: warp "gef_dun01.gat",115,236; close; +dgeffen3: warp "gef_dun02.gat",106,132; close; +dgeffen4: warp "gef_dun03.gat",203,200; close; +dglastent: warp "glast_01.gat",375,304; close; +dglastcast1: warp "gl_cas01.gat",199,29; close; +dglastcast2: warp "gl_cas02.gat",104,25; close; +dglastchiv1: warp "gl_knt01.gat",150,15; close; +dglastchiv2: warp "gl_knt02.gat",157,287; close; +dglastyard: warp "gl_chyard.gat",147,15; close; +dglastcul1: warp "gl_sew01.gat",258,255; close; +dglastcul2: warp "gl_sew02.gat",108,291; close; +dglastcul3: warp "gl_sew03.gat",171,283; close; +dglastcul4: warp "gl_sew04.gat",68,277; close; +dglastchur: warp "gl_church.gat",156,7; close; +dglaststep: warp "gl_step.gat",12,7; close; +dglastcave1: warp "gl_dun01.gat",133,271; close; +dglastcave2: warp "gl_dun02.gat",224,274; close; +dglastpris1: warp "gl_prison.gat",14,70; close; +dglastpris2: warp "gl_prison1.gat",150,14; close; +dhidden1: warp "prt_maze01.gat",176,7; close; +dhidden2: warp "prt_maze02.gat",94,9; close; +dhidden3: warp "prt_maze03.gat",23,8; close; +dmagma1: warp "mag_dun01.gat",126,68; close; +dmagma2: warp "mag_dun02.gat",47,30; close; +dorc1: warp "orcsdun01.gat",32,170; close; +dorc2: warp "orcsdun02.gat",21,185; close; +dpayon1: warp "pay_dun00.gat",21,183; close; +dpayon2: warp "pay_dun01.gat",19,33; close; +dpayon3: warp "pay_dun02.gat",19,63; close; +dpayon4: warp "pay_dun03.gat",155,159; close; +dpayon5: warp "pay_dun04.gat",201,204; close; +dpyramids1: warp "moc_pryd01.gat",192,9; close; +dpyramids2: warp "moc_pryd02.gat",10,192; close; +dpyramids3: warp "moc_pryd03.gat",100,92; close; +dpyramids4: warp "moc_pryd04.gat",181,11; close; +dpyramidsb1: warp "moc_pryd05.gat",94,96; close; +dpyramidsb2: warp "moc_pryd06.gat",192,8; close; +dsphinx1: warp "in_sphinx1.gat",288,9; close; +dsphinx2: warp "in_sphinx2.gat",149,81; close; +dsphinx3: warp "in_sphinx3.gat",210,54; close; +dsphinx4: warp "in_sphinx4.gat",10,222; close; +dsphinx5: warp "in_sphinx5.gat",100,99; close; +dsunken1: warp "treasure01.gat",69,24; close; +dsunken2: warp "treasure02.gat",102,27; close; +dtoy1: warp "xmas_dun01.gat",205,15; close; +dtoy2: warp "xmas_dun02.gat",129,133; close; +dturtleent: warp "tur_dun01.gat",154,49; close; +dturtle1: warp "tur_dun02.gat",148,261; close; +dturtle2: warp "tur_dun03.gat",132,189; close; +dturtle3: warp "tur_dun04.gat",100,192; close; +dama1: warp "ama_dun01.gat",228,11; close; +dama2: warp "ama_dun02.gat",34,41; close; +dama3: warp "ama_dun03.gat",119,14; close; +dgon1: warp "gon_dun01.gat",153,53; close; +dgon2: warp "gon_dun02.gat",28,113; close; +dgon3: warp "gon_dun03.gat",68,16; close; +dgefenia1: warp "gefenia01.gat",40,103; close; +dgefenia2: warp "gefenia02.gat",203,34; close; +dgefenia3: warp "gefenia03.gat",266,168; close; +dgefenia4: warp "gefenia04.gat",130,272; close; +} +alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115 +aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115 +amatsu.gat,194,79,1 duplicate(warpra) Warp NPC 115 +comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115 +geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115 +izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115 +xmas_fild01.gat,115,174,4 duplicate(warpra) Warp NPC 115 +morocc.gat,156,99,4 duplicate(warpra) Warp NPC 115 +payon.gat,182,110,4 duplicate(warpra) Warp NPC 115 +prontera.gat,153,183,4 duplicate(warpra) Warp NPC 115 +yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115 +moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115 +izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115 +mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115 +prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115 +glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115 +yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115 +gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115 +pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115 +moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115 +moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115 +alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115 +tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115 +gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115 +louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115 +umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115 +valkyrie.gat,48,35,8 duplicate(warpra) Warp NPC 115 diff --git a/npc/other/wedding.txt b/npc/other/wedding.txt new file mode 100644 index 000000000..f7cab533b --- /dev/null +++ b/npc/other/wedding.txt @@ -0,0 +1,538 @@ +////////////////////////////////////////////////////////// +// Wedding Script Alpha (v1.0) // +// Feat - DiaDz (Basic Updates By AG)// +////////////////////////////////////////////////////////// +// +// Progress: Finished? (Ehm... can anything more be done to it?) +// Original Concepts by AppleGirl and Evera/Lorri. +// +////////////////////////////////////////////////////////// +// PROPERTY OF eATHENA! OTHER ATHENAS DON'T TOUCH THIS! // +////////////////////////////////////////////////////////// +// +// Variable Notes: +// +// event_wedding - 1 signifies marriage +// $groom$ - Groom's name storage +// $bride$ - Bride's name storage +// $progress - Sets global restriction upon wedding +// @register - Temporary registration check +// @zleft - Temporary zeny needed check +// $name$ - Insert name for bride +// $name2$ - Insert name for groom +// $get_ring - Check so you can't get ring twice +// $reason$ - Objection to wedding + +// Tristan +prt_church.gat,99,125,4 script Tristan the Third 108,{ + if(sex == 1 && $groom$ == strcharinfo(0) && $progress != 3) goto ceremony; + if(@register == 0) goto reg; + if(sex == 0 && $bride$ == strcharinfo(0)) goto ceremony2; + menu "Here To Attend",wed,"Here for another reason",other; +ceremony: + if($progress == 1) goto needbride; + mes "[Tristan the Third]"; + mes "Everything is ready, it's your call now..."; + next; + menu "Preform Wedding.",-,"Cancel Wedding.",weddie; + set $progress,3; + mes "[Tristan the Third]"; + mes "Well all you have to do now is the easy part input your groom's name, remember to spell it correctly."; + input $name$; + next; + if($name2$ != $bride$) goto inprog; + marriage $name2$; + next; + mes "[Tristan the Third]"; + mes "Please tell your wife to speak to me, and then we will start exchanging rings"; + if(countitem(2613) < 1) goto needring; + delitem 2613,1; + getitem 2635,1; + set @get_ring,1; + next; + mes "[Tristan the Third]"; + mes "Will you and your bride please move onto the stand. I will now preform the Wedding Ceremony!"; + set event_wedding,1; + deltimer "weddinglimit2"; + announce "The Wedding of "+$groom$+" and "+$bride$+", will now be held at Prontera Church.",5; + addtimer 50000,"a1"; + addtimer 55000,"a2"; + addtimer 60000,"a3"; + addtimer 65000,"a4"; + addtimer 70000,"a5"; + addtimer 75000,"a6"; + addtimer 80000,"a7"; + addtimer 85000,"a8"; + addtimer 90000,"a9"; + addtimer 95000,"a10"; + addtimer 100000,"a11"; + addtimer 105000,"a12"; + close; +ceremony2: + mes "[Tristan the Third]"; + mes "Well all you have to do now is the easy part input your groom's name, remember to spell it correctly."; + input $name$; + next; + if($name$ != $groom$) goto inprog; + marriage $name$; + if(countitem(2613) < 1) goto needring; + delitem 2613,1; + getitem 2634,1; + set @get_ring,1; + close; +weddie: + mes "[Tristan the Third]"; + mes "The wedding has been cancelled."; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; + close; +reg: + mes "[Tristan the Third]"; + mes "Hello, please register with Mary if you want me to perform a marriage for you."; + close; +wed: + if(event_wedding != 1) goto guest; + mes "[Tristan the Third]"; + mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life."; + close; +needbride: + mes "[Tristan the Third]"; + mes "I'm sorry, I cannot start the ceremony if the bride has not registered yet."; + close; +other: + if(@get_ring == 1) goto wed; + mes "[Tristan the Third]"; + mes "Do you have a reason why these two should not be bonded in holy matrimony?"; + next; + menu "Yes I Do.",-,"No",no; + areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen,"+strcharinfo(0)+" has an objection to this marriage",0; + mes "[Tristan the Third]"; + mes "Please enter your reason, for this action."; + input $reason$; + next; + areaannounce "prt_church.gat",0,0,350,350,""+$reason$+"",0; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; + mes "The wedding has been called off."; + close; +no: + if($groom$ == strcharinfo(0)) goto inprog; + mes "[Tristan the Third]"; + mes "Please have a seat than and let me continue the wedding."; + close; +guest: + mes "[Tristan the Third]"; + mes "Enjoy the cerimony."; + mes "But I must continue the cerimony, so lets talk after."; + close; +inprog: + mes "[Tristan the Third]"; + mes "Your wedding is in progress, please try talking with me later."; + close; +needring: + mes "[Tristan the Third]"; + mes "You need a diamond ring"; + close; +tux: + mes "[Mary Happy]"; + mes "You need a Tuxedo before we can continue the ceremony."; + close; +dress: + mes "[Mary Happy]"; + mes "Oh my is it your wedding day?"; + mes "Well sorry to break it to you, you need a wedding dress"; + mes "and Wedding Veil to get married."; + close; +} + +// Mary +prt_church.gat,95,100,4 script Mary 71,{ + mes "[Mary Happy]"; + mes "Getting married bring a lot of joy."; + mes "By any chance, you you want to get engaged with someone?"; + next; + menu "Explain the principles of Marrige",Lprinciples,"How does the marrige system work.",Lsystem,"I want to get married with someone.",Lmarried,"I live solo forever!",Lsolo; +Lprinciples: + mes "[Mary Happy]"; + mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message."; + next; + mes "[Mary Happy]"; + mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church."; + mes "It is the favor of our King that everyone would live happily ever after."; + next; + mes "[Mary Happy]"; + mes "The proposal must be done with prudence and courtesy."; + mes "Once the wedlocks have been made, they cannot be undone."; + mes "The two who are united in marriage must be with the other forever until the day they leave this world."; + next; + mes "[Mary Happy]"; + mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is not approved."; + next; + mes "[Mary Happy]"; + mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose."; + mes "Wishing for many blessings upon couples who wish to live happily ever after.."; + close; +Lsystem: + mes "[Mary Happy]"; + mes "First make sure both players a registered to get married."; + mes "Obviously, you must know each other to get married?"; + mes "If both have registered, and you must be on the same party."; + mes "Then talk to Thristan the Third."; + next; + mes "[Mary Happy]"; + mes "You must go to Thristan the Third,"; + mes "and the male must talk to him first."; + mes "And you must tell him the girl"; + mes "you wish to get married with."; + mes "Be sure to tell him exactly who you want to marry."; + next; + mes "[Mary Happy]"; + mes "After the male has spoken, next the female must talk."; + mes "Then when both of you have spoken each others names,"; + mes "Thristan the third will read out both of your names."; + next; + mes "[Mary Happy]"; + mes "After you have got married,"; + mes "you will both recive a ring of marrige."; + mes "And as soon as both of you wear these rings,"; + mes "you will be forever married with each other."; + mes "You can also be refused of a lasting marrige."; + mes "But, dont be sad."; + next; + mes "[Mary Happy]"; + mes "If there are many people that wish to get married,"; + mes "So please keep to the order you register."; + mes "Thristan does not do multiple marriges at once."; + mes "He will only see one couple at a time."; + next; + mes "[Mary Happy]"; + mes "Lastly, you must put forth your name quickly"; + mes "to Thristan the third."; + mes "After the male has said yes to marrage "; + mes "the female has 3 minutes to reply."; + mes "Or you shall forever never be able"; + mes "to get married."; + next; + mes "[Mary Happy]"; + mes "An easy way to write down the each others name,"; + mes "Send a message to each other"; + mes "then in the private message window press up"; + next; +//o_O who removed this part? we use a diff system now (re-enabled) + mes "[Mary Happy]"; + mes "Then it will show the other persons name."; + mes "If you press ctrl + C that name will be saved."; + mes "Next time you need that name"; + mes "you can press shift + insert."; + mes "Then you will get that name quickly and easily."; + next; + mes "[Mary Happy]"; + mes "You should have a go at using this method."; + mes "Remeber, Press ctrl + C to save that name."; + next; + input $nametest$; + mes "[Mary Happy]"; + mes "Hopefully you will remember this method."; + mes "If you ever decide to get married."; + mes "Remember to register."; + close; +Lmarried: + mes "[Mary Happy]"; + mes "If you wish to get married you must first register."; + mes "Male is ^FF00FF30,000^000000 zeny and female is ^FF00FF20,000^000000 zeny"; + mes "Both male and female must have registered,"; + mes "and both must have paid fees,"; + mes "and the female must have a wedding veil."; + next; + mes "[Mary Happy]"; + mes "If both people have paid and meet recquirements"; + mes "you are able to get married strait away."; + mes "Do you wish to register to get married?"; + menu "I Want To Register To Be Married.",-,"I'm Fine, Thanks Anyways.",bye; + if(baselevel < 45) goto lvl; + if(event_wedding == 1) goto wed; + if(@register >= 1) goto regd; + if($progress >= 2) goto inprog; + if(sex == 0) goto female; + mes "[Mary Happy]"; + mes "No problem sir, please fill out your name here."; + mes "And I'll need to collect a 1,300,000z fee for your wedding and suit rental."; + next; + mes "[Mary Happy]"; + mes "Now You Must Insert The Your Bride's Name"; + input $name$; + next; + if(zeny < 1300000) goto needz; + set $groom$,strcharinfo(0); + set @register,1; + set zeny,zeny-1300000; + set $progress,1; + mes "[Mary Happy]"; + mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage."; + addtimer 60000,"weddinglimit1"; + next; + mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes."; + deltimer "a13"; + addtimer 300000,"a13"; + close; +female: + if ($name$ != strcharinfo(0)) goto notbride; + if($progress != 1) goto needgroom; + mes "[Mary Happy]"; + mes "No problem miss, please fill out your name here."; + mes "And I'll need to collect a 1,200,000z fee for your wedding and dress rental."; + next; + if(zeny < 1200000) goto needz2; + if($name2$ != $groom$) goto inprog; + set $bride$,strcharinfo(0); + set @register,1; + set zeny,zeny-1200000; + set $progress,2; + set event_wedding,1; + mes "[Mary Happy]"; + mes "Now You Must Insert The Your Groom's Name"; + input $name2$; + next; + mes "[Mary Happy]"; + mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your wedding."; + deltimer "weddinglimit1"; + addtimer 120000,"weddinglimit2"; + next; + mes "Please hurry to the altar. We have to be ready for another wedding in 5 minutes."; + deltimer "a13"; + addtimer 300000,"a13"; + close; +needz: + set @zleft,1300000-zeny; + mes "[Mary Happy]"; + mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short."; + set @zleft,0; + close; +needz2: + set @zleft,1200000-zeny; + mes "[Mary Happy]"; + mes "I'm terribly sorry, I am unable to register you. You seem to be "+@zleft+"z short."; + set @zleft,0; + close; +regd: + mes "[Mary Happy]"; + mes "You can't register a second time silly."; + close; + +bye: + mes "[Mary Happy]"; + mes "Alrighty then, come back soon!"; + close; + +inprog: + mes "[Mary Happy]"; + mes "I cannot accept registrations while a wedding is in progress, try again later."; + close; + +needgroom: + mes "[Mary Happy]"; + mes "The groom must register first in order to initiate the wedding."; + close; + +wed: + mes "[Mary Happy]"; + mes "Hello again "+strcharinfo(0)+", I hope wish for the best of luck in your life."; + close; +Lsolo: + mes "[Mary Happy]"; + mes "Well live a happy bachelors life"; + close; +notbride: + mes "[Mary Happy]"; + mes "You're not the bride"; + close; +lvl: + mes "[Mary Happy]"; + mes "Im sorry rules and regulations state that you must be base level 45 or higher."; + close; +} + +prt_church.gat,95,95,4 script Mary 71,{ + mes "[Mary Sad]"; + mes "Getting divorce can bring a lot of sorrow."; + mes "By any chance, you you want to get divorced?"; + next; + menu "I came to get a divorce",divorce_,"What do I need for a divorce",system; +divorce_: + if(divorcee > 0) goto divorce__; + + mes "[Mary Sad]"; + mes "So you came for a divorce, i have been divorced 2 times myself."; + mes "Life will continue whoever said you need a partner was wrong."; + next; + menu "Are you sure",-,"No i'm not ready",No; + + mes "[Mary Sad]"; + mes "You have made your choice,"; + mes "now you must live with it."; + next; + set event_wedding,0; + set divorcee,1; + divorce; + close; +divorce__: + mes "[Mary Sad]"; + mes "So you came for another divorce,wow you must be trying to find true love."; + mes "Dont worry about it, it's not you, it's their fault."; + next; + menu "Are you sure",-,"No i'm not ready",No; + mes "[Mary Sad]"; + mes "You have made your choice,"; + mes "now you must live with it."; + next; + set event_wedding,0; + set divorcee,2; + divorce; + close; +No: + mes "[Mary Sad]"; + mes "You should always be sure about what step you take in life"; + close; +system: + mes "[Mary Sad]"; + mes "Underconstruction"; + close; +} +prt_church.gat,99,124,0 script weddinglimit1 -1,{ + announce "The bride has not registered within the alotted time frame.",3; + announce "Your wedding has been cancelled.",3; + set $progress,0; + set $groom$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; +} + +prt_church.gat,99,124,0 script weddinglimit2 -1,{ + announce "The groom has not begun the wedding ceremony by speaking to Tristan the Third.",3; + announce "Your wedding has been cancelled.",3; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + deltimer "a1"; + deltimer "a2"; + deltimer "a3"; + deltimer "a4"; + deltimer "a5"; + deltimer "a6"; + deltimer "a7"; + deltimer "a8"; + deltimer "a9"; + deltimer "a10"; + deltimer "a11"; + deltimer "a12"; +} + +prt_church.gat,99,124,0 script a1 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Ladies and Gentlemen, We will now join in holy matrimony these two lovers.",0; +} +prt_church.gat,99,124,0 script a2 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Now more than ever, will both of your lives be entwined together as so will be your souls.",0; +} +prt_church.gat,99,124,0 script a3 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"You will both honor and cherish each other through the best and worst of times.",0; +} +prt_church.gat,99,124,0 script a4 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"The safety and well being of your other will now also be your responsibility.",0; +} +prt_church.gat,99,124,0 script a5 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"May in sickness or good health, your love will burn bright as no force can extinguish it.",0; +} +prt_church.gat,99,124,0 script a6 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Those here stand witness to these vows bestowed upon you, you must act accordingly to them.",0; +} +prt_church.gat,99,124,0 script a7 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"Understanding that, we are nothing more but mortals on this earth, but this is our triumph.",0; +} +prt_church.gat,99,124,0 script a8 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"We here will now join these two mortal entities, and create an immortal love.",0; +} +prt_church.gat,99,124,0 script a9 -1,{ +areaannounce "prt_church.gat",0,0,350,350,$groom$+", do you you wish to take "+$bride$+" as your lawfully wedded wife?",0; +} +prt_church.gat,99,124,0 script a10 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"And do you "+$bride$+", wish to take "+$groom$+" as your lawfully wedded husband?",0; +} +prt_church.gat,99,124,0 script a11 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"And so be it, by the powers vested in me...",0; +} +prt_church.gat,99,124,0 script a12 -1,{ +areaannounce "prt_church.gat",0,0,350,350,"I pronouce you Husband and Wife, you may kiss the bride.",0; + wedding; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; +} +prt_church.gat,99,124,0 script a13 -1,{ + +areaannounce "prt_church.gat",0,0,350,350,"The wedding has been cancelled.",0; + set $progress,0; + set $groom$,"null"; + set $bride$,"null"; + set $name$,"null"; + set $name2$,"null"; + set @register,0; + set event_wedding,0; + set @get_ring,0; +} + +////////////////////////////////////////////////////////// +// PROPERTY OF eATHENA! OTHER ATHENAS DON'T TOUCH THIS! // +////////////////////////////////////////////////////////// \ No newline at end of file diff --git a/npc/other/weddingtxt.txt b/npc/other/weddingtxt.txt new file mode 100644 index 000000000..2caea19d6 --- /dev/null +++ b/npc/other/weddingtxt.txt @@ -0,0 +1,277 @@ +//UNFINISHED! need to set names and give rings! +//Made by AppleGirl and Evera/Lorri. +//PROPERTY OF eATHENA! OTHER ATHENAS DON'T TOUCH THIS! +//Note: permanent variables event_marriage. 0=nothing done yet 1=m registered 2=f registered 3=m before ring 4=f before ring 5=m married 6=f married + +prt_church.gat,99,125,8 script Tristan the Third 108,{ +mes "[Thristan the Third]"; +if(event_marriage == 0) goto Lreg; +if(event_marriage == 1) goto Lmale; +if(event_marriage == 2) goto Lfemale; +if(event_marriage == 3) && (countitem(2634)<1) || (event_marriage == 3) && (getequipname(136) == 2634) goto Lmcere; +if(event_marriage == 4) && (countitem(2635)<1) || (event_marriage == 4) && (getequipname(136) == 2635) goto Lfcere; +if(event_marriage >= 5) goto Lhappy; +//else goto Lhappy; +//if(even +Lreg: +mes "If you wish to get married you must first register"; +Lmale: +if (getequipname(16) == 7170) goto Lmale2; +if (getequipname(16) != 7170) goto Lmale3; +mes "OmG1! H4X0Rz!1"; +close; +Lmale2: +if (zeny >= 30000) goto Lmale4; +if (zeny <= 29999) goto Lmale3; +mes "OmG1! H4X0Rz!1"; +close; +//NOTE! Triggers to save/respond names aren't done! +Lmale4: + mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry"; + mes "Do you wish to marry?"; +menu +"yes",Lmyes,"No",Lcancel; +Lmyes: +//enable for input; can't be done with current script.c +// mes"What is your bride's name?"; +// input @namemale; + next; + mes "I will now collect your ^FF00FFmoney^000000."; + set Zeny, Zeny-30000; + next; +//enable for input; can't be done with current script.c +// input @namemale; + mes "Here is the ring. Please put it on your bride's hand"; + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; + mes "you may now kiss the bride."; + emotion 46; +//enable for setvariable + set event_marriage,3; + getitem 2634,1; + close; +Lmale3: + mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; +Lfemale: +if (zeny >= 20000) goto Lfemale4; +if (zeny <= 19999) goto Lfemale3; +mes "OmG1! H4X0Rz!1"; +close; +Lfemale4: + mes "Hello, how are you doing this wonderful day? Ah. I see you've registered to marry"; + mes "Do you wish to marry?"; +menu +"yes",Lfyes,"No",Lcancel; +Lfyes: +//enable for input; can't be done with current script.c +// mes "What is your groom's name?"; +// input @namefemale; + next; + mes "I will now collect your ^FF00FFmoney^000000."; + set Zeny, Zeny-20000; + next; +//enable for input; can't be done with current script.c + input @namefemale; + mes "Here is the ring. Please put it on your groom's hand"; + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; +//enable for setvariable + set event_marriage,4; + getitem 2635,1; + close; +Lfemale3: + mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; +Lmcere: + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; + mes "you may now kiss the bride."; + emotion 46; + set event_marriage,5; +close; +Lfcere: + + mes "By the holy power invested in me.."; + mes "I now pronounce you husband and wife!"; + emotion 46; + set event_marriage,6; +close; +Lhappy: +mes "I hope your marriage is happy and successful!"; +close; +Lcancel: +mes "A true pity. I hope to see you another time."; +close; +} +prt_church.gat,95,100,3 script Mary 71,{ +mes "[Mary Happy]"; +if(event_marriage == 0) goto Lstart; +if(event_marriage != 0) goto Lhappy; +mes "OmG1! H4X0Rz!1"; +close; +Lstart: +mes "Getting married bring a lot of joy."; +mes "By any chance, you you want to get engaged with someone?"; +next; +menu "Explain the principles of Marrige",Lprinciples,"How does the marrige system work.",Lsystem,"I want to get married with someone.",Lmarried,"I live solo forever!",Lsolo; + +Lprinciples: + mes "[Mary Happy]"; + mes "His Majesty King Tristan III of the Rune Midgard Kingdom will be officiating this wedding, with the intent of blessing all the people through his noble message."; + next; + mes "[Mary Happy]"; + mes "Although His Majesty has a rather busy agenda, for the sake of newly married couples, he has personally come here, to the Prontera Church."; + mes "It is the favor of our King that everyone would live happily ever after."; + next; + mes "[Mary Happy]"; + mes "The proposal must be done with prudence and courtesy."; + mes "Once the wedlocks have been made, they cannot be undone."; + mes "The two who are united in marriage must be with the other forever until the day they leave this world."; + next; + mes "[Mary Happy]"; + mes "Also, males only with females, and females only with males can be wed. Although there may be those who desire a homosexual or bestial marriage... it is not approved."; + next; + mes "[Mary Happy]"; + mes "If there is a significant other whom you want to spend the rest of your life with, then don't be shy to propose."; + mes "Wishing for many blessings upon couples who wish to live happily ever after.."; + close; +Lsystem: + mes "[Mary Happy]"; + mes "First make sure both players a registered to get married."; + mes "Obviously, you must know each other to get married?"; + mes "If both have registered, and you must be on the same party."; + mes "Then talk to Thristan the Third."; + next; + mes "[Mary Happy]"; + mes "You must go to Thristan the Third,"; + mes "and the male must talk to him first."; + mes "And you must tell him the girl"; + mes "you wish to get married with."; + mes "Be sure to tell him exactly who you want to marry."; + next; + mes "[Mary Happy]"; + mes "After the male has spoken, next the female must talk."; + mes "Then when both of you have spoken each others names,"; + mes "Thristan the third will read out both of your names."; + next; + mes "[Mary Happy]"; + mes "After you have got married,"; + mes "you will both recive a ring of marrige."; + mes "And as soon as both of you wear these rings,"; + mes "you will be forever married with each other."; + mes "You can also be refused of a lasting marrige."; + mes "But, dont be sad."; + next; + mes "[Mary Happy]"; + mes "If there are many people that wish to get married,"; + mes "So please keep to the order you register."; + mes "Thristan does not do multiple marriges at once."; + mes "He will only see one couple at a time."; + next; + mes "[Mary Happy]"; + mes "Lastly, you must put forth your name quickly"; + mes "to Thristan the third."; + mes "After the male has said yes to marrage "; + mes "the female has 3 minutes to reply."; + mes "Or you shall forever never be able"; + mes "to get married."; + next; + mes "[Mary Happy]"; + mes "An easy way to write down the each others name,"; + mes "Send a message to each other"; + mes "then in the private message window press up"; + next; +//o_O who removed this part? we use a diff system now +// mes "[Mary Happy]"; +// mes "Then it will show the other persons name."; +// mes "If you press ctrl + C that name will be saved."; +// mes "Next time you need that name"; +// mes "you can press shift + insert."; +// mes "Then you will get that name quickly and easily."; +// next; +// mes "[Mary Happy]"; +// mes "You should have a go at using this method."; +// mes "Remeber, Press ctrl + C to save that name."; +// next; +// input @nametest; + mes "[Mary Happy]"; + mes "Hopefully you will remember this method."; + mes "If you ever decide to get married."; + mes "Remember to register."; +Lmarried: + mes "[Mary Happy]"; + mes "If you wish to get married you must first register."; + mes "Male is ^FF00FF30,000^000000 zeny and female is ^FF00FF20,000^000000 zeny"; + mes "Both male and female must have registered,"; + mes "and both must have paid fees,"; + mes "and the female must have a wedding veil."; + next; + mes "[Mary Happy]"; + mes "If both people have paid and meet recquirements"; + mes "you are able to get married strait away."; + mes "Do you wish to register to get married?"; + menu "Yes",LYes,"No",LNo; +LYes: +//add check for sex and if veil and tuxedo and wedding dress +if (Sex == 1) goto Lmale; +if (Sex == 0) goto Lfemale; +Lmale: +if (getequipname(16) == 7170) goto Lmale2; +if (getequipname(16) != 7170) goto Lmale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +close; +Lmale2: +if (zeny >= 30000) goto Lmale4; +if (zeny <= 29999) goto Lmale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +close; +Lmale4: + set event_marriage,1; + mes "[Mary Happy]"; + mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage."; +close; +Lmale3: + mes "[Mary Happy]"; + mes "Hm, have you forgotten to bring your ^FF00FFTuxedo^000000 or ^FF00FFmoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; + +Lfemale: +if (getequipname(16) == 2338) && (getequipname(256) == 2206) goto Lfemale2; +if (getequipname(16) != 2338) || (getequipname(256) == 2206) goto Lfemale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +Lfemale2: +if (zeny >= 20000) goto Lfemale4; +if (zeny <= 19999) goto Lfemale3; +mes "[Mary Happy]"; +mes "OmG1! H4X0Rz!1"; +Lfemale4: + set event_marriage,2; + mes "[Mary Happy]"; + mes "You are now registered =) go talk to his majesty, King Tristan III for your marriage."; +Lfemale3: + mes "[Mary Happy]"; + mes "Hm, have you forgotten to bring your ^FF00FFWedding Veil^000000, ^FF00FFWedding Dress^000000, or ^FF00FFMoney^000000?"; + mes "Have a good look for it."; + mes "Because you must bring it in order to get married."; + mes "If you have it right now, please show me"; +close; +LNo: + mes "I hope you have a wonderful day!"; +close; +Lhappy: + mes "I hope your marriage is happy and successful!"; +close; +} \ No newline at end of file diff --git a/npc/quests/all_quest.txt b/npc/quests/all_quest.txt new file mode 100644 index 000000000..b33100897 --- /dev/null +++ b/npc/quests/all_quest.txt @@ -0,0 +1,570 @@ +//===== eAthena Script ======================================= +//= Some Quests Gathered Together +//===== By: ================================================== +//= eAthena Team +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Just some quests +//===== Additional Comments: ================================= +//= Don't use it. +//============================================================ + +prontera.gat,147,204,4 script Quest Assistant 93,{ + mes "[Quest Assistant]"; + mes "Hello! I'm the Quest Assistant."; + mes "Please select the Quest you need information on:"; + next; + menu "Mr. Smile",MrSmile,"Bunny Band",BunBand,"Pretend Murdered",PreMur,"Welding Mask",WelMask,"Ear Muffs",EarMuf,"Antlers",Antler,"Stop Post",StopPas,"Doctor Hat",DocHat,"Feather Bonnet",FeaBon,"Phantom of Opera",PhaOpe,"Sakkat",Sakkat,"Boy's Cap",BoyCap,"Ph.D Hat",PhdHat,"Oxygen Mask",OxyMask,"Headset",Headset,"Binoculars",Binoc,"Cancel",MCancel; +// Mr. Smile +MrSmile: + mes "[Quest Assistant]"; + mes "Hi."; + mes "This is Smile Assistance."; + mes "How may I help you?"; + next; + menu "^3355FFMr. Smile^000000?",L0,"Construct ^3355FFMr. Smile^000000",L1,"Quit",LEnd; +L0: + mes "[Quest Assistant]"; + mes "National Event held by the command of ^0099FFHis Majesty Tristram the 3rd^000000, that intends to encourage the nation of the Rune-Midgard Kingdom to play in more enjoyable atmosphere!"; + mes "I am ^0099FF'Smile Assistance'^000000,"; + mes "... who leads the national event under the name of ^0099FFSmile throughout the Rune-Midgard Kingdom^000000."; + next; + mes "[Quest Assistant]"; + mes "^^3355FF10 Jellopy^000000"; + mes "^^3355FF10 Fluff^000000"; + mes "^^3355FF10 Clover^000000"; + next; + mes "[Quest Assistant]"; + mes "With this event"; + mes "Everybody will be happy and smile, getting together with other people,"; + mes "And will try to make Ragnarok the most enjoyable game in the world."; + close; +L1: + if (countitem(705) < 10) goto L10; + if (countitem(909) < 10) goto L10; + if (countitem(914) < 10) goto L10; + delitem 705,10; + delitem 909,10; + delitem 914,10; + getitem 2278,1; + mes "[Quest Assistant]"; + mes "His majesty, Tristram the 3rd has promised to try his best to make Ragnarok better and more enjoyable."; + next; + mes "[Quest Assistant]"; + mes "The fact mentioned above was announced by the Public Information Bureau of the Rune-Midgard Kingdom."; + close; +L10: + mes "[Quest Assistant]"; + mes "Oh - unfortunately"; + mes "You have not brought enough items for ^3355FFMr. Smile^000000."; + mes "^3355FF10 Jellopy"; + mes "^3355FF10 Fluff"; + mes "^3355FF10 Clover"; + mes "Please check the requirementes above."; + close; +LEnd: + mes "[Quest Assistant]"; + mes "Changed your mind eh? Well, come see me when you need a ^3355FFMr. Smile^000000!"; + close; +// Bunny Band +BunBand: + mes "[Quest Assistant]"; + mes "^529DFFSpecial Festival, ^3355FFBunny Band^529DFFQuest!!^000000"; + mes "Would you like to attend? You need ^3355FF'100 Feather'^000000 + ^3355FF'1 Four Leaf Clover'^000000 + ^3355FF'1 Pearl'^000000 + ^3355FF'1 Kitty Band'^000000."; + next; + menu "Sure, I need one.",LYes,"Cancel.",LCancel; +LYes: + if(countitem(949) < 100) goto LNoItems; + if(countitem(706) < 1) goto LNoItems; + if(countitem(722) < 1) goto LNoItems; + if(countitem(2213) < 1) goto LNoItems; + delitem 949,100; + delitem 706,1; + delitem 722,1; + delitem 2213,1; + getitem 2214,1; + mes "[Quest Assistant]"; + mes "Tah Dah!!! ^3355FF'Bunny Band'^000000...! Please Take it!"; + close; +LNoItems: + mes "Thank you for joining us!"; + mes "Please come back after gathering all Items for a Bunny Band!"; + close; +LCancel: + mes "[Quest Assistant]"; + mes "That's too bad. Come back soon!"; + close; +// Pretend Murder +PreMur: + mes "[Quest Assistant]"; + mes "I wish I could make Clothings for my Grand Children in this festive season.."; + mes "Could you find me ^3355FF'Skirt of Virgin'^000000 ..I need Four of them ..Please ?"; + mes "I am begging you, Young man.."; + next; + menu "Alright.",LYes1,"No way!",LNo1; +LYes1: + if(countitem(1049) < 3) goto LNoHat; + delitem 1049,4; + getitem 2293,1; + mes "[Quest Assistant]"; + mes "Oh Thank you so much!"; + mes "Ah.. Wait.. I almost forgot. Well, I was a quite popular actress back in my younger days..."; + mes "My members gave me a ^3355FF'Pretend Murder'^000000 for my wedding present when I left the Troupe...I've kept it for the precious memory of my youth."; + close; +LNo1: + mes "[Quest Assistant]"; + mes "Sigh..How can I get ^3355FF'Skirt of Virgin'^000000 by myself...I am so weak and tired ..Sigh.."; + mes "I really wanted to make my Babies Happy ....."; + close; +LNoHat: + mes "[Quest Assistant]"; + mes "I gather Mushrooms on the Mountin of Payon Everyday.I didn't even noticed time has come because of my bad memory...."; + mes ".. Hmm..Now I remember of a festive season in next month."; + mes "I wish I could make clothings for my family in this season."; + mes "For that, I need 4 ^3355FF'Skirt of Virgin'^000000.."; + next; + mes "[Quest Assistant]"; + mes "Young man, please help me. When you find Some ^3355FF'Skirt of Virgin '^000000.."; + mes "please bring them to me. I won't forget it if you help me..."; + close; +// Welding Mask +WelMask: + mes "[Quest Assistant]"; + mes "Who am I? I am the one and only Veteran Blacksmith in here! You heard?!"; + mes "I've been working for 30 years in this hotty, bloody Hellfire!"; + mes "Since I became a Blacksmith, I invented something really incredible. Wanna listen?"; + next; + menu "I'd love to.",LILoveTo,"I don't think so.",LIDont; +LILoveTo: + mes "[Quest Assistant]"; + mes "We always make various Metal products with welding Steel under horribly hot conditions."; + mes "So we have to face the hot-air heating and metallic fluid. Our faces are almost burnt down and sometimes injured while working..."; + mes "But with this, You dont have to be worried! The so-called .. ^3355FF' Welding Mask '^000000 !!"; + next; + mes "[Quest Assistant]"; + mes "This one keeps your face out of the heat."; + mes "This Must be a Most-Wanted Item !"; + mes "So how's that ? If you offer me ^3355FF'50 Steels '^000000 and ^3355FFOnly 2000 Zeny^000000,I will make it for you right away~!!"; + next; + menu "Not bad. Alright!",LNotBad,"No thanks.",LNoThx; +LNotBad: + if (countitem(999) < 50) goto LHeyDork; + if (Zeny < 2000) goto LHeyDork; + delitem 999,50; + set Zeny,zeny-2000; + getitem 2292,1; + mes "[Quest Assistant]"; + mes "I like you,Dude! Alright, I'll do it right away !!"; + mes "You are the best guy I've ever met!"; + mes "Bye bye Buddy"; + close; +LHeyDork: + mes "[Quest Assistant]"; + mes "Hey Dork. If you don't have enough Steels or money, Get LOST!!"; + mes "Have you ever heard about Quenching? It 's not easy as you think!"; + mes "Go get some money or whatever my Craft needs!!!!"; + close; +LNoThx: + mes "[Quest Assistant]"; + mes "Oh Man ! You'll probably regret this. I recommanded it for you, not me !"; + mes "Man, Everyone gets older and older. You should take care of your bloody face before it starts shirinking!"; + close; +LIDont: + mes "[Quest Assistant]"; + mes "I think I've wasted my precious time on you.. I have nothing more to say. Be on your way!"; + close; +// Ear Muffs +EarMuf: + mes "[Quest Assistant]"; + mes "My Family has produced and sold the special Winter product ^3355FF'Ear Muffs'^000000 for many years.."; + mes "We just moved in here, but unfortunately the Weather is always Warm so we hardly live with our Job..."; + mes "If you plan to travel to the cold area I suggest you to prepare ^3355FF'Ear Muffs'^000000.."; + next; + mes "[Quest Assistant]"; + mes "^3355FF'Ear Muffs'^000000 are the special product of my family. We provide it to customers who have ^F3355FF'1 Cursed Rubi'^000000, ^3355FF'1 Headset'^000000"; + mes "^3355FF'200 Feathers'^000000 and ^DDDD00'5000 Zeny'^000000."; + next; + menu "Oh Yeah? Sounds Good.",LSoundsGood,"No thank you.",LNoThx1; + + LSoundsGood: + if(countitem(724) < 1) goto LWeCant; + if(countitem(949) < 200) goto LWeCant; + if(countitem(5001) < 1) goto LWeCant; + if(Zeny < 5000) goto LWeCant; + delitem 724,1; + delitem 949,200; + delitem 5001,1; + set Zeny,Zeny-5000; + getitem 2283,1; + mes "[Quest Assistant]"; + mes "I will give you this ready-made one."; + mes "Thank you for buying our product. You won't regret your purchase. Satisfaction is Guaranteed."; + close; +LWeCant: + mes "[Quest Assistant]"; + mes "Dear .. You don't have enough money and items .."; + mes "We can't help you if you don't bring every item needed. Please understand we have to make our living..."; + close; +LNoThx1: + mes "[Quest Assistant]"; + mes "That's fine. I believe we will meet again one of these days .."; + close; +// Antlers +Antler: + mes "[Quest Assistant]"; + mes "Hey I am a Horn Collector. Sonds Great, Huh?"; + mes "What do you think about Animal horns? I think they are worth it to collect."; + mes "Besides you can decorate your house with them."; + next; + mes "[Quest Assistant]"; + mes "By the way..I realised there are horns I couldn't get yet. They're called ^3355FF'Evil Horn'^000000.."; + mes "And some might say ^3355FF'Evil Horn'^000000 is not the sort of Animal horn but the Devil Horn..Still I really really wish I could have it."; + mes "Do you....? Do you have the ^3355FF'Evil Horn'^000000?"; + mes "If you offer me ^3355FF'20 Evil Horn'^000000, I will give you my precious collectible, ^3355FF'Antlers'^000000. So Deal?"; + next; + menu "Okay, Let's Deal.",LOk,"No Thanks",LNo2; +LOk: + if(countitem(923) < 20) goto LUnfortune; + delitem 923,20; + mes "[Quest Assistant]"; + getitem 2284,1; + mes "Whoah! This is the first time I've ever seen a real ^3355FF'Evil Horn'^000000!!"; + mes "Thank you! Here,this is my Antler for you!"; + mes "With your great help, I can make my wish come true this time. I appreciate you!"; + close; +LUnfortune: + mes "[Quest Assistant]"; + mes "Hmm.. Unfortunately you are not ready for my demand, ^3355FF'20 Evil Horn'^000000."; + close; +LNo2: + mes "[Quest Assistant]"; + mes "Well that's fine.."; + mes "I know we will speak again .."; + close; +// Stop Pass +StopPas: + mes "[Quest Assistant]"; + mes "Welcome to MacMillan's Post Workshop ."; + next; + mes "[Quest Assistant]"; + mes "My Clan, MacMillan.."; + mes "Has been producing Professional Traffic Signal Posts for more than 250 years."; + mes "And nowadays we are booking Special Orders with our Unique Ornament, ^3355FF'Stop Post'^000000."; + next; + mes "[Quest Assistant]"; + mes "This item requires:"; + mes "^3355FF50 Trunks^000000"; + mes "^3355FF1 Black Dyestuff^000000"; + mes "^3355FF90000 Zeny^000000"; + next; + menu "Could I order one ^3355FF'Stop Post'^000000?",LOrder,"Nah, Not my business.",LNot; +LOrder: + if(countitem(1019) < 50) goto LCheckAgain; + if(countitem(983) < 1) goto LCheckAgain; + if(Zeny < 90000) goto LCheckAgain; + delitem 1019,50; + delitem 983,1; + set Zeny,zeny-90000; + getitem 2272,1; + mes "[Quest Assistant]"; + mes "Here you are! This is the one and only Ornament for you, ^3355FF'Stop Post'^000000!"; + mes "Thank you for coming by!"; + close; +LCheckAgain: + mes "[Quest Assistant]"; + mes "Why don't you check the requirements again??"; + mes "I don't think you brought every items needed."; + close; +LNot: + mes "[Quest Assistant]"; + mes "Anyway, Thank you for coming by, My Clan, MacMillan's Workshop."; + close; +// Doctor Hat +DocHat: + mes "[Quest Assistant]"; + mes "I am the Very Famous, Enigmatic Dealer!"; + mes "I am Always bustling in and out of the Midgard Continent!"; + mes "Here is what my product requires:"; + mes "^3355FFDoctor Band^000000: 1 Red Bandana + 50 Iron + 1 Cracked Diamond + 3500 Zeny"; + next; + mes "[Quest Assistant]"; + mes "Would you like one of these?"; + next; + menu "Sure!",LSure,"Nah, I'm ok.",LNo3; +LSure: + if(countitem(2285) < 1) goto CantMake; + if(countitem(998) < 50) goto CantMake; + if(Zeny < 3500) goto CantMake; + delitem 2285,1; + delitem 998,50; + set Zeny,zeny-3500; + getitem 2273,1; + mes "[Quest Assistant]"; + mes "Hmm! Have you a Medical License?! Alright. I've heard about a well-known unlicensed physician `Cuwaki'.. I hope you won't get caught..."; + mes "Yeah... It's your business whatever. Take this."; + close; +CantMake: + mes "[Quest Assistant]"; + mes "You Dullard. Check this requirements again."; + mes "You Don't look like an idiot though....C'Mon Man. Get real!"; + close; +LNo3: + mes "[Quest Assistant]"; + mes "Well, see you around!"; + close; +// Feather Bonnet +FeaBon: + mes "[Quest Assistant]"; + mes "I am the Very Famous, Enigmatic Dealer!"; + mes "I am Always bustling in and out of the Midgard Continent!"; + mes "Here is what my product requires:"; + mes "^3355FFFeather Bonnet^000000 : 1 Romantic Gent + 300 Feather of Birds + 500 Zeny"; + next; + mes "[Quest Assistant]"; + mes "Would you like one of these?"; + next; + menu "Sure!",LSure1,"Nah, I'm ok.",LNo4; +LSure1: + if(countitem(2247) < 1) goto CantMake1; + if(countitem(916) < 300) goto CantMake1; + if(Zeny < 500) goto CantMake1; + delitem 2247,1; + delitem 916,300; + set Zeny,zeny-500; + getitem 5018,1; + mes "[Quest Assistant]"; + mes "You have good sense, Dude."; + mes "I know you had a hard time to collect these, but this one is worth the effort. Take it."; + close; +CantMake1: + mes "[Quest Assistant]"; + mes "You Dullard. Check this requirements again."; + mes "You Don't look like an idiot though....C'Mon Man. Get real!"; + close; +LNo4: + mes "[Quest Assistant]"; + mes "Well, see you around!"; + close; +// Phantom of Opera +PhaOpe: + mes "[Quest Assistant]"; + mes "I am the Very Famous, Enigmatic Dealer!"; + mes "I am Always bustling in and out of the Midgard Continent!"; + mes "Here is what my product requires:"; + mes "^3355FFPhantom of Opera^000000 : 20 Iron + 1 Singing Plant + 5000 Zeny"; + next; + mes "[Quest Assistant]"; + mes "Would you like one of these?"; + next; + menu "Sure!",LSure2,"Nah, I'm ok.",LNo5; +LSure2: + if(countitem(707) < 1) goto CantMake2; + if(countitem(998) < 20) goto CantMake2; + if(Zeny < 5000) goto CantMake2; + delitem 707,1; + delitem 998,20; + set Zeny,zeny-5000; + getitem 2281,1; + mes "[Quest Assistant]"; + mes "This is a pretty nice one."; + mes "Well, little bit Scary though.. I think it has a Magnetic Attraction. What about you?"; + mes "You like it.. Alright.. Take it!"; + close; +CantMake2: + mes "[Quest Assistant]"; + mes "You Dullard. Check this requirements again."; + mes "You Don't look like an idiot though....C'Mon Man. Get real!"; + close; +LNo5: + mes "[Quest Assistant]"; + mes "Well, see you around!"; + close; +// Sakkat +Sakkat: + mes "[Quest Assistant]"; + mes "I am the Very Famous, Enigmatic Dealer!"; + mes "I am Always bustling in and out of the Midgard Continent!"; + mes "Here is what my product requires:"; + mes "^3355FFSakkat^000000 : 120 Trunk + 10000 Zeny"; + mes "Would you like one of these?"; + next; + menu "Sure!",LSure3,"Nah, I'm ok.",LNo6; +LSure3: + if(countitem(1019) < 120) goto CantMake3; + if(Zeny < 10000) goto CantMake3; + delitem 1019,120; + set Zeny,zeny-5000; + getitem 2280,1; + mes "[Quest Assistant]"; + mes "If you have a chance to, visit the Uplander Village, Payon."; + mes "The ^3355FFSakkat^000000 Dealer has never sold ^3355FFSakkat^000000 to other Dealers but to me. Because only I can recognise its quality. Due to its rarity, ^3355FFSakkat^000000 becomes a very Unique and Exceptional product."; + mes "OK! Take it!"; + close; +CantMake3: + mes "[Quest Assistant]"; + mes "You Dullard. Check this requirements again."; + mes "You Don't look like an idiot though....C'Mon Man. Get real!"; + close; +LNo6: + mes "[Quest Assistant]"; + mes "Well, see you around!"; + close; +// Boy's Cap +BoyCap: + mes "[Quest Assistant]"; + mes "Ohhh !! Th ..This is the one..by hearsay .."; + mes "Gain Strength even taking a look at it! Inflame the Blood even smelling once!"; + mes "80 year-old Grampa becomes a Boy after grabbing one bite of it!!!!"; + mes "It is the ^3355FFTiger's Footskin^000000!!"; + mes "Please bring me that.. I need 10 of them.."; + next; + menu "Ok, here you go!",LExchange,"I don't have the time.",LCancel2; + close; +LExchange: + if(countitem(1030) < 10) goto CantMake4; + delitem 1030,10; + getitem 5016,1; + mes "[Quest Assistant]"; + mes "T .. Tahnk you !!"; + mes "Now I can be vigorous again with this item!"; + mes "I will eat this thing right away!"; + close; +CantMake4: + mes "[Quest Assistant]"; + mes "Oh... It seems you don't have enough ^3355FFTiger's Footskin^000000."; + close; +LCancel2: + mes "[Quest Assistant]"; + mes "He.. Hey Young one!! Wai .. Wait!"; + close; +// Ph.D Hat +PhdHat: + mes "[Quest Assistant]"; + mes "Ah .. Definately ..They are 4 kinds of Flowers I was looking for .."; + mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000... If you can bring them to me, I could give you my treasue..."; + next; + menu "Sure",LYes2,"Cancel",LCancel1; +LYes2: + if(countitem(710) < 1) goto LNoHat1; + if(countitem(103) < 1) goto LNoHat1; + if(countitem(704) < 1) goto LNoHat1; + if(countitem(708) < 1) goto LNoHat1; + delitem 710,1; + delitem 703,1; + delitem 704,1; + delitem 708,1; + getitem 5012,1; + mes "[Quest Assistant]"; + mes "I really really appreciate you what you've done for me. I mean I am really grateful."; + mes "I will give my precious item to you as I promised."; + mes "This is a Hat worn on my Graduation Day in the University. It reminds me of my happy School days."; + mes "Please take this..."; + close; +LNoHat1: + mes "[Quest Assistant]"; + mes "Don't you think... Flowers are pretty?"; + mes "Unfortunately, you don't have the ones I need."; + close; +LCancel1: + mes "[Quest Assistant]"; + mes "One of thesedays I will cover whole world with Flowers."; + close; +// Oxygen Mask +OxyMask: + mes "[Quest Assistant]"; + mes "Ahh! These Thief Bugs are so cute! They hurt my eyes!"; + mes "I must have 5 ^3355FFOra Ora^000000 to make it stop!"; + mes "In return, I can give you this ^3355FFOxygen Mask^000000"; + next; + menu "No Problem!",LYes3,"What?!?",LCancel6; +LYes3: + if(countitem(701) < 5) goto LNoMask; + delitem 701,5; + getitem 5004,1; + mes "[Quest Assistant]"; + mes "Muhahahahah!!! Finally I have this! Ora Ora!"; + mes "Stupid and Disgusting Thief Bugs!! You will get payed for !!!"; + close; +LNoMask: + mes "[Quest Assistant]"; + mes "AHHHHHH!!! You don't have the stuff!"; + close; +LCancel6: + mes "[Quest Assistant]"; + mes "Huhuhuhuhu... What If I could not get rid of Thief Bugs..."; + mes "Only one thing I could do is to Fall in Love with them..Hehehehehehe..."; + close; +// Headset +Headset: + mes "[Quest Assistant]"; + mes "These are Articles needed for my Grandfather's masterpiece."; + mes "^3355FF100 Steel^000000"; + mes "^3355FF1 Oridecon^000000"; + mes "^3355FF1 Alchol^000000"; + mes "^3355FF1 Coal^000000"; + mes "Will you help me?"; + next; + menu "Sure Thing.",LYes4,"No Thanks",LCancel3; +LYes4: + if(countitem(999) < 40) goto LNoItems2; + if(countitem(984) < 1) goto LNoItems2; + if(countitem(970) < 1) goto LNoItems2; + if(countitem(1003) < 1) goto LNoItems2; + delitem 999,40; + delitem 984,1; + delitem 970,1; + delitem 1003,1; + getitem 5001,1; + mes "[Quest Assistant]"; + mes "Thank you."; + mes "Because of you,I could accomplish my grand father's wish."; + mes "He would be happy if he look down on me from the Heaven.."; + close; +LNoItems2: + mes "[Quest Assistant]"; + mes "Thank you for trying to help me ..But you didn't bring whole items I need."; + mes "I think you will make it soon though..."; + close; +LCancel3: + mes "[Quest Assistant]"; + mes "Fare well."; + close; +// Binoculars +Binoc: + mes "[Quest Assistant]"; + mes "Howdi - A new customer !"; + mes "Stop!!! I know I know what you're gonna talk about."; + mes "You want the ^3355FFBinoculars^000000 from me,right ?"; + mes "Just gimme ^3355FF1 Geek Glasses^000000, ^3355FF40 Steel^000000, and 50,000 Zeny."; + next; + menu "Yeah, sure.",LYes5,"Ignore him!",LCancel4; +LYes5: + if(countitem(2243) < 1) goto LNoItems1; + if(countitem(999) < 100) goto LNoItems1; + delitem 2243,1; + delitem 999,100; + set Zeny,zeny-50000; + getitem 2296,1; + mes "[Quest Assistant]"; + mes "Here it is! The Binoculars!"; + close; +LNoItems1: + mes "[Quest Assistant]"; + mes "Man, don't take me for a fool! You don't have the items!!"; + close; +LCancel4: + mes "[Quest Assistant]"; + mes "Hey you!"; + mes "Now you're in front of Marius,"; + mes "Alchemist of the Alchemists!"; + mes "Do you ignore me now, Huh???"; + mes "Come on!! I beat your ass!!!"; + close; +MCancel: + mes "[Quest Assistant]"; + mes "I see. I will be here whenever you need me!"; + close; +} \ No newline at end of file diff --git a/npc/quests/bongun.txt b/npc/quests/bongun.txt new file mode 100644 index 000000000..eea5ba3e7 --- /dev/null +++ b/npc/quests/bongun.txt @@ -0,0 +1,58 @@ +comodo.gat,135,227,5 script Sherri 93,{ +mes "[Sherri]"; +mes " "; +mes "*sighs*"; +next; +mes "[Sherri]"; +mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a handsome boy ..."; +next; +mes "[Sherri]"; +mes "...so why am I sad?"; +mes " "; +mes "It's because I don't even know how his personality is...say, if you can find me a 'Girl's Diary' about him, I'll give you his diary!"; +next; +mes "[Sherri]"; +mes "Can you please help me?"; + + menu "What do I need again?",ExItems,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd; + + ExItems: + mes "[Sherri]"; + mes "What I desire is..."; + mes " "; + mes "A 'Girl's Diary' about him..."; + close; + + ExCreate: + mes "[Sherri]"; + mes "Really!! You'll help me!"; + next; + if(countitem(1558)<1) goto NoItem; + goto ExGive; + + NoItem: + mes "[Sherri]"; + mes "Waahhhh, stop playing with my feelings!"; + mes " "; + mes "Go away!"; + close; + + ExGive: + mes "[Sherri]"; + mes "YES! I am forever in your debt!"; + delitem 1558,1; + getitem 659,1; + mes " "; + mes "Here is his diary as promised! Again - Thank you!"; + next; + mes "[Sherri]"; + mes "Wait! Here's his sword, I found it next to him. But it's broken...I know of a old man just west of Geffen who can fix such a sword!"; + getitem 7110,1; + close; + + ExEnd: + mes "[Sherri]"; + mes "*sighs*"; + close; +close; +} diff --git a/npc/quests/bongunsword.txt b/npc/quests/bongunsword.txt new file mode 100644 index 000000000..50372f388 --- /dev/null +++ b/npc/quests/bongunsword.txt @@ -0,0 +1,44 @@ +gef_fild07.gat,183,239,5 script Old Smith 120,{ +mes "[Old Smith]"; +mes "Ah, isn't it peaceful up here - I used to be one of the legendary Blacksmiths of midgard...sadly my skills have faded."; +next; +if(countitem(7110)<1) goto NoItemS; +mes "[Old Smith]"; +mes "Hmm, it seems as if you need something. What would that be?"; + + menu "Can you fix this broken sword?",ExItems,"Nothing really...",ExEnd; + + ExItems: + mes "[Old Smith]"; + mes "Ahhh, this is a very old sword and yes I can fix it, I'll need an 'Oridecon' to mend the breaks though."; + next; + if(countitem(7110)<1) goto NoItem; + if(countitem(984)<1) goto NoItem; + goto ExGive; + + NoItem: + mes "[Old Smith]"; + mes "Hmm, you seem to be missing something...probably that 'Oridecon'."; + close; + + NoItemS: + mes "[Old Smith]"; + mes "...ah well, go out and live life young one. Time never stops!"; + close; + + ExGive: + mes "[Old Smith]"; + mes "Ah yes here we go!"; + delitem 7110,1; + delitem 984,1; + getitem 10020,1; + mes " "; + mes "Haha! Gramps still has that old magic touch, Here you go!"; + close; + + ExEnd: + mes "[Old Smith]"; + mes "...ah well, go out and live life young one. Time never stops!"; + close; +close; } +} diff --git a/npc/quests/bunnyband.txt b/npc/quests/bunnyband.txt new file mode 100644 index 000000000..cfb4c8e30 --- /dev/null +++ b/npc/quests/bunnyband.txt @@ -0,0 +1,102 @@ +//===== eAthena Script ======================================= +//= Bunny Band Quest +//===== By: ================================================== +//= eAthena Dev Team +//===== Current Version: ===================================== +//= v1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.1 using duplicate command +//============================================================ + + + + +// Prontera ------------------------------------------------------------------------------------------------------------------------------------------ +prontera.gat,146,87,6 script Kafra Corp. Rep.#1::KCRep 83, +{ + mes "[Kafra Corp. Rep.]"; + if (BUNYBND == 1) goto L_Check; + mes "^529DFFSpecial Event, ^FF0000Bunny Band ^529DFFQuest!!^000000"; + next; + menu "Information.",M_Info, "Join.",M_Join, "Cancel.",M_End; + + M_Info: + mes "[Kafra Corp. Rep.]"; + mes "To thank our customers for using the Kafra Corp. Services, we have prepapred a small event for them....."; + next; + mes "[Kafra Corp. Rep.]"; + mes "The ^FF0000Bunny Band ^529DFFQuest!!^000000. (Sponsered by: The Alberta Merchant Assosiation.)"; + mes "This quest allows players to obtain the ultra-rare ^FF0000Bunny Band^000000!!"; + next; + mes "[Kafra Corp. Rep.]"; + mes "All you have to do is collect a number of items and bring them to a Kafra Corp. Rep. such as myself."; + mes "We will then carefully hand make a Bunny Band for you on the spot!"; + next; + mes "[Kafra Corp. Rep.]"; + mes "Here are the items that you will need for the Bunny Band."; + mes "^5555FF100 Feather^000000,"; + mes "^5555FF1 Four Leaf Clover^000000,"; + mes "^5555FF1 Pearl^000000,"; + mes "^5555FF1 Kitty Band^000000."; + next; + mes "[Kafra Corp. Rep.]"; + mes "When you've collected all of the items, just speak with any Kafra Corp. Rep. like myself."; + mes "We can be found in every town across Rune Midgard."; + close; + + M_Join: + + mes "[Kafra Corp. Rep.]"; + mes "Thank you for participating in the event. Please come back when you have gathered all of the items."; + set BUNYBND, 1; + close; + + M_End: + mes "[Kafra Corp. Rep.]"; + mes "Have a nice day."; + close; + + L_Check: + if(countitem(949)<100 || countitem(706)<1 || countitem(722)<1 || countitem(2213)<1) goto sL_NoItems; + + mes "Wow!! Well-Done, well-done! You've got every single item!! I will make the Bunny Band for you right away...."; + emotion 21; + next; + mes "~ a few minutes later ~"; + delitem 949,100; + delitem 706,1; + delitem 722,1; + delitem 2213,1; + next; + mes "[Kafra Corp. Rep.]"; + mes "Tah dah!!! Here is your ^FF0000Bunny Band^000000... Please take it!"; + getitem 2214,1; + next; + mes "[Kafra Corp. Rep.]"; + mes "We appreciate your participation in this special event. Thank you and enjoy your Bunny Band!."; + close; + + sL_NoItems: + mes "Here are the items that you will need for the Bunny Band."; + mes "^5555FF100 Feather^000000,"; + mes "^5555FF1 Four Leaf Clover^000000,"; + mes "^5555FF1 Pearl^000000,"; + mes "^5555FF1 Kitty Band^000000."; + close; + +} + + +// Geffen ------------------------------------------------------------------------------------------------------------------------------------------ +geffen.gat,116,62,2 duplicate(KCRep) Kafra Corp. Rep.#2 83, +// Morroc ------------------------------------------------------------------------------------------------------------------------------------------ +morocc.gat,154,97,4 duplicate(KCRep) Kafra Corp. Rep.#3 83, +// Alberta ------------------------------------------------------------------------------------------------------------------------------------------ +alberta.gat,26,229,1 duplicate(KCRep) Kafra Corp. Rep.#4 83, +// Payon ------------------------------------------------------------------------------------------------------------------------------------------ +payon.gat,184,104,4 duplicate(KCRep) Kafra Corp. Rep.#5 83, + diff --git a/npc/quests/counteragent_mixture.txt b/npc/quests/counteragent_mixture.txt new file mode 100644 index 000000000..c8046b705 --- /dev/null +++ b/npc/quests/counteragent_mixture.txt @@ -0,0 +1,263 @@ +//===== eAthena Script ======================================= +//= Counteragent and Mixture Quest(Morgenstein) +//===== By: ================================================== +//= kobra_k88 +//= added some dialogs for Morgenstein by Komurka +//===== Current Version: ===================================== +//= 1.4 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Counteragent and mixtures for making dyes +//===== Additional Comments: ================================= +//= Fully working +//= Update for Alchemist Quest. +//= 1.2 added check for Empty Bottle [Lupus] +//= Fixed some lil thingys [Darkchild] +//= More li'l thing, added comments for items IDs [Lupus] +//============================================================ + + + + +// Merchant Louitz ----------------------------------------------------------- +alberta_in.gat,130,54,2 script Merchant Louitz 84,{ + mes "[Louitz]"; + mes "What's going on?"; + if(countitem(970) > 0 && countitem(971) > 0 && countitem(972) > 0) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol, +M_Menu: + next; + menu "Talk",M_Talk,"Cancel",M_Cancel; +M_Menu2: + next; + menu "Talk",M_Talk,"More about solutions",M_Solut,"Cancel",M_Cancel; + + M_Talk: + mes "[Merchant Louitz]"; + mes "I was in Geffen for a while trying to find magic tools when I heard some rumors about a Mad Scientist."; + mes "I became very interested in the man and tried to meet with him on serveral occasions."; + next; + mes "[Merchant Louitz]"; + mes "After many attempts, I finally got to meet him. Unfortunately he was too immersed in his work and didn't even take notice of me."; + next; + mes "[Merchant Louitz]"; + mes "He kept on mumbling to himself ^0000ff'Karvodainirol... Detrimindexta... Alcohol^000000...'"; + next; + mes "[Merchant Louitz]"; + mes "I had know idea what he was talking about at first, but I later learned that those were names for some unique and rare solutions."; + if(countitem(970) > 0 && countitem(971) > 0 && countitem(972) > 0) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol, + goto M_Menu; + + M_Solut: + set MORGEN,1; + mes "[Merchant Louitz]"; + mes "Apparently that scientist uses those solutions to make other agents and mixtures."; + mes "You should speak with ^0000ddAure Dupon^000000 in Geffen to find out more about it. "; + next; + mes "[Merchant Louitz]"; + mes "You can find him near the ^0000ddEast end^000000 of town. Ask him about ^0000ddMorgenstein^000000. That's the mad scientists' name."; + goto M_Menu2; + + M_Cancel: + mes "[Louitz]"; + mes "Um... Now I've seen everything."; + close; +} + +// Aure Dupon ------------------------------------------------------------------------ +geffen.gat,181,114,4 script Aure Dupon 55,{ + mes "[Aure Dupon]"; + mes "TIME never WAITS for you!! Even MAGIC cannot SLOW it down! I can feel it passing me by even as we speak!!...."; + emotion 0; + next; + mes "[Aure Dupon]"; + mes "So... why did you stop me??"; + emotion 20; + if(MORGEN == 1) goto M_Menu2; +M_Menu: + next; + menu "Talk",M_Talk,"Cancel",M_Cancel; +M_Menu2: + next; + menu "Talk",M_Talk,"More about Morgenstein",M_Morgen,"Cancel",M_Cancel; + + M_Talk: + mes "[Aure Dupon]"; + mes "It's true that I'm a little excentric because of my quest to gain the power of magic, but I assure that there are others out there that are even stranger than myself."; + next; + mes "[Aure Dupon]"; + mes "Like that mad scientist ^0000ddMorgenstein^000000. Anyway, if it were up to you, would you be able to devote your ENTIRE life to one single purpose?"; + next; + mes "[Aure Dupon]"; + mes "Would you be able to give up everthing else in your life to achieve that goal? Even if it meant risking insanity??"; + if(MORGEN == 1) goto M_Menu2; + goto M_Menu; + + M_Morgen: + set MORGEN,2; + mes "[Aure Dupon]"; + mes "Morgenstein? Now that man definatley has a few screws loose. He's always in the ^0000ddBlasksmith Guild Building^000000 making crazy potions."; + mes "He calls them ^ff0000Mixtures^000000 and ^ff0000Counteragents^000000. I'm not sure what there used for though."; + next; + mes "[Aure Dupon]"; + mes "You should go speak with him if your that curious about his work."; + goto M_Menu2; + + M_Cancel: + mes "[Aure Dupon]"; + mes "Human beings are just a small part of Nature.... therefore the human will is that of Natures will....."; + close; +} + +// Chemist Morgenstein ----------------------------------------------------------- +geffen_in.gat,141,140,2 script Morgenstein 121,{ + if(MORGEN == 2) goto L_0; + if(MORGEN == 3) goto L_1; + + mes "[Chemist Morgenstein]"; + mes "Heheheheheh... Sniff Sniff... I can smell something appetizing here."; + mes "It is a Human Being... living one... umm yummy... Heheheheheh"; + emotion 38; + close; + +L_0: + mes "[Chemist Morgenstein]"; + mes "So you've been asking about me huh? What is it that you want to know?"; +M_Menu: + next; + menu "Ask about research",M_Rsrch,"Nothing",M_End; + + M_Rsrch: + mes "[Chemist Morgenstein]"; + mes "Heheheheheh... You probably already heard about what I do ..."; + mes "Okay.. I will tell you everything... there is nothing left for me to hide.... Heheheheheh..."; + emotion 29; + next; + mes "[Chemist Morgenstein]"; + mes "As far as I'm concerned my research has already been completed....."; + mes "I am a genius you know, and I can make anything!! Heheheheh... it's only a matter how long it will take..."; + next; + mes "[Chemist Morgenstein]"; + mes "You know what I mean..... time?.... Hehehehehehehya...."; + emotion 29; + next; + mes "[Chemist Morgenstein]"; + mes "Um.... did you say you want to know about my Research?... Oh it's all very simple.... I'm just trying to find ways to combine different materials..."; + next; + mes "[Chemist Morgenstein]"; + mes "Isn't it interesting? I'm perfecting a method that melts materials, such as iron and stone, and then mixes them into a new substance!!!"; + mes "Once it is perfected, I will be able to turn anything in the word into a new substance....."; + next; + mes "[Chemist Morgenstein]"; + mes "~~~~ !! Hehe!!!...Heheheheheh!!!...squash squash!!!..Kekekekekelll!!!!"; + emotion 43; + next; + mes "[Chemist Morgenstein]"; + mes "Ack!~cough~cough~ Ahem.... Though it is not yet possible, I did figure out something else incredible."; + mes "Through my research I found out how to make different types of liquids. I call them ^5533FF'counteragents and mixtures'^000000."; + next; + mes "[Chemist Morgenstein]"; + mes "I can make one for you right now,if you want?? Ahhh... Talking about my experiments and research makes me.... 'excited'......."; + mes "You too can feel my 'excitement' if you wish..... Ahhhhh.... I can make you feel..."; + set MORGEN,3; + if(ALCH_Q == 4) set al_morgen,1; + close; + +L_1: + mes "[Chemist Morgenstein]"; + mes "What do you want now?"; +M_Menu2: + next; + menu "Ask about research",M_Rsrch,"Make a new one",M_Make, "Nothing",M_End; + + M_Make: + mes "[Chemist Morgenstein]"; + mes "Heheheheheheh.... So I see you are interested in my creations?..... Who woudn't.... Kekekekekekeke!!!"; + mes "So what do you want me to make for you?? Huh? Heheheheheh............."; + emotion 29; + next; + menu "-Counteragent",sM_Counter, "-Mixture",sM_Mixture, "-Forget it",M_End; + + sM_Counter: + mes "[Chemist Morgenstein]"; + mes "Oh... You said Counteragent... Kekekekekekeke... Let's see.... I'll need some items......."; + mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm....."; + next; + mes "[Chemist Morgenstein]"; + mes "Oh.... As I recall I need....:"; + mes "^5533FF1 Alcohol"; + mes "1 Detrimindexta^000000......"; + mes "and ^5533FF1 Empty Bottle^000000...."; + next; + mes "[Chemist Morgenstein]"; + mes "With these 3 things I'll be able to make you a counteragent. It won't be a big deal to make..... Kekekekekekeke...."; + mes "Oh, and there will be a fee of ^5533FF3000 zeny^000000 okay? Heheheheheh..... Oh, surely you don'ty think it's rip-off?..."; + next; + mes "[Chemist Morgenstein]"; + mes "Alright?...."; + next; + menu "Make",-,"Cancel",M_End; + + mes "[Chemist Morgenstein]"; + if(countitem(970)>0 && countitem(971)>0 && countitem(713)>0 && Zeny>=3000) goto sl_GetCounter;//Items: Alcohol, Detrimindexta, Empty Bottle, + mes "I'm sorry but you need 1 Alcohol, 1 Detrimindexta, and 3000 Zeny for me to make a Counteragent."; + close; + + sl_GetCounter: + mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh"; + mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!"; + next; + getitem 973,1;//Items: Counteragent, + delitem 970,1;//Items: Alcohol, + delitem 713,1;//Items: Empty Bottle, + delitem 971,1;//Items: Detrimindexta, + set Zeny, Zeny-3000; + mes "[Chemist Morgenstein]"; + mes ".... Hmmm......"; + close; + + sM_Mixture: + mes "Oh... You said Mixture?... Kekekekekekeke... Let's see... I'll need some items......."; + mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm....."; + next; + mes "[Chemist Morgenstein]"; + mes "Oh.... As I recall I need....:"; + mes "^5533FF1 Alcohol"; + mes "1 Karvodailnirol^000000....."; + mes "and ^5533FF1 Empty Bottle^000000..........."; + next; + mes "[Chemist Morgenstein]"; + mes "With these 3 things I'll be able to make you a mixture. It won't be a big deal to make..... Kekekekekekeke...."; + mes "Oh, and there will be a fee of ^5533FF4000 zeny^000000 okay? Heheheheheh..... Oh, surely you don'ty think it's rip-off?..."; + next; + mes "[Chemist Morgenstein]"; + mes "Alright??..."; + next; + menu "Make",-,"Cancel",M_End; + + if(countitem(970)>0 && countitem(972)>0 && countitem(713)>0 && Zeny>=4000) goto sl_GetMix;//Items: Alcohol, Karvodailnirol, Empty Bottle, + mes "I'm sorry but you need 1 Alcohol, 1 Karvodainirol, and 4000 Zeny for me to make a Mixture."; + close; + + sl_GetMix: + mes "[Chemist Morgenstein]"; + mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh"; + mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!"; + next; + getitem 974,1;//Items: Mixture, + delitem 970,1;//Items: Alcohol, + delitem 713,1;//Items: Empty Bottle, + delitem 972,1;//Items: Karvodailnirol, + set Zeny, Zeny-4000; + mes "[Chemist Morgenstein]"; + mes ".... Hmmm......"; + close; + + M_End: + mes "[Chemist Morgenstein]"; + mes "... Kekekekekekeke...."; + close; + + +} + diff --git a/npc/quests/custom/berzebub.txt b/npc/quests/custom/berzebub.txt new file mode 100644 index 000000000..200f0df87 --- /dev/null +++ b/npc/quests/custom/berzebub.txt @@ -0,0 +1,84 @@ +//===== eAthena Script ======================================= +//= Berzebub Card Quest Script +//===== By: ================================================== +//= jabs +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= Any eAthena Version; RO Episode XX +//===== Description: ========================================= +//= Quest to get the Berzebub Card +//===== Additional Comments: ================================= +//= MINE +//============================================================ +prontera.gat,165,178,8 script Old Woman 103,{ + if(BerzQuest == 1) goto alreadyDone; + mes "[Old Woman]"; + mes "Greeting lad. I found a really nift item while I was picking mushrooms near Glast Heim"; + next; + menu "Keep talking", goOn, "Leave", leave; + + leave: + mes "[Old Woman]"; + mes "Such a great item I have right here..."; + close; + + goOn: + mes "[Old Woman]"; + mes "I have never seen an item like this before. I am told it can be placed inside am accessory that has a slot avaiable in it."; + next; + mes "[Old Woman]"; + mes "If you're interested in this item, tell me and I'll tell you what you need for me to make you one of your own. I can only give one of these to each player, so once you finish this quest once, you may not do it again."; + next; + menu "Tell me more about it", getInfo, "Nah, I don't care about it", leave; + + getInfo: + mes "[Old Woman]"; + mes "I believe the item is called a Berzebub Card. It can make any spell caster cast spells really fast!"; + next; + mes "[Old Woman]"; + mes "I need all of the following items:"; + mes "^0080FF10^000000 Emperium"; + mes "^0080FF100^000000 Witched Starsand"; + mes "^0080FF200^000000 Needle of Alarm"; + mes "^0080FF10^000000 Worn Out Scrolls"; + mes "^0080FF1^000000 Bible"; + mes "^0080FF1^000000 Wand of the Occult"; + mes "^0080FF20^000000 Opal"; + next; + menu "I have all that!", checkItems, "I'll get those ASAP", leave; + + checkItems: + mes "[Old Woman]"; + mes "Anyone can say they have the items, but do they really have them? Let's take a look here..."; + next; + if(countitem(714) < 10) goto noItems; + if(countitem(1061) < 100) goto noItems; + if(countitem(1095) < 200) goto noItems; + if(countitem(618) < 10) goto noItems; + if(countitem(1551) < 1) goto noItems; + if(countitem(1614) < 1) goto noItems; + if(countitem(727) < 20) goto noItems; + delitem 714, 10; + delitem 1061, 100; + delitem 1095, 200; + delitem 618, 10; + delitem 1551, 1; + delitem 1614, 1; + delitem 727, 20; + getitem 4145, 1; + set BerzQuest, 1; + mes "[Old Woman]"; + mes "Well congratulations! You have all the items. Here is your Berzebub Card, just as I promised."; + close; + + noItems: + mes "[Old Woman]"; + mes "I knew you were lying! Get out of here and get those items you sorry excuse for a rock star."; + close; + + alreadyDone: + mes "[Old Woman]"; + mes "Hey I remember you! I already told you that you may only complete this quest once."; + close; +} diff --git a/npc/quests/custom/elvenear.txt b/npc/quests/custom/elvenear.txt new file mode 100644 index 000000000..16d3a75d0 --- /dev/null +++ b/npc/quests/custom/elvenear.txt @@ -0,0 +1,71 @@ +//===== eAthena Script ======================================= +//= Daily Job Quest For Elven Ears +//===== By: ================================================== +//= Someone +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Elven Ears (require 75+ Base Level) +//===== Additional Comments: ================================= +//= Optimized [Lupus], 1.1 misc fix +//============================================================ + +geffen.gat,127,49,5 script Elven Ears Quest 84,{ + mes "[Elven Ears Quest]"; + mes "Hi, today's quest is...."; + mes "Ah, the ^61B031Elven Ears ^000000Quest!"; + next; + menu "Requirements",L_Bl, "Make Item",-, "Cancel",L_Cancel; + + mes "[Elven Ears quest]"; + mes "Good good, let me just check"; + if(countitem(2213)<1)goto L_NoMake; + if(countitem(1040)<20)goto L_NoMake; + if (countitem(919)<20) goto L_NoMake; + next; + + mes "[Elven Ears quest]"; + mes "Give me a second....."; + next; + + delitem 2213,1; + delitem 1040,20; + delitem 919,20; + getitem 2286,1; + + mes "[Elven Ears Quest]"; + mes "Ok done!"; + close; + +L_NoMake: + mes "[Elven Ears Quest]"; + mes "You don't have the requirements."; + mes "Please come back another time..."; + close; + +L_Bl: + mes "Ok all you have to do is collect:"; + mes "^362ED61 Kitty Band^000000"; + mes "^362ED620 Elder Pixie Mustaches^000000"; + mes "and ^362ED620 Animal Skin^000000"; + next; + + menu "Accept",-, "Leave",L_Leave; + + mes "When you are done, bring the items to me. Ok good luck finding those items."; + close; + +L_Leave: + mes "[Elven Ears quest]"; + mes "Maybe another time?"; + close; + +L_Cancel: + mes "[Elven Ears quest]"; + mes "Aw, what a shame"; + mes "Giving up already?"; + mes "Oh well maybe you will participate in tommorow's quest."; + close; +} diff --git a/npc/quests/custom/event_32_new_hats.txt b/npc/quests/custom/event_32_new_hats.txt new file mode 100644 index 000000000..9ef1ed9d7 --- /dev/null +++ b/npc/quests/custom/event_32_new_hats.txt @@ -0,0 +1,1278 @@ +//===== eAthena Script ======================================= +//= Quest For Slotted Sunglasses +//===== By: ================================================== +//= RedxSwordxHero +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= 4 brothers give you quests to get 32 new hats +//===== Additional Comments: ================================= +//= Event New Hats by RedxSwordxHero +//= Ported and improved with timers [Lupus] +//= Thanks to x[tsk],fixed all item requirments to iRO specs exept +//= for hats which cannot be made on the real server. [Lupus] +//============================================================ + + + +prontera.gat,140,172,5 script Zac 704,{ + mes "[Zac]"; + mes "I am the oldest and strongest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them."; + next; + mes "[Zac]"; + mes "I provide 8 hats and my brothers provides the other 24."; + next; + menu "Join",L1,"Information",L2,"Cancel",L3; +L1: + mes "[Zac]"; + mes "What hat do you want me to make?"; + next; + menu "Angel Helm",L1_1,"Apple Hat",L1_2,"Blue Bandana",L1_3,"Bongun Hat",L1_4,"Cake Hat",L1_5,"Candle Hat",L1_6,"Chef's Hat",L1_7,"Colored Egg Shell",L1_8; +L1_1: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2254) < 1)) goto L_ITEM_1; + if((countitem(2229) < 1)) goto L_ITEM_2; + if((countitem(7036) < 5)) goto L_ITEM_3; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Angel Helm for you right away. Please Wait a Moment."; + delitem 2254,1; + delitem 2229,1; + delitem 7036,5; + next; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Angel Helm^000000...! Please Take it!"; + getitem 5025,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1: + mes "[Zac]"; + mes "Oh dear, you need 1 Angel Hairband..."; + close; +L_ITEM_2: + mes "[Zac]"; + mes "Oh, dear. You need 1 Slotted Helm..."; + close; +L_ITEM_3: + mes "[Zac]"; + mes "Oh, dear. You need 5 Fangs of Garm..."; + close; +L1_2: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(748) < 1)) goto L_ITEM_1a; + if((countitem(512) < 300)) goto L_ITEM_2a; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Apple Hat for you right away. Please Wait a Moment."; + delitem 748,1; + delitem 512,300; + next; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Apple Hat^000000...! Please Take it!"; + getitem 5037,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1a: + mes "[Zac]"; + mes "Oh, dear. You need 1 Witherless Rose..."; + close; +L_ITEM_2a: + mes "[Zac]"; + mes "Oh, dear. You need 300 Apples..."; + close; +L1_3: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(7003) < 300)) goto L_ITEM_1b; + if((countitem(2211) < 1)) goto L_ITEM_2b; + if((countitem(978) < 1)) goto L_ITEM_3b; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Blue Bandana for you right away. Please Wait a Moment."; + next; + delitem 7003,300; + delitem 2211,1; + delitem 978,1; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Blue Bandana^000000...! Please Take it!"; + getitem 5052,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1b: + mes "[Zac]"; + mes "Oh, dear. You need 300 Anolian Skins..."; + close; +L_ITEM_2b: + mes "[Zac]"; + mes "Oh, dear. You need 1 Bandana..."; + close; +L_ITEM_3b: + mes "[Zac]"; + mes "Oh, dear. You need 1 Cobaltblue Dyestuff..."; + close; +L1_4: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(609) < 10)) goto L_ITEM_1c; + if((countitem(978) < 1)) goto L_ITEM_2c; + if((countitem(2264) < 1)) goto L_ITEM_3c; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Bongun Hat for you right away. Please Wait a Moment."; + next; + delitem 609,100; + delitem 978,1; + delitem 2264,1; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Bongun Hat^000000...! Please Take it!"; + getitem 5046,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1c: + mes "[Zac]"; + mes "Oh, dear. You need 10 Amulets..."; + close; +L_ITEM_2c: + mes "[Zac]"; + mes "Oh, dear. You need 1 Cobaltblue Dyestuff..."; + close; +L_ITEM_3c: + mes "[Zac]"; + mes "Oh, dear. You need 1 Munak Hat..."; + close; +L1_5: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(529) < 10)) goto L_ITEM_1d; + if((countitem(530) < 5)) goto L_ITEM_2d; + if((countitem(538) < 15)) goto L_ITEM_3d; + if((countitem(539) < 20)) goto L_ITEM_4d; + if((countitem(999) < 10)) goto L_ITEM_5d; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Cake Hat for you right away. Please Wait a Moment."; + next; + delitem 529,10; + delitem 530,5; + delitem 538,15; + delitem 539,20; + delitem 999,10; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Cake Hat^000000...! Please Take it!"; + getitem 5024,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1d: + mes "[Zac]"; + mes "Oh, dear. You need 10 Candys..."; + close; +L_ITEM_2d: + mes "[Zac]"; + mes "Oh, dear. You need 5 Candy Canes..."; + close; +L_ITEM_3d: + mes "[Zac]"; + mes "Oh, dear. You need 15 Well Baked Cookies..."; + close; +L_ITEM_4d: + mes "[Zac]"; + mes "Oh, dear. You need 20 Pieces of Cake..."; + close; +L_ITEM_5d: + mes "[Zac]"; + mes "Oh, dear. You need 10 Steels..."; + close; +L1_6: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2279) < 1)) goto L_ITEM_1e; + if((countitem(518) < 100)) goto L_ITEM_2e; + if((countitem(7035) < 50)) goto L_ITEM_3e; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Candle Hat for you right away. Please Wait a Moment."; + next; + delitem 2279,1; + delitem 518,100; + delitem 7035,50; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Candle Hat^000000...! Please Take it!"; + getitem 5028,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1e: + mes "[Zac]"; + mes "Oh, dear. You need 1 Bomb Wick..."; + close; +L_ITEM_2e: + mes "[Zac]"; + mes "Oh, dear. You need 100 Honeys..."; + close; +L_ITEM_3e: + mes "[Zac]"; + mes "Oh, dear. You need 50 MatchSticks..."; + close; +L1_7: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(539) < 120)) goto L_ITEM_1f; + if((countitem(1036) < 450)) goto L_ITEM_2f; + if((countitem(982) < 1)) goto L_ITEM_3f; + if((countitem(949) < 330)) goto L_ITEM_4f; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Chef's Hat for you right away. Please Wait a Moment."; + next; + delitem 539,120; + delitem 1036,450; + delitem 982,1; + delitem 949,330; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Chef's Hat^000000...! Please Take it!"; + getitem 5026,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1f: + mes "[Zac]"; + mes "Oh, dear. You need 120 Pieces of Cake..."; + close; +L_ITEM_2f: + mes "[Zac]"; + mes "Oh, dear. You need 450 Dragon Scales..."; + close; +L_ITEM_3f: + mes "[Zac]"; + mes "Oh, dear. You need 1 White Dyestuff..."; + close; +L_ITEM_4f: + mes "[Zac]"; + mes "Oh, dear. You need 330 Feathers..."; + close; +L1_8: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(5015) < 1)) goto L_ITEM_1g; + if((countitem(978) < 1)) goto L_ITEM_2g; + if((countitem(7030) < 50)) goto L_ITEM_3g; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Colored Egg Shell for you right away. Please Wait a Moment."; + next; + delitem 5015,1; + delitem 978,1; + delitem 7030,50; + mes "[Zac]"; + mes "Tah Dah! ^FF0000Colored Egg Shell^000000...! Please Take it!"; + getitem 5039,1; + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1g: + mes "[Zac]"; + mes "Oh, dear. You need 1 Egg Shell..."; + close; +L_ITEM_2g: + mes "[Zac]"; + mes "Oh, dear. You need 1 Cobaltblue Dyestuff..."; + close; +L_ITEM_3g: + mes "[Zac]"; + mes "Oh, dear. You need 50 Claws of Desert Wolf..."; + close; +L2: + mes "[Zac]"; + mes "Which hat materials do you wish to know?"; + next; + menu "Angel Helm",L2_1,"Apple Hat",L2_2,"Blue Bandana",L2_3,"Bongun Hat", L2_4,"Cake Hat",L2_5,"Candle Hat",L2_6,"Chef's Hat",L2_7,"Colored Egg Shell",L2_8; +L2_1: + mes "[Zac]"; + mes "You need 1 Angel Wing, 1 Slotted Helm and 5 Fangs of Garm for Angel Helm."; + close; +L2_2: + mes "[Zac]"; + mes "You need 1 Witherless Rose and 300 Apples for Apple Hat."; + close; +L2_3: + mes "[Zac]"; + mes "You need 300 Anolian Skins, 1 Bandana and 1 Cobaltblue Dyestuff for Blue Bandana."; + close; +L2_4: + mes "[Zac]"; + mes "You need 10 Amulets, 1 Cobaltblue Dyestuff and 1 Munak Hat for Bongun Hat."; + close; +L2_5: + mes "[Zac]"; + mes "You need 10 Candys, 5 Candy Canes, 15 Well Baked Cookies, 20 Pieces Of Cake and 10 Steels for Cake Hat."; + close; +L2_6: + mes "[Zac]"; + mes "You need 1 Bomb Wick, 100 Honeys and 50 Matchsticks for Candle Hat."; + close; +L2_7: + mes "[Zac]"; + mes "You need 120 Pieces of Cake, 450 Dragon Scales, 1 White Dyestuff and 330 Feathers for Chef's Hat."; + close; +L2_8: + mes "[Zac]"; + mes "You need 1 Egg Shell, 1 Cobaltblue Dyestuff and 50 Claws of Desert Wolf for Colored Egg Shell."; + close; +L3: + mes "[Zac]"; + mes "Stop by some other time with the right materials, so I can make the hats for you."; + close; +} + +prontera.gat,143,172,5 script Blac 732,{ + mes "[Blac]"; + mes "I am the youngest and sexiest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them."; + next; + mes "[Blac]"; + mes "I provide 8 hats and my brothers provides the other 24."; + next; + menu "Join",L1,"Information",L2,"Cancel",L3; +L1: + mes "[Blac]"; + mes "What hat do you want me to make?"; + next; + menu "Crescent Moon Hairpin",L1_9,"Cross Hairband",L1_10,"Deviruchi Hat",L1_11,"Dumpling Decoration",L1_12,"Fashion Sunglasses",L1_13,"HandkerChief",L1_14,"Magic Instructor's Hat",L1_15,"Heart Hairpin",L1_16; +L1_9: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(5041) < 1)) goto L_ITEM_1; + if((countitem(999) < 10)) goto L_ITEM_2; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Crescent Moon Hairpin for you right away. Please Wait a Moment."; + next; + delitem 5041,1; + delitem 999,10; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Crescent Moon Hairpin^000000...! Please Take it!"; + getitem 5048,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1: + mes "[Blac]"; + mes "Oh, dear. You need 1 Heart Hairpin..."; + close; +L_ITEM_2: + mes "[Blac]"; + mes "Oh, dear. You need 10 Steels..."; + close; +L1_10: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2608) < 1)) goto L_ITEM_1a; + if((countitem(7069) < 500)) goto L_ITEM_2a; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Cross Hairband for you right away. Please Wait a Moment."; + next; + delitem 2608,1; + delitem 7069,500; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Cross Hairband^000000...! Please Take it!"; + getitem 5036,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1a: + mes "[Blac]"; + mes "Oh, dear. You need 1 Rosary..."; + close; +L_ITEM_2a: + mes "[Blac]"; + mes "Oh, dear. You need 500 Destroyed Armors..."; + close; +L1_11: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(7048) < 40)) goto L_ITEM_1b; + if((countitem(1038) < 600)) goto L_ITEM_2b; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Deviruchi Hat for you right away. Please Wait a Moment."; + next; + delitem 7048,40; + delitem 1038,600; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Deviruchi Hat^000000...! Please Take it!"; + getitem 5038,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1b: + mes "[Blac]"; + mes "Oh, dear. You need 40 Talons of Griffin..."; + close; +L_ITEM_2b: + mes "[Blac]"; + mes "Oh, dear. You need 600 Little Evil Horns..."; + close; +L1_12: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(10007) < 1)) goto L_ITEM_1c; + if((countitem(968) < 50)) goto L_ITEM_2c; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Dumpling Decoration for you right away. Please Wait a Moment."; + next; + delitem 10007,1; + delitem 968,50; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Dumpling Decoration^000000...! Please Take it!"; + getitem 5042,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1c: + mes "[Blac]"; + mes "Oh, dear. You need 1 Silk Ribbon..."; + close; +L_ITEM_2c: + mes "[Blac]"; + mes "Oh, dear. You need 50 Heroic Emblems..."; + close; +L1_13: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2271) < 1)) goto L_ITEM_1d; + if((countitem(975) < 1)) goto L_ITEM_2d; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Fashion Sunglasses for you right away. Please Wait a Moment."; + next; + delitem 2271,1; + delitem 975,1; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Fashion Sunglasses^000000...! Please Take it!"; + getitem 5047,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1d: + mes "[Blac]"; + mes "Oh, dear. You need 1 Jack a Dandy..."; + close; +L_ITEM_2d: + mes "[Blac]"; + mes "Oh, dear. You need 1 Scarlet Dyestuff..."; + close; +L1_14: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(1059) < 150)) goto L_ITEM_1e; + if((countitem(978) < 1)) goto L_ITEM_2e; + if((countitem(907) < 100)) goto L_ITEM_3e; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Handkerchief for you right away. Please Wait a Moment."; + next; + delitem 1059,150; + delitem 978,1; + delitem 907,100; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Handkerchief^000000...! Please Take it!"; + getitem 5023,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1e: + mes "[Blac]"; + mes "Oh, dear. You need 150 Fabrics..."; + close; +L_ITEM_2e: + mes "[Blac]"; + mes "Oh, dear. You need 1 Cobaltblue Dyestuff..."; + close; +L_ITEM_3e: + mes "[Blac]"; + mes "Oh, dear. You need 100 Resins..."; + close; +L1_15: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2251) < 1)) goto L_ITEM_1f; + if((countitem(4052) < 1)) goto L_ITEM_2f; + if((countitem(1036) < 400)) goto L_ITEM_3f; + if((countitem(7001) < 50)) goto L_ITEM_4f; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Magic Instructor's Hat for you right away. Please Wait a Moment."; + next; + delitem 2251,1; + delitem 4052,1; + delitem 1036,400; + delitem 7001,50; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Magic Instructor's Hat^000000...! Please Take it!"; + getitem 5027,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1f: + mes "[Blac]"; + mes "Oh, dear. You need 1 Wizard's Hat..."; + close; +L_ITEM_2f: + mes "[Blac]"; + mes "Oh, dear. You need 1 Elder Willow Card..."; + close; +L_ITEM_3f: + mes "[Blac]"; + mes "Oh, dear. You need 400 Dragon Scales..."; + close; +L_ITEM_4f: + mes "[Blac]"; + mes "Oh, dear. You need 50 Mould Powders..."; + close; +L1_16: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(7013) < 1200)) goto L_ITEM_1g; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Heart Hairpin for you right away. Please Wait a Moment."; + next; + delitem 7013,1200; + mes "[Blac]"; + mes "Tah Dah! ^FF0000Heart Hairpin^000000...! Please Take it!"; + getitem 5041,1; + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1g: + mes "[Blac]"; + mes "Oh, dear. You need 1200 Coral Reef's..."; + close; +L2: + mes "[Blac]"; + mes "Which hat materials do you wish to know?"; + next; + menu "Crescent Moon Hairpin",L2_9,"Cross Hairband",L2_10,"Deviruchi Hat",L2_11,"Dumpling Decoration/Chun Li Hat",L2_12,"Fashion Sunglasses",L2_13,"HandkerChief",L2_14,"Magic Instructor's Hat",L2_15,"Heart Hairpin",L2_16; +L2_9: + mes "[Blac]"; + mes "You need 1 Heart Hairpin and 10 Steels for Crescent Moon Hairpin."; + close; +L2_10: + mes "[Blac]"; + mes "You need 1 Rosary and 500 Destroyed Armors for Cross Hairband."; + close; +L2_11: + mes "[Blac]"; + mes "You need 40 Talon's of Griffin and 600 Little Evil Horns for Deviruchi Hat."; + close; +L2_12: + mes "[Blac]"; + mes "You need 1 Silk Ribbon and 50 Heroic Emblems for Dumping Decoration."; + close; +L2_13: + mes "[Blac]"; + mes "You need 1 Jack a Dandy and 1 Scarlet Dyestuff for Fashion Sunglasses."; + close; +L2_14: + mes "[Blac]"; + mes "You need 150 Fabrics, 1 Cobaltblue Dyestuff and 100 Resins for Handkerchief."; + close; +L2_15: + mes "[Blac]"; + mes "You need 1 Wizard's Hat, 1 Elder Willow Card, 400 Dragon Scales and 50 Mould Powders for Magic Instructor's Hat."; + close; +L2_16: + mes "[Blac]"; + mes "You need 1200 Coral Reef's for Heart Hairpin."; + close; +L3: + mes "[Blac]"; + mes "Stop by some other time with the right materials, so I can make the hats for you."; + close; +} + +prontera.gat,141,172,5 script Jac 107,{ + mes "[Jac]"; + mes "I am the 2nd oldest and calmest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them."; + next; + mes "[Jac]"; + mes "I provide 8 hats and my brothers provides the other 24."; + next; + menu "Join",L1,"Information",L2,"Cancel",L3; +L1: + mes "[Jac]"; + mes "What hat do you want me to make?"; + next; + menu "Heart of Merchant",L1_17,"Innocence of Maiden",L1_18,"Kafra Band",L1_19,"Lightbulb Hairband",L1_20,"Magic Hat",L1_21,"Miner's Helm",L1_22,"Mysterious Apple Hat",L1_23,"Panda Hat",L1_24; +L1_17: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2233) < 1)) goto L_ITEM_1; + if((countitem(969) < 1)) goto L_ITEM_2; + if((countitem(949) < 80)) goto L_ITEM_3; + if((countitem(938) < 100)) goto L_ITEM_4; + if((countitem(999) < 20)) goto L_ITEM_5; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Heart of Merchant for you right away. Please Wait a Moment."; + next; + delitem 2233,1; + delitem 969,1; + delitem 949,80; + delitem 999,20; + delitem 938,800; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Heart of Merchant^000000...! Please Take it!"; + getitem 5021,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1: + mes "[Jac]"; + mes "Oh, dear. You need 1 Slotted Circlet..."; + close; +L_ITEM_2: + mes "[Jac]"; + mes "Oh, dear. You need 1 Gold..."; + close; +L_ITEM_3: + mes "[Jac]"; + mes "Oh, dear. You need 80 Feather..."; + close; +L_ITEM_4: + mes "[Jac]"; + mes "Oh, dear. You need 800 Sticky Muscus..."; + close; +L_ITEM_5: + mes "[Jac]"; + mes "Oh, dear. You need 20 Steels..."; + close; +L1_18: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(7047) < 100)) goto L_ITEM_1a; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Innocence of Maiden for you right away. Please Wait a Moment."; + next; + delitem 7047,100; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Innocence of Maiden^000000...! Please Take it!"; + getitem 5040,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1a: + mes "[Jac]"; + mes "Oh, dear. You need 100 Alice's Apron..."; + close; +L1_19: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(10007) < 1)) goto L_ITEM_1b; + if((countitem(10008) < 1)) goto L_ITEM_2b; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Kafra Band for you right away. Please Wait a Moment."; + next; + delitem 10007,1; + delitem 10009,1; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Kafra Band^000000...! Please Take it!"; + getitem 5020,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1b: + mes "[Jac]"; + mes "Oh, dear. You need 1 Silk Ribbon..."; + close; +L_ITEM_2b: + mes "[Jac]"; + mes "Oh, dear. You need 1 Wild Flower..."; + close; +L1_20: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2233) < 1)) goto L_ITEM_1c; + if((countitem(746) < 20)) goto L_ITEM_2c; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Lightbulb Hairband for you right away. Please Wait a Moment."; + next; + delitem 2233,1; + delitem 746,20; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Lightbulb Hairband^000000...! Please Take it!"; + getitem 5034,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1c: + mes "[Jac]"; + mes "Oh, dear. You need 1 Slotted Criclet..."; + close; +L_ITEM_2c: + mes "[Jac]"; + mes "Oh, dear. You need 20 Glass Bead..."; + close; +L1_21: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2252) < 1)) goto L_ITEM_1d; + if((countitem(943) < 1200)) goto L_ITEM_2d; + if((countitem(1054) < 450)) goto L_ITEM_3d; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Magic Hat for you right away. Please Wait a Moment."; + next; + delitem 2252,1; + delitem 943,1200; + delitem 1054,450; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Magic Hat^000000...! Please Take it!"; + getitem 5045,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1d: + mes "[Jac]"; + mes "Oh, dear. You need 1 Wizard's Hat..."; + close; +L_ITEM_2d: + mes "[Jac]"; + mes "Oh, dear. You need 1200 Solid Shells..."; + close; +L_ITEM_3d: + mes "[Jac]"; + mes "Oh, dear. You need 450 Ancient Lips..."; + close; +L1_22: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(5009) < 1)) goto L_ITEM_1e; + if((countitem(999) < 25)) goto L_ITEM_2e; + if((countitem(747) < 1)) goto L_ITEM_3e; + if((countitem(5028) < 1)) goto L_ITEM_4e; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Miner's Helm for you right away. Please Wait a Moment."; + next; + delitem 5009,1; + delitem 999,25; + delitem 747,1; + delitem 5028,1; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Miner's Helm^000000...! Please Take it!"; + getitem 5031,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1e: + mes "[Jac]"; + mes "Oh, dear. You need 1 Safety Helmet..."; + close; +L_ITEM_2e: + mes "[Jac]"; + mes "Oh, dear. You need 25 Steels..."; + close; +L_ITEM_3e: + mes "[Jac]"; + mes "Oh, dear. You need 1 Crystal Mirror..."; + close; +L_ITEM_4e: + mes "[Jac]"; + mes "Oh, dear. You need 1 Candle..."; + close; +L1_23: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(5037) < 1)) goto L_ITEM_1f; + if((countitem(7064) < 500)) goto L_ITEM_2f; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Mysterious Apple Hat for you right away. Please Wait a Moment."; + next; + delitem 5037,1; + delitem 7064,500; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Mysterious Apple Hat^000000...! Please Take it!"; + getitem 5050,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1f: + mes "[Jac]"; + mes "Oh, dear. You need 1 Apple Hat..."; + close; +L_ITEM_2f: + mes "[Jac]"; + mes "Oh, dear. You need 500 Wings of Dragonfly..."; + close; +L1_24: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(999) < 10)) goto L_ITEM_1g; + if((countitem(948) < 200)) goto L_ITEM_2g; + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Panda Hat for you right away. Please Wait a Moment."; + next; + delitem 999,10; + delitem 948,200; + mes "[Jac]"; + mes "Tah Dah! ^FF0000Panda Hat^000000...! Please Take it!"; + getitem 5030,1; + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1g: + mes "[Jac]"; + mes "Oh, dear. You need 10 Steels..."; + close; +L_ITEM_2g: + mes "[Jac]"; + mes "Oh, dear. You need 200 Bear Footskins..."; + close; +L2: + mes "[Jac]"; + mes "Which hat materials do you wish to know?"; + next; + menu "Heart of Merchant",L2_17,"Innocence of Maiden",L2_18,"Kafra Band",L2_19,"Lightbulb Hairband",L2_20,"Magic Hat",L2_21,"Miner's Helm",L2_22,"Mysterious Apple Hat",L2_23,"Panda Hat",L2_24; +L2_17: + mes "[Jac]"; + mes "You need 1 Slotted Circlet, 1 Gold Bar, 80 Feathers, 20 Steels and 800 Sticky Muscus for Heart of Merchant"; + close; +L2_18: + mes "[Jac]"; + mes "You need 100 Alice's Aprons for Innocence of Maiden."; + close; +L2_19: + mes "[Jac]"; + mes "You need 1 Silk Ribbon and 1 Wild Flower for Kafra Band."; + close; +L2_20: + mes "[Jac]"; + mes "You need 1 Slotted Circlet and 20 Glass Beads for Lightbulb Hairband."; + close; +L2_21: + mes "[Jac]"; + mes "You need 1 Wizard's Hat, 1200 Solid Shells and 450 Ancient Lips for Magic Hat."; + close; +L2_22: + mes "[Jac]"; + mes "You need 1 Safety Helmet, 25 Steels, 1 Crystal Mirror and 1 Candle for Miner's Helm."; + close; +L2_23: + mes "[Jac]"; + mes "You need 1 Apple Hat and 500 Wings of Dragonfly for Mysterious Apple Hat."; + close; +L2_24: + mes "[Jac]"; + mes "You need 10 Steels and 200 Bear Footskins for Panda Hat."; + close; +L3: + mes "[Jac]"; + mes "Stop by some other time with the right materials, so I can make the hats for you."; + close; +} + +prontera.gat,142,172,5 script Pac 705,{ + mes "[Pac]"; + mes "I am 3rd oldest and wisest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat so I can make them."; + next; + mes "[Pac]"; + mes "I provide 8 hats and my brothers provides the other 24."; + next; + menu "Join",L1,"Information",L2,"Cancel",L3; +L1: + mes "[Pac]"; + mes "What hat do you want me to make?"; + next; + menu "Phantom of the Opera",L1_25,"Poring Hat",L1_26,"Smokie Hat",L1_27,"Solar God Helm",L1_28,"Sphinx Hat",L1_29,"Spore Hat",L1_30,"Striped Bandana",L1_31,"Sunday Hat",L1_32; +L1_25: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2281) < 1)) goto L_ITEM_1; + if((countitem(1048) < 50)) goto L_ITEM_2; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Phantom of the Opera for you right away. Please Wait a Moment."; + next; + delitem 2281,1; + delitem 1048,50; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Phatom of the Opera^000000...! Please Take it!"; + getitem 5043,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1: + mes "[Pac]"; + mes "Oh, dear. You need 1 Opera Mask..."; + close; +L_ITEM_2: + mes "[Pac]"; + mes "Oh, dear. You need 50 Horrendous Hairs..."; + close; +L1_26: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(741) < 1)) goto L_ITEM_1a; + if((countitem(909) < 300)) goto L_ITEM_2a; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Poring Hat for you right away. Please Wait a Moment."; + next; + delitem 741,1; + delitem 909,300; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Poring Hat^000000...! Please Take it!"; + getitem 5035,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1a: + mes "[Pac]"; + mes "Oh, dear. You need 1 Poring Doll..."; + close; +L_ITEM_2a: + mes "[Pac]"; + mes "Oh, dear. You need 300 Jellopys..."; + close; +L1_27: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2213) < 1)) goto L_ITEM_1b; + if((countitem(1036) < 20)) goto L_ITEM_2b; + if((countitem(7012) < 200)) goto L_ITEM_3b; + if((countitem(7065) < 300)) goto L_ITEM_4b; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Smokie Hat for you right away. Please Wait a Moment."; + next; + delitem 2213,1; + delitem 1036,20; + delitem 7012,200; + delitem 7065,300; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Smokie Hat^000000...! Please Take it!"; + getitem 5033,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1b: + mes "[Pac]"; + mes "Oh, dear. You need 1 Kitty Band..."; + close; +L_ITEM_2b: + mes "[Pac]"; + mes "Oh, dear. You need 20 Dragon Scales..."; + close; +L_ITEM_3b: + mes "[Pac]"; + mes "Oh, dear. You need 200 Tough Scalelike Stems..."; + close; +L_ITEM_4b: + mes "[Pac]"; + mes "Oh, dear. You need 300 Fur's of Sea Otter..."; + close; +L1_28: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(7086) < 1)) goto L_ITEM_1c; + if((countitem(999) < 40)) goto L_ITEM_2c; + if((countitem(984) < 2)) goto L_ITEM_3c; + if((countitem(969) < 10)) goto L_ITEM_4c; + if((countitem(1003) < 50)) goto L_ITEM_5c; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Solar God Helm for you right away. Please Wait a Moment."; + next; + delitem 7086,1; + delitem 999,40; + delitem 984,2; + delitem 969,10; + delitem 1003,50; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Solar God Helm^000000...! Please Take it!"; + getitem 5022,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1c: + mes "[Pac]"; + mes "Oh, dear. You need 1 Emblem of the Sun God..."; + close; +L_ITEM_2c: + mes "[Pac]"; + mes "Oh, dear. You need 40 Steels..."; + close; +L_ITEM_3c: + mes "[Pac]"; + mes "Oh, dear. You need 2 Oridecons..."; + close; +L_ITEM_4c: + mes "[Pac]"; + mes "Oh, dear. You need 10 Gold Bar's..."; + close; +L_ITEM_5c: + mes "[Pac]"; + mes "Oh, dear. You need 50 Coals..."; + close; +L1_29: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(999) < 25)) goto L_ITEM_1d; + if((countitem(979) < 1)) goto L_ITEM_2d; + if((countitem(976) < 1)) goto L_ITEM_3d; + if((countitem(1059) < 150)) goto L_ITEM_4d; + if((countitem(969) < 2)) goto L_ITEM_5d; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Sphinx Hat for you right away. Please Wait a Moment."; + next; + delitem 999,1; + delitem 979,1; + delitem 976,1; + delitem 1059,150; + delitem 969,2; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Sphinx Hat^000000...! Please Take it!"; + getitem 5053,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1d: + mes "[Pac]"; + mes "Oh, dear. You need 25 Steels..."; + close; +L_ITEM_2d: + mes "[Pac]"; + mes "Oh, dear. You need 1 DarkGreen Dyestuff..."; + close; +L_ITEM_3d: + mes "[Pac]"; + mes "Oh, dear. You need 1 Lemon Dyestuff..."; + close; +L_ITEM_4d: + mes "[Pac]"; + mes "Oh, dear. You need 150 Fabric..."; + close; +L_ITEM_5d: + mes "[Pac]"; + mes "Oh, dear. You need 2 Gold Bar's..."; + close; +L1_30: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(7033) < 850)) goto L_ITEM_1e; + if((countitem(7068) < 300)) goto L_ITEM_2e; + if((countitem(1015) < 1)) goto L_ITEM_3e; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Spore Hat for you right away. Please Wait a Moment."; + next; + delitem 7033,850; + delitem 7068,300; + delitem 1015,1; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Spore Hat^000000...! Please Take it!"; + getitem 5029,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1e: + mes "[Pac]"; + mes "Oh, dear. You need 850 Poison Spores..."; + close; +L_ITEM_2e: + mes "[Pac]"; + mes "Oh, dear. You need 300 Half Burnt Logs..."; + close; +L_ITEM_3e: + mes "[Pac]"; + mes "Oh, dear. You need 1 Tongue..."; + close; +L1_31: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(1099) < 1500)) goto L_ITEM_1f; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Striped Bandana for you right away. Please Wait a Moment."; + next; + delitem 1099,1500; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Striped Bandana^000000...! Please Take it!"; + getitem 5049,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1f: + mes "[Pac]"; + mes "Oh, dear. You need 1500 Worn-out Prisoner Uniforms..."; + close; +L1_32: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2221) < 1)) goto L_ITEM_1g; + if((countitem(2227) < 1)) goto L_ITEM_2g; + if((countitem(1059) < 250)) goto L_ITEM_3g; + if((countitem(7063) < 600)) goto L_ITEM_4g; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Sunday Hat for you right away. Please Wait a Moment."; + next; + delitem 2221,1; + delitem 2227,1; + delitem 1059,250; + delitem 7063,600; + mes "[Pac]"; + mes "Tah Dah! ^FF0000Sunday Hat^000000...! Please Take it!"; + getitem 5032,1; + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more. Thank you."; + close; +L_ITEM_1g: + mes "[Pac]"; + mes "Oh, dear. You need 1 Slotted Hat..."; + close; +L_ITEM_2g: + mes "[Pac]"; + mes "Oh, dear. You need 1 Slotted Cap..."; + close; +L_ITEM_3g: + mes "[Pac]"; + mes "Oh, dear. You need 250 Fabrics..."; + close; +L_ITEM_4g: + mes "[Pac]"; + mes "Oh, dear. You need 600 Soft Feathers..."; + close; +L2: + mes "[Pac]"; + mes "Which hat materials do you wish to know?"; + next; + menu "Phantom of the Opera",L2_25,"Poring Hat",L2_26,"Smokie Hat",L2_27,"Solar God Helm",L2_28,"Sphinx Hat",L2_29,"Spore Hat",L2_30,"Striped Bandana",L2_31,"Sunday Hat",L2_32; +L2_25: + mes "[Pac]"; + mes "You need 1 Opera Mask and 50 Horrendous Hairs for Phantom of the Opera."; + close; +L2_26: + mes "[Pac]"; + mes "You need 1 Poring Doll and 300 Jellopys for Poring Hat."; + close; +L2_27: + mes "[Pac]"; + mes "You need 1 Kitty Band, 20 Dragon Scale, 200 Tough Scalelike Stem and 300 Fur's of Sea Otter for Smokie Hat."; + close; +L2_28: + mes "[Pac]"; + mes "You need 1 Emblem of the Sun God, 40 Steels, 2 Oridecons, 10 Gold Bar's and 50 Coals for Solar God Helm."; + close; +L2_29: + mes "[Pac]"; + mes "You need 25 Steels, 1 DarkGreen Dyestuff, 1 Lemon Dyestuff, 150 Fabric and 2 Gold Bar's for Sphinx Hat."; + close; +L2_30: + mes "[Pac]"; + mes "You need 850 Poison Spores, 300 Half Burnt Logs and 1 Tongue for Spore Hat."; + close; +L2_31: + mes "[Pac]"; + mes "You need 1500 Worn-out Prisoner Uniforms for Striped Bandana."; + close; +L2_32: + mes "[Pac]"; + mes "You need 1 Slotted Hat, 1 Slotted Cap, 250 Fabrics and 600 Soft Feathers for Sunday Hat."; + close; +L3: + mes "[Pac]"; + mes "Stop by some other time with the right materials, so I can make the hats for you."; + close; +} + + +//these scripts make our brothers to appear and disappear in order +- script EDZac -1,{ +OnInit: +OnMinute15: + disablenpc "Zac"; + end; +OnMinute01: + enablenpc "Zac"; + end; +} + +- script EDJac -1,{ +OnInit: +OnMinute30: + disablenpc "Jac"; + end; +OnMinute16: + enablenpc "Jac"; + end; +} + +- script EDPac -1,{ +OnInit: +OnMinute45: + disablenpc "Pac"; + end; +OnMinute31: + enablenpc "Pac"; + end; +} + +- script EDBlac -1,{ +OnInit: +OnMinute00: + disablenpc "Blac"; + end; +OnMinute46: + enablenpc "Blac"; + end; +} diff --git a/npc/quests/custom/excalibur.txt b/npc/quests/custom/excalibur.txt new file mode 100644 index 000000000..77db880ec --- /dev/null +++ b/npc/quests/custom/excalibur.txt @@ -0,0 +1,68 @@ +// Excalibur Quest NPC +// By: Syrus22 +// Version 1.0 +// Any comments or questions PM me on the Yare forums +// Description: This is a simple item quest NPC. The player must find an +// Angel Band, a Heaven Ring, and an Emperium. If they do they will receive +// the Excalibur. +prt_castle.gat,81,171,5 script Mysterious King 108,{ +mes "[Excalibur Quest Rep]"; +mes "Hello Adventurer."; +mes "I'm glad to announce that we are sponsoring a hunt for the legendary sword, Excalibur. Or more appropriately a hunt for certain rare items that can be traded in for the legendary sword."; +next; +goto ExMenu; + ExMenu: + menu "Required Items",ExItems,"Create Excalibur",ExCreate,"End",ExEnd; + + ExItems: + mes "[Excalibur Quest Rep]"; + mes "You need the following items to create the Excalibur."; + mes "Angel Band"; + mes "Heaven Ring"; + mes "Emperium"; + next; + goto ExMenu; + + ExCreate: + mes "[Excalibur Quest Rep]"; + mes "Let me check your inventory!"; + next; + if(countitem(2254)<1) goto NoAngel; + if(countitem(2282)<1) goto NoHeaven; + if(countitem(714)<1) goto NoEmp; + goto ExGive; + + NoAngel: + mes "[Excalibur Quest Rep]"; + mes "Sorry but you must have at least 1 Angel Band."; + mes "Come back after you get ALL the items."; + close; + + NoHeaven: + mes "[Excalibur Quest Rep]"; + mes "Sorry but you must have at least 1 Heaven Ring."; + mes "Come back after you get ALL the items."; + close; + + NoEmp: + mes "[Excalibur Quest Rep]"; + mes "Sorry but you must have at least 1 Emperium."; + mes "Come back after you get ALL the items."; + close; + + ExGive: + mes "[Excalibur Quest Rep]"; + mes "Congratulations. You have collected all necessary items. I give to you the Excalibur!!!"; + delitem 2254,1; + delitem 2282,1; + delitem 714,1; + getitem 1137,1; + mes "Thank you for your participation!"; + close; + + ExEnd: + mes "[Excalibur Quest Rep]"; + mes "Good bye then. Hope you try the quest!"; + close; +close; } +} diff --git a/npc/quests/custom/ironcane.txt b/npc/quests/custom/ironcane.txt new file mode 100644 index 000000000..a3a08c40f --- /dev/null +++ b/npc/quests/custom/ironcane.txt @@ -0,0 +1,52 @@ +//===== eAthena Script ======================================= +//= Quest For Iron Cain +//===== By: ================================================== +//= Dev Team +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Iron Cain (lower part of a full helmet) +//===== Additional Comments: ================================= +//= +//============================================================ + +payon.gat,109,118,5 script Iron Cain Quest 76,{ + mes "[Iron Cain Quest]"; + mes "Here's what you need"; + mes "The requirements, should you be brave enough to collect them, are:"; + mes "- 200 Orcish vouchers"; + mes "- 1 Heroic Emblem"; + next; + mes "[Iron Cain Quest]"; + mes ". . . . . ."; + mes "Are you ready for me to make this special item?"; + next; + menu "Sure am!",-, "The requirements are unfathomable!",L_Unfathomable; + + mes "[Iron Cain Quest]"; + if((countitem(931) < 200) || (countitem(968) < 1)) goto L_NotEnough; + mes ". . . . ."; + mes "Wow! You are brave indeed!"; + delitem 931,200; + delitem 968,1; + next; + mes "[Iron Cain Quest]"; + mes ". . . . ."; + mes "Enjoy!"; + getitem 2266,1; + close; + +L_NotEnough: + mes ". . .I'm sorry. You don't have enough money and items."; + mes "I can't afford to make this if you don't bring all materials needed."; + mes "Please understand this is to benefit heroes such as yourself!"; + close; + +L_Unfathomable: + mes ". . . . ."; + mes "What I had to go through was more unfathomable.."; + mes "If you succeed in getting these items, you will have incredible strength!"; + close; +} diff --git a/npc/quests/custom/kaho_balmung.txt b/npc/quests/custom/kaho_balmung.txt new file mode 100644 index 000000000..d10fc038b --- /dev/null +++ b/npc/quests/custom/kaho_balmung.txt @@ -0,0 +1,97 @@ +// $Id: kaho_balmung.txt,v 1.1.1.1 2004/09/10 17:26:46 MagicalTux Exp $ +//-------------------- 'Balmung & Lord Kaho's Horns' Quest -------------------- + +prontera.gat,158,356,4 script Royal Messenger 105,{ + mes "[Royal Messenger]"; + mes "Welcome to prontera, i am the Royal Messenger in charge of the royal quest."; + next; + menu "Listen",Lok,"No",Lend; +Lok: + mes "[Royal Messenger]"; + mes "There are too quests please chose the one you must like."; + next; + menu "Balmung",Lb,"Lord Kahos horns",Lkahos,"No",Lend; +Lb: + mes "[Royal Messenger]"; + mes "The Balmung quest consist of the next items:"; + mes "120 Steel"; + mes "10 Oridecon"; + mes "10 Rough Wind"; + mes "10 Flame Heart"; + mes "10 Mystic Frozen"; + mes "10 Great Nature"; + mes "1,000,000z"; + next; + if(countitem(999)<120) goto Lend2; + if(countitem(984)<10) goto Lend2; + if(countitem(996)<10) goto Lend2; + if(countitem(994)<10) goto Lend2; + if(countitem(995)<10) goto Lend2; + if(countitem(997)<10) goto Lend2; + if(Zeny<1000000) goto NoGold; + goto Lget; + mes "[Royal Messenger]"; + mes "Happy item hunting and good luck"; + close; +Lkahos: + mes "[Royal Messenger]"; + mes "The Lord Kahos horns quest consists of the next items:"; + mes "1 Green Feelers"; + mes "10 Star Dust"; + mes "10 Rough Wind"; + mes "10 Flame Heart"; + mes "10 Mystic Frozen"; + mes "10 Great Nature"; + mes "1,000,000z"; + next; + if(countitem(2298)<1) goto Lend2; + if(countitem(1001)<10) goto Lend2; + if(countitem(996)<10) goto Lend2; + if(countitem(994)<10) goto Lend2; + if(countitem(995)<10) goto Lend2; + if(countitem(997)<10) goto Lend2; + if(Zeny<1000000) goto NoGold; + goto Lget1; + mes "[Royal Messenger]"; + mes"Happy item hunting and good luck"; + close; +Lend: + mes "[Royal Messenger]"; + mes "Have a nice day."; + close; +Lend2: + mes "[Royal Messenger]"; + mes "Sorry you dont have all the items i need."; + mes "comeback when you have them all"; + close; +NoGold: + mes "[Royal Messenger]"; + mes "Sorry you dont have enought gold"; + close; +Lget: + delitem 999,120; + delitem 984,10; + delitem 996,10; + delitem 994,10; + delitem 995,10; + delitem 997,10; + set Zeny,Zeny-1000000; + mes "[Royal Messenger]"; + mes "I see you already have all the items you need."; + mes "nice work."; + getitem 1161,1; + close; +Lget1: + delitem 2298,1; + delitem 1001,10; + delitem 996,10; + delitem 994,10; + delitem 995,10; + delitem 997,10; + set Zeny,Zeny-1000000; + mes "[Royal Messenger]"; + mes "I see you already have all the items you need."; + mes "nice work."; + getitem 5013,1; + close; } + diff --git a/npc/quests/custom/kahohorn.txt b/npc/quests/custom/kahohorn.txt new file mode 100644 index 000000000..84ed22300 --- /dev/null +++ b/npc/quests/custom/kahohorn.txt @@ -0,0 +1,79 @@ +geffen.gat,115,107,5 script Lord Kaho's Servant 61,{ + mes "[Lord Kaho's Servant]"; + mes "I worked myself to death trying to fulfill Lord Kaho's ridiculous expectations for a headgear!"; + mes "Now that I've finally found the formula for the perfect headgear, I'm willing to share my time and talents"; + next; + mes "You need the following to get the Kaho horns!"; + mes "3 emperiums"; + mes "Oh yea... i also forgot to mention these X_X"; + next; + mes "1 Skull - From Dark Lord"; + mes "1 Heroic Emblem - From Orc Hero"; + mes "1 Evil Horn - From Baphomet"; + mes "1 Red Frame - From Doppelganger"; + mes "1 Smoking Pipe - From Eddga"; + mes "1 Fang of Garm - From Garm"; + mes "1 Mother's Nightmare - From Maya"; + mes "1 Sphynx Hat - from Osiris"; + mes "1 Diamond Ring - from Mistress"; + next; + mes "Were' not done yet sweety..."; + mes "Im a big fan of dolls, so you need to bring me these cuties"; + mes "1 Poring Doll - a Poring drop"; + mes "1 Chonchon Doll - a Chonchon Drop"; + mes "1 Baphomet Doll - a Baphomet drop"; + mes "1 Osiris Doll - an Osiris drop"; + mes "1 Rocker Doll - a Rocker drop"; + mes "1 Apez Fanitem Doll - a Yoyo drop"; + mes "1 Racoon Doll - a Smokie drop"; + next; + mes "Finally, i worked hard to make these horns for my master with all the mentioned items above..."; + mes "Please include 5 million zeny for my efforts."; + next; + mes "[Lord Kaho's Servant]"; + mes ". . . . . ."; + mes "Are you ready for me to make this special item?"; + next; + menu "Sure am!",LSureAm,"These requirements are unfathomable!",LUnfathomable; + + LSureAm: + mes "[Lord Kaho's Servant]"; + if((countitem(754) < 1) || (countitem(753) < 1) || (countitem(752) < 1) || (countitem(751) < 1) || (countitem(750) < 1) || (countitem(743) < 1) || (countitem(742) < 1) || (countitem(741) < 1) || (countitem(2613) < 1) || (countitem(5053) < 1) || (countitem(7020) < 1) || (countitem(7036) < 1) || (countitem(2268) < 1) || (countitem(734) < 1) || (countitem(923) < 1) || (countitem(968) < 1) || (countitem(7005) < 1) || (countitem(714) < 3) || (Zeny < 5000000)) goto LNotEnough; + mes ". . . . ."; + delitem 754,1; + delitem 753,1; + delitem 752,1; + delitem 751,1; + delitem 750,1; + delitem 743,1; + delitem 742,1; + delitem 741,1; + delitem 2613,1; + delitem 5053,1; + delitem 7020,1; + delitem 7036,1; + delitem 2268,1; + delitem 734,1; + delitem 923,1; + delitem 968,1; + delitem 7005,1; + delitem 714,3; + set Zeny,Zeny-5000000; + mes "Wow! You are brave indeed!"; + getitem 5013,1; + mes ". . . . ."; + mes "Enjoy being God of Rune Midgard!"; + close; + + LNotEnough: + mes ". . . . ."; + mes ". . .I'm sorry .. You don't have enough money and items .."; + mes "I can't afford to make this if you don't bring all materials needed. Please understand this is to benefit heroes such as yourself!"; + close; + + LUnfathomable: + mes ". . . . ."; + mes "What I had to go through was more unfathomable.."; + mes "If you succeed in getting these items, you will have incredible strength!"; + close; +} diff --git a/npc/quests/custom/new_hats.txt b/npc/quests/custom/new_hats.txt new file mode 100644 index 000000000..a1d6780bf --- /dev/null +++ b/npc/quests/custom/new_hats.txt @@ -0,0 +1,1469 @@ +//===== eAthena Script ======================================= +//= The 32 New Hats +//===== By: ================================================== +//= Darkchild +//===== Current Version: ===================================== +//= 1.4 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= 4 brothers give you quests to get 32 new hats +//===== Additional Comments: ================================= +//= There are 2 scripts for these 32 'new' hats. +//= The other one doesnt have all the new ones and has some old ones +//= Advise to use this script +//= 1.2 revision +//= 1.3 fixed bug where npcs would give out free items [Shinigami] +//= 1.4 fixed amount of Fish Tail (300 -> 30), Zeny bugs in Ear of Angel, +//= Ear of Demon,Big Golden Bell, Mistress Crown, +//= Crown of The Ancient Queen, Indian Headband, Orc Hero Helm [Lupus] +//============================================================ +prontera.gat,140,172,5 script Zac 704,{ + mes "[Zac]"; + mes "I am the oldest and strongest of the 4 brothers that makes all the newer hats."; + mes "You will need to bring me the correct items for each hat so I can make them."; + mes "I provide 8 hats and my brothers provides the other 24."; + mes "What hat do you want me to make?"; + next; + menu "Attitude Campus Hat",L1_1,"Fox Mask",L1_2,"X Cross Hairpin",L1_3,"Flower Hair Pin",L1_4,"Tulip Hair Pin",L1_5,"Mushroom Hairband",L1_6,"Troublesome Raccoon Doll",L1_7,"Blue Fish",L1_8; + L1_1: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if((countitem(2285)<1) && (countitem(1550)<1)) goto L_ITEM_1;//Items: Apple o' Archer, Book, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Attitude Campus Hat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2285,1;//Items: Apple o' Archer, + delitem 1550,1;//Items: Book, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Attitude Campus Hat^000000...! Please Take it!"; + getitem 5073,1;//Items: Campus Hat, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_1: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Attitude Campus Hat requires~~"; + next; + mes "[Zac]"; + mes "1 Apple o' Archer"; + mes "1 Book"; + mes "...Did you know this already?"; + close; + L1_2: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(1022)<999) goto L_ITEM_2;//Items: Nine Tails, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Fox Mask for you right away."; + mes "Please Wait a Moment."; + next; + delitem 1022,999;//Items: Nine Tails, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Fox Mask^000000...! Please Take it!"; + getitem 5069,1;//Items: Fox Mask, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_2: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Fox Mask requires~~"; + next; + mes "[Zac]"; + mes "999 Nine Tails"; + mes "...Did you know this already?"; + close; + L1_3: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(10011)<1) goto L_ITEM_3;//Items: Stellar Hairpin, + if(countitem(2266)<1) goto L_ITEM_3;//Items: Iron Cain, + if(countitem(909)<100) goto L_ITEM_3;//Items: Jellopy, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the X Cross Hairpin for you right away."; + mes "Please Wait a Moment."; + next; + delitem 10011,1;//Items: Stellar Hairpin, + delitem 2266,1;//Items: Iron Cain, + delitem 909,100;//Items: Jellopy, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000X Cross Hairpin^000000...! Please Take it!"; + getitem 5079,1;//Items: X Hairpin, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_3: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "X Cross Hairpin requires~~"; + next; + mes "[Zac]"; + mes "1 Stellar Hairpin"; + mes "1 Iron Cain"; + mes "100 Jellopy"; + mes "...Did you know this already?"; + close; + L1_4: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2270)<1) goto L_ITEM_4;//Items: Centimental Leaf, + if(countitem(999)<10) goto L_ITEM_4;//Items: Steel, + if(Zeny < 20000) goto L_ITEM_4; + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Flower Hair Pin for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2270,1;//Items: Centimental Leaf, + delitem 999,10;//Items: Steel, + set Zeny,Zeny-20000; + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Flower Hair Pin^000000...! Please Take it!"; + getitem 5061,1;//Items: Flower Hairpin, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_4: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Flower Hair Pin requires~~"; + next; + mes "[Zac]"; + mes "1 Romantic Leaf"; + mes "10 Steel"; + mes "20,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_5: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2278)<1) goto L_ITEM_5;//Items: Mr. Smile, + if(countitem(980)<1) goto L_ITEM_5;//Items: Orange Dyestuff, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Tulip Hair Pin for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2278,1;//Items: Mr. Smile, + delitem 980,1;//Items: Orange Dyestuff, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Tulip Hair Pin^000000...! Please Take it!"; + getitem 5077,1;//Items: Tulip Hairpin, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_5: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Tulip Hair Pin requires~~"; + next; + mes "[Zac]"; + mes "1 Mr. Smile"; + mes "1 Orange Dyestuffs"; + mes "...Did you know this already?"; + close; + L1_6: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(921)<300) goto L_ITEM_6;//Items: Mushroom Spore, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Mushroom Hairband for you right away."; + mes "Please Wait a Moment."; + next; + delitem 921,300;//Items: Mushroom Spore, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Mushroom Hairband^000000...! Please Take it!"; + getitem 5082,1;//Items: Mushroom Hairband, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_6: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Mushroom Hairband requires~~"; + next; + mes "[Zac]"; + mes "300 Mushroom Spores"; + mes "...Did you know this already?"; + close; + L1_7: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(1026)<100) goto L_ITEM_7;//Items: Acorn, + if(countitem(7065)<100) goto L_ITEM_7;//Items: Sea Otter Fur, + if(countitem(945)<100) goto L_ITEM_7;//Items: Raccoon Leaf, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Troublesome Raccoon Doll for you right away."; + mes "Please Wait a Moment."; + next; + delitem 1026,100;//Items: Acorn, + delitem 7065,100;//Items: Sea Otter Fur, + delitem 945,100;//Items: Raccoon Leaf, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Troublesome Raccoon Doll^000000...! Please Take it!"; + getitem 5084,1;//Items: Lazy Racoon Hat, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_7: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Troublesome Raccoon Doll requires~~"; + next; + mes "[Zac]"; + mes "100 Acorn"; + mes "100 Sea Otter Fur"; + mes "100 Raccoon Leaf"; + mes "...Did you know this already?"; + close; + L1_8: + mes "[Zac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(624)<2) goto L_ITEM_8;//Items: Rotten Fish, + if(countitem(959)<300) goto L_ITEM_8;//Items: Stinky Scale, + if(countitem(1023)<30) goto L_ITEM_8;//Items: Fish Tail, + if(countitem(938)<100) goto L_ITEM_8;//Items: Sticky Mucus, + mes "[Zac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Blue Fish for you right away."; + mes "Please Wait a Moment."; + next; + delitem 624,2;//Items: Rotten Fish, + delitem 959,300;//Items: Stinky Scale, + delitem 1023,30;//Items: Fish Tail, + delitem 938,100;//Items: Sticky Mucus, + mes "[Zac]"; + mes "Tah Dah!!!^FF0000Blue Fish^000000...! Please Take it!"; + getitem 5065,1;//Items: Fresh Blueish Fish, + next; + mes "[Zac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_8: + mes "[Zac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Zac]"; + mes "Blue Fish requires~~"; + next; + mes "[Zac]"; + mes "2 Rotten Fish"; + mes "300 Rotten Scale"; + mes "30 Fish Tail"; + mes "100 Sticky Mucus"; + mes "...Did you know this already?"; + close; +} + + +prontera.gat,141,172,5 script Jac 107,{ + mes "[Jac]"; + mes "I am the 2nd oldest and calmest of the 4 brothers that makes all the newer hats."; + mes "You will need to bring me the correct items for each hat so I can make them."; + mes "I provide 8 hats and my brothers provides the other 24."; + mes "What hat do you want me to make?"; + next; + menu "Drooped Cat",L1_9,"Leaf of Transformation",L1_10,"Bear Pebble Hat",L1_11,"Sea Otter Hat",L1_12,"Sleepy Hat",L1_13,"Straw Hat",L1_14,"Cowboy Hat",L1_15,"Sombrero",L1_16; + L1_9: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2233)<1) goto L_ITEM_9;//Items: Circlet, + if(countitem(983)<1) goto L_ITEM_9;//Items: Black Dyestuff, + if(countitem(740)<1) goto L_ITEM_9;//Items: Puppet, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Drooped Cat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2233,1;//Items: Circlet, + delitem 983,1;//Items: Black Dyestuff, + delitem 740,1;//Items: Puppet, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Drooped Cat^000000...! Please Take it!"; + getitem 5058,1;//Items: Resting Cat, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_9: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Drooped Cat requires~~"; + next; + mes "[Jac]"; + mes "1 Slotted Circlet"; + mes "1 Black Dyestuffs"; + mes "1 Puppet"; + mes "...Did you know this already?"; + close; + L1_10: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(945)<600) goto L_ITEM_10;//Items: Raccoon Leaf, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Leaf of Transformation for you right away."; + mes "Please Wait a Moment."; + next; + delitem 945,600;//Items: Raccoon Leaf, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Leaf of Transformation^000000...! Please Take it!"; + getitem 5064,1;//Items: Transformation Leaf, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_10: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Leaf of Transformation requires~~"; + next; + mes "[Jac]"; + mes "600 Raccoon Leaf"; + mes "...Did you know this already?"; + close; + L1_11: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(5030)<1) goto L_ITEM_11;//Items: Panda Hat, + if(countitem(952)<100) goto L_ITEM_11;//Items: Cactus Needle, + if(countitem(999)<20) goto L_ITEM_11;//Items: Steel, + if(countitem(948)<200) goto L_ITEM_11;//Items: Bears Footskin, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Bear Pebble Hat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 5030,1;//Items: Panda Hat, + delitem 952,100;//Items: Cactus Needle, + delitem 999,20;//Items: Steel, + delitem 948,200;//Items: Bears Footskin, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Bear Pebble Hat^000000...! Please Take it!"; + getitem 5059,1;//Items: Bear Hat, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_11: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Bear Pebble Hat requires~~"; + next; + mes "[Jac]"; + mes "1 Panda Hat"; + mes "100 Cactus Needle"; + mes "20 Steel"; + mes "200 Bear's Footskin"; + mes "...Did you know this already?"; + close; + L1_12: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(5084)<1) goto L_ITEM_12;//Items: Lazy Racoon Hat, + if(countitem(5064)<1) goto L_ITEM_12;//Items: Transformation Leaf, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Sea Otter Hat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 5084,1;//Items: Lazy Racoon Hat, + delitem 5064,1;//Items: Transformation Leaf, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Sea Otter Hat^000000...! Please Take it!"; + getitem 5078,1;//Items: Sea Otter Hat, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_12: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Sea Otter Hat requires~~"; + next; + mes "[Jac]"; + mes "1 Troublesome Raccoon Doll"; + mes "1 Leaf of Transformation"; + mes "...Did you know this already?"; + close; + L1_13: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2236)<1) goto L_ITEM_13;//Items: Santa's Hat, + if(countitem(7111)<200) goto L_ITEM_13;//Items: String Paper, + if(countitem(7112)<1) goto L_ITEM_13;//Items: Transparent Paper, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Sleepy Hat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2236,1;//Items: Santa's Hat, + delitem 7111,200;//Items: String Paper, + delitem 7112,1;//Items: Transparent Paper, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Sleepy Hat^000000...! Please Take it!"; + getitem 5060,1;//Items: Pointy Cap, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_13: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Sleepy Hat requires~~"; + next; + mes "[Jac]"; + mes "1 Santa Hat"; + mes "200 String Paper"; + mes "1 Transparent Paper"; + mes "...Did you know this already?"; + close; + L1_14: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(7012)<400) goto L_ITEM_14;//Items: Tough Scalelike Stem, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Straw Hat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 7012,400;//Items: Tough Scalelike Stem, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Straw Hat^000000...! Please Take it!"; + getitem 5062,1;//Items: Straw Hat, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_14: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Straw Hat requires~~"; + next; + mes "[Jac]"; + mes "400 Tough Scalelike Stem"; + mes "...Did you know this already?"; + close; + L1_15: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2248)<1) goto L_ITEM_15;//Items: Western Grace, + if(countitem(7030)<108) goto L_ITEM_15;//Items: Claw of Desert Wolf, + if(countitem(7100)<100) goto L_ITEM_15;//Items: Sharpened Leaf, + if(countitem(7120)<4) goto L_ITEM_15;//Items: Burning Horseshoe, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Cowboy Hat for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2248,1;//Items: Western Grace, + delitem 7030,108;//Items: Claw of Desert Wolf, + delitem 7100,100;//Items: Sharpened Leaf, + delitem 7120,4;//Items: Burning Horseshoe, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Cowboy Hat^000000...! Please Take it!"; + getitem 5075,1;//Items: Cowboy Hat, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_15: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Cowboy Hat requires~~"; + next; + mes "[Jac]"; + mes "1 Western Grace"; + mes "108 Claw of Desert Wolf"; + mes "100 Sharpened Leaf "; + mes "4 Burning Horseshoe"; + mes "...Did you know this already?"; + close; + L1_16: + mes "[Jac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(5062)<1) goto L_ITEM_16;//Items: Straw Hat, + if(countitem(952)<100) goto L_ITEM_16;//Items: Cactus Needle, + if(countitem(1907)<1) goto L_ITEM_16;//Items: Guitar, + mes "[Jac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Sombrero for you right away."; + mes "Please Wait a Moment."; + next; + delitem 5062,1;//Items: Straw Hat, + delitem 952,100;//Items: Cactus Needle, + delitem 1907,1;//Items: Guitar, + mes "[Jac]"; + mes "Tah Dah!!!^FF0000Sombrero^000000...! Please Take it!"; + getitem 5067,1;//Items: Sombrero, + next; + mes "[Jac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_16: + mes "[Jac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Jac]"; + mes "Sombrero requires~~"; + next; + mes "[Jac]"; + mes "1 Straw Hat"; + mes "100 Cactus Needle"; + mes "1 Guitar"; + mes "...Did you know this already?"; + close; +} + +prontera.gat,142,172,5 script Pac 705,{ + mes "[Pac]"; + mes "I am 3rd oldest and wisest of the 4 brothers that makes all the newer hats."; + mes "You will need to bring me the correct items for each hat so I can make them."; + mes "I provide 8 hats and my brothers provides the other 24."; + mes "What hat do you want me to make?"; + next; + menu "Hair Cap",L1_17,"Hot Blood Headband",L1_18,"Ear of Angel",L1_19,"Ear of Demon",L1_20,"Big Golden Bell",L1_21,"Mistress Crown",L1_22,"Crown of Ancient Queen",L1_23,"Alarm Mask",L1_24; + L1_17: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2226)<1) goto L_ITEM_17;//Items: Cap, + if(countitem(7107)<500) goto L_ITEM_17;//Items: Antelope Skin, + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Hair Cap for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2226,1;//Items: Cap, + delitem 7107,500;//Items: Antelope Skin, + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Hair Cap^000000...! Please Take it!"; + getitem 5076,1;//Items: Furry Hat, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_17: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Hair Cap requires~~"; + next; + mes "[Pac]"; + mes "1 Cap"; + mes "500 Fur of Goat"; + mes "...Did you know this already?"; + close; + L1_18: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(10019)<1) goto L_ITEM_18;//Items: Red Muffler, + if(countitem(7097)<300) goto L_ITEM_18;//Items: Burning Heart, + if(countitem(982)<1) goto L_ITEM_18;//Items: White Dyestuff, + if(countitem(2211)<1) goto L_ITEM_18;//Items: Bandana, + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Hot Blood Headband for you right away."; + mes "Please Wait a Moment."; + next; + delitem 10019,1;//Items: Red Muffler, + delitem 7097,300;//Items: Burning Heart, + delitem 982,1;//Items: White Dyestuff, + delitem 2211,1;//Items: Bandana, + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Hot Blood Headband^000000...! Please Take it!"; + getitem 5070,1;//Items: Bandage, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_18: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Hot Blood Headband requires~~"; + next; + mes "[Pac]"; + mes "1 Red Muffler"; + mes "300 Burning Heart"; + mes "1 White Dyestuffs"; + mes "1 Bandana"; + mes "...Did you know this already?"; + close; + L1_19: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2254)<1) goto L_ITEM_19;//Items: Angel Wing, + if(countitem(2286)<1) goto L_ITEM_19;//Items: Elven Ears, + if(Zeny < 20000) goto L_ITEM_19; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Ear of Angel for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2254,1;//Items: Angel Wing, + delitem 2286,1;//Items: Elven Ears, + set Zeny,Zeny-20000; + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Ear of Angel^000000...! Please Take it!"; + getitem 5074,1;//Items: Ears of Angel, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_19: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Ear of Angel requires~~"; + next; + mes "[Pac]"; + mes "1 Angel Wing"; + mes "1 Elven Ears"; + mes "20,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_20: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2255)<1) goto L_ITEM_20;//Items: Evil Wing, + if(countitem(2286)<1) goto L_ITEM_20;//Items: Elven Ears, + if(Zeny < 20000) goto L_ITEM_20; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Ear of Demon for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2255,1;//Items: Evil Wing, + delitem 2286,1;//Items: Elven Ears, + set Zeny,Zeny-20000; + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Ear of Demon^000000...! Please Take it!"; + getitem 5068,1;//Items: Ears Of Demon, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_20: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Ear of Demon requires~~"; + next; + mes "[Pac]"; + mes "1 Evil Wing"; + mes "1 Elven Ears"; + mes "20,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_21: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(10016)<1) goto L_ITEM_21;//Items: Golden Bell, + if(countitem(714)<1) goto L_ITEM_21;//Items: Emperium, + if(countitem(969)<3) goto L_ITEM_21;//Items: Gold, + if(Zeny < 25000) goto L_ITEM_21; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Big Golden Bell for you right away."; + mes "Please Wait a Moment."; + next; + delitem 10016,1;//Items: Golden Bell, + delitem 714,1;//Items: Emperium, + delitem 969,3;//Items: Gold, + set Zeny,Zeny-25000; + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Big Golden Bell^000000...! Please Take it!"; + getitem 5091,1;//Items: Big Golden Bell, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_21: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Big Golden Bell requires~~"; + next; + mes "[Pac]"; + mes "1 Golden Bell"; + mes "1 Emperium"; + mes "3 Gold"; + mes "25,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_22: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2249)<1) goto L_ITEM_22;//Items: Coronet, + if(countitem(714)<1) goto L_ITEM_22;//Items: Emperium, + if(countitem(969)<3) goto L_ITEM_22;//Items: Gold, + if(Zeny < 25000) goto L_ITEM_22; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Mistress Crown for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2249,1;//Items: Coronet, + delitem 714,1;//Items: Emperium, + delitem 969,3;//Items: Gold, + set Zeny,Zeny-25000; + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Mistress Crown^000000...! Please Take it!"; + getitem 5081,1;//Items: Crown of Mistress, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_22: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Mistress Crown requires~~"; + next; + mes "[Pac]"; + mes "1 Coronet"; + mes "1 Emperium"; + mes "3 Gold"; + mes "25,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_23: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(10006)<1) goto L_ITEM_23;//Items: Queen's Hair Ornament, + if(countitem(714)<1) goto L_ITEM_23;//Items: Emperium, + if(countitem(969)<3) goto L_ITEM_23;//Items: Gold, + if(Zeny < 25000) goto L_ITEM_23; + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Crown of Ancient Queen for you right away."; + mes "Please Wait a Moment."; + next; + delitem 10006,1;//Items: Queen's Hair Ornament, + delitem 714,1;//Items: Emperium, + delitem 969,3;//Items: Gold, + set Zeny,Zeny-25000; + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Crown of Ancient Queen^000000...! Please Take it!"; + getitem 5080,1;//Items: Crown of The Ancient Queen, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_23: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Crown of Ancient Queen requires~~"; + next; + mes "[Pac]"; + mes "1 Queen's Hair Ornament"; + mes "1 Emperium"; + mes "3 Gold"; + mes "25,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_24: + mes "[Pac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(1095)<3000) goto L_ITEM_24;//Items: Needle of Alarm, + if(countitem(2218)<1) goto L_ITEM_24;//Items: Flu Mask, + mes "[Pac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Alarm Mask for you right away."; + mes "Please Wait a Moment."; + next; + delitem 1095,3000;//Items: Needle of Alarm, + delitem 2218,1;//Items: Flu Mask, + mes "[Pac]"; + mes "Tah Dah!!!^FF0000Alarm Mask^000000...! Please Take it!"; + getitem 5086,1;//Items: Sad Mask, + next; + mes "[Pac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_24: + mes "[Pac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Pac]"; + mes "Alarm Mask requires~~"; + next; + mes "[Pac]"; + mes "3000 Needle of Alarm"; + mes "1 Flu Mask"; + mes "...Did you know this already?"; + close; +} + +prontera.gat,143,172,5 script Blac 732,{ + mes "[Blac]"; + mes "I am the youngest and sexiest of the 4 brothers that makes all the newer hats."; + mes "You will need to bring me the correct items for each hat so I can make them."; + mes "I provide 8 hats and my brothers provides the other 24."; + mes "What hat do you want me to make?"; + next; + menu "Indian Hairband",L1_25,"Twin Ribbons",L1_26,"Expressionless Mask",L1_27,"Troublesome Mask",L1_28,"Surprise Mask",L1_29,"Goblin Leader Mask",L1_30,"Horn of Incubus",L1_31,"Horn of Succubus",L1_32; + L1_25: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2207)<1) goto L_ITEM_25;//Items: Fancy Flower, + if(countitem(7101)<10) goto L_ITEM_25;//Items: Peco Feather, + if(Zeny < 10000) goto L_ITEM_25; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Indian Hairband for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2207,1;//Items: Fancy Flower, + delitem 7101,10;//Items: Peco Feather, + set Zeny,Zeny-10000; + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Indian Hairband^000000...! Please Take it!"; + getitem 5071,1;//Items: Indian Headband, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_25: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Indian Hairband requires~~"; + next; + mes "[Blac]"; + mes "1 Fancy Flower"; + mes "10 Peco's Feather"; + mes "10,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_26: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2244)<1) goto L_ITEM_26;//Items: Big Ribbon, + if(countitem(10007)<1) goto L_ITEM_26;//Items: Silk Ribbon, + if(countitem(5079)<1) goto L_ITEM_26;//Items: X Hairpin, + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Twin Ribbons for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2244,1;//Items: Big Ribbon, + delitem 10007,1;//Items: Silk Ribbon, + delitem 5079,1;//Items: X Hairpin, + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Twin Ribbons^000000...! Please Take it!"; + getitem 5085,1;//Items: Small Twin Ribbons, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_26: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Twin Ribbons requires~~"; + next; + mes "[Blac]"; + mes "1 Big Ribbon"; + mes "1 Silk Ribbon"; + mes "1 X Cross Hairpin"; + mes "...Did you know this already?"; + close; + L1_27: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(999)<25) goto L_ITEM_27;//Items: Steel, + if(countitem(5090)<1) goto L_ITEM_27;//Items: Mask of The Goblin Leader, + if(Zeny < 50000) goto L_ITEM_27; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Expressionless Mask for you right away."; + mes "Please Wait a Moment."; + next; + delitem 999,25;//Items: Steel, + delitem 5090,1;//Items: Mask of The Goblin Leader, + set Zeny,Zeny-50000; + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Expressionless Mask^000000...! Please Take it!"; + getitem 5087,1;//Items: Expressionless Mask, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_27: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Expressionless Mask requires~~"; + next; + mes "[Blac]"; + mes "25 Steel"; + mes "1 Goblin Leader Mask"; + mes "50,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_28: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(999)<25) goto L_ITEM_28;//Items: Steel, + if(countitem(5090)<1) goto L_ITEM_28;//Items: Mask of The Goblin Leader, + if(Zeny < 50000) goto L_ITEM_28; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Troublesome Mask for you right away."; + mes "Please Wait a Moment."; + next; + delitem 999,25;//Items: Steel, + delitem 5090,1;//Items: Mask of The Goblin Leader, + set Zeny,Zeny-50000; + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Troublesome Mask^000000...! Please Take it!"; + getitem 5089,1;//Items: Annoyed Mask, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_28: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Troublesome Mask requires~~"; + next; + mes "[Blac]"; + mes "25 Steel"; + mes "1 Goblin Leader Mask"; + mes "50,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_29: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(999)<25) goto L_ITEM_29;//Items: Steel, + if(countitem(5090)<1) goto L_ITEM_29;//Items: Mask of The Goblin Leader, + if(Zeny < 50000) goto L_ITEM_29; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Surprise Mask for you right away."; + mes "Please Wait a Moment."; + next; + delitem 999,25;//Items: Steel, + delitem 5090,1;//Items: Mask of The Goblin Leader, + set Zeny,Zeny-50000; + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Surprise Mask^000000...! Please Take it!"; + getitem 5088,1;//Items: Surprised Mask, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_29: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Surprise Mask requires~~"; + next; + mes "[Blac]"; + mes "25 Steel"; + mes "1 Goblin Leader Mask"; + mes "50,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_30: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2275)<1) goto L_ITEM_30;//Items: Red Bandana, + if(countitem(911)<100) goto L_ITEM_30;//Items: Scell, + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Goblin Leader Mask for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2275,1;//Items: Red Bandana, + delitem 911,100;//Items: Scell, + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Goblin Leader Mask^000000...! Please Take it!"; + getitem 5090,1;//Items: Mask of The Goblin Leader, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_30: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Goblin Leader Mask requires~~"; + next; + mes "[Blac]"; + mes "1 Red Bandana"; + mes "100 Scell"; + mes "...Did you know this already?"; + close; + L1_31: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(1038)<500) goto L_ITEM_31;//Items: Little Evil Horn, + if(countitem(7048)<80) goto L_ITEM_31;//Items: Talon of Griffon, + if(Zeny < 50000) goto L_ITEM_31; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Horn of Succubus for you right away."; + mes "Please Wait a Moment."; + next; + delitem 1038,500;//Items: Little Evil Horn, + delitem 7048,80;//Items: Talon of Griffon, + set Zeny,Zeny-50000; + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Horn of Succubus^000000...! Please Take it!"; + getitem 5066,1;//Items: Horns of Succubus, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_31: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Horn of Succubus requires~~"; + next; + mes "[Blac]"; + mes "500 Little Evil Horn"; + mes "80 Talon of Gryphon"; + mes "50,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_32: + mes "[Blac]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(1038)<500) goto L_ITEM_32;//Items: Little Evil Horn, + if(countitem(7048)<80) goto L_ITEM_32;//Items: Talon of Griffon, + if(Zeny < 50000) goto L_ITEM_32; + mes "[Blac]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Horn of Incubus for you right away."; + mes "Please Wait a Moment."; + next; + delitem 1038,500;//Items: Little Evil Horn, + delitem 7048,80;//Items: Talon of Griffon, + set Zeny,Zeny-50000; + mes "[Blac]"; + mes "Tah Dah!!!^FF0000Horn of Incubus^000000...! Please Take it!"; + getitem 5072,1;//Items: Horns Of Incubus, + next; + mes "[Blac]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_32: + mes "[Blac]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Blac]"; + mes "Horn of Incubus requires~~"; + next; + mes "[Blac]"; + mes "500 Little Evil Horn"; + mes "80 Talon of Gryphon"; + mes "50,000 Zeny"; + mes "...Did you know this already?"; + close; +} + +prontera.gat,144,172,5 script Angel 811,{ + mes "[Angel]"; + mes "Hello."; + mes "Im the hottest angel in Midgard!"; + mes "What can I do for you?"; + next; + menu "Hat of Nun",L1_33,"Black Cat Ears",L1_34,"Ribbon of Red Tail",L1_35,"Helm of Orc Hero",L1_36; + L1_33: + mes "[Angel]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2261)<1) goto L_ITEM_33;//Items: Army Cap, + if(countitem(1550)<1) goto L_ITEM_33;//Items: Book, + if(countitem(2206)<1) goto L_ITEM_33;//Items: Wedding Veil, + if(countitem(7021)<2) goto L_ITEM_33;//Items: Foolishness of the Blind, + mes "[Angel]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Hat of Nun for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2261,1;//Items: Army Cap, + delitem 1550,1;//Items: Book, + delitem 2206,1;//Items: Wedding Veil, + delitem 7021,2;//Items: Foolishness of the Blind, + mes "[Angel]"; + mes "Tah Dah!!!^FF0000Hat of Nun^000000...! Please Take it!"; + getitem 5093,1;//Items: Nun Hat, + next; + mes "[Angel]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_33: + mes "[Angel]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Angel]"; + mes "Hat of Nun requires~~"; + next; + mes "[Angel]"; + mes "1 Army Cap"; + mes "1 Book"; + mes "1 Wedding Veil"; + mes "2 Foolishness of the Blind"; + mes "...Did you know this already?"; + close; + L1_34: + mes "[Angel]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2213)<1) goto L_ITEM_34;//Items: Kitty Band, + if(countitem(7063)<200) goto L_ITEM_34;//Items: Soft Feather, + if(countitem(983)<1) goto L_ITEM_34;//Items: Black Dyestuff, + if(Zeny < 10000) goto L_ITEM_34; + mes "[Angel]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Black Cat Ears for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2213,1;//Items: Kitty Band, + delitem 7063,200;//Items: Soft Feather, + delitem 983,1;//Items: Black Dyestuff, + set Zeny,Zeny-10000; + mes "[Angel]"; + mes "Tah Dah!!!^FF0000Black Cat Ears^000000...! Please Take it!"; + getitem 5057,1;//Items: Black Cat Ears, + next; + mes "[Angel]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_34: + mes "[Angel]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Angel]"; + mes "Black Cat Ears require~~"; + next; + mes "[Angel]"; + mes "1 Kitty Band"; + mes "200 Soft Feather"; + mes "1 Black Dyestuffs"; + mes "10,000 Zeny"; + mes "...Did you know this already?"; + close; + L1_35: + mes "[Angel]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(2244)<1) goto L_ITEM_35;//Items: Big Ribbon, + if(countitem(2209)<1) goto L_ITEM_35;//Items: Ribbon, + if(countitem(10007)<1) goto L_ITEM_35;//Items: Silk Ribbon, + mes "[Angel]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Ribbon of Red Tail for you right away."; + mes "Please Wait a Moment."; + next; + delitem 2244,1;//Items: Big Ribbon, + delitem 2209,1;//Items: Ribbon, + delitem 10007,1;//Items: Silk Ribbon, + mes "[Angel]"; + mes "Tah Dah!!!^FF0000Ribbon of Red Tail^000000...! Please Take it!"; + getitem 5083,1;//Items: Back Ribbon, + next; + mes "[Angel]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_35: + mes "[Angel]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Angel]"; + mes "Ribbon of Red Tail requires~~"; + next; + mes "[Angel]"; + mes "1 Big Ribbon"; + mes "1 Slotted Ribbon"; + mes "1 Silk Ribbon"; + mes "...Did you know this already?"; + close; + L1_36: + mes "[Angel]"; + mes "Let me check the items you have brought here."; + next; + if(countitem(7069)<350) goto L_ITEM_36;//Items: Destroyed Armor, + if(countitem(5006)<1) goto L_ITEM_36;//Items: Machoman's Glasses, + if(countitem(2202)<1) goto L_ITEM_36;//Items: Sunglasses, + if(countitem(5047)<1) goto L_ITEM_36;//Items: Fashion Sunglasses, + if(countitem(2242)<1) goto L_ITEM_36;//Items: Purple Glasses, + if(countitem(7098)<100) goto L_ITEM_36;//Items: Fire Seed, + if(Zeny < 1000000) goto L_ITEM_36; + mes "[Angel]"; + mes "Wow!! Well done! Finally you have gathered all items needed!"; + mes "We will make the Helm of Orc Hero for you right away."; + mes "Please Wait a Moment."; + next; + delitem 7069,350;//Items: Destroyed Armor, + delitem 5006,1;//Items: Machoman's Glasses, + delitem 2202,1;//Items: Sunglasses, + delitem 5047,1;//Items: Fashion Sunglasses, + delitem 2242,1;//Items: Purple Glasses, + delitem 7098,100;//Items: Fire Seed, + set Zeny,Zeny-1000000; + mes "[Angel]"; + mes "Tah Dah!!!^FF0000Helm of Orc Hero^000000...! Please Take it!"; + getitem 5094,1;//Items: Orc Hero Helm, + next; + mes "[Angel]"; + mes "I liked that, I look forward to making more."; + mes "Thank you."; + close; + L_ITEM_36: + mes "[Angel]"; + mes "Oh you already know what I create!"; + mes "Ha ha!!"; + mes "Hum~~ tell me where did you heard"; + mes "about this?"; + next; + mes "[Angel]"; + mes "Helm of Orc Hero requires~~"; + next; + mes "[Angel]"; + mes "350 Broken Armor Piece"; + mes "1 Machoman's Glasses"; + mes "1 Slotted Sunglasses"; + mes "1 Fashion Sunglasses"; + mes "1 Purple Glasses"; + mes "100 Fire Seed"; + mes "1,000,000 Zeny"; + mes "...Did you know this already?"; + close; +} diff --git a/npc/quests/custom/sunglasses.txt b/npc/quests/custom/sunglasses.txt new file mode 100644 index 000000000..0a33321a7 --- /dev/null +++ b/npc/quests/custom/sunglasses.txt @@ -0,0 +1,146 @@ +//===== eAthena Script ======================================= +//= Quest For Slotted Sunglasses +//===== By: ================================================== +//= Aegis - amichan +//===== Current Version: ===================================== +//= 1.4 +//===== Compatible With: ===================================== +//= Any eAthena Version; +//===== Description: ========================================= +//= Quest to get Slotted Sunglasses +//===== Additional Comments: ================================= +//= 1.0 by Aegis +//= 1.1 by aichan +//= 1.2 by x[tsk] +//= 1.3 by Darkchild +//============================================================ + +// quest will reset it self after 1 pair of Slotted Sunglasses is made. +// 1st part of the quest + +alberta.gat,88,193,5 script Sunglasses Trader 73,{ + if(SG_QUEST1 == 1) goto L_SG_Q1_Done; + mes "[Sunglasses Trader]"; + mes "Hello. What can I do for you?"; + next; + menu "I heard that you can make ^0000FFSlotted Sunglasses^000000.",L_SG_Yes,"Nothing, sorry to bother you.",L_SG_No; +L_SG_Yes: + mes "[Sunglasses Trader]"; + mes "I do not make them, but I can tell you where to find the person who does. For a small fee..."; + next; + menu "How much?",L_SG_1,"No way, I will find her, myself!",L_SG_No1; +L_SG_No1: + mes "[Sunglasses Trader]"; + mes "Suit yourself, the Maker will not make you ^0000FFSlotted Sunglasses^000000 unless she knows that you are coming."; + mes "Only I can tell her you are coming."; + next; + mes "[Sunglasses Trader]"; + mes "Come back to me, when you have given up. Hahaha."; + close; +L_SG_1: + mes "[Sunglasses Trader]"; + mes "In order for me to tell you information on ^0000FFSlotted Sunglasses^000000 you need to get me: "; + mes "^0000881 Carat Diamond^000000, "; + mes "^00008850 Feathers^000000, "; + mes "and ^000088100000z^000000."; + next; + menu "Alright, here.",L_SG_1_Check,"That's too much!",L_SG_NO; +L_SG_NO: + mes "[Sunglasses Trader]"; + mes "Suit Yourself."; + close; +L_SG_1_Check: + if (countitem(730) < 1) goto L_SG_Diamond; + if (countitem(949) < 50) goto L_SG_Feathers; + if (zeny<100000) goto L_SG_Funds; + delitem 730,1; + delitem 949,50; + set zeny,zeny-100000; + set SG_QUEST1,1; + mes "[Sunglasses Trader]"; + mes "Great. Now, listen carefully."; + next; + mes "[Sunglasses Trader]"; + mes "Look for someone name Maseph somewhere in the east of Morroc."; + mes "I will send her a message to let her know that you are coming."; + close; +L_SG_Diamond: + mes "[Sunglasses Trader]"; + mes "You do not have the ^0000881 Carat Diamond^000000. Come back to me when you do."; + close; +L_SG_Feathers: + mes "[Sunglasses Trader]"; + mes "You do not have ^00008850 Feathers^000000. Come back to me when you do."; + close; +L_SG_Funds: + mes "[Sunglasses Trader]"; + mes "You do not have ^000088100000z^000000. Come back to me when you do."; + close; +L_SG_Q1_Done: + mes "[Sunglasses Trader]"; + mes "There is nothing more I can tell you."; + next; + mes "[Sunglasses Trader]"; + mes "Go see Maseph. She is somewhere east of Morroc."; + close; +L_SG_No: + mes "[Sunglasses Trader]"; + mes "Come back to me than you are ready."; + close; +} + +// 2nd part of the quest + +moc_fild09.gat,209,128,5 script Maseph 702,{ + if(SG_QUEST1 == 1) goto L_SG_2; + mes "[Maseph]"; + mes "Lovely Day, isn't it ?"; + close; +L_SG_2: + mes "[Maseph]"; + mes "Hello there."; + next; + mes "[Maseph]"; + mes "You came for the ^000088Slotted Sunglasses^000000, right?"; + next; + menu "Yes",L_SG_2_Start,"No, sorry to bother you.",L_SG_2_No; +L_SG_2_No: + mes "[Maseph]"; + mes "Off you go, then."; + close; +L_SG_2_Start: + mes "[Maseph]"; + mes "To make one, I will need one pair of ^000088Sunglasses^000000 and 400000z."; + next; + menu "Here you go.",L_SG_Q2_Check,"No, thanks.",L_SG_2_StartNo; +L_SG_2_StartNo: + mes "[Maseph]"; + mes "As you wish."; + close; +L_SG_Q2_Check: + if(countitem(2201) < 1) goto L_SG_Sunglasses; + if(zeny<400000) goto L_SG_Funds; + mes "[Maseph]"; + mes "Thank you. I will get on it right away."; + next; + delitem 2201,1; + set zeny,zeny-400000; + mes "[Maseph]"; + mes "Here you go my friend."; + getitem 2202,1; + next; + mes "[Maseph]"; + mes "Enjoy your ^000088Slotted Sunglasses^000000."; +// quest reset + set SG_QUEST1,0; + close; +L_SG_Sunglasses: + mes "[Maseph]"; + mes "I need one pair of ^000088Sunglasses^000000. Come back to me when you have one."; + close; +L_SG_Funds: + mes "[Maseph]"; + mes "You do not have enough money. Please come back to me when you do."; + close; +} + diff --git a/npc/quests/custom/uneasy_cemetery.txt b/npc/quests/custom/uneasy_cemetery.txt new file mode 100644 index 000000000..e8bf9cf86 --- /dev/null +++ b/npc/quests/custom/uneasy_cemetery.txt @@ -0,0 +1,135 @@ +//===== eAthena Script ======================================= +//= Uneasy Prontera Cemetery Quest (original script!) +//===== By: ================================================== +//= Lupus +//===== Current Version: ===================================== +//= 1.2 (Tested and fully working!) +//===== Compatible With: ===================================== +//= eAthena Version 1.0 +//===== Description: ========================================= +//= A periodical quest of the Uneasy Cemetery (Kill undead / Prevent their appearance) +//= Every day, at the midnight Prontera recieve a wave of Undeads. +//= They come from Uneasy Cemetery of Prontera. To protect the players +//= from the undeads terror you may either kill the enemy. Or supply Mother Mathana +//= with needed amount of Holy Water. Every citizen can take his part in the +//= saving of Prontera city. After some days of quiet life... the Cemetery strikes back. +//===== Additional Comments: ================================= +//= 1.1 More advanced ver. Added some bonus the the one who'd kill the last walking undead +//= 1.2 Added coords to the script to make label OmMobDead working +//============================================================ + + +prontera.gat,3,3,3 script Uneasy_Check -1, +{ + end; + +OnHour00: + set $UNEASY_DL,$UNEASY_DL-1; + set $UNEASY_BL,$UNEASY_BL+30; //add need of HW for 30 bottles per day + if ($UNEASY_BL>666) set $UNEASY_BL,666; //keep needed bottles not <=666 + if ($UNEASY_DL < 0) goto L_Start_Undead; +//The Cemetery is OK yet. + disablenpc "Mother Mathana"; + end; +OnInit: + if ($UNEASY_DL >= 0) disablenpc "Mother Mathana"; + end; + +OnHour06: + killmonsterall "prontera.gat"; //The Sun kills undead in the morning + end; + +OnHour01: + if ($@UNEASY_MOB > 0) mapannounce "prontera.gat","[Mother Mathana]: In the name of Odin, please finish these roaming undead leftovers!",0; + end; + +OnZombieDead: + set $@UNEASY_MOB,$@UNEASY_MOB-1; + if ($@UNEASY_MOB>0) end; + set $UNEASY_DL,0; + set $UNEASY_H$,strcharinfo(0); + if (Sex==1) mapannounce "prontera.gat","[Mother Mathana]: Brave "+$UNEASY_H$+" has just killed the last undead in Prontera!",0; + if (Sex==0) mapannounce "prontera.gat","[Mother Mathana]: Lady "+$UNEASY_H$+" has just killed the last undead in Prontera!",0; + set JobExp,JobExp+100; + set BaseExp,BaseExp+50; + end; + +L_Start_Undead: + killmonsterall "prontera.gat"; //kills any left monsters + enablenpc "Mother Mathana"; +//call some monsters in the city + set $@UNEASY_MOB, 65; + monster "prontera.gat",0,0,"Zombie",1015,30,"Uneasy_Check::OnZombieDead"; +//in the Cemetery + monster "prontera.gat",268,349,"Zombie",1015,30,"Uneasy_Check::OnZombieDead"; + monster "prontera.gat",269,350,"Ghoul",1036,5,"Uneasy_Check::OnZombieDead"; +//announce + mapannounce "prontera.gat","[Mother Mathana]: The cememtery has became restless! In the name of Odin, hurry to the Sanctuary! Save the city of Prontera!",0; +} + +prontera.gat,257,313,5 script Mother Mathana 79, +{ + mes "[Mother Mathana]"; + if ($UNEASY_DL <= 0) goto L_Undead_Walk; + mes "I'm afraid there's something wrong with our old cemetery..."; + if ($UNEASY_H$==strcharinfo(0)) mes "But thanks to you, "+$UNEASY_H$+", we'll be able to sleep " + $UNEASY_DL + " nights!"; + if ($UNEASY_H$!=strcharinfo(0)) mes "But thanks to "+$UNEASY_H$+"'s support, we've got " + $UNEASY_DL + " easy nights!"; + emotion 0; + close; + +L_Undead_Walk: + if ($UNEASY_DL == 0) mes "THEY could return tomorrow's night again!"; + if ($UNEASY_DL == 0 && $UNEASY_H$==strcharinfo(0)) mes "Thank you, "+$UNEASY_H$+"! Now we'll manage to rest till the next midnight!"; + if ($UNEASY_DL == 0 && $UNEASY_H$!=strcharinfo(0)) mes "But due to "+$UNEASY_H$+"'s help we'll manage to rest till the next midnight!"; + mes "To calm down the resless cemetery, we should pour all these grave with the Holy Water. But our sisters and broters are run out of it."; + mes "Could you supply us with Holy Water?"; + next; + menu "Yes, have all my Holy Water!",-, "Nope, I need it.",M_NO, "I don't have any.",M_DONT_HAVE; + + if ( countitem("Holy_Water")<1 ) goto M_DONT_HAVE; + set $UNEASY_BL,$UNEASY_BL-countitem("Holy_Water"); + delitem "Holy_Water",countitem("Holy_Water"); + + if ( $UNEASY_BL > 0 ) goto L_NEED_MORE; +//set quiet days!!! no more undead for this period! + set $UNEASY_DL,5+((0-$UNEASY_BL)/30); + set $UNEASY_H$,strcharinfo(0); + mes "[Mother Mathana]"; + mes "Thank you, "+$UNEASY_H$+"! Now we've got enough Holy Water!"; + next; + mes "[Mother Mathana]"; + mes "On pouring the cemetery with that water we'll get " + $UNEASY_DL + " safe nights!"; + next; + killmonsterall "prontera.gat"; //kills any left monsters + mes "[Mother Mathana]"; + mes "See, "+ $UNEASY_H$ +"? They all are gone now!"; + next; + mes "[Mother Mathana]"; + mes "Our Church is going to thank you personally..."; + next; + if (Sex==1) mapannounce "prontera.gat","[Mother Mathana]: In the name of Odin we declare handsom "+$UNEASY_H$+" as a Prontera savior!",0; + if (Sex==0) mapannounce "prontera.gat","[Mother Mathana]: In the name of Odin we declare beautiful "+$UNEASY_H$+" as a Prontera savior!",0; + mes "[Mother Mathana]"; + mes "In the name of Odin we bless you and decently present a modest gift just from Mareusis' wine-cellar."; + getitem "Blue_Potion",1; + set JobExp,JobExp+100; + set BaseExp,BaseExp+50; + close; + +L_NEED_MORE: + mes "[Mother Mathana]"; + mes "Thank you, good "+strcharinfo(0)+", but we still nedd " + $UNEASY_BL + " more Holy Water bottles."; + close; + +M_NO: + mes "[Mother Mathana]"; + mes "I'm afraid the old cemetery is going out of control soon... Please, get us all the Holy Water you could get."; + close; + +M_DONT_HAVE: + mes "[Mother Mathana]"; + mes "Alas! We still need " + $UNEASY_BL + " more bottles of Holy Water... Why don't you go and ask other people for some extra Holy Water."; + mes "The old cemetery is going out of control soon..."; + mes "Please, in the name of Odin, help Prontera city."; + close; +} \ No newline at end of file diff --git a/npc/quests/custom/valhallen.txt b/npc/quests/custom/valhallen.txt new file mode 100644 index 000000000..6d6d4193d --- /dev/null +++ b/npc/quests/custom/valhallen.txt @@ -0,0 +1,199 @@ +//===== eAthena Script ======================================= +//= Valhallen items Quests NPC +//===== By: ================================================== +//= Avaji +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= All-in-one: Mjolnir,Sleipnir,Brisingamen,Gleipnir,Megingjard +//===== Additional Comments: ================================= +//= custom quest, ingridients were based on official RO FAQ +//============================================================ + +prontera.gat,147,171,5 script Lenneth 811,{ + mes "[Lenneth]"; + mes "I come from Valhalla to aid you."; + mes "I can transmute for you many of the Valhallen items."; + mes "Although they require many rare elements to make."; + next; + mes "[Lenneth]"; + mes "What would you like?"; + next; + menu "Mjolnir",-,"Sleipnir",L_SLE,"Brisingamen",L_BRI,"Gleipnir",L_GLE,"Megingjard",L_MEG; + + mes "[Lenneth]"; + mes "The ^3355FFMjolnir^000000 is a mighty mace with the power of wind."; + mes "The items I need to transmute 2 ^3355FFSpanners^000000 into a ^3355FFMjolnir^000000 are as follows:"; + mes "20 ^3355FFOridecon^000000 5 ^3355FFElunium^000000 and 40 ^3355FFGold^000000"; + mes "I also need the following essences:"; + mes "2 ^3355FFThor's Guntlet^000000"; + mes "4 ^3355FFIron Maiden^000000"; + mes "5 ^3355FFWrath of Valkyrie^000000"; + mes "5 ^3355FFBreath of Soul^000000"; + mes "5 ^3355FFOmen of tempest^000000"; + next; + mes "[Lenneth]"; + mes "Do you desire the ^3355FFMjolnir^000000"; + next; + menu "Yes",-,"No",L_OUT; + + if (countitem(984) < 20 || countitem(985) < 5 || countitem(969) < 40 || countitem(1531) < 2 || countitem(7089) < 5) goto L_NOTENOUGH; + if (countitem(7074) < 2 || countitem(7075) < 4 || countitem(7078) < 5 || countitem(7087) < 5) goto L_NOTENOUGH; + + delitem 984,20; + delitem 985,5; + delitem 969,40; + delitem 1531,2; + delitem 7074,2; + delitem 7075,4; + delitem 7078,5; + delitem 7087,5; + delitem 7089,5; + + getitem 1530,1; + + mes "[Lenneth]"; + mes "Here is your ^3355FFMjolnir^000000 may it serve you well."; + close; +L_SLE: + + mes "[Lenneth]"; + mes "The ^3355FFSleipnir^000000 are shoes that increase your maximum hp/sp"; + mes "To be able to transmute 2 ^3355FFBoots^000000 into a ^3355FFSleipnir^000000 I will need:"; + mes "1 ^3355FFOridecon^000000 10 ^3355FFElunium^000000 and 20 ^3355FFGold^000000"; + mes "I also need the following essences:"; + mes "3 ^3355FFWheel of the Unknown^000000"; + mes "5 ^3355FFFeather of Angel^000000"; + mes "3 ^3355FFSprirt of Fish^000000"; + mes "3 ^3355FFEmblem of the Sun God^000000"; + next; + mes "[Lenneth]"; + mes "Do you desire the ^3355FFSleipnir^000000"; + next; + menu "Yes",-,"No",L_OUT; + + if (countitem(969) < 20 || countitem(985) < 10 || countitem(984) < 1 || countitem(2406) < 2 || countitem(7076) < 3) goto L_NOTENOUGH; + if (countitem(7079) < 5 || countitem(7083) < 3 || countitem(7086) < 3) goto L_NOTENOUGH; + + delitem 969,20; + delitem 985,10; + delitem 984,1; + delitem 2406,2; + delitem 7076,3; + delitem 7079,5; + delitem 7083,3; + delitem 7086,3; + + getitem 2410,1; + + mes "[Lenneth]"; + mes "Here is your ^3355FFSleipnir^000000 may they help you."; + close; +L_BRI: + + mes "[Lenneth]"; + mes "The ^3355FFBrisingamen^000000 increases your str agi int and vit."; + mes "The items I need to transmute a ^3355FFNecklace^000000 into the ^3355FFBrisingamen^000000 are as follows:"; + mes "2 ^3355FFSapphire^000000 3 ^3355FFPearl^000000 10 ^3355FFOpal^000000"; + mes "5 ^3355FFRuby^000000 and 20 ^3355FFGold^000000"; + mes "I also need the following essences:"; + mes "4 ^3355FFFreya's Jewel^000000"; + mes "4 ^3355FFSilver Ornament^000000"; + mes "3 ^3355FFSnow Crystal^000000"; + mes "3 ^3355FFQuiet Wave^000000"; + mes "3 ^3355FFDrifting Air^000000"; + next; + mes "[Lenneth]"; + mes "Do you desire the ^3355FFBrisingamen^000000"; + next; + menu "Yes",-,"No",L_OUT; + + if (countitem(969) < 20 || countitem(723) < 5 || countitem(727) < 10 || countitem(722) < 3 || countitem(726) < 2) goto L_NOTENOUGH; + if (countitem(7090) < 3 || countitem(7088) < 3 || countitem(7077) < 4 || countitem(7073) < 4 || countitem(2603) < 1) goto L_NOTENOUGH; + if (countitem(7092) < 3) goto L_NOTENOUGH; + + delitem 726,2; + delitem 722,3; + delitem 727,10; + delitem 723,5; + delitem 969,20; + delitem 2603,1; + delitem 7073,4; + delitem 7077,4; + delitem 7088,3; + delitem 7090,3; + delitem 7092,3; + + getitem 2630,1; + + mes "[Lenneth]"; + mes "Here is your ^3355FFBrisingamen^000000 may it serve you well."; + close; +L_GLE: + + mes "[Lenneth]"; + mes "The ^3355FFGleipnir^000000 is a light yet strong rope used to make the ^3355FFMegingjard^000000"; + mes "I will need the following essences to transmute a ^3355FFGleipnir^000000:"; + mes "4 ^3355FFTread of Cat^000000"; + mes "5 ^3355FFWoman's Moustache^000000"; + mes "4 ^3355FFStone Fragment^000000"; + mes "3 ^3355FFSaliva of Bird^000000"; + mes "3 ^3355FFSinew of Bear^000000"; + next; + mes "[Lenneth]"; + mes "Do you desire the ^3355FFGleipnir^000000"; + next; + menu "Yes",-,"No",L_OUT; + + if (countitem(7085) < 3 || countitem(7084) < 3 || countitem(7082) < 4 || countitem(7081) < 5 || countitem(7080) < 4) goto L_NOTENOUGH; + + delitem 7080,4; + delitem 7081,5; + delitem 7082,4; + delitem 7084,3; + delitem 7085,3; + + getitem 7058,1; + + mes "[Lenneth]"; + mes "Here is your ^3355FFGleipnir^000000."; + close; +L_MEG: + + mes "[Lenneth]"; + mes "The ^3355FFMegingjard^000000 is a powerfull belt that greatly increases ones strength."; + mes "To transmute a ^3355FFBelt^000000 into a ^3355FFMegingjard^000000 I will need the following:"; + mes "10 ^3355FFGold^000000 10 ^3355FFSapphire^000000"; + mes "5 ^3355FFOridecon^000000 and 1 ^3355FFGleipnir^000000"; + next; + mes "[Lenneth]"; + mes "Do you desire the ^3355FFMegingjard^000000"; + next; + menu "Yes",-,"No",L_OUT; + + if (countitem(2627) < 1 || countitem(984) < 5 || countitem(726) < 10 || countitem(969) < 10 || countitem(7058) < 1) goto L_NOTENOUGH; + + delitem 7058,1; + delitem 969,10; + delitem 726,10; + delitem 984,5; + delitem 2627,1; + + getitem 2629,1; + + mes "[Lenneth]"; + mes "Here is your ^3355FFMegingjard^000000 may it serve you well."; + close; +L_NOTENOUGH: + mes "[Lenneth]"; + mes "You are lacking a few items, please return when you have them."; + close; +L_OUT: + next; + mes "[Lenneth]"; + mes "Please return when you change your mind."; + close; +} + diff --git a/npc/quests/doomed_swords.txt b/npc/quests/doomed_swords.txt new file mode 100644 index 000000000..83d533202 --- /dev/null +++ b/npc/quests/doomed_swords.txt @@ -0,0 +1,297 @@ +//===== eAthena Script ======================================= +//= Doomed Swords Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//=95% done +//= 1.1 Fixed items count check. For all 3 swords... [Lupus] +//============================================================ + + + + + +// Executioner -------------------------------------------------------------------- +izlude_in.gat,173,88,2 script Nain 102, +{ + if(DOOMED_SWORD == 1 ) goto L_1; + + mes "[Nain]"; + mes "I was once told a legend about a powerfull sword that was used only for executions."; + next; + mes "[Nain]"; + mes "For years and years, this mighty sword was used to be-head heinous criminals, but it also took the lives of great warriors as well."; + mes "It is said that the overtime the government became corrupt and hence innocent lives fell victim to the sword."; + next; + mes "[Nain]"; + mes "This caused the sword to become corrupted with an emense evil power making it almost impossible to weild."; + mes "Those who did try to weild it became possed with an dark aura that drove them to blood lust."; + next; + mes "[Nain]"; + mes "This ancient civilization eventually collapsed and faded away. The powerfull sword also vanished."; + mes "The sword would later be named the ^ff0000Executioner^000000. An appropriate name considering its history."; + next; + mes "[Nain]"; + mes "Recently there have been rumors of a Legendary Blacksmith that has the skill to re-create the lost sword."; + next; + mes "[Nain]"; + mes "Just thinking about it sends shivers down my spine."; + mes "No matter how powerfull a sword it is, to think that it is possessed with thousands and thousands of angry ghosts..."; + mes "I would rather see the Doomed sword stay lost to history."; + if(DOOMED_SWORD == 0 ) goto L_0; + close; + +L_0: + next; + mes"[Nain]"; + mes "Say,.... are you really interested in this sword?"; + next; + menu "Yes",M_Yes,"Not really",M_No; + + M_Yes: + set DOOMED_SWORD,1; + mes "[Nain]"; + mes "You should speak with ^0000bbRupeto^000000 then. He seems to know alot about the ^00aa00Legendary Blacksmith^000000."; + mes "You can find him inside the Pub. With his help you may even be able to track down the Legendary Blacksmith. Good luck."; + close; + + M_No: + mes "[Nain]"; + mes "Oh, I see."; + close; + +L_1: + mes "[Nain]"; + mes "Wow! So you're gonna try to re-create the legendary, doomed sword Executioner? You should becarefull though, that's one powerfull sword."; + close; +} + +// Grimtooth ------------------------------------------------------------------------ +morocc.gat,281,178,8 script Cetsu 97, +{ + if(DOOMED_SWORD ==2 ) goto L_1; + + mes "[Cetsu]"; + mes "It is rumored that there was once a dagger made out of the tooth of an ogre. This made the dagger much stronger than those made out of steel."; + mes "It became known as the ^ff0000Grimtooth^000000. What made the Grimtooth truly special was the fact that it was enchanted with a magic spell."; + next; + mes "[Cetsu]"; + mes "Many have tried to re-create the Grimtooth but have faild. Only one blacksmith, who once lived in Prontera, knows how to do this."; + next; + mes "[Cetsu]"; + mes "Unfortunalety he left Prontera long ago and has not been seen since..."; + if(DOOMED_SWORD ==0 ) goto L_0; + close; + +L_0: + next; + mes"[Cetsu]"; + mes "Say,.... are you really interested in this dagger?"; + next; + menu "Yes",M_Yes,"Not really",M_No; + + M_Yes: + set DOOMED_SWORD,2; + mes "[Cetsu]"; + mes "You should speak with ^0000bbRupeto^000000 then. He seems to know alot about the ^00aa00Legendary Blacksmith^000000."; + mes "You can find him inside the Pub. With his help you may even be able to track down the Legendary Blacksmith. Good luck."; + close; + + M_No: + mes "[Cetsu]"; + mes "Oh, I see."; + close; + +L_1: + mes "[Cetsu]"; + mes "Wow! So you're gonna try to re-create the legendary, doomed dagger Grimtooth? You should becarefull though, that's one powerfull dagger."; + close; +} + +// Mysteltain ---------------------------------------------------------------- +prontera.gat,197,188,4 script Veeyop 50, +{ + if(DOOMED_SWORD ==3 ) goto L_1; + + mes "[Veeyop]"; + mes "Have you ever heard of a doomed sword, ^ff0000Mysteltain^000000? It's named after ^0000bba legendary Young Twig^000000 that was used to murder Balder, the God of Light..."; + mes "According to the legend, it was a weak, little twig. Other than that I know nothing more of the sword."; + next; + mes "[Veeyop]"; + mes "Whatever the legend may be, people say there is a way to re-construct the legendary sword."; + mes "I've heard that there was once a Blacksmith who had the knowledge to re-create the legendary sword living in Prontera."; + mes "Unfortunately he's disapeared from this town. Anywho its just heresay."; + if(DOOMED_SWORD ==0 ) goto L_0; + close; + +L_0: + next; + mes"[Veeyop]"; + mes "Say,.... are you really interested in this sword?"; + next; + menu "Yes",M_Yes,"Not really",M_No; + + M_Yes: + set DOOMED_SWORD,3; + mes "[Veeyop]"; + mes "You should speak with ^0000bbRupeto^000000 then. He seems to know alot about the ^00aa00Legendary Blacksmith^000000."; + mes "You can find him inside the Pub. With his help you may even be able to track down the Legendary Blacksmith. Good luck."; + close; + + M_No: + mes "[Veeyop]"; + mes "Oh, I see."; + close; + +L_1: + mes "[Veeyop]"; + mes "Wow! So you're gonna try to re-create the legendary, doomed sword Mysteltain? You should becarefull though, that's one powerfull sword."; + close; +} + +// Rupeto --------------------------------------------------------- +prt_in.gat,169,16,3 script Rupeto 86, +{ + if(DOOMED_SWORD > 0) goto L_0; + mes "[Rupeto]"; + mes "Hello."; + close; + +L_0: + mes "[Rupeto]"; + mes "Looking for the Legendary Blacksmith? Go to the payon field just east of the town of Payon."; + mes "I think its payon field 8 or 9."; + close; +} + +// Legendary Blacksmith ---------------------------------------------- +pay_fild08.gat,217,273,4 script Legendary Blacksmith 63, +{ + +if(DOOMED_SWORD == 1) goto L_Executioner; +if(DOOMED_SWORD == 2) goto L_Grimtooth; +if(DOOMED_SWORD == 3) goto L_Mysteltain; + +mes "[Legendary Blacksmith]"; +mes "I wonder what's going on in ^ff0000Prontera^000000? It's been so long since I've been there."; +close; + +L_Executioner: //1169 + if(countitem(7017)>=2 && countitem(7024)>=10 && countitem(1008)>=3 && countitem(609)>=50 && countitem(714)>=1) goto L_GetExec; + mes "[Legendary Blacksmith]"; + mes "So you're interested in making the legendary Executioner Sword heh?....."; + next; + mes "[Legendary Blacksmith]"; + mes "It's been sometime since I've forged any weapons,... but since it is a special challenge for me to make this sword....."; + next; + mes "[Legendary Blacksmith]"; + mes "I'll do it! I will re-create the Executioner Sword! I must warn you however, this is a very powerfull and dangerous sword. Be carefull."; + next; + mes "[Legendary Blacksmith]"; + mes "For the Executioner Sword I will need the following items:"; + mes "- ^0000ff2 Executioners Mitten^000000"; //7017 + mes "- ^0000ff10 Bloody Edge^000000"; //7024 + mes "- ^0000ff3 Necklace of Oblivion^000000"; //1008 + mes "- ^0000ff50 Amulet^000000"; //609 + mes "- and ^0000ff1 Emperium^000000"; //714 + close; + + L_GetExec: + mes "[Legendary Blacksmith]"; + mes "Good! You have brought me all the necessary items. Please wait a moment while I forge the Executioner Sword."; + next; + mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)"; + next; + mes "[Legendary Blacksmith]"; + mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy."; + getitem 1169,1; + set DOOMED_SWORD,0; + delitem 7017,2; + delitem 7024,10; + delitem 1008,3; + delitem 609,50; + delitem 714,1; + close; + + +L_Grimtooth: //1237 + if(countitem(7023)>=10 && countitem(724)>=5 && countitem(7002)>=100 && countitem(7022)>=1 && countitem(714)>=1) goto L_GetGrim; + mes "[Legendary Blacksmith]"; + mes "So you're interested in making the legendary Grimtooth Dagger heh?....."; + next; + mes "[Legendary Blacksmith]"; + mes "It's been sometime since I've forged any weapons,... but since it is a special challenge for me to make this dagger....."; + next; + mes "[Legendary Blacksmith]"; + mes "I'll do it! I will re-create the Grimtooth Dagger! I must warn you however, this is a very powerfull and dangerous dagger. Be carefull."; + next; + mes "[Legendary Blacksmith]"; + mes "For the Grimtooth Dagger I will need the following items:"; + mes "- ^0000ff10 Blade Lost in Darkness^000000"; //7023 + mes "- ^0000ff5 Cursed Ruby^000000"; //724 + mes "- ^0000ff100 Ogre Tooth^000000"; //7002 + mes "- ^0000ff1 Old Hilt^000000"; //7022 + mes "- and ^0000ff1 Emperium^000000"; + close; + + L_GetGrim: + mes "[Legendary Blacksmith]"; + mes "Good! You have brought me all the necessary items. Please wait a moment while I forge the Grimtooth Dagger."; + next; + mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)"; + next; + mes "[Legendary Blacksmith]"; + mes "Phew! Once again a perfect dagger! Hahaha! Here you are my friend, enjoy."; + getitem 1237,1; + set DOOMED_SWORD,0; + delitem 7023,10; + delitem 724,5; + delitem 7002,100; + delitem 7022,1; + delitem 714,1; + close; + +L_Mysteltain: //1138 + if(countitem(7021)>=1 && countitem(7019)>=1 && countitem(7020)>=1 && countitem(7018)>=1 && countitem(714)>=1) goto L_GetMyst; + mes "[Legendary Blacksmith]"; + mes "So you're interested in making the legendary Mysteltain Sword heh?....."; + next; + mes "[Legendary Blacksmith]"; + mes "It's been sometime since I've forged any weapons,... but since it is a special challenge for me to make this sword....."; + next; + mes "[Legendary Blacksmith]"; + mes "I'll do it! I will re-create the Mysteltain Sword! I must warn you however, this is a very powerfull and dangerous sword. Be carefull."; + next; + mes "[Legendary Blacksmith]"; + mes "For the Mysteltain Sword I will need the following items:"; + mes "- ^0000ff1 Foolishness of the Blind^000000"; //7021 + mes "- ^0000ff1 Loki's Whispers^000000"; //7019 + mes "- ^0000ff1 Mother's Nightmare^000000"; //7020 + mes "- ^0000ff1 Young Twig^000000"; //7018 + mes "- and ^0000ff1 Emperium^000000"; + close; + + L_GetMyst: + mes "[Legendary Blacksmith]"; + mes "Good! You have brought me all the necessary items. Please wait a moment while I forge the Mysteltain Sword."; + next; + mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)"; + next; + mes "[Legendary Blacksmith]"; + mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy."; + getitem 1138,1; + set DOOMED_SWORD,0; + delitem 7021,1; + delitem 7019,1; + delitem 7020,1; + delitem 7018,1; + delitem 714,1; + close; + +} diff --git a/npc/quests/fashion.txt b/npc/quests/fashion.txt new file mode 100644 index 000000000..e14d35faa --- /dev/null +++ b/npc/quests/fashion.txt @@ -0,0 +1,70 @@ +//--------------Daily Job Quest---------------\\ + +izlude.gat,135,96,5 script Fashion Glasses Quest 76,{ + mes "[Fashionable Glasses Quest]"; + mes "Hi, today's quest is...."; + mes "Ah, the ^CC6633Fashionable Glasses ^000000Quest!"; + next; + menu "Requirements",Bl,"Make Item",B2,"Cancel",Cancel; + + B2: + mes "[Fashionable Glasses Quest]"; + mes "Good good, let me just check"; + if(countitem(2276)<1)goto NoMake; + if(countitem(716)<20)goto NoMake; + if (countitem(1003)<25) goto NoMake; + next; + + mes "[Fashionable Glasses Quest]"; + mes "Give me a second....."; + + delitem 2276,1; + delitem 716,20; + delitem 1003,25; + + getitem 5047,1; + + mes "[Fashionable Glasses Quest]"; + mes "Ok done!"; + close; + + + NoMake: + mes "[Fashionable Glasses Quest]"; + mes "You don't have the requirements."; + mes "Please come back another time..."; + close; + + Bl: + mes "Ok all you have to do is"; + mes "collect-"; + mes "^CC66331 Eagle Eyes^000000"; + mes "^CC663320 Red Gemstones^000000"; + mes "and ^CC663325 Coal^000000"; + next; + + menu "Accept",Acc,"Leave",Leave; + + Acc: + mes "When you are done, bring the items to me,"; + mes "Ok good luck finding those items."; + Close; + + Leave: + mes "[Fashionable Glasses Quest]"; + mes "Maybe another time?"; + Close; + + Cancel: + mes "[Fashionable Glasses Quest]"; + mes "Aw, what a shame"; + mes "Giving up already?"; + mes "Oh well maybe you will"; + mes "participate in tommorow's"; + mes "quest."; +Close; +} + + + + diff --git a/npc/quests/juice_maker.txt b/npc/quests/juice_maker.txt new file mode 100644 index 000000000..877622c56 --- /dev/null +++ b/npc/quests/juice_maker.txt @@ -0,0 +1,308 @@ +//===== eAthena Script ======================================= +//= Juice Maker Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.3 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 fixed input number check [Lupus] +//= 1.2 fixed misplaced Grape<->Carrot juices [Lupus] +//= 1.3 added a loopless menu 'as many as possible' [Lupus] +//============================================================ + + + + +// Morrison ------------------------------------------------ +prt_in.gat,47,173,2 script Morrison 97, +{ + if(MEAT > 10) goto L_Candy; + if(MARIANNE == 10) goto L_GoAway; + + mes "[Little Morrison]"; + mes "Wahhhhh!!! Wahh... NO more! NO more!"; + mes "I won't... eat anymore stupid ^0000ffFruit^000000 things!!"; + next; + menu "Talk",M_Talk,"Cancel",M_End; + + M_Talk: + if(countitem(517) > 0) goto L_Meat; //Meat + + mes "[Little Morrison]"; + mes "Arhhggg!! I'VE HAD ENOUGH!!! I can't eat anymore ^0000ffFruits^000000!"; + mes "They taste so SOUR..... I have to PEEL them before I can eat them.....they feel sticky and squishy...... it's really ANNOYING!!!!"; + next; + mes "[LIttle Morrison]"; + mes "I just HATE FRUIT! I can't even get full off of the stuff.(~sigh~)"; + mes "Give me something more edible..... give me some...... ^ff0000MEAT^000000!!!"; + close; + + L_Meat: + mes "[Little Morrison]"; + mes "...(sniff)....(sniff)(sniff).... Oh! Is that ^ff0000Meat^000000???"; + next; + mes "[Little Morrison]"; + mes "Do you have some ^ff0000Meat^000000?!!!~(drools)~"; + mes "Umm... that yummy smell is making me SOOO HUNGRYYYY!!!l"; + next; + mes "[Little Morrison]"; + mes "... Umm... excuse me..... could you give me some of that meat PLEEAASSSE?"; + next; + menu "Give him some",sM_Give,"Ignore him",sM_Ignore; + + sM_Give: + set MORRISON,1; + set MEAT,MEAT + 1; + delitem 517,1; //Meat + + mes "[Little Morrison]"; + mes "Whoah~!!! It's real Meat, Meat!"; + mes "Mmmm! It makes my mouth water."; + mes "Oh thank you. Now I feel happy. Yum Yum..."; + close; + sM_Ignore: + set MORRISON,2; + + mes "[Little Morrison]"; + mes "Boo..."; + mes "Boo... Fine... Alright, Alright~!!! Selfish meanie!"; + close; + M_End: + mes "[Little Morrison]"; + mes "Wahhhhh!!! No matter how hard I try, I just can't eat Vegetables or ^0000ffFruit^000000! They're plain disgusting!!"; + close; + +L_GoAway: + mes "[Little Morrison]"; + mes "Pffff... Leave me alone! You DON'T CARE about me! I'm gonna DIE because of these stupid Veggies and Fuits so MIND your own business!"; + close; +L_Candy: + mes "[Little Morrison]"; + mes "Ah..I am full now."; + mes "You don't have to feed me any more. I think I am gonna BURST if i keep eating more."; + next; + mes "[Little Morrison]"; + mes "And... um... Take this."; + next; + getitem 529,3; + getitem 530,1; + set MEAT,0; + + mes "[Little Morrison]"; + mes "It is from my secret stash of Candy that I hide from my Mom. Since you gave me some Meat, I will give you some candy." ; + close; + +} + +// Housewife Marianne --------------------------------------------------- +prt_in.gat,49,172,2 script Housewife Marianne 53, +{ + if(MORRISON == 1) goto L_GaveMeat; + if(MORRISON == 2) goto L_Juice; + + mes "[Housewife Marianne]"; + mes "Morrison!! Please eat some fruit will ya? Fruit~!"; + mes "*Sob*~!! Like father like son..."; + next; + menu "Talk",M_Talk,"Cancel",M_Cancel; + close; + + M_Talk: + mes "[Housewife Marianne]"; + mes "(~Sigh~)...This is Morrison... My one and only son."; + mes "He's going through some kinda faze and doesn't want to eat any ^0000ffFruits^000000 or vegetables. Look at his face, it turns sour just hearing about ^0000fffFruit^000000..."; + next; + mes "[Housewife Marianne]"; + mes "All he wants to eat is but ^ff0000Meat^000000... (sigh)...he needs ^0000ffFruits^000000 and vegetables for a proper diet."; + next; + close; + + M_Cancel: + mes "[Housewife Marianne]"; + mes "Morrison!! I will get mad at you if you keep doing this!"; + close; + +L_GaveMeat: + set MORRISON,0; + + mes "[Housewife Marianne]"; + mes "Oh MY GOD!!... Oh lord..."; + next; + mes "[Housewife Marianne]"; + mes "WHAT ARE YOU DOING!! HOW DARE YOU feed my son!! And ^ff0000MEAT^000000 of all things!!!"; + next; + mes "[Housewife Marianne]"; + mes "Arrrgh~~!! Get Lost right now!!!!!!"; + close; + +L_Juice: + set MORRISON,0; + set MARIANNE,1; + + mes "[Housewife Marianne]"; + mes "Thank you for not giving my son any meat. I'm trying to feed him ^0000ffFruits^000000 and vegetables, but this child doesn't want to eat anything except Meat..."; + next; + mes "[Housewife Marianne]"; + mes "What if I could turn ^0000ffFruits^000000 into a ^0000ffJuice^000000... for example...Orange juice... Would my child like it?"; + next; + mes "[Housewife Marianne]"; + mes "Ah! Now I remember..There is a town where you can get a variety of ^0000ffFruit^000000 turned into ^0000ffFruit Juices^000000."; + next; + mes "[Housewife Marianne]"; + mes "... Was is it...^ff0000Payon^000000...or ^ff0000Morroc^000000...?"; + next; + close; + +} + +// Juicer Marx Hansen ----------------------------------------------------------------------- +payon_in01.gat,5,48,3 script Juicer Marx Hansen 86, +{ + mes "[Juicer Marx Hansen]"; + if(MARIANNE == 1) goto L_Juice; + mes "Welcome to my shop. What brings you here?"; + next; + menu "Conversation",M_0a,"I am just looking around",M_0b; + + M_0a: + mes "[Juicer Marx Hansen]"; + mes "In the earliest years of humanity, fruits were the only substanace availble for people to eat."; + mes "Fruits were vital for survival and without them people faced certain death."; + mes "During that time Mother Nature was worshiped for her generous offerering."; + next; + mes "[Juicer Marx Hansen]"; + mes "Nowadays food is plentifull and it comes in a variety of flavors and forms."; + mes "With so many other things to eat, fruits aren't consumed as much as they used to be."; + mes "This is especially true among kids who'd rather eat pizza and candy."; + next; + mes "[Juicer Marx Hansen]"; + mes "Because of this I wanted to find a way to make young people realize the importance of fuit."; + mes "I found that when fruits were turned into juices, they became more digestive and even tasty enough for kids."; + close; + M_0b: + mes "[Juicer Marx Hansen]"; + mes "Ok then."; + close; + +L_Juice: + mes "Welcome to my shop. Do you come here to process Fruits like the rest?"; + next; + + menu "Yes, I do.",M_1a,"How do you make fruit juice?",M_1b,"No, I don't.",M_1End; + + M_1a: + mes "[Juicer Marx Hansen]"; + mes "So what kind of fruit juice would you like to process?"; + next; + menu "Apple Juice",sM_1a,"Banana Juice",sM_1b,"Grape Juice",sM_1c,"Carrot Juice",sM_1d,"Nope, I'm fine.",sM_1End; + + sM_1a: + set @FRUIT,512; + set @JUICE,531; + goto sL_Make; + sM_1b: + set @FRUIT,513; + set @JUICE,532; + goto sL_Make; + sM_1c: + set @FRUIT,514; + set @JUICE,533; + goto sL_Make; + sM_1d: + set @FRUIT,515; + set @JUICE,534; + + sL_Make: + mes "[Juicer Marx Hansen]"; + mes "How many bottles would you like?"; + next; + menu "I'll tell you.",sL_Make_InputN, "As many as possible",-, "I've changed my mind.",sM_1End; + + set @FRUITNUM,100; //max possible amount of Juice + //calc max possible # juices + if(Zeny/3 < @FRUITNUM) set @FRUITNUM,Zeny/3; + if(countitem(@FRUIT) < @FRUITNUM) set @FRUITNUM,countitem(@FRUIT); + if(countitem(713) < @FRUITNUM) set @FRUITNUM,countitem(713); + if(@FRUITNUM > 0) goto sL_Make_Max; + mes "[Juicer Marx Hansen]"; + mes "Doh! You don't have enough ingredients for a single bottle of juice."; + emotion 0; + close; + + sL_Make_Max: + delitem @FRUIT,@FRUITNUM; //del Fruit + delitem 713,@FRUITNUM; //del Empty Bottle + set Zeny,Zeny-@FRUITNUM*3; + getitem @JUICE,@FRUITNUM; //get Juice + goto sL_Make_Got; + + sL_Make_InputN: + mes "[Juicer Marx Hansen]"; + mes "Very well then. How many bottles would you like?"; + mes "Enter 0 if you don't want any."; + next; + input @input; + + if(@input < 1) goto sM_1End; + set @FRUITNUM,(3*@input); + set @ZENYNUM,(3*@input); + if(countitem(@FRUIT) < @FRUITNUM) goto sl_Fruits; + if(countitem(713) < @input) goto sl_Bottles; + if(Zeny < @ZENYNUM) goto sl_Zeny; + + delitem @FRUIT,@FRUITNUM; //del Fruit + delitem 713,@input; //del Empty Bottle + set Zeny,Zeny - @ZENYUM; //get Juice + getitem @JUICE,@input; + sL_Make_Got: + mes "[Juicer Marx Hansen]"; + mes "Here you are. Take it."; + close; + + + sl_Fruits: + mes "[Juicer Marx Hansen]"; + mes "You don't have enough fruit."; + if (@FRUIT == 512) mes "You need "+@FRUITNUM+" apples to make that much apple juice."; + if (@FRUIT == 513) mes "You need "+@FRUITNUM+" bannanas to make that much bannana juice."; + if (@FRUIT == 514) mes "You need "+@FRUITNUM+" grapes to make that much grape juice."; + if (@FRUIT == 515) mes "You need "+@FRUITNUM+" carrots to make that much carrot juice."; + next; + goto M_1a; + close; + + sl_Bottles: + mes "[Juicer Marx Hansen]"; + mes "You don't have enough bottles. You need "+@input+" empty bottle(s) to make that many juice drinks."; + next; + goto M_1a; + + sl_Zeny: + mes "[Juicer Marx Hansen]"; + mes "You don't have enough zeny. You need "+@ZENYNUM+" zeny, to make that many juice drinks."; + next; + goto M_1a; + + sM_1End: + mes "[Juicer Marx Hansen]"; + mes "Oh well... see you next time."; + close; + + M_1b: + mes "[Juicer Marx Hansen]"; + mes "# Fruit Juice Info #"; + mes "Apple Juice - Apple x 3 ea, Empty Bottle x 1 ea, 3 zeny."; + mes "Banane Juice - Banana x 3 ea, Empty Bottle x 1 ea, 3 zeny."; + mes "Carrot Juice - Carrot x 3 ea, Empty Bottle x 1 ea, 3 zeny."; + mes "Grape Juice - Grape x 3 ea, Empty Bottle x 1 ea, 3 zeny."; + close; + + M_1End: + close; +} + diff --git a/npc/quests/magicalhatquest.txt b/npc/quests/magicalhatquest.txt new file mode 100644 index 000000000..86bb6dfbe --- /dev/null +++ b/npc/quests/magicalhatquest.txt @@ -0,0 +1,40 @@ +geffen.gat,126,107,5 script Magic Pimp Hat Dude 51,{ + mes "[Magic Pimp Hat Dude]"; + mes "Huh! What do you want?"; + mes "Ohh, I see, you want me to make you something"; + mes "Well if you want this Magican Hat here is a list of the items I need you to go out and get them for me:"; + mes "1 Wizard Hat"; + mes "1 Bathory Card"; + mes "and 200,000z for my efforts"; + next; + mes "[Magic Pimp Hat Dude]"; + mes ". . . . . ."; + mes "Are you ready for me to make this magical item?"; + next; + menu "Sure am!",LSureAm,"These requirements are unfathomable!",LUnfathomable; + + LSureAm: + mes "[Magic Pimp Hat Dude]"; + if((countitem(2252) < 1) || (countitem(4119) < 1) || (Zeny < 200000)) goto LNotEnough; + mes ". . . . ."; + delitem 2252,1; + delitem 4119,1; + set Zeny,Zeny-200000; + mes "Wow! You are brave indeed!"; + getitem 5045,1; + mes ". . . . ."; + mes "Enjoy your Magical Hat!"; + close; + + LNotEnough: + mes ". . . . ."; + mes ". . .I'm sorry .. You don't have enough money and items .."; + mes "I can't afford to make this if you don't bring all materials needed. Please understand this is to benefit heroes such as yourself!"; + close; + + LUnfathomable: + mes ". . . . ."; + mes "What I had to go through was more unfathomable.."; + mes "If you succeed in getting these items, you will have incredible strength!"; + close; +} diff --git a/npc/quests/monstertamers.txt b/npc/quests/monstertamers.txt new file mode 100644 index 000000000..e4de4498f --- /dev/null +++ b/npc/quests/monstertamers.txt @@ -0,0 +1,443 @@ +//===== eAthena Script ======================================= +//= Monster Tamers +//===== By: ================================================== +//= kobra_k88, Darkchild, x[tsk] +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Cute pet quest items +//===== Additional Comments: ================================= +//= May not have all of the Monster Tamers, but the ones here are fully working. +//============================================================ + + + + +//<================================================= Alberta ===============================================>\\ +alberta_in.gat,173,77,3 script Monster Tamer 125, +{ + mes "[Monster Tamer Iwado]"; + mes "Monster taming has never been more popular than it is now! Why not join in on all of the excitement?...."; +M_Menu: + next; + menu "^5555FFMonster Taming^000000",M_0, + "^5555FF'Monster Juice'^000000",M_1, + "^5555FF'Singing Flower'^000000",M_2, + "^5555FF'Wild Flower'^000000",M_3, + "Please make one for me",M_Make, + "Cancel",M_End; + M_0: + mes "[Monster Tamer Iwado]"; + mes "Monster Taming is the way in which players can get certain monsters to become their pets."; + mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet."; + next; + mes "[Monster Tamer Iwado]"; + mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle."; + next; + mes "[Monster Tamer Iwado]"; + mes "Here the Taming Items that I offer:"; + mes "^5555FF'Monster Juice'^000000"; + mes "^5555FF'Singing Flower'^000000"; + mes "^5555FF'Wild Flower'^000000"; + next; + mes "[Monster Tamer Iwado]"; + mes "These are fantastic items! You should really give them a try!"; + goto M_Menu; + M_1: + mes "[Monster Tamer Iwado]"; + mes "It is a drink made from animal blood. It's nothing a person would want to drink, but for the monster '^FF5555'Hunter Fly'^000000, it's a delicacy."; + next; + mes "[Monster Tamer Iwado]"; + mes "I can give you a ^5555FF'Monster Juice'^000000 in exchange for:"; + mes "-^FF5555'1 Animal Gore'"; + mes "-'2 Apples'^000000"; + next; + mes "[Monster Tamer Iwado]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_2: + mes "[Monster Tamer Iwado]"; + mes "The flower of a Singing Plant. It is a very unique and unusual item that seems to attract ^FF5555'Rockers'^000000."; + next; + mes "[Monster Tamer Iwado]"; + mes "I can give you a ^5555FF'Singing Flower'^000000 in exchange for:"; + mes "-^FF5555'1 Singing Plant'^000000"; + next; + mes "[Monster Tamer Iwado]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_3: + mes "[Monster Tamer Iwado]"; + mes "This flower blooms naturally here in Rune-Midgard. It can be used as armor for your ^FF5555Orc Warrior^000000 pet."; + mes "I can give you a ^5555FF'Wild Flower'^000000 in exchange for:"; + mes "-^FF5555'1 Fancy Flower'"; + mes "-'1 Clover'^000000"; + next; + mes "[Monster Tamer Iwado]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_Make: + mes "[Monster Tamer Iwado]"; + mes "Which Taming Item would you like?"; + next; + menu "^5555FF'Monster Juice'^000000",sM_1, "^5555FF'Singing Flower'^000000",sM_2, "^5555FF'Wild Flower'^000000",sM_3, "Cancel",M_End; + + sM_1: + if(countitem(702)<1 || countitem(512)<2) goto sL_NoItems; + mes "[Monster Tamer Iwado]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer Iwado]"; + mes "Here you are! A Monster Juice! Enjoy and feel free to come back anytime."; + getitem 626,1; + delitem 702,1; + delitem 512,2; + close; + sM_2: + if(countitem(707)<1) goto sL_NoItems; + mes "[Monster Tamer Iwado]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer Iwado]"; + mes "Here you are! A Singing Flower! Enjoy and feel free to come back anytime."; + getitem 629,1; + delitem 707,1; + close; + sM_3: + if(countitem(2207)<1 || countitem(705)<1) goto sL_NoItems; + mes "[Monster Tamer Iwado]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer Iwado]"; + mes "Here you are! A Wild Flower! Enjoy and feel free to come back anytime."; + getitem 10009,1; + delitem 2207,1; + delitem 705,1; + close; + + sL_NoItems: + mes "[Monster Tamer Iwado]"; + mes "It looks like you don't have enough items to exchange for this tame. Please come back when you do."; + close; + M_End: + mes "[Monster Tamer Iwado]"; + mes "Oh... I see. You probably haven't decided on what monster to raise as a pet yet. It's a very important decision, so please, take your time."; + close; + +} + + +//<================================================= Al De Baran ===============================================>\\ +aldeba_in.gat,167,177,3 script Monster Tamer 125, +{ + mes "[Monster Tamer YuU]"; + mes "You must be looking for some Taming Items.... When it comes to making Taming Items there is no one better than me here in Rune Midgard."; +M_Menu: + next; + menu "^5555FF'Monster Taming'^000000",M_0, + "^5555FF'Skull Helm'^000000",M_1, + "^5555FF'Monster Oxygen Mask'^000000",M_2, + "^5555FF'Silk Ribbon'^000000",M_3, + "^5555FF'Stellar Hairpin'^000000",M_4, + "^5555FF'Tiny Egg Shell'^000000",M_5, + "^5555FF'Rocker Glasses'^000000",M_6, + "Please make one for me",M_Make, + "Cancel",M_End; + M_0: + mes "[Monster Tamer YuU]"; + mes "Monster Taming is the way in which players can get certain monsters to become their pets."; + mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet."; + next; + mes "[Monster Tamer YuU]"; + mes "Once you obtain a pet, you must show it love and appreciation. This is the most important part of monster taming."; + next; + mes "[Monster Tamer YuU]"; + mes "The best way to show your new pet you care, is to get it an 'Accessory' to make it stand out from the rest of the monsters in Rune Midgard."; + next; + mes "[Monster Tamer YuU]"; + mes "These ^5555FF'Cute Pet Accessories'^000000 are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle."; + next; + mes "[Monster Tamer YuU]"; + mes "Here the Taming Items that I offer:"; + mes "^5555FF'Skull Helm'"; + mes "'Monster Oxygen Mask'"; + mes "'Silk Ribbon'"; + mes "'Stellar Hairpin'"; + mes "'Tiny Egg Shell'"; + mes "'Rocker Glasses'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "These are fantastic items! You should really give them a try!"; + goto M_Menu; + M_1: + mes "[Monster Tamer YuU]"; + mes "It may be disgusting, but it has a mysterious power that has the potential to make its wearer go crazy!"; + mes "This item will look great on your '^FF5555'Baphomet Jr.'^000000 pet."; + next; + mes "[Monster Tamer YuU]"; + mes "I can give you a ^5555FF'Skull Helm'^000000 in exchange for:"; + mes "-^FF5555'1 Bone Helm'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_2: + mes "[Monster Tamer YuU]"; + mes "Once worn it makes it difficult to tell whether or not the wearer is a monster or a human."; + mes "A great gift for your ^FF5555'Choncon', 'Steel Choncon', or 'Hunter Fly'^000000."; + next; + mes "[Monster Tamer YuU]"; + mes "I can give you a ^5555FF'Monster Oxygen Mask'^000000 in exchange for:"; + mes "-^FF5555'1 Oxygen Mask'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_3: + mes "[Monster Tamer YuU]"; + mes "It's a high quality ribbon knitted out of smooth silk. It will make your pet ^FF5555'Lunatic'^000000 look even cuter!."; + next; + mes "[Monster Tamer YuU]"; + mes "I can give you a ^5555FF'Silk Ribbon'^000000 in exchange for:"; + mes "-^FF5555'1 Ribbon (0 Slotts)'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_4: + mes "[Monster Tamer YuU]"; + mes "It is extremely sharp and possesses a mysterious power that makes monsters want to wear it."; + mes "Your ^FF5555'Green Petite'^000000 will love wearing this!"; + next; + mes "[Monster Tamer YuU]"; + mes "I can give you a ^5555FF'Stellar Hairpin'^000000 in exchange for:"; + mes "-^FF5555'1 Stellar'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_5: + mes "[Monster Tamer YuU]"; + mes "This seems to have a peculiar scent and a magnificent shine! It can be used as armor for your ^FF5555'Picky'^000000."; + mes "I can give you a ^5555FF'Tiny Egg Shell'^000000 in exchange for:"; + mes "-^FF5555'1 Egg Shell'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_6: + mes "[Monster Tamer YuU]"; + mes "Mysterious pair of eye glasses which make its wearer look like a geek. It's perfect for your ^FF5555Rocker^000000 pet."; + next; + mes "[Monster Tamer YuU]"; + mes "I can give you a pair of ^5555FF'Rocker Glasses'^000000 in exchange for:"; + mes "-^FF5555'1 Ribbon (0 Slotts)'"; + mes "-'2 Zargon'"; + mes "-'400 Zeny'^000000"; + next; + mes "[Monster Tamer YuU]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_Make: + mes "[Monster Tamer YuU]"; + mes "Which Taming Item would you like?"; + next; + menu "^5555FF'Skull Helm'^000000",sM_1, + "^5555FF'Monster Oxygen Mask'^000000",sM_2, + "^5555FF'Silk Ribbon'^000000",sM_3, + "^5555FF'Stellar Hairpin'^000000",sM_4, + "^5555FF'Tiny Egg Shell'^000000",sM_5, + "^5555FF'Rocker Glasses'^000000",sM_6, + "Cancel",M_End; + + sM_1: + if(countitem(5017)<1) goto sL_NoItems; + mes "[Monster Tamer YuU]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer YuU]"; + mes "Here you are! A Skull Helm! Enjoy and feel free to come back anytime."; + getitem 10001,1; + delitem 5017,1; + close; + sM_2: + if(countitem(5004)<1) goto sL_NoItems; + mes "[Monster Tamer YuU]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer YuU]"; + mes "Here you are! A Monster Oxygen Mask! Enjoy and feel free to come back anytime."; + getitem 10002,1; + delitem 5004,1; + close; + sM_3: + if(countitem(2208)<1) goto sL_NoItems; + mes "[Monster Tamer YuU]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer YuU]"; + mes "Here you are! A Silk Ribbon! Enjoy and feel free to come back anytime."; + getitem 10007,1; + delitem 2208,1; + close; + sM_4: + if(countitem(2294)<1) goto sL_NoItems; + mes "[Monster Tamer YuU]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer YuU]"; + mes "Here you are! Stellar Hairpin! Enjoy and feel free to come back anytime."; + getitem 10011,1; + delitem 2294,1; + close; + sM_5: + if(countitem(5015)<1) goto sL_NoItems; + mes "[Monster Tamer YuU]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer YuU]"; + mes "Here you are! A Tiny Egg Shell! Enjoy and feel free to come back anytime."; + getitem 10012,1; + delitem 5015,1; + close; + sM_6: + if(countitem(2208)<1 || countitem(912)<2 || Zeny<400) goto sL_NoItems; + mes "[Monster Tamer YuU]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer YuU]"; + mes "Here you are! A pair of Rocker Glasses! Enjoy and feel free to come back anytime."; + getitem 10014,1; + delitem 2208,1; + delitem 912,2; + set Zeny, Zeny-400; + close; + + sL_NoItems: + mes "[Monster Tamer YuU]"; + mes "It looks like you don't have enough items to exchange for this tame. Please come back when you do."; + close; + M_End: + mes "[Monster Tamer YuU]"; + mes "Oh... I see. You probably haven't decided on what monster to raise as a pet yet. It's a very important decision, so please, take your time."; + close; + +} + + +//<================================================= Izlude ===============================================>\\ +izlude_in.gat,128,64,3 script Monster Tamer 125, +{ + mes "[Monster Tamer Shogo]"; + mes "Are you pre-occupied with gathering items for your cute pets, and want a break? Then let us find those items for you....."; +M_Menu: + next; + menu "^5555FFMonster Taming^000000",M_0, + "^5555FF'Book of Devil'^000000",M_1, + "^5555FF'No Recipient'^000000",M_2, + "^5555FF'Horror of Tribe'^000000",M_3, + "Please make one for me",M_Make, + "Cancel",M_End; + M_0: + mes "[Monster Tamer Shogo]"; + mes "Monster Taming is the way in which players can get certain monsters to become their pets."; + mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet."; + next; + mes "[Monster Tamer Shogo]"; + mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle."; + next; + mes "[Monster Tamer Shogo]"; + mes "Here the Taming Items that I offer:"; + mes "^5555FF'Book of Devil'^000000,"; + mes "^5555FF'No Recipient'^000000,"; + mes "^5555FF'Horror of Tribe'^000000."; + next; + mes "[Monster Tamer Shogo]"; + mes "These are fantastic items! You should really give them a try!"; + goto M_Menu; + M_1: + mes "[Monster Tamer Shogo]"; + mes "This book is far too powerfull for any mere mortal to read and contains the secret method of summoning a devil!"; + mes "Use it to lure the monster ^FF5555'Deviruchi.'^000000."; + next; + mes "[Monster Tamer Shogo]"; + mes "I can give you a ^5555FF'Book of Devil'^000000 in exchange for:"; + mes "-^FF5555'1 Old Magic Book'"; + mes "-'2 Horrendous Mouth'^000000"; + next; + mes "[Monster Tamer Shogo]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_2: + mes "[Monster Tamer Shogo]"; + mes "An old letter which wasn't delivered because of an unkown recipient."; + mes "It has no meaning to any living human, but ^FF5555'Munaks'^000000 seem to be very fond of it."; + next; + mes "[Monster Tamer Shogo]"; + mes "I can give you a ^5555FF'No Recipient'^000000 in exchange for:"; + mes "-^FF5555'1 Old Portrait'^000000"; + next; + mes "[Monster Tamer Shogo]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_3: + mes "[Monster Tamer Shogo]"; + mes "This trophy is an ^FF5555'Orc Warrior's'^000000 favorite item."; + mes "I can give you a ^5555FF'Horror of Tribe'^000000 in exchange for:"; + mes "-^FF5555'1 Chivalry Emblem'"; + mes "-'1 Scorpion Tail'^000000"; + next; + mes "[Monster Tamer Shogo]"; + mes "Once you bring me these items I will make this Taming item with the uttmost pride!"; + goto M_Menu; + M_Make: + mes "[Monster Tamer Shogo]"; + mes "Which Taming Item would you like?"; + next; + menu "^5555FF'Book of Devil'^000000",sM_1, "^5555FF'No Recipient'^000000",sM_2, "^5555FF'Horror of Tribe'^000000",sM_3, "Cancel",M_End; + + sM_1: + if(countitem(1006)<1 || countitem(958)<2) goto sL_NoItems; + mes "[Monster Tamer Shogo]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer Shogo]"; + mes "Here you are! A Book of Devil! Enjoy and feel free to come back anytime."; + getitem 642,1; + delitem 1006,1; + delitem 958,2; + close; + sM_2: + if(countitem(7014)<1) goto sL_NoItems; + mes "[Monster Tamer Shogo]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer Shogo]"; + mes "Here you are! A No Recipient! Enjoy and feel free to come back anytime."; + getitem 636,1; + delitem 7014,1; + close; + sM_3: + if(countitem(1004)<1 || countitem(904)<1) goto sL_NoItems; + mes "[Monster Tamer Shogo]"; + mes "Alright, just a minute while I prepare the tame......"; + next; + mes "[Monster Tamer Shogo]"; + mes "Here you are! A Horror of Tribe! Enjoy and feel free to come back anytime."; + getitem 635,1; + delitem 1004,1; + delitem 904,1; + close; + + sL_NoItems: + mes "[Monster Tamer Shogo]"; + mes "It looks like you don't have enough items to exchange for this tame. Please come back when you do."; + close; + M_End: + mes "[Monster Tamer Shogo]"; + mes "Oh... I see. You probably haven't decided on what monster to raise as a pet yet. It's a very important decision, so please, take your time."; + close; + +} diff --git a/npc/quests/mrsmile.txt b/npc/quests/mrsmile.txt new file mode 100644 index 000000000..e4d6fbd80 --- /dev/null +++ b/npc/quests/mrsmile.txt @@ -0,0 +1,92 @@ +//===== eAthena Script ======================================= +//= Mr. Smile Quest +//===== By: ================================================== +//= kobra_k88, Akaru +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working. 1.1 Optimized +//============================================================ + + + +// Alberta ------------------------------------------------------------------------------------------ +alberta.gat,113,53,3 script Smile Assistance::SmileAT 92, +{ + npctalk strcharinfo(0)+ " , you suck."; + mes "[Smile Assistant]"; + mes "Hi, I'm a Smile Assistance. How may I help you?"; + next; + menu "^0099FFMr. Smile^000000?",M_0, "Construct a ^0099FFMr. Smile^000000",M_1, "Quit",M_End; + + M_0: + mes "[Smile Assistant]"; + mes "Oh, the Mr. Smile Event is a nationwide event that is being sponsered by ^0099FFHis Majesty Tristram the 3rd^000000."; + mes "The goal of the event is to get the citizens of Rune Midgard to put on happy looking Mr. Smile masks."; + next; + mes "[Smile Assistance]"; + mes "By having this event, His Majesty wishes to encourage the people of Rune Midgard to have more fun and enjoy themselves!"; + mes "As you may have guessed, the Mr. Smile mask is simply a smiley face."; + next; + mes "[Smile Assistance]"; + mes "Although it may be simple, no one can argue the power of a smile! And if everybody in the kingdom were to wear one...."; + mes "just imagine how much joy and cheer the world would see!"; + next; + mes "[Smile Assistant]"; + mes "As a Smile Assistant, it is my job to make a Mr. Smile mask for all of those who want one."; + mes "All I need to make the mask are some little items, namely:"; + mes "^5555FF10 Jellopy^000000"; + mes "^5555FF10 Fluff^000000"; + mes "^5555FF10 Clover^000000"; + next; + mes "[Smile Girl]"; + mes "The world could use more smiles so get those items and come back soon. I'll be waiting right here."; + close; + M_1: + mes "[Smile Assistant]"; + if((countitem(705) < 10) | (countitem(909) < 10) | (countitem(914) < 10)) goto sL_NoItems; + mes "Oh, great! You've brought back all of the items needed. Wait just a sec while I get your Mr. Smile ready....."; + next; + mes "~!shook!~!shook!~!clack!~!clack!~!tok!~!tok!~"; + next; + mes "[Smile Assistant]"; + mes "Here ya go, your very own Mr. Smile!"; + delitem 705,10; + delitem 909,10; + delitem 914,10; + getitem 2278,1; + next; + mes "[Smile Assistant]"; + mes "The Mr. Smile Event is just one of the many ways His Majesty Tristam the 3rd is trying to make life more enjoyable here in Rune Midgard."; + next; + mes "[Smile Assistant]"; + mes "Hopefully you will be reminded of that fact everytime you put on your Mr. Smile."; + close; + + sL_NoItems: + mes "Oh... Unfortunately you don't have enough items for a Mr. Smile. What you need are:"; + mes "^5555FF10 Jellopy^000000,"; + mes "^5555FF10 Fluff^000000,"; + mes "^5555FF10 Clover^000000,"; + mes "I'll be waiting here so hurry back."; + close; + M_End: + close; +} + +// Aldebaran -------------------------------------------------------------------------------- +aldebaran.gat,136,135,4 duplicate(SmileAT) Smile Assistance#2 92 +// Geffen ----------------------------------------------------------------------------------- +geffen.gat,119,107,4 duplicate(SmileAT) Smile Assistance#3 92 +// Izlude ----------------------------------------------------------------------------------- +izlude.gat,129,118,4 duplicate(SmileAT) Smile Assistance#4 92 +// Morroc ----------------------------------------------------------------------------------- +morocc.gat,158,97,4 duplicate(SmileAT) Smile Assistance#5 92 +// Payon ------------------------------------------------------------------------------------ +payon.gat,187,104,4 duplicate(SmileAT) Smile Assistance#6 92 +// Prontera --------------------------------------------------------------------------------- +prontera.gat,186,104,4 duplicate(SmileAT) Smile Assistance#7 92 diff --git a/npc/quests/munak.txt b/npc/quests/munak.txt new file mode 100644 index 000000000..92a26da0b --- /dev/null +++ b/npc/quests/munak.txt @@ -0,0 +1,54 @@ +izlude_in.gat,115,76,5 script Evan 47,{ +mes "[Evan]"; +mes " "; +mes "*sighs*"; +next; +mes "[Evan]"; +mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a pretty girl ..."; +next; +mes "[Evan]"; +mes "...so why am I sad?"; +mes " "; +mes "It's because I don't even know how she looks like...say, if you can find me and 'Old Portrait' of her, I'll give you her lover's lost letter!"; +next; +mes "[Evan]"; +mes "Whaddaya say? ..pal?"; + + menu "What do I need again?",ExItems,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd; + + ExItems: + mes "[Evan]"; + mes "A picture of her lovely face..."; + mes " "; + mes "An 'Old Portrait' preferrably..."; + close; + + ExCreate: + mes "[Evan]"; + mes "Really!! You'll help me!"; + next; + if(countitem(7014)<1) goto NoItem; + goto ExGive; + + NoItem: + mes "[Evan]"; + mes "Waahhhh, stop playing with my feelings!"; + mes " "; + mes "Go away!"; + close; + + ExGive: + mes "[Evan]"; + mes "YES! I am forever in your debt!"; + delitem 7014,1; + getitem 636,1; + mes " "; + mes "Here is lover's lost letter as promised! Again - Thank you!"; + close; + + ExEnd: + mes "[Evan]"; + mes "*sighs*"; + close; +close; +} diff --git a/npc/quests/quests_alberta.txt b/npc/quests/quests_alberta.txt new file mode 100644 index 000000000..1051567a2 --- /dev/null +++ b/npc/quests/quests_alberta.txt @@ -0,0 +1,683 @@ +//===== eAthena Script ======================================= +//= Items Quest NPC's located in Alberta +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Dolls Quest +//= Boy's Cap Quest +//= Antlers Quest +//= Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin Quests +//= Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat Quests +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Fixed Spore Doll exploit [Lupus], 1.2 Gramp's Tiger skin label bug +//============================================================ + + + +//=======================================================================================================// +// Doll Quest +//=======================================================================================================// +alberta.gat,117,134,8 script Elin 96, +{ + + mes "[Elin]"; + if(Sex == 0) mes "Hello, miss. Since you're a girl, you must like dolls, don't you?"; + if(Sex == 1) mes "Hello, mister. Hmm, since you're a boy, you don't like dolls, do you?"; + next; + mes "[Elin]"; + mes "I LOVE dolls!!"; + emotion 14; + next; + mes "[Elin]"; + mes "Ya know..... I REALLY, REALLY, want a new doll. I hope daddy is going to buy me one for my birthday....."; + next; + menu "Aww, you must be happy...",M_1,"How about I give you one now?",M_2; + + M_1: + mes "[Elin]"; + mes "Yeah, this time I'm hoping for a Yoyo doll. Hehe, they're so cute! They're my FAVORITE!"; + emotion 33; + close; + M_2: + mes "[Elin]"; + mes "Oh my goodness! Really?? You're such a sweetie.... gimme, gimme!!"; + mes "What kinda doll are you going to give me? Are you really gonna give me one?"; + emotion 0; + next; + menu "Puppet",sM_1,"Poring doll",sM_2,"Chonchon doll",sM_3,"Rocker doll",sM_4, "Spore doll",sM_5, + "Osiris doll",sM_6,"Baphomet doll",sM_7,"Racoon doll",sM_8,"Yoyo doll",sM_9, "I am as adorable as a doll!",sM_10; + + sM_1: + if(countitem(740) < 1) goto L_Liar; + mes "[Elin]"; + mes "Wow--! It's a rabbit! It's SOOOO cute!! Thank you SOOO much!"; + emotion 14; + next; + mes "[Elin]"; + mes "It's SOOO fluffy... Oh yeah! Let me give you a present too!"; + next; + mes "(diggs around in her pockets)"; + next; + mes "[Elin]"; + mes "Ummm ... found it! Here take this!"; + next; + delitem 740,1; + getitem 530,1; + mes "[Elin]"; + mes "I got this from Santa. It's a candy cane~"; + next; + mes "[Elin]"; + mes "Thanks again for the rabbit doll! I'm gonna HUG this to sleep EVERY night~"; + emotion 15; + close; + + + sM_2: + if(countitem(741) < 1) goto L_Liar; + mes "[Elin]"; + mes "Yay! It's a poring doll! It's SOOOO cute! Since you gave me a doll I'll give you this...."; + emotion 14; + next; + delitem 741,1; + getitem 529,1; + mes "[Elin]"; + mes "Thank you for the doll!"; + emotion 15; + close; + + + sM_3: + if(countitem(742) < 1) goto L_Liar; + mes "[Elin]"; + mes "Ew whats this?.... a Chonchon ... doll? ..."; + emotion 16; + next; + mes "[Elin]"; + mes "Oh well, since you're giving it to me, I guess it's ok ...."; + next; + mes "[Elin]"; + mes "Well here's a little something for giving me the doll. Don't eat too much or you'll get cavities."; + delitem 742,1; + getitem 530,1; + next; + mes "[Elin]"; + mes ".... chonchon.... (~grumble, grumble~)"; + emotion 7; + close; + + sM_4: + if(countitem(752) < 1) goto L_Liar; + mes "[Elin]"; + mes "Oh! a Rocker doll. I hate hopping things but this doll's kinda cute."; + next; + mes "[Elin]"; + mes "Thank you. Let me give you something too."; + next; + mes "[Elin]"; + mes "Hmm, didn't I get some stuff from my uncle ..."; + next; + mes "[Elin]"; + mes "Here it is. We've got tons of it at home so I'll share some with you~"; + delitem 752,1; + getitem 532,7; + next; + mes "[Elin]"; + mes "Thanks again for the doll!"; + emotion 15; + close; + + sM_5: + if(countitem(743) < 1) goto L_Liar; + mes "[Elin]"; + mes "Blehh .... It's a mushroom... Mom's always scolding me for not eating mushrooms ..."; + emotion 4; + next; + mes "[Elin]"; + mes "I'll take it anyway, since the doll looks cute. But I still won't eat mushrooms though ..."; + next; + mes "[Elin]"; + mes "Hmm, I'll need to give you a present too."; + next; + mes "[Elin]"; + mes "My mom made this so please take it."; + delitem 743,1; + getitem 538,5; + next; + mes "[Litte Kid]"; + mes "Thank you for the doll~"; + emotion 15; + close; + + sM_6: + if(countitem(751) < 1) goto L_Liar; + mes "[Elin]"; + mes "Yay! It's an Osiris doll!"; + next; + mes "[Elin]"; + mes "Here's something for you too."; + delitem 751,1; + getitem 522,2; + mes "[Elin]"; + mes "Thank you for the doll!"; + close; + + sM_7: + if(countitem(750) < 1) goto L_Liar; + mes "[Elin]"; + mes "Yay! It's a Baphomet doll!"; + next; + mes "[Elin]"; + mes "Here's something for you too."; + delitem 750,1; + getitem 525,5; + mes "[Elin]"; + mes "Thank you for the doll!"; + emotion 15; + close; + + sM_8: + if(countitem(754) < 1) goto L_Liar; + mes "[Elin]"; + mes "Ah, it's a Smokie doll. I hate Smokies, but the doll's really cute! Thank you!"; + emotion 33; + next; + mes "[Elin]"; + mes "Let me give you some of Grandma's home-made cake!"; + delitem 754,1; + getitem 539,3; + next; + mes "[Elin]"; + mes "They're really good so make sure you eat them ok."; + next; + mes "[Elin]"; + mes "Thanks again for this cute doll!"; + emotion 15; + close; + + sM_9: + if(countitem(753) < 1) goto L_Liar; + mes "[Elin]"; + mes "WOW--!!! OH MY GOSH! It's a Yoyo doll! This is what I REALLY wanted!! It's SOOOO cute......"; + emotion 14; + next; + mes "[Elin]"; + mes "As a thank you, I'll give you this."; + delitem 753,1; + getitem 608,1; + next; + mes "[Elin]"; + mes "Dad picked them up during his travels. It's a seed of some kind."; + mes "We tried planting them at home, but it doesn't seem to grow."; + next; + mes "[Elin]"; + mes "Anyway, thank you SOOO MUCH for the Yoyo doll!!!!"; + emotion 15; + close; + + sM_10: + mes "[Elin]"; + mes "BLAAAAAAAAHHH!! Don't make fun of me cuz I'm young!"; + emotion 32; + next; + mes "[Elin]"; + mes "(mumbles) .....'stupid'....."; + close; + + L_Liar: + mes "[Elin]"; + mes "HEY!! You don't have any dolls... I can't believe you would lie to a little kid!!!"; + emotion 0; + next; + mes "[Elin]"; + mes "You're a MEANIE!! I HATE YOU!!!..... sniff... sniff.... Waaaaaaaaaaaaaaaaaaaahhhhhh!!"; + emotion 28; + close; +} + + +//=======================================================================================================// +// Boy's Cap' Quest +//=======================================================================================================// +alberta_in.gat,28,145,4 script Grampa 120,{ + mes "[Grampa]"; + mes "Gasp ..Gasp"; + next; + mes "[Grampa]"; + mes "When I look back on my younger days... I regret not making better use of my time..."; + next; + mes "[Grampa]"; + mes "Even so I STILL feel young at heart..... unfortunately my body is very old and is in poor condtion...... Cough !! Cough .. !!"; + next; + if(countitem(1030) >= 10) menu "Talk.",M_Talk, "Show him Tiger's Footskin.",M_Show, "Cancel.",M_End; + menu "Talk",M_Talk, "Cancel",M_End; + + M_Talk: + mes "[Grampa]"; + mes "Listen to me..... You must take care of your body as best you can...."; + mes "If you aren't serious about staying healthy now..... you will surely regret it as you get older."; + next; + mes "[Grampa]"; + mes "I've tried to restore my body to its youthful, healthy state with all of the best herbs and medicines that money can buy...."; + next; + mes "[Grampa]"; + mes "Not only have none of them worked, but their emense cost have made me bankurpt!"; + next; + mes "[Grampa]"; + mes "I have all but given up on trying to restore my youth.... there IS still one last thing I have not yet tried....."; + next; + mes "[Grampa]"; + mes "It is the ^3355FFTiger's Footskin^000000, the legendary king of rejuvination!!"; + emotion 0; + next; + mes "[Grampa]"; + mes "Have you heard of the Tiger's Footskin???....."; + emotion 1; + next; + mes "[Grampa]"; + mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!"; + mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!"; + next; + mes "[Grampa]"; + mes "It truely is amazing! Ah, if I could only get my hands on some Tiger's Footskin.... my wishes would at last come true....."; + next; + mes "[Grampa]"; + mes "For whoever brings me ^5555FF10 Tiger's Footskins^000000, I would gladly give that person my precious ^3355FFBoys Cap^000000."; + close; + + M_Show: + mes "[Grampa]"; + mes "Ohhh !! Th-This is the... this is the legendary.... TIGERS FOOTSKIN!!"; + next; + mes "[Grampa]"; + mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!"; + mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!"; + next; + mes "[Grampa]"; + mes "It is the real Tiger's Footskin !! In my wildest dreams I never thought...... P-P-Please.... I beg you.... let me have it....."; + next; + menu "-Give him the Tiger's Footskin.", sM_Give, "Walk away.", sM_End; + + sM_Give: + mes "[Grampa]"; + mes "T-Thank YOU!! Thank you SO VERY MUCH!!"; + delitem 1030,10; + getitem 5016,1; + emotion 15; + next; + mes "[Grampa]"; + mes "Now my body can be reinvigorated!!! I will eat it right away!"; + close; + + sM_End: + mes "[Grampa]"; + mes "H-He-Hey!! Young one!! W-Wa-it! Please.... come back... I beg you.... come... back.... ooohh... foot.... sk... i... n...."; + close; + + M_End: + mes "[Grampa]"; + mes "Cough Cough !! .. Tiger ....Tiger's ..... Foot ..... skin .....Cough Cough !!"; + close; + + +} + + +//=======================================================================================================// +// Antlers Quest +//=======================================================================================================// +alberta_in.gat,122,53,4 script Cherokee 47,{ + mes "[Cherokee]"; + mes "Hey there, I am a Horn Collector. Sounds great, huh?"; + next; + mes "[Cherokee]"; + mes "What do you think about Animal horns? I think they are very valuable and are well worth collecting."; + mes "You can wear them on your head, or even decorate your house with them."; + next; + mes "[Cherokee]"; + mes "You know.... there has been a particular horn that I have not been able to find. It is the ^5555FF'Evil Horn '^000000.."; + next; + mes "[Cherokee]"; + mes "Some say that an Evil Horn is really not an animal's horn, but one that comes from a Devil!"; + mes "Even so, I really wish I could get my hands on one."; + next; + mes "[Cherokee]"; + mes "Say.... do you have any ^5555FF'Evil Horns'^000000?"; + mes "If you offer me ^5533FF20 Evil Horns^000000, I will give you my precious and famed, ^FF3355'Antlers'^000000. Is it a deal?"; + next; + menu "You got it!",M_0, "Shut up Dumbo.",M_End; + + M_0: + mes "[Cherokee]"; + if(countitem(923) < 20) goto L_NotEnuf; + delitem 923,20; + mes "Whoah~! This is the first time I've ever seen a real ^3355FF'Evil Horn'^000000!!"; + emotion 5; + next; + mes "[Cherokee]"; + mes "Thank you! Here are the Antlers just as I promised you!"; + emotion 15; + getitem 2284,1; + next; + mes "[Cherokee]"; + mes "With your great help I was finally able to realize my long time dream. I appreciate what you have done! God Bless You .."; + close; + + L_NotEnuf: + mes "Hmm.... like I said, I need ^FF5533'20 Evil Horns'^000000."; + close; + + M_End: + mes "[Cherokee]"; + mes "Well aren't you a rude person.... I will forgive you however, seeing as we will meet again, I'm sure...."; + close; +} + + +//=======================================================================================================// +// Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin +//=======================================================================================================// +alberta.gat,120,53,3 script Zic 51, +{ + mes "[Zic]"; + mes "Yay! A cool breeze! That's why I love the sea!!"; + emotion 2; + next; + mes "[Zic]"; + mes "Huh?... Do you have any business with me? You came to me because I'm a merchant right?"; + emotion 20; + next; + mes "[Zic]"; + mes "~Sigh!~ I get tired of my reputation.... I can't get any peace or quite around here....."; + next; + mes "[Zic]"; + mes "So what do you wanna get? Tell me, tell me! It's so easy to guess what you want....."; + next; + menu "-Bao Bao",M_0, "-Cresent Hairpin",M_1, "-Fashionable Glasses",M_2, "-Heart Hairpin",M_3; + + M_0: + mes "[Zic]"; + mes "To make a Bao Bao I will need:"; //5042 + mes "- ^5555FF1 Silk Ribbon^000000,"; //10007 + mes "- ^5555FF50 Herioc Emblems^000000."; //968 + next; + mes "[Zic]"; + mes "Would you like me to make you one?"; + next; + menu "Sure.",sM_0a, "No thanks.",M_End; + + sM_0a: + if (countitem(10007)<1 || countitem(968)<50) goto sL_NotEnuf; + mes "[Zic]"; + mes "Please wait while I make your Bao Bao......"; + next; + mes "[Zic]"; + mes "There you are, one Bao Bao. Enjoy."; + getitem 5042, 1; + delitem 10007, 1; + delitem 968, 50; + close; + M_1: + mes "[Zic]"; + mes "To make a Cresent Hairpin I will need:"; //5048 + mes "- ^5555FF1 Heart Hair Pin^000000,"; //5041 + mes "- ^5555FF10 Steel^000000."; //999 + next; + mes "[Zic]"; + mes "Would you like me to make you one?"; + next; + menu "Sure.",sM_1a, "No thanks.",M_End; + + sM_1a: + if (countitem(5041)<1 || countitem(999)<10) goto sL_NotEnuf; + mes "[Zic]"; + mes "Please wait while I make your Cresent Hairpin......"; + next; + mes "[Zic]"; + mes "There you are, one Cresent Hairpin. Enjoy."; + getitem 5048, 1; + delitem 5041, 1; + delitem 999, 10; + close; + M_2: + mes "[Zic]"; + mes "To make a pair of Fashionable Glasses I will need:"; //5047 + mes "- ^5555FF1 Jack a Dandy^000000,"; //2271 + mes "- ^5555FF1 Scarlet Dyestuffs^000000."; //975 + next; + mes "[Zic]"; + mes "Would you like me to make you one?"; + next; + menu "Sure.",sM_2a, "No thanks.",M_End; + + sM_2a: + if (countitem(2271)<1 || countitem(975)<1) goto sL_NotEnuf; + mes "[Zic]"; + mes "Please wait while I make your Fashionable Glasses......"; + next; + mes "[Zic]"; + mes "There you are, one Fashionable Glasses. Enjoy."; + getitem 5047, 1; + delitem 2271, 1; + delitem 975, 1; + close; + M_3: + mes "[Zic]"; + mes "Are you sure you want a simple item like this? Oh well... To make a Heart Hairpin I will need:"; //5041 + mes "- ^5555FF1200 Coral Reefs^000000."; //7031 + emotion 20; + next; + mes "[Zic]"; + mes "Would you like me to make you one?"; + next; + menu "Sure.",sM_3a, "No thanks.",M_End; + + sM_3a: + if (countitem(7031)<1200) goto sL_NotEnuf; + mes "[Zic]"; + mes "Please wait while I make your Hear Hairpin......"; + next; + mes "[Zic]"; + mes "There you are, one Heart Hairpin. Enjoy."; + getitem 5041, 1; + delitem 7031, 1200; + close; + + sL_NotEnuf: + mes "[Zic]"; + mes "Hmm.... you don't have enough items for me to make it. Come back some other time."; + close; + + M_End: + mes "[Zic]"; + mes "See ya around."; + close; +} + + +//=======================================================================================================// +// Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat +//=======================================================================================================// +alberta.gat,135,79,3 script Tempestra 71, +{ + mes "[Tempestra]"; + mes "Ah...... Such a cool breeze. It's good to be next to the sea. I think it was the right choice for me to take a break from my business and come here."; + emotion 2; + if(TEMPESTRA == 1) goto sM_Menu; + next; + mes "[Tempestra]"; + mes "Oh the sun is so bright today. I'm glad I brought my hat. If my skin is exposed to the sun like this everyday, I'm sure to get a sunburn."; + next; + mes "[Tempestra]"; + mes "Boy, the heat is making me thirsty. Nothing would be better right now, than sipping on a perfectly chilled yellow potion....."; + next; + menu "Here you go, my treat.",M_0, "Then go get one, sheesh....",M_1; + + M_0: + if(countitem(503) < 1) goto L_NoPot; + set TEMPESTRA, 1; + mes "[Tempestra]"; + mes "Oooh! Thank you so much. I'm so glad to meet such a friendly person here...."; + emotion 15; + next; + mes "[Tempestra]"; + mes "(~gulp~gulp~)"; + next; + mes "[Tempestra]"; + mes "Hyaaaaaaa!! It's sooo cold!! Thank you."; + sM_Menu: + next; + menu "The weather is really hot, isn't it...",sM_0, "You should wear a hat.",sM_1; + + sM_0: + mes "[Tempestra]"; + mes "Yes, it's very hot indeed....."; + next; + mes "[Tempestra]"; + mes "Luckly I brought a lot of hats along. I have"; + mes "a ^5555FF'Sunday Hat'^000000,"; + mes "a ^5555FF'Mage Hat'^000000,"; + mes "a ^5555FF'Magician Hat'^000000, and more in my room..."; + next; + mes "[Tempestra]"; + mes "I brought these hats with me so that I could sell them and use the money I made for my vacation expenses...."; + mes "but now it looks like I'll have to wear one....."; + ssM_Menu: + next; + menu "Sunday Hat?",ssM_0a, "Mage Hat?",ssM_0b, "Magician Hat?",ssM_0c, "End Conversation.",ssM_End; + + ssM_0a: + mes "[Tempestra]"; + mes "A Sunday Hat is made up of:"; + mes "- ^5555FF250 Fabric^000000,"; + mes "- ^5555FF1 Slotted Hat^000000,"; + mes "- ^5555FF1 Slotted Cap^000000,"; + mes "- ^5555FF600 Soft Feathers^000000."; + mes "If you want, I can make one for you. Just bring me all of those items."; + if (countitem(1059)<250 || countitem(2221)<1 || countitem(2227)<1 || countitem(7063)<600) goto ssM_Menu; + next; + menu "Make one for me.",-, "Cancel",ssM_End; + + mes "[Tempestra]"; + mes "Please wait just a moment while I make it........"; + next; + getitem 5032, 1; + delitem 1059, 250; + delitem 2221, 1; + delitem 2227, 1; + delitem 7063, 600; + mes "[Tempestra]"; + mes "All done... one Sunday Hat just for you. Thank you and come back any time."; + emotion 15; + close; + ssM_0b: + mes "[Tempestra]"; + mes "A Mage Hat is made up of:"; + mes "- ^5555FF1 Wizard Hat^000000,"; + mes "- ^5555FF400 Dragon Scales^000000,"; + mes "- ^5555FF50 Mould Powder^000000,"; + mes "- ^5555FF1 Elder Wilow Card^000000."; + mes "If you want, I can make one for you. Just bring me all of those items."; + if (countitem(2252)<1 || countitem(1036)<400 || countitem(7001)<50 || countitem(4052)<1) goto ssM_Menu; + next; + menu "Make one for me.",-, "Cancel",ssM_End; + + mes "[Tempestra]"; + mes "Please wait just a moment while I make it........"; + next; + getitem 5027, 1; + delitem 2252, 1; + delitem 1036, 400; + delitem 7001, 50; + delitem 4052, 1; + mes "[Tempestra]"; + mes "All done... one Mage Hat just for you. Thank you and come back any time."; + emotion 15; + close; + ssM_0c: + mes "[Tempestra]"; + mes "A Magician Hat is made up of:"; + mes "- ^5555FF1 Wizard Hat^000000,"; + mes "- ^5555FF450 Ancient Lips^000000,"; + mes "- ^5555FF1200 Solid Shells^000000,"; + mes "If you want, I can make one for you. Just bring me all of those items."; + if (countitem(2252)<1 || countitem(1054)<450 || countitem(943)<1200) goto ssM_Menu; + next; + menu "Make one for me.",-, "Cancel",ssM_End; + + mes "[Tempestra]"; + mes "Please wait just a moment while I make it........"; + next; + getitem 5045, 1; + delitem 2252, 1; + delitem 1054, 450; + delitem 943, 1200; + mes "[Tempestra]"; + mes "All done... one Magician just for you. Thank you and come back any time."; + emotion 15; + close; + ssM_End: + close; + + sM_1: + mes "[Tempestra]"; + mes "Oh but the hats I have are for sale.... if I use them for myself I won't be able to sell them to my customers."; + next; + mes "[Tempestra]"; + mes "Because you gave me the potion, I would like to make something for you. Unfortuately I don't have any materials right now."; + next; + mes "[Tempestra]"; + mes "Hmm... If you have:"; + mes "^5555FF1 Amblem of the Sun God"; + mes "10 Gold"; + mes "40 Steel"; + mes "50 Coal"; + mes "and 2 Oridecon^000000.........."; + next; + mes "[Tempestra]"; + mes "I can make you a ^5555FF'Hat of the Sun God'^000000!! It's a fantastic piece of work! How's that sound?"; + next; + menu "Alright.",ssM_1a, "Not right now thanks.",ssM_1b; + + ssM_1a: + if(countitem(7086)<1 || countitem(969)<10 || countitem(999)<40 || countitem(1003)<50 || countitem(984)<2) goto ssL_NotEnuf; + mes "[Tempestra]"; + mes "Please wait just a moment while I make it........"; + next; + getitem 5022, 1; + delitem 7086, 1; + delitem 969, 10; + delitem 999, 40; + delitem 1003, 50; + delitem 984, 2; + mes "[Tempestra]"; + mes "All done... one Hat of the Sun God just for you. Thank you again for the potion, and please come back any time."; + emotion 15; + close; + + ssL_NotEnuf: + mes "[Tempestra]"; + mes "Um.... where are those items exactly???"; + emotion 20; + close; + ssM_1b: + mes "[Tempestra]"; + mes "Come back anytime when you've changed your mind."; + close; + + L_NoPot: + mes "[Tempestra]"; + mes "Umm... excuse me but.... where is the potion??"; + emotion 20; + close; + + M_1: + mes "[Tempestra]"; + mes "..... How RUDE!!"; + emotion 0; + close; +} diff --git a/npc/quests/quests_aldebaran.txt b/npc/quests/quests_aldebaran.txt new file mode 100644 index 000000000..b21bd9601 --- /dev/null +++ b/npc/quests/quests_aldebaran.txt @@ -0,0 +1,93 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Aldebaran +//===== By: ================================================== +//= +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= 'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quests. +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Fixed Doctor Band items [Lupus] +//============================================================ + + +//=======================================================================================================// +// 'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quest +//=======================================================================================================// +aldeba_in.gat,152,166,4 script Trader 86,{ + mes "[Trader]"; + mes "Muhahaha! I am the Very Famous Enigmatic Dealer! I am always hustling and bustling in and out of Rune Midgard!"; + mes "Take a look at my RARE and UNIQUE items from ALL OVER the WORLD!!"; + next; + mes "(1) · ^3355FFDoctor Band^000000 :"; + mes "^FF55331 Red Bandana + 50 Iron + 1 Cracked Diamond + 3500 Zeny^000000."; + mes "(2) · ^3355FFFeather Bonnet^000000 :"; + mes "^FF55331 Romantic Gent + 300 Feather of Birds + 500 Zeny^000000."; + mes "(3) · ^3355FFOpera Masque^000000 :"; + mes "^FF553320 Iron + 1 Singing Plant + 5000 Zeny^000000."; + mes "(4) · ^3355FFSakkat Hat^000000 :"; + mes "^FF5533120 Trunk + 10000 Zeny^000000."; + next; + menu "Doctor Band",M_0, "Feather Bonnet",M_1, "Opera Masque",M_2, "Sakkat",M_3; + + M_0: + mes "[Trader]"; + if ((countitem(2275) == 0) || (countitem(998) < 50) || (Zeny < 3500)) goto L_CantMake; //Items: Red Bandana, Iron, + delitem 2275,1;//Items: Red Bandana, + delitem 998,50;//Items: Iron, + set Zeny,Zeny - 3500; + mes "Hmm.... Do you have a.... MEDICAL LICENSE?!"; + emotion 1; + next; + mes "[Trader]"; + mes "I've heard about a well-known unlicensed physician 'Cuwaki'... I hope you don't get caught...."; + mes "Anyways it's your own buisness what you do... Take this."; + getitem 2273,1;//Items: Doctor Band, + close; + M_1: + mes "[Trader]"; + if ((countitem(2247) == 0) || (countitem(916) < 300) || (Zeny < 500)) goto L_CantMake;//Items: Romantic Gent, Feather of Birds, + delitem 2247,1;//Items: Romantic Gent, + delitem 916,300;//Items: Feather of Birds, + set Zeny,Zeny - 500; + mes "Umhahaha. You have good fashion sense. I know you had a hard time collecting these items, but this bonnet is definately worth it. Take it."; + emotion 18; + getitem 5018,1;//Items: Feather Bonnet, + close; + M_2: + mes "[Trader]"; + if ((countitem(998) < 20) || (countitem(707) == 0) || (Zeny < 5000)) goto L_CantMake;//Items: Iron, Singing Plant, + delitem 998,20;//Items: Iron, + delitem 707,1;//Items: Singing Plant, + set Zeny,Zeny - 5000; + mes "This is a pretty nice item. A little bit creepy looking though.... I think it gives off some kinda weird vibe. What do you think?"; + next; + mes "[Trader]"; + mes ".. You like it ..Alright.. Take it!"; + getitem 2281,1;//Items: Opera Masque, + close; + M_3: + mes "[Trader]"; + if ((countitem(1019) < 120) || (Zeny < 10000)) goto L_CantMake;//Items: Trunk, + delitem 1019,120;//Items: Trunk, + set Zeny,Zeny - 10000; + mes "If you have a chance to visit the Village of Payon, please go meet the Sakkat Craftsman."; + mes "He's never sold a Sakkat to any other dealer but to me."; + next; + mes "[Trader]"; + mes "Because only I can recognize a Sakkat hats' quality. Due to the fact that it's so rare, the Sakkat Hat has become a very popular item!"; + next; + mes "[Trader]"; + mes "OK! Take it!"; + getitem 2280,1;//Items: Sakkat, + close; + + L_CantMake: + mes "You, fool! Check the requirements again..... you're not some kinda idiot are you? C'mon..... give me a break."; + emotion 6; + close; +} + diff --git a/npc/quests/quests_comodo.txt b/npc/quests/quests_comodo.txt new file mode 100644 index 000000000..79e8ebe97 --- /dev/null +++ b/npc/quests/quests_comodo.txt @@ -0,0 +1,277 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Comodo +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests. +//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', +//= 'Phantom of the Opera Mask' Quests. +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + +//============================================================================================// +// Hair Ornament Girl +//============================================================================================// +// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband +//================================================== +comodo.gat,227,158,4 script Hair Ornament Girl 700, +{ + mes "[Hair Ornament Girl]"; + if(sex==1)mes "Oh, hi. Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her."; + if(sex==0)mes "Oh, hi. Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get."; + next; + mes "[Hair Ornament Girl]"; + mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band! Here, take a look at these...."; +M_Menu: + next; + menu "-Crosss Hat Hairband",M_Cross, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End; + + M_Cross: + set @BAND$, "Cross Hat Hairband"; + set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000."; + if (countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1; + goto sL_0; + + M_Bulb: + set @BAND$, "Bulb Hairband"; + set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000."; + if (countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2; + goto sL_0; + + M_Striped: + set @BAND$, "Striped Hairband"; + set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000."; + if (countitem(1099)>=1500) set @GETBAND, 3; + goto sL_0; + + M_Blue: + set @BAND$, "Blue Hairband"; + set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000."; + if (countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4; + + sL_0: + mes "[Hair Ornament Girl]"; + mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":"; + mes @ITEMS$; + next; + if (@GETBAND > 0) goto sL_GetBand; + + mes "[Hair Ornament Girl]"; + mes "Bring me all of these items and I will be able to make you a "+@BAND$+"."; + goto M_Menu; + + sL_GetBand: + mes "[Hair Ornament Girl]"; + mes "I see that you have enough items for a "+@BAND$+". Would you like me to make you one?"; + next; + menu "Yes, I would.",sM_Yes, "No thank you.",M_End; + + sM_Yes: + if (@GETBAND == 1) goto ssL_Cross; + if (@GETBAND == 2) goto ssL_Bulb; + if (@GETBAND == 3) goto ssL_Striped; + if (@GETBAND == 4) goto ssL_Blue; + + ssL_Cross: + delitem 2608,1; + delitem 7069,500; + getitem 5036,1; + goto ssL_End; + ssL_Bulb: + delitem 2233,1; + delitem 746,20; + getitem 5034,1; + goto ssL_End; + ssL_Striped: + delitem 1099,1500; + getitem 5049,1; + goto ssL_End; + ssL_Blue: + delitem 2211,1; + delitem 978,1; + delitem 7003,300; + getitem 5052,1; + ssL_End: + mes "[Hair Ornament Girl]"; + mes "Here is your "+@BAND$+". Thank you."; + set @GETBAND, 0; + close; + + M_End: + mes "[Hair Ornament Girl]"; + mes "Hope to see you again soon."; + close; + +} + + +//===================================================================================================// +// Mari Isac +//===================================================================================================// +// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask' +//===============================================================// +comodo.gat,274,137,5 script Mari Isac 702, +{ + mes "[Mari Isac]"; + mes "I travel all over the world and get to hear many interesting stories from the people I meet."; + mes "Sometimes they even teach me how to make special items"; + next; + mes "[Mari Isac]"; + mes "Would you be interested in some of the items I've learned to make?"; +M_Menu: + next; + menu "Tell me about them.",M_0, "Make me one.",M_1; + + M_0: + menu "-Mine Helmet",sM_Mine, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom; + + sM_Mine: + mes "[Mari Isac]"; + mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen."; + next; + mes "[Mari Isac]"; + mes "The 2 most important things a miner needs are light, and head protection."; + mes "A very inventive miner was able to create something that dealt with both issues."; + next; + mes "[Mari Isac]"; + mes "He attached a light to his safety helmet and called it a Mine Helmet."; + mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:"; + mes "^5555FF1 Safety Helmet^000000,"; + mes "^5555FF1 Candle^000000,"; + mes "^5555FF1 Crystal Mirror^000000,"; + mes "^5555FF25 Steel^000000."; + next; + goto M_0; + sM_Parcel: + mes "[Mari Isac]"; + mes "I learned how to make the Parcel Hat when I traveled to Alberta. There they have a unique way of distributing mail and goods."; + next; + mes "[Mari Isac]"; + mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat."; + mes "This hat allows the delivery personel to carry numerous items on their heads. Of course they have to have good balance to use it."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items."; + mes "^5555FF150 Fabric^000000,"; + mes "^5555FF100 Resin^000000,"; + mes "^5555FF1 Cobaltblue Dyestuffs^000000."; + next; + goto M_0; + sM_Money: + mes "[Mari Isac]"; + mes "I learned how to make the Money Loser's Grief when I traveled to Morroc."; + next; + mes "[Mari Isac]"; + mes "A long time ago an honest merchant got into a conflict with a crooked guild."; + mes "Unlike the dirty guild, the merchant did not scam or cheat people."; + next; + mes "[Mari Isac]"; + mes "Because of this they attacked the merchants shop and took all of his goods."; + next; + mes "[Mari Isac]"; + mes "The merchant was devastated by the loss of his shop."; + mes "In his sadness he used the bits and pieces that were left from his shop to create a new item."; + next; + mes "[Mari Isac]"; + mes "He created the Money Loser's Grief, a symbol of his great sadness. When people see it, they can't help but feel sympathetic to the wearer."; + next; + mes "[Mari Isac]"; + mes "Many merchants now wear it to help themselves get more business. Of course it is also a reminder of the honest merchants sad tale."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items."; + mes "^5555FF1 Circlet with a single slott^000000,"; + mes "^5555FF1 Gold^000000,"; + mes "^5555FF20 Steel^000000,"; + mes "^5555FF80 Feathers^000000,"; + mes "^5555FF800 Sticky Mucus^000000."; + next; + goto M_0; + sM_Phantom: + mes "[Mari Isac]"; + mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran."; + mes "The story behind this item is that of a man's pure love........"; + next; + mes "[Mari Isac]"; + mes "There once was a man who was in love with a beautiful opera singer."; + mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask."; + next; + mes "[Mari Isac]"; + mes "He was ashamed of his appearance and could never bring himself to face the singer."; + mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace."; + next; + mes "[Mari Isac]"; + mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song."; + mes "Many people heard it and believed that there was a phantom haunting the opera house."; + next; + mes "[Mari Isac]"; + mes "The singer also heard his song, and through it she was able to feel his pain and his love for her."; + mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was."; + next; + mes "[Mari Isac]"; + mes "Too this day, the tale of the masked 'phantom' is still romantacised."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items."; + mes "^5555FF1 Opera Masque^000000,"; + mes "^5555FF50 Horrendous Hairs^000000."; + goto M_0; + + M_1: + menu "-Mine Helmet",sM_MakeMine, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan; + + sM_MakeMine: + if (countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Mine Helmet!"; + delitem 5009, 1; + delitem 5028, 1; + delitem 747, 1; + delitem 999, 25; + getitem 5031,1; + close; + sM_MakePar: + if (countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Parcel Hat!"; + delitem 1059, 150; + delitem 907, 100; + delitem 978, 1; + getitem 5023,1; + close; + sM_MakeMon: + if (countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Money Loser's Grief!"; + delitem 2233, 1; + delitem 969, 1; + delitem 999, 20; + delitem 949, 80; + delitem 938, 800; + getitem 5021,1; + close; + sM_MakePhan: + if (countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Phantom of the Opera Mask!"; + delitem 2281,1; + delitem 1048, 50; + getitem 5043, 1; + close; + + ssL_NoItems: + mes "[Mari Isac]"; + mes "You don't seem to have enough items for me to make that hat. Please come back when you do."; + close; + +} diff --git a/npc/quests/quests_geffen.txt b/npc/quests/quests_geffen.txt new file mode 100644 index 000000000..c8c46026f --- /dev/null +++ b/npc/quests/quests_geffen.txt @@ -0,0 +1,186 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Geffen +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Welding Mask and Headset Quests. +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + +//==============================================================================================// +// Blacksmith: 'Welding Mask' Quest +//==============================================================================================// +geffen_in.gat,144,166,4 script Blacksmith 63,{ + mes "[Blacksmith]"; + mes "Who am I?!........"; + emotion 0; + next; + mes "[Blacksmith]"; + mes "Iam the one and only Veteran Blacksmith here!! Haven't you heard???"; + mes "I've been working for 30 years in this hot, bloody, Hellfire!"; + emotion 21; + next; + mes "[Blacksmith]"; + mes "Since I became a Blacksmith, I invented something really incredible..... wanna hear about it?"; + next; + menu "I'd love to.",M_Yes, "Well, not really....",M_No; + + M_Yes: + mes "[Blacksmith]"; + mes "Blacksmiths are always welding metals under the HOTEST and must grueling conditions!"; + mes "The tremendous heat from the metals is so intense that it almost feels as if your face is going to burn off...."; + emotion 23; + next; + mes "[Blacksmith]"; + mes "But with my great invention, Blacksmiths no longer have to fear their faces catching on fire! I call it the ^3355FF' Welding Mask'^000000!!"; + emotion 5; + next; + mes "[Blacksmith]"; + mes "By wearing this over ones face, one will be fully protected from scorching heat and flying debirs."; + next; + mes "[Blacksmith]"; + mes "So what do you think? For ^4455FF'50 Steels'^000000 and only ^4455FF2000 Zeny^000000, I can make you one."; + next; + menu "Hm.. Not bad. Alright.",sM_Yes, "No thanks. I'd have no use for it.",sM_No; + + sM_Yes: + mes "[Blacksmith]"; + if((countitem(999) < 50) || (Zeny < 2000)) goto sL_NotEnuf; + mes "Great! I'll make one right away......."; + next; + mes "~!clonk!~!clank!~!bang!~ ~!clonk!~!clank!~!bang!~"; + next; + mes "[Blacksmith]"; + mes "Here you are, your very own Welding Mask! It was a pleasure doing buisness with you!"; + delitem 999,50; + set Zeny, Zeny - 2000; + getitem 2292,1; + close; + + sL_NotEnuf: + mes "Listen here.... I said I needed ^4455FF'50 Steels'^000000 and ^4455FF2000 Zeny^000000 to make you a Welding Mask."; + emotion 4; + close; + + sM_No: + mes "[Blacksmith]"; + mes "Oh man... Your gonna regret not getting one. Trust me sooner or later you're gonna need a ^5555FFWelding Mask^000000."; + mes "Everybody does....."; + close; + + M_No: + mes "[Blacksmith]"; + mes "Well then, stop wasting my time!"; + emotion 32; + close; +} + + +//=============================================================================================// +// Eric: Headset Quest +//=============================================================================================// +geffen_in.gat,30,71,4 script Eric 83,{ + mes "[Eric]"; + mes "Please listen to the story of my blessed grand father..."; + emotion 28; + next; + menu "Listen.",M_Listen, "Ask about Items needed.",M_Ask, "Make.",M_Make, "End Conversation.",M_End; + + M_Listen: + mes "[Eric]"; + mes "My grand father passed away few years ago.... he was very special to me....."; + next; + mes "[Eric]"; + mes "For as long as I can remember, he was always there for me."; + mes "He even took better care of me than did my own father, who was always busy with work."; + next; + mes "[Eric]"; + mes "To me, my grand father's library was always like a 'Fairyland'."; + mes "I spent most of my time there and I learned a lot of things from his vast collection of books"; + next; + mes "[Eric]"; + mes "Grand father was interested in alchemy and music, so his library was filled with many books on these subjects."; + next; + mes "[Eric]"; + mes "One day while I was in grand fathers library, I discovered an interesting design sheet....."; + mes "It was a design for what look liked 'Ear Muffs'.... underneath the drawing was a description that read:"; + next; + mes "[Eric]"; + mes "'When worn on over the ears, anything from music to the faintest whispers can be heard."; + mes "The sounds are transmitted to the ears through a thin wire. Project Name: ^5555FFHeadset^000000"; + next; + mes "[Eric]"; + mes "It was a project that my grand father was working on before he passed away.... unfortunately he was never able to finish it....."; + next; + mes "[Eric]"; + mes "That's why I made up my mind to pick up where he left off and finish his beloved project!"; + mes "I met with a few Alchemists and asked them to create a working prototype based on his plans."; + next; + mes "[Eric]"; + mes "But they were not able to understand my grand fathers concepts and therefore could not help me."; + next; + mes "[Eric]"; + mes "Even so I did not give up and decided to make it myself. So I studied and researched for many years...."; + mes "And now I have a full working knowledge of my grand fathers invention, the ^5555FFHeadset^000000!!"; + next; + mes "[Eric]"; + mes "Yet there is still one obsticale that is keeping me from making it.... I do not have the materials necessary to make my grand fathers invention!"; + next; + mes "[Eric]"; + mes "My only goal in life is to realize my grand fathers ideas and pay tribute to the man I hold so dear to my heart......."; + emotion 28; + next; + mes "[Eric]"; + mes "If only I had those materials.... Hmm... would you be iterested in this project? All I ask is that you gather the right items for me...."; + emotion 20; + close; + + M_Ask: + mes "[Eric]"; + mes "These are items needed for grand father's Headset:"; + mes "^3355FFSteel^000000 ^FF555540^000000"; + mes "^3355FFOridecon^000000 ^FF55551^000000"; + mes "^3355FFAlcohol^000000 ^FF55551^000000"; + mes "^3355FFCoal^000000 ^FF55551^000000"; + close; + + M_Make: + mes "[Eric]"; + if(countitem(999) < 40) || (countitem(984) < 1) || (countitem(970)<1) || (countitem(1003) < 1) goto L_NotEnuf; + mes "Oh this is GREAT!! You have all of the materials I need to make my grandfather's Headset!"; + emotion 5; + next; + mes "[Eric]"; + mes "Give me a few minutes to assemble it..............."; + next; + delitem 999,40; + delitem 984,1; + delitem 970,1; + delitem 1003,1; + getitem 5001,1; + mes "[Eric]"; + mes "FINALLY!! It's complete! My grand father's Headset! Please take them... without your help this wouldn't have been possible."; + emotion 0; + next; + mes "[Eric]"; + mes "Thank so very much! Because of you, I could fullfill my grand father's wish. I just know he's smiling down on me from Heaven....."; + emotion 15; + close; + + L_NotEnuf: + mes "Thank you for trying to help me but..... you don't seem to have all of the items I need....."; + emotion 4; + close; + M_End: + mes "[Eric]"; + mes "Farewell..... boo hoo...."; + emotion 28; + close; +} diff --git a/npc/quests/quests_lutie.txt b/npc/quests/quests_lutie.txt new file mode 100644 index 000000000..df68b332b --- /dev/null +++ b/npc/quests/quests_lutie.txt @@ -0,0 +1,186 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Lutie +//===== By: ================================================== +//= TonyMan +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 1.0 +//===== Description: ========================================= +//= Blush, Cake Hat, Candle, Chef Hat, Raccoon Hat, Rainbow Eggshell, +//= Spore Hat, Wonder Nutshell Quests +//===== Additional Comments: ================================= +//= +//============================================================ + +xmas.gat,117,295,3 script Titicupe 704,{ + mes "[^469ED2Titicupe^000000]"; + mes "I am the well known ^27BEB7Vending Machine Man Titicupe^000000, I am also a Wizard of the great ^9A3CA2Geffen Mage Guild^000000. I can use my special magic to make some rare items, but I need ingridients. Choose an item you want."; + next; + menu "Blush", blush,"Cake Hat",cake_hat,"Candle",candle,"Chef Hat",chef_hat,"Raccoon Hat",raccoon_hat,"Rainbow Eggshell",rainbow_egg,"Spore Hat",spore_hat,"Wonder Nutshell",wonder_nut,"Cancel",cancel; + + blush: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "100 Alice's Apron"; + next; + menu "Here. Now do your magic!",make_blush,"Cancel",cancel; + + make_blush: + if(countitem(7047)<100) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^D6294BBlush^000000, it's yours."; + delitem 7047,100; + getitem 5040,1; + close; + + cake_hat: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "10 Candy"; + mes "5 Candy Cane"; + mes "20 Piece of Cake"; + mes "10 Steel"; + mes "15 Well-baked Cookie"; + next; + menu "Here. Now do your magic!",make_cake_hat,"Cancel",cancel; + + make_cake_hat: + if((countitem(529)<10) || (countitem(530)<5) || (countitem(539)<20) || (countitem(999)<10) || (countitem(538)<15)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACake Hat^000000, it's yours."; + delitem 529,10; + delitem 530,5; + delitem 539,20; + delitem 999,10; + delitem 538,15; + getitem 5024,1; + close; + + candle: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "1 Bomb Wick"; + mes "50 Matchstick"; + mes "100 Royal Jelly"; + next; + menu "Here. Now do your magic!",make_candle,"Cancel",cancel; + + make_candle: + if((countitem(2279)<1) || (countitem(7035)<50) || (countitem(526)<100)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACandle^000000, it's yours."; + delitem 2279,1; + delitem 7035,50; + delitem 526,100; + getitem 5028,1; + close; + + chef_hat: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "450 Dragon Scale"; + mes "300 Feather"; + mes "120 Piece of Cake"; + mes " 1 White Dyestuffs"; + next; + menu "Here. Now do your magic!",make_chef_hat,"Cancel",cancel; + + make_chef_hat: + if((countitem(1036)<450) || (countitem(949)<300) || (countitem(539)<120) || (countitem(982)<1)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBAChef Hat^000000, it's yours."; + delitem 1036,450; + delitem 949,300; + delitem 539,120; + delitem 982,1; + getitem 5026,1; + close; + + raccoon_hat: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "20 Dragon Scale"; + mes "1 Kitty Band"; + mes "300 Sea-otter Fur"; + mes "200 Tough Scalelike Stem"; + next; + menu "Here. Now do your magic!",make_raccoon_hat,"Cancel",cancel; + + make_raccoon_hat: + if((countitem(1036)<20) || (countitem(2213)<1) || (countitem(7065)<300) || (countitem(7012)<200)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours."; + delitem 1036,20; + delitem 2213,1; + delitem 7065,300; + delitem 7012,200; + getitem 5033,1; + close; + + rainbow_egg: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "50 Claw of Desert Wolf"; + mes "1 Cobaltblue Dyestuffs"; + mes "1 Egg Shell"; + next; + menu "Here. Now do your magic!",make_rainbow_egg,"Cancel",cancel; + + make_rainbow_egg: + if((countitem(7030)<50) || (countitem(978)<1) || (countitem(5015)<1)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^8D4178Rainbow Egg^000000, it's yours."; + delitem 7030,50; + delitem 978,1; + delitem 5015,1; + getitem 5039,1; + close; + + spore_hat: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "300 Burnt Tree"; + mes "850 Poison Spore"; + mes "1 Tongue"; + next; + menu "Here. Now do your magic!",make_spore_hat,"Cancel",cancel; + + make_spore_hat: + if((countitem(7068)<300) || (countitem(7033)<850) || (countitem(1015)<1)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours."; + delitem 7068,300; + delitem 7033,850; + delitem 1015,1; + getitem 5029,1; + close; + + wonder_nut: + mes "[^469ED2Titicupe^000000]"; + mes "Hmm... spell ingridients are..."; + mes "1 Nut Shell"; + mes "500 Wing of Dragonfly"; + + next; + menu "Here. Now do your magic!",make_wonder_nut,"Cancel",cancel; + + make_wonder_nut: + if((countitem(5037)<1) || (countitem(7064)<500)) goto fail; + mes "[^469ED2Titicupe^000000]"; + mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours."; + delitem 5037,1; + delitem 7064,500; + getitem 5050,1; + close; + + cancel: + mes "[^469ED2Titicupe^000000]"; + mes "I bid you farewell, try not to catch a cold out here. It's ^5A9FD8freezing out here!^000000"; + close; + + fail: + mes "[^469ED2Titicupe^000000]"; + mes "I can't cast since you don't seem to have all I need..."; + close; +} diff --git a/npc/quests/quests_morocc.txt b/npc/quests/quests_morocc.txt new file mode 100644 index 000000000..4fb200c20 --- /dev/null +++ b/npc/quests/quests_morocc.txt @@ -0,0 +1,119 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Morroc +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Stop Post and Binoculars Quest. +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + +//==================================================================================// +// Stop Post Quest +//==================================================================================// +morocc_in.gat,142,100,4 script William 89,{ + mes "[William]"; + mes "Welcome to MacMillan's ^3355FF'Post'^000000 Workshop ."; + next; + mes "[William]"; + mes "My Clan, MacMillan, Has been producing professional grade Traffic Signal Posts for more than 250 years."; + mes "Nowadays we are taking special orders for our very unique, ^3355FF'Stop Post'^000000."; + next; + menu "Could I order a ^3355FF'Stop Post'^000000?",M_Order, "I'm not interested.",M_End; + + M_Order: + mes "[William]"; + mes "MacMillan's one of a kind ^3355FF'Stop Post'^000000 fits comfortably on a persons head."; + mes "Not only does it make an interesting head accessory, but it can actually be used as a stop sign as well."; + next; + mes "[William]"; + mes "I garauntee that our ^3355FF'Stop Post'^000000 will last for well over 100 years, or my name isn't MacMillan!!"; + next; + mes "[William]"; + mes "For us to make you a ^3355FF'Stop Post'^000000, we will need:"; + mes "^3355FF91100 Zeny,"; + mes "50 Wooden Blocks,"; + mes "and 1 Black Dyestuffs^000000."; + next; + if((countitem(1019) >= 50) && (countitem(983) >= 1) && (Zeny >= 91100)) goto sL_GetPost; + mes "[William]"; + mes "Come back when you have all of the items."; + close; + + sL_GetPost: + mes "[William]"; + mes "Here you are! A hand made, one of a kind, ^3355FF'Stop Post '^000000! Thank you for your patronage!"; + getitem 2272,1; + delitem 1019,50; + delitem 983,1; + set Zeny, Zeny - 91100; + emotion 15; + close; + + M_End: + mes "[William]"; + mes "Thanks for stopping by the MacMillan's Workshop. I hope to see you soon."; + close; +} + + +//==================================================================================// +// Binoculars Quest +//==================================================================================// +morocc_in.gat,76,163,4 script Alchemist 64,{ + mes "[Marius]"; + mes "Howdy! A new customer........ Wait!!! I know what you're here for....... You're interested in those magical goggles aren't you?"; + next; + menu "What is that ?",M_What, "Make",M_Make, "Ignore him",M_End; + + M_What: + mes "[Marius]"; + mes "It is actually called ^3355FF'Binoculars'^000000! It is an opitcal device that allows the wearer to see far away objects."; + next; + mes "[Marius]"; + mes "You see, when two lens are placed next to each other in front of your eyes, your brain interperets this image........ blah blah...... blah...."; + next; + mes "[Marius]"; + mes "............... What's this? You don't seem interested in what I have to say?? I don't think you realize what I'm talking about!"; + emotion 20; + next; + mes "[Marius]"; + mes "Oh c'mon! Don't be a jerk! What I'm talking about is REALLY COOL!!"; + close; + + M_Make: + mes "[Marius]"; + if(countitem(2243) < 1) || (countitem(999) < 100) goto sL_NotEnuf; + mes "Gr~~~~eat ! You'll definitely enjoy a pair of these!"; + next; + mes "[Marius]"; + mes "Here it is ! The Binoculars !"; + getitem 2296,1; + delitem 2243,1; + delitem 999,100; + set Zeny, Zeny - 50000; + next; + mes "[Marius]"; + mes "But before you go out and use them I have to tell you......"; + if(sex==0) mes "DON'T USE THEM TO BE A PEEPING TOM!!!"; + if(sex==1) mes "Becarefull where you look..... you might see someting you didn't want to........"; + close; + + sL_NotEnuf: + mes "Argggghhhhhhh !! You didn't bring enough items!! You need:"; + mes "^3355FF1 pair of Geek Glasses, and 100 Steel^000000."; + emotion 6; + close; + + M_End: + mes "[Marius]"; + mes "Hey you! You DARE IGNORE ME!! I am MARIUS the alchemist of ALCHEMISTS!!!!!"; + emotion 23; + close; +} diff --git a/npc/quests/quests_payon.txt b/npc/quests/quests_payon.txt new file mode 100644 index 000000000..a9928db31 --- /dev/null +++ b/npc/quests/quests_payon.txt @@ -0,0 +1,291 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Payon +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Pretend Murder, Ear Muffs, Oxygen, Derivuchi Cap, Helm of Angel Quests. +//===== Additional Comments: ================================= +//= Fully working +//= 1.1 Helm of Angel bug fixed [Lupus] +//= 1.2 Fixed skirt of virgin [Lupus] +//============================================================ + + + + +//==========================================================================================// +// Pretend Murdered quest +//==========================================================================================// +payon.gat,154,170,4 script Granny 78,{ + mes "[Granny]"; + if(countitem(1049) >= 4) goto L_Get; + + mes "Oh deary me. What to do... what to do........ You see I want to nitt some special clothes for my family but I don't have the right cloth to do so."; + next; + mes "[Granny]"; + mes ".....sigggghhhhhh........"; + next; + mes "[Granny]"; + mes "Why what's this? Mushrooms? Oh yes I remember now, I pick these mushrooms on the Payon Mountain side."; + mes "Ho ho, I have such a hard time remembering things now."; + next; + mes "[Granny]"; + mes "What was I saying before? Oh yes! I need some special cloth to make clothes for my family."; + mes "If you happen to come across some ^5555FF'Skirt of Virgin'^000000, please let me know."; + emotion 20; + next; + mes "[Granny]"; + mes "I need ^5555FF'4 Skirt of Virgin'^000000 to make the clothes. I will be very greatfull if you could bring me some."; + close; + +L_Get: + mes "Oh! You have 4 Skirt of Virgin. Would you be willing to give them to me dear?"; + next; + menu "Why of course granny",-,"Heck no ya old bag!",M_No; + + mes "[Granny]"; + mes "Bless your kind heart. Now I can make some special clothes for my family. Let me give you a reward for being so genrous dear."; + emotion 14; + next; + getitem 2293,1; + delitem 1049,4; + mes "[Granny]"; + mes "There you are. It's something I kept from my younger days as an actress. I was quite fetching and very popular back then."; + mes "I've kept it as a reminder of my days as an actress, but with my memory as bad as it is, it's really of no use to me anymore."; + next; + mes "[Granny]"; + mes "I'm sure you'll have fun using it at parties."; + close; + + M_No: + mes "[Granny]"; + mes "Well I never!!! Kids these days just have no respect or compasion for their elders!"; + emotion 32; + close; + +} + + +//========================================================================================// +// Ear Muffs Quest +//========================================================================================// +payon_in01.gat,18,10,4 script Mystic Lady 75,{ + mes "[Mystic Lady]"; + mes "Hi there."; + next; + menu "Hello.",-,"Please make me a pair of Ear Muffs.",M_Muffs, "End",M_End; + + mes "[Mystic Lady]"; + mes "My family and I recently came to Payon."; + mes "Where we came from the weather was very cold so we started a business hand making a special type of ^5555FF'Ear Muffs'^000000"; + next; + mes "[Mystic Lady]"; + mes "I have tried to continue the family business here in Payon but it has proven to be difficult because of the warm whether."; + next; + mes "[Mystic Lady]"; + mes "Although the 'Ear Muffs' aren't very usefull here, if you plan on going somewhere that's cold our 'Ear Muffs' are a must have."; + next; + mes "[Mystic Lady]"; + mes "All I need are:"; + mes "^5555FF1 Cursed Ruby,"; + mes "1 Headset,"; + mes "200 Feathers,"; + mes "and a 5,000 zeny fee^000000 for my labor."; + next; + mes "[Mystic Lady]"; + mes "With those items I can make you a pair of 'Ear Muffs'. Believe me, they are of the highest quality and look good on just about anybody!"; + close; + + M_Muffs: + if((countitem(724)<1) || (countitem(5001)<1) || (countitem(949)<200) || (zeny<5000)) goto sL_NotEnuf; + mes "[Mystic Lady]"; + mes "Oh, I see that you have brought all of the required items. Just a moment please..."; + next; + mes "[Mystic Lady]"; + mes "... this goes here... that goes there...... some glue here... a couple stitches over there.........."; + next; + getitem 2283,1; + delitem 724,1; + delitem 5001,1; + delitem 949,200; + set Zeny, Zeny-5000; + mes "[Mystic Lady]"; + mes "Ah, there you are! One pair of my familys' specialty Ear Muffs. Enjoy!"; + close; + + sL_NotEnuf: + mes "[Mystic Lady]"; + mes "I'm sorry but you don't have the required items for me to make you a pair of my familys' specialty Ear Muffs."; + close; + M_End: + close; + +} + + +//========================================================================================// +// Oxygen Mask Quest +//========================================================================================// +payon_in02.gat,25,71,4 script Young Man 86,{ + mes "[Young Man]"; + if(countitem(701) >= 5) goto L_GotOra; + mes "Blahhhhhh! I... I... I JUST CAN'T take it anymore!! You little stinky, filthy, BASTARDS!!!"; + emotion 6; + next; + menu "Continue.",M_Cont, "End Conversation.",M_End; + + M_Cont: + mes "[Young Man]"; + mes "~Sigh~ I've had a rough life. You see, both my parents passed away when I was a kid, so I had to work to support myself at a young age."; + next; + mes "[Young Man]"; + mes "It sure was rough. But after 10 years of hard work I was able to save up and finally buy myself a home!"; + next; + mes "[Young Man]"; + mes "Unfortunately I didn't have that much money, so I couldn't buy the home I really wanted."; + mes "Instead, I found this house..... It was big and cheap.... so I bought without really thinking my decision through....."; + next; + mes "[Young Man]"; + mes "Jeez was that a mistake...... The house turned out to be a HAVEN for THIEF BUGS!!!"; + emotion 23; + next; + mes "[Young Man]"; + mes "I tried EVERYTHING to get rid of them! I sprayed them, I smashed them, I lured them out with food........."; + mes "Finally as a last resort.... I even tried to burn the house down!!"; + next; + mes "[Young Man]"; + mes "Grrr! What will it take to get rid of these vile creatures???"; + emotion 32; + next; + mes "[Young Man]"; + mes "I've heard there is something called ^3355FF'Ora Ora'^000000, that people in other countries use to fight bugs....."; + mes "But will it work for my situation?"; + next; + mes "[Young Man]"; + mes "I'm willing to give anything a try at this point. I don't have much money so I can only afford ^5555FF'5 Ora Oras'^000000."; + mes "If you happen to come across some 'Ora Ora' please let me know."; + close; + + M_End: + mes "[Young Man]"; + mes "I'm just so tired of fighting this never ending battle against these bugs...... those dirty scumbags!!"; + emotion 32; + close; + +L_GotOra: + mes "ArrrGgghhh!! No!... It can't be!..... I think I'm going mad... they're starting to look so cute... ArrrGgghhh!!... Nooooooo!!"; + emotion 23; + M_Menu: + next; + menu "Continue",M_Cont, "Show Ora Ora",M_Show, "Give Ora Ora",M_Give, "Cancel",M_End2; + + M_Show: + mes "[Young Man]"; + mes "Oooooohhhh..... is.. is this... is this... Ora Ora...??? If you give it to me I'll give you my prized treasure in return!"; + mes "What do you say?? Is it a deal?"; + goto M_Menu; + + M_Give: + mes "[Young Man]"; + mes "Muhahahahah!!! Finally, I have it.... Ora Ora! Stupid and distgusting Thief Bugs.... you'll pay for invading MY HOME!!!"; + emotion 29; + next; + mes "[Young Man]"; + mes "..... Eh em... sorry. I was a little outa control there.... Ah, let me give you my valuable treasure......"; + emotion 4; + next; + getitem 5004,1; + delitem 701,5; + mes "[Young Man]"; + mes "By wearing this over your mouth, the air you breathe will be filltered so that you can breathe clean air."; + mes "I picked it up while I was a Sailor out at sea. I really have no need for it."; + next; + mes "[Young Man]"; + mes "Hehehehe!! I can't wait to use this Ora Ora!!!"; + close; + + M_End2: + mes "[Young Man]"; + mes "What if I CAN'T get rid of these thief bugs???... I guess the only other thing I could do is fall in love with them...... heh... heh... heh...."; + emotion 4; + close; + +} + + +//========================================================================================// +// Derivuchi Cap(Hat of Petite Diablo), Helm of Angel +//========================================================================================// +payon_in01.gat,56,12,4 script Young Man 89, +{ + mes "[Young Man]"; + mes "What is it?............"; + next; + menu "Can you make me a special item?",M_0, "Nothing.",M_End; + + M_0: + mes "[Young Man]"; + mes "I see.... so you know about me huh?.... Ok, tell me what you want."; + next; + menu "-Helm of Angel",sM_Angel, "-Deviruchi Cap(Hat of Petite Diablo)",sM_Devir, "-I'll come back later.",M_End; + + sM_Angel: + mes "[Young Man]"; + mes "For the Helm of Angel I will need:"; + mes "- ^5555FF1 Helm (slotted)^000000."; + mes "- ^5555FF1 Angel Wing^000000."; + mes "- ^5555FF5 Fang of Garm^000000."; + set @HAT, 1; + next; + goto sL_GetHat; + sM_Devir: + mes "[Young Man]"; + mes "For the Deviruchi Cap(Hat of Petite Diablo) I will need:"; + mes "- ^5555FF600 Little Evil Horn^000000."; + mes "- ^5555FF40 Talon of Griffon^000000."; + set @HAT, 2; + + sL_GetHat: + mes "[Young Man]"; + mes "Wait a moment! Be carefull about what items you give me."; + mes "I do not distinguish between equipment that has been forged or has cards attached to them."; + mes "If you don't want to loose a precious card or piece of equipment, make sure you don't have it equiped."; + next; + mes "[Young Man]"; + mes "Do you have all of the items needed?"; + menu "-Give him the items.",-, "Nevermind.",M_End; + + if(@HAT == 2) goto ssL_Devir; + + ssL_Angel: + if(countitem(2229)<1 || countitem(2254)<1 || countitem(7036)<5) goto ssL_NotEnuf; + mes "[Young Man]"; + mes "Here is your Helm of Angel."; + delitem 2229, 1; + delitem 2254, 1; + delitem 7036, 5; + getitem 5025, 1; + close; + ssL_Devir: + if(countitem(1038)<600 || countitem(7048)<40) goto ssL_NotEnuf; + mes "[Young Man]"; + mes "Here is your Deviruchi Cap(Hat of Petite Diablo)."; + delitem 1038, 600; + delitem 7048, 40; + getitem 5038, 1; + close; + ssL_NotEnuf: + mes "[Young Man]"; + mes "You don't have enough items for me to make what you want."; + close; + + M_End: + mes "[Young Man]"; + mes "Fine then....."; + close; + +} diff --git a/npc/quests/quests_prontera.txt b/npc/quests/quests_prontera.txt new file mode 100644 index 000000000..8e2d25362 --- /dev/null +++ b/npc/quests/quests_prontera.txt @@ -0,0 +1,92 @@ +//===== eAthena Script ======================================= +//= Item Quest NPCs located in Prontera +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Ph.D Hat Quest +//===== Additional Comments: ================================= +//= Fully working +//= Fixed flower name Dreamy -> Illusion +//============================================================ + + +// Ph.D Hat Quest------------------------------------------------------- +prt_in.gat,38,108,4 script Teacher 53, +{ + if((countitem(710) >= 1) && (countitem(703) >= 1) && (countitem(704) >= 1) && (countitem(708) >= 1)) goto L_Start;//Items: Illusion Flower, Hinalle, Aloe, Ment, + mes "Don't you think.... ^4444FF'flowers'^000000 are pretty?"; + next; + menu "Talk.",M_Talk, "End Conversation.",M_End; + + M_Talk: + mes "[Teacher]"; + mes "When I was young, I didn't play with friends like the other children. Instead, I spent time studing by myself."; + next; + mes "[Teacher]"; + mes "Sometimes I regret that decision.... but it doesn't really matter now. Through hard work, I was able to finish school earlier than my classmates."; + next; + mes "[Teacher]"; + mes "I was very lonely however..... when things got rough I had no one to talk to about my feelings."; + next; + mes "[Teacher]"; + mes "Then one day, I found my best friend."; + next; + mes "[Teacher]"; + mes "It was when I saw this pretty flower blooming in an abandoned garden.... I realised that it was just like me and in it, I found my best friend."; + next; + mes "[Teacher]"; + mes "Even though, to others it was just a common flower.... for me this flower meant much more. This flower gave me the strength to continue my studies."; + mes "I could achieve my goals because of her."; + next; + mes "[Teacher]"; + mes "So.. now... I am trying to repay to her. I have started studying Flowers, and It is my goal to cover the whole world in Flowers!"; + next; + mes "[Teacher]"; + mes "To accomplish my work.. I need a great deal of flowers. Unfortunately because of my studies, I can rarely go outside."; + mes "It is really hard to find as many flowers as I need."; + next; + mes "[Teacher]"; + mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000..."; + mes "If you can bring these flowers to me, I would be willing to give you a special item..."; + close; + + M_End: + mes "[Teacher]"; + mes "One of thesedays I will cover whole world in Flowers!....."; + close; + +L_Start: + mes "[Teacher]"; + mes "Oh... Those Flowers in your hand are...."; + M_Menu: + next; + menu "Show Flowers",M_Show, "Give Flowers",M_Give, "Cancel",M_End; + + M_Show: + mes "[Teacher]"; + mes "Ah... How wonderful!! These are definately the 4 kinds of Flowers I was looking for .."; + mes "The ^3355FFIllusion Flower, Hinalle, Aloe, and Ment^000000. Would you give them to me?..."; + next; + mes "[Teacher]"; + mes "If you do I'd be willing to give you a special item....."; + goto M_Menu; + + M_Give: + mes "[Teacher]"; + mes "I really, really appreciate what you've done for me!! I trully am grateful! I will give you a very special item as I promised."; + emotion 15; + next; + mes "[Teacher]"; + mes "This is the hat I wore at my Graduation Ceremony. It is a reminder of my joyfull school days at the University."; + mes "Please take it..."; + delitem 710,1;//Items: Illusion Flower, + delitem 703,1;//Items: Hinalle, + delitem 704,1;//Items: Aloe, + delitem 708,1;//Items: Ment, + getitem 5012,1;//Items: Ph.D Hat, + close; +} diff --git a/npc/quests/quests_umbala.txt b/npc/quests/quests_umbala.txt new file mode 100644 index 000000000..01cd46bf9 --- /dev/null +++ b/npc/quests/quests_umbala.txt @@ -0,0 +1,291 @@ +//===== eAthena Script ======================================= +//= Quests NPCs related to Umbala City +//===== By: ================================================== +//= sabernet09 & eAthena Team +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Umbalian Language Quest, + +//===== Additional Comments: ================================= +//= fixed by x[tsk], Lupus, PoW +//= location of the "card removing old lady" should be revised +//= Quest completion is now registered +//= 1.1 fixed Poporing Egg ID -> Poring Egg, fixed condition +//============================================================ + + + +//=========================================================================== +//this quest is related to Umbalian Chief +morocc.gat,140,156,5 script Turban Thief 58,{ + if(mask_q == 2) goto NoBus; + if(umb_quest != 1) goto AWAY; + mes "[Turban Thief]"; + mes "E'llo mah frien, would I interesst tu with this rare mask? Its value I assure you is real mah frien. Tis manific!"; + next; + mes "[Turban Thief]"; + mes "Wah? O ho ho ho, so you know thaz I steal dis from those savages no? Well I won'tz give it back. But I will for a pricez... wat you say?"; + menu "Pay 1,000,000z",MonA,"No deal",NoGo; + MonA: + next; + if(Zeny < 1000000) goto NotEnough; + mes "[Turban Thief]"; + mes "O ho ho, its a deal then!"; + set zeny,zeny-1000000; + getitem 7114,1; + set mask_q,2; + close; + NoGo: + next; + mes "[Turban Thief]"; + mes "Ahh a business man are you no? Fine, how about..."; + menu "Pay 750,000",MonB,"Nope lower",NoGoB; + MonB: + next; + if(Zeny < 750000) goto NotEnough; + mes "[Turban Thief]"; + mes "It is a done deal, no refunds!"; + set zeny,zeny-750000; + getitem 7114,1; + set mask_q,2; + close; + NoGoB: + mes "[Turban Thief]"; + mes "Hmmm... you drive a hard bargain, ok... my final offer..."; + menu "Pay 500,000",MonC,"It can go lower than that.",NoGoC; + MonC: + next; + if(Zeny < 500000) goto NotEnough; + mes "[Turban Thief]"; + mes "Alright, here you go then..."; + set zeny,zeny-500000; + getitem 7114,1; + set mask_q,2; + close; + NoGoC: + next; + mes "[Turban Thief]"; + mes "Ack! Forgez it! I can do bettaz en elsez where!"; + close; + NoBus: + mes "[Turban Thief]"; + mes "You have no more business with me, go away!"; + close; + AWAY: + mes "[Turban Thief]"; + mes "What do you wan te withz me? Be gone!"; + close; + NotEnough: + mes "[Turban Thief]"; + mes "Are youz playin wit me? You don't have ze money!"; + close; +} + +//======================================================================================// +// Umbala Language Quest +//======================================================================================// + +prontera.gat,145,290,5 script Mason 742,{ + if(ulquest == 1) goto Got; + mes "[Mason]"; + mes "Hey there, I came here to Prontera in search of an old lady who can remove cards from slots. Do you know where I can find her?"; + menu "Yes",-, "No",No; + + mes "Oooo, could you please tell me where she's at? I'd be really appreciative."; + menu "Swordsman Association",-, "Sanctuary",Boo1,"Prontera Chivalry",Boo2,"Armory",Boo3,"Kit Shop",Boo4,"Inn",Boo5,"Trading Post",Yay,"Library",Boo6,"Job Agency",Boo7,"Prontera Castle",Boo8,"City Hall",Boo9; + + next; + mes "[Mason]"; + mes "Hmm... I dunno why she would be there... guess I'll take a look."; + close; +Boo1: + next; + mes "[Mason]"; + mes "Wow I never knew she was a religious person... I'll see to it thanks."; + close; +Boo2: + next; + mes "[Mason]"; + mes "Hmm.... are you sure about that?"; + close; +Boo3: + next; + mes "[Mason]"; + mes "Why would she need to go there? I think you might be mistaken."; + close; +Boo4: + next; + mes "[Mason]"; + mes "The only thing she'd need at a Kit shop is medicine for her rheumatism. She's probably long gone from there by now."; + close; +Boo5: + next; + mes "[Mason]"; + mes "I don't think she needs to be there, she LIVES here in Prontera."; + close; +Boo6: + next; + mes "[Mason]"; + mes "Ah I see, if she's studying then I don't want to bother her. Thanks anyways."; + close; +Boo7: + next; + mes "[Mason]"; + mes "Job Agency? I don't think so. Don't lead me all around Prontera please! She's already a teacher here."; + close; +Boo8: + next; + mes "[Mason]"; + mes "The castle eh, I don't want to step in there... just doesn't feel like my style. I don't like that noble feeling of importance type of thing."; + close; +Boo9: + next; + mes "[Mason]"; + mes "O wow, did she become an important part of Prontera? I'd think she's too busy for me to visit. I'll try again later."; + close; +Yay: + next; + mes "[Mason]"; + mes "Ah, I heard that her class was somewhere around there... thanks a lot! Here's a lil something for your help."; + getitem 7117,1; + set ulquest,1; + close; +Got: + mes "[Mason]"; + mes "Yay, I found her! Thank you very much for you help!"; + close; + +No: + mes "[Mason]"; + mes "Oh..Ok..Thanks anyways"; + close; +} + +aldebaran.gat,153,212,1 script [Mojo] 740,{ + mes "[Mojo]"; + mes "Oh no! I lost my teacher's ^FF0000old magic book^000000! What am I going to do... those dumb Bathory..."; + close; +} + +amatsu.gat,267,189,4 script Marie 744,{ + if(countitem(9001)>0 && countitem(643)>0) goto ForMe; + mes "[Marie]"; + mes "Hello, is there something you need?"; + menu "No nothing at all.",Noth,"Your teacher sent me.",-; + + mes "What does he want from me?"; + next; + mes "[Marie]"; + mes "Oh wait, I see... he wants his reference scroll back am I right? Well, I'm kinda still using it buuut... I'll give it back if you can gimme a poring egg and an incubator. Those things are so cute!"; + close; +Noth: + mes "Hrrmm okay? Cya then.."; + close; +ForMe: + mes "[Marie]"; + mes "Heyyy there, you have a poring egg and the pet incubator to go with it! Are those for me?"; + menu "Yep",-, "Sorry no",DOH; + + mes "Yatta! Here's a lil something in return."; + getitem 7118,1; + delitem 9001,1; + delitem 643,1; + close; +DOH: + mes "O pooo... sigh..."; + close; +} + +yuno.gat,157,366,2 script Wise Man Fabius 743,{ + if((countitem(1006) < 1) || (countitem(7118) < 1) || (countitem(7117) < 1)) goto FIN; + delitem 1006,1; + delitem 7118,1; + delitem 7117,1; + mes "[Fabius]"; + mes "Ah, you've done well in retrieving my references. These artifacts holds information about ruins around the world, from the burning hell of the Magma Dungeon, to the strange eerie Hidden Forest of Yggsadril."; + next; + mes "[Fabius]"; + mes "But enough talk, you're just eager to get your reward aren't you? Well it may not sound much, but my reward for you is knowledge..."; + next; + mes "[Fabius]"; + mes "Actually it is knowledge of the Umbalian people. They are connected to this world of Midgard in some special way, we just can't confirm it yet. There is a theory that they may be like the elves and protect the ancient tree of Yggsadril."; + next; + mes "[Fabius]"; + mes "And I, a great wise man of Yuno, will teach you their language!"; + next; + mes "^0000FF Learned the language of Umbalians! ^000000"; + set umb_lang,2; + close; +FIN: + mes "[Fabius]"; + mes "Argh! My three students ran off with my references! Hey you! Can you get them back for me? I'll gladly reward you."; + next; + mes "[Fabius]"; + mes "From what I know, they're in different seperate towns making something out of themselves. Oh yeah, tell them I sent you, their names are Marie, Mason, and Mojo"; + close; +} + +//========================================================================================================================\\ +// Litle Quest NPC to enter the dungeon +// Fixed by Akaru +//========================================================================================================================\\ +umbala.gat,65,253,4 script Tree Guardian 752,{ + mes "[Tree Guardian]"; + mes "Stop, stranger, here is the entrance to the ancient tree!"; + next; + mes "[Tree Guardian]"; + mes "I cannot allow you to enter, you look pretty weak!"; + next; +L_MENU: + menu "Talk about tree",-, "Talk about Umbala",M_TALKUMB, "Enter Dungeon",M_DUN, "Leave",M_Leave; + + mes "[Tree Guardian]"; + mes "The tree is an ancient relique of our culture!"; + next; + mes "[Tree Guardian]"; + mes "But recently some monsters overwhelmed the tree and are now"; + mes "slowly killing the tree...like a poison...from inside.."; + next; + goto L_MENU; +M_TALKUMB: + mes "[Tree Guardian]"; + mes "We don't have many visitors in our small town.."; + next; + mes "[Tree Guardian]"; + mes "Most people don't find us or are just afraid of us!"; + next; + mes "[Tree Guardian]"; + mes "And now, we are even more unpopular, because of that damn beast!"; + next; + menu "What beast?",- ,"Leave",M_Leave; + + mes "[Tree Guardian]"; + mes "The Werewolf of course!!"; + next; + mes "[Tree Guardian]"; + mes "He is sneaking around our town and killing our soldiers at night!"; + next; + mes "[Tree Guardian]"; + mes "Hey...if you could get rid of that beast!"; + next; + mes "[Tree Guardian]"; + mes "I'll let you in!"; + next; + mes "[Tree Guardian]"; + mes "From now on we can live in peace again, thanks to you!"; + next; + mes "[Tree Guardian]"; + mes "You may enter the dungeon now!"; + set umbdun,1; + close; +M_DUN: + mes "[Tree Guardian]"; + if (umbdun != 1) mes "We do not permit weak people to enter!"; + if (umbdun != 1) close; + mes "Come on in, brave warrior!"; + warp "um_dun01.gat",42,30; +M_Leave: + close; +} diff --git a/npc/quests/quests_yuno.txt b/npc/quests/quests_yuno.txt new file mode 100644 index 000000000..9d80379d3 --- /dev/null +++ b/npc/quests/quests_yuno.txt @@ -0,0 +1,134 @@ +//===== eAthena Script ======================================= +//= Quests NPCs located in Yuno City +//===== By: ================================================== +//= DiaDz (v1.0) +//===== Current Version: ===================================== +//= 1.2 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.1 Re-did the text and re-organized the script. Corrected some items. [kobra_k88] +//= v1.2 Added part to Bro's for alchemist quest [Darkchild] +//============================================================ + + + + +//=========================================================================== +yuno_in01.gat,103,158,4 script Bain 98, +{ + set @name$, "[Bain]"; +OnStart: + mes @name$; + mes "We are going to invent a doll that can talk and communicate! Well, at least that's what I'm trying to do...."; + mes "The idea came from an old tale about a doll that acted like a real person."; + next; + mes @name$; + mes "I figure if someone had the ability to make such a doll back then, then it should definitely be possible today."; + next; + mes @name$; + mes "Unfortunately I lack the proper supplies and parts to actually try and build the doll."; + mes "Although I can buy some of the things I need, many of these items can only be taken from monsters......"; + next; + mes @name$; + mes "I am much to weak to defeat these monsters....... How will I be able to continue this project??....."; + next; + menu "I'll get the items for you.",-, "Good luck.",M_End; + + mes @name$; + mes "Really? Such benevolence is rare in this day and age. We would be grateful for you assisstance."; + mes "Here are the items that we will be needing......."; + callsub sF_List; + set sleiphnir_q, 1; + close; + + M_End: + mes @name$; + mes "We'll need a lot of luck if this is going to happen. If you know of anyone who can help us, please let us know."; + close; + +L_Check: + if((countitem(974) < 1) || (countitem(612) < 5) || (countitem(7068) < 5) || (countitem(1003) < 5) || (countitem(7043) < 5) || + (countitem(757) < 3) || (countitem(756) < 3) || (Zeny < 2000)) goto L_NotEnuf; + mes "Thank you very much! You found all of the items I needed. We could not have completed this project without your help"; + next; + delitem 974,1; + delitem 612,5; + delitem 7068,5; + delitem 1003,5; + delitem 7043,5; + delitem 757,3; + delitem 756,3; + set Zeny, Zeny-2000; + mes @name$; + if(ALCH_Q == 6) goto L_Alchemist; + + L_Other: + mes "And here is something for you, to show you how much we appreciate your help."; + getitem 2410, 1; + set sleiphnir_q, 0; + close; + + L_Alchemist: + mes "Okay, let's try this out!"; + mes "Hold on for just a second!"; + next; + mes "-Vrrrmrmrmrmrmrmrrmrmrmmrmrmrmrmmm"; + next; + mes "-Pakakakakakakakakakakakakakak"; + next; + mes "-Shakakakakakakakakakakaakakak"; + next; + mes @name$; + mes "AHHH it is a success!"; + mes "I don't know if we can do anything else, but this time we have created"; + set @wowitem,rand(2); + if(@wowitem == 0) mes "5 Ruby!"; + if(@wowitem == 0) getitem 723,5; + if(@wowitem == 1) mes "3 Gold!"; + if(@wowitem == 1) getitem 969,3; + next; + set ALCH_Q2, 2; + mes @name$; + mes "Now that we know that it works,"; + mes "I don't have any need for this."; + mes "Why don't you take it? Oh,"; + mes "and if you find anymore parts,"; + mes "bring them to me again. Heheheheh."; + next; + mes @name$; + mes "Thank for helping me out."; + mes "You have my eternal gratitude."; + mes "I wish you luck in your journeys!"; + close; + + L_NotEnuf: + mes "In case you forgot, these are the items that we will need. I suggest you write them down......"; + callsub sF_List; + close; + +sF_List: + next; + mes @name$; + mes "^5533FF1 Mixture"; + mes "5 Mini-Furnaces"; + mes "5 Burnt Trees"; + mes "5 Coal"; + mes "5 Fine Sand"; + mes "3 Rough Elunium"; + mes "3 Rough Oridecon^000000"; + next; + mes @name$; + mes "We will also need ^5533FF2,000 zeny^000000."; + mes "The money will help pay for the minor expenses invovled in the undertaking of this project. Good luck and please be safe."; + return; +} + +//===================================================================== +yuno_in01.gat,99,153,4 script Bajin 47,{ + set @name$, "[Bajin]"; + doevent "Bain::OnStart"; + close; +} diff --git a/npc/quests/skills/acolyte_skills.txt b/npc/quests/skills/acolyte_skills.txt new file mode 100644 index 000000000..6b827a8c5 --- /dev/null +++ b/npc/quests/skills/acolyte_skills.txt @@ -0,0 +1,126 @@ +//===== eAthena Script ======================================= +//= Acolyte Skill Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.0a Now using functions found in "Global_Functions.txt" +//= for class checks. +//============================================================ + + +prt_church.gat,173,23,4 script Acolyte Klift 79, +{ + mes "[Acolyte Klift]"; + if (callfunc("Is_Holy_Class")) goto L_Start; + +L_Other: + mes "Ah, welcome to the Prontera Church also known as the Sanctuary."; + mes "Unfortunately I cannot be of much help to you. For my fellow"; + mes "Priests and Acolytes however, I can help them to find their ^5555FF'hidden"; + mes "ability'^000000."; + close; + +L_Start: + if (HOLYLIGHT == 1) goto L_Check; + if (getskilllv(156)>0) goto L_GotSkill; + if(sex==1) mes "Ahh... Brother!"; + if(sex==0) mes "Ahh... Sister!"; + mes "Does the task of caring for our lost sheep tire you out? Is it too"; + mes "much of a burden? Do not despair, I am here to assist you."; + next; + menu "About an Acolyte's ^5555FF'hidden ablitiy'^000000...",M_0, "End Conversation.",M_End; + + M_0: + mes "[Acolyte Klift]"; + mes "Faced with great danger in an endless struggle with evil, our"; + mes "brethren are in much need of assistance."; + next; + mes "[Acolyte Klift]"; + mes "As acolytes approach their senior years in the clergy, they learn to"; + mes "call upon their inner power to use a special skill to aid them in"; + mes "battle."; + next; + mes "[Acolyte Klift]"; + mes "That skill is ^5555FF'Holy Light'^000000. Holy Light does damage to"; + mes "all foes but is even more effective on the undead."; + next; + mes "[Acolyte Klift]"; + mes "For someone like yourself to learn this skill, takes some hard work."; + mes "Would you like to learn this skill?"; + next; + menu "Yes, please.",-, "Let me think about it.",M_End; + + mes "[Acolyte Klift]"; + mes "Very good. You will need to find these items in order to learn the"; + mes "skill:"; + mes "^5555FF1 Opal^000000,"; + mes "^5555FF1 Crystal Bule^000000,"; + mes "and ^5555FF1 Rosary^000000."; + next; + mes "[Acolyte Klift]"; + mes "Of course you will also need to have a sufficient level of"; + mes "experience. Namely a ^5555FFjob level of at least 30^000000. This does"; + mes "not apply to Priests or Monks however, because of the vast amount of"; + mes "experience they already have."; + next; + mes "[Acolyte Klift]"; + mes "Come back when you are ready. I will be here."; + set HOLYLIGHT, 1; + close; + M_End: + mes "[Acolyte Klift]"; + mes "I understand your zeal. You have much time yet to practice and gain"; + mes "experience. Go forth with many blessings..."; + close; + +L_Check: + mes "So, are you ready for the Holy Light training? Let me check...."; + next; + mes "[Acolyte Klift]"; + if (Class==Job_Acolyte && JobLevel<30) goto L_LowLvl; + if (countitem(727)<1 || countitem(991)<1 || countitem(2608)<1) goto L_NoItems; + + mes "Oh! Very good. You have brought back all of the items I asked for."; + next; + mes "[Acolyte Klift]"; + mes "Ok lets get started..."; + next; + mes "(after hours of praying and meditation)"; + next; + mes "[Acolyte Klift]"; + mes "Yes! I feel it. You have released your hidden abilities and can now"; + mes "use ^5555FFHoly Light^000000!"; + delitem 727,1; + delitem 991,1; + delitem 2608,1; + skill 156,1,0; + set HOLYLIGHT, 0; + mes "[Priest]"; + mes "You have done well. May God bless you!"; + emotion 21; + close; + + L_LowLvl: + mes "I'm sorry but you need more training before I can teach you Holy"; + mes "Light. Come back when your job level is at least 30."; + close; + L_NoItems: + mes "I'm sorry but you don't have the required items for Holy Light."; + mes "You need:"; + mes "^5555FF1 Opal^000000,"; + mes "^5555FF1 Crystal Bule^000000,"; + mes "and ^5555FF1 Rosary^000000."; + close; + +L_GotSkill: + mes "Ah, I see you have been using Holy Light. It is such a great skill"; + mes "that I truly believe it to be a gift from the lord himself. May"; + mes "God be with you always."; + close; +} diff --git a/npc/quests/skills/archer_skills.txt b/npc/quests/skills/archer_skills.txt new file mode 100644 index 000000000..4b8650d08 --- /dev/null +++ b/npc/quests/skills/archer_skills.txt @@ -0,0 +1,210 @@ +//===== eAthena Script ======================================= +//= Archer Skill Quest +//===== By: ================================================== +//= eAthena dev team +//===== Current Version: ===================================== +//= 1.0 a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Arrow crafting, Arrow Repel skills +//===== Additional Comments: ================================= +//= v1.0 Roberto message text is based off RO npc. Jason message +//= text is custom from old version. +//= All items are from official quests though.[kobra_k88] +//= v1.0a Now using functions found in "Global_Functions.txt" +//= for class checks.[kobra_k88] +//============================================================ + + + +//<======================== Roberto: Arrow crafting =========================>\\ +morocc.gat,121,109,5 script Roberto 88, +{ + mes "[Roberto]"; + if (callfunc("Is_Bow_Class")) goto L_Start; + +L_Other: + mes "Eh?... First time seeing an archer of something? Why don't you just"; + mes "go about your business and leave me be. I only talk to high level"; + mes "Archer types........"; + emotion 1; + close; +L_Start: + if (Class==Job_Archer && JobLevel<35) goto L_LowLvl; + if (getskilllv(147)>0) goto L_GotSkill; + if (ARWCRFT == 1) goto L_GetSkill; + mes "Hmmm?.... Oh you seem to be a high level Archer type. Why don't we"; + mes "converse for a while, eh? Let me start off by talking about my"; + mes "childhood.... . . . . . . . . . . ."; + next; + mes "[Roberto]"; + mes "When I turned 15, I decided I'd work for a Blacksmith........"; + next; + mes "[Roberto]"; + mes "............... ~(blah blah blah)~..................."; + next; + mes "[Roberto]"; + mes ".... man was my Junior Prom a mess..........."; + next; + mes "[Roberto]"; + mes "..~(blah blah)~........ ~(blah blah)~........."; + next; + mes "(many grueling hours later.....)"; + next; + mes "[Roberto]"; + mes "So that's how I found out how to create all of these different"; + mes "kinds of arrows for myself. It definately comes in handy."; + next; + mes "[Roberto]"; + mes "Say, would you like me to teach you? We've had such a nice talk"; + mes "that I feel like can trust you with this knowledge......."; + next; + menu "Zzz... Eh!! Uh, Arrows... making... yes, teach.",M_0, "Zzzzz... Eh! uh... where am I????",M_1; + + M_0: + mes "[Roberto]"; + mes "Alright then! In order for me to teach you the art of ^5533FF'Arrow"; + mes "Crafting'^000000, you must first bring me these items:"; + mes "^FF335520 Resin,"; + mes "7 Poison Spores,"; + mes "41 Pointed Scales,"; + mes "13 Trunks,"; + mes "1 Red potion^000000"; + set ARWCRFT, 1; + emotion 5; + close; + M_1: + mes "[Roberto]"; + mes "................................................................"; + emotion 7; + next; + mes "[Roberto]"; + mes "Let me teach you this special skill.... It's called, my boot up"; + mes "your A........"; + emotion 32; + next; + mes "!!!!SMACK!!!!"; + percentheal -5,0; + close; + +L_GetSkill: + if ((countitem(907)<20) || (countitem(7033)<7) || (countitem(906)<41) || (countitem(1019)<13) || (countitem(501)<1)) goto L_NotEnuf; + mes "You've brought all of the items... very good. Lets begin....."; + next; + mes "~ hands you a very long list of ingredients ~"; + next; + mes "[Roberto]"; + mes "There you are. Your all set."; + next; + mes "......................."; + next; + mes "[Roberto]"; + mes "Hmm?...... What do you mean 'that's it'?....... What else were you"; + mes "expecting...... With that list you will be able to make any kind of"; + mes "arrows you want......."; + next; + mes "[Roberto]"; + mes "I hope you didn't expect some kind of elaborate ceremony or some"; + mes "kind of unique and lengthy training......."; + next; + delitem 907, 20; + delitem 7033, 7; + delitem 906, 41; + delitem 1019, 13; + delitem 501, 1; + skill 147,1,0; + set ARWCRFT, 0; + mes "[Roberto]"; + mes "...... Well good luck and have fun making arrows. I've got other"; + mes "things to do if you don't mind......."; + close; + + L_NotEnuf: + mes "You don't have everything I need."; + next; + goto M_0; +L_GotSkill: + mes "Hmmm?.... Sorry but I've got nothing left to teach you. Just keep"; + mes "on making those arrows..... For us Archer types there can never be"; + mes "to many arrows....."; + close; +L_LowLvl: + mes "Hmm?... Do you have something to say to me? Unfortunately I have"; + mes "nothing to say to you....."; + emotion 1; + next; + mes "[Roberto]"; + mes "It's sad but conversations with people who have ^5533FFlow job levels^000000 such"; + mes "as yourself always seem to end abrubtly..... Maybe if you trained a"; + mes "little bit longer we would have more to talk about............"; + close; +} + + +//<============================== Arrow Repel ===============================>\\ +payon.gat,190,176,5 script Jason 88, +{ + mes "[Jason]"; + if (callfunc("Is_Bow_Class")) goto L_Start; + +L_Other: + mes "What does life need from a lonely lad like me?"; + close; +L_Start: + if (getskilllv(148)>0) goto L_GotSkill; + if (Class == Job_Archer && JobLevel < 35) goto L_LowLvl; + if (ARWREP == 1) goto L_Check; + mes "Hi, I'm the master of the skill ^0033FFArrow Repel^000000. I might be able to"; + mes "teach you the skill, but only if you help me get the ingredients"; + mes "for my Grandma's soup."; + next; + mes "[Jason]"; + mes "Arrow Repel allows you to use your arrows to repel, push back, an"; + mes "enemy and keep them at a distance. This is a great skill for us"; + mes "Archer types."; + next; + + L_List: + mes "[Jason]"; + mes "I need the following:"; + mes "- 2 ^FF0000Emeralds^000000"; + mes "- 3 ^FF0000Yoyo tails^000000"; + mes "- 10 ^FF0000Tentacles^000000"; + mes "- 10 ^FF0000Bill of birds^000000"; + mes "- 36 ^FF0000Banana Juices^000000"; + next; + mes "[Jason]"; + mes "Hurry hurry!"; + set ARWREP, 1; + close; + +L_LowLvl: + mes "Oh I think you're a bit inexperienced to learn anything from me,"; + mes "come back later! Maybe around ^5533FFjob level 35^000000 or so....."; + close; + +L_Check: + if ((countitem(721)<2) || (countitem(942)<3) || (countitem(962)<10) || (countitem(925)<10) || (countitem(532)<36)) goto L_NotEnuf; + mes "OH! Marvelous you brought me all the ingredients!"; + mes "Now It'll be my pleasure to teach you the skill ^0033FFArrow Repel^000000"; + next; + delitem 721,2; + delitem 942,3; + delitem 962,10; + delitem 925,10; + delitem 532,36; + skill 148,1,0; + set ARWREP, 0; + mes "[Jason]"; + mes "There you go! Happy hunting in the future."; + close; + + L_NotEnuf: + mes "You don't have everything I need."; + next; + goto L_List; +L_GotSkill: + mes "Hey! It's you again? I'm afraid I've taught you everything I know."; + close; +} diff --git a/npc/quests/skills/mage_skills.txt b/npc/quests/skills/mage_skills.txt new file mode 100644 index 000000000..fd47c8e0b --- /dev/null +++ b/npc/quests/skills/mage_skills.txt @@ -0,0 +1,114 @@ +//===== eAthena Script ======================================= +//= Mage Skill Quest +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= v1.0a Now using functions found in "Global_Functions.txt" +//= for class checks.[kobra_k88] +//============================================================ + + + +geffen_in.gat,151,119,4 script BLIZZARDRISS 71, +{ + mes "[BLIZZARDRISS]"; + if(callfunc("Is_Magic_Class")) goto L_Start; + +L_Other: + mes "What new magic spells will I discover today......??"; + emotion 20; + close; + +L_Start: + if(ENRGYCOAT == 1) goto L_GetSkill; + if(getskilllv(157)>0) goto L_GotSkill; + mes "Hey! My friend! I see that you are a magic user. If you look within yourself, you'll find that you have... 'HIDDEN ABILITIES'!!"; + next; + menu "'Hidden Abilities'.....?",M_0, "End Conversation.",M_End; + + M_0: + mes "[BLIZZARDRISS]"; + mes "For many years I studied the ancient magic of Geffen, and I recently re-discovered a forgotten magic spell that is quite usefull."; + next; + mes "[BLIZZARDRISS]"; + mes "The spell uses your 'pyscho-kenetic energy' to 'coat' your body in a magical shield, protecting you from enemy attacks."; + next; + mes "[BLIZZARDRISS]"; + mes "Only highly trained magic users can learn this amazing spell."; + mes "Those who want to use this spell must tap into the hidden energies and abilities burried deep within!"; + next; + mes "[BLIZZARDRISS]"; + mes "The spell is called ^5555FF'Energy Coat'^000000!. Would you like me to teach it to you?"; + next; + menu "Wow! Sounds great!",sM_0, "Meh... not interested.",sM_End; + + sM_0: + mes "[BLIZZARDRISS]"; + mes "In order for me to teach you this spell I will need the following items:"; + mes "^5533FF 3 Glass Beads,"; + mes " 1 One Carat Diamond,"; + mes " 5 Shells,^000000"; + mes " and ^5533FF1 Solid shell^000000."; + next; + mes "[BLIZZARDRISS]"; + mes "You will also need to have a sufficient amount of experience. For Mages, a job level of at least 35 is needed."; + mes "Wizards and Sages are high level magic users and can learn the skill at any job level."; + next; + mes "[BLIZZARDRISS]"; + mes "When you are fully trained and have all of the required items come back and see me."; + set ENRGYCOAT, 1; + close; + + sM_End: + mes "[BLIZZARDRISS]"; + mes "Hmf! Suit yourself. Don't come complaining to me when get beat up by a bunch of spores!!"; + emotion 6; + close; + + M_End: + mes "[BLIZZARDRISS]"; + mes "The wise man must have patience! Prepare yourself and return when you are ready."; + close; + +L_GetSkill: + if(Class==Job_Mage && JobLevel < 35) goto L_JobLvl; + if(countitem(746)<3 || countitem(730)<1 || countitem(935)<5 || countitem(943)<1) goto L_Items; + mes "Ohh my, ohh my...... This is going to be swell. Hand over the items... Thank you."; + next; + mes "~ several hours later ~"; + next; + delitem 746,3; + delitem 730,1; + delitem 935,5; + delitem 943,1; + skill 157,1,0; + set ENRGYCOAT,0; + mes "[BLIZZARDRISS]"; + mes "You can now use the spell, 'Energy Coat'!! Use it wisely my friend!"; + emotion 21; + close; + + L_JobLvl: + mes "Didn't you listen to my explanation? You need a job level of at least 35 to learn 'Energy Coat'."; + emotion 1; + close; + + L_Items: + mes "Didn't you listen to my explanation? You need the following items for me to teach you 'Energy Coat':"; + mes "^5533FF 3 Glass Beads,"; + mes " 1 One Carat Diamond,"; + mes " 5 Shells,^000000"; + mes " and ^5533FF1 Solid shell^000000."; + emotion 1; + close; + +L_GotSkill: + mes "Well hello there. The 'Energy Coat' skill is great isn't it? Anyway, good luck with your journey."; + close; +} diff --git a/npc/quests/skills/merchant_skills.txt b/npc/quests/skills/merchant_skills.txt new file mode 100644 index 000000000..f3d6adcf3 --- /dev/null +++ b/npc/quests/skills/merchant_skills.txt @@ -0,0 +1,308 @@ +//===== eAthena Script ======================================= +//= Merchant Skills Quests +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//= v1.1 Bug fixes +//= v1.a Now using functions found in "Global_Functions.txt" +//= for class checks.[kobra_k88] +//============================================================ + + + + +//--------------------------------------- Necko: Crazy Uproar--------------------------------\\ +alberta.gat,89,96,5 script Necko 139,0,4, +{ + mes "[!?]"; + mes "Muahahahahhhahahahahhahah!!"; + mes "Pukakakakakkakakakakakakaka!!"; + close; +} + +alberta.gat,83,96,5 script Necko 98, +{ + mes "[Necko]"; + if (callfunc("Is_Merc_Class")) goto L_Start; + +L_Other: + mes "Necko's store is closed right now. Come back later..... Hehe...."; + close; + +L_Start: + if (getskilllv(155)>0) goto L_GotSkill; + if (CRAZYROAR == 1) goto L_GetSkill; + mes "Oh! Did you come here because you were intrigued by my boisterous voice? My voice is quite loud, isn't it?"; + mes "Afterall you did hear it from a far off distance."; + emotion 1; + next; + mes "[Necko]"; + mes "I'll let you in on something....... My voice is more than just loud..... it's actually quite unique......"; + next; + mes "[Necko]"; + if(Class==Job_Merchant && JobLevel < 15) goto L_JobLvl; + mes "You see, I know a skill that lets me shout in a way that actually helps me.... It is the ^3355FFCrazy Uproar^000000 skill!!!"; + emotion 5; + next; + mes "[Necko]"; + mes "Crazy Uproar uses your loud voice to boost your battle spirit!"; + mes "The skill requires ^FF55338 sp^000000 to use and inturn you will recieve an additional ^3355FF4 STR for 5 min^000000!!"; + next; + mes "[Necko]"; + mes "This skill is very usefull. To learn it you must learn the essentials of sound. There was a singer in Payon that taught sound theory......."; + next; + mes "[Necko]"; + mes "Unfortunately that person passed away so you can no longer learn those essentials.............."; + mes "Aww.... you look disappointed.... Do you really want to learn Crazy Uproar??"; + next; + mes "[Necko]"; + mes "Hmm..... I will teach you then, that is, if you trully wish to learn. You will have to train your vocal cords."; + mes "You will also need to gather these items:"; + next; + mes "[Necko]"; + mes "- ^3355FF7 Pearls,"; + mes "- 1Banana juice,"; + mes "- 50 Mushroom spores^000000."; + next; + mes "[Necko]"; + mes "Come back when you are ready! I think I shall do a little vocal training myself........"; + mes "Bbooowuuuuuuuuuuuuuuuuuuuuuuuuuh!!"; + set CRAZYROAR, 1; + close; + + L_JobLvl: + mes "Once you've reached a ^3355FFjob level of 15^000000 come back and see me. I'll tell you all about the secrect to my voice....."; + next; + mes "[Necko]"; + mes "Uahahahahahahhahahahahahaha!"; + mes "Kyukwakakakakkakakakakakkakaka!"; + close; + +L_GetSkill: + if ((countitem(722)<7) || (countitem(532)<1) || (countitem(921)<50)) goto L_Items; + mes "Oh You've gathered the items! Very good, very good. Now it's time to start your training....."; + next; + mes "[Necko]"; + mes "Repeat after me: Fa fa fa fa fa.... So so so so so..... La la la la la.... Mi mi mi mi mi mi......"; + next; + mes "~several hours later~"; + next; + mes "[Necko]"; + mes "Raaaaaawwwwrrrrrrrrrrr!....... Ha ha!! Execellent. Your voice is now finely tuned for ^3355FFCrazy Uproar^000000. Good job."; + delitem 722,7; + delitem 532,1; + delitem 921,50; + skill 155,1,0; + set CRAZYROAR, 0; + emotion 21; + close; + + L_Items: + mes "You need to get these items for Crazy Uproar:"; + mes "- ^3355FF7 Pearls,"; + mes "- 1Banana juice,"; + mes "- 50 Mushroom spores^000000."; + close; + +L_GotSkill: + mes "Hello again. I can tell by the sound of your mighty voice that you are becoming very good at Crazy Uproar."; + close; +} + + +//----------------------------------------- Charlron: Change cart ---------------------------------\\ +alberta.gat,119,221,6 script Charlron 107, +{ + mes "[Charlron]"; + if (callfunc("Is_Merc_Class")) goto L_Start; +L_Other: + mes "I am a merchant that deals in many things. My name is Charlron. If you ever find anything interesting, come back and try to negotiate a deal with me."; + close; +L_Start: + if (getskilllv(154)>0) goto L_GotSkill; + if (CHANGECART == 1) goto L_GetSkill; + mes "Welcome young one. Is selling fun for you? I am the merchant Charlron."; + next; + mes "[Charlron]"; + mes "Aren't you tired of your old, and plain looking cart? Well I can help."; + next; + mes "[Charlon]"; + mes "I have been doing some research on cart design recently and have come up with some new and interesting designs for the cart."; + next; + mes "[Charlon]"; + mes "I can change the way your cart looks for you. Of course some conditions need to be met......"; + next; + mes "[Charlron]"; + if (Class==Job_Merchant && JobLevel < 30) goto L_JobLvl; + mes "First you will need to bring me these items:"; + mes "^3355FF50 Trunks,"; + mes "20 Animal Skin,"; + mes "10 Iron^000000."; + set CHANGECART, 1; + close; + + L_JobLvl: + mes "I'm a pretty famous merchant, so I don't really do business with beginners but.........."; + mes "Once you've reached ^3355FFjob level 30^000000 I may consider doing business with you."; + close; + +L_GetSkill: + if ((countitem(1019)<50) || (countitem(998)<10) || (countitem(919)<20)) goto L_Items; + mes "Oh good, you have all of the items. Well here you are..... Hmm?... Oh these are the design sheets for your cart."; + mes "Now that you have the proper materials, just follow these guides to make your cart look spectactular."; + //delitem 1019,50; + //delitem 998,10; + //delitem 919,20; + skill 154,1,0; + set CHANGECART, 0; + mes "[Charlron]"; + mes "Good luck, see you around"; + close; + + L_Items: + mes "Come back when you've brought me these items:"; + mes "^3355FF50 Trunks,"; + mes "20 Animal Skin,"; + mes "10 Iron^000000."; + close; +L_GotSkill: + mes "Heh heh... It's nice to see fancy looking carts like yours on the streets of town. Well back to the drawing board...."; + close; + +} + + +//-------------------------====-------- Gershuan: Cart Revolution ---------------------------------\\ +alberta.gat,232,106,6 script Gershaun 57, +{ + if (callfunc("Is_Merc_Class")) goto L_Start; + +L_Other: + mes "[Gershaun]"; + mes "If it doesn't work, make it work!"; + mes "If it doesn't work, make it work!"; + mes "If it doesn't work, make it work!"; + close; + +L_Start: + if (getskilllv(153)>0) goto L_GotSkill; + if (CARTREVO == 1) goto L_GetSkill; + mes "[Gershaun]"; + mes "Hmm... a young merchant. You must use carts too right? Since to have to do all of that vending..... But is that all you use your cart for?"; + emotion 20; + next; + mes "[Gershaun]"; + mes "I researched some ways of using the cart differently. One way involved cooking ramen and another involved jump-roping (don't ask)."; + mes "Still none of my new ideas were satisfactory."; + next; + menu "I know what you mean.",M_0, "......???",M_1; + + M_0: + mes "[Gershuan]"; + mes "You KNOW what I MEAN!! HOW the HECK would YOU KNOW what I MEAN????"; + emotion 23; + close; + M_1: + mes "[Gershuan]"; + mes "In despair, I wandered through the fields with my cart. Day after day I did this.... I was in a daze...."; + next; + mes "[Gershuan]"; + mes "Then I crossed paths with a very strong monster! I knew immediately that my life was in danger!"; + mes "I thought to myself, 'Why me! A weaponless, amorless merchant!?'"; + emotion 0; + next; + mes "[Gershuan]"; + mes "I was scared to death... hoping that this would not be the end of me. With what strength I had left, I tried a desperation move....."; + emotion 19; + next; + mes "[Gershuan]"; + mes "I used my cart to attack the monster!!"; + emotion 0; + next; + mes "[Gershuan]"; + mes "Just like that the monster was defeated!! Finally I had found another exellent use for the cart! A WEAPON!!!"; + next; + mes "[Gershuan]"; + mes "I called my new found discovery ^3355FF'Cart Revolution'^000000!"; + mes "By using ^FF553312 sp^000000 you can spin your cart around your body doing major damage to an enemy!"; + emotion 5; + next; + mes "[Gershuan]"; + mes "The heavier your cart is, the more damage it will do. Would you like to learn this skill?"; + next; + menu "Yes!!",sM_0, "Actually I want to learn some sushi skills...",sM_1; + + sM_0: + mes "[Gershuan]"; + if (Class==Job_Merchant && JobLevel < 35) goto ssL_LowLvl; + mes "Ok! I will give you the special training for Cart Revolution. The first thing you will have to do is bring me these items:"; + mes "^3355FF30 Sticky Mucus,"; + mes "20 Fly wings,"; + mes "15 Iron,"; + mes "5 Tentacles,"; + mes "2 Grape Juice^000000."; + next; + mes "[Gershuan]"; + mes "Come back when you have all of these items. Good luck."; + set CARTREVO, 1; + close; + + ssL_LowLvl: + mes "[Gershuan]"; + mes "Ok! I will give you the special training for Cart Revolution."; + mes "But first you will have to get yourself to a ^3355FFjob level of 35^000000! After you've done that, then we can talk."; + close; + + sM_1: + mes "[Sushi King Gershuan]"; + mes "Stupid!! You're waaay to young to even try your hand at sushi!!"; + emotion 6; + close; + +L_GetSkill: + if ((countitem(533)<2) || (countitem(998)<15) || (countitem(938)<30) || (countitem(601)<20) || (countitem(962)<5)) goto sM_0; + mes "[Gershaun]"; + mes "It's Good to see you again. I'm glad you were able to get all of the items. Take a minute to prepare, for your training is about to take place...."; + next; + mes "[Gershuan]"; + mes "First make sure your feet are shoulder width apart. Balance is key! Now get into a good crouch... grasp the handles of the cart firmly but not too tight..."; + next; + mes "[Gershuan]"; + mes "NOW SWING!!!"; + next; + mes "[Gershuan]"; + mes "Eh....... that was terrible.... Okay, lets try again....."; + emotion 4; + next; + mes "~many hours later~"; + next; + mes "[Gershuan]"; + mes "YES!!! FINALLY! I could REALLY FEEL the power in that swing!"; + mes "Give yourself a good pat on the back becuase you have just mastered Cart Revolution!"; + emotion 21; + next; + delitem 533,2; + delitem 998,15; + delitem 938,30; + delitem 601,20; + delitem 962,5; + skill 153,1,0; + set CARTREVO, 0; + mes "[Gershuan]"; + mes "Take care of yourself and remember to fill that cart up so that it can do some major damage."; + emotion 29; + close; + +L_GotSkill: + mes "[Gershaun]"; + mes "So how do you like cart revolution? Remeber, the ^3355FFheavier^000000 the cart, the ^3355FFgreater^000000 the damge."; + close; + +} diff --git a/npc/quests/skills/novice_skills.txt b/npc/quests/skills/novice_skills.txt new file mode 100644 index 000000000..aab02da0e --- /dev/null +++ b/npc/quests/skills/novice_skills.txt @@ -0,0 +1,258 @@ +//===== eAthena Script ======================================= +//= Novice Skills Quests +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Customized novice skills quest +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + + +//<---------------------------------------------------------------------------------------------- Nurse Aid: First Aid NPC ---------------------------------------------------------------------------->\\ +prt_in.gat,235,133,4 script Nurse Aid 90, +{ + mes "[Nurse Aid]"; + if(FIRSTAID == 1) goto L_GetAid; + if(getskilllv(142)>0) goto L_GotAid; + + mes "Oh hello there! You look tired and a little worn out. Have the monsters outside of town been giving you trouble?"; + next; + menu "Ha! Me strong like BULL!!",M_Nope, "Well..um..kinda..",M_Yep; + + M_Nope: + mes "[Nurse Aid]"; + mes "Oh I see. You must be a mighty warrior. Well, come back anytime if you do ever feel overwhelmed by the monsters. I'll be able to help."; + close; + + M_Yep: + mes "[Nurse Aid]"; + mes "Well don't feel bad. It can be very difficult fighting those nasty monsters in the begining."; + next; + mes "[Nurse Aid]"; + mes "I know because I've been treating a lot people lately who have been fighting them."; + mes "There are so many injured now that I don't think I can continue treating anyone."; + next; + mes "[Nurse Aid]"; + mes "~Sigh~"; + next; + mes "[Nurse Aid]"; + mes "That's why I've decided to teach people how to heal themselves! Would you like me to teach you?"; + emotion 5; + next; + menu "Would you??",sM_Yes, "(...she's nuts!...run!!!)",sM_No; + + sM_Yes: + mes "[Nurse Aid]"; + mes "In order for me to teach you First Aid you need to have at least a^0000ff job level of 3^000000."; + mes "You then need to give me:^ff0000 5 red herbs^000000,^00bb00 5 clovers^000000, and an^aaaa00 old bandage^000000."; + next; + mes "[Nurse Aid]"; + mes "You can get the bandage from the^0000ff 'Newbie Assistant'^000000 located on the second floor of the Castle."; + next; + mes "[Nurse Aid]"; + mes "Once you get job level 3 and have all of the items come back and see me ok."; + set FIRSTAID,1; + close; + + sM_No: + mes "[Nurse Aid]"; + mes "Hey!...Where are you running too??..."; + emotion 4; + close; + +L_GetAid: + if((JobLevel < 3) || (CountItem(507) < 5 ) || (CountItem(705) < 5) || (CountItem(930) < 1)) goto sM_Yes; + mes "Oh good. You have everything needed for me to teach you first aid. Here we go..."; + next; + mes "....... 1 hour later......."; + next; + delitem 507,5; + delitem 705,5; + delitem 930,1; + skill 142,1,0; + set FIRSTAID,0; + mes "[Nurse Aid]"; + mes "YES! You finally got it. Now you can heal yourself and continue fighting those bad monsters. Well, take care."; + emotion 21; + close; + +L_GotAid: + mes "Well hello again. I sure hope the First Aid skill has been helpfull to you. Make sure to continue your hard work and don't forget to rest and heal!"; + close; + +} + + +//<-------------------------------------------------------------------------------------------------- Bulma: Play Dead -------------------------------------------------------------------------------------------->\\ +prt_in.gat,73,87,2 script Bulma 98, +{ + mes "[Bulma]"; + if(Class == Job_Novice) goto L_Novice; + +L_Other: + mes "Yeah... I look great.... Afterall, I'm a Knight of the Prontera Chivalry. Kuhahahaha!"; + emotion 18; + next; + mes "[Bulma]"; + mes "It hasn't been that long since I became a Knight, but I still look good as one right? What do you think???"; + emotion 20; + close; + +L_Novice: + if(JobLevel >= 7) goto L_Start; + mes "Hello my young friend. You remind me of myself when I was young....."; + mes "Heh heh, I sure miss those days..... Wow... It's funny to think about those years now......"; + next; + mes "[Bulma]"; + mes "They were difficult.... thankfully you can use the ^5555FFPlay Dead^000000 skill when you reach a ^5555FFjob level of 7^000000."; + mes "If you're interested in it come back and talk to me when you've leveled up a bit more."; + close; + +L_Start: + if(PLAYDEAD == 1) goto L_GetSkill; + if(getskilllv(143)>0) goto L_GotSkill; + mes "Hello my young friend. You remind me of myself when I was young..... Heh heh, I sure miss those days....."; + mes "Look at me acting all sentimental like some old man........"; + next; + mes "[Bulma]"; + mes "Sorry about that. Anyhow, I just want you to know that if you work hard and are patient, you too will recieve the job you desire."; + mes "It may take some time but stay focused and never loose your determination."; + next; + mes "[Bulma]"; + mes "Hmm..... actually I might be able to help you out........"; + emotion 20; + next; + mes "[Bulma]"; + mes "What's this? Ha ha, don't look so surprised. What I have to offer will be very useful to you."; + next; + mes "[Bulma]"; + mes "You see I can teach you the skill ^5555FF'Play Dead'^000000."; + mes "This skill allows you to act like you just died making any monster that is currently attacking you leave you alone."; + next; + mes "[Bulma]"; + mes "I myself have used it as a novice and found it to be very usefull."; + mes "It may sound easy enough, but it takes a lot of hard work and practice to make your performance look believable."; + next; + mes "[Bulma]"; + mes "You MUST look perfectly DEAD in order for this skill to work. Even the slightest movement will give you away."; + next; + mes "[Bulma]"; + mes "I think I've done enough explaining..... The look in your eyes tells me that you are ready to learn this skill."; + next; + mes "[Bulma]"; + mes "First take this pill...."; + next; + mes "(you take the pill) ~gulp~"; + next; + mes "[Bulma]"; + mes "Good. Now go to the 2nd floor on the East side of the Prontera Castle."; + mes "Speak with the ^5555FFNewbie Assistant^000000 and he will give you a ^5555FFNewbie Tag^000000."; + next; + mes "[Bulma]"; + mes "Once you have the tag come back here. You MUST make it back here WITHIN ^FF555510 minutes^000000!"; + mes "If you don't, then the pill you just swallowed will start making it hard for you to breath!....."; + next; + mes "[Bulma]"; + mes "Kekekeke..... Just kidding! The pill actually helps you stay calm, nothing more."; + emotion 18; + next; + mes "[Bulma]"; + mes "Well get going... GO! GO! GO! RUN!!!"; + emotion 27; + set PLAYDEAD, 1; + close; + +L_GetSkill: + if(countitem(7039)<1) goto sL_NotRdy; + mes "Good to see you again. Alright, lets start your training...."; + next; + mes "[Bulma]"; + mes "Let me first introduce to you the concept of 'Method Acting'. Method Acting stresses the need to undrestand every aspect of the role you are playing."; + next; + mes "[Bulma]"; + mes "You must learn to think, feel, and even live like your character so that you can understand his/her motivation in any given momement."; + next; + mes "[Bulma]"; + mes "Now let us use this technique to develop your ability to Play Dead!"; + mes "I want you to think like a dead person, feel like a dead person, eat, breath, sleep, kiss, etc. like a person who is dead!!!"; + next; + mes "[Bulma]"; + mes "Don't just stand there! Lay down on the ground and live life through the eyes of a dead person.... errr or don't live.... anyways just do it!!"; + next; + mes "~ several hours later ~"; + next; + mes "[Bulma]"; + mes "Ok, lights, camera, ACTION! Yes... yes... YES!! That's it!! As I watch you laying there I TRULLY believe that you are dead."; + mes "What a wonderful performance! BRAVO! BRAVO!"; + emotion 0; + next; + mes "[Bulma]"; + mes "With the right motivation and focus you will be able to play dead anywhere at any given moment. Congratulations on mastering this skill."; + emotion 21; + skill 143,1,0; + delitem 7039, 1; + set PLAYDEAD, 0; + close; + + sL_NotRdy: + mes "HEY! What are you doing here? It's irresponsible of you to still be here while your time is running out........."; + emotion 0; + next; + mes "[Bulma]"; + mes "Now GO! Run! Run! RUN!!"; + emotion 27; + close; + +L_GotSkill: + mes "Yeah.... I remember back then..... especially those embarrasing novice years... heh. Luckily there was Play Dead."; + mes "That saved me many times in the past. I'm sure it has been saving you too."; + next; + mes "[Bulma]"; + mes "Hopefully it is something you have been using well. If you have any friends who are novices, tell them about me. I will help them out as best I can."; + close; +} + + +//Newbie Assistant------------------------------------------------------------------------------ +prt_castle.gat,174,147,2 script Newbie Assistant 84, +{ + mes "[Newbie Assistant]"; + if(Class == Job_Novice) goto L_Start; + +L_NonNov: + mes "What am I doing here? I'm just trying to help out young newbies. You remember how it was to be a newbie... confused.... lost.... heh heh."; + emotion 1; + close; +L_Start: + if(FIRSTAID==1 && countitem(930)==0) goto L_Aid; + if(PLAYDEAD==1 && countitem(7039)==0) goto L_Play; + mes "Hello. I'm here to provide help to newbies like you. If there is anything in particular that you need assistance with just let me know."; + close; +L_Aid: + mes "So Nurse Aid sent you huh. She's a great nurse, you should feel very fortunate that she is helping you out. Here take this."; + next; + getitem 930,1; + mes "[Newbie Assistant]"; + mes "You'll need it in order for her to teach you her exellent healing technique."; + next; + mes "[Newbie Assistant]"; + mes "When I watch her work it is like watching an angel that has descended down from the heavens....."; + next; + mes "[Newbie Assistant]"; + mes "Her beauty, her grace, sometimes I wish........ (blushes).......... um.... well...err... tell her I said hello."; + emotion 3; + close; +L_Play: + mes "So Bulma sent you uh.... okay here you go."; + getitem 7039,1; + next; + mes "Good luck on your adventure."; + close; +} diff --git a/npc/quests/skills/swordsman_skills.txt b/npc/quests/skills/swordsman_skills.txt new file mode 100644 index 000000000..578f0a1c2 --- /dev/null +++ b/npc/quests/skills/swordsman_skills.txt @@ -0,0 +1,371 @@ +//===== eAthena Script ======================================= +//= Swordsman Skills Quests +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= +//===== Additional Comments: ================================= +//= Fully working +//=1.0a Now using functions found in "Global_Functions.txt" for +//= class checks. +//============================================================ + + + +//<-------------------------------------- Fatal Blow------------------------------------>\\ +prt_in.gat,75,88,5 script Leon 85, +{ + mes "[Leon]"; + if(callfunc("Is_Sword_Class")) goto L_Start; + if(Class == Job_Novice) goto L_Novice; + + mes "Hello there. I am Leon, a well known and well respected member of the famous Prontera Chivalry."; + next; + mes "[Leon]"; + mes "Are you here to learn more about the Chivalry, or are you hear to bask in the glory of us Knights? Hahahaha!"; + emotion 18; + close; + +L_Novice: + mes "Oh a novice.... I'm afraid I have nothing to offer you."; + mes "I have no fun or nice things to say to anyone other then Swordsmen."; + next; + mes "[Leon]"; + mes "See you in a better world!"; + close; + +L_Start: + if (FATALBLOW == 1) goto L_Check; + if (getskilllv(145)>0) goto L_Done; + + if(sex==1)mes "Oooh! I see that you are quite a strong Swordsman."; + if(sex==0)mes "Oooh! I see that you are quite a strong Swordswoman."; + mes "How did I know? Hahaha! Just look at that strong arm of yours!"; + next; + mes "[Leon]"; + mes "You must enjoy using ^0000ff'Bash'^000000, huh? Hahaha!"; + emotion 18; + next; + mes "[Leon]"; + if(sex==1)mes "I like a Swordsman who isn't afraid to use a powerfull skill such as that."; + if(sex==0)mes "Now, now, don't be shy. It's ok for girls to like Bash."; + if(sex==0)mes "Afterall, whether your a Swordsman or Swordswoman, there's no denying the power of Bash!"; + next; + mes "[Leon]"; + mes "As great as Bash is though, I often felt that it could be even better if there was someway to stun an opponent with it."; + mes "I decided to withdraw from the battlefield and research ways of making bash more powerfull."; + next; + mes "[Leon]"; + mes "I discovered that if one could strike an enemy's weak point with a precisely placed Bash, an opponent would be left utterly parralyzed!!"; + next; + mes "[Leon]"; + mes "I then went on to develop the skill, ^ff0000'Fatal Blow'^000000, which allows you to do just that!"; + mes "Will rigorous training, one can learn to stun an opponent with a mighty Bash."; + next; + mes "[Leon]"; + mes "Since you seem to be so fond of Bash, I'd be willing to teach you the skill."; + mes "However, I must warn you that a lot of hard work will be required."; + next; + mes "[Leon]"; + mes "So what do you think? Are you interested?"; + next; + menu "You betcha!!",M_0, "Nah.... Not really.",M_1, "Any advice on how to eat sushi?",M_2; + + M_0: + set FATALBLOW,1; + mes "[Leon]"; + mes "Hahaha! I knew you love Bash as much as I do."; + next; + mes "[Leon]"; + mes "In order for me to teach you Fatal Blow, you must have at least ^5555FFlevel 5 Bash^000000. You then need to give me these items:"; + mes "- 10 ^FF0000Fire Arrows^000000,"; + mes "- 10 ^FF0000Silver Arrows^000000,"; + mes "- 1 ^FF0000Banana Juice^000000,"; + mes "- 30 ^FF0000Tentacles^000000,"; + mes "- and 5 ^FF0000Royal Jelly^000000."; + next; + mes "[Leon]"; + mes "When you have gathered all of these items come back and see me."; + close; + M_1: + mes "[Leon]"; + mes "I see... I must have misjudged you..."; + close; + M_2: + mes "[*Sushi King* Leon]"; + mes "The best way to eat sushi is with your hands. That is the basic method. Oh, and dip the FISH, NOT the RICE, into the soy sauce."; + next; + mes "[*Sushi King* Leon]"; + mes "That way you get a richer flavor. Also, always eat the kind that is in season."; + mes "Eating in the order of white fish, then blue fish, will make it taste even better!"; + next; + mes "[*Sushi King* Leon]"; + mes "Mmmmm..... I love sushi!!!"; + emotion 33; + close; + +L_Check: + mes "So your back. Did you get what I asked for?"; + next; + mes "[Leon]"; + if(countitem(1752)<10 || countitem(1751)<10 || countitem(532)<1 || countitem(962)<30 || countitem(526)<5) goto L_NoItems; + if(getskilllv(5)<5) goto L_BashLvl; + + mes "Great work. You have everything I need for me to teach you Fatal Blow."; + next; + mes "[Leon]"; + mes "Ok, lets get started."; + next; + mes "!SMACK!~!CRACK!~!THWACK!~!BASH!.......... !SMACK!~!CRACK!~!THWACK!~!BASH!.........."; + next; + mes "(5 hours later)"; + next; + mes "[Leon]"; + mes "Yes! That's it! You have just mastered Fatal Blow!"; + emotion 21; + next; + delitem 1752,10; + delitem 1751,10; + delitem 532,1; + delitem 962,30; + delitem 526,5; + skill 145,1,0; + set FATALBLOW,0; + mes "[Leon]"; + mes "Use it wisely young warrior!!"; + close; + + L_NoItems: + mes "Hmm... you still don't have enough items. Come back when you do."; + close; + L_BashLvl: + mes "Wait a minute... you have to train a little more before learning this skill."; + mes "You need to have at least a ^5555FFlevel 5 Bash^000000."; + close; + +L_Done: + mes "So how is Fatal Blow? Isn't it great!! Hahaha! I knew you'd like it."; + next; + mes "[Leon]"; + mes "Go on and Bash the heck out of those monsters! Hahaha."; + emotion 18; + close; + +} + + +//<---------------------------------- Moving HP Recovery ---------------------------------->\\ +izlude_in.gat,175,130,2 script Knight De Thomas 98, +{ + mes "[Knight De Thomas]"; + if(callfunc("Is_Sword_Class")) goto L_Start; + +L_Other: + mes "I am Thomas De Knight of the Prontera Chivalry. I am very busy now so please leave me alone."; + close; + +L_Start: + if (MOVHPREC == 1) goto L_Check; + if (getskilllv(144)>0) goto L_GotSkill; + mes "Oh no! You must have been hurt in battle! Are you ok?"; + mes "It must have been a hard fought battle for you to recieve such serious injuries...."; + emotion 19; + next; + mes "[Knight De Thomas]"; + mes "Being a Swordsman or Knight comes with a lot of responsiblity and requires a great deal of self sacrifice."; + mes "For Swordsmen and Knights there is a wonderfull skill that can aid in the recovery of HP."; + next; + mes "[Knight De Thomas]"; + mes "I present to you..... ^5555FF'Moving HP Recovery'^000000!! This skill allows you to recover HP while moving!"; + next; + mes "[Knight De Thomas]"; + mes "The skill has not been perfected yet so the amount of HP recovered is a little low. Still, it is helpful."; + mes "What do you think? Would you like to learn this skill?"; + next; + menu "What a great skill! I would like to learn it!!",M_0, "No thank you.",M_End; + + M_0: + mes "[Knight De Thomas]"; + mes "Very well. I will tell you what is needed to learn this skill. First you must have a job level of 35 or greater."; + mes "This however doesn't apply to Knights or Crusaders. You will also need:"; + mes "^5555FF200 Empty Bottles^000000,"; + mes "^5555FF1 Padded Armour^000000,"; + mes "and ^5555FF1 Moth Wings^000000."; + next; + mes "[Knight De Thomas]"; + mes "The bottles are proof that you have fought feircely and have used many potions. The Padded Armor is proof of an experienced fighter."; + mes "The Moth Wings..... well... really aren't necessary. It's just that my niece recieved a bug hunting assignment for summer vacation......."; + next; + mes "[Knight De Thomas]"; + mes "I would get them myself... it's just... I must work here all day long so I don't have any time to go out and get them......."; + next; + mes "[Knight De Thomas]"; + mes "Don't you think it's sad that I have to stay in once place everyday without even being able to go outside??"; + mes "Please.... find a pair of Moth Wings for my niece?.... (~sniff~sniff~)...."; + emotion 28; + next; + mes "[Knight De Thomas]"; + mes "If you don't..... I won't teach you anything!! Muahahahaha!!"; + emotion 29; + set MOVHPREC, 1; + close; + M_End: + mes "[Knight De Thomas]"; + mes "What?? What did you say?....."; + emotion 1; + close; + +L_Check: + mes "Ah, you've come back. Let's, see... are you ready for HP Moving Recovery?...."; + next; + mes "[Knight De Thomas]"; + if ((countitem(713)<200) || (countitem(1058)<1) || (countitem(2312)<1)) goto L_NoItems; + if (Class==Job_Swordman && JobLevel < 35) goto L_LowLvl; + + mes "Great! You have everything needed to learn this skill. Take a deep breath.... let us begin."; + next; + mes "(2 hours later)"; + next; + mes "[Knight De Thomas]"; + mes "Can you feel it? Can you feel the energy flowing in you while you move around?"; + mes "Haha! You have just learned HP Moving Recovery!"; + delitem 713,200; + delitem 1058,1; + skill 144,1,0; + set MOVHPREC, 0; + next; + mes "[Knight De Thomas]"; + mes "Congratulations on learning the new skill and thank you for the Moth Wings! ^_^"; + emotion 21; + close; + + L_NoItems: + mes "As I said before you need to bring me these items:"; + mes "^5555FF200 Empty Bottles^000000,"; + mes "^5555FF1 Padded Armour^000000,"; + mes "and ^5555FF1 Moth Wings^000000."; + close; + L_LowLvl: + mes "You are not yet experienced enough to learn this skill. Come back when you have a job level of at least 35."; + close; + L_GotSkill: + mes "Ah, you're looking well. That HP Moving Recovery skill must be very helpfull."; + mes "Well, continued success on your adventure!"; + close; + +} + + +//<----------------------------------------- Auto-Berserk --------------------------------->\\ +prt_in.gat,94,57,3 script Juan 85, +{ + mes "[Juan]"; + if(callfunc("Is_Sword_Class")) goto L_Start; + +L_Other: + mes "So how's your adventure going? I hope there will be good days ahead of you."; + next; + mes "[Juan]"; + mes "Who am I? Oh, I'm just a kind knight named Juan. Don't mind me. Hahahaha...."; + emotion 18; + close; + +L_Start: + if (Class==Job_Swordman && JobLevel<34) goto L_LowLvl; + if (BERSERK == 1) goto L_Check; + if (getskilllv(146)>0) goto L_GotSkill; + + mes "Oh no! You have more injuries since the last time I saw you."; + mes "You went into battle like this? It seems like you're straining yourself."; + next; + mes "[Juan]"; + mes "Even though you may have a lot of strength, there is only so much you can do when you have reached your limits."; + mes "So don't overestimate your own power."; + next; + mes "[Juan]"; + mes "Of course you could always use the ^5555FF'skill'^000000 we developed to overcome these limits....."; + next; + menu "Eh! What are you talking about?",M_0, "Haha! There's no such thing....",M_1, "Keuuuuuhhh!",M_3; + + M_0: + mes "[Juan]"; + mes "The skill is called ^5555FFBerserk^000000. It has been deemed the flower of the battlefield!"; + mes "When your health is low, you can call upon your hidden potential by provoking yourself."; + next; + mes "[Juan]"; + mes "A surge of energy will flow through your body giving you a greater attack prowess at the cost of defensive strength."; + mes "With this you will be able to fight on with a FIREY RAGE and an absolute disregard to your own safety!!"; + next; + mes "[Juan]"; + mes "The enemy will be shocked by your new found strength!!"; + mes "This skill is especially great for those who fight with a no-holds-bar mentality."; + next; + mes "[Juan]"; + mes "In order to learn this skill you will need to bring me the following items:"; + mes "^5555FF35 Powder of Butterfly,"; + mes "10 Horrendous Mouth,"; + mes "10 Decayed Nail^000000,"; + mes "and ^5555FF10 Honeys^000000!"; + next; + mes "[Juan]"; + mes "Did you get all of that down? Please come back when you are ready. I look forward to seeing you again."; + set BERSERK, 1; + close; + M_1: + mes "[Juan]"; + mes "Bleh! Have you been a fool all of your life?? Go away and don't talk to me."; + emotion 32; + close; + M_3: + mes "[Juan]"; + mes "Keuuuuuuuuuuuuuuuuuuh!"; + mes "Oooowwwwwwwwuuuuuuuuuuhhhhhh!"; + mes "Keuaaaaaaaaaaaaaaaaaah!"; + close; + + L_LowLvl: + mes "Oh, nice to meet you."; + next; + mes "[Juan]"; + mes "You can go on your way now."; + emotion 33; + close; + +L_Check: + if ((countitem(924)<35) && (countitem(957)<10) && (countitem(958)<10) && (countitem(518)<10)) goto L_NoItems; + mes "Good job my dear friend. You have all 4 of the items I asked for."; + mes "In return I will now teach you the skill: ^FF0000Berserk^000000."; + next; + mes "[Juan]"; + mes "Great job you have done well and deserve this skill."; + next; + delitem 924,35; + delitem 958,10; + delitem 957,10; + delitem 518,10; + skill 146,1,0; + set BERSERK, 0; + mes "[Juan]"; + mes "Muhahahaha!! Don't hold back young warrior, fight without any fears or regrets!!"; + emotion 29; + close; + + L_NoItems: + mes "[Juan]"; + mes "In order to learn this skill you will need to bring me the following items:"; + mes "^5555FF35 Powder of Butterfly,"; + mes "^10 Horrendous Mouth,"; + mes "^10 Decayed Nail^000000,"; + mes "and ^5555FF10 Honeys^000000!"; + close; +L_GotSkill: + + mes "You have the eyes of a person who has seen death first hand!!"; + mes "But, because of Berserk, I'm sure you have been able to escape it many times as well."; + emotion 0; + close; +} diff --git a/npc/quests/skills/thief_skills.txt b/npc/quests/skills/thief_skills.txt new file mode 100644 index 000000000..1258e1bfb --- /dev/null +++ b/npc/quests/skills/thief_skills.txt @@ -0,0 +1,386 @@ +//===== eAthena Script ======================================= +//= Thief Skills Quests +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.1a +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= Sand Attack, Back Slide, Find Stone, Stone Fling skill quests. +//===== Additional Comments: ================================= +//= v1.0 Fully working +//= v1.1 Changed Sand Attack requirements from 5 Grit to 5 Fine Grit and a +//= Leather Bag of Infinity. These are the official RO requirments +//= Added npc RuRumuni, maker of Leather Bag of Infinity. [kobra_k88] +//= v1.1a Now using functions found in "Global_Functions.txt" for +//= class checks.[kobra_k88] +//============================================================ + + + + +//====================================================================================================== +moc_prydb1.gat,154,128,4 script Alcouskou 118, +{ + mes "[Alcouskou]"; + if(callfunc("Is_Thief_Class")) goto L_Start; + if(Class==Job_Novice) goto L_Novice; + +L_Other: + mes "Your kind isn't welcome here."; + close; + +L_Novice: + mes "Although thieves and assasins have basic skills which aid them in their jobs, most don't have the 'special' skills which can make them truly great!"; + next; + mes "[Alcouskou]"; + mes "I just happen to be the ONLY one who can teach them these skills!"; + mes "If you ever decide to become a Thief or an Assassin, come back here and I'll teach you these cool skills."; + next; + mes "[Alcouskou]"; + mes "And if you know anyone who already is one, send them to me. I'm willing to teach anyone who's interested."; + close; + +L_Start: + mes "During the course of your life you will experience many things."; + mes "You many have trouble understanding the importance of some of these experiences, and may even consider them to be useless to you."; + next; + mes "[Alcouskou]"; + mes "But do not be to hastey with your judgement of them, for some of these experience may actually prove to be benificial for you."; + next; + mes "[Alcouskou]"; + mes "Let me explain:"; +M_Menu: + next; + menu "-Sand Attack",M_Sand, "-Back Slide",M_Back, "-Find Stone",M_Find, "-Stone Fling",M_Fling, "-I will be back later.",M_End; + + M_Sand: + mes "[Alcouskou]"; + if(SANDATTACK == 1) goto L_Sand; + if(getskilllv(149) > 0) goto L_GotSand; + mes "The most important aspect of being a good Thief/Assassin is stealth. One should never be seen our touched unless he/she wants to be"; + next; + mes "[Alcouskou]"; + mes "Some may consider this cowardly but I don't see it that way."; + mes "We live in a world where it is the survival of the fittest and you must do whatever it takes to survive....."; + next; + mes "[Alcouskou]"; + mes "Even if this means throwing sand in an enemy's face. That is why the skill, ^5555FFSand Attack^000000, was created."; + next; + mes "[Alcouskou]"; + mes "This skill allows the user to throw and kick sand in the eyes of an opponent, temporarily blinding them."; + mes "This effectively impares the opponent's ability to defend or attack giving the user a brief but great advantage."; + next; + mes "[Alcouskou]"; + mes "In order to learn this skill you will need to gather ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000."; + if(Class == Job_Thief) mes "You will also need a job level of at least ^5555FF25^000000."; + next; + mes "[Alcouskou]"; + mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000."; + mes "He can be found in the ^009500West end of Payon^000000."; + next; + mes "[Alcouskou]"; + mes "Come back when you are ready."; + set SANDATTACK, 1; + goto M_Menu; + M_Back: + mes "[Alcouskou]"; + if (BACKSLIDE == 1)goto L_Back; + if (getskilllv(150)>0) goto L_GotBack; + mes "People tend to focus on attack and damage, but it's necessary to understand that FLEEING is JUST AS IMPORTANT as attacking!"; + next; + mes "[Alcouskou]"; + mes "We thieves/assassins pride ourselves on our speed and ability to quickly dodge."; + mes "Of course I'm sure you've noticed that there is a down side to that speed and quickness....."; + next; + mes "[Alcouskou]"; + mes "If we DO get hit, depending on the monster, that single hit could put us in serious danger!"; + next; + mes "[Alcouskou]"; + mes "I can understand how funny it is to watch a monster constantly miss while its attacking you, but......"; + next; + mes "[Alcouskou]"; + mes "If you get attacked by a large group of monsters..... you may not even have room to dodge and that won't be at all funny."; + next; + mes "[Alcouskou]"; + mes "That's why most Thiefs/Assassins fear large mobs and will flee at the first sign of them."; + mes "There are those however, that do not fear being overwhelmed by a large mob."; + next; + mes "[Alcouskou]"; + mes "These are the people who have learned a unique skill that allows them to deal with mob situatuions."; + mes "The skill enables the user to quickly 'back' out of the way of a mob, putting a great deal of distance between the two."; + next; + mes "[Alcouskou]"; + mes "The skill is called ^5555FFBack Slide^000000 and requires a lot of practice to master."; + mes "If you wish to learn this skill you will first need to bring in ^5555FF20 Grasshopper's Legs^000000."; + next; + mes "[Alcouskou]"; + mes "Think of it as the first part of your training."; + if(Class == Job_Thief) mes "If you are a Thief, you will also need to have a job level of at least ^5555FF35^000000."; + set BACKSLIDE, 1; + goto M_Menu; + M_Find: + mes "[Alcouskou]"; + if (FINDSTONE == 1) goto L_Find; + if (getskilllv(151)>0) goto L_GotFind; + mes "The more experienced and better skilled members of our guild are quite handy."; + mes "They can turn something as common as a rock on the ground into a very effective weapon."; + next; + mes "[Alcouskou]"; + mes "They can throw a rock at a far away target with great accuracy and strength."; + mes "They can throw it so powerfully that sometimes an enemy will become stunned by it."; + next; + mes "[Alcouskou]"; + mes "Of course not every stone can be used as a weapon. That is why the skill, ^5555FFFind Sone^000000, was developed."; + mes "With practice one can learn to pick out a stone that has a weight and shape that is fit for 'flinging'."; + next; + mes "[Alcouskou]"; + mes "Once mastered a Thieve/Assassin will be able to pick up stones from any location."; + mes "Think about it... the ability to use a long range weapon without spending any zeny.... isn't it great?"; + next; + mes "[Alcouskou]"; + mes "If you wan't to learn this skill you must do a little training first. Start by picking up ^5555FF1 Bear's Footskin^000000."; + mes "Then try to find ^5555FF1 Zargon^000000. Next pick out ^5555FF5 Spawn^000000. Once you've done all this come back and see me."; + next; + mes "[Alcouskou]"; + mes "Collecting those items will help you develop the skills neccessary to learn Find Stone."; + set FINDSTONE, 1; + goto M_Menu; + M_Fling: + mes "[Alcouskou]"; + if (STONEFLING == 1) goto L_Fling; + if (getskilllv(152)>0) goto L_GotFling; + mes "The more experienced and better skilled members of our guild are quite handy."; + mes "They can turn something as common as a rock on the ground into a very effective weapon."; + next; + mes "[Alcouskou]"; + mes "They can throw a stone at a far away target with great accuracy and strength."; + mes "They can throw it so powerfully that sometimes an enemy will become stunned by it."; + next; + mes "[Alcouskou]"; + mes "These guild members call this skill ^5555FFStone Fling^000000. It is extrememly useful and doesn't cost any zeny."; + next; + mes "[Alcouskou]"; + mes "If you wish to learn Stone Fling you must first bring me ^5555FF2 Garlet and 2 Scell^000000."; + mes "You will also need to have mastered ^5555FFFind Stone^000000 as well."; + set STONEFLING, 1; + goto M_Menu; + M_End: + mes "[Alcouskou]"; + mes "It seems that you are not experienced enough yet...."; + close; + +L_Sand: + if (countitem(7041)<5 || countitem(7042)<1) goto L_NotRdy1; + if (Class==Job_Thief && JobLevel<25) goto L_LowLvl1; + mes "Alright, you've got all the items. Now its time to learn.... the... ultimate.... attack.... Sand Attack!!!"; + next; + mes "[Alcouskou]"; + mes "Look down at your feet. See that? The very thing your stepping on is the secrect behind this skill......... SAND!!"; + next; + mes "[Alcouskou]"; + mes "Okay, grab a handfull....... yep, that much will do....... now........."; + next; + mes "[Alcouskou]"; + mes "THROW IT AT ME!!!"; + emotion 27; + next; + mes "[Alcouskou]"; + mes "(AHHH!! My EYES!!! Son of a)......... ya see how effective that was........ (JEEZE that STINGS!!)......."; + emotion 23; + next; + mes "[Alcouskou]"; + mes "Anyways that's all there is too it....... (CRAP that's a lot of sand!!).... So yeah, Sand Attack, use it as a last resort...... (AWW MAN!!)"; + next; + mes "[Alcouskou]"; + mes "Oh and it does Earth Property damage....... (I gota finda better way to teach this)........."; + emotion 4; + delitem 7041, 5; + delitem 7042, 1; + skill 149,1,0; + set SANDATTACK, 0; + set BAGNFNTY, 0; + close; + + L_NotRdy1: + mes "You need ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000."; + next; + mes "[Alcouskou]"; + mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000."; + mes "He can be found in the ^009500West end of Payon^000000."; + close; + L_LowLvl1: + mes "You need to have a ^5555FFJob level of 25^000000 to learn Sand Attack."; + close; + L_GotSand: + mes "Oh your back... hopefully not to throw anymore sand in my eyes, heh heh.... heh........ heh.............."; + emotion 4; + close; + +L_Back: + if (countitem(940)<20) goto L_NotRdy2; + if (Class==Thief && JobLevel<35) goto L_LowLvl2; + mes "Great, you have the grasshopper legs. While you were collecting them I'm sure you picked up on many of the characteristics of grasshoppers."; + next; + mes "[Alcouskou]"; + mes "You will need that knowledge because this skill is based on the movement of the grasshopper. Like it you will become quick, agile, and have a keen eyesight."; + next; + mes "[Alcouskou]"; + mes "Okay, lets begin........"; + next; + mes "~fwoosh~"; + next; + mes "~fwooooosh~"; + next; + mes "~fwoooooooooooooooosh~"; + next; + mes "[Alcouskou]"; + mes "Ah! You've got it. Just like a pro. With this skill being overwhelmed by mobs is a thing of the past."; + delitem 940,20; + skill 150,1,0; + set BACKSLIDE, 0; + close; + + L_NotRdy2: + mes "You need ^5555FF20 Grasshopper's Legs^000000."; + close; + L_LowLvl2: + mes "You need a ^5555FFJob level of 35^000000 to learn Back Slide."; + close; + L_GotBack: + mes "Seeing as you already have Back Slide..... why don't you 'Back' on outa here....."; + close; + +L_Find: + if (countitem(912)<1 || countitem(948)<1 || countitem(908)<5) goto L_NotRdy3; + mes "Ah! I see that you're fully prepared to learn this skill. Let us begin...."; + next; + mes "[Alcouskou]"; + mes "There are many stones on the floor here. Pick them all up one by one and examine each one carefully."; + mes "Get a feel for how much each one weighs and become aware of how each one has a different texture."; + next; + mes "[Alcouskou]"; + mes "You must become one with the stone... it is the only way you will be able to use it effectively..."; + next; + mes "~ an hour later... ~"; + next; + mes "[Alcouskou]"; + mes "Very good. You have chosen some fine stones. This tells me that you have now perfected the Find Stone skill."; + emotion 21; + delitem 912,1; + delitem 948,1; + delitem 908,5; + skill 151,1,0; + set FINDSTONE, 0; + next; + mes "[Alcouskou]"; + mes "Have fun using it."; + close; + + L_NotRdy3: + mes "You need ^5555FF1 Bear's Footskin, 1 Zargon, and 5 Spawns^000000 to learn Find Stone."; + close; + L_GotFind: + mes "Picking up stones can be fun but...... don't spend all day doing it ok?....."; + close; + +L_Fling: + if (getskilllv(151) == 0) goto L_NotRdy4; + if ((countitem(910)<2) || (countitem(911)<2)) goto L_NotRdy4; + mes "Good! You look like your ready for me to teach you the Stone Fling skill. Let us begin...."; + next; + mes "[Alcouskou]"; + mes "First, loosen up your arm. Next, find a good quality stone using Find Stone. Now close your eyes and visualize the target in your mind."; + next; + mes "[Alcouskou]"; + mes "Now imagine yourself going straight through the target! Continue to visualize this!"; + next; + mes "~ 1/2 hour later... ~"; + next; + mes "[Alcouskou]"; + mes "Think of the stone as an extension of your body. Keep the target clear in your mind! You are one with the stone, the stone is one with you....."; + next; + mes "[Alcouskou]"; + mes "Open your eyes! SEE THE TARGET!! Throw the stone at the target as if you were hurrling yourself towards it! DO IT NOW!!"; + emotion 27; + next; + mes "!!Whooooossshh!!................. !!Thwack!!"; + next; + mes "[Alcouskou]"; + mes "Haha! Excellent! It's a bullseye. You have now masterd Stone Fling, congratulations."; + emotion 21; + delitem 910,2; + delitem 911,2; + skill 152,1,0; + set STONEFLING, 0; + next; + mes "[Alcouskou]"; + mes "As you can see this is a skill that relies heavily on concentration."; + mes "As long as you keep your mind focused you will have on problems using this skill."; + close; + + L_NotRdy4: + mes "You need ^5555FF2 Scell and 2 Zargon^000000, and the ability to use ^5555FFFind Stone^000000 to learn Stone Fling."; + close; + L_GotFling: + mes "So Stone Fling is comming in handy huh? Just make sure you don't hit the wrong moster."; + close; +} + + +//==================================================================================== +payon.gat,149,120,4 script RuRumuni 99, +{ + mes "[RuRumuni]"; + if(SANDATTACK == 1 && BAGNFNTY != 2) goto L_Start; + + mes "I am a humble merchant here in Payon. I buy leather hides, brought in by the hunters, to make leather pouches to sell."; + mes "I grew up around leather and am quite good at working with it."; + next; + mes "[RuRumuni]"; + mes "There is a Thief guild in the Morroc area."; + mes "I know someone there that sends me Thieves in need of the items I make, such as the ^5533FF'Leather Bag of Infinity'^000000."; + close; + +L_Start: + if(BAGNFNTY == 1) goto L_Check; + mes "Hello. So you were sent by Alcouskou to obtain a ^5533FF'Leather Bag of Inifinity'^000000........"; + mes "I will be more than happy to make one for you............"; + next; + mes "[RuRumuni]"; + mes "But this bag is very special, and I will need some special items in order to make it."; + next; + set BAGNFNTY, 1; + + L_List: + mes "[RuRumuni]"; + mes "Here are the items that I will need:"; + mes "- 5 ^5533FFScorpion Tails^000000"; + mes "- 1 ^5533FFCobweb^000000"; + mes "- 1 ^5533FFCactus Needle^000000"; + mes "- 1 ^5533FFEarthworm Peeling^000000."; + next; + mes "[RuRumuni]"; + mes "Once you have all of these items I will be able to make the Bag of Infinity for you."; + close; + +L_Check: + mes "Nice to see you again. Do you have all of the items? Lets see........"; + next; + if(countitem(904)<5 || countitem(1025)<1 || countitem(952)<1 || countitem(1055)<1) goto L_List; + mes "[RuRumuni]"; + mes "Great you have everything I asked for. Let me start making the bag right away......."; + next; + mes "~( 30 minutes later)~"; + next; + mes "[RuRumuni]"; + mes "Here you go, one Leather Bag of Infinity. Enjoy!"; + getitem 7042, 1; + delitem 904, 5; + delitem 1025, 1; + delitem 952, 1; + delitem 1055, 1; + set BAGNFNTY, 2; + close; +} diff --git a/npc/sample/PCLoginEvent.txt b/npc/sample/PCLoginEvent.txt new file mode 100644 index 000000000..66b99e86d --- /dev/null +++ b/npc/sample/PCLoginEvent.txt @@ -0,0 +1,33 @@ +// eAthena Special NPC + +// PCLoginEvent NPC (davidsiaw) +//============================================================================== +// How it works: +// When a player logs in, the NPC will run as if he just clicked it. Which means +// if the script is like this: +// +// [code] +// prontera.gat,0,0,0 script PCLoginEvent -1,{ +// mes "lmao"; +// close; +// } +// [/code] +// +// every player who logs in will recieve a message 'lmao' in their face as soon +// as they can see the map. +//----------------------------------------------------------------------------- +// Note: +// 1) This NPC will only run if its name is 'PCLoginEvent' +// 2) I made it invisible because you don't need to see it. Its an abstract NPC +// 3) If you don't want it, simply delete it +// 4) If you have more than one PCLoginEvent NPC, strange things will happen. +// 5) You can put this script in ANY file. +// 6) I put an end; there because that just makes it do nothing. +// 7) Modify this script to your liking and give your players a surprise +// 8) Remember: IT RUNS LIKE A NORMAL NPC. BUT THE ONLY WAY TO 'CLICK' IT IS BY +// LOGGING ON + + +prontera.gat,0,0,0 script PCLoginEvent -1,{ + end; +} \ No newline at end of file diff --git a/npc/sample/bank_test.txt b/npc/sample/bank_test.txt new file mode 100644 index 000000000..511790926 --- /dev/null +++ b/npc/sample/bank_test.txt @@ -0,0 +1,59 @@ +// ƒJƒvƒ‰‹âsƒT[ƒrƒX ƒeƒXƒgƒXƒNƒŠƒvƒg +prontera.gat,162,188,1 script ‹âsˆõƒJƒvƒ‰ 112,{ + cutin "kafra_06",2; + + mes"[‹âsˆõƒJƒvƒ‰]"; + mes "ƒJƒvƒ‰‹âsƒT[ƒrƒX‚Å‚·B"; + mes "–ˆ“x‚²—˜—p‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·ô"; + mes "1000z‚©‚ç‚Å‚Ì‚²—˜—p‚É‚È‚è‚Ü‚·B"; + next; + menu "—a‚¯‚é",BANK_IN,"ˆø‚«o‚·",BANK_OUT,"‚â‚Á‚Ï‚â‚ß‚é",B_EXIT2; +BANK_IN: + mes"[‹âsˆõƒJƒvƒ‰]"; + mes "—a‚¯‚é‹àŠz‚ð“ü—Í‚µ‚Ä‚­‚¾‚³‚¢ô"; + mes "‚¿‚È‚Ý‚ÉAŽè”—¿‚Æ‚µ‚Ä"; + mes "—a‚©‚è‹à‚Ì1%’¸‚«‚Ü‚·B"; + next; + input @kafrabank; + + if(@kafrabank<1000) goto B_EXIT2; + set @kafrabank2,@kafrabank*1/100; + if(@kafrabank+@kafrabank2>Zeny) goto BANK_F; + set Zeny,Zeny-@kafrabank-@kafrabank2; + set #kafrabank,#kafrabank+@kafrabank; + mes "Žè”—¿^135445" + @kafrabank2 + "z^000000’¸‚«‚Ü‚·‚ËB"; + + goto B_EXIT; +BANK_OUT: + if(#kafrabank==0) goto BANK_F2; + mes"[‹âsˆõƒJƒvƒ‰]"; + mes "Œ»Ý‚ ‚È‚½‚©‚炨—a‚©‚肵‚Ä‚¢‚é‚Ì‚Í"; + mes "^135445" + #kafrabank + "^000000Zeny‚Å‚·B"; + mes "ˆø‚«o‚·‹àŠz‚ð“ü—Í‚µ‚Ä‚­‚¾‚³‚¢ô"; + next; + input @kafrabank; + + if(@kafrabank<1) goto B_EXIT2; + if(@kafrabank>#kafrabank) goto BANK_F; + set #kafrabank,#kafrabank-@kafrabank; + set Zeny,Zeny+@kafrabank; + + goto B_EXIT; + +BANK_F: + mes"[‹âsˆõƒJƒvƒ‰]"; + mes "Ž‚¿‹à‚ª‘«‚è‚È‚¢‚悤‚Å‚·‚ËB"; + goto B_EXIT2; +BANK_F2: + mes"[‹âsˆõƒJƒvƒ‰]"; + mes "‚ ‚È‚½‚©‚ç‚ÍA1z‚à"; + mes "‚¨—a‚©‚肵‚Ä‚¢‚È‚¢‚Å‚·‚æH"; + goto B_EXIT2; + +B_EXIT: + mes "–³Ž–‚ÉŽæ‚èˆø‚«‚Å‚«‚Ü‚µ‚½B"; +B_EXIT2: + mes "‚Ü‚½‚Ì‚²—˜—p‚ð‚¨‘Ò‚¿‚µ‚Ä‚¢‚Ü‚·ô"; + cutin "kafra_06",255; + close; +} diff --git a/npc/sample/gstorage_test.txt b/npc/sample/gstorage_test.txt new file mode 100644 index 000000000..aa6749ec0 --- /dev/null +++ b/npc/sample/gstorage_test.txt @@ -0,0 +1,33 @@ +// ƒJƒvƒ‰ƒMƒ‹ƒh‘qŒÉƒT[ƒrƒX ƒeƒXƒgƒXƒNƒŠƒvƒg +prontera.gat,165,188,4 script ƒMƒ‹ƒh‘qŒÉƒJƒvƒ‰ 112,{ + cutin "kafra_06",2; + + mes"[ƒMƒ‹ƒh‘qŒÉƒJƒvƒ‰]"; + mes "ƒJƒvƒ‰ƒMƒ‹ƒh‘qŒÉƒT[ƒrƒX‚Å‚·B"; + mes "–ˆ“x‚²—˜—p‚ ‚肪‚Æ‚¤‚²‚´‚¢‚Ü‚·ô"; + mes "ƒeƒXƒg—p‚È‚Ì‚Å‹à‚Í–á‚¢‚Ü‚¹‚ñB"; + next; + menu "ƒMƒ‹ƒh‘qŒÉ‚ð—˜—p‚·‚é",GS_OPEN,"‚â‚Á‚Ï‚â‚ß‚é",GS_EXIT3; + +GS_OPEN: + set @flag,guildopenstorage(0); + if(@flag == 1) goto GS_EXIT1; + if(@flag == 2) goto GS_EXIT2; + goto GS_EXIT4; + +GS_EXIT1: + mes "ƒMƒ‹ƒhƒƒ“ƒo[‚ª‘qŒÉ‚ðŽg—p’†‚Å‚·B"; + mes "‚µ‚΂炭‘Ò‚Á‚Ä‚©‚ç—˜—p‚µ‚Ä‚­‚¾‚³‚¢B"; + goto GS_EXIT4; + +GS_EXIT2: + mes "ƒMƒ‹ƒh‚ÉŠ‘®‚µ‚Ä‚È‚¢•û‚Í—˜—p‚·‚邱‚Æ‚ª‚Å‚«‚Ü‚¹‚ñB"; + goto GS_EXIT4; + +GS_EXIT3: + mes "‚Ü‚½‚Ì‚²—˜—p‚ð‚¨‘Ò‚¿‚µ‚Ä‚¢‚Ü‚·ô"; + +GS_EXIT4: + cutin "kafra_06",255; + close; +} diff --git a/npc/sample/npc_card_remover.txt b/npc/sample/npc_card_remover.txt new file mode 100644 index 000000000..c341c4d1b --- /dev/null +++ b/npc/sample/npc_card_remover.txt @@ -0,0 +1,197 @@ +// Card removal NPC by TyrNemesis^ “ú–{Œê–óFŒÓ’±—– +prt_in.gat,28,73,4 script Œ«‚¢˜V— 78,{ + +UPGRADEROOT: +// mes "[Wise Old Woman]"; +// mes "Good day, young one. I have the power to remove cards that you have compounded onto your equipment. Does this idea please you?"; + mes "[Œ«‚¢˜V—]"; + mes "‚¢‚¢“V‹C‚¾‚ËAŽá‚¢‚ÌB"; + mes "‚Æ‚±‚ë‚ÅAƒAƒ^ƒV‚Í•‹ï‚É‘•’…‚µ‚Ä‚¢‚é"; + mes "ƒJ[ƒh‚ðŽæ‚èŠO‚·—Í‚ðŽ‚Á‚Ä‚¢‚邯‚ÇA"; + mes "—Í‚ð‘Ý‚»‚¤‚©‚ËH"; + next; +// menu "Yes, it does.",REMOVEMENU, +// "What do you charge?",REMOVEPRICE, +// "No thanks.",CLOSEOUT; + menu "‚¨Šè‚¢‚µ‚Ü‚·B",REMOVEMENU, + "‚¢‚­‚ç‚©‚©‚é‚ñ‚Å‚·‚©H",REMOVEPRICE, + "•K—v‚È‚¢‚Å‚·B",CLOSEOUT; + +REMOVEPRICE: +// mes "[Wise Old Woman]"; +// mes "I charge a flat fee of 200000 zeny, plus 25000 zeny for each card I remove from the item. In addition, I need a star crumb and a yellow gemstone to work my magic."; + mes "[Œ«‚¢˜V—]"; + mes "‚»‚¤‚¾‚ËA"; + mes "‚Ü‚¸Šî–{—¿‹à‚Æ‚µ‚Ä^4040FF200000z^000000B"; + mes "‚»‚µ‚ăJ[ƒh‚P–‡‚ɂ‚«^4040FF25000z^000000–Ⴄ‚æB"; + mes "‚ ‚Æ‚ÍA–‚–@‚ðŽg‚¤‚½‚ß‚É^4040FF¯‚Ì‚©‚¯‚ç^000000‚Æ"; + mes "^4040FFƒCƒGƒ[ƒWƒFƒ€ƒXƒg[ƒ“^000000‚ª‚P‚‚¸‚•K—v‚¾‚æB"; + next; +// menu "Very well. Let's do it.",REMOVEMENU, +// "No thanks.",CLOSEOUT; + menu "‚¨Šè‚¢‚µ‚Ü‚·B",REMOVEMENU, + "•K—v‚È‚¢‚Å‚·B",CLOSEOUT; + +REMOVEMENU: +// mes "[Wise Old Woman]"; +// mes "Very well. Which item shall I examine for you?"; + mes "[Œ«‚¢˜V—]"; + mes "‚悵‚悵B"; + mes "‚Ç‚Ì•‹ï‚̃J[ƒh‚ðŽæ‚èŠO‚·‚ñ‚¾‚ËH"; + next; +// menu "I changed my mind.",CLOSEOUT, + menu "‚â‚Á‚Ï‚è‚â‚ß‚Ü‚·B",CLOSEOUT, + getequipname(1),-, + getequipname(2),-, + getequipname(3),-, + getequipname(4),-, + getequipname(5),-, + getequipname(6),-, + getequipname(7),-, + getequipname(8),-, + getequipname(9),-, + getequipname(10),-; + set @part,@menu-1; + if(getequipcardcnt(@part) == 0) goto DENYCARDCOUNT; + set @cardcount,getequipcardcnt(@part); +// if(@cardcount > 1) goto CARDNUMMULTIMSG; +// mes "[Wise Old Woman]"; +// mes "This item has " + @cardcount + " card compounded on it. To perform my magic, I will need 225000 zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; +// goto CARDNUMPOSTMSG; +//CARDNUMMULTIMSG: +// mes "[Wise Old Woman]"; +// mes "This item has " + @cardcount + " cards compounded on it. To perform my magic, I will need " + (200000+(@cardcount * 25000)) + " zeny, a ^0000FFStar Crumb^000000, and a ^0000FFYellow Gemstone^000000."; + mes "[Œ«‚¢˜V—]"; + mes "‚±‚Ì•‹ï‚É‚Í" + @cardcount + "‚ƒJ[ƒh‚ª‚‚¢‚Ä‚é‚ËB"; + mes "^0000FF" + (200000+(@cardcount * 25000)) + "z^000000‚Æ^0000FF¯‚Ì‚©‚¯‚ç^000000‚Æ^0000FFƒCƒGƒ[ƒWƒFƒ€ƒXƒg[ƒ“^000000‚ª•K—v‚¾‚æB"; +//CARDNUMPOSTMSG: + next; +// menu "Very well. Do it.",REMOVECARDWARNING, +// "Never mind.",CLOSEOUT; + menu "‚í‚©‚è‚Ü‚µ‚½A‚¨Šè‚¢‚µ‚Ü‚·B",REMOVECARDWARNING, + "‚â‚Á‚Ï‚è‚â‚ß‚Ü‚·B",CLOSEOUT; + +REMOVECARDWARNING: +// mes "[Wise Old Woman]"; +// mes "Before I begin, I must warn you--I may fail. If I do, I may destroy the cards, the item, or both. I do not give refunds. That being said, which is more important to you: The cards, or the item?"; + mes "[Œ«‚¢˜V—]"; + mes "‚¨‚Á‚ÆŒ¾‚¢–Y‚ê‚é‚Æ‚±‚낾‚Á‚½‚ËB"; + mes "‚±‚Ì–‚–@‚Í‚Æ‚Ä‚à“‚¢‚©‚çA"; + mes "^FF4040Ž¸”s‚·‚é‚©‚à‚µ‚ê‚È‚¢^000000‚Ì‚³B"; + mes "Ž¸”s‚µ‚½‚çƒJ[ƒh‚©•‹ïA‚ ‚é‚¢‚Í"; + mes "‚»‚Ì—¼•û‚ª^FF4040”j‰ó‚³‚ê‚Ä‚µ‚Ü‚¤^000000‚©‚à"; + mes "‚µ‚ê‚È‚¢‚ñ‚¾‚æB"; + next; + mes "[Œ«‚¢˜V—]"; + mes "Ž¸”s‚µ‚Ä‚à^FF4040•Ô‹à‚Í‚µ‚È‚¢^000000‚©‚çA"; + mes "ˆê‰ž•·‚¢‚Ä’u‚­‚¯‚ÇA”ä‚ׂé‚È‚ç"; + mes "ƒJ[ƒh‚Æ•‹ï‚Ì‚Ç‚Á‚¿‚ª‘åØ‚¾‚¢H"; + next; +// menu "I changed my mind about this.",CLOSEOUT, +// "The item.",PRIORITYITEM, +// "The cards.",PRIORITYCARD; + menu "‚»‚ê‚È‚ç‚â‚ß‚Ü‚·B",CLOSEOUT, + "•‹ï‚Ì•û‚ª‘åØ‚Å‚·B",PRIORITYITEM, + "ƒJ[ƒh‚Ì•û‚ª‘åØ‚Å‚·",PRIORITYCARD; + +PRIORITYITEM: + set @failtype,1; + goto REMOVECARD; + +PRIORITYCARD: + set @failtype,2; + goto REMOVECARD; + +REMOVECARD: +// mes "[Wise Old Woman]"; +// mes "Very well. I shall begin."; + mes "[Œ«‚¢˜V—]"; + mes "‚悵AŽn‚ß‚é‚æB"; + next; + if((zeny < (200000+(@cardcount * 25000))) || (countitem(1000) < 1) || (countitem(715) < 1)) goto DENYMATERIAL; + set zeny,zeny - (200000+(@cardcount * 25000)); + delitem 1000,1; + delitem 715,1; + +// Replace the constants in the next 3 lines with failure chance values defined in refine_db.txt +// First value = Total failure chance (item and cards destroyed) +// Second value = Partial failure chance (one or the other is destroyed, player decides which one is safe) +// Third value = Harmless failure chance (all that's lost is your investment) + + set @failchance,rand(100); + if(@failchance < 2) goto FAILREMOVECARD0; + if((@failchance < 6) && (@failtype == 1)) goto FAILREMOVECARD1; + if((@failchance < 6) && (@failtype == 2)) goto FAILREMOVECARD2; + if(@failchance < 10) goto FAILREMOVECARD3; + successremovecards @part; +// mes "[Wise Old Woman]"; +// mes "The process was a success. Here are your cards and your item. Farewell."; + mes "[Œ«‚¢˜V—]"; + mes "‚¤‚Ü‚­‚¢‚Á‚½‚æB"; + mes "‚±‚ê‚炪•‹ï‚ƃAƒCƒeƒ€‚³B‚¶‚á‚ ‚ËB"; + close; + +FAILREMOVECARD0: +// mes "[Wise Old Woman]"; +// mes "The process was a total failure. I am afraid the item and the cards were destroyed."; + mes "[Œ«‚¢˜V—]"; + mes "Žc”O‚¾‚¯‚ÇŠ®‘S‚ÉŽ¸”s‚µ‚½‚æB"; + mes "•‹ï‚àƒJ[ƒh‚à‰ó‚ê‚Ä‚µ‚Ü‚Á‚½B"; + failedremovecards @part,0; + close; + +FAILREMOVECARD1: +// mes "[Wise Old Woman]"; +// mes "While I have managed to remove the cards from the item, they were destroyed in the process. The item, however, is okay."; + mes "[Œ«‚¢˜V—]"; + mes "Šæ’£‚Á‚½‚¯‚Ç‚ËA"; + mes "ƒJ[ƒh‚Ì‚Ù‚¤‚Í‘S•”‰ó‚ê‚Ä‚µ‚Ü‚Á‚½‚æB"; + mes "‚Å‚à•‹ï‚Ì•û‚Í–³Ž–‚¾‚Á‚½‚æB"; + failedremovecards @part,1; + close; + +FAILREMOVECARD2: +// mes "[Wise Old Woman]"; +// mes "Most unfortunate. I succeeded at removing the cards, but the item itself was destroyed in the process."; + mes "[Œ«‚¢˜V—]"; + mes "•s‰^‚¾‚Á‚½‚ËB"; + mes "ƒJ[ƒh‚ðŽæ‚èŠO‚·‚Ì‚Í‚¤‚Ü‚­‚¢‚Á‚½‚¯‚Ç"; + mes "•‹ï‚ª‰ó‚ê‚Ä‚µ‚Ü‚Á‚½‚æB"; + failedremovecards @part,2; + close; + +FAILREMOVECARD3: +// mes "[Wise Old Woman]"; +// mes "I have failed to remove the cards. Luckily, however, both the item and the cards are still okay."; + mes "[Œ«‚¢˜V—]"; + mes "ƒJ[ƒh‚ðŽæ‚èŠO‚·‚Ì‚ÉŽ¸”s‚µ‚½‚æB"; + mes "‚Å‚àA•sK’†‚ÌK‚¢‚³B"; + mes "•‹ï‚àƒJ[ƒh‚à–³Ž–‚¾‚æB"; + failedremovecards @part,3; + close; + +DENYCARDCOUNT: +// mes "[Wise Old Woman]"; +// mes "Young one... There are no cards compounded on this item. I can do nothing with it, I'm afraid."; + mes "[Œ«‚¢˜V—]"; + mes "Žá‚¢‚ÌAƒJ[ƒh‚ª‚‚¢‚Ä‚È‚¢‚æB"; + mes "‚»‚ꂶ‚áƒAƒ^ƒV‚Ìo”Ô‚Í‚È‚¢‚³B"; + close; + +DENYMATERIAL: +// mes "[Wise Old Woman]"; +// mes "You do not have all the items I require to work my magic, child. Come again when you do."; + mes "[Œ«‚¢˜V—]"; + mes "•K—v‚ȃAƒCƒeƒ€‚ª‘«‚è‚È‚¢‚悤‚¾‚ËB"; + mes "ƒAƒCƒeƒ€‚𑵂¦‚Ä‚à‚¤ˆê“x—ˆ‚ÈB"; + close; + +CLOSEOUT: +// mes "[Wise Old Woman]"; +// mes "Very well. Return at once if you seek my services."; + mes "[Œ«‚¢˜V—]"; + mes "‚í‚©‚Á‚½‚æB"; + mes "ƒAƒ^ƒV‚Ì—Í‚ª•K—v‚È‚ç‚¢‚Â‚Å‚à—ˆ‚ÈB"; + close; + +} diff --git a/npc/sample/npc_equip_sample.txt b/npc/sample/npc_equip_sample.txt new file mode 100644 index 000000000..942ec47eb --- /dev/null +++ b/npc/sample/npc_equip_sample.txt @@ -0,0 +1,17 @@ + +prontera.gat,161,181,6 script GetEquipID Sample 105,{ + mes "[GetEquipID Sample]"; + mes " GetEquipID(01) : " + getequipid(1); + mes " GetEquipID(02) : " + getequipid(2); + mes " GetEquipID(03) : " + getequipid(3); + mes " GetEquipID(04) : " + getequipid(4); + mes " GetEquipID(05) : " + getequipid(5); + mes " GetEquipID(06) : " + getequipid(6); + mes " GetEquipID(07) : " + getequipid(7); + mes " GetEquipID(08) : " + getequipid(8); + mes " GetEquipID(09) : " + getequipid(9); + mes " GetEquipID(10) : " + getequipid(10); + close; + end; +} + diff --git a/npc/sample/npc_extend_shop.txt b/npc/sample/npc_extend_shop.txt new file mode 100644 index 000000000..242c900c0 --- /dev/null +++ b/npc/sample/npc_extend_shop.txt @@ -0,0 +1,68 @@ +//ƒŒƒAƒAƒCƒeƒ€‚m‚o‚bƒVƒ‡ƒbƒv + + + +// ƒAƒCƒeƒ€Œn +prontera.gat,163,170,3 shop ‚‹‰‚ȃAƒCƒeƒ€‰® 75,507:-1,508:-1,509:-1,510:-1,514:-1,518:-1,533:-1,607:-1,608:-1,529:-1,530:-1,603:-1,604:-1,616:-1,617:-1,644:-1,724:-1,718:-1,714:-1,756:-1,757:-1,984:-1,985:-1,1002:-1,998:-1,999:-1,1003:-1,989:-1,713:-1,970:-1,971:-1,972:-1,7026:-1,7027:-1701:-1,968:-1,1029:-1,1030:-1,7034:-1,7035:-1,7036:-1,7047:-1 + + + +// ‘•”õ@•ÐŽèŒ• +prontera.gat,149,170,3 shop ‹†‹É‚̕Ў茕‰® 76,1108:-1,1111:-1,1114:-1,1120:-1,1125:-1,1127:-1,1128:-1,1130:-1,1131:-1,1132:-1,1133:-1,1134:-1,1135:-1,1136:-1,1137:-1,1138:-1,1139:-1,1140:-1,1141:-1,1144:-1,1145:-1 +// ‘•”õ@—¼ŽèŒ• +prontera.gat,149,167,3 shop ‹†‹É‚Ì—¼ŽèŒ•‰® 76,1117:-1,1152:-1,1155:-1,1158:-1,1161:-1,1162:-1,1164:-1,1165:-1,1166:-1,1167:-1,1168:-1,1170:-1 +// ‘•”õ@’ZŒ• +prontera.gat,149,164,3 shop ‹†‹É‚Ì’ZŒ•‰® 76,1202:-1,1205:-1,1208:-1,1211:-1,1214:-1,1220:-1,1223:-1,1226:-1,1227:-1,1228:-1,1229:-1,1231:-1,1232:-1,1233:-1,1234:-1,1236:-1,1237:-1,1239:-1 +// ‘•”õ@ƒJƒ^[ƒ‹ +prontera.gat,149,161,3 shop ‹†‹É‚̃Jƒ^[ƒ‹‰® 76,1251:-1,1253:-1,1255:-1,1256:-1,1257:-1,1258:-1,1259:-1,1260:-1,1261:-1 +// ‘•”õ@•€ +prontera.gat,149,158,3 shop ‹†‹É‚Ì•€‰® 76,1302:-1,1305:-1,1306:-1,1352:-1,1361:-1,1363:-1,1364:-1,1366:-1,1367:-1,1368:-1 +// ‘•”õ@‘„ +prontera.gat,149,155,3 shop ‹†‹É‚Ì‘„‰® 76,1402:-1,1405:-1,1408:-1,1413:-1,1414:-1,1415:-1,1417:-1,1455:-1,1461:-1,1464:-1,1466:-1,1467:-1,1468:-1,1469:-1,1470:-1,1471:-1 +// ‘•”õ@“ÝŠí +prontera.gat,149,152,3 shop ‹†‹É‚̓݊퉮 76,1502:-1,1505:-1,1508:-1,1511:-1,1514:-1,1517:-1,1520:-1,1523:-1,1524:-1,1525:-1,1526:-1,1527:-1,1528:-1,1529:-1,1530:-1 +// ‘•”õ@–{ +prontera.gat,149,149,3 shop ‹†‹É‚Ì–{‰® 76,1550:-1,1551:-1,1552:-1,1553:-1,1554:-1,1555:-1,1556:-1,1557:-1,1558:-1 +// ‘•”õ@ñ +prontera.gat,149,146,3 shop ‹†‹É‚Ìñ‰® 76,1602:-1,1605:-1,1608:-1,1611:-1,1613:-1,1614:-1,1615:-1,1472:-1,1473:-1 +// ‘•”õ@‹| +prontera.gat,149,143,3 shop ‹†‹É‚Ì‹|‰® 76,1705:-1,1708:-1,1711:-1,1715:-1,1716:-1,1719:-1,1720:-1 + + + +// ‘•”õ@“ª•”i‚r•t‚«j +prontera.gat,162,167,5 shop ŽŠ‚‚Ì‚rŠ•‰® 77,2202:-1,2204:-1,2209:-1,2217:-1,2221:-1,2223:-1,2225:-1,2227:-1,2229:-1,2231:-1,2233:-1 +// ‘•”õ@“ª•”i‚r–³‚µ‚»‚Ì‚Pj +prontera.gat,162,164,5 shop ŽŠ‚‚Ì•Ï‘••i‰®‚P 77,2207:-1,2210:-1,2213:-1,2214:-1,2215:-1,2230:-1,2234:-1,2235:-1,2236:-1,2244:-1,2245:-1,2246:-1,2247:-1,2248:-1,2249:-1,2250:-1,2251:-1,2252:-1,2253:-1,2254:-1,2255:-1,2256:-1,2257:-1,2258:-1,2259:-1,2260:-1,2261:-1,2262:-1,2263:-1,2264:-1,2271:-1,2272:-1,2273:-1,2274:-1,2275:-1,2277:-1,2279:-1,2280:-1,2282:-1,2283:-1,2284:-1,2285:-1,2287:-1,2289:-1,2290:-1,2293:-1,2294:-1,2298:-1,2299:-1 +// ‘•”õ@“ª•”i‚r–³‚µ‚»‚Ì‚Qj +prontera.gat,162,161,5 shop ŽŠ‚‚Ì•Ï‘••i‰®‚Q 77,5001:-1,5002:-1,5003:-1,5006:-1,5007:-1,5008:-1,5009:-1,5010:-1,5011:-1,5012:-1,5013:-1,5014:-1,5015:-1,5016:-1,5017:-1,5018:-1,5019:-1,5020:-1,5021:-1,5022:-1,5023:-1,5024:-1,5025:-1,5026:-1,5027:-1,5028:-1,5029:-1,5030:-1,5031:-1,5032:-1,5033:-1,5034:-1,5035:-1,5036:-1,5037:-1,5038:-1,5039:-1,5040:-1,5041:-1,5042:-1,5043:-1,5045:-1,5046:-1,5047:-1,5048:-1,5049:-1,5050:-1,5052:-1,5053:-1 +// ‘•”õ@“ª•”i’†’i•‰º’ij +prontera.gat,162,158,5 shop ŽŠ‚‚Ì•Ï‘••i‰®‚R 77,2276:-1,2281:-1,2286:-1,2288:-1,2291:-1,2292:-1,2295:-1,2296:-1,2297:-1,5004:-1,5005:-1,5054:-1,2265:-1,2266:-1,2267:-1,2268:-1,2269:-1,2270:-1,5051:-1 +// ‘•”õ@ŠZ +prontera.gat,162,155,5 shop ŽŠ‚‚ÌŠZ‰® 77,2311:-1,2315:-1,2317:-1,2318:-1,2320:-1,2322:-1,2324:-1,2326:-1,2327:-1,2329:-1,2331:-1,2334:-1,2336:-1,2337:-1,2342:-1 +// ‘•”õ@‚ +prontera.gat,162,152,5 shop ŽŠ‚‚Ì‚‰® 77,2102:-1,2104:-1,2106:-1,2108:-1,2109:-1 +// ‘•”õ@ŒC +prontera.gat,162,149,5 shop ŽŠ‚‚ÌŒC‰® 77,2402:-1,2404:-1,2406:-1,2407:-1,2410:-1,2412:-1 +// ‘•”õ@ŠO“… +prontera.gat,162,146,5 shop ŽŠ‚‚ÌŠO“…‰® 77,2502:-1,2504:-1,2506:-1,2507:-1,2508:-1,2509:-1 +// ‘•”õ@ƒAƒNƒZƒTƒŠ +prontera.gat,162,143,5 shop ŽŠ‚‚̃AƒNƒZƒTƒŠ‰® 77,2601:-1,2602:-1,2603:-1,2604:-1,2605:-1,2607:-1,2610:-1,2615:-1,2616:-1,2617:-1,2618:-1,2619:-1,2620:-1,2621:-1,2622:-1,2623:-1,2624:-1,2625:-1,2626:-1,2629:-1,2631:-1 + + + +// •Ší‚ÉŽh‚·ƒJ[ƒh +prontera.gat,162,235,5 shop Å‹­‚Ì•ŠíƒJ[ƒh‰® 80,4002:-1,4004:-1,4006:-1,4018:-1,4025:-1,4026:-1,4019:-1,4029:-1,4043:-1,4017:-1,4020:-1,4024:-1,4037:-1,4055:-1,4057:-1,4076:-1,4096:-1,4104:-1,4005:-1,4030:-1,4049:-1,4062:-1,4065:-1,4069:-1,4085:-1,4130:-1,4007:-1,4035:-1,4060:-1,4063:-1,4068:-1,4080:-1,4094:-1,4111:-1,4118:-1,4140:-1,4082:-1,4092:-1,4126:-1,4072:-1,4086:-1,4106:-1,4115:-1,4117:-1,4121:-1,4125:-1,4134:-1,4137:-1,4142:-1,4147:-1 +// “ª‚É‘}‚·ƒJ[ƒh +prontera.gat,149,235,3 shop Å‹­‚Ì“ªƒJ[ƒh‰® 80,4010:-1,4039:-1,4041:-1,4046:-1,4052:-1,4087:-1,4110:-1,4112:-1,4122:-1,4127:-1,4132:-1,4143:-1,4148:-1 +// ŠZ‚É‘}‚·ƒJ[ƒh +prontera.gat,162,238,5 shop Å‹­‚ÌŠZƒJ[ƒh‰® 80,4001:-1,4003:-1,4008:-1,4011:-1,4014:-1,4016:-1,4021:-1,4023:-1,4031:-1,4078:-1,4047:-1,4054:-1,4089:-1,4098:-1,4099:-1,4101:-1,4114:-1,4119:-1,4141:-1,4042:-1,4061:-1,4105:-1,4135:-1 +// ‚‚É‘}‚·ƒJ[ƒh +prontera.gat,149,238,3 shop Å‹­‚Ì‚ƒJ[ƒh‰® 80,4012:-1,4013:-1,4032:-1,4058:-1,4059:-1,4066:-1,4074:-1,4083:-1,4120:-1,4124:-1,4136:-1,4138:-1,4045:-1,4067:-1,4075:-1,4090:-1,4128:-1,4146:-1 +// Œ¨‚É‚©‚¯‚é‚à‚Ì‚É‘}‚·ƒJ[ƒh +prontera.gat,162,241,5 shop Å‹­‚ÌŠO“…ƒJ[ƒh‰® 80,4056:-1,4071:-1,4081:-1,4095:-1,4108:-1,4109:-1,4113:-1,4116:-1,4133:-1,4015:-1,4088:-1,4102:-1,4129:-1 +// ŒC‚É‘}‚·ƒJ[ƒh +prontera.gat,149,241,3 shop Å‹­‚ÌŒCƒJ[ƒh‰® 80,4009:-1,4038:-1,4050:-1,4070:-1,4097:-1,4100:-1,4107:-1,4123:-1,4131:-1 +// ƒAƒNƒZƒTƒŠ[‚É‘}‚·ƒJ[ƒh +prontera.gat,162,244,5 shop Å‹­‚̃AƒNƒZƒTƒŠƒJ[ƒh‰® 80,4022:-1,4027:-1,4028:-1,4034:-1,4051:-1,4064:-1,4091:-1,4079:-1,4033:-1,4040:-1,4044:-1,4048:-1,4053:-1,4073:-1,4084:-1,4093:-1,4103:-1,4139:-1,4036:-1,4077:-1,4144:-1,4145:-1 + diff --git a/npc/sample/npc_sample.txt b/npc/sample/npc_sample.txt new file mode 100644 index 000000000..f589ef370 --- /dev/null +++ b/npc/sample/npc_sample.txt @@ -0,0 +1,457 @@ +// +// Athena Sample Script +// (c) 2003 Athena Project. +// +// $Id: npc_sample.txt,v 1.1.1.1 2004/09/10 17:26:47 MagicalTux Exp $ + +// ‚±‚̃tƒ@ƒCƒ‹‚ÍAAthena‚ÅŽg—p‚³‚ê‚éƒXƒNƒŠƒvƒg‚̉ðà‚ÆŽg—p—á‚̃Tƒ“ƒvƒ‹‚Æ +// ‚È‚Á‚Ä‚¢‚Ü‚·B + +// ============= +// *Šî–{“I‚È‘Ž® +// ============= +// \t\t\t +// \t‚ÍTAB‚ð‚ ‚ç‚킵‚Ü‚·B +// command ‚Í "warp" / "monster" / "shop" / "script" ‚Ì‚¢‚¸‚ê‚©‚É‚È‚è‚Ü‚·B +// Šes‚É‚¨‚¢‚Ä"//"ˆÈ~‚̓Rƒƒ“ƒg‚Æ‚µ‚Ä–³Ž‹‚³‚ê‚Ü‚·B +// ˆÈ‰ºAŒÂX‚ɂ‚¢‚ĉðà‚ð‚µ‚Ä‚¢‚«‚Ü‚·B +// +// ‘Ž®’†‚Æ‚©‚©‚ê‚Ä‚¢‚é•”•ª‚Ín‚Æ‚¢‚¤•¶Žš‚Å‚Í‚È‚­A”CˆÓ‚Ì•¶Žš—ñ/’l‚ðŽ¦‚µ‚Ü‚·B +// ‚Ü‚½A[n]‚Í•K—v‚ɉž‚¶‚ÄŽw’è‚·‚é”CˆÓ‚Ì•¶Žš—ñ/’l‚Æ‚È‚Á‚Ä‚¢‚Ü‚·B + +// ======== +// *command +// ======== +// +// --------------- +// *’Êíwarp(warp) +// --------------- +// ‘Ž® : ,, warp ,,[.gat],, +// +// - ƒ}ƒbƒvƒf[ƒ^ƒtƒ@ƒCƒ‹–¼BŠg’£Žq‚Í•K{‚Å‚·B +// , - ƒ[ƒvƒ|ƒCƒ“ƒg‚Ì’†SÀ•W(x,y) +// - npc–¼Bˆê•¶ŽšˆÈã‚Ì”CˆÓ‚Ì•¶Žš‚ÅŽw’肵‚Ü‚·Bƒ†ƒj[ƒN‚È–¼‘O‚Å‚ ‚é•K—v‚Í‚ ‚è‚Ü‚¹‚ñB +// ŽÀÛ‚É‚Í•\Ž¦‚³‚ê‚Ü‚¹‚ñB +// , - “®ì”͈Í(x,y) ‚ð’†S‚É(dx+1,dy+1)‚͈̔͂ÉPC‚ª—ˆ‚é‚Æ”­“®‚µ‚Ü‚· +// ,, - +// ˆÚ“®æ‚̃}ƒbƒvƒf[ƒ^ƒtƒ@ƒCƒ‹–¼,À•W(x,y) +// destination_gatname‚ɂ‚¢‚Ä‚ÍŠg’£Žq".gat"‚Í‚ ‚Á‚Ä‚à–³‚­‚Ä‚à\‚¢‚Ü‚¹‚ñB +// ˆÚ“®æ‚Ìmapƒf[ƒ^ƒtƒ@ƒCƒ‹‚ª‘¶Ý‚µ‚È‚¢(‚ ‚é‚¢‚Ímap_config‚ÅŽw’肳‚ê‚Ä‚¢‚È‚¢)ꇂ͔­“®‚µ‚Ü‚¹‚ñB +// ˆÚ“®æ‚ÌÀ•W‚ªi“ü‹ÖŽ~‹æˆæ‚Å‚ ‚Á‚½ê‡‚ÍAƒ‰ƒ“ƒ_ƒ€‚ÈÀ•W‚Ƀ[ƒv‚µ‚Ü‚·B +// ‚Ü‚½A“¯ˆêÀ•W‚É•¡”‚Ìwarp‚ª’u‚©‚ê‚Ä‚¢‚½ê‡Aæ‚É‹Lq‚³‚ê‚Ä‚¢‚é‚à‚Ì‚ª—LŒø‚É‚È‚è‚Ü‚· +// ‚±‚ê‚ÍAconfƒtƒ@ƒCƒ‹“à‚ÅŽw’肳‚ê‚éAnpc*.txtƒtƒ@ƒCƒ‹‚ð‚Ü‚½‚¢‚Åwarp‚ð‹Lq‚·‚é‚Æ‚«‚à“¯‚¶‚±‚Æ‚ª‚¢‚¦‚Ü‚·B +// —á: +prontera.gat,156,185,4 warp sample1 0,0,prontera.gat,156,225 +prontera.gat,156,185,4 warp sample1a 0,0,prontera.gat,156,230 +// sample1‚Ì•û‚ªæ‚É‹Lq‚³‚ê‚Ä‚¢‚é‚Ì‚ÅA156,225‚Ɉړ®‚µ‚Ü‚· +prontera.gat,156,220,4 warp sample1-1 0,0,prontera.gat,156,180 + +// -------------------- +// *ƒ‚ƒ“ƒXƒ^[(monster) +// -------------------- +// ‘Ž®:,,[,,] monster ,[,,] +// - ƒ}ƒbƒvƒf[ƒ^ƒtƒ@ƒCƒ‹–¼BŠg’£Žq‚Í•K{‚Å‚·B +// , - ‰Šú”z’uÀ•W(x,y) 0,0‚Å‚ ‚ê‚΃‰ƒ“ƒ_ƒ€‚Ȉʒu‚É”z’u‚³‚ê‚Ü‚·B +// [,,] - “Á’è”͈͓à‚É”z’u‚·‚鎞‚ÉŽw’肵‚Ü‚·B +// - ƒ}ƒEƒXƒJ[ƒ\ƒ‹‚ð‡‚킹‚½‚Æ‚«‚É•\Ž¦‚³‚ê‚é–¼‘OB–¼‘O‚͈ꕶŽšˆÈãŽw’肵‚Ä‚­‚¾‚³‚¢ +// - ƒLƒƒƒ‰ƒNƒ^[ŽíBÚׂɂ‚¢‚Ä‚Í‚¨Ž@‚µ‚­‚¾‚³‚¢(db/mob_db.txt‚ªŽQl‚É‚È‚é‚ÆŽv‚¢‚Ü‚·‚ª...) +// - ”z’u” +// [,,] - “¯ˆêpc_id‚ð‚à‚ƒ‚ƒ“ƒXƒ^[‚̶¬ŽžŠÔ‚ɂ‚¢‚Ä‚Ì’è‹` +// ‘O‰ñoŒ»ŽžŠÔ+oŒ»’x‰„1,“|‚³‚ꂽŽžŠÔ+oŒ»’x‰„2,“|‚³‚ꂽŽžŠÔ+5•b ‚ÅŽZo‚³‚ê‚é’l‚Ì‚¤‚¿AÅ‚à‘å‚«‚¢•¨‚ð +// oŒ»ŽžŠÔ‚Æ‚µ‚Ü‚· +// —á: +prontera.gat,0,0 monster ƒ|ƒŠƒ“ 1002,5 + +// --------- +// *“X(shop) +// --------- +// ‘Ž®:,,, shop ,:[,:[,.....:]] +// - ƒ}ƒbƒvƒf[ƒ^ƒtƒ@ƒCƒ‹–¼BŠg’£Žq‚Í•K{‚Å‚·B +// , - NPC‚Ì”z’uÀ•W(x,y) +// - npc‚ÌŒü‚¢‚Ä‚¢‚é•ûŒüB0‚ð–k(yÀ•W•ûŒü+)‚Æ‚µ‚ÄA”½ŽžŒv‰ñ‚è45“x‚«‚´‚Ý‚É‚È‚Á‚Ä‚¢‚Ü‚· +// - ƒ}ƒEƒXƒJ[ƒ\ƒ‹‚ð‡‚킹‚½‚Æ‚«‚É•\Ž¦‚³‚ê‚é–¼‘OB–¼‘O‚͈ꕶŽšˆÈãŽw’肵‚Ä‚­‚¾‚³‚¢ +// - ƒLƒƒƒ‰ƒNƒ^[ŽíBÚׂɂ‚¢‚Ä‚Í‚¨Ž@‚µ‚­‚¾‚³‚¢ +// : - item_id_N‚̤•i‚ð‰¿Šiprice_N‚Æ‚µ‚Ĕ̔„•¨ƒEƒCƒ“ƒhƒE‚É•\Ž¦‚µ‚Ü‚·B +// item_id‚ɂ‚¢‚Ä‚Ídb/item_db.txt‚ðŽQÆ‚µ‚Ä‚­‚¾‚³‚¢B +// —á: +prontera.gat,136,203,6 shop “¹‹ï¤l 73,501:5,502:20,503:55,504:120,506:20,645:80,656:150,601:30,602:30,611:20,610:400 + +// -====================- +// *NPCƒXƒNƒŠƒvƒg(script) +// -====================- +// ‘Ž®: +// ,,, script [,,],{