//===== eAthena Script ======================================= //= Quest NPCs located in Lighthalzen //===== By: ================================================== //= Persian, Vicious_Pucca, Completed by aoa00 //= Evera, MasterOfMupppets //===== Current Version: ===================================== //= 2.3 //===== Compatible With: ===================================== //= eAthena SVN //===== Description: ========================================= //= Event for the Mobster respawn //= Bio Labs Quest //= Friendship Quest //= Bio Ethics Quest (Need bug testing!) //===== Additional Comments: ================================= //= Grammar/script check please. This was a quick job. //= Things to add: Look at the thread "Lighthalzen Guard" in SVN script //= 0.3 Initial Release //= 0.5 Added mobsters spawn and Einbroch pollution. Alert lasts either 10 minutes or all mob killed. //= 0.6 small bug fixes //= 0.9 fix small bug. Added Bio-lab entrance Quest. Added Getting security-card Quest. //= 1.0 Patched "mobsters spawn & Alert" like Real-RO. //= 1.0a fixed rand(1,10) + comparision. There just can't be 'X < 1' [Lupus] //= 1.1 Changed the mobster spawn to g_mobster to prevent exploits [MasterOfMuppets] //= 1.2 Added the cube room quest by DeNy, translated by vicious_pucca. [MasterOfMuppets] //= Thanks to Linuxwolf for a grammar check as well =). //= 1.2a Moved Biolab entrance to lhz_dun warps. [Vicious] //= 1.3 Fixed password bug, fixed endless item exploit, some typos [Lupus] //= 1.4 Fixed password abuse. When people don't read the password under the picture //= and enter Zero shit 8) (TODO: I saw some "Sticks" abuses, too.. where you couls skip //= a part of quest...) //= 1.5 Fixed Mobster's OnDead event(it has to start with "On"!) [Playtester] //= 1.5a Fixed "free stick" bug, thx 2 Neouni [Lupus] //= 1.6 Added Gywall's Pickpocket Quest //= 1.7 Implemented the Friendship quest [MasterOfMuppets] //= 1.8 Changed the name of the mobsters to Gangster, as it should be. [MasterOfMuppets] //= 1.9 Added extra input check on Biolab so that the first letter of the word could be //= capitalized or undercase. [Evera] //= 2.0 Removed Duplicates [Silent] //= 2.1 Added first part of Bio Ethics Quest [Evera] //= 2.2 Added bit to say Bio Ethics is unfinished, and if a player attempts, it warps them //= out after finished part... Don't want players getting stuck ;_; [Evera] //= 2.3 Finished Bio Ethics Quest. Need bug testers before moving to trunk, my //= mind was somewhere else when writing @_@ [Evera] //============================================================ //= aoa's comment //= In future, Need for new monsters. No-Drop, No-Exp, Weak "Mobster","VENOMOUS","NOXIOUS" //= In future, Teleport skill is impossible in Lighthalzen. //============================================================ lighthalzen.gat,1,1,7 script sneakAddSuber -1,{ OnInit: set $@sneakchance, 3; // chance of successful sneak(0 = never, 10 = always) set $@sneakguard, 0; // numbers of people who sneaked past guard set $@threshold, 10; // numbers of sneakers before mob appears set $@mob, 50; // Max respawn numbers of "mobsters" set $@mobcount, 0; // current numbers of "mobsters" set $@lhz_alert, 0; // Alert on Lighthalzen(0 = off, 1 = on) set $@i, 0; end; OnMinute00: OnMinute05: OnMinute10: OnMinute15: OnMinute20: OnMinute25: OnMinute30: OnMinute35: OnMinute40: OnMinute45: OnMinute50: OnMinute55: if($@lhz_alert == 0) set $@sneakguard, $@sneakguard + rand(1,3); if($@lhz_alert == 1) set $@sneakguard, $@sneakguard - 1; // Monsters will die after 5~10 min. (sneakAddSuber) end; } lighthalzen.gat,1,1,7 script AlertChk -1,{ OnInit: initnpctimer; end; OnTimer10000: if($@sneakguard >= $@threshold) goto MakeMob; if($@sneakguard == 0) goto ClearMob; // Monsters will die after 5~10 min. (sneakAddSuber) setnpctimer 0; end; MakeMob: if($@lhz_alert == 1) goto ChkEnd; set $@mobcount, $@mob; mapannounce "lighthalzen.gat","Maintenance Organization of the Public Order: Currently the security of the city has been compromized, We ask the citizens to be more careful. I repeat. We ask the citizens to be more careful.", 1; for( set $@i, 0; $@i < $@mob; set $@i, $@i + 1 ) { monster "lighthalzen.gat",0,0,"Gangster",1592,1,"AlertChk::OnMobKilled"; } set $@lhz_alert, 1; set $@sneakguard, 2; // Monsters will die after 5~10 min. (sneakAddSuber) setnpctimer 0; end; ClearMob: if($@lhz_alert == 0) goto ChkEnd; set $@mobcount, 0; mapannounce "lighthalzen.gat","Maintenance organization of the Public Order: We were able to get rid of all the trouble makers in the city. You may relax now.", 1; killmonster "lighthalzen.gat","AlertChk::OnMobKilled"; set $@lhz_alert, 0; set $@sneakguard, 0; setnpctimer 0; end; OnMobKilled: set $@mobcount, $@mobcount - 1; if($@mobcount == 0) goto ClearMob; setnpctimer 0; end; ChkEnd: setnpctimer 0; end; } lighthalzen.gat,267,200,3 script Security Guard#01 868,{ if(countitem(7350)>0) goto Lhzpass1; if($@lhz_alert == 1) goto Lhzstop; if((gettime(2)>00 && gettime(2)<10)) goto LhzTalk2; if((gettime(2)>30 && gettime(2)<40)) goto LhzTalk2; set @LhzTalk,rand(1,10); if(@LhzTalk < 2 ) goto LhzTalk1; LhzTalk: mes "[Guard]"; mes "Hey! Where do you think you are going?"; mes "I can not send nobody to the slum district!"; mes "If we let suspecious people like you pass,"; mes "there is no point in peace keeping!"; close; LhzTalk1: mes "-Looks like the guard is doing something else"; mes "Now is a good time to sneak by.-"; next; warp "lighthalzen.gat",297,227; set $@sneakguard, $@sneakguard + 1; close; LhzTalk2: set @LhzTalk,rand(1,10); if(@LhzTalk < 2 ) goto LhzTalk; mes "[Guard]"; mes "zzZ... zzZ... zzZ..."; mes "hmm. hmm... zzZ..."; next; mes "-Looks like the guard is sleeping"; mes "Now is a good time to sneak by.-"; next; warp "lighthalzen.gat",297,227; close; Lhzpass1: mes "[Guard]"; mes "Who are you! ...Hmm? You have a pass?"; mes "I'm sorry. You look like an adventurer,"; mes "but I guess you got the authority."; mes "You may pass."; next; warp "lighthalzen.gat",297,227; close; Lhzstop: mes "[Guard]"; mes "Recently, there were too many people sneaking pass us,"; mes "so we raised the security level."; mes "Who sneak past us anyway?"; mes "It's troublesome..."; close; } lighthalzen.gat,294,223,7 script Security Guard#02 868,{ if(countitem(7350)>0) goto Lhzpass1; if($@lhz_alert == 1) goto Lhzstop; if((gettime(2)>00 && gettime(2)<10)) goto LhzTalk2; if((gettime(2)>30 && gettime(2)<40)) goto LhzTalk2; set @LhzTalk,rand(1,10); if(@LhzTalk < 2 ) goto LhzTalk1; LhzTalk: mes "[Guard]"; mes "Hey! Where do you think you are going?"; mes "I can not send nobody to the slum district!"; mes "If we let suspecious people like you pass,"; mes "there is no point in peace keeping!"; close; LhzTalk1: mes "-Looks like the guard is doing something else"; mes "Now is a good time to sneak by.-"; next; warp "lighthalzen.gat",264,200; set $@sneakguard, $@sneakguard + 1; close; LhzTalk2: set @LhzTalk,rand(1,10); if(@LhzTalk < 2 ) goto LhzTalk; mes "[Guard]"; mes "zzZ... zzZ... zzZ..."; mes "hmm. hmm... zzZ..."; next; mes "-Looks like the guard is sleeping"; mes "Now is a good time to sneak by.-"; next; warp "lighthalzen.gat",264,200; close; Lhzpass1: mes "[Guard]"; mes "Who are you! ...Hmm? You have a pass?"; mes "I'm sorry. You look like an adventurer,"; mes "but I guess you got the authority."; mes "You may pass."; next; warp "lighthalzen.gat",264,200; close; Lhzstop: mes "[Guard]"; mes "Recently, there were too many people sneaking pass us,"; mes "so we raised the security level."; mes "Who sneak past us anyway?"; mes "It's troublesome..."; close; } //============================================================ // Cube Room //============================================================ //--------------------------Piciburn-------------------------- lighthalzen.gat,341,224,4 script Piciburn 868,{ if (BaseLevel > 60) goto Lstart; mes "[Piciburn]"; mes "Keep moving."; close; Lstart: if (hzdun == 1) goto L_11; if (piciburn == 7) goto L_10; if (piciburn == 6) goto L_9; if (piciburn == 5) goto L_6; if (piciburn == 4) goto L_4; if (piciburn == 3) goto L_3; if (piciburn == 2) goto L_2; if (piciburn == 1) goto L_1; mes "[Piciburn]"; mes "Hmm...? What is it?"; mes "I am busy at the moment,"; mes "so stop bothering me."; set piciburn,1; close; L_1: mes "[Piciburn]"; mes "I'm getting distracted because"; mes "You keep staring at me!"; mes "Would you please leave me alone?"; set piciburn,piciburn+1; close; L_2: mes "[Piciburn]"; mes "Hmm...? Oh, it's you.."; mes "You are really getting on my nerves."; mes "You're weird, you know that?"; mes "What is it that you want from me?"; next; mes "[" +strcharinfo(0) + "]"; mes "Nothing really..."; mes "Just looking around..."; mes "What are you doing?"; next; mes "[Piciburn]"; mes "Oh, man..."; mes "If I just needed to show you this,"; mes "I wouldn't have got all worked up."; next; mes "[" +strcharinfo(0) + "]"; mes "I know. Haha."; next; mes "[Piciburn]"; mes "You really ARE a weird person..."; mes "Are you just going to stand there"; mes "and keep watching?"; next; mes "[Piciburn]"; mes "... You're really annoying me!"; mes "What do you want from me?!"; next; mes "[" +strcharinfo(0) + "]"; mes "I've aready told you."; mes "I asked what you were doing."; mes "This place is hot and sticky."; next; mes "[Piciburn]"; mes "Okay, okay.."; mes "I'll tell you what i'm doing,"; mes "but would you leave me in peace"; mes "if i did? Thanks."; next; mes "[Piciburn]"; mes "I'm.. um... doing something illegal..."; mes "Don't tell anyone about this!"; next; mes "[Piciburn]"; mes "I am the only person who can make a route to"; mes "the industrial city's -^FF0000Laboratory^000000- or"; mes "places normal people wouldn't usually be able to get to."; next; mes "[" +strcharinfo(0) + "]"; mes "The -Laboratory?!!!-"; mes "Can you really get people in there?!!!"; next; mes "[Piciburn]"; mes "Agh! Quieten down! What did i tell you?"; mes "I've told you what i do, now will you stop staring at me?"; mes "And be quiet~!"; mes "You're weird.. ¬_¬"; next; mes "[" +strcharinfo(0) + "]"; mes "Ah..Haha.. I'm sorry."; mes "I really want to go there,"; mes "so I got excited when I heard you can get people in there"; next; mes "[Piciburn]"; mes "Hmm? You were planning to get in there?"; next; mes "[" +strcharinfo(0) + "]"; mes "Yeah, but i couldn't get in.."; next; mes "[Piciburn]"; mes "Hmm..."; mes "This is troublesome..."; mes "I don't usually tell people i cannot"; mes "trust how to get into the Laboratory..."; next; mes "[" +strcharinfo(0) + "]"; mes "What do I need to do?"; mes "How can I get into the laboratory?"; next; mes "[Piciburn]"; mes "Geez~, I'm just giving people a route, not sending them there."; next; mes "[" +strcharinfo(0) + "]"; mes "Doesn't that mean the same thing?"; next; mes "[Piciburn]"; mes "What I'm saying is,"; mes "I'm giving people the chance to get into the labs."; next; mes "[" +strcharinfo(0) + "]"; mes "You're really talented, huh."; next; mes "[Piciburn]"; mes "Hahaha! Damn right."; mes "It's a piece of cake!"; mes "..."; mes "Actually, now i think about it, it's impossible.."; next; mes "[" +strcharinfo(0) + "]"; mes "How's it impossible?"; mes "I haven't say anything yet~.."; next; mes "[Piciburn]"; mes "Oh come on, you were going to BEG me to send you there~!!!"; next; mes "[" +strcharinfo(0) + "]"; mes "Heh..."; mes "You really ARE clever."; mes "Well..."; mes "Pretty please~~?"; next; mes "[Piciburn]"; mes "I can never let you in~.."; mes "Never ever~!!!"; set piciburn,piciburn+1; close; L_3: mes "[" +strcharinfo(0) + "]"; mes "Please?"; next; mes "[Piciburn]"; mes "No way."; set piciburn,piciburn+1; close; L_4: mes "[" +strcharinfo(0) + "]"; mes "Pleaseeeee?"; next; mes "[Piciburn]"; mes "No."; next; mes "[" +strcharinfo(0) + "]"; mes "Pleaseeeeeeeeeee?"; next; mes "[Piciburn]"; mes "I don't want to."; next; mes "[" +strcharinfo(0) + "]"; mes "Do it!!!"; next; mes "[Piciburn]"; mes "Never~!!!"; next; mes "[" +strcharinfo(0) + "]"; mes "Why are you doing this to me?!!"; mes "What do you want from me !?!"; next; mes "[Piciburn]"; mes "What do I want?"; mes "Heh heh.. One billion zeny."; next; mes "[" +strcharinfo(0) + "]"; mes "Are you crazy?!"; next; mes "[Piciburn]"; mes "It's your choice."; next; mes "[" +strcharinfo(0) + "]"; mes "Sir, you know I don't have that much money."; mes "Is there anything else you need?"; next; mes "[Piciburn]"; mes "Hmm..."; mes "Okay fine..."; mes "Bring me 20 Jellopies."; mes "'Kay?"; next; mes "[" +strcharinfo(0) + "]"; mes "........"; mes "So that's what you really wanted to ask me?"; next; mes "[Piciburn]"; mes "Hahaha..."; mes "Yeah~~..."; next; mes "[" +strcharinfo(0) + "]"; mes "........"; next; mes "[Piciburn]"; mes "So, what're you doing just standing there?"; mes "Are you going to do it or not?"; next; menu "Definitely!",L_5,"No way! It's impossible!",-; mes "[Piciburn]"; mes "Ah well, your loss,"; mes "Too bad!"; mes "Bye now~!!"; close; L_5: mes "[Piciburn]"; mes "Okay then, do as I said,"; mes "bring me 20 jellopies!"; mes "...."; mes "What're you waiting for?! GO!!"; set piciburn,piciburn+1; close; L_6: mes "[Piciburn]"; mes "Did you get the items?"; next; menu "Erm.. No..",-,"Hell yeah!",L_7,"What did you want again..?",L7_1; mes "[Piciburn]"; mes "Hey, I don't feel like playing around anymore."; mes "If you really want to get there, bring the damn items!"; close; L_7: if (countitem(909) >= 20) goto L_8; mes "[Piciburn]"; mes "Are you joking?"; mes "If you keep doing this,"; mes "I may not keep the promise either."; mes "So go and get them already!"; close; L7_1: mes "[Piciburn]"; mes "You're really stupid~!"; mes "It's 20 jellopies!"; mes "Don't forget this time~"; close; L_8: delitem 909,20; mes "[Piciburn]"; mes "Hmm. You're more reliable than i thought."; mes "Taking this errand into consideration,"; mes "i guess you really want to get in there?"; next; mes "[Piciburn]"; mes "Coming to think of it,"; mes "you look different."; mes "Should I say you look more... trustworthy..?"; next; mes "[Piciburn]"; mes "Well... Anyway..."; mes "A promise is a promise."; mes "I will tell you how to get there."; next; mes "[Piciburn]"; mes "As I told you earlier, all I can do is"; mes "give you the opportunity to get in."; next; mes "[Piciburn]"; mes "I used to be a manager working for the lab,"; mes "but time moves on, as people do,"; mes "and now I am working against the lab."; next; mes "[Piciburn]"; mes "Now... Answer honestly on all I ask here on out."; mes "Where i send you all depends on how you answer."; next; mes "[Piciburn]"; mes "Somewhere in the place I'm going to send you"; mes "There will be things you must find,"; mes "So search well."; next; mes "[Piciburn]"; mes "Well, when you've made your mind up,"; mes "come back and talk to me. Okay?"; set piciburn,piciburn+1; close; L_9: mes "[Piciburn]"; mes "Hmm... So..."; mes "Are you ready to go?"; next; menu "No",-,"Yes",L9_1; mes "[Piciburn]"; mes "Hmm... Not yet, huh..."; mes "Well, I guess it is to be expected."; mes "But don't make me wait too long~!"; close; L9_1: mes "[Piciburn]"; mes "This is going to be hard~"; mes "Let's go!!!"; close2; set piciburn,piciburn+1; set @rdm,rand(3); if(@rdm==1)goto L_warp1; if(@rdm==2)goto L_warp2; warp "lhz_cube.gat",67,193; end; L_10: mes "[Piciburn]"; mes "Hah!"; mes "You failed in there, right? Hahahaha~."; mes "Are you going to try again? Or is it too tough~"; next; menu "No",-,"Yes",L10_1; mes "[Piciburn]"; mes "It was that hard huh?"; mes "Well, come back if you change your mind."; close; L10_1: mes "[Piciburn]"; mes "Okay.."; mes "I will send you there again.."; mes "Good luck!"; close2; set @rdm,rand(3); if(@rdm==1)goto L_warp1; if(@rdm==2)goto L_warp2; warp "lhz_cube.gat",67,193; end; L_warp1: warp "lhz_cube.gat",66,136; end; L_warp2: warp "lhz_cube.gat",66,74; end; L_11: mes "[Piciburn]"; mes "Oh~ I guess you found the entrance."; mes "I'll tell you now..."; mes "If you want to go in there again"; next; mes "[Piciburn]"; mes "You can get there by a sewer passage a bit south of the town."; next; mes "[" +strcharinfo(0) + "]"; mes "No wayyyyy!!"; next; mes "[Piciburn]"; mes "I know. I know..."; mes "It is dirty."; mes "But it's only way in, so don't complain!"; next; mes "[Piciburn]"; mes "Now, take care of yourself~."; close; } //--------------------------Box-------------------------- lhz_cube.gat,248,179,0 script Box#01 111,{ if (axe == 1) goto L_2; mes "There is an axe in the box."; next; menu "Take the axe.",L_1,"Leave it alone.",-; close; L_1: mes "You acquired the ^FF0000axe^000000."; set axe,1; close; L_2: mes "There is a box that used to contain an ^FF0000axe^000000."; close; } //--------------------------Barrel-------------------------- lhz_cube.gat,237,183,0 script Barrel 111,{ if (ykey == 1) goto L_4; if (box == 1) goto L_2; mes "There is a box that looks weak."; if (axe == 0) close; next; input @axe$; if (@axe$ == "axe" || @axe$ == "Axe") goto L_1; mes "There is no change."; close; L_1: mes "When you break the barrel with an axe,"; mes "you see that there's a box inside of it."; next; mes "On top of the box, there's a panel with the numbers 1~9"; set box,1; close; L_2: mes "There is a box with numbers 1~9 on it's surface."; next; set @agree,0; input @number; if (num6 == @number) set @agree,@agree+1; input @number; if (num8 == @number) set @agree,@agree+1; input @number; if (num1 == @number) set @agree,@agree+1; input @number; if (num4 == @number) set @agree,@agree+1; input @number; if (num9 == @number) set @agree,@agree+1; input @number; if (num2 == @number) set @agree,@agree+1; input @number; if (num7 == @number) set @agree,@agree+1; input @number; if (num5 == @number) set @agree,@agree+1; input @number; if (num3 == @number) set @agree,@agree+1; if (@agree == 9 && num1) goto L_3; //you can't enter correct numbers, till read them under that picture [Lupus] mes "There is no change."; close; L_3: mes "The box opened, making a metallic click."; mes "Within the box, there is 'yellow key'."; next; mes "You acquired '^FF0000yellow key^000000'."; set ykey,1; close; L_4: mes "This box used to have the '^FF0000yellow key^000000'"; mes "The box is now empty."; close; } //--------------------------Drawer-------------------------- lhz_cube.gat,242,201,0 script Drawer 111,{ if (knife == 1) goto L_3; mes "The drawer is locked."; if (redkey == 1) goto L_1; close; L_1: input @key$; if (@key$ == "red key" || @key$ == "Red Key") goto L_2; mes "The drawer is locked, you need some kind of key."; close; L_2: mes "The red key fits the lock perfectly,opening the drawer."; mes "You found a 'small knife' inside."; next; mes "You acquired ^FF0000small knife^000000."; set knife,1; close; L_3: mes "It is the drawer you got ^FF0000small knife^000000 from."; mes "There is nothing inside now."; close; } //--------------------------Documents-------------------------- lhz_cube.gat,237,198,0 script Documents 111,{ if (redkey == 1) goto L_2; mes "There are tons of documents here."; next; menu "Search the documents.",L_1,"Ignore.",-; close; L_1: mes "As you look through the documents, a 'red key' falls out."; next; mes "You acquired ^FF0000red key^000000."; set redkey,1; close; L_2: mes "This is where you acquired ^FF0000red key^000000."; mes "There's nothing else to do here."; close; } //--------------------------Bed-------------------------- lhz_cube.gat,247,198,0 script Bed 111,{ mes "There is a messy bed."; next; menu "Above bed",-,"Below bed",L_1; mes "The blanket is messily placed."; mes "There is nothing special here."; close; L_1: if (quadrangle >= 1) goto L_3; if (srod1 == 1) goto L_2; mes "You look below the bed and see a 'small stick'."; mes "It is within your grasp, but there is"; mes "Also another item hidden under the bed, which"; mes "You'll need some kind of long item to pull it out."; next; mes "You acquired the '^FF0000small stick^000000'."; mes "It looks like this stick could be combined"; mes "With another stick to make it larger."; if (srod2 == 1) goto L1_1; if (srod1 == 0) set srod1,1; close; L1_1: set srod1,1; if (@bed == 0) next; mes "It looks similar to the 'small stick' that you"; mes "found under the bed."; next; mes "You acquired '^FF0000long stick^000000'."; set rod,1; close; L_2: set @bed,1; if (rod == 0 && srod1 == 1 && srod2 == 1) goto L1_1; mes "As you look under the bed, you see that there"; mes "is a small object covered in dust."; next; input @bed$; if (@bed$ == "long stick" && rod == 1 || @bed$ == "Long Stick" && rod == 1) goto L2_1; mes "It looks like you need some kind of long item to"; mes "Get the item out, you can't reach it!"; close; L2_1: mes "You used the long stick to pull it out."; next; mes "You acquired '^FF0000cube model^000000'."; set quadrangle,1; close; L_3: mes "This is the place where you got '^FF0000cube model^000000' from."; mes "There is nothing down here now but dust."; close; } //--------------------------Cup-------------------------- lhz_cube.gat,229,184,0 script Cup 111,{ if (fkey == 1) goto L_2; mes "You see an empty bottle and a cup with something in it."; next; menu "Leave it alone.",-,"Look what is inside.",L_1; close; L_1: mes "When you look inside, you see a 'rusty key'."; next; mes "You acquired the '^FF0000rusty key^000000'."; set fkey,1; close; L_2: mes "You got the '^FF0000rusty key^000000' here."; mes "There's nothing but an empty cup and an empty bottle."; close; } //--------------------------Shelf-------------------------- lhz_cube.gat,233,206,0 script Shelf 111,{ if (gkey == 1) goto L_2; mes "There are lots of bottles filled with acids lined up"; mes "Along the shelf, they have different labels."; next; input @lathe$; if (fkey == 1 && @lathe$ == "rusty key" || fkey == 1 && @lathe$ == "Rusty Key") goto L_1; mes "Nothing happened."; close; L_1: mes "As you put the 'rusty key' into a bottle, it fizzes"; mes "and bubbles, and all the liquid disappears."; mes "All that's left is a clean, green key."; next; mes "You acquired the '^FF0000green key^000000'"; set gkey,1; close; L_2: mes "There is an acid that changed corroded all the rust"; mes "off of your key."; next; mes "I don't see anything useful."; close; } //--------------------------Closet-------------------------- lhz_cube.gat,249,191,0 script Closet 111,{ if (polygon >= 1) goto L_4; mes "There is a closet with lots of drawers."; if (gkey == 1) goto L_2; if (gkey == 0) next; menu "Leave it alone.",-,"Open one of the drawers.",L_1; close; L_1: mes "There's nothing of any interest in this drawer."; close; L_2: next; input @gkey$; if (@gkey$ == "green key" || @gkey$ == "Green Key") goto L_3; mes "There's nothing of any interest in this drawer."; close; L_3: mes "You put the 'green key' into a keyhole,"; mes "opening one of the locked drawers."; mes "In the drawer, there is a model of"; mes "a polygon."; next; mes "'You acquired the ^FF0000polygon model^000000."; set polygon,1; close; L_4: mes "This is the closet where you got"; mes "the 'polygon model' from."; next; mes "The other draws will not open, there's"; mes "nothing else to do here."; close; } //--------------------------Desk-------------------------- lhz_cube.gat,234,200,0 script Desk 111,{ mes "There is a desk with lots of objects scattered around."; next; menu "Above the desk",-,"Below the desk",L_1,"Drawer",L_2; mes "There are lots of books, papers and"; mes "research equipment."; close; L_1: if (rod == 1 || srod2 == 1) goto L1_2; mes "When you look below the desk,"; mes "You see a decent sized stick."; next; mes "You acquired '^FF0000short stick^000000'."; mes "It looks like this stick could be combined"; mes "With another stick to make it larger."; if (srod2 == 0) set srod2,1; if (srod2 == 0) close; L1_1: if (@desk == 0) next; mes "It seems like the decently sized stick can be"; mes "combined with the 'short stick' from under the bed."; mes "You put the two end to end, and they click into place."; next; mes "You acquired the '^FF0000long stick^000000'"; set rod,1; close; L1_2: set @desk,1; if (srod1 == 1 && srod2 == 1) goto L1_1; mes "This is where you acquired the '^FF0000short stick^000000'."; mes "There is nothing but dust now."; close; L_2: mes "It is locked and can't be opened."; close; } //--------------------------Picture-------------------------- lhz_cube.gat,237,206,0 script Picture 111,{ if (num1 > 0) goto L_2; mes "There is a picture on the wall."; next; menu "Move it.",L_1,"Leave it alone.",-; close; L_1: mes "It does not move."; next; input @knife$; if (knife == 1 && @knife$ == "small knife" ||knife == 1 && @knife$ == "Small Knife") goto L1_1; mes "Nothing happened."; close; L1_1: mes "You slid the 'small knife' behind the frame"; mes "and used it to twist the picture."; mes "As you turn the frame, the picture detatches and"; mes "falls from the wall."; next; set num1,rand(1,9); Lset1: set num2,rand(1,9); if (num1 == num2) goto Lset1; Lset2: set num3,rand(1,9); if (num1 == num3) goto Lset2; if (num2 == num3) goto Lset2; Lset3: set num4,rand(1,9); if (num1 == num4) goto Lset3; if (num2 == num4) goto Lset3; if (num3 == num4) goto Lset3; Lset4: set num5,rand(1,9); if (num1 == num5) goto Lset4; if (num2 == num5) goto Lset4; if (num3 == num5) goto Lset4; if (num4 == num5) goto Lset4; Lset5: set num6,rand(1,9); if (num1 == num6) goto Lset5; if (num2 == num6) goto Lset5; if (num3 == num6) goto Lset5; if (num4 == num6) goto Lset5; if (num5 == num6) goto Lset5; Lset6: set num7,rand(1,9); if (num1 == num7) goto Lset6; if (num2 == num7) goto Lset6; if (num3 == num7) goto Lset6; if (num4 == num7) goto Lset6; if (num5 == num7) goto Lset6; if (num6 == num7) goto Lset6; Lset7: set num8,rand(1,9); if (num1 == num8) goto Lset7; if (num2 == num8) goto Lset7; if (num3 == num8) goto Lset7; if (num4 == num8) goto Lset7; if (num5 == num8) goto Lset7; if (num6 == num8) goto Lset7; if (num7 == num8) goto Lset7; Lset8: set num9,rand(1,9); if (num1 == num9) goto Lset8; if (num2 == num9) goto Lset8; if (num3 == num9) goto Lset8; if (num4 == num9) goto Lset8; if (num5 == num9) goto Lset8; if (num6 == num9) goto Lset8; if (num7 == num9) goto Lset8; if (num8 == num9) goto Lset8; goto L_2; L_2: mes "There is a number behind the picture."; mes "" + num1 + "3 " + num2 + "6 " + num3 + "9 " + num4 + "4 " + num5 + "8 " + num6 + "1 " + num7 + "7 " + num8 + "2 " + num9 + "5"; mes "Perhaps you should write this number down somewhere..."; close; } //--------------------------generator-------------------------- lhz_cube.gat,224,192,0 script Generator 111,{ if (machine == 1) goto L_2; mes "The big machine is running, making a huge noise."; mes "There are lots weird symbols and"; mes "a small key hole beside them."; next; input @key$; if (ykey == 1 && @key$ == "yellow key" || ykey == 1 && @key$ == "Yellow Key") goto L_1; mes "There's nothing to do here."; close; L_1: mes "You insert the 'yellow key' into the keyhole"; mes "and twist it."; mes "The machine clicks, and becomes silent."; next; mes "When it was stopped, the lamp next to the bed"; mes "also turned off."; set machine,1; close; L_2: mes "The big machine sits quietly."; close; } //--------------------------Lamp-------------------------- lhz_cube.gat,248,205,0 script Lamp 111,{ if (bkey == 1) goto L_3; if (machine == 1) goto L_1; mes "There is a bright lamp."; mes "Seems like there is something inside"; mes "but it is too hot to touch."; mes "It looks like you need to somehow turn the lamp off."; close; L_1: mes "There is something inside of the bulb."; next; menu "Leave it alone.",-,"Break the bulb.",L_2; close; L_2: mes "When you break the bulb, a"; mes "'black key' falls out."; next; mes "You acquired the '^FF0000black key^000000'."; set bkey,1; close; L_3: mes "There nothing but a broken bulb."; close; } //--------------------------Box-------------------------- lhz_cube.gat,248,193,0 script Box#02 111,{ if (countitem(2657) > 0 || @gotkey || hzdun) goto L_5; mes "There is a box with three holes."; next; if (ellipse == 2 && quadrangle == 2 && polygon == 2) goto L_4; menu "Ellipse hole",L_1,"Square hole",L_2,"Polygonal hole",L_3; L_1: if (ellipse == 2) goto L1_2; input @ellipse$; if (ellipse == 1 && @ellipse$ == "ellipse model" ||ellipse == 1 && @ellipse$ == "Ellipse Model") goto L1_1; mes "Nothing happened."; close; L1_1: mes "You inserted the 'ellipse model' into the ellipse-shaped hole."; mes "The box makes a metallic click."; set ellipse,2; close; L1_2: mes "You've already inserted the 'ellipse model'."; close; L_2: if (quadrangle == 2) goto L2_2; input @quadrangle$; if (quadrangle == 1 && @quadrangle$ == "cube model" || quadrangle == 1 && @quadrangle$ == "Cube Model") goto L2_1; mes "Nothing happened."; close; L2_1: mes "You inserted the 'cube model' into the square-shaped hole."; mes "The box makes a metallic click."; set quadrangle,2; close; L2_2: mes "You already inserted the 'square model'."; close; L_3: if (polygon == 2) goto L3_2; input @polygon$; if (polygon == 1 && @polygon$ == "polygon model" || polygon == 1 && @polygon$ == "Polygon Model") goto L3_1; mes "Nothing happened."; close; L3_1: mes "You inserted the 'polygon model' into the polygonal hole."; mes "The box makes a metallic click."; set polygon,2; close; L3_2: mes "You've already inserted the 'polygon model'."; close; L_4: mes "All holes are filled with keymodels."; next; menu "Leave it alone.",-,"Open the box.",L4_1; close; L4_1: mes "There is a small card inside of it."; next; mes "You acquired the 'Laboratory Permit'."; set @gotkey,1; getitem 2657,1; close; L_5: mes "There is an opened box."; mes "There is nothing inside."; close; } //--------------------------Test tube-------------------------- lhz_cube.gat,224,197,0 script Test Tube 111,{ if (countitem(2657) > 0) goto L_3; if (ellipse >= 1) goto L_2; mes "There is a weird test tube."; mes "It seems like there is something inside."; mes "There' a keyhole and a hole that fits a thin object."; next; input @key$; if (bkey == 1 && @key$ == "black key" || bkey == 1 && @key$ == "Black Key") goto L_1; mes "Nothing happened."; close; L_1: mes "You inserted the 'black key' and turned it."; mes "The glass window at the front of the machine opened,"; mes "Revealing an ellipse model."; next; mes "You acquired the '^FF0000ellipse model^000000'."; set ellipse,1; close; L_2: mes "This is where you got '^FF0000ellipse model^000000'."; mes "There is a weird symbol on the bottom of the machine."; mes "It looks like it could open as it has hinges on one side."; close; L_3: mes "There is a rectangular hole in the front of the machine."; next; input @answer$; if (@answer$ == "Laboratory Permit" || @answer$ == "permit" || @answer$ == "laboratory permit" || @answer == "Permit") goto L_4; mes "Nothing happened."; close; L_4: mes "You inserted the 'Laboratory Keycard' in the hole,"; mes "and the stair leading down appeared on the floor."; next; menu "Go down.",L4_1,"Do not go down.",-; close; L4_1: mes "It connected to a long staircase."; close2; set axe,0; set ykey,0; set box,0; set num1,0; set num2,0; set num3,0; set num4,0; set num5,0; set num6,0; set num7,0; set num8,0; set num9,0; set knife,0; set redkey,0; set srod1,0; set srod2,0; set fkey,0; set gkey,0; set polygon,0; set machine,0; set bkey,0; set ellipse,0; set quadrangle,0; set rod,0; set hzdun,1; warp "lhz_cube.gat",177,13; end; } // Lighthalzen Pickpocket Mini-Quest // By Lord Gywall // Version 1.0 // Tested on: eAthena SVN Stable (Unknown version) // Version History: // 1.0 - Completed and working lighthalzen.gat,240,216,4 script Man#Pickpocket1 870,2,2,{ end; OnTouch: callfunc "F_LHZPick",33,1; close; } lighthalzen.gat,220,169,4 script Man#Pickpocket2 870,2,2,{ end; OnTouch: callfunc "F_LHZPick",33,2; close; } lighthalzen.gat,164,127,4 script Man#Pickpocket3 870,2,2,{ end; OnTouch: callfunc "F_LHZPick",20,3; if(@caught!=1) close; mes "[Strange Man]"; mes "Ayee! I'm trapped."; mes "If you will forgive me,"; mes "I can give you something good."; mes "["+strcharinfo(0)+"]"; mes "You're forgiven, now what is this"; mes "good thing you mentioned?"; next; mes "[Strange Man]"; mes "The lower part of your body,"; mes "will produce a strong power"; mes "once you've taken the secret potion."; mes "It's very useful"; mes "when you want to run quickly"; next; mes "[Strange Man]"; mes "I will sell you them for a bargin"; mes "price of 15,000 zeny to a maximum"; mes "of three potions."; mes "How many do you want?"; next; input @number; if(@number>3) set @number,3; set @cost,15000*@number; if(Zeny<@cost) goto L_Zeny; //please check that you add the script to it. set Zeny,zeny-@cost; getitem 12016,@number; //Speed Potion mes "[Strange Man]"; mes "Thanks for your money."; if(rand(1,2)==1) goto L_Reset; disablenpc "Man#Pickpocket3"; enablenpc "Man#Pickpocket2"; close; L_Reset: disablenpc "Man#Pickpocket3"; enablenpc "Man#Pickpocket1"; close; L_Zeny: mes "[Strange Man]"; mes "Too bad."; mes "No zeny makes you a poor man."; close; OnInit: disablenpc "Man#Pickpocket2"; disablenpc "Man#Pickpocket3"; } function script F_LHZPick { if(Zeny<100) set Zeny,0; if(Zeny>=100) set Zeny,zeny-100; mes "Pickpocket"; next; if(rand(0,100) 9)goto s_Dead; if(friendship == 9)goto s_Wounded; if(friendship == 8)goto s_Cont7; if(friendship == 6 && friendship2 || friendship == 7)goto s_Cont6; if(friendship == 6)goto s_Cont5; if(friendship == 4 || friendship == 5)goto s_Cont4; if(friendship == 3)goto s_Cont3; if(friendship == 2)goto s_Cont2; mes "[Digotz]"; mes "Oh, an adventurer?"; mes "Welcome to Uptown"; mes "Lighthalzen. However,"; mes "I'm afraid this area won't"; mes "have much to offer you"; mes "in the way of excitement."; next; if(friendship == 1)goto s_Cont; mes "[Digotz]"; mes "Feel free to take"; mes "a look around if you"; mes "so wish. I'm actually"; mes "glad to see somebody"; mes "aside from the stuck up"; mes "rich people who live here."; close; s_Cont: mes "[Digotz]"; mes "My name is Digotz,"; mes "just another citizen"; mes "of Upper Lighthalzen."; mes "I hope that you enjoy"; mes "your stay in my hometown"; next; menu "Do you know someone named Maku?",-; mes "[Digotz]"; mes "Maku? Maku. Yes, he's my"; mes "childhood friend. Or he was,"; mes "anyway. Now he's just a jerk."; mes "In an case, we can't hang"; mes "out, even if we wanted to,"; mes "for several reasons."; next; mes "[Digotz]"; mes "Hey, why am I even"; mes "talking about this? It's"; mes "not like I'm bothered by"; mes "the fact that me and Maku aren't"; mes "pals anymore. You know what?"; mes "Just forget everything I said."; set friendship,2; close; s_Cont2: mes "[Digotz]"; mes "What are you still"; mes "doing hanging around"; mes "here? There's nothing"; mes "interesting in Uptown"; mes "for you to see, adventurer."; next; mes "[Digotz]"; mes "Gosh...!"; mes "Just hearing about"; mes "Maku makes me so feel"; mes "so upset for some reason!"; close; s_Cont3: mes "[Digotz]"; mes "I know that the"; mes "opulence of Uptown"; mes "seems rather attractive,"; mes "but trust me. This place"; mes "is colorless. Now, have"; mes "you visited the poor district?"; next; menu "Yes, I did already...",-; mes "[" + strcharinfo(0) + "]"; mes "Yes, I did already..."; mes "And I met someone"; mes "named Maku there."; next; mes "[Digotz]"; mes "Maku?! Oh, he must have"; mes "mentioned something about"; mes "me. But I don't care what he"; mes "says, unless it's an apology"; mes "for being a fully blown jerk."; mes "Ever since we were kids..."; next; mes "[Digotz]"; mes "Anyway, we used to be close,"; mes "but that guy was never a true"; mes "friend of mine! Like that one"; mes "time he cheated to beat me at"; mes "arm wrestling! Or when he never"; mes "thanked me for buying us lunch!"; next; mes "[Digotz]"; mes "Sure, he might have helped"; mes "me a little in meeting my first"; mes "girlfriend, but I'll never ever"; mes "forgive him for fixing me up"; mes "on the worst blind dates a"; mes "man can possible experience!"; next; mes "[Digotz]"; mes "Maku doesn't know a damn"; mes "about friendship! Even if I did"; mes "want to see him, there are these"; mes "people who don't want the rich"; mes "to ever meet with the poor."; next; mes "If Maku's fine, that's"; mes "good enough to hear for"; mes "me! There's no need for me"; mes "to go all the way over there"; mes "and check up on him! I only"; mes "have one regret though..."; next; mes "[Digotz]"; mes "I only wish I had one"; mes "last chance to see Maku..."; mes "So that I could kick his sorry"; mes "ass myself! Yeah, that's right!"; mes "Arrogant bastard! But still,"; mes "I'm not able to do that..."; next; mes "[Digotz]"; mes "The security guards here"; mes "will never allow the rich and"; mes "poor to meet, fearing that"; mes "the poor will disturb the peace"; mes "and order of the city. It's a dumb"; mes "rule made for dumb people."; next; mes "[Digotz]"; mes "Still, it's pretty scary that"; mes "someone can get punished"; mes "for violating such a stupid"; mes "taboo, actually. Anyway, if"; mes "you see Maku again, tell"; mes "him this for me, got it?"; next; mes "[Digotz]"; mes "^FF0000Hopeless bastard!"; mes "You're still a stubborn jerk!"; mes "You owe me at least 3 lunches!"; mes "Not to mention an apology!"; mes "But who cares what you think?!"; mes "I'm so goddamn happy without you!"; set friendship,4; close; s_Cont4: mes "[Digotz]"; mes "Still checking out"; mes "Uptown Lighthalzen?"; mes "Not like I'd care, but if you"; mes "do happen to see Maku,"; mes "deliver this little message"; mes "for me, sentence by sentence."; next; mes "[Digotz]"; mes "^FF0000Hopeless bastard!"; mes "You're still a stubborn jerk!"; mes "You owe me at least 3 lunches!"; mes "Not to mention an apology!"; mes "But who cares what you think?!"; mes "I'm so goddamn happy without you!"; close; s_Cont5: mes "[Digotz]"; mes "Oh, it's been a while."; mes "What are you doing back"; mes "over here? And, um, did"; mes "you deliver that message"; mes "to Maku? Now when I think"; mes "about it, I was kind of--"; next; mes "[" + strcharinfo(0) + "]"; mes "I delivered your message"; mes "word for word, and Maku"; mes "got angry, called you names"; mes "and has been threatening to"; mes "beat you up pretty badly."; next; mes "[Digotz]"; mes "That no-good, dirty"; mes "lying rotten scoundrel!"; mes "If it weren't for those"; mes "guards, I'd head over to"; mes "the ghetto and beat Maku"; mes "up myself! That stupid guy!"; next; mes "[Digotz]"; mes "During times like this,"; mes "I really miss ^FF0000Benkaistein^000000"; mes "That guy would always have"; mes "an answer for this kind of"; mes "situation. Yeah, I think he's"; mes "in some far off town, studying."; next; mes "[Digotz]"; mes "Supposedly he's in that"; mes "place, whatever it's called,"; mes "since there's a ton of books"; mes "there that he can use. But"; mes "yeah, Benkaistein would"; mes "always be the mediator..."; next; mes "[Digotz]"; mes "Even back then, when"; mes "me, him and Maku used to"; mes "hang out, Benkastein would"; mes "mediate if we got into some"; mes "argument. Still, he couldn't"; mes "do anything about Maku now..."; next; mes "[Digotz]"; mes "I don't know why,"; mes "but I'm so angry!"; mes "Why am I stressing"; mes "out so much over this?!"; set friendship2,1; close; s_Cont6: mes "[Digotz]"; mes "Even if Benkaistein came"; mes "back from wherever he was"; mes "studying, I don't think he'd be"; mes "able to get Maku to apologize"; mes "to me. That guy is just way"; mes "too stubborn for his own good!"; if(friendship != 7)close; next; menu "Show Benkastein's Journal",s_Journal,"Don't show Benkastein's Journal.",-; mes "[Digotz]"; mes "I don't understand"; mes "why I'm so angry!"; mes "I'm starting to act"; mes "more like Maku, though,"; mes "don't get me wrong, it's"; mes "not like I care about the guy."; close; s_Journal: mes "[Digotz]"; mes "Why am I so ticked off?"; mes "^3131FF*Sigh*^000000 You have something"; mes "to show me? Huh? Benkastein"; mes "wanted me to read this diary"; mes "of his? Sure, why not? I do"; mes "owe him a lot over the years..."; next; mes "[Benkastein's Journal]"; mes "^AD9595Today, me, Digotz and"; mes "Maku played this crazy flying"; mes "game. Basically, we make"; mes "these wings out of wood and"; mes "paper, jump of these hills"; mes "and try to fly. Dumb, I know."; next; mes "^000000[Benkastein's Journal]"; mes "^AD9595Today it was my turn to"; mes "jump and flap my arms with"; mes "these fake, badly made wings."; mes "It's not really a fun game when"; mes "I think about it. Boy, I hope"; mes "we don't do that again."; next; mes "^000000[Digotz]"; mes "Oh yeah, I remember that!"; mes "Maky wore the wings most"; mes "of the time, but I still hold"; mes "the record for staying in the"; mes "air the longest! Yeah, I was"; mes "a regular Kid Pegasus~"; next; mes "[Benkastein's Journal]"; mes "^AD9595Maku, Digotz and me went"; mes "outside of town. Of course,"; mes "we didn't tell anyone or else"; mes "we'd get in trouble. It was"; mes "a really exciting day. But"; mes "then, we ran into a monster!"; next; mes "^000000[Benkastein's Journal]"; mes "^AD9595I wanted to run away but Maku"; mes "and Digotz wanted to beat it so"; mes "that we could become heroes."; mes "Of course, we got hurt pretty"; mes "bad and the monster got away."; mes "Boy, mom was not happy..."; next; mes "^000000[Digotz]"; mes "Huh. I don't remember"; mes "that so well. But I know that"; mes "Benkastein, me and Maku"; mes "weren't afraid of anything back"; mes "then. We must have been totally"; mes "nuts to fight a monster, though."; next; mes "[Benkastein's Journal]"; mes "^AD9595Digotz's been sick for three"; mes "days now. It's just a normal"; mes "cold and Maku keeps saying"; mes "it's Digotz's fault he got sick."; mes "But he's always asking me to"; mes "go visit him and see if he's okay."; next; mes "^000000[Digotz]"; mes "I think I remember being"; mes "pretty sick. Maku was worried?"; mes "I... I must have had a horrible"; mes "life threatening disease like,"; mes "um, Gonorrhitis. You know."; mes "That might have been it."; next; mes "[Benkastein's Journal]"; mes "^AD9595Mom and dad keep telling"; mes "me not to hang out with Maku"; mes "anymore. Their reason is really"; mes "dumb, and I don't care if he is"; mes "poor. He's one of the best guys"; mes "that I'll ever know."; next; mes "^000000[Benkastein's Journal]"; mes "^AD9595Digotz's family is really"; mes "rich and they don't want him"; mes "to see Maku anymore either."; mes "But Digotz doesn't care."; mes "I know he likes Maku a lot."; next; mes "^000000[Digotz]"; mes "Well, we were a lot"; mes "younger and closer back"; mes "then, so... ^111111*Ahem!*^000000Why did"; mes "Benkastein even write that?!"; next; mes "[Benkastein's Journal]"; mes "^AD9595Today, the three of us"; mes "made an oath of brotherhood,"; mes "just like we read in the comic"; mes "book. We swore we'd always"; mes "be friends no matter what."; mes "For always and for always."; next; mes "^000000[Digotz]"; mes "I... I was forced to make"; mes "that oath! And people do"; mes "change, you know! I mean,"; mes "we were basically just kids,"; mes "it's not like that oath really"; mes "means anything now, does it?"; next; mes "[Digotz]"; mes "That does it. I'm gonna"; mes "go see that Maku. I don't"; mes "miss him or anything, but"; mes "I gotta get him to cancel"; mes "that oath. And maybe I'll"; mes "beat up him a little bit."; set friendship,8; close; s_Cont7: mes "[Digotz]"; mes "Wh-whoa, I need to"; mes "get ready! That Maku's"; mes "gonna make fun of me if"; mes "I look too rich and pampered."; mes "Damn! Where did I put all of"; mes "my fashionable street clothes?"; close; s_Wounded: mes "^3131FFDigotz is seriously"; mes "injured from a wound"; mes "by a knife that is still"; mes "embedded in his belly.^000000"; next; mes "[" + strcharinfo(0) + "]"; mes "Digotz...?"; mes "Oh no, let me"; mes "get you some help!"; next; mes "[Digotz]"; mes "H-het... It's the"; mes "adventurer... Man,"; mes "that Maku. He always"; mes "did bring me bad luck..."; mes "It's too late for me and"; mes "I don't have much time..."; next; mes "[Digotz]"; mes "Those guards I told you"; mes "about... The ones who don't"; mes "want the poor and the rich to"; mes "mingle? I... Guess they found"; mes "out I was gonna meet my old"; mes "pal. I just wanted to see him..."; next; mes "[Digotz]"; mes "This guy... In a black"; mes "suit... He just... He just"; mes "stabbed me! I... God. It's"; mes "been so long since I've talked"; mes "to him. We'll hang out and have"; mes "fun, just like the good old days."; next; mes "[Digotz]"; mes "I missed my buddies, but now..."; mes "Now I can hear them calling me."; mes "Now we can all be together just"; mes "like we all promised. Yeah..."; mes "I was wrong. Life's too short"; mes "to be angry with your frie--"; next; mes "[Digotz]"; mes ".............."; next; mes "[Digotz]"; mes ".............."; mes "......................."; next; mes "[Digotz]"; mes ".............."; mes "......................."; mes "................................"; next; mes "^3131FFDigotz stopped breating."; mes "You remove the Knife from"; mes "his lifeless body as a final"; mes "courtesy to a man who"; mes "dearly loved his friends."; next; set friendship,10; getitem 1201,1; close; s_Dead: mes "^3131FFDigotz has passed"; mes "away, but the look on"; mes "his face seems very"; mes "peaceful and content."; close; } lighthalzen.gat,337,232,3 script Maku 870,{ if(friendship > 1)goto Switches; mes "[Maku]"; mes "Hey, you're on of"; mes "those adventurers, eh?"; mes "Welcome to the ghetto."; mes "Nothing too adventurous"; mes "here, but hey, you can"; mes "explore all you want."; next; mes "[Maku]"; mes "I don't know if you know"; mes "but actually, the people who"; mes "live here ain't allowed to"; mes "explore this whole city. It's"; mes "kind of taboo to talk about,"; mes "but what do I care, right?"; next; mes "[Maku]"; mes "Yeah, basically the rich"; mes "people here are too afraid"; mes "of the poor people comin' to"; mes "see them, so the security in"; mes "this city is pretty tight! Those"; mes "upper class guys are trash..."; next; mes "[Maku]"; mes "I didn't use to think"; mes "this way. I actually used"; mes "to have a pretty rich friend"; mes "till I found out he's not all"; mes "I thought he was. That"; mes "moron! Why's he like that?!"; next; mes "[Maku]"; mes "Eh, forget about it."; mes "Why am I even talking"; mes "about my personal life"; mes "to someone I just met"; mes "anyway? Sure, we all"; mes "do it, but still..."; next; mes "[Maku]"; mes "Well, when you get"; mes "bored of the ghetto,"; mes "you really oughta check"; mes "out the rich section of town."; mes "I'm bitter, but I'll also admit"; mes "it's way nicer than this place."; set friendship,1; close; Switches: switch(friendship) { case 2: mes "[Maku]"; mes "Hey, what are you"; mes "doing back over here?"; mes "I thought I recommended"; mes "going over to check out"; mes "Uptown Lighthalzen. This"; mes "place is pretty run-down..."; next; menu "I actually met Digotz and...",-; mes "[Maku]"; mes "You what...?!"; mes "You saw my old pal,"; mes "Digotz?! Er, I mean,"; mes "Mister Alexander Digotz,"; mes "who used to be my buddy,"; mes "but obviously not anymore."; next; mes "[Maku]"; mes "Sure, we were real close"; mes "at one time, but that was"; mes "too long ago. It's been a"; mes "long time since we hung"; mes "out and he probable hates"; mes "my penniless guts and..."; next; mes "[Maku]"; mes "Crud, just listen to"; mes "me, I sound like a wuss."; mes "I don't miss Digotz! In fact,"; mes "I hate the guy, one hundred"; mes "percent! The next time I see"; mes "him, I'll beat him to a pulp!"; set friendship,3; close; break; case 3: mes "[Maku]"; mes "Man, I need to blow off some"; mes "steam! Sure, me and Digotz"; mes "were buds before and maybe"; mes "we might seem like friends now,"; mes "but not anymore, though we used"; mes "to be closer than this. Argh!"; next; mes "[Maku]"; mes "Don't get me wrong, I don't"; mes "miss the guy or anything like"; mes "that and I don't feel sorry about"; mes "what happened. But if he ever"; mes "came to apologize to me, I'd"; mes "probably accept, you know."; next; mes "[Maku]"; mes "Well, after thinking"; mes "about it, of course."; mes "I mean, I'm not the one"; mes "holding a grudge. It's all"; mes "that guy's fault! Sheeeesh!"; close; break; case 4: mes "[Maku]"; mes "What the hell are you"; mes "still doing around here?"; mes "You must have better things"; mes "to do than talk to a ruffian"; mes "like me or that snobby and"; mes "totally prickish Digotz."; next; menu "Speaking of which...",-; mes "[" + strcharinfo(0) + "]"; mes "Speaking of which..."; mes "I spoke to Digotz again."; mes "He told me to give you a"; mes "message, but I'm not sure th--"; next; mes "[Maku]"; mes "That no-good bastard"; mes "has a message for me?!"; mes "Oh, I'm soooo honored~"; mes "Tell me what that fink"; mes "has to say, line by line!"; next; input @digotzstr$; if(@digotzstr$ != "Hopeless bastard!")goto failstr; mes "[Maku]"; mes "\"Hopeless Bastard?!\""; mes "Well, at least he had"; mes "the stomach to say that."; mes "Through somebody else"; mes "anyway! What else'd he say?!"; next; input @digotzstr$; if(@digotzstr$ != "You're still a stubborn jerk!")goto failstr; mes "[Maku]"; mes "\"Stubborn Jerk?!\""; mes "Takes no one to know one,"; mes "bastard! Why I oughta--"; mes "Grrr! What'd he say next?!"; next; input @digotzstr$; if(@digotzstr$ != "You owe me at least 3 lunches!")goto failstr; mes "[Maku]"; mes "Three lunches?!"; mes "I treated that guy to"; mes "lunch like, fifteen times!"; mes "I tell you, the guy does not"; mes "know the meaning of friendship!"; mes "What else did that moron say?!"; next; input @digotzstr$; if(@digotzstr$ != "Not to mention an apology!")goto failstr; mes "[Maku]"; mes "Me, apologize?!"; mes "He should be on his hands"; mes "and knees begging for my"; mes "frickin' forgiveness! That..."; mes "That selfish no-good stupid..."; mes "W-what else did he tell you?!"; next; input @digotzstr$; if(@digotzstr$ != "But who cares what you think?!")goto failstr; mes "[Maku]"; mes "Who cares what I think?!"; mes "GRRRAAH~!! Who cares"; mes "what he thinks!! ^111111*Pant Pant*^000000"; mes "I'm gonna murderlize that"; mes "dumb creep! He can't possibly"; mes "make me angrier than I am now!"; next; input @digotzstr$; if(@digotzstr$ != "I'm so goddamn happy without you!")goto failstr; mes "[Maku]"; mes "That's it."; mes "It's decided. The"; mes "next time I see Digotz,"; mes "I'm gonna plaster his"; mes "face all over the floor."; set friendship,5; close; break; case 5: mes "[Maku]"; mes "RrrrRrrrr....."; mes "RrrrrRRRrrRR....."; mes "GGGGGRRRRR..."; next; mes "^3131FFUh oh..."; mes "It looks like Maku"; mes "is starting to rage"; mes "just a bit too much.^000000"; next; mes "[Maku]"; mes "..."; mes "......"; mes "........."; next; mes "[Maku]"; mes "Gggrrrr..."; next; mes "[Maku]"; mes "GRAAAAAAAAH~!"; mes "Who the hell does he"; mes "think he is, telling me"; mes "all sorts of crap!? Digotz,"; mes "you're not getting away"; mes "with this! Gonna wreck you!!"; next; set Hp,MaxHp/2; mes "^3131FFMaku's seething quickly"; mes "explodes into pure, violent"; mes "rage. You manage to calm"; mes "him down after a while, but"; mes "barely keep yourself from"; mes "getting killed in this outburst^000000"; next; mes "[Maku]"; mes "^111111*Pant pant* *Whew~*^000000"; mes "D-don't worry, I've got"; mes "a grip on myself now."; mes "Thanks for not letting me"; mes "get too crazy. Times like"; mes "this, I really miss ^FF0000Benkaistein^000000."; next; mes "[Maku]"; mes "Benkastein would always"; mes "make sure that I'd stay out"; mes "of fights. I really miss that"; mes "guy. Still, he ain't around..."; next; mes "[Maku]"; mes "Damn those guards!"; mes "If they weren't there,"; mes "I could just go over and"; mes "kick Digotz's ass! I swear,"; mes "if it weren't for them...!"; set friendship,6; close; break; case 6: mes "[Maku]"; mes "Arrrrgh! Whenever I hear"; mes "about that Digotz, I get so"; mes "peeved! Is that guy giving"; mes "me the brushoff just because"; mes "I'm not a rich guy like he is?!"; next; mes "[Maku]"; mes "I can't..."; mes "I can't even beat him up"; mes "all properly because of"; mes "all those freakin' guards!"; mes "Arrrrrrrgh! Man, where's"; mes "Benkastein when I need him?"; close; break; case 7: mes "[Maku]"; mes "Arrrrgh! Whenever I hear"; mes "about that Digotz, I get so"; mes "peeved! Is that guy giving"; mes "me the brushoff just because"; mes "I'm not a rich guy like he is?!"; next; mes "[Maku]"; mes "I can't..."; mes "I can't even beat him up"; mes "all properly because of"; mes "all those freakin' guards!"; mes "Arrrrrrrgh! Man, where's"; mes "Benkastein when I need him?"; close; break; case 8: mes "[Maku]"; mes "Hey, what is that? You want"; mes "me to read this journal?"; mes "Er, okay, but I'm none too"; mes "comfortable going through"; mes "somebody's diary. It's just"; mes "kinda... creepy, you know?"; next; mes "[Maku]"; mes "Hey, this think is"; mes "Benkastein's. I haven't"; mes "seen that guy in a long while."; mes "Ah, so he gave it to you for me"; mes "to read? Alright, I owe him a"; mes "favor or two, so I oughta..."; next; mes "[Benkastein's Journal]"; mes "^AD9595Today, me, Digotz and"; mes "Maku played this crazy flying"; mes "game. Basically, we make"; mes "these wings out of wood and"; mes "paper, jump of these hills"; mes "and try to fly. Dumb, I know."; next; mes "^000000[Benkastein's Journal]"; mes "^AD9595Today it was my turn to"; mes "jump and flap my arms with"; mes "these fake, badly made wings."; mes "It's not really a fun game when"; mes "I think about it. Boy, I hope"; mes "we don't do that again."; next; mes "^000000[Maku]"; mes "What is he talking about?!"; mes "That game was real fun!"; mes "Yeah, I usually wore the"; mes "wings and Digotz always"; mes "wanted to wear them too."; next; mes "[Benkastein's Journal]"; mes "^AD9595Maku, Digotz and me went"; mes "outside of town. Of course,"; mes "we didn't tell anyone or else"; mes "we'd get in trouble. It was"; mes "a really exciting day. But"; mes "then, we ran into a monster!"; next; mes "^000000[Benkastein's Journal]"; mes "^AD9595I wanted to run away but Maku"; mes "and Digotz wanted to beat it so"; mes "that we could become heroes."; mes "Of course, we got hurt pretty"; mes "bad and the monster got away."; mes "Boy, mom was not happy..."; next; mes "^000000[Maku]"; mes "That's right! Back then,"; mes "the three of us weren't"; mes "afraid of anything! Of course,"; mes "Digotz got beat up the most."; mes "But I gotta say, he was also"; mes "the most fearless of us."; next; mes "[Benkastein's Journal]"; mes "^AD9595Digotz's been sick for three"; mes "days now. It's just a normal"; mes "cold and Maku keeps saying"; mes "it's Digotz's fault he got sick."; mes "But he's always asking me to"; mes "go visit him and see if he's okay."; next; mes "^000000[Maku]"; mes "Wh-what?! No, I wasn't"; mes "worried at all! That must"; mes "have been the time Digotz"; mes "caught Clymonia. You know,"; mes "that, uh, horrible disease. No"; mes "one should have that one!"; next; mes "[Benkastein's Journal]"; mes "^AD9595Mom and dad keep telling"; mes "me not to hang out with Maku"; mes "anymore. Their reason is really"; mes "dumb, and I don't care if he is"; mes "poor. He's one of the best guys"; mes "that I'll ever know."; next; mes "^000000[Benkastein's Journal]"; mes "^AD9595Digotz's family is really"; mes "rich and they don't want him"; mes "to see Maku anymore either."; mes "But Digotz doesn't care."; mes "I know he likes Maku a lot."; next; mes "^000000[Maku]"; mes "..."; mes "......"; next; mes "[Benkastein's Journal]"; mes "^AD9595Today, the three of us"; mes "made an oath of brotherhood,"; mes "just like we read in the comic"; mes "book. We swore we'd always"; mes "be friends no matter what."; mes "For always and for always."; next; mes "^000000[Maku]"; mes "Well, that's true,"; mes "I guess, but people"; mes "change! Besides, we got"; mes "that idea from a comic book!"; mes "Well, if he apologizes first,"; mes "I guess I better forgive him."; next; mes "[" + strcharinfo(0) + "]"; mes "Good..."; mes "Because Digotz said"; mes "that he'll be coming"; mes "by in a few days."; next; mes "[Maku]"; mes "What?! He's really coming"; mes "here? What for? It's too late"; mes "to patch things up! Still, I'd be"; mes "a real prick if I didn't see him"; mes "Alright, fine! I'll teach that guy"; mes "a lesson once he's here!"; next; mes "[Maku]"; mes "And, um, gimme that"; mes "journal! I'm gonna read"; mes "more of it so I can make"; mes "fun of Digotz. Bwahahaha!"; mes "But yeah, um, thanks. Not"; mes "that I'm grateful or anything."; next; mes "[Maku]"; mes "So, uh, I guess"; mes "I'll see you later."; mes "Um, now I gotta get"; mes "ready for something."; mes "^111111(But not to see Digotz!)"; if(countitem(7351))delitem 7351,1; set friendship,9; close; break; case 9: mes "[Maku]"; mes "Why is Digotz"; mes "so late? This isn't"; mes "like him at all. Maybe"; mes "something's wrong?"; close; break; case 10: mes "[Maku]"; mes "Why is Digotz"; mes "so late? This isn't"; mes "like him at all. Maybe"; mes "something's wrong?"; next; mes "[Maku]"; mes "Eh, he might have"; mes "some kinda reason for"; mes "being late, but if he don't,"; mes "i've been saving a whole"; mes "six pack of kickass to open,"; mes "just for him. Heh heh heh~"; close; break; case 11: mes "[Maku]"; mes "Why is Digotz"; mes "so late? This isn't"; mes "like him at all. Maybe"; mes "something's wrong?"; next; mes "[Maku]"; mes "Eh, he might have"; mes "some kinda reason for"; mes "being late, but if he don't,"; mes "i've been saving a whole"; mes "six pack of kickass to open,"; mes "just for him. Heh heh heh~"; close; break; } failstr: mes "[Maku]"; mes "Wha...? I dunno if Digotz"; mes "would say something like"; mes "that. You sure you heard"; mes "him carefully enough? It's"; mes "been a while, but I know"; mes "how Digotz talks, man."; close; } yuno_in04.gat,107,14,4 script Student 754,{ mes "[Joey Choryee]"; mes "This is a study area where"; mes "you're not supposed to speak,"; mes "walk or even breathe loudly."; mes "Still, students like Benkastein"; mes "can tune out the whole world"; mes "when they study hard enough..."; if(friendship != 6)close; next; mes "[Joey Choryee]"; mes "Benkastein...?"; mes "He's in the north part."; mes "of this room. He's a real"; mes "nice guy, but a little anal."; mes "Well, he's too organized"; mes "and he labels everything!"; close; } yuno_in04.gat,96,106,4 script Passionate Student 754,{ if(friendship == 10)goto s_Ask; if(friendship3 == 2 || friendship3 == 3)goto s_Cont2; if(friendship3 == 1)goto s_Cont; mes "[Passionate Student]"; mes "Let's see, now."; mes "Wind Magic, Black Magic,"; mes "Porings, ah, there it is"; mes "Monster race properties."; mes "Hopefully this contains"; mes "the information I need..."; next; if(friendship != 6)goto s_Dialog; mes "Upon briefly glancing at"; mes "this student's belongings,"; mes "you notice that the name"; mes "\"Benkastein\" is printed"; mes "on them. This is the friend"; mes "mentioned by Maku and Digotz!"; next; menu "Excuse me...",-; mes "[" + strcharinfo(0) + "]"; mes "Excuse me..."; mes "Benkastein?"; next; mes "[Passionate Student]"; mes "...The world of humans"; mes "and the world of demons,"; mes "yes, yes... No, what I'm"; mes "looking for is a reference"; mes "to the heavens of Asgard."; mes "Hmm, this here might help..."; next; menu "Hey...",-; mes "[" + strcharinfo(0) + "]"; mes "Hey..."; mes "Over here."; mes "Benkastein!"; next; mes "[Passionate Student]"; mes "...Oh, now that's a very"; mes "interesting observation."; mes "If I can incorporate that"; mes "into my thesis without too"; mes "much trouble, my standpoint"; mes "would look much more solid..."; next; menu "HEY YOU...!",-; mes "[" + strcharinfo(0) + "]"; mes "HEY YOU...!"; mes "BENKASTEIN~!"; next; mes "[Passionate Student]"; mes "Oh, good heavens!"; mes "C-can't you keep"; mes "your voice down?"; mes "I-I'm trying to study!"; mes "No, wait. Have you been"; mes "calling me all this time?"; set friendship3,1; close; s_Cont: mes "[Passionate Student]"; mes "Oh, you startled me!"; mes "Still, I'm aware that it's"; mes "hard to get my attention"; mes "once I immerse myself"; mes "in a book. So, how can"; mes "I help you, adventurer?"; next; menu "Tell him about Maku and Digotz.",-; mes "[Benkastein]"; mes "Oh, how are my friends"; mes "doing? Oh, what? They're"; mes "having a huge fight just"; mes "because one's rich and"; mes "the other one's poor?"; mes "That's pretty childish!"; next; mes "[Benkastein]"; mes "But then again, that's just"; mes "like them. ^111111*Sigh*^000000 I really want"; mes "to go back home and get those"; mes "two to make up, but I also need"; mes "to finish this thesis. Let's see..."; mes "What can I possibly do from here?"; next; mes "[Benkastein]"; mes "Oh, I know what I can do!"; mes "Wait, but where did I put it?"; mes "Oh, how cold I lose something"; mes "so important? Wait! Would you"; mes "please wait a second while"; mes "I look for something?"; set friendship3,2; close; s_Cont2: mes "[Benkastein]"; mes "Aw nuts, this is"; mes "taking much longer"; mes "than I had expected."; mes "Now where did I put"; mes "that thing? Hmmmm..."; if(friendship3 == 3)goto s_Cont3; next; mes "^3131FFPerhaps it would"; mes "be best if you help"; mes "Benkastein to look for"; mes "what he's searching for."; close; s_Cont3: next; mes "[Benkastein]"; mes "Oh, is that it?"; mes "Did you find my"; mes "journal? Quick, let"; mes "me check. Yes, yes..."; mes "This is it! Thank you"; mes "for finding this for me!"; next; mes "[Benkastein]"; mes "Would you mind doing"; mes "a favor for me? It'd be"; mes "better if I talk to them"; mes "myself, but I'm too busy"; mes "working on this thesis..."; next; mes "[Benkastein]"; mes "Would you please give this"; mes "journal to Digotz and Maku?"; mes "I wrote it in when we were"; mes "really young, so it should"; mes "remind them of all the good"; mes "times we used to share."; next; mes "[Benkastein]"; mes "Anyway, this should at"; mes "least help them realize"; mes "how stupid they've been"; mes "acting. Thanks in advance,"; mes "and please take care of"; mes "Maku and Digotz for me."; if(friendship == 6)set friendship,7; close; s_Dialog: mes "^3131FFThis student seems to"; mes "be dilligently conducting"; mes "intensive research on some"; mes "academic subject. For now,"; mes "it would be best to leave him"; mes "alone so that he can study."; close; s_Ask: mes "[Benkastein]"; mes "Were you able to bring"; mes "my journal to Digotz and"; mes "Maku? I'm pretty sure it'd"; mes "remind them of all the good"; mes "times we had. I know they"; mes "sure can be stubborn..."; next; mes "[Benkastein]"; mes "Anyway, I really"; mes "appreciate all your"; mes "help. When I go back"; mes "home, I look forward to"; mes "seeing the two of them again."; next; mes "[Benkastein]"; mes "Until then, I need to research,"; mes "finish my thesis and accomplish"; mes "my academic goals. Oh, please"; mes "take this pass which will let you"; mes "go back and forth between the"; mes "rich and poor areas as my thanks."; next; mes "[Benkastein]"; mes "Anyway, I wish you"; mes "safety in your travels,"; mes "adventurer. When the three"; mes "of us get together, I'll be"; mes "sure to let you know~"; if(BaseLevel < 41)set BaseExp,BaseExp+49500; if(BaseLevel > 40 && BaseLevel < 61)set BaseExp,BaseExp+99000; if(BaseLevel > 60 && BaseLevel < 71)set BaseExp,BaseExp+198000; if(BaseLevel > 70 && BaseLevel < 81)set BaseExp,BaseExp+396000; if(BaseLevel > 80 && BaseLevel < 91)set BaseExp,BaseExp+594000; if(BaseLevel > 90)set BaseExp,BaseExp+792000; getitem 7350,1; set friendship,11; set friendship3,0; close; } yuno_in04.gat,168,117,1 script Book 111,{ if(friendship3 >= 3)goto Book2; if(friendship3 == 2)goto Book; mes "^3131FFThis book is labeled,"; mes "\"Benkastein's Journal"; mes "Vol. 6.\"."; close; Book: mes "^3131FFThis book is labeled,"; mes "\"Benkastein's Journal"; mes "Vol. 6.\". This is probably"; mes "what Benkastein was trying"; mes "to find, so it might be best to"; mes "bring this and show it to him"; set friendship3,3; getitem 7351,1; close; Book2: mes "^3131FFThis is where you found"; mes "the book that Benkastein"; mes "was looking for."; close; } yuno_in04.gat,169,109,1 script Ambitious Hollgrehenn 111,{ mes "*Hollgrehenn: The Ambition*"; mes "By Aragham Caul*"; mes ""; mes ""; mes ""; mes ""; mes "Publisher:"; mes "Muha Books, Co."; next; mes "..."; mes "He would stop at nothing"; mes "to have the greatest weapon"; mes "in the world in his possession."; mes "He became a smith so that he"; mes "could discern which weapons"; mes "were the most powerful..."; next; mes "[" + strcharinfo(0) + "]"; mes "That's strange..."; mes "The next page"; mes "has been torn out."; close; } yuno_in04.gat,171,117,1 script List of Books 111,{ mes "^3131FFYou find a series"; mes "of paperback books"; mes "with titles, printed"; mes "on the binding in an"; mes "elegantly decorative"; mes "cursive style font."; mes "The titles include..."; next; mes "*Volcanic Passion*"; mes "*Midnight Crescendo*"; mes "*A Paris Affair*"; mes "*Fever Pitch*"; mes "*The Cowyboy Next Door*"; mes "*Platonic Romance*"; mes "*How Lara Got Her Groove Back*"; next; mes "^000000[" + strcharinfo(0) + "]"; mes "What the...?!"; mes "This place even has"; mes "a romance novel section?"; close; } //============================================================== // Bio Ethics Quest //============================================================== //=====================Requires Bug Testing===================== lhz_in01.gat,46,125,6 script Rekenber Guard 867,{ mes "[Rekenber Guard]"; if(getequipid(9) == 2243){ mes "......................"; next; switch(select("Nice day, huh?","Cancel")){ case 1: mes "[Rekenber Guard]"; mes "..."; close2; warp "lhz_in01.gat",282,172; end; break; case 2: close; break; } } else{ mes "..."; close; } } lhz_in01.gat,282,172,0 script BioEthTrg1::BETrg1 -1,1,1{ OnTouch: mes "[Researcher]"; mes "This is a restricted"; mes "area. Please leave"; mes "immediately."; close2; warp "lhz_in01.gat",199,131; end; } lhz_in01.gat,285,169,7 script Researcher 865,{ //Unknown Text end; } lhz_in01.gat,199,137,8 script Scientist 865,{ mes "[Scientist]"; mes "Whoa whoa~!"; mes "Please! Don't"; mes "touch anything!"; mes "I'm dealing with highly"; mes "volatile chemicals here!"; close; } lhz_in01.gat,204,138,6 script Keshibien 750,{ if(bioeth >= 2){ //Unofficial text mes "[Keshibien]"; mes "Hello there~"; mes "Are you looking for"; mes "more information about"; mes "homunculus?"; next; mes "[Keshibien]"; mes "I shouldn't say"; mes "anything, but look"; mes "for someone named"; mes "Bringel in Lighthalzen."; if(bioeth == 2) set bioeth,3; close; //Unofficial text end } mes "[Keshibien]"; mes "Hello there~"; mes "You must be from"; mes "Rune-Midgarts, right?"; mes "It's nice to meet you."; next; mes "[Keshibien]"; mes "I hear that the"; mes "Alchemists from"; mes "over there are pretty"; mes "skilled. I wonder if I'll"; mes "ever get the change to"; mes "collaborate with any of them..."; close; } lhz_in01.gat,203,123,8 script Scientist 750,{ mes "[Scientist]"; mes "Alright. Pull one test"; mes "tube out of the machine,"; mes "replace the other test"; mes "tube over here and then"; mes "clean the first test tube?"; next; mes "[Scientist]"; mes "Or do I clean the test tube,"; mes "put it into the machine and"; mes "then replace the other one?"; mes "I'm so confused with this"; mes "procedure! If only I didn't"; mes "lose the instructions..."; close; } lhz_in01.gat,221,131,3 script Scientist 865,{ mes "[Scientist]"; mes "It takes so long for"; mes "this device to process"; mes "all the data and give me"; mes "the results. Still, the wait"; mes "heightens my anticipation..."; close; } lhz_in01.gat,218,141,0 script Alchemist 98,{ mes "[Alchemist]"; mes "Out of all humans,"; mes "I believe Kellasus is"; mes "the one who has come"; mes "closest to discovering"; mes "the secrets of life. He"; mes "never fails to amaze me..."; next; mes "[Alchemist]"; mes "I'm also impressed by the"; mes "fact that he doesn't let his"; mes "work keep him from being the"; mes "best father and husband that"; mes "he can for his family. He's"; mes "an example for all of us."; next; mes "[Alchemist]"; mes "Kellasus really is"; mes "an amazing person."; mes "There isn't one Alchemist"; mes "that I know who doesn't look"; mes "up to him in the realms of"; mes "both science and personal life."; close; } lhz_in01.gat,224,140,8 script Kellasus 57,{ if(MISC_QUEST&64){ mes "[Kellasus]"; mes "I already taught you"; mes "skills of the homunculus..."; if (getskilllv(238) == 0) skill 238,1,0; if (getskilllv(243) == 0) skill 243,1,0; if (getskilllv(244) == 0) skill 244,1,0; close; } switch(bioeth){ default: break; case 4: mes "[Kellasus]"; mes "...You're really hard to handle."; mes "I don't think I should"; mes "teach you biotechnology."; mes "Besides that, you know"; mes "nothing about homunculus!"; next; menu "I've learned that",-; mes "[Kellasus]"; mes "Oh really?"; mes "I will have to test you"; mes "on your knowledge of"; mes "homunculus then."; next; mes "[Kellasus]"; mes "First question."; mes "What is the skill that lets the"; mes "homunculus stay in peace?"; input @kelques$; next; mes "[Kellasus]"; if(@kelques$ != "Rest"){ mes "Hmpf. I knew you had"; mes "no knowledge on"; mes "homunculus."; close; } mes "That's right. Second question."; mes "What is the item"; mes "that is required to"; mes "summon or create"; mes "a homunculus?"; input @kelques$; next; mes "[Kellasus]"; if(@kelques$ != "Germination Breed"){ mes "Hmpf. I knew you had"; mes "no knowledge on"; mes "homunculus."; close; } mes "Correct. But this is not the end yet."; mes "What is the name"; mes "of a skill"; mes "that could let you"; mes "revive a homunculus?"; input @kelques$; next; mes "[Kellasus]"; if(@kelques$ != "Resurrect Homunculus"){ mes "Hmpf. I knew you had"; mes "no knowledge on"; mes "homunculus."; close; } mes "After all these discussions,"; mes "I won't teach anyone"; mes "the skills of homunculus."; mes "The decision is final"; mes "and that's it!"; set bioeth,5; close; break; case 5: mes "[Kellasus]"; mes "After all these discussions,"; mes "I won't teach anyone"; mes "the skills of homunculus."; mes "The decision is final"; mes "and that's it!"; close; break; case 6: //Unofficial text and story -.-; mes "[Kellasus]"; mes "Oh it's you again? You're really determined."; mes "Well most of the Alchemist"; mes "are people who never"; mes "let go of their dreams"; next; menu "Let's talk about others",-; mes "[Kellasus]"; mes "You've spoke to my son?"; mes "What did he say?"; next; mes "[Kellasus]"; mes "..."; next; mes "[Kellasus]"; mes "I guess I could teach you a few skills.."; //Gives player bio ethics, call homun, rest, and sets bitshift for quest finished skill 238,1,0; skill 243,1,0; skill 244,1,0; set MISC_QUEST,MISC_QUEST|64; set bioeth,0; close; } switch(@keltalk){ default: mes "[Kellasus]"; mes "Hmm. Who decides what"; mes "is right and wrong? What is"; mes "meant to be known and what"; mes "secrets were never intended"; mes "for mankind to understand?"; set @keltalk,1; close; break; case 1: //No official text to put here, so I just repeated first text mes "[Kellasus]"; mes "Hmm. Who decides what"; mes "is right and wrong? What is"; mes "meant to be known and what"; mes "secrets were never intended"; mes "for mankind to understand?"; set @keltalk,2; close; break; case 2: mes "[Kellasus]"; mes "Haven't I told you not to come back again?"; mes "Please leave now!"; mes "No matter what you do."; mes "I won't teach you anything about homunculus"; set @keltalk,3; set bioeth,1; close; break; case 3: mes "[Kellasus]"; mes "Haven't I told you not to come back again?"; mes "Please leave now!"; mes "No matter what you do."; mes "I won't teach you anything about homunculus"; close; break; } } lhz_in01.gat,217,121,6 script Repairman 851,{ mes "[Repairman]"; mes "No wonder these things"; mes "break all the time! These"; mes "machines have been totally"; mes "abused! Ugh, there's no"; mes "appreciation for all of this"; mes "convenient technology..."; next; mes "[Repairman]"; mes "Yeah, all of this lab"; mes "equipment is really sensitive,"; mes "not to mention expensive. If"; mes "you ever handle this stuff, you"; mes "need to be extra cautious."; close; } lhz_in01.gat,225,122,4 script Skrajiad 754,{ mes "[Skrajiad]"; mes "Alchemy is wondrous..."; mes "It incorporates every"; mes "science and many other"; mes "fields of knowledge that"; mes "it's not enough to be jack"; mes "of all trades... No..."; next; mes "[Skrajiad]"; mes "In a sense, you must"; mes "be a master of all trades"; mes "to be proficient in Alchemy"; mes "But it's incredibly rewarding to"; mes "those of us who never stop askins"; mes "how and why our world works."; if(bioeth == 1) set bioeth,2; close; } lhz_in02.gat,269,273,4 script Bringel 709,{ //Unofficial Text if(bioeth > 3 || MISC_QUEST&64){ if(getskilllv(247) == 0) skill 247,1,0; } if(bioeth == 3){ mes "[Bringel]"; mes "I see you're here to"; mes "learn about homunculus..."; mes "I will teach you a"; mes "valuable skill to use."; //Learn res homun skill 247,1,0; set bioeth,4; close; } mes "[Bringel]"; mes "Isn't this hotel great?"; mes "I can relax on the couch"; mes "And not care about what I"; mes "did in the past..."; close; } lhz_in03.gat,106,34,4 script Golin 706,{ //Unofficial text if(bioeth == 5){ mes "[Golin]"; mes "Did you see my"; mes "daddy at the lab?"; mes "Tell him I said hi!"; set bioeth,6; close; } mes "[Golin]"; mes "Where's daddy?"; mes "I really want"; mes "daddy to come back"; mes "from the lab."; close; }