diff options
| -rw-r--r-- | npc/010-2/sawis.txt | 130 |
1 files changed, 130 insertions, 0 deletions
diff --git a/npc/010-2/sawis.txt b/npc/010-2/sawis.txt new file mode 100644 index 000000000..314e0774f --- /dev/null +++ b/npc/010-2/sawis.txt @@ -0,0 +1,130 @@ +// TMW2 Script +// Author: +// Saulc +// Reviewer: +// Jesusalva +// Description: +// craft desert shirt refert to player msawis +// id:193 HalinarzoQuest_Sawis + +010-2,138,122,0 script Sawis NPC_PLAYER,{ + .@Miner = getq(HalinarzoQuest_Sawis); + if (BaseLevel < 37) goto L_TooWeak; + if (.@Miner == 1) goto L_Check; + if (.@Miner == 2) goto L_Complete; + +L_GiveTask: + mesn; + mesq lg("Hello, wanderer!"); + next; + mesq l("No one visit me, im in peace there."); + next; + + menu + l("What are you doing alone in this desert?"), L_Quest, + l("Don't speak to me crazy guy!"), L_Quit; + +L_Quest: + mes ""; + mesn; + mesq l("I do some research about evolution of snake skin subject to hard sunlight."); + next; + mesn; + mesq l("Then i craft some new typê of stronge desert shirt, to protect user from snake and sunlight."); + next; + mesn; + mesq l("If you bring me some items, I can craft one for you and you will be my test subject."); + next; + + menu + l("Yeah sure? What do you need?"), L_Start, + l("Nah, sorry everythings good for me."), L_Quit; + +L_Start: + setq HalinarzoQuest_Sawis, 1; + mes ""; + mesn; + mesq l("Ok, what I need is:"); + goto L_List; + +L_Quit: + mes ""; + mesn; + mesq l("Alright."); + close; + +L_List: + mes ""; + mesn; + mes l("Here's what I need:"); + mes l("@@/1 @@", countitem(LeatherShirt), getitemlink(LeatherShirt)); + mes l("@@/1 @@", countitem(CottonCloth), getitemlink(CottonCloth)); + mes l("@@/1 @@", countitem(CaveSnakeSkin), getitemlink(CaveSnakeSkin)); + mes l("@@/3 @@", countitem(SnakeSkin), getitemlink(SnakeSkin)); + close; + +L_Check: + mesn; + mesq l("Did you brought me everything I asked for?"); + next; + menu + l("Yes!"), L_Give, + l("Sorry, I forgot what you need!"), L_List, + l("No!"), L_Quit; + +L_Give: + if ( + countitem(LeatherShirt) < 1 || + countitem(CottonCloth) < 1 || + countitem(CaveSnakeSkin) < 1 || + countitem(SnakeSkin) < 3 + ) goto L_Lying; + + inventoryplace DesertShirt, 1; + + delitem(LeatherShirt, 1); + delitem(CottonCloth, 1); + delitem(CaveSnakeSkin, 1); + delitem(SnakeSkin, 3); + + getitem(DesertShirt, 1); + getexp(5000, 30); + setq(HalinarzoQuest_Sawis, 2); + + mes ""; + mesn; + mesq l("I hope this is your size."); + close; + +L_Complete: + mesn; + mesq l("As i see, you stay alive!."); + close; + +// Funnier to write than to read, but the player lied. :angel: +L_Lying: + mesn; + mesq l("No no no, that's wrong."); + next; + mesc l("You dont have all item required."); + next; + goto L_List; + +L_TooWeak: + mesn; + mesq l("What are you doing here this place is too dangerous for you!"); + close; + +OnInit: + .@npcId = getnpcid(0, .name$); + setunitdata(.@npcId, UDT_HEADMIDDLE, DesertShirt); + setunitdata(.@npcId, UDT_HEADBOTTOM, BromenalPants); + setunitdata(.@npcId, UDT_WEAPON, DeepBlackBoots); + setunitdata(.@npcId, UDT_HAIRSTYLE, 7); + setunitdata(.@npcId, UDT_HAIRCOLOR, 7); + + .sex = G_MALE; + .distance = 4; + + end; +} |