diff options
Diffstat (limited to 'npc/005-5/nylo.txt')
-rw-r--r-- | npc/005-5/nylo.txt | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/npc/005-5/nylo.txt b/npc/005-5/nylo.txt index 73755c83e..701501304 100644 --- a/npc/005-5/nylo.txt +++ b/npc/005-5/nylo.txt @@ -138,11 +138,13 @@ speech S_LAST_BLANK_LINE, l("Visiting the bank too right? We're only a small village but Cynric is the best bank guy I know."); + .@q=getq(CandorQuest_Marggo); do { select l("Yeah, you're right."), l("You store a large collection of goods. Could you perhaps sell me some?"), + rif(!.@q,l("What do you for a living?")), l("What is banking?"); switch (@menu) { @@ -152,6 +154,9 @@ openshop "Nylo#Beer"; break; case 3: + goto L_Main; + break; + case 4: nylo_explain; break; } @@ -161,6 +166,56 @@ goodbye; close; +L_Main: + mesn; + mesq l("Well, for a living, I usually tend to the crops."); + next; + mesn; + mes l("I raise them, water them, and then sell them."); + mes l("I also brew some of the crops, making Beer. And then I sell to adventurers!"); + if (BaseLevel < 6) + close; + next; + mesn; + mes l("Well, you're an adventurer, and I guess tending to crops isn't your cup of tea."); + mes l("But maybe you could help me killing a few maggots?"); + next; + mesn; + mes l("Eight Maggots will rinse from the ground and will start destroying the crops."); + mes l("You must kill them before the crops are gone. I'll reward you, of course."); + next; + mesn; + mesq l("Interested?"); + if (askyesno() == ASK_NO) { + mes ""; + mesn; + mesq l("Heh. Fair enough."); + close; + } + + .@ID=getcharid(0); + .@MAP$="MRGO@"+str(.@ID); + + // Create the Marggo + .@INSTID = instance_create("MRGX@"+(.@ID), 0, IOT_NONE); + // Instance already exists + if (.@INSTID < 0) { + mesn; + mesq l("Wait. I remember you. You ruined my crops a few seconds ago!!"); + next; + mesn; + mesq l("Shooo, shooo! Give my crops some time to recover, your noob."); + close; + } + // It was just created, so begin Marggo Quest + .@instanceMapName$ = instance_attachmap("005-1-1", .@INSTID, 0, .@MAP$); + instance_set_timeout(300, 300, .@INSTID); + instance_init(.@INSTID); + warp .@MAP$, 29, 20; + doevent("Nylo#Marggo::OnStart"); + closeclientdialog; + close; + OnInit: .@npcId = getnpcid(.name$); //setunitdata(.@npcId, UDT_HEADMIDDLE, 1321); // Maybe Nylo could use the whole Candor set... |